packages feed

gogol-deploymentmanager 0.5.0 → 1.0.0

raw patch · 47 files changed

+7406/−6929 lines, 47 filesdep −basedep ~gogol-coresetup-changed

Dependencies removed: base

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,12 +8,12 @@  ## Version -`0.5.0`+`1.0.0`   ## Description -A client library for the Google Cloud Deployment Manager.+A client library for the Google Cloud Deployment Manager V2.   ## Contribute
Setup.hs view
@@ -1,2 +1,3 @@-import           Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/DeploymentManager.hs view
@@ -0,0 +1,429 @@+{-# 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.DeploymentManager+-- 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)+--+-- The Google Cloud Deployment Manager v2 API provides services for configuring, deploying, and viewing Google Cloud services and APIs via templates which specify deployments of Cloud resources.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference>+module Gogol.DeploymentManager+  ( -- * Configuration+    deploymentManagerService,++    -- * OAuth Scopes+    CloudPlatform'FullControl,+    CloudPlatform'ReadOnly,+    Ndev'Cloudman,+    Ndev'Cloudman'Readonly,++    -- * Resources++    -- ** deploymentmanager.deployments.cancelPreview+    DeploymentManagerDeploymentsCancelPreviewResource,+    DeploymentManagerDeploymentsCancelPreview (..),+    newDeploymentManagerDeploymentsCancelPreview,++    -- ** deploymentmanager.deployments.delete+    DeploymentManagerDeploymentsDeleteResource,+    DeploymentManagerDeploymentsDelete (..),+    newDeploymentManagerDeploymentsDelete,++    -- ** deploymentmanager.deployments.get+    DeploymentManagerDeploymentsGetResource,+    DeploymentManagerDeploymentsGet (..),+    newDeploymentManagerDeploymentsGet,++    -- ** deploymentmanager.deployments.getIamPolicy+    DeploymentManagerDeploymentsGetIamPolicyResource,+    DeploymentManagerDeploymentsGetIamPolicy (..),+    newDeploymentManagerDeploymentsGetIamPolicy,++    -- ** deploymentmanager.deployments.insert+    DeploymentManagerDeploymentsInsertResource,+    DeploymentManagerDeploymentsInsert (..),+    newDeploymentManagerDeploymentsInsert,++    -- ** deploymentmanager.deployments.list+    DeploymentManagerDeploymentsListResource,+    DeploymentManagerDeploymentsList (..),+    newDeploymentManagerDeploymentsList,++    -- ** deploymentmanager.deployments.patch+    DeploymentManagerDeploymentsPatchResource,+    DeploymentManagerDeploymentsPatch (..),+    newDeploymentManagerDeploymentsPatch,++    -- ** deploymentmanager.deployments.setIamPolicy+    DeploymentManagerDeploymentsSetIamPolicyResource,+    DeploymentManagerDeploymentsSetIamPolicy (..),+    newDeploymentManagerDeploymentsSetIamPolicy,++    -- ** deploymentmanager.deployments.stop+    DeploymentManagerDeploymentsStopResource,+    DeploymentManagerDeploymentsStop (..),+    newDeploymentManagerDeploymentsStop,++    -- ** deploymentmanager.deployments.testIamPermissions+    DeploymentManagerDeploymentsTestIamPermissionsResource,+    DeploymentManagerDeploymentsTestIamPermissions (..),+    newDeploymentManagerDeploymentsTestIamPermissions,++    -- ** deploymentmanager.deployments.update+    DeploymentManagerDeploymentsUpdateResource,+    DeploymentManagerDeploymentsUpdate (..),+    newDeploymentManagerDeploymentsUpdate,++    -- ** deploymentmanager.manifests.get+    DeploymentManagerManifestsGetResource,+    DeploymentManagerManifestsGet (..),+    newDeploymentManagerManifestsGet,++    -- ** deploymentmanager.manifests.list+    DeploymentManagerManifestsListResource,+    DeploymentManagerManifestsList (..),+    newDeploymentManagerManifestsList,++    -- ** deploymentmanager.operations.get+    DeploymentManagerOperationsGetResource,+    DeploymentManagerOperationsGet (..),+    newDeploymentManagerOperationsGet,++    -- ** deploymentmanager.operations.list+    DeploymentManagerOperationsListResource,+    DeploymentManagerOperationsList (..),+    newDeploymentManagerOperationsList,++    -- ** deploymentmanager.resources.get+    DeploymentManagerResourcesGetResource,+    DeploymentManagerResourcesGet (..),+    newDeploymentManagerResourcesGet,++    -- ** deploymentmanager.resources.list+    DeploymentManagerResourcesListResource,+    DeploymentManagerResourcesList (..),+    newDeploymentManagerResourcesList,++    -- ** deploymentmanager.types.list+    DeploymentManagerTypesListResource,+    DeploymentManagerTypesList (..),+    newDeploymentManagerTypesList,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** AuditConfig+    AuditConfig (..),+    newAuditConfig,++    -- ** AuditLogConfig+    AuditLogConfig (..),+    newAuditLogConfig,++    -- ** AuditLogConfig_LogType+    AuditLogConfig_LogType (..),++    -- ** Binding+    Binding (..),+    newBinding,++    -- ** BulkInsertOperationStatus+    BulkInsertOperationStatus (..),+    newBulkInsertOperationStatus,++    -- ** BulkInsertOperationStatus_Status+    BulkInsertOperationStatus_Status (..),++    -- ** ConfigFile+    ConfigFile (..),+    newConfigFile,++    -- ** DebugInfo+    DebugInfo (..),+    newDebugInfo,++    -- ** Deployment+    Deployment (..),+    newDeployment,++    -- ** DeploymentLabelEntry+    DeploymentLabelEntry (..),+    newDeploymentLabelEntry,++    -- ** DeploymentUpdate+    DeploymentUpdate (..),+    newDeploymentUpdate,++    -- ** DeploymentUpdateLabelEntry+    DeploymentUpdateLabelEntry (..),+    newDeploymentUpdateLabelEntry,++    -- ** DeploymentsCancelPreviewRequest+    DeploymentsCancelPreviewRequest (..),+    newDeploymentsCancelPreviewRequest,++    -- ** DeploymentsListResponse+    DeploymentsListResponse (..),+    newDeploymentsListResponse,++    -- ** DeploymentsStopRequest+    DeploymentsStopRequest (..),+    newDeploymentsStopRequest,++    -- ** ErrorInfo+    ErrorInfo (..),+    newErrorInfo,++    -- ** ErrorInfo_Metadatas+    ErrorInfo_Metadatas (..),+    newErrorInfo_Metadatas,++    -- ** Expr+    Expr (..),+    newExpr,++    -- ** GlobalSetPolicyRequest+    GlobalSetPolicyRequest (..),+    newGlobalSetPolicyRequest,++    -- ** Help+    Help (..),+    newHelp,++    -- ** HelpLink+    HelpLink (..),+    newHelpLink,++    -- ** ImportFile+    ImportFile (..),+    newImportFile,++    -- ** InstancesBulkInsertOperationMetadata+    InstancesBulkInsertOperationMetadata (..),+    newInstancesBulkInsertOperationMetadata,++    -- ** InstancesBulkInsertOperationMetadata_PerLocationStatus+    InstancesBulkInsertOperationMetadata_PerLocationStatus (..),+    newInstancesBulkInsertOperationMetadata_PerLocationStatus,++    -- ** LocalizedMessage+    LocalizedMessage (..),+    newLocalizedMessage,++    -- ** Manifest+    Manifest (..),+    newManifest,++    -- ** ManifestsListResponse+    ManifestsListResponse (..),+    newManifestsListResponse,++    -- ** Operation+    Operation (..),+    newOperation,++    -- ** Operation_Error+    Operation_Error (..),+    newOperation_Error,++    -- ** Operation_Error_ErrorsItem+    Operation_Error_ErrorsItem (..),+    newOperation_Error_ErrorsItem,++    -- ** Operation_Error_ErrorsItem_ErrorDetailsItem+    Operation_Error_ErrorsItem_ErrorDetailsItem (..),+    newOperation_Error_ErrorsItem_ErrorDetailsItem,++    -- ** Operation_Status+    Operation_Status (..),++    -- ** Operation_WarningsItem+    Operation_WarningsItem (..),+    newOperation_WarningsItem,++    -- ** Operation_WarningsItem_Code+    Operation_WarningsItem_Code (..),++    -- ** Operation_WarningsItem_DataItem+    Operation_WarningsItem_DataItem (..),+    newOperation_WarningsItem_DataItem,++    -- ** OperationsListResponse+    OperationsListResponse (..),+    newOperationsListResponse,++    -- ** Policy+    Policy (..),+    newPolicy,++    -- ** QuotaExceededInfo+    QuotaExceededInfo (..),+    newQuotaExceededInfo,++    -- ** QuotaExceededInfo_Dimensions+    QuotaExceededInfo_Dimensions (..),+    newQuotaExceededInfo_Dimensions,++    -- ** QuotaExceededInfo_RolloutStatus+    QuotaExceededInfo_RolloutStatus (..),++    -- ** Resource+    Resource (..),+    newResource,++    -- ** Resource_WarningsItem+    Resource_WarningsItem (..),+    newResource_WarningsItem,++    -- ** Resource_WarningsItem_Code+    Resource_WarningsItem_Code (..),++    -- ** Resource_WarningsItem_DataItem+    Resource_WarningsItem_DataItem (..),+    newResource_WarningsItem_DataItem,++    -- ** ResourceAccessControl+    ResourceAccessControl (..),+    newResourceAccessControl,++    -- ** ResourceUpdate+    ResourceUpdate (..),+    newResourceUpdate,++    -- ** ResourceUpdate_Error+    ResourceUpdate_Error (..),+    newResourceUpdate_Error,++    -- ** ResourceUpdate_Error_ErrorsItem+    ResourceUpdate_Error_ErrorsItem (..),+    newResourceUpdate_Error_ErrorsItem,++    -- ** ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+    ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem (..),+    newResourceUpdate_Error_ErrorsItem_ErrorDetailsItem,++    -- ** ResourceUpdate_Intent+    ResourceUpdate_Intent (..),++    -- ** ResourceUpdate_State+    ResourceUpdate_State (..),++    -- ** ResourceUpdate_WarningsItem+    ResourceUpdate_WarningsItem (..),+    newResourceUpdate_WarningsItem,++    -- ** ResourceUpdate_WarningsItem_Code+    ResourceUpdate_WarningsItem_Code (..),++    -- ** ResourceUpdate_WarningsItem_DataItem+    ResourceUpdate_WarningsItem_DataItem (..),+    newResourceUpdate_WarningsItem_DataItem,++    -- ** ResourcesListResponse+    ResourcesListResponse (..),+    newResourcesListResponse,++    -- ** SetCommonInstanceMetadataOperationMetadata+    SetCommonInstanceMetadataOperationMetadata (..),+    newSetCommonInstanceMetadataOperationMetadata,++    -- ** SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations (..),+    newSetCommonInstanceMetadataOperationMetadata_PerLocationOperations,++    -- ** SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo (..),+    newSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo,++    -- ** SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State (..),++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** TargetConfiguration+    TargetConfiguration (..),+    newTargetConfiguration,++    -- ** TestPermissionsRequest+    TestPermissionsRequest (..),+    newTestPermissionsRequest,++    -- ** TestPermissionsResponse+    TestPermissionsResponse (..),+    newTestPermissionsResponse,++    -- ** Type+    Type (..),+    newType,++    -- ** TypesListResponse+    TypesListResponse (..),+    newTypesListResponse,++    -- ** DeploymentsDeleteDeletePolicy+    DeploymentsDeleteDeletePolicy (..),++    -- ** DeploymentsInsertCreatePolicy+    DeploymentsInsertCreatePolicy (..),++    -- ** DeploymentsPatchCreatePolicy+    DeploymentsPatchCreatePolicy (..),++    -- ** DeploymentsPatchDeletePolicy+    DeploymentsPatchDeletePolicy (..),++    -- ** DeploymentsUpdateCreatePolicy+    DeploymentsUpdateCreatePolicy (..),++    -- ** DeploymentsUpdateDeletePolicy+    DeploymentsUpdateDeletePolicy (..),+  )+where++import Gogol.DeploymentManager.Deployments.CancelPreview+import Gogol.DeploymentManager.Deployments.Delete+import Gogol.DeploymentManager.Deployments.Get+import Gogol.DeploymentManager.Deployments.GetIamPolicy+import Gogol.DeploymentManager.Deployments.Insert+import Gogol.DeploymentManager.Deployments.List+import Gogol.DeploymentManager.Deployments.Patch+import Gogol.DeploymentManager.Deployments.SetIamPolicy+import Gogol.DeploymentManager.Deployments.Stop+import Gogol.DeploymentManager.Deployments.TestIamPermissions+import Gogol.DeploymentManager.Deployments.Update+import Gogol.DeploymentManager.Manifests.Get+import Gogol.DeploymentManager.Manifests.List+import Gogol.DeploymentManager.Operations.Get+import Gogol.DeploymentManager.Operations.List+import Gogol.DeploymentManager.Resources.Get+import Gogol.DeploymentManager.Resources.List+import Gogol.DeploymentManager.Types+import Gogol.DeploymentManager.Types.List
+ gen/Gogol/DeploymentManager/Deployments/CancelPreview.hs view
@@ -0,0 +1,136 @@+{-# 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.DeploymentManager.Deployments.CancelPreview+-- 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)+--+-- Cancels and removes the preview currently associated with the deployment.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.cancelPreview@.+module Gogol.DeploymentManager.Deployments.CancelPreview+  ( -- * Resource+    DeploymentManagerDeploymentsCancelPreviewResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsCancelPreview (..),+    newDeploymentManagerDeploymentsCancelPreview,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.cancelPreview@ method which the+-- 'DeploymentManagerDeploymentsCancelPreview' request conforms to.+type DeploymentManagerDeploymentsCancelPreviewResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> "cancelPreview"+    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] DeploymentsCancelPreviewRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Cancels and removes the preview currently associated with the deployment.+--+-- /See:/ 'newDeploymentManagerDeploymentsCancelPreview' smart constructor.+data DeploymentManagerDeploymentsCancelPreview = DeploymentManagerDeploymentsCancelPreview+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    -- | Multipart request metadata.+    payload :: DeploymentsCancelPreviewRequest,+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsCancelPreview' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsCancelPreview ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  DeploymentsCancelPreviewRequest ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsCancelPreview+newDeploymentManagerDeploymentsCancelPreview+  deployment+  payload+  project =+    DeploymentManagerDeploymentsCancelPreview+      { xgafv = Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        deployment = deployment,+        payload = payload,+        project = project,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    DeploymentManagerDeploymentsCancelPreview+  where+  type Rs DeploymentManagerDeploymentsCancelPreview = Operation+  type+    Scopes DeploymentManagerDeploymentsCancelPreview =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsCancelPreview {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsCancelPreviewResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/Delete.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.DeploymentManager.Deployments.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 deployment and all of the resources in the deployment.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.delete@.+module Gogol.DeploymentManager.Deployments.Delete+  ( -- * Resource+    DeploymentManagerDeploymentsDeleteResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsDelete (..),+    newDeploymentManagerDeploymentsDelete,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.delete@ method which the+-- 'DeploymentManagerDeploymentsDelete' request conforms to.+type DeploymentManagerDeploymentsDeleteResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "deletePolicy" DeploymentsDeleteDeletePolicy+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    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++-- | Deletes a deployment and all of the resources in the deployment.+--+-- /See:/ 'newDeploymentManagerDeploymentsDelete' smart constructor.+data DeploymentManagerDeploymentsDelete = DeploymentManagerDeploymentsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Sets the policy to use for deleting resources.+    deletePolicy :: DeploymentsDeleteDeletePolicy,+    -- | The name of the deployment for this request.+    deployment :: Core.Text,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsDelete' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsDelete ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsDelete+newDeploymentManagerDeploymentsDelete deployment project =+  DeploymentManagerDeploymentsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deletePolicy = DeploymentsDeleteDeletePolicy_Delete',+      deployment = deployment,+      headerBypassBillingFilter = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsDelete where+  type Rs DeploymentManagerDeploymentsDelete = Operation+  type+    Scopes DeploymentManagerDeploymentsDelete =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsDelete {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      (Core.Just deletePolicy)+      headerBypassBillingFilter+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsDeleteResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/Get.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.DeploymentManager.Deployments.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 information about a specific deployment.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.get@.+module Gogol.DeploymentManager.Deployments.Get+  ( -- * Resource+    DeploymentManagerDeploymentsGetResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsGet (..),+    newDeploymentManagerDeploymentsGet,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.get@ method which the+-- 'DeploymentManagerDeploymentsGet' request conforms to.+type DeploymentManagerDeploymentsGetResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Deployment++-- | Gets information about a specific deployment.+--+-- /See:/ 'newDeploymentManagerDeploymentsGet' smart constructor.+data DeploymentManagerDeploymentsGet = DeploymentManagerDeploymentsGet+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsGet' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsGet ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsGet+newDeploymentManagerDeploymentsGet deployment project =+  DeploymentManagerDeploymentsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deployment = deployment,+      headerBypassBillingFilter = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsGet where+  type Rs DeploymentManagerDeploymentsGet = Deployment+  type+    Scopes DeploymentManagerDeploymentsGet =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerDeploymentsGet {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      headerBypassBillingFilter+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerDeploymentsGetResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/GetIamPolicy.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.DeploymentManager.Deployments.GetIamPolicy+-- 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 access control policy for a resource. May be empty if no such policy or resource exists.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.getIamPolicy@.+module Gogol.DeploymentManager.Deployments.GetIamPolicy+  ( -- * Resource+    DeploymentManagerDeploymentsGetIamPolicyResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsGetIamPolicy (..),+    newDeploymentManagerDeploymentsGetIamPolicy,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.getIamPolicy@ method which the+-- 'DeploymentManagerDeploymentsGetIamPolicy' request conforms to.+type DeploymentManagerDeploymentsGetIamPolicyResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "resource" Core.Text+    Core.:> "getIamPolicy"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "optionsRequestedPolicyVersion" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Policy++-- | Gets the access control policy for a resource. May be empty if no such policy or resource exists.+--+-- /See:/ 'newDeploymentManagerDeploymentsGetIamPolicy' smart constructor.+data DeploymentManagerDeploymentsGetIamPolicy = DeploymentManagerDeploymentsGetIamPolicy+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | Requested IAM Policy version.+    optionsRequestedPolicyVersion :: (Core.Maybe Core.Int32),+    -- | Project ID for this request.+    project :: Core.Text,+    -- | Name or id of the resource for this request.+    resource :: 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 'DeploymentManagerDeploymentsGetIamPolicy' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsGetIamPolicy ::+  -- |  Project ID for this request. See 'project'.+  Core.Text ->+  -- |  Name or id of the resource for this request. See 'resource'.+  Core.Text ->+  DeploymentManagerDeploymentsGetIamPolicy+newDeploymentManagerDeploymentsGetIamPolicy project resource =+  DeploymentManagerDeploymentsGetIamPolicy+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      headerBypassBillingFilter = Core.Nothing,+      optionsRequestedPolicyVersion = Core.Nothing,+      project = project,+      resource = resource,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    DeploymentManagerDeploymentsGetIamPolicy+  where+  type Rs DeploymentManagerDeploymentsGetIamPolicy = Policy+  type+    Scopes DeploymentManagerDeploymentsGetIamPolicy =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsGetIamPolicy {..} =+    go+      project+      resource+      xgafv+      accessToken+      callback+      headerBypassBillingFilter+      optionsRequestedPolicyVersion+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsGetIamPolicyResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/Insert.hs view
@@ -0,0 +1,136 @@+{-# 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.DeploymentManager.Deployments.Insert+-- 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 deployment and all of the resources described by the deployment manifest.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.insert@.+module Gogol.DeploymentManager.Deployments.Insert+  ( -- * Resource+    DeploymentManagerDeploymentsInsertResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsInsert (..),+    newDeploymentManagerDeploymentsInsert,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.insert@ method which the+-- 'DeploymentManagerDeploymentsInsert' request conforms to.+type DeploymentManagerDeploymentsInsertResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "createPolicy" DeploymentsInsertCreatePolicy+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "preview" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Deployment+    Core.:> Core.Post '[Core.JSON] Operation++-- | Creates a deployment and all of the resources described by the deployment manifest.+--+-- /See:/ 'newDeploymentManagerDeploymentsInsert' smart constructor.+data DeploymentManagerDeploymentsInsert = DeploymentManagerDeploymentsInsert+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Sets the policy to use for creating new resources.+    createPolicy :: DeploymentsInsertCreatePolicy,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | Multipart request metadata.+    payload :: Deployment,+    -- | If set to true, creates a deployment and creates \"shell\" resources but does not actually instantiate these resources. This allows you to preview what your deployment looks like. After previewing a deployment, you can deploy your resources by making a request with the @update()@ method or you can use the @cancelPreview()@ method to cancel the preview altogether. Note that the deployment will still exist after you cancel the preview and you must separately delete this deployment if you want to remove it.+    preview :: (Core.Maybe Core.Bool),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsInsert' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsInsert ::+  -- |  Multipart request metadata. See 'payload'.+  Deployment ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsInsert+newDeploymentManagerDeploymentsInsert payload project =+  DeploymentManagerDeploymentsInsert+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      createPolicy = DeploymentsInsertCreatePolicy_CREATEORACQUIRE,+      headerBypassBillingFilter = Core.Nothing,+      payload = payload,+      preview = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsInsert where+  type Rs DeploymentManagerDeploymentsInsert = Operation+  type+    Scopes DeploymentManagerDeploymentsInsert =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsInsert {..} =+    go+      project+      xgafv+      accessToken+      callback+      (Core.Just createPolicy)+      headerBypassBillingFilter+      preview+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsInsertResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/List.hs view
@@ -0,0 +1,139 @@+{-# 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.DeploymentManager.Deployments.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 all deployments for a given project.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.list@.+module Gogol.DeploymentManager.Deployments.List+  ( -- * Resource+    DeploymentManagerDeploymentsListResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsList (..),+    newDeploymentManagerDeploymentsList,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.list@ method which the+-- 'DeploymentManagerDeploymentsList' request conforms to.+type DeploymentManagerDeploymentsListResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    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 "maxResults" Core.Word32+    Core.:> Core.QueryParam "orderBy" Core.Text+    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] DeploymentsListResponse++-- | Lists all deployments for a given project.+--+-- /See:/ 'newDeploymentManagerDeploymentsList' smart constructor.+data DeploymentManagerDeploymentsList = DeploymentManagerDeploymentsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | A filter expression that filters resources listed in the response. Most Compute resources support two types of filter expressions: expressions that support regular expressions and expressions that follow API improvement proposal AIP-160. These two types of filter expressions cannot be mixed in one request. If you want to use AIP-160, your expression must specify the field name, an operator, and the value that you want to use for filtering. The value must be a string, a number, or a boolean. The operator must be either @=@, @!=@, @>@, @\<@, @\<=@, @>=@ or @:@. For example, if you are filtering Compute Engine instances, you can exclude instances named @example-instance@ by specifying @name != example-instance@. The @:*@ comparison can be used to test whether a key has been defined. For example, to find all objects with @owner@ label use: @labels.owner:*@ You can also filter nested fields. For example, you could specify @scheduling.automaticRestart = false@ to include instances only if they are not scheduled for+    -- automatic restarts. You can use filtering on nested fields to filter based on resource labels. To filter on multiple expressions, provide each separate expression within parentheses. For example: @(scheduling.automaticRestart = true) (cpuPlatform = \"Intel Skylake\")@ By default, each expression is an @AND@ expression. However, you can include @AND@ and @OR@ expressions explicitly. For example: @(cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel Broadwell\") AND (scheduling.automaticRestart = true)@ If you want to use a regular expression, use the @eq@ (equal) or @ne@ (not equal) operator against a single un-parenthesized expression with or without quotes or against multiple parenthesized expressions. Examples: @fieldname eq unquoted literal@ @fieldname eq \'single quoted literal\'@ @fieldname eq \"double quoted literal\"@ @(fieldname1 eq literal) (fieldname2 ne \"literal\")@ The literal value is interpreted as a regular expression using Google RE2 library syntax. The literal value must match the+    -- entire field. For example, to filter for instances that do not end with name \"instance\", you would use @name ne .*instance@. You cannot combine constraints on multiple fields using regular expressions.+    filter :: (Core.Maybe Core.Text),+    -- | The maximum number of results per page that should be returned. If the number of available results is larger than @maxResults@, Compute Engine returns a @nextPageToken@ that can be used to get the next page of results in subsequent list requests. Acceptable values are @0@ to @500@, inclusive. (Default: @500@)+    maxResults :: Core.Word32,+    -- | Sorts list results by a certain order. By default, results are returned in alphanumerical order based on the resource name. You can also sort results in descending order based on the creation timestamp using @orderBy=\"creationTimestamp desc\"@. This sorts results based on the @creationTimestamp@ field in reverse chronological order (newest result first). Use this to sort resources like operations so that the newest operation is returned first. Currently, only sorting by @name@ or @creationTimestamp desc@ is supported.+    orderBy :: (Core.Maybe Core.Text),+    -- | Specifies a page token to use. Set @pageToken@ to the @nextPageToken@ returned by a previous list request to get the next page of results.+    pageToken :: (Core.Maybe Core.Text),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsList' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsList ::+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsList+newDeploymentManagerDeploymentsList project =+  DeploymentManagerDeploymentsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      maxResults = 500,+      orderBy = Core.Nothing,+      pageToken = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsList where+  type Rs DeploymentManagerDeploymentsList = DeploymentsListResponse+  type+    Scopes DeploymentManagerDeploymentsList =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerDeploymentsList {..} =+    go+      project+      xgafv+      accessToken+      callback+      filter+      (Core.Just maxResults)+      orderBy+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerDeploymentsListResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/Patch.hs view
@@ -0,0 +1,148 @@+{-# 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.DeploymentManager.Deployments.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)+--+-- Patches a deployment and all of the resources described by the deployment manifest.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.patch@.+module Gogol.DeploymentManager.Deployments.Patch+  ( -- * Resource+    DeploymentManagerDeploymentsPatchResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsPatch (..),+    newDeploymentManagerDeploymentsPatch,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.patch@ method which the+-- 'DeploymentManagerDeploymentsPatch' request conforms to.+type DeploymentManagerDeploymentsPatchResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "createPolicy" DeploymentsPatchCreatePolicy+    Core.:> Core.QueryParam "deletePolicy" DeploymentsPatchDeletePolicy+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "preview" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Deployment+    Core.:> Core.Patch '[Core.JSON] Operation++-- | Patches a deployment and all of the resources described by the deployment manifest.+--+-- /See:/ 'newDeploymentManagerDeploymentsPatch' smart constructor.+data DeploymentManagerDeploymentsPatch = DeploymentManagerDeploymentsPatch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Sets the policy to use for creating new resources.+    createPolicy :: DeploymentsPatchCreatePolicy,+    -- | Sets the policy to use for deleting resources.+    deletePolicy :: DeploymentsPatchDeletePolicy,+    -- | The name of the deployment for this request.+    deployment :: Core.Text,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | Multipart request metadata.+    payload :: Deployment,+    -- | If set to true, updates the deployment and creates and updates the \"shell\" resources but does not actually alter or instantiate these resources. This allows you to preview what your deployment will look like. You can use this intent to preview how an update would affect your deployment. You must provide a @target.config@ with a configuration if this is set to true. After previewing a deployment, you can deploy your resources by making a request with the @update()@ or you can @cancelPreview()@ to remove the preview altogether. Note that the deployment will still exist after you cancel the preview and you must separately delete this deployment if you want to remove it.+    preview :: Core.Bool,+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsPatch' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsPatch ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  Deployment ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsPatch+newDeploymentManagerDeploymentsPatch deployment payload project =+  DeploymentManagerDeploymentsPatch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      createPolicy = DeploymentsPatchCreatePolicy_CREATEORACQUIRE,+      deletePolicy = DeploymentsPatchDeletePolicy_Delete',+      deployment = deployment,+      headerBypassBillingFilter = Core.Nothing,+      payload = payload,+      preview = Core.False,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsPatch where+  type Rs DeploymentManagerDeploymentsPatch = Operation+  type+    Scopes DeploymentManagerDeploymentsPatch =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsPatch {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      (Core.Just createPolicy)+      (Core.Just deletePolicy)+      headerBypassBillingFilter+      (Core.Just preview)+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsPatchResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/SetIamPolicy.hs view
@@ -0,0 +1,136 @@+{-# 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.DeploymentManager.Deployments.SetIamPolicy+-- 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)+--+-- Sets the access control policy on the specified resource. Replaces any existing policy.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.setIamPolicy@.+module Gogol.DeploymentManager.Deployments.SetIamPolicy+  ( -- * Resource+    DeploymentManagerDeploymentsSetIamPolicyResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsSetIamPolicy (..),+    newDeploymentManagerDeploymentsSetIamPolicy,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.setIamPolicy@ method which the+-- 'DeploymentManagerDeploymentsSetIamPolicy' request conforms to.+type DeploymentManagerDeploymentsSetIamPolicyResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "resource" Core.Text+    Core.:> "setIamPolicy"+    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] GlobalSetPolicyRequest+    Core.:> Core.Post '[Core.JSON] Policy++-- | Sets the access control policy on the specified resource. Replaces any existing policy.+--+-- /See:/ 'newDeploymentManagerDeploymentsSetIamPolicy' smart constructor.+data DeploymentManagerDeploymentsSetIamPolicy = DeploymentManagerDeploymentsSetIamPolicy+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: GlobalSetPolicyRequest,+    -- | Project ID for this request.+    project :: Core.Text,+    -- | Name or id of the resource for this request.+    resource :: 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 'DeploymentManagerDeploymentsSetIamPolicy' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsSetIamPolicy ::+  -- |  Multipart request metadata. See 'payload'.+  GlobalSetPolicyRequest ->+  -- |  Project ID for this request. See 'project'.+  Core.Text ->+  -- |  Name or id of the resource for this request. See 'resource'.+  Core.Text ->+  DeploymentManagerDeploymentsSetIamPolicy+newDeploymentManagerDeploymentsSetIamPolicy+  payload+  project+  resource =+    DeploymentManagerDeploymentsSetIamPolicy+      { xgafv = Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        payload = payload,+        project = project,+        resource = resource,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    DeploymentManagerDeploymentsSetIamPolicy+  where+  type Rs DeploymentManagerDeploymentsSetIamPolicy = Policy+  type+    Scopes DeploymentManagerDeploymentsSetIamPolicy =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsSetIamPolicy {..} =+    go+      project+      resource+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsSetIamPolicyResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/Stop.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.DeploymentManager.Deployments.Stop+-- 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 an ongoing operation. This does not roll back any work that has already been completed, but prevents any new work from being started.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.stop@.+module Gogol.DeploymentManager.Deployments.Stop+  ( -- * Resource+    DeploymentManagerDeploymentsStopResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsStop (..),+    newDeploymentManagerDeploymentsStop,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.stop@ method which the+-- 'DeploymentManagerDeploymentsStop' request conforms to.+type DeploymentManagerDeploymentsStopResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> "stop"+    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] DeploymentsStopRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Stops an ongoing operation. This does not roll back any work that has already been completed, but prevents any new work from being started.+--+-- /See:/ 'newDeploymentManagerDeploymentsStop' smart constructor.+data DeploymentManagerDeploymentsStop = DeploymentManagerDeploymentsStop+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    -- | Multipart request metadata.+    payload :: DeploymentsStopRequest,+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsStop' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsStop ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  DeploymentsStopRequest ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsStop+newDeploymentManagerDeploymentsStop deployment payload project =+  DeploymentManagerDeploymentsStop+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deployment = deployment,+      payload = payload,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsStop where+  type Rs DeploymentManagerDeploymentsStop = Operation+  type+    Scopes DeploymentManagerDeploymentsStop =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsStop {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerDeploymentsStopResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/TestIamPermissions.hs view
@@ -0,0 +1,143 @@+{-# 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.DeploymentManager.Deployments.TestIamPermissions+-- 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)+--+-- Returns permissions that a caller has on the specified resource.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.testIamPermissions@.+module Gogol.DeploymentManager.Deployments.TestIamPermissions+  ( -- * Resource+    DeploymentManagerDeploymentsTestIamPermissionsResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsTestIamPermissions (..),+    newDeploymentManagerDeploymentsTestIamPermissions,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.testIamPermissions@ method which the+-- 'DeploymentManagerDeploymentsTestIamPermissions' request conforms to.+type DeploymentManagerDeploymentsTestIamPermissionsResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "resource" Core.Text+    Core.:> "testIamPermissions"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] TestPermissionsRequest+    Core.:> Core.Post '[Core.JSON] TestPermissionsResponse++-- | Returns permissions that a caller has on the specified resource.+--+-- /See:/ 'newDeploymentManagerDeploymentsTestIamPermissions' smart constructor.+data DeploymentManagerDeploymentsTestIamPermissions = DeploymentManagerDeploymentsTestIamPermissions+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | Multipart request metadata.+    payload :: TestPermissionsRequest,+    -- | Project ID for this request.+    project :: Core.Text,+    -- | Name or id of the resource for this request.+    resource :: 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 'DeploymentManagerDeploymentsTestIamPermissions' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsTestIamPermissions ::+  -- |  Multipart request metadata. See 'payload'.+  TestPermissionsRequest ->+  -- |  Project ID for this request. See 'project'.+  Core.Text ->+  -- |  Name or id of the resource for this request. See 'resource'.+  Core.Text ->+  DeploymentManagerDeploymentsTestIamPermissions+newDeploymentManagerDeploymentsTestIamPermissions+  payload+  project+  resource =+    DeploymentManagerDeploymentsTestIamPermissions+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        headerBypassBillingFilter = Core.Nothing,+        payload = payload,+        project = project,+        resource = resource,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing+      }++instance+  Core.GoogleRequest+    DeploymentManagerDeploymentsTestIamPermissions+  where+  type+    Rs DeploymentManagerDeploymentsTestIamPermissions =+      TestPermissionsResponse+  type+    Scopes DeploymentManagerDeploymentsTestIamPermissions =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsTestIamPermissions {..} =+    go+      project+      resource+      xgafv+      accessToken+      callback+      headerBypassBillingFilter+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsTestIamPermissionsResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Deployments/Update.hs view
@@ -0,0 +1,148 @@+{-# 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.DeploymentManager.Deployments.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 deployment and all of the resources described by the deployment manifest.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.deployments.update@.+module Gogol.DeploymentManager.Deployments.Update+  ( -- * Resource+    DeploymentManagerDeploymentsUpdateResource,++    -- ** Constructing a Request+    DeploymentManagerDeploymentsUpdate (..),+    newDeploymentManagerDeploymentsUpdate,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.deployments.update@ method which the+-- 'DeploymentManagerDeploymentsUpdate' request conforms to.+type DeploymentManagerDeploymentsUpdateResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "createPolicy" DeploymentsUpdateCreatePolicy+    Core.:> Core.QueryParam "deletePolicy" DeploymentsUpdateDeletePolicy+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "preview" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Deployment+    Core.:> Core.Put '[Core.JSON] Operation++-- | Updates a deployment and all of the resources described by the deployment manifest.+--+-- /See:/ 'newDeploymentManagerDeploymentsUpdate' smart constructor.+data DeploymentManagerDeploymentsUpdate = DeploymentManagerDeploymentsUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Sets the policy to use for creating new resources.+    createPolicy :: DeploymentsUpdateCreatePolicy,+    -- | Sets the policy to use for deleting resources.+    deletePolicy :: DeploymentsUpdateDeletePolicy,+    -- | The name of the deployment for this request.+    deployment :: Core.Text,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | Multipart request metadata.+    payload :: Deployment,+    -- | If set to true, updates the deployment and creates and updates the \"shell\" resources but does not actually alter or instantiate these resources. This allows you to preview what your deployment will look like. You can use this intent to preview how an update would affect your deployment. You must provide a @target.config@ with a configuration if this is set to true. After previewing a deployment, you can deploy your resources by making a request with the @update()@ or you can @cancelPreview()@ to remove the preview altogether. Note that the deployment will still exist after you cancel the preview and you must separately delete this deployment if you want to remove it.+    preview :: Core.Bool,+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerDeploymentsUpdate' with the minimum fields required to make a request.+newDeploymentManagerDeploymentsUpdate ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  Deployment ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerDeploymentsUpdate+newDeploymentManagerDeploymentsUpdate deployment payload project =+  DeploymentManagerDeploymentsUpdate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      createPolicy = DeploymentsUpdateCreatePolicy_CREATEORACQUIRE,+      deletePolicy = DeploymentsUpdateDeletePolicy_Delete',+      deployment = deployment,+      headerBypassBillingFilter = Core.Nothing,+      payload = payload,+      preview = Core.False,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerDeploymentsUpdate where+  type Rs DeploymentManagerDeploymentsUpdate = Operation+  type+    Scopes DeploymentManagerDeploymentsUpdate =+      '[CloudPlatform'FullControl, Ndev'Cloudman]+  requestClient DeploymentManagerDeploymentsUpdate {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      (Core.Just createPolicy)+      (Core.Just deletePolicy)+      headerBypassBillingFilter+      (Core.Just preview)+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      deploymentManagerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DeploymentManagerDeploymentsUpdateResource+          )+          Core.mempty
+ gen/Gogol/DeploymentManager/Internal/Product.hs view
@@ -0,0 +1,2727 @@+{-# 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.DeploymentManager.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.DeploymentManager.Internal.Product+  ( -- * AuditConfig+    AuditConfig (..),+    newAuditConfig,++    -- * AuditLogConfig+    AuditLogConfig (..),+    newAuditLogConfig,++    -- * Binding+    Binding (..),+    newBinding,++    -- * BulkInsertOperationStatus+    BulkInsertOperationStatus (..),+    newBulkInsertOperationStatus,++    -- * ConfigFile+    ConfigFile (..),+    newConfigFile,++    -- * DebugInfo+    DebugInfo (..),+    newDebugInfo,++    -- * Deployment+    Deployment (..),+    newDeployment,++    -- * DeploymentLabelEntry+    DeploymentLabelEntry (..),+    newDeploymentLabelEntry,++    -- * DeploymentUpdate+    DeploymentUpdate (..),+    newDeploymentUpdate,++    -- * DeploymentUpdateLabelEntry+    DeploymentUpdateLabelEntry (..),+    newDeploymentUpdateLabelEntry,++    -- * DeploymentsCancelPreviewRequest+    DeploymentsCancelPreviewRequest (..),+    newDeploymentsCancelPreviewRequest,++    -- * DeploymentsListResponse+    DeploymentsListResponse (..),+    newDeploymentsListResponse,++    -- * DeploymentsStopRequest+    DeploymentsStopRequest (..),+    newDeploymentsStopRequest,++    -- * ErrorInfo+    ErrorInfo (..),+    newErrorInfo,++    -- * ErrorInfo_Metadatas+    ErrorInfo_Metadatas (..),+    newErrorInfo_Metadatas,++    -- * Expr+    Expr (..),+    newExpr,++    -- * GlobalSetPolicyRequest+    GlobalSetPolicyRequest (..),+    newGlobalSetPolicyRequest,++    -- * Help+    Help (..),+    newHelp,++    -- * HelpLink+    HelpLink (..),+    newHelpLink,++    -- * ImportFile+    ImportFile (..),+    newImportFile,++    -- * InstancesBulkInsertOperationMetadata+    InstancesBulkInsertOperationMetadata (..),+    newInstancesBulkInsertOperationMetadata,++    -- * InstancesBulkInsertOperationMetadata_PerLocationStatus+    InstancesBulkInsertOperationMetadata_PerLocationStatus (..),+    newInstancesBulkInsertOperationMetadata_PerLocationStatus,++    -- * LocalizedMessage+    LocalizedMessage (..),+    newLocalizedMessage,++    -- * Manifest+    Manifest (..),+    newManifest,++    -- * ManifestsListResponse+    ManifestsListResponse (..),+    newManifestsListResponse,++    -- * Operation+    Operation (..),+    newOperation,++    -- * Operation_Error+    Operation_Error (..),+    newOperation_Error,++    -- * Operation_Error_ErrorsItem+    Operation_Error_ErrorsItem (..),+    newOperation_Error_ErrorsItem,++    -- * Operation_Error_ErrorsItem_ErrorDetailsItem+    Operation_Error_ErrorsItem_ErrorDetailsItem (..),+    newOperation_Error_ErrorsItem_ErrorDetailsItem,++    -- * Operation_WarningsItem+    Operation_WarningsItem (..),+    newOperation_WarningsItem,++    -- * Operation_WarningsItem_DataItem+    Operation_WarningsItem_DataItem (..),+    newOperation_WarningsItem_DataItem,++    -- * OperationsListResponse+    OperationsListResponse (..),+    newOperationsListResponse,++    -- * Policy+    Policy (..),+    newPolicy,++    -- * QuotaExceededInfo+    QuotaExceededInfo (..),+    newQuotaExceededInfo,++    -- * QuotaExceededInfo_Dimensions+    QuotaExceededInfo_Dimensions (..),+    newQuotaExceededInfo_Dimensions,++    -- * Resource+    Resource (..),+    newResource,++    -- * Resource_WarningsItem+    Resource_WarningsItem (..),+    newResource_WarningsItem,++    -- * Resource_WarningsItem_DataItem+    Resource_WarningsItem_DataItem (..),+    newResource_WarningsItem_DataItem,++    -- * ResourceAccessControl+    ResourceAccessControl (..),+    newResourceAccessControl,++    -- * ResourceUpdate+    ResourceUpdate (..),+    newResourceUpdate,++    -- * ResourceUpdate_Error+    ResourceUpdate_Error (..),+    newResourceUpdate_Error,++    -- * ResourceUpdate_Error_ErrorsItem+    ResourceUpdate_Error_ErrorsItem (..),+    newResourceUpdate_Error_ErrorsItem,++    -- * ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+    ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem (..),+    newResourceUpdate_Error_ErrorsItem_ErrorDetailsItem,++    -- * ResourceUpdate_WarningsItem+    ResourceUpdate_WarningsItem (..),+    newResourceUpdate_WarningsItem,++    -- * ResourceUpdate_WarningsItem_DataItem+    ResourceUpdate_WarningsItem_DataItem (..),+    newResourceUpdate_WarningsItem_DataItem,++    -- * ResourcesListResponse+    ResourcesListResponse (..),+    newResourcesListResponse,++    -- * SetCommonInstanceMetadataOperationMetadata+    SetCommonInstanceMetadataOperationMetadata (..),+    newSetCommonInstanceMetadataOperationMetadata,++    -- * SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations (..),+    newSetCommonInstanceMetadataOperationMetadata_PerLocationOperations,++    -- * SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo (..),+    newSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo,++    -- * Status+    Status (..),+    newStatus,++    -- * Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- * TargetConfiguration+    TargetConfiguration (..),+    newTargetConfiguration,++    -- * TestPermissionsRequest+    TestPermissionsRequest (..),+    newTestPermissionsRequest,++    -- * TestPermissionsResponse+    TestPermissionsResponse (..),+    newTestPermissionsResponse,++    -- * Type+    Type (..),+    newType,++    -- * TypesListResponse+    TypesListResponse (..),+    newTypesListResponse,+  )+where++import Gogol.DeploymentManager.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Specifies the audit configuration for a service. The configuration determines which permission types are logged, and what identities, if any, are exempted from logging. An AuditConfig must have one or more AuditLogConfigs. If there are AuditConfigs for both @allServices@ and a specific service, the union of the two AuditConfigs is used for that service: the log/types specified in each AuditConfig are enabled, and the exempted/members in each AuditLogConfig are exempted. Example Policy with multiple AuditConfigs: { \"audit/configs\": [ { \"service\": \"allServices\", \"audit/log/configs\": [ { \"log/type\": \"DATA/READ\", \"exempted/members\": [ \"user:jose\@example.com\" ] }, { \"log/type\": \"DATA/WRITE\" }, { \"log/type\": \"ADMIN/READ\" } ] }, { \"service\": \"sampleservice.googleapis.com\", \"audit/log/configs\": [ { \"log/type\": \"DATA/READ\" }, { \"log/type\": \"DATA/WRITE\", \"exempted/members\": [ \"user:aliya\@example.com\" ] } ] } ] } For sampleservice, this policy enables DATA/READ, DATA/WRITE and+-- ADMIN/READ logging. It also exempts @jose\@example.com@ from DATA/READ logging, and @aliya\@example.com@ from DATA/WRITE logging.+--+-- /See:/ 'newAuditConfig' smart constructor.+data AuditConfig = AuditConfig+  { -- | The configuration for logging of each type of permission.+    auditLogConfigs :: (Core.Maybe [AuditLogConfig]),+    -- | Specifies a service that will be enabled for audit logging. For example, @storage.googleapis.com@, @cloudsql.googleapis.com@. @allServices@ is a special value that covers all services.+    service :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AuditConfig' with the minimum fields required to make a request.+newAuditConfig ::+  AuditConfig+newAuditConfig =+  AuditConfig+    { auditLogConfigs = Core.Nothing,+      service = Core.Nothing+    }++instance Core.FromJSON AuditConfig where+  parseJSON =+    Core.withObject+      "AuditConfig"+      ( \o ->+          AuditConfig+            Core.<$> (o Core..:? "auditLogConfigs")+            Core.<*> (o Core..:? "service")+      )++instance Core.ToJSON AuditConfig where+  toJSON AuditConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("auditLogConfigs" Core..=) Core.<$> auditLogConfigs,+            ("service" Core..=) Core.<$> service+          ]+      )++-- | Provides the configuration for logging a type of permissions. Example: { \"audit/log/configs\": [ { \"log/type\": \"DATA/READ\", \"exempted/members\": [ \"user:jose\@example.com\" ] }, { \"log/type\": \"DATA/WRITE\" } ] } This enables \'DATA/READ\' and \'DATA/WRITE\' logging, while exempting jose\@example.com from DATA/READ logging.+--+-- /See:/ 'newAuditLogConfig' smart constructor.+data AuditLogConfig = AuditLogConfig+  { -- | Specifies the identities that do not cause logging for this type of permission. Follows the same format of Binding.members.+    exemptedMembers :: (Core.Maybe [Core.Text]),+    -- | The log type that this config enables.+    logType :: (Core.Maybe AuditLogConfig_LogType)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AuditLogConfig' with the minimum fields required to make a request.+newAuditLogConfig ::+  AuditLogConfig+newAuditLogConfig =+  AuditLogConfig+    { exemptedMembers = Core.Nothing,+      logType = Core.Nothing+    }++instance Core.FromJSON AuditLogConfig where+  parseJSON =+    Core.withObject+      "AuditLogConfig"+      ( \o ->+          AuditLogConfig+            Core.<$> (o Core..:? "exemptedMembers")+            Core.<*> (o Core..:? "logType")+      )++instance Core.ToJSON AuditLogConfig where+  toJSON AuditLogConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("exemptedMembers" Core..=) Core.<$> exemptedMembers,+            ("logType" Core..=) Core.<$> logType+          ]+      )++-- | Associates @members@, or principals, with a @role@.+--+-- /See:/ 'newBinding' smart constructor.+data Binding = Binding+  { -- | The condition that is associated with this binding. If the condition evaluates to @true@, then this binding applies to the current request. If the condition evaluates to @false@, then this binding does not apply to the current request. However, a different role binding might grant the same role to one or more of the principals in this binding. To learn which resources support conditions in their IAM policies, see the <https://cloud.google.com/iam/help/conditions/resource-policies IAM documentation>.+    condition :: (Core.Maybe Expr),+    -- | Specifies the principals requesting access for a Google Cloud resource. @members@ can have the following values: * @allUsers@: A special identifier that represents anyone who is on the internet; with or without a Google account. * @allAuthenticatedUsers@: A special identifier that represents anyone who is authenticated with a Google account or a service account. Does not include identities that come from external identity providers (IdPs) through identity federation. * @user:{emailid}@: An email address that represents a specific Google account. For example, @alice\@example.com@ . * @serviceAccount:{emailid}@: An email address that represents a Google service account. For example, @my-other-app\@appspot.gserviceaccount.com@. * @serviceAccount:{projectid}.svc.id.goog[{namespace}\/{kubernetes-sa}]@: An identifier for a <https://cloud.google.com/kubernetes-engine/docs/how-to/kubernetes-service-accounts Kubernetes service account>. For example, @my-project.svc.id.goog[my-namespace\/my-kubernetes-sa]@. *+    -- @group:{emailid}@: An email address that represents a Google group. For example, @admins\@example.com@. * @domain:{domain}@: The G Suite domain (primary) that represents all the users of that domain. For example, @google.com@ or @example.com@. * @principal:\/\/iam.googleapis.com\/locations\/global\/workforcePools\/{pool_id}\/subject\/{subject_attribute_value}@: A single identity in a workforce identity pool. * @principalSet:\/\/iam.googleapis.com\/locations\/global\/workforcePools\/{pool_id}\/group\/{group_id}@: All workforce identities in a group. * @principalSet:\/\/iam.googleapis.com\/locations\/global\/workforcePools\/{pool_id}\/attribute.{attribute_name}\/{attribute_value}@: All workforce identities with a specific attribute value. * @principalSet:\/\/iam.googleapis.com\/locations\/global\/workforcePools\/{pool_id}\/*@: All identities in a workforce identity pool. *+    -- @principal:\/\/iam.googleapis.com\/projects\/{project_number}\/locations\/global\/workloadIdentityPools\/{pool_id}\/subject\/{subject_attribute_value}@: A single identity in a workload identity pool. * @principalSet:\/\/iam.googleapis.com\/projects\/{project_number}\/locations\/global\/workloadIdentityPools\/{pool_id}\/group\/{group_id}@: A workload identity pool group. * @principalSet:\/\/iam.googleapis.com\/projects\/{project_number}\/locations\/global\/workloadIdentityPools\/{pool_id}\/attribute.{attribute_name}\/{attribute_value}@: All identities in a workload identity pool with a certain attribute. * @principalSet:\/\/iam.googleapis.com\/projects\/{project_number}\/locations\/global\/workloadIdentityPools\/{pool_id}\/*@: All identities in a workload identity pool. * @deleted:user:{emailid}?uid={uniqueid}@: An email address (plus unique identifier) representing a user that has been recently deleted. For example, @alice\@example.com?uid=123456789012345678901@. If the user is recovered, this value reverts+    -- to @user:{emailid}@ and the recovered user retains the role in the binding. * @deleted:serviceAccount:{emailid}?uid={uniqueid}@: An email address (plus unique identifier) representing a service account that has been recently deleted. For example, @my-other-app\@appspot.gserviceaccount.com?uid=123456789012345678901@. If the service account is undeleted, this value reverts to @serviceAccount:{emailid}@ and the undeleted service account retains the role in the binding. * @deleted:group:{emailid}?uid={uniqueid}@: An email address (plus unique identifier) representing a Google group that has been recently deleted. For example, @admins\@example.com?uid=123456789012345678901@. If the group is recovered, this value reverts to @group:{emailid}@ and the recovered group retains the role in the binding. * @deleted:principal:\/\/iam.googleapis.com\/locations\/global\/workforcePools\/{pool_id}\/subject\/{subject_attribute_value}@: Deleted single identity in a workforce identity pool. For example,+    -- @deleted:principal:\/\/iam.googleapis.com\/locations\/global\/workforcePools\/my-pool-id\/subject\/my-subject-attribute-value@.+    members :: (Core.Maybe [Core.Text]),+    -- | Role that is assigned to the list of @members@, or principals. For example, @roles\/viewer@, @roles\/editor@, or @roles\/owner@. For an overview of the IAM roles and permissions, see the <https://cloud.google.com/iam/docs/roles-overview IAM documentation>. For a list of the available pre-defined roles, see <https://cloud.google.com/iam/docs/understanding-roles here>.+    role' :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Binding' with the minimum fields required to make a request.+newBinding ::+  Binding+newBinding =+  Binding+    { condition = Core.Nothing,+      members = Core.Nothing,+      role' = Core.Nothing+    }++instance Core.FromJSON Binding where+  parseJSON =+    Core.withObject+      "Binding"+      ( \o ->+          Binding+            Core.<$> (o Core..:? "condition")+            Core.<*> (o Core..:? "members")+            Core.<*> (o Core..:? "role")+      )++instance Core.ToJSON Binding where+  toJSON Binding {..} =+    Core.object+      ( Core.catMaybes+          [ ("condition" Core..=) Core.<$> condition,+            ("members" Core..=) Core.<$> members,+            ("role" Core..=) Core.<$> role'+          ]+      )++--+-- /See:/ 'newBulkInsertOperationStatus' smart constructor.+data BulkInsertOperationStatus = BulkInsertOperationStatus+  { -- | [Output Only] Count of VMs successfully created so far.+    createdVmCount :: (Core.Maybe Core.Int32),+    -- | [Output Only] Count of VMs that got deleted during rollback.+    deletedVmCount :: (Core.Maybe Core.Int32),+    -- | [Output Only] Count of VMs that started creating but encountered an error.+    failedToCreateVmCount :: (Core.Maybe Core.Int32),+    -- | [Output Only] Creation status of BulkInsert operation - information if the flow is rolling forward or rolling back.+    status :: (Core.Maybe BulkInsertOperationStatus_Status),+    -- | [Output Only] Count of VMs originally planned to be created.+    targetVmCount :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BulkInsertOperationStatus' with the minimum fields required to make a request.+newBulkInsertOperationStatus ::+  BulkInsertOperationStatus+newBulkInsertOperationStatus =+  BulkInsertOperationStatus+    { createdVmCount = Core.Nothing,+      deletedVmCount = Core.Nothing,+      failedToCreateVmCount = Core.Nothing,+      status = Core.Nothing,+      targetVmCount = Core.Nothing+    }++instance Core.FromJSON BulkInsertOperationStatus where+  parseJSON =+    Core.withObject+      "BulkInsertOperationStatus"+      ( \o ->+          BulkInsertOperationStatus+            Core.<$> (o Core..:? "createdVmCount")+            Core.<*> (o Core..:? "deletedVmCount")+            Core.<*> (o Core..:? "failedToCreateVmCount")+            Core.<*> (o Core..:? "status")+            Core.<*> (o Core..:? "targetVmCount")+      )++instance Core.ToJSON BulkInsertOperationStatus where+  toJSON BulkInsertOperationStatus {..} =+    Core.object+      ( Core.catMaybes+          [ ("createdVmCount" Core..=) Core.<$> createdVmCount,+            ("deletedVmCount" Core..=) Core.<$> deletedVmCount,+            ("failedToCreateVmCount" Core..=) Core.<$> failedToCreateVmCount,+            ("status" Core..=) Core.<$> status,+            ("targetVmCount" Core..=) Core.<$> targetVmCount+          ]+      )++--+-- /See:/ 'newConfigFile' smart constructor.+newtype ConfigFile = ConfigFile+  { -- | The contents of the file.+    content :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ConfigFile' with the minimum fields required to make a request.+newConfigFile ::+  ConfigFile+newConfigFile = ConfigFile {content = Core.Nothing}++instance Core.FromJSON ConfigFile where+  parseJSON =+    Core.withObject+      "ConfigFile"+      (\o -> ConfigFile Core.<$> (o Core..:? "content"))++instance Core.ToJSON ConfigFile where+  toJSON ConfigFile {..} =+    Core.object+      (Core.catMaybes [("content" Core..=) Core.<$> content])++-- | Describes additional debugging info.+--+-- /See:/ 'newDebugInfo' smart constructor.+data DebugInfo = DebugInfo+  { -- | Additional debugging information provided by the server.+    detail :: (Core.Maybe Core.Text),+    -- | The stack trace entries indicating where the error occurred.+    stackEntries :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DebugInfo' with the minimum fields required to make a request.+newDebugInfo ::+  DebugInfo+newDebugInfo =+  DebugInfo {detail = Core.Nothing, stackEntries = Core.Nothing}++instance Core.FromJSON DebugInfo where+  parseJSON =+    Core.withObject+      "DebugInfo"+      ( \o ->+          DebugInfo+            Core.<$> (o Core..:? "detail")+            Core.<*> (o Core..:? "stackEntries")+      )++instance Core.ToJSON DebugInfo where+  toJSON DebugInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("detail" Core..=) Core.<$> detail,+            ("stackEntries" Core..=) Core.<$> stackEntries+          ]+      )++--+-- /See:/ 'newDeployment' smart constructor.+data Deployment = Deployment+  { -- | An optional user-provided description of the deployment.+    description :: (Core.Maybe Core.Text),+    -- | Provides a fingerprint to use in requests to modify a deployment, such as @update()@, @stop()@, and @cancelPreview()@ requests. A fingerprint is a randomly generated value that must be provided with @update()@, @stop()@, and @cancelPreview()@ requests to perform optimistic locking. This ensures optimistic concurrency so that only one request happens at a time. The fingerprint is initially generated by Deployment Manager and changes after every request to modify data. To get the latest fingerprint value, perform a @get()@ request to a deployment.+    fingerprint :: (Core.Maybe Core.Base64),+    id :: (Core.Maybe Core.Word64),+    -- | Output only. Creation timestamp in RFC3339 text format.+    insertTime :: (Core.Maybe Core.Text),+    -- | Map of One Platform labels; provided by the client when the resource is created or updated. Specifically: Label keys must be between 1 and 63 characters long and must conform to the following regular expression: @[a-z]([-a-z0-9]*[a-z0-9])?@ Label values must be between 0 and 63 characters long and must conform to the regular expression @([a-z]([-a-z0-9]*[a-z0-9])?)?@.+    labels :: (Core.Maybe [DeploymentLabelEntry]),+    -- | Output only. URL of the manifest representing the last manifest that was successfully deployed. If no manifest has been successfully deployed, this field will be absent.+    manifest :: (Core.Maybe Core.Text),+    -- | Name of the resource; provided by the client when the resource is created. The name must be 1-63 characters long, and comply with RFC1035. Specifically, the name must be 1-63 characters long and match the regular expression @[a-z]([-a-z0-9]*[a-z0-9])?@ which means the first character must be a lowercase letter, and all following characters must be a dash, lowercase letter, or digit, except the last character, which cannot be a dash.+    name :: (Core.Maybe Core.Text),+    -- | Output only. The Operation that most recently ran, or is currently running, on this deployment.+    operation :: (Core.Maybe Operation),+    -- | Output only. Server defined URL for the resource.+    selfLink :: (Core.Maybe Core.Text),+    -- | [Input Only] The parameters that define your deployment, including the deployment configuration and relevant templates.+    target :: (Core.Maybe TargetConfiguration),+    -- | Output only. If Deployment Manager is currently updating or previewing an update to this deployment, the updated configuration appears here.+    update :: (Core.Maybe DeploymentUpdate),+    -- | Output only. Update timestamp in RFC3339 text format.+    updateTime :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Deployment' with the minimum fields required to make a request.+newDeployment ::+  Deployment+newDeployment =+  Deployment+    { description = Core.Nothing,+      fingerprint = Core.Nothing,+      id = Core.Nothing,+      insertTime = Core.Nothing,+      labels = Core.Nothing,+      manifest = Core.Nothing,+      name = Core.Nothing,+      operation = Core.Nothing,+      selfLink = Core.Nothing,+      target = Core.Nothing,+      update = Core.Nothing,+      updateTime = Core.Nothing+    }++instance Core.FromJSON Deployment where+  parseJSON =+    Core.withObject+      "Deployment"+      ( \o ->+          Deployment+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "fingerprint")+            Core.<*> (o Core..:? "id" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "insertTime")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "manifest")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "operation")+            Core.<*> (o Core..:? "selfLink")+            Core.<*> (o Core..:? "target")+            Core.<*> (o Core..:? "update")+            Core.<*> (o Core..:? "updateTime")+      )++instance Core.ToJSON Deployment where+  toJSON Deployment {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("fingerprint" Core..=) Core.<$> fingerprint,+            ("id" Core..=) Core.. Core.AsText Core.<$> id,+            ("insertTime" Core..=) Core.<$> insertTime,+            ("labels" Core..=) Core.<$> labels,+            ("manifest" Core..=) Core.<$> manifest,+            ("name" Core..=) Core.<$> name,+            ("operation" Core..=) Core.<$> operation,+            ("selfLink" Core..=) Core.<$> selfLink,+            ("target" Core..=) Core.<$> target,+            ("update" Core..=) Core.<$> update,+            ("updateTime" Core..=) Core.<$> updateTime+          ]+      )++-- | Label object for Deployments+--+-- /See:/ 'newDeploymentLabelEntry' smart constructor.+data DeploymentLabelEntry = DeploymentLabelEntry+  { -- | Key of the label+    key :: (Core.Maybe Core.Text),+    -- | Value of the label+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeploymentLabelEntry' with the minimum fields required to make a request.+newDeploymentLabelEntry ::+  DeploymentLabelEntry+newDeploymentLabelEntry =+  DeploymentLabelEntry {key = Core.Nothing, value = Core.Nothing}++instance Core.FromJSON DeploymentLabelEntry where+  parseJSON =+    Core.withObject+      "DeploymentLabelEntry"+      ( \o ->+          DeploymentLabelEntry+            Core.<$> (o Core..:? "key")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON DeploymentLabelEntry where+  toJSON DeploymentLabelEntry {..} =+    Core.object+      ( Core.catMaybes+          [("key" Core..=) Core.<$> key, ("value" Core..=) Core.<$> value]+      )++--+-- /See:/ 'newDeploymentUpdate' smart constructor.+data DeploymentUpdate = DeploymentUpdate+  { -- | Output only. An optional user-provided description of the deployment after the current update has been applied.+    description :: (Core.Maybe Core.Text),+    -- | Map of One Platform labels; provided by the client when the resource is created or updated. Specifically: Label keys must be between 1 and 63 characters long and must conform to the following regular expression: @[a-z]([-a-z0-9]*[a-z0-9])?@ Label values must be between 0 and 63 characters long and must conform to the regular expression @([a-z]([-a-z0-9]*[a-z0-9])?)?@.+    labels :: (Core.Maybe [DeploymentUpdateLabelEntry]),+    -- | Output only. URL of the manifest representing the update configuration of this deployment.+    manifest :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeploymentUpdate' with the minimum fields required to make a request.+newDeploymentUpdate ::+  DeploymentUpdate+newDeploymentUpdate =+  DeploymentUpdate+    { description = Core.Nothing,+      labels = Core.Nothing,+      manifest = Core.Nothing+    }++instance Core.FromJSON DeploymentUpdate where+  parseJSON =+    Core.withObject+      "DeploymentUpdate"+      ( \o ->+          DeploymentUpdate+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "manifest")+      )++instance Core.ToJSON DeploymentUpdate where+  toJSON DeploymentUpdate {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("labels" Core..=) Core.<$> labels,+            ("manifest" Core..=) Core.<$> manifest+          ]+      )++-- | Label object for DeploymentUpdate+--+-- /See:/ 'newDeploymentUpdateLabelEntry' smart constructor.+data DeploymentUpdateLabelEntry = DeploymentUpdateLabelEntry+  { -- | Key of the label+    key :: (Core.Maybe Core.Text),+    -- | Value of the label+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeploymentUpdateLabelEntry' with the minimum fields required to make a request.+newDeploymentUpdateLabelEntry ::+  DeploymentUpdateLabelEntry+newDeploymentUpdateLabelEntry =+  DeploymentUpdateLabelEntry+    { key = Core.Nothing,+      value = Core.Nothing+    }++instance Core.FromJSON DeploymentUpdateLabelEntry where+  parseJSON =+    Core.withObject+      "DeploymentUpdateLabelEntry"+      ( \o ->+          DeploymentUpdateLabelEntry+            Core.<$> (o Core..:? "key")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON DeploymentUpdateLabelEntry where+  toJSON DeploymentUpdateLabelEntry {..} =+    Core.object+      ( Core.catMaybes+          [("key" Core..=) Core.<$> key, ("value" Core..=) Core.<$> value]+      )++--+-- /See:/ 'newDeploymentsCancelPreviewRequest' smart constructor.+newtype DeploymentsCancelPreviewRequest = DeploymentsCancelPreviewRequest+  { -- | Specifies a fingerprint for @cancelPreview()@ requests. A fingerprint is a randomly generated value that must be provided in @cancelPreview()@ requests to perform optimistic locking. This ensures optimistic concurrency so that the deployment does not have conflicting requests (e.g. if someone attempts to make a new update request while another user attempts to cancel a preview, this would prevent one of the requests). The fingerprint is initially generated by Deployment Manager and changes after every request to modify a deployment. To get the latest fingerprint value, perform a @get()@ request on the deployment.+    fingerprint :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeploymentsCancelPreviewRequest' with the minimum fields required to make a request.+newDeploymentsCancelPreviewRequest ::+  DeploymentsCancelPreviewRequest+newDeploymentsCancelPreviewRequest =+  DeploymentsCancelPreviewRequest {fingerprint = Core.Nothing}++instance Core.FromJSON DeploymentsCancelPreviewRequest where+  parseJSON =+    Core.withObject+      "DeploymentsCancelPreviewRequest"+      ( \o ->+          DeploymentsCancelPreviewRequest+            Core.<$> (o Core..:? "fingerprint")+      )++instance Core.ToJSON DeploymentsCancelPreviewRequest where+  toJSON DeploymentsCancelPreviewRequest {..} =+    Core.object+      (Core.catMaybes [("fingerprint" Core..=) Core.<$> fingerprint])++-- | A response containing a partial list of deployments and a page token used to build the next request if the request has been truncated.+--+-- /See:/ 'newDeploymentsListResponse' smart constructor.+data DeploymentsListResponse = DeploymentsListResponse+  { -- | Output only. The deployments contained in this response.+    deployments :: (Core.Maybe [Deployment]),+    -- | Output only. A token used to continue a truncated list request.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeploymentsListResponse' with the minimum fields required to make a request.+newDeploymentsListResponse ::+  DeploymentsListResponse+newDeploymentsListResponse =+  DeploymentsListResponse+    { deployments = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON DeploymentsListResponse where+  parseJSON =+    Core.withObject+      "DeploymentsListResponse"+      ( \o ->+          DeploymentsListResponse+            Core.<$> (o Core..:? "deployments")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON DeploymentsListResponse where+  toJSON DeploymentsListResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("deployments" Core..=) Core.<$> deployments,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++--+-- /See:/ 'newDeploymentsStopRequest' smart constructor.+newtype DeploymentsStopRequest = DeploymentsStopRequest+  { -- | Specifies a fingerprint for @stop()@ requests. A fingerprint is a randomly generated value that must be provided in @stop()@ requests to perform optimistic locking. This ensures optimistic concurrency so that the deployment does not have conflicting requests (e.g. if someone attempts to make a new update request while another user attempts to stop an ongoing update request, this would prevent a collision). The fingerprint is initially generated by Deployment Manager and changes after every request to modify a deployment. To get the latest fingerprint value, perform a @get()@ request on the deployment.+    fingerprint :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeploymentsStopRequest' with the minimum fields required to make a request.+newDeploymentsStopRequest ::+  DeploymentsStopRequest+newDeploymentsStopRequest =+  DeploymentsStopRequest {fingerprint = Core.Nothing}++instance Core.FromJSON DeploymentsStopRequest where+  parseJSON =+    Core.withObject+      "DeploymentsStopRequest"+      (\o -> DeploymentsStopRequest Core.<$> (o Core..:? "fingerprint"))++instance Core.ToJSON DeploymentsStopRequest where+  toJSON DeploymentsStopRequest {..} =+    Core.object+      (Core.catMaybes [("fingerprint" Core..=) Core.<$> fingerprint])++-- | Describes the cause of the error with structured details. Example of an error when contacting the \"pubsub.googleapis.com\" API when it is not enabled: { \"reason\": \"API_DISABLED\" \"domain\": \"googleapis.com\" \"metadata\": { \"resource\": \"projects\/123\", \"service\": \"pubsub.googleapis.com\" } } This response indicates that the pubsub.googleapis.com API is not enabled. Example of an error that is returned when attempting to create a Spanner instance in a region that is out of stock: { \"reason\": \"STOCKOUT\" \"domain\": \"spanner.googleapis.com\", \"metadata\": { \"availableRegions\": \"us-central1,us-east2\" } }+--+-- /See:/ 'newErrorInfo' smart constructor.+data ErrorInfo = ErrorInfo+  { -- | The logical grouping to which the \"reason\" belongs. The error domain is typically the registered service name of the tool or product that generates the error. Example: \"pubsub.googleapis.com\". If the error is generated by some common infrastructure, the error domain must be a globally unique value that identifies the infrastructure. For Google API infrastructure, the error domain is \"googleapis.com\".+    domain :: (Core.Maybe Core.Text),+    -- | Additional structured details about this error. Keys must match a regular expression of @a-z+@ but should ideally be lowerCamelCase. Also, they must be limited to 64 characters in length. When identifying the current value of an exceeded limit, the units should be contained in the key, not the value. For example, rather than @{\"instanceLimit\": \"100\/request\"}@, should be returned as, @{\"instanceLimitPerRequest\": \"100\"}@, if the client exceeds the number of instances that can be created in a single (batch) request.+    metadatas :: (Core.Maybe ErrorInfo_Metadatas),+    -- | The reason of the error. This is a constant value that identifies the proximate cause of the error. Error reasons are unique within a particular domain of errors. This should be at most 63 characters and match a regular expression of @A-Z+[A-Z0-9]@, which represents UPPER/SNAKE/CASE.+    reason :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ErrorInfo' with the minimum fields required to make a request.+newErrorInfo ::+  ErrorInfo+newErrorInfo =+  ErrorInfo+    { domain = Core.Nothing,+      metadatas = Core.Nothing,+      reason = Core.Nothing+    }++instance Core.FromJSON ErrorInfo where+  parseJSON =+    Core.withObject+      "ErrorInfo"+      ( \o ->+          ErrorInfo+            Core.<$> (o Core..:? "domain")+            Core.<*> (o Core..:? "metadatas")+            Core.<*> (o Core..:? "reason")+      )++instance Core.ToJSON ErrorInfo where+  toJSON ErrorInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("domain" Core..=) Core.<$> domain,+            ("metadatas" Core..=) Core.<$> metadatas,+            ("reason" Core..=) Core.<$> reason+          ]+      )++-- | Additional structured details about this error. Keys must match a regular expression of @a-z+@ but should ideally be lowerCamelCase. Also, they must be limited to 64 characters in length. When identifying the current value of an exceeded limit, the units should be contained in the key, not the value. For example, rather than @{\"instanceLimit\": \"100\/request\"}@, should be returned as, @{\"instanceLimitPerRequest\": \"100\"}@, if the client exceeds the number of instances that can be created in a single (batch) request.+--+-- /See:/ 'newErrorInfo_Metadatas' smart constructor.+newtype ErrorInfo_Metadatas = ErrorInfo_Metadatas+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ErrorInfo_Metadatas' with the minimum fields required to make a request.+newErrorInfo_Metadatas ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  ErrorInfo_Metadatas+newErrorInfo_Metadatas additional =+  ErrorInfo_Metadatas {additional = additional}++instance Core.FromJSON ErrorInfo_Metadatas where+  parseJSON =+    Core.withObject+      "ErrorInfo_Metadatas"+      (\o -> ErrorInfo_Metadatas Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON ErrorInfo_Metadatas where+  toJSON ErrorInfo_Metadatas {..} = Core.toJSON additional++-- | Represents a textual expression in the Common Expression Language (CEL) syntax. CEL is a C-like expression language. The syntax and semantics of CEL are documented at https:\/\/github.com\/google\/cel-spec. Example (Comparison): title: \"Summary size limit\" description: \"Determines if a summary is less than 100 chars\" expression: \"document.summary.size() \< 100\" Example (Equality): title: \"Requestor is owner\" description: \"Determines if requestor is the document owner\" expression: \"document.owner == request.auth.claims.email\" Example (Logic): title: \"Public documents\" description: \"Determine whether the document should be publicly visible\" expression: \"document.type != \'private\' && document.type != \'internal\'\" Example (Data Manipulation): title: \"Notification string\" description: \"Create a notification string with a timestamp.\" expression: \"\'New message received at \' + string(document.create_time)\" The exact variables and functions that may be referenced within an expression are+-- determined by the service that evaluates it. See the service documentation for additional information.+--+-- /See:/ 'newExpr' smart constructor.+data Expr = Expr+  { -- | Optional. Description of the expression. This is a longer text which describes the expression, e.g. when hovered over it in a UI.+    description :: (Core.Maybe Core.Text),+    -- | Textual representation of an expression in Common Expression Language syntax.+    expression :: (Core.Maybe Core.Text),+    -- | Optional. String indicating the location of the expression for error reporting, e.g. a file name and a position in the file.+    location :: (Core.Maybe Core.Text),+    -- | Optional. Title for the expression, i.e. a short string describing its purpose. This can be used e.g. in UIs which allow to enter the expression.+    title :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Expr' with the minimum fields required to make a request.+newExpr ::+  Expr+newExpr =+  Expr+    { description = Core.Nothing,+      expression = Core.Nothing,+      location = Core.Nothing,+      title = Core.Nothing+    }++instance Core.FromJSON Expr where+  parseJSON =+    Core.withObject+      "Expr"+      ( \o ->+          Expr+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "expression")+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "title")+      )++instance Core.ToJSON Expr where+  toJSON Expr {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("expression" Core..=) Core.<$> expression,+            ("location" Core..=) Core.<$> location,+            ("title" Core..=) Core.<$> title+          ]+      )++--+-- /See:/ 'newGlobalSetPolicyRequest' smart constructor.+data GlobalSetPolicyRequest = GlobalSetPolicyRequest+  { -- | Flatten Policy to create a backward compatible wire-format. Deprecated. Use \'policy\' to specify bindings.+    bindings :: (Core.Maybe [Binding]),+    -- | Flatten Policy to create a backward compatible wire-format. Deprecated. Use \'policy\' to specify the etag.+    etag :: (Core.Maybe Core.Base64),+    -- | REQUIRED: The complete policy to be applied to the \'resource\'. The size of the policy is limited to a few 10s of KB. An empty policy is in general a valid policy but certain services (like Projects) might reject them.+    policy :: (Core.Maybe Policy),+    updateMask :: (Core.Maybe Core.FieldMask)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GlobalSetPolicyRequest' with the minimum fields required to make a request.+newGlobalSetPolicyRequest ::+  GlobalSetPolicyRequest+newGlobalSetPolicyRequest =+  GlobalSetPolicyRequest+    { bindings = Core.Nothing,+      etag = Core.Nothing,+      policy = Core.Nothing,+      updateMask = Core.Nothing+    }++instance Core.FromJSON GlobalSetPolicyRequest where+  parseJSON =+    Core.withObject+      "GlobalSetPolicyRequest"+      ( \o ->+          GlobalSetPolicyRequest+            Core.<$> (o Core..:? "bindings")+            Core.<*> (o Core..:? "etag")+            Core.<*> (o Core..:? "policy")+            Core.<*> (o Core..:? "updateMask")+      )++instance Core.ToJSON GlobalSetPolicyRequest where+  toJSON GlobalSetPolicyRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("bindings" Core..=) Core.<$> bindings,+            ("etag" Core..=) Core.<$> etag,+            ("policy" Core..=) Core.<$> policy,+            ("updateMask" Core..=) Core.<$> updateMask+          ]+      )++-- | Provides links to documentation or for performing an out of band action. For example, if a quota check failed with an error indicating the calling project hasn\'t enabled the accessed service, this can contain a URL pointing directly to the right place in the developer console to flip the bit.+--+-- /See:/ 'newHelp' smart constructor.+newtype Help = Help+  { -- | URL(s) pointing to additional information on handling the current error.+    links :: (Core.Maybe [HelpLink])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Help' with the minimum fields required to make a request.+newHelp ::+  Help+newHelp = Help {links = Core.Nothing}++instance Core.FromJSON Help where+  parseJSON =+    Core.withObject+      "Help"+      (\o -> Help Core.<$> (o Core..:? "links"))++instance Core.ToJSON Help where+  toJSON Help {..} =+    Core.object (Core.catMaybes [("links" Core..=) Core.<$> links])++-- | Describes a URL link.+--+-- /See:/ 'newHelpLink' smart constructor.+data HelpLink = HelpLink+  { -- | Describes what the link offers.+    description :: (Core.Maybe Core.Text),+    -- | The URL of the link.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'HelpLink' with the minimum fields required to make a request.+newHelpLink ::+  HelpLink+newHelpLink =+  HelpLink {description = Core.Nothing, url = Core.Nothing}++instance Core.FromJSON HelpLink where+  parseJSON =+    Core.withObject+      "HelpLink"+      ( \o ->+          HelpLink+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON HelpLink where+  toJSON HelpLink {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("url" Core..=) Core.<$> url+          ]+      )++--+-- /See:/ 'newImportFile' smart constructor.+data ImportFile = ImportFile+  { -- | The contents of the file.+    content :: (Core.Maybe Core.Text),+    -- | The name of the file.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ImportFile' with the minimum fields required to make a request.+newImportFile ::+  ImportFile+newImportFile =+  ImportFile {content = Core.Nothing, name = Core.Nothing}++instance Core.FromJSON ImportFile where+  parseJSON =+    Core.withObject+      "ImportFile"+      ( \o ->+          ImportFile+            Core.<$> (o Core..:? "content")+            Core.<*> (o Core..:? "name")+      )++instance Core.ToJSON ImportFile where+  toJSON ImportFile {..} =+    Core.object+      ( Core.catMaybes+          [ ("content" Core..=) Core.<$> content,+            ("name" Core..=) Core.<$> name+          ]+      )++--+-- /See:/ 'newInstancesBulkInsertOperationMetadata' smart constructor.+newtype InstancesBulkInsertOperationMetadata = InstancesBulkInsertOperationMetadata+  { -- | Status information per location (location name is key). Example key: zones\/us-central1-a+    perLocationStatus :: (Core.Maybe InstancesBulkInsertOperationMetadata_PerLocationStatus)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'InstancesBulkInsertOperationMetadata' with the minimum fields required to make a request.+newInstancesBulkInsertOperationMetadata ::+  InstancesBulkInsertOperationMetadata+newInstancesBulkInsertOperationMetadata =+  InstancesBulkInsertOperationMetadata+    { perLocationStatus =+        Core.Nothing+    }++instance Core.FromJSON InstancesBulkInsertOperationMetadata where+  parseJSON =+    Core.withObject+      "InstancesBulkInsertOperationMetadata"+      ( \o ->+          InstancesBulkInsertOperationMetadata+            Core.<$> (o Core..:? "perLocationStatus")+      )++instance Core.ToJSON InstancesBulkInsertOperationMetadata where+  toJSON InstancesBulkInsertOperationMetadata {..} =+    Core.object+      ( Core.catMaybes+          [("perLocationStatus" Core..=) Core.<$> perLocationStatus]+      )++-- | Status information per location (location name is key). Example key: zones\/us-central1-a+--+-- /See:/ 'newInstancesBulkInsertOperationMetadata_PerLocationStatus' smart constructor.+newtype InstancesBulkInsertOperationMetadata_PerLocationStatus = InstancesBulkInsertOperationMetadata_PerLocationStatus+  { additional :: (Core.HashMap Core.Text BulkInsertOperationStatus)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'InstancesBulkInsertOperationMetadata_PerLocationStatus' with the minimum fields required to make a request.+newInstancesBulkInsertOperationMetadata_PerLocationStatus ::+  -- |  See 'additional'.+  Core.HashMap+    Core.Text+    BulkInsertOperationStatus ->+  InstancesBulkInsertOperationMetadata_PerLocationStatus+newInstancesBulkInsertOperationMetadata_PerLocationStatus+  additional =+    InstancesBulkInsertOperationMetadata_PerLocationStatus+      { additional =+          additional+      }++instance+  Core.FromJSON+    InstancesBulkInsertOperationMetadata_PerLocationStatus+  where+  parseJSON =+    Core.withObject+      "InstancesBulkInsertOperationMetadata_PerLocationStatus"+      ( \o ->+          InstancesBulkInsertOperationMetadata_PerLocationStatus+            Core.<$> (Core.parseJSONObject o)+      )++instance+  Core.ToJSON+    InstancesBulkInsertOperationMetadata_PerLocationStatus+  where+  toJSON InstancesBulkInsertOperationMetadata_PerLocationStatus {..} =+    Core.toJSON additional++-- | Provides a localized error message that is safe to return to the user which can be attached to an RPC error.+--+-- /See:/ 'newLocalizedMessage' smart constructor.+data LocalizedMessage = LocalizedMessage+  { -- | The locale used following the specification defined at https:\/\/www.rfc-editor.org\/rfc\/bcp\/bcp47.txt. Examples are: \"en-US\", \"fr-CH\", \"es-MX\"+    locale :: (Core.Maybe Core.Text),+    -- | The localized error message in the above locale.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'LocalizedMessage' with the minimum fields required to make a request.+newLocalizedMessage ::+  LocalizedMessage+newLocalizedMessage =+  LocalizedMessage {locale = Core.Nothing, message = Core.Nothing}++instance Core.FromJSON LocalizedMessage where+  parseJSON =+    Core.withObject+      "LocalizedMessage"+      ( \o ->+          LocalizedMessage+            Core.<$> (o Core..:? "locale")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON LocalizedMessage where+  toJSON LocalizedMessage {..} =+    Core.object+      ( Core.catMaybes+          [ ("locale" Core..=) Core.<$> locale,+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newManifest' smart constructor.+data Manifest = Manifest+  { -- | Output only. The YAML configuration for this manifest.+    config :: (Core.Maybe ConfigFile),+    -- | Output only. The fully-expanded configuration file, including any templates and references.+    expandedConfig :: (Core.Maybe Core.Text),+    id :: (Core.Maybe Core.Word64),+    -- | Output only. The imported files for this manifest.+    imports :: (Core.Maybe [ImportFile]),+    -- | Output only. Creation timestamp in RFC3339 text format.+    insertTime :: (Core.Maybe Core.Text),+    -- | Output only. The YAML layout for this manifest.+    layout :: (Core.Maybe Core.Text),+    -- | Output only. The computed size of the fully expanded manifest.+    manifestSizeBytes :: (Core.Maybe Core.Int64),+    -- | Output only. The size limit for expanded manifests in the project.+    manifestSizeLimitBytes :: (Core.Maybe Core.Int64),+    -- | Output only. The name of the manifest.+    name :: (Core.Maybe Core.Text),+    -- | Output only. Self link for the manifest.+    selfLink :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Manifest' with the minimum fields required to make a request.+newManifest ::+  Manifest+newManifest =+  Manifest+    { config = Core.Nothing,+      expandedConfig = Core.Nothing,+      id = Core.Nothing,+      imports = Core.Nothing,+      insertTime = Core.Nothing,+      layout = Core.Nothing,+      manifestSizeBytes = Core.Nothing,+      manifestSizeLimitBytes = Core.Nothing,+      name = Core.Nothing,+      selfLink = Core.Nothing+    }++instance Core.FromJSON Manifest where+  parseJSON =+    Core.withObject+      "Manifest"+      ( \o ->+          Manifest+            Core.<$> (o Core..:? "config")+            Core.<*> (o Core..:? "expandedConfig")+            Core.<*> (o Core..:? "id" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "imports")+            Core.<*> (o Core..:? "insertTime")+            Core.<*> (o Core..:? "layout")+            Core.<*> (o Core..:? "manifestSizeBytes" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> ( o+                         Core..:? "manifestSizeLimitBytes"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "selfLink")+      )++instance Core.ToJSON Manifest where+  toJSON Manifest {..} =+    Core.object+      ( Core.catMaybes+          [ ("config" Core..=) Core.<$> config,+            ("expandedConfig" Core..=) Core.<$> expandedConfig,+            ("id" Core..=) Core.. Core.AsText Core.<$> id,+            ("imports" Core..=) Core.<$> imports,+            ("insertTime" Core..=) Core.<$> insertTime,+            ("layout" Core..=) Core.<$> layout,+            ("manifestSizeBytes" Core..=)+              Core.. Core.AsText+              Core.<$> manifestSizeBytes,+            ("manifestSizeLimitBytes" Core..=)+              Core.. Core.AsText+              Core.<$> manifestSizeLimitBytes,+            ("name" Core..=) Core.<$> name,+            ("selfLink" Core..=) Core.<$> selfLink+          ]+      )++-- | A response containing a partial list of manifests and a page token used to build the next request if the request has been truncated.+--+-- /See:/ 'newManifestsListResponse' smart constructor.+data ManifestsListResponse = ManifestsListResponse+  { -- | Output only. Manifests contained in this list response.+    manifests :: (Core.Maybe [Manifest]),+    -- | Output only. A token used to continue a truncated list request.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ManifestsListResponse' with the minimum fields required to make a request.+newManifestsListResponse ::+  ManifestsListResponse+newManifestsListResponse =+  ManifestsListResponse+    { manifests = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON ManifestsListResponse where+  parseJSON =+    Core.withObject+      "ManifestsListResponse"+      ( \o ->+          ManifestsListResponse+            Core.<$> (o Core..:? "manifests")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON ManifestsListResponse where+  toJSON ManifestsListResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("manifests" Core..=) Core.<$> manifests,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++-- | Represents an Operation resource. Google Compute Engine has three Operation resources: * </compute/docs/reference/rest/%7B$api_version%7D/globalOperations Global> * </compute/docs/reference/rest/%7B$api_version%7D/regionOperations Regional> * </compute/docs/reference/rest/%7B$api_version%7D/zoneOperations Zonal> You can use an operation resource to manage asynchronous API requests. For more information, read Handling API responses. Operations can be global, regional or zonal. - For global operations, use the @globalOperations@ resource. - For regional operations, use the @regionOperations@ resource. - For zonal operations, use the @zoneOperations@ resource. For more information, read Global, Regional, and Zonal Resources. Note that completed Operation resources have a limited retention period.+--+-- /See:/ 'newOperation' smart constructor.+data Operation = Operation+  { -- | [Output Only] The value of @requestId@ if you provided it in the request. Not present otherwise.+    clientOperationId :: (Core.Maybe Core.Text),+    -- | [Deprecated] This field is deprecated.+    creationTimestamp :: (Core.Maybe Core.Text),+    -- | [Output Only] A textual description of the operation, which is set when the operation is created.+    description :: (Core.Maybe Core.Text),+    -- | [Output Only] The time that this operation was completed. This value is in RFC3339 text format.+    endTime :: (Core.Maybe Core.Text),+    -- | [Output Only] If errors are generated during processing of the operation, this field will be populated.+    error :: (Core.Maybe Operation_Error),+    -- | [Output Only] If the operation fails, this field contains the HTTP error message that was returned, such as @NOT FOUND@.+    httpErrorMessage :: (Core.Maybe Core.Text),+    -- | [Output Only] If the operation fails, this field contains the HTTP error status code that was returned. For example, a @404@ means the resource was not found.+    httpErrorStatusCode :: (Core.Maybe Core.Int32),+    -- | [Output Only] The unique identifier for the operation. This identifier is defined by the server.+    id :: (Core.Maybe Core.Word64),+    -- | [Output Only] The time that this operation was requested. This value is in RFC3339 text format.+    insertTime :: (Core.Maybe Core.Text),+    instancesBulkInsertOperationMetadata :: (Core.Maybe InstancesBulkInsertOperationMetadata),+    -- | [Output Only] Type of the resource. Always @compute#operation@ for Operation resources.+    kind :: Core.Text,+    -- | [Output Only] Name of the operation.+    name :: (Core.Maybe Core.Text),+    -- | [Output Only] An ID that represents a group of operations, such as when a group of operations results from a @bulkInsert@ API request.+    operationGroupId :: (Core.Maybe Core.Text),+    -- | [Output Only] The type of operation, such as @insert@, @update@, or @delete@, and so on.+    operationType :: (Core.Maybe Core.Text),+    -- | [Output Only] An optional progress indicator that ranges from 0 to 100. There is no requirement that this be linear or support any granularity of operations. This should not be used to guess when the operation will be complete. This number should monotonically increase as the operation progresses.+    progress :: (Core.Maybe Core.Int32),+    -- | [Output Only] The URL of the region where the operation resides. Only applicable when performing regional operations.+    region :: (Core.Maybe Core.Text),+    -- | [Output Only] Server-defined URL for the resource.+    selfLink :: (Core.Maybe Core.Text),+    -- | [Output Only] Server-defined URL for this resource with the resource id.+    selfLinkWithId :: (Core.Maybe Core.Text),+    -- | [Output Only] If the operation is for projects.setCommonInstanceMetadata, this field will contain information on all underlying zonal actions and their state.+    setCommonInstanceMetadataOperationMetadata :: (Core.Maybe SetCommonInstanceMetadataOperationMetadata),+    -- | [Output Only] The time that this operation was started by the server. This value is in RFC3339 text format.+    startTime :: (Core.Maybe Core.Text),+    -- | [Output Only] The status of the operation, which can be one of the following: @PENDING@, @RUNNING@, or @DONE@.+    status :: (Core.Maybe Operation_Status),+    -- | [Output Only] An optional textual description of the current status of the operation.+    statusMessage :: (Core.Maybe Core.Text),+    -- | [Output Only] The unique target ID, which identifies a specific incarnation of the target resource.+    targetId :: (Core.Maybe Core.Word64),+    -- | [Output Only] The URL of the resource that the operation modifies. For operations related to creating a snapshot, this points to the disk that the snapshot was created from.+    targetLink :: (Core.Maybe Core.Text),+    -- | [Output Only] User who requested the operation, for example: @user\@example.com@ or @alice_smith_identifier (global\/workforcePools\/example-com-us-employees)@.+    user :: (Core.Maybe Core.Text),+    -- | [Output Only] If warning messages are generated during processing of the operation, this field will be populated.+    warnings :: (Core.Maybe [Operation_WarningsItem]),+    -- | [Output Only] The URL of the zone where the operation resides. Only applicable when performing per-zone operations.+    zone :: (Core.Maybe Core.Text)+  }+  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+    { clientOperationId = Core.Nothing,+      creationTimestamp = Core.Nothing,+      description = Core.Nothing,+      endTime = Core.Nothing,+      error = Core.Nothing,+      httpErrorMessage = Core.Nothing,+      httpErrorStatusCode = Core.Nothing,+      id = Core.Nothing,+      insertTime = Core.Nothing,+      instancesBulkInsertOperationMetadata = Core.Nothing,+      kind = "compute#operation",+      name = Core.Nothing,+      operationGroupId = Core.Nothing,+      operationType = Core.Nothing,+      progress = Core.Nothing,+      region = Core.Nothing,+      selfLink = Core.Nothing,+      selfLinkWithId = Core.Nothing,+      setCommonInstanceMetadataOperationMetadata = Core.Nothing,+      startTime = Core.Nothing,+      status = Core.Nothing,+      statusMessage = Core.Nothing,+      targetId = Core.Nothing,+      targetLink = Core.Nothing,+      user = Core.Nothing,+      warnings = Core.Nothing,+      zone = Core.Nothing+    }++instance Core.FromJSON Operation where+  parseJSON =+    Core.withObject+      "Operation"+      ( \o ->+          Operation+            Core.<$> (o Core..:? "clientOperationId")+            Core.<*> (o Core..:? "creationTimestamp")+            Core.<*> (o Core..:? "description")+            Core.<*> (o Core..:? "endTime")+            Core.<*> (o Core..:? "error")+            Core.<*> (o Core..:? "httpErrorMessage")+            Core.<*> (o Core..:? "httpErrorStatusCode")+            Core.<*> (o Core..:? "id" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "insertTime")+            Core.<*> (o Core..:? "instancesBulkInsertOperationMetadata")+            Core.<*> (o Core..:? "kind" Core..!= "compute#operation")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "operationGroupId")+            Core.<*> (o Core..:? "operationType")+            Core.<*> (o Core..:? "progress")+            Core.<*> (o Core..:? "region")+            Core.<*> (o Core..:? "selfLink")+            Core.<*> (o Core..:? "selfLinkWithId")+            Core.<*> (o Core..:? "setCommonInstanceMetadataOperationMetadata")+            Core.<*> (o Core..:? "startTime")+            Core.<*> (o Core..:? "status")+            Core.<*> (o Core..:? "statusMessage")+            Core.<*> (o Core..:? "targetId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "targetLink")+            Core.<*> (o Core..:? "user")+            Core.<*> (o Core..:? "warnings")+            Core.<*> (o Core..:? "zone")+      )++instance Core.ToJSON Operation where+  toJSON Operation {..} =+    Core.object+      ( Core.catMaybes+          [ ("clientOperationId" Core..=) Core.<$> clientOperationId,+            ("creationTimestamp" Core..=) Core.<$> creationTimestamp,+            ("description" Core..=) Core.<$> description,+            ("endTime" Core..=) Core.<$> endTime,+            ("error" Core..=) Core.<$> error,+            ("httpErrorMessage" Core..=) Core.<$> httpErrorMessage,+            ("httpErrorStatusCode" Core..=) Core.<$> httpErrorStatusCode,+            ("id" Core..=) Core.. Core.AsText Core.<$> id,+            ("insertTime" Core..=) Core.<$> insertTime,+            ("instancesBulkInsertOperationMetadata" Core..=)+              Core.<$> instancesBulkInsertOperationMetadata,+            Core.Just ("kind" Core..= kind),+            ("name" Core..=) Core.<$> name,+            ("operationGroupId" Core..=) Core.<$> operationGroupId,+            ("operationType" Core..=) Core.<$> operationType,+            ("progress" Core..=) Core.<$> progress,+            ("region" Core..=) Core.<$> region,+            ("selfLink" Core..=) Core.<$> selfLink,+            ("selfLinkWithId" Core..=) Core.<$> selfLinkWithId,+            ("setCommonInstanceMetadataOperationMetadata" Core..=)+              Core.<$> setCommonInstanceMetadataOperationMetadata,+            ("startTime" Core..=) Core.<$> startTime,+            ("status" Core..=) Core.<$> status,+            ("statusMessage" Core..=) Core.<$> statusMessage,+            ("targetId" Core..=) Core.. Core.AsText Core.<$> targetId,+            ("targetLink" Core..=) Core.<$> targetLink,+            ("user" Core..=) Core.<$> user,+            ("warnings" Core..=) Core.<$> warnings,+            ("zone" Core..=) Core.<$> zone+          ]+      )++-- | [Output Only] If errors are generated during processing of the operation, this field will be populated.+--+-- /See:/ 'newOperation_Error' smart constructor.+newtype Operation_Error = Operation_Error+  { -- | [Output Only] The array of errors encountered while processing this operation.+    errors :: (Core.Maybe [Operation_Error_ErrorsItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Error' with the minimum fields required to make a request.+newOperation_Error ::+  Operation_Error+newOperation_Error = Operation_Error {errors = Core.Nothing}++instance Core.FromJSON Operation_Error where+  parseJSON =+    Core.withObject+      "Operation_Error"+      (\o -> Operation_Error Core.<$> (o Core..:? "errors"))++instance Core.ToJSON Operation_Error where+  toJSON Operation_Error {..} =+    Core.object (Core.catMaybes [("errors" Core..=) Core.<$> errors])++--+-- /See:/ 'newOperation_Error_ErrorsItem' smart constructor.+data Operation_Error_ErrorsItem = Operation_Error_ErrorsItem+  { -- | [Output Only] Optional error details WARNING: DO NOT MAKE VISIBLE This is for internal use-only (like componentization) (thus the visibility \"none\") and in case of public exposure it is strongly recommended to follow pattern of: https:\/\/aip.dev\/193 and expose as details field.+    arguments :: (Core.Maybe [Core.Text]),+    -- | [Output Only] The error type identifier for this error.+    code :: (Core.Maybe Core.Text),+    debugInfo :: (Core.Maybe DebugInfo),+    -- | [Output Only] An optional list of messages that contain the error details. There is a set of defined message types to use for providing details.The syntax depends on the error code. For example, QuotaExceededInfo will have details when the error code is QUOTA_EXCEEDED.+    errorDetails :: (Core.Maybe [Operation_Error_ErrorsItem_ErrorDetailsItem]),+    -- | [Output Only] Indicates the field in the request that caused the error. This property is optional.+    location :: (Core.Maybe Core.Text),+    -- | [Output Only] An optional, human-readable error message.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Error_ErrorsItem' with the minimum fields required to make a request.+newOperation_Error_ErrorsItem ::+  Operation_Error_ErrorsItem+newOperation_Error_ErrorsItem =+  Operation_Error_ErrorsItem+    { arguments = Core.Nothing,+      code = Core.Nothing,+      debugInfo = Core.Nothing,+      errorDetails = Core.Nothing,+      location = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON Operation_Error_ErrorsItem where+  parseJSON =+    Core.withObject+      "Operation_Error_ErrorsItem"+      ( \o ->+          Operation_Error_ErrorsItem+            Core.<$> (o Core..:? "arguments")+            Core.<*> (o Core..:? "code")+            Core.<*> (o Core..:? "debugInfo")+            Core.<*> (o Core..:? "errorDetails")+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON Operation_Error_ErrorsItem where+  toJSON Operation_Error_ErrorsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("arguments" Core..=) Core.<$> arguments,+            ("code" Core..=) Core.<$> code,+            ("debugInfo" Core..=) Core.<$> debugInfo,+            ("errorDetails" Core..=) Core.<$> errorDetails,+            ("location" Core..=) Core.<$> location,+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newOperation_Error_ErrorsItem_ErrorDetailsItem' smart constructor.+data Operation_Error_ErrorsItem_ErrorDetailsItem = Operation_Error_ErrorsItem_ErrorDetailsItem+  { errorInfo :: (Core.Maybe ErrorInfo),+    help :: (Core.Maybe Help),+    localizedMessage :: (Core.Maybe LocalizedMessage),+    quotaInfo :: (Core.Maybe QuotaExceededInfo)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Error_ErrorsItem_ErrorDetailsItem' with the minimum fields required to make a request.+newOperation_Error_ErrorsItem_ErrorDetailsItem ::+  Operation_Error_ErrorsItem_ErrorDetailsItem+newOperation_Error_ErrorsItem_ErrorDetailsItem =+  Operation_Error_ErrorsItem_ErrorDetailsItem+    { errorInfo =+        Core.Nothing,+      help = Core.Nothing,+      localizedMessage = Core.Nothing,+      quotaInfo = Core.Nothing+    }++instance Core.FromJSON Operation_Error_ErrorsItem_ErrorDetailsItem where+  parseJSON =+    Core.withObject+      "Operation_Error_ErrorsItem_ErrorDetailsItem"+      ( \o ->+          Operation_Error_ErrorsItem_ErrorDetailsItem+            Core.<$> (o Core..:? "errorInfo")+            Core.<*> (o Core..:? "help")+            Core.<*> (o Core..:? "localizedMessage")+            Core.<*> (o Core..:? "quotaInfo")+      )++instance Core.ToJSON Operation_Error_ErrorsItem_ErrorDetailsItem where+  toJSON Operation_Error_ErrorsItem_ErrorDetailsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("errorInfo" Core..=) Core.<$> errorInfo,+            ("help" Core..=) Core.<$> help,+            ("localizedMessage" Core..=) Core.<$> localizedMessage,+            ("quotaInfo" Core..=) Core.<$> quotaInfo+          ]+      )++--+-- /See:/ 'newOperation_WarningsItem' smart constructor.+data Operation_WarningsItem = Operation_WarningsItem+  { -- | [Output Only] A warning code, if applicable. For example, Compute Engine returns NO/RESULTS/ON_PAGE if there are no results in the response.+    code :: (Core.Maybe Operation_WarningsItem_Code),+    -- | [Output Only] Metadata about this warning in key: value format. For example: \"data\": [ { \"key\": \"scope\", \"value\": \"zones\/us-east1-d\" }+    data' :: (Core.Maybe [Operation_WarningsItem_DataItem]),+    -- | [Output Only] A human-readable description of the warning code.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_WarningsItem' with the minimum fields required to make a request.+newOperation_WarningsItem ::+  Operation_WarningsItem+newOperation_WarningsItem =+  Operation_WarningsItem+    { code = Core.Nothing,+      data' = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON Operation_WarningsItem where+  parseJSON =+    Core.withObject+      "Operation_WarningsItem"+      ( \o ->+          Operation_WarningsItem+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "data")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON Operation_WarningsItem where+  toJSON Operation_WarningsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("data" Core..=) Core.<$> data',+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newOperation_WarningsItem_DataItem' smart constructor.+data Operation_WarningsItem_DataItem = Operation_WarningsItem_DataItem+  { -- | [Output Only] A key that provides more detail on the warning being returned. For example, for warnings where there are no results in a list request for a particular zone, this key might be scope and the key value might be the zone name. Other examples might be a key indicating a deprecated resource and a suggested replacement, or a warning about invalid network settings (for example, if an instance attempts to perform IP forwarding but is not enabled for IP forwarding).+    key :: (Core.Maybe Core.Text),+    -- | [Output Only] A warning data value corresponding to the key.+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_WarningsItem_DataItem' with the minimum fields required to make a request.+newOperation_WarningsItem_DataItem ::+  Operation_WarningsItem_DataItem+newOperation_WarningsItem_DataItem =+  Operation_WarningsItem_DataItem+    { key = Core.Nothing,+      value = Core.Nothing+    }++instance Core.FromJSON Operation_WarningsItem_DataItem where+  parseJSON =+    Core.withObject+      "Operation_WarningsItem_DataItem"+      ( \o ->+          Operation_WarningsItem_DataItem+            Core.<$> (o Core..:? "key")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON Operation_WarningsItem_DataItem where+  toJSON Operation_WarningsItem_DataItem {..} =+    Core.object+      ( Core.catMaybes+          [("key" Core..=) Core.<$> key, ("value" Core..=) Core.<$> value]+      )++-- | A response containing a partial list of operations and a page token used to build the next request if the request has been truncated.+--+-- /See:/ 'newOperationsListResponse' smart constructor.+data OperationsListResponse = OperationsListResponse+  { -- | Output only. A token used to continue a truncated list request.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | Output only. Operations contained in this list response.+    operations :: (Core.Maybe [Operation])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'OperationsListResponse' with the minimum fields required to make a request.+newOperationsListResponse ::+  OperationsListResponse+newOperationsListResponse =+  OperationsListResponse+    { nextPageToken = Core.Nothing,+      operations = Core.Nothing+    }++instance Core.FromJSON OperationsListResponse where+  parseJSON =+    Core.withObject+      "OperationsListResponse"+      ( \o ->+          OperationsListResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "operations")+      )++instance Core.ToJSON OperationsListResponse where+  toJSON OperationsListResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("operations" Core..=) Core.<$> operations+          ]+      )++-- | An Identity and Access Management (IAM) policy, which specifies access controls for Google Cloud resources. A @Policy@ is a collection of @bindings@. A @binding@ binds one or more @members@, or principals, to a single @role@. Principals can be user accounts, service accounts, Google groups, and domains (such as G Suite). A @role@ is a named list of permissions; each @role@ can be an IAM predefined role or a user-created custom role. For some types of Google Cloud resources, a @binding@ can also specify a @condition@, which is a logical expression that allows access to a resource only if the expression evaluates to @true@. A condition can add constraints based on attributes of the request, the resource, or both. To learn which resources support conditions in their IAM policies, see the <https://cloud.google.com/iam/help/conditions/resource-policies IAM documentation>. __JSON example:__+-- @{ \"bindings\": [ { \"role\": \"roles\/resourcemanager.organizationAdmin\", \"members\": [ \"user:mike\@example.com\", \"group:admins\@example.com\", \"domain:google.com\", \"serviceAccount:my-project-id\@appspot.gserviceaccount.com\" ] }, { \"role\": \"roles\/resourcemanager.organizationViewer\", \"members\": [ \"user:eve\@example.com\" ], \"condition\": { \"title\": \"expirable access\", \"description\": \"Does not grant access after Sep 2020\", \"expression\": \"request.time \< timestamp(\'2020-10-01T00:00:00.000Z\')\", } } ], \"etag\": \"BwWWja0YfJA=\", \"version\": 3 }@ __YAML example:__+-- @bindings: - members: - user:mike\@example.com - group:admins\@example.com - domain:google.com - serviceAccount:my-project-id\@appspot.gserviceaccount.com role: roles\/resourcemanager.organizationAdmin - members: - user:eve\@example.com role: roles\/resourcemanager.organizationViewer condition: title: expirable access description: Does not grant access after Sep 2020 expression: request.time \< timestamp(\'2020-10-01T00:00:00.000Z\') etag: BwWWja0YfJA= version: 3@ For a description of IAM and its features, see the <https://cloud.google.com/iam/docs/ IAM documentation>.+--+-- /See:/ 'newPolicy' smart constructor.+data Policy = Policy+  { -- | Specifies cloud audit logging configuration for this policy.+    auditConfigs :: (Core.Maybe [AuditConfig]),+    -- | Associates a list of @members@, or principals, with a @role@. Optionally, may specify a @condition@ that determines how and when the @bindings@ are applied. Each of the @bindings@ must contain at least one principal. The @bindings@ in a @Policy@ can refer to up to 1,500 principals; up to 250 of these principals can be Google groups. Each occurrence of a principal counts towards these limits. For example, if the @bindings@ grant 50 different roles to @user:alice\@example.com@, and not to any other principal, then you can add another 1,450 principals to the @bindings@ in the @Policy@.+    bindings :: (Core.Maybe [Binding]),+    -- | @etag@ is used for optimistic concurrency control as a way to help prevent simultaneous updates of a policy from overwriting each other. It is strongly suggested that systems make use of the @etag@ in the read-modify-write cycle to perform policy updates in order to avoid race conditions: An @etag@ is returned in the response to @getIamPolicy@, and systems are expected to put that etag in the request to @setIamPolicy@ to ensure that their change will be applied to the same version of the policy. __Important:__ If you use IAM Conditions, you must include the @etag@ field whenever you call @setIamPolicy@. If you omit this field, then IAM allows you to overwrite a version @3@ policy with a version @1@ policy, and all of the conditions in the version @3@ policy are lost.+    etag :: (Core.Maybe Core.Base64),+    -- | Specifies the format of the policy. Valid values are @0@, @1@, and @3@. Requests that specify an invalid value are rejected. Any operation that affects conditional role bindings must specify version @3@. This requirement applies to the following operations: * Getting a policy that includes a conditional role binding * Adding a conditional role binding to a policy * Changing a conditional role binding in a policy * Removing any role binding, with or without a condition, from a policy that includes conditions __Important:__ If you use IAM Conditions, you must include the @etag@ field whenever you call @setIamPolicy@. If you omit this field, then IAM allows you to overwrite a version @3@ policy with a version @1@ policy, and all of the conditions in the version @3@ policy are lost. If a policy does not include any conditions, operations on that policy may specify any valid version or leave the field unset. To learn which resources support conditions in their IAM policies, see the+    -- <https://cloud.google.com/iam/help/conditions/resource-policies IAM documentation>.+    version :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Policy' with the minimum fields required to make a request.+newPolicy ::+  Policy+newPolicy =+  Policy+    { auditConfigs = Core.Nothing,+      bindings = Core.Nothing,+      etag = Core.Nothing,+      version = Core.Nothing+    }++instance Core.FromJSON Policy where+  parseJSON =+    Core.withObject+      "Policy"+      ( \o ->+          Policy+            Core.<$> (o Core..:? "auditConfigs")+            Core.<*> (o Core..:? "bindings")+            Core.<*> (o Core..:? "etag")+            Core.<*> (o Core..:? "version")+      )++instance Core.ToJSON Policy where+  toJSON Policy {..} =+    Core.object+      ( Core.catMaybes+          [ ("auditConfigs" Core..=) Core.<$> auditConfigs,+            ("bindings" Core..=) Core.<$> bindings,+            ("etag" Core..=) Core.<$> etag,+            ("version" Core..=) Core.<$> version+          ]+      )++-- | Additional details for quota exceeded error for resource quota.+--+-- /See:/ 'newQuotaExceededInfo' smart constructor.+data QuotaExceededInfo = QuotaExceededInfo+  { -- | The map holding related quota dimensions.+    dimensions :: (Core.Maybe QuotaExceededInfo_Dimensions),+    -- | Future quota limit being rolled out. The limit\'s unit depends on the quota type or metric.+    futureLimit :: (Core.Maybe Core.Double),+    -- | Current effective quota limit. The limit\'s unit depends on the quota type or metric.+    limit :: (Core.Maybe Core.Double),+    -- | The name of the quota limit.+    limitName :: (Core.Maybe Core.Text),+    -- | The Compute Engine quota metric name.+    metricName :: (Core.Maybe Core.Text),+    -- | Rollout status of the future quota limit.+    rolloutStatus :: (Core.Maybe QuotaExceededInfo_RolloutStatus)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QuotaExceededInfo' with the minimum fields required to make a request.+newQuotaExceededInfo ::+  QuotaExceededInfo+newQuotaExceededInfo =+  QuotaExceededInfo+    { dimensions = Core.Nothing,+      futureLimit = Core.Nothing,+      limit = Core.Nothing,+      limitName = Core.Nothing,+      metricName = Core.Nothing,+      rolloutStatus = Core.Nothing+    }++instance Core.FromJSON QuotaExceededInfo where+  parseJSON =+    Core.withObject+      "QuotaExceededInfo"+      ( \o ->+          QuotaExceededInfo+            Core.<$> (o Core..:? "dimensions")+            Core.<*> (o Core..:? "futureLimit")+            Core.<*> (o Core..:? "limit")+            Core.<*> (o Core..:? "limitName")+            Core.<*> (o Core..:? "metricName")+            Core.<*> (o Core..:? "rolloutStatus")+      )++instance Core.ToJSON QuotaExceededInfo where+  toJSON QuotaExceededInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("dimensions" Core..=) Core.<$> dimensions,+            ("futureLimit" Core..=) Core.<$> futureLimit,+            ("limit" Core..=) Core.<$> limit,+            ("limitName" Core..=) Core.<$> limitName,+            ("metricName" Core..=) Core.<$> metricName,+            ("rolloutStatus" Core..=) Core.<$> rolloutStatus+          ]+      )++-- | The map holding related quota dimensions.+--+-- /See:/ 'newQuotaExceededInfo_Dimensions' smart constructor.+newtype QuotaExceededInfo_Dimensions = QuotaExceededInfo_Dimensions+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QuotaExceededInfo_Dimensions' with the minimum fields required to make a request.+newQuotaExceededInfo_Dimensions ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  QuotaExceededInfo_Dimensions+newQuotaExceededInfo_Dimensions additional =+  QuotaExceededInfo_Dimensions {additional = additional}++instance Core.FromJSON QuotaExceededInfo_Dimensions where+  parseJSON =+    Core.withObject+      "QuotaExceededInfo_Dimensions"+      ( \o ->+          QuotaExceededInfo_Dimensions Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON QuotaExceededInfo_Dimensions where+  toJSON QuotaExceededInfo_Dimensions {..} = Core.toJSON additional++--+-- /See:/ 'newResource' smart constructor.+data Resource = Resource+  { -- | The Access Control Policy set on this resource.+    accessControl :: (Core.Maybe ResourceAccessControl),+    -- | Output only. The evaluated properties of the resource with references expanded. Returned as serialized YAML.+    finalProperties :: (Core.Maybe Core.Text),+    id :: (Core.Maybe Core.Word64),+    -- | Output only. Creation timestamp in RFC3339 text format.+    insertTime :: (Core.Maybe Core.Text),+    -- | Output only. URL of the manifest representing the current configuration of this resource.+    manifest :: (Core.Maybe Core.Text),+    -- | Output only. The name of the resource as it appears in the YAML config.+    name :: (Core.Maybe Core.Text),+    -- | Output only. The current properties of the resource before any references have been filled in. Returned as serialized YAML.+    properties :: (Core.Maybe Core.Text),+    -- | Output only. The type of the resource, for example @compute.v1.instance@, or @cloudfunctions.v1beta1.function@.+    type' :: (Core.Maybe Core.Text),+    -- | Output only. If Deployment Manager is currently updating or previewing an update to this resource, the updated configuration appears here.+    update :: (Core.Maybe ResourceUpdate),+    -- | Output only. Update timestamp in RFC3339 text format.+    updateTime :: (Core.Maybe Core.Text),+    -- | Output only. The URL of the actual resource.+    url :: (Core.Maybe Core.Text),+    -- | Output only. If warning messages are generated during processing of this resource, this field will be populated.+    warnings :: (Core.Maybe [Resource_WarningsItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Resource' with the minimum fields required to make a request.+newResource ::+  Resource+newResource =+  Resource+    { accessControl = Core.Nothing,+      finalProperties = Core.Nothing,+      id = Core.Nothing,+      insertTime = Core.Nothing,+      manifest = Core.Nothing,+      name = Core.Nothing,+      properties = Core.Nothing,+      type' = Core.Nothing,+      update = Core.Nothing,+      updateTime = Core.Nothing,+      url = Core.Nothing,+      warnings = Core.Nothing+    }++instance Core.FromJSON Resource where+  parseJSON =+    Core.withObject+      "Resource"+      ( \o ->+          Resource+            Core.<$> (o Core..:? "accessControl")+            Core.<*> (o Core..:? "finalProperties")+            Core.<*> (o Core..:? "id" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "insertTime")+            Core.<*> (o Core..:? "manifest")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "properties")+            Core.<*> (o Core..:? "type")+            Core.<*> (o Core..:? "update")+            Core.<*> (o Core..:? "updateTime")+            Core.<*> (o Core..:? "url")+            Core.<*> (o Core..:? "warnings")+      )++instance Core.ToJSON Resource where+  toJSON Resource {..} =+    Core.object+      ( Core.catMaybes+          [ ("accessControl" Core..=) Core.<$> accessControl,+            ("finalProperties" Core..=) Core.<$> finalProperties,+            ("id" Core..=) Core.. Core.AsText Core.<$> id,+            ("insertTime" Core..=) Core.<$> insertTime,+            ("manifest" Core..=) Core.<$> manifest,+            ("name" Core..=) Core.<$> name,+            ("properties" Core..=) Core.<$> properties,+            ("type" Core..=) Core.<$> type',+            ("update" Core..=) Core.<$> update,+            ("updateTime" Core..=) Core.<$> updateTime,+            ("url" Core..=) Core.<$> url,+            ("warnings" Core..=) Core.<$> warnings+          ]+      )++--+-- /See:/ 'newResource_WarningsItem' smart constructor.+data Resource_WarningsItem = Resource_WarningsItem+  { -- | [Output Only] A warning code, if applicable. For example, Compute Engine returns NO/RESULTS/ON_PAGE if there are no results in the response.+    code :: (Core.Maybe Resource_WarningsItem_Code),+    -- | [Output Only] Metadata about this warning in key: value format. For example: \"data\": [ { \"key\": \"scope\", \"value\": \"zones\/us-east1-d\" }+    data' :: (Core.Maybe [Resource_WarningsItem_DataItem]),+    -- | [Output Only] A human-readable description of the warning code.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Resource_WarningsItem' with the minimum fields required to make a request.+newResource_WarningsItem ::+  Resource_WarningsItem+newResource_WarningsItem =+  Resource_WarningsItem+    { code = Core.Nothing,+      data' = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON Resource_WarningsItem where+  parseJSON =+    Core.withObject+      "Resource_WarningsItem"+      ( \o ->+          Resource_WarningsItem+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "data")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON Resource_WarningsItem where+  toJSON Resource_WarningsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("data" Core..=) Core.<$> data',+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newResource_WarningsItem_DataItem' smart constructor.+data Resource_WarningsItem_DataItem = Resource_WarningsItem_DataItem+  { -- | [Output Only] A key that provides more detail on the warning being returned. For example, for warnings where there are no results in a list request for a particular zone, this key might be scope and the key value might be the zone name. Other examples might be a key indicating a deprecated resource and a suggested replacement, or a warning about invalid network settings (for example, if an instance attempts to perform IP forwarding but is not enabled for IP forwarding).+    key :: (Core.Maybe Core.Text),+    -- | [Output Only] A warning data value corresponding to the key.+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Resource_WarningsItem_DataItem' with the minimum fields required to make a request.+newResource_WarningsItem_DataItem ::+  Resource_WarningsItem_DataItem+newResource_WarningsItem_DataItem =+  Resource_WarningsItem_DataItem+    { key = Core.Nothing,+      value = Core.Nothing+    }++instance Core.FromJSON Resource_WarningsItem_DataItem where+  parseJSON =+    Core.withObject+      "Resource_WarningsItem_DataItem"+      ( \o ->+          Resource_WarningsItem_DataItem+            Core.<$> (o Core..:? "key")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON Resource_WarningsItem_DataItem where+  toJSON Resource_WarningsItem_DataItem {..} =+    Core.object+      ( Core.catMaybes+          [("key" Core..=) Core.<$> key, ("value" Core..=) Core.<$> value]+      )++-- | The access controls set on the resource.+--+-- /See:/ 'newResourceAccessControl' smart constructor.+newtype ResourceAccessControl = ResourceAccessControl+  { -- | The GCP IAM Policy to set on the resource.+    gcpIamPolicy :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceAccessControl' with the minimum fields required to make a request.+newResourceAccessControl ::+  ResourceAccessControl+newResourceAccessControl =+  ResourceAccessControl {gcpIamPolicy = Core.Nothing}++instance Core.FromJSON ResourceAccessControl where+  parseJSON =+    Core.withObject+      "ResourceAccessControl"+      (\o -> ResourceAccessControl Core.<$> (o Core..:? "gcpIamPolicy"))++instance Core.ToJSON ResourceAccessControl where+  toJSON ResourceAccessControl {..} =+    Core.object+      (Core.catMaybes [("gcpIamPolicy" Core..=) Core.<$> gcpIamPolicy])++--+-- /See:/ 'newResourceUpdate' smart constructor.+data ResourceUpdate = ResourceUpdate+  { -- | The Access Control Policy to set on this resource after updating the resource itself.+    accessControl :: (Core.Maybe ResourceAccessControl),+    -- | Output only. If errors are generated during update of the resource, this field will be populated.+    error :: (Core.Maybe ResourceUpdate_Error),+    -- | Output only. The expanded properties of the resource with reference values expanded. Returned as serialized YAML.+    finalProperties :: (Core.Maybe Core.Text),+    -- | Output only. The intent of the resource: @PREVIEW@, @UPDATE@, or @CANCEL@.+    intent :: (Core.Maybe ResourceUpdate_Intent),+    -- | Output only. URL of the manifest representing the update configuration of this resource.+    manifest :: (Core.Maybe Core.Text),+    -- | Output only. The set of updated properties for this resource, before references are expanded. Returned as serialized YAML.+    properties :: (Core.Maybe Core.Text),+    -- | Output only. The state of the resource.+    state :: (Core.Maybe ResourceUpdate_State),+    -- | Output only. If warning messages are generated during processing of this resource, this field will be populated.+    warnings :: (Core.Maybe [ResourceUpdate_WarningsItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceUpdate' with the minimum fields required to make a request.+newResourceUpdate ::+  ResourceUpdate+newResourceUpdate =+  ResourceUpdate+    { accessControl = Core.Nothing,+      error = Core.Nothing,+      finalProperties = Core.Nothing,+      intent = Core.Nothing,+      manifest = Core.Nothing,+      properties = Core.Nothing,+      state = Core.Nothing,+      warnings = Core.Nothing+    }++instance Core.FromJSON ResourceUpdate where+  parseJSON =+    Core.withObject+      "ResourceUpdate"+      ( \o ->+          ResourceUpdate+            Core.<$> (o Core..:? "accessControl")+            Core.<*> (o Core..:? "error")+            Core.<*> (o Core..:? "finalProperties")+            Core.<*> (o Core..:? "intent")+            Core.<*> (o Core..:? "manifest")+            Core.<*> (o Core..:? "properties")+            Core.<*> (o Core..:? "state")+            Core.<*> (o Core..:? "warnings")+      )++instance Core.ToJSON ResourceUpdate where+  toJSON ResourceUpdate {..} =+    Core.object+      ( Core.catMaybes+          [ ("accessControl" Core..=) Core.<$> accessControl,+            ("error" Core..=) Core.<$> error,+            ("finalProperties" Core..=) Core.<$> finalProperties,+            ("intent" Core..=) Core.<$> intent,+            ("manifest" Core..=) Core.<$> manifest,+            ("properties" Core..=) Core.<$> properties,+            ("state" Core..=) Core.<$> state,+            ("warnings" Core..=) Core.<$> warnings+          ]+      )++-- | Output only. If errors are generated during update of the resource, this field will be populated.+--+-- /See:/ 'newResourceUpdate_Error' smart constructor.+newtype ResourceUpdate_Error = ResourceUpdate_Error+  { -- | [Output Only] The array of errors encountered while processing this operation.+    errors :: (Core.Maybe [ResourceUpdate_Error_ErrorsItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceUpdate_Error' with the minimum fields required to make a request.+newResourceUpdate_Error ::+  ResourceUpdate_Error+newResourceUpdate_Error =+  ResourceUpdate_Error {errors = Core.Nothing}++instance Core.FromJSON ResourceUpdate_Error where+  parseJSON =+    Core.withObject+      "ResourceUpdate_Error"+      (\o -> ResourceUpdate_Error Core.<$> (o Core..:? "errors"))++instance Core.ToJSON ResourceUpdate_Error where+  toJSON ResourceUpdate_Error {..} =+    Core.object (Core.catMaybes [("errors" Core..=) Core.<$> errors])++--+-- /See:/ 'newResourceUpdate_Error_ErrorsItem' smart constructor.+data ResourceUpdate_Error_ErrorsItem = ResourceUpdate_Error_ErrorsItem+  { -- | [Output Only] Optional error details WARNING: DO NOT MAKE VISIBLE This is for internal use-only (like componentization) (thus the visibility \"none\") and in case of public exposure it is strongly recommended to follow pattern of: https:\/\/aip.dev\/193 and expose as details field.+    arguments :: (Core.Maybe [Core.Text]),+    -- | [Output Only] The error type identifier for this error.+    code :: (Core.Maybe Core.Text),+    debugInfo :: (Core.Maybe DebugInfo),+    -- | [Output Only] An optional list of messages that contain the error details. There is a set of defined message types to use for providing details.The syntax depends on the error code. For example, QuotaExceededInfo will have details when the error code is QUOTA_EXCEEDED.+    errorDetails :: (Core.Maybe [ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem]),+    -- | [Output Only] Indicates the field in the request that caused the error. This property is optional.+    location :: (Core.Maybe Core.Text),+    -- | [Output Only] An optional, human-readable error message.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceUpdate_Error_ErrorsItem' with the minimum fields required to make a request.+newResourceUpdate_Error_ErrorsItem ::+  ResourceUpdate_Error_ErrorsItem+newResourceUpdate_Error_ErrorsItem =+  ResourceUpdate_Error_ErrorsItem+    { arguments = Core.Nothing,+      code = Core.Nothing,+      debugInfo = Core.Nothing,+      errorDetails = Core.Nothing,+      location = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON ResourceUpdate_Error_ErrorsItem where+  parseJSON =+    Core.withObject+      "ResourceUpdate_Error_ErrorsItem"+      ( \o ->+          ResourceUpdate_Error_ErrorsItem+            Core.<$> (o Core..:? "arguments")+            Core.<*> (o Core..:? "code")+            Core.<*> (o Core..:? "debugInfo")+            Core.<*> (o Core..:? "errorDetails")+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON ResourceUpdate_Error_ErrorsItem where+  toJSON ResourceUpdate_Error_ErrorsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("arguments" Core..=) Core.<$> arguments,+            ("code" Core..=) Core.<$> code,+            ("debugInfo" Core..=) Core.<$> debugInfo,+            ("errorDetails" Core..=) Core.<$> errorDetails,+            ("location" Core..=) Core.<$> location,+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newResourceUpdate_Error_ErrorsItem_ErrorDetailsItem' smart constructor.+data ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem = ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+  { errorInfo :: (Core.Maybe ErrorInfo),+    help :: (Core.Maybe Help),+    localizedMessage :: (Core.Maybe LocalizedMessage),+    quotaInfo :: (Core.Maybe QuotaExceededInfo)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem' with the minimum fields required to make a request.+newResourceUpdate_Error_ErrorsItem_ErrorDetailsItem ::+  ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+newResourceUpdate_Error_ErrorsItem_ErrorDetailsItem =+  ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+    { errorInfo =+        Core.Nothing,+      help = Core.Nothing,+      localizedMessage = Core.Nothing,+      quotaInfo = Core.Nothing+    }++instance+  Core.FromJSON+    ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+  where+  parseJSON =+    Core.withObject+      "ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem"+      ( \o ->+          ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+            Core.<$> (o Core..:? "errorInfo")+            Core.<*> (o Core..:? "help")+            Core.<*> (o Core..:? "localizedMessage")+            Core.<*> (o Core..:? "quotaInfo")+      )++instance+  Core.ToJSON+    ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+  where+  toJSON ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("errorInfo" Core..=) Core.<$> errorInfo,+            ("help" Core..=) Core.<$> help,+            ("localizedMessage" Core..=) Core.<$> localizedMessage,+            ("quotaInfo" Core..=) Core.<$> quotaInfo+          ]+      )++--+-- /See:/ 'newResourceUpdate_WarningsItem' smart constructor.+data ResourceUpdate_WarningsItem = ResourceUpdate_WarningsItem+  { -- | [Output Only] A warning code, if applicable. For example, Compute Engine returns NO/RESULTS/ON_PAGE if there are no results in the response.+    code :: (Core.Maybe ResourceUpdate_WarningsItem_Code),+    -- | [Output Only] Metadata about this warning in key: value format. For example: \"data\": [ { \"key\": \"scope\", \"value\": \"zones\/us-east1-d\" }+    data' :: (Core.Maybe [ResourceUpdate_WarningsItem_DataItem]),+    -- | [Output Only] A human-readable description of the warning code.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceUpdate_WarningsItem' with the minimum fields required to make a request.+newResourceUpdate_WarningsItem ::+  ResourceUpdate_WarningsItem+newResourceUpdate_WarningsItem =+  ResourceUpdate_WarningsItem+    { code = Core.Nothing,+      data' = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON ResourceUpdate_WarningsItem where+  parseJSON =+    Core.withObject+      "ResourceUpdate_WarningsItem"+      ( \o ->+          ResourceUpdate_WarningsItem+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "data")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON ResourceUpdate_WarningsItem where+  toJSON ResourceUpdate_WarningsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("data" Core..=) Core.<$> data',+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newResourceUpdate_WarningsItem_DataItem' smart constructor.+data ResourceUpdate_WarningsItem_DataItem = ResourceUpdate_WarningsItem_DataItem+  { -- | [Output Only] A key that provides more detail on the warning being returned. For example, for warnings where there are no results in a list request for a particular zone, this key might be scope and the key value might be the zone name. Other examples might be a key indicating a deprecated resource and a suggested replacement, or a warning about invalid network settings (for example, if an instance attempts to perform IP forwarding but is not enabled for IP forwarding).+    key :: (Core.Maybe Core.Text),+    -- | [Output Only] A warning data value corresponding to the key.+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourceUpdate_WarningsItem_DataItem' with the minimum fields required to make a request.+newResourceUpdate_WarningsItem_DataItem ::+  ResourceUpdate_WarningsItem_DataItem+newResourceUpdate_WarningsItem_DataItem =+  ResourceUpdate_WarningsItem_DataItem+    { key = Core.Nothing,+      value = Core.Nothing+    }++instance Core.FromJSON ResourceUpdate_WarningsItem_DataItem where+  parseJSON =+    Core.withObject+      "ResourceUpdate_WarningsItem_DataItem"+      ( \o ->+          ResourceUpdate_WarningsItem_DataItem+            Core.<$> (o Core..:? "key")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON ResourceUpdate_WarningsItem_DataItem where+  toJSON ResourceUpdate_WarningsItem_DataItem {..} =+    Core.object+      ( Core.catMaybes+          [("key" Core..=) Core.<$> key, ("value" Core..=) Core.<$> value]+      )++-- | A response containing a partial list of resources and a page token used to build the next request if the request has been truncated.+--+-- /See:/ 'newResourcesListResponse' smart constructor.+data ResourcesListResponse = ResourcesListResponse+  { -- | A token used to continue a truncated list request.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | Resources contained in this list response.+    resources :: (Core.Maybe [Resource])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResourcesListResponse' with the minimum fields required to make a request.+newResourcesListResponse ::+  ResourcesListResponse+newResourcesListResponse =+  ResourcesListResponse+    { nextPageToken = Core.Nothing,+      resources = Core.Nothing+    }++instance Core.FromJSON ResourcesListResponse where+  parseJSON =+    Core.withObject+      "ResourcesListResponse"+      ( \o ->+          ResourcesListResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "resources")+      )++instance Core.ToJSON ResourcesListResponse where+  toJSON ResourcesListResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("resources" Core..=) Core.<$> resources+          ]+      )++--+-- /See:/ 'newSetCommonInstanceMetadataOperationMetadata' smart constructor.+data SetCommonInstanceMetadataOperationMetadata = SetCommonInstanceMetadataOperationMetadata+  { -- | [Output Only] The client operation id.+    clientOperationId :: (Core.Maybe Core.Text),+    -- | [Output Only] Status information per location (location name is key). Example key: zones\/us-central1-a+    perLocationOperations ::+      ( Core.Maybe+          SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SetCommonInstanceMetadataOperationMetadata' with the minimum fields required to make a request.+newSetCommonInstanceMetadataOperationMetadata ::+  SetCommonInstanceMetadataOperationMetadata+newSetCommonInstanceMetadataOperationMetadata =+  SetCommonInstanceMetadataOperationMetadata+    { clientOperationId =+        Core.Nothing,+      perLocationOperations = Core.Nothing+    }++instance Core.FromJSON SetCommonInstanceMetadataOperationMetadata where+  parseJSON =+    Core.withObject+      "SetCommonInstanceMetadataOperationMetadata"+      ( \o ->+          SetCommonInstanceMetadataOperationMetadata+            Core.<$> (o Core..:? "clientOperationId")+            Core.<*> (o Core..:? "perLocationOperations")+      )++instance Core.ToJSON SetCommonInstanceMetadataOperationMetadata where+  toJSON SetCommonInstanceMetadataOperationMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("clientOperationId" Core..=) Core.<$> clientOperationId,+            ("perLocationOperations" Core..=) Core.<$> perLocationOperations+          ]+      )++-- | [Output Only] Status information per location (location name is key). Example key: zones\/us-central1-a+--+-- /See:/ 'newSetCommonInstanceMetadataOperationMetadata_PerLocationOperations' smart constructor.+newtype SetCommonInstanceMetadataOperationMetadata_PerLocationOperations = SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+  { additional ::+      ( Core.HashMap+          Core.Text+          SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SetCommonInstanceMetadataOperationMetadata_PerLocationOperations' with the minimum fields required to make a request.+newSetCommonInstanceMetadataOperationMetadata_PerLocationOperations ::+  -- |  See 'additional'.+  Core.HashMap+    Core.Text+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo ->+  SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+newSetCommonInstanceMetadataOperationMetadata_PerLocationOperations+  additional =+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+      { additional =+          additional+      }++instance+  Core.FromJSON+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+  where+  parseJSON =+    Core.withObject+      "SetCommonInstanceMetadataOperationMetadata_PerLocationOperations"+      ( \o ->+          SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+            Core.<$> (Core.parseJSONObject o)+      )++instance+  Core.ToJSON+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+  where+  toJSON+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations {..} =+      Core.toJSON additional++--+-- /See:/ 'newSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo' smart constructor.+data SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+  { -- | [Output Only] If state is @ABANDONED@ or @FAILED@, this field is populated.+    error :: (Core.Maybe Status),+    -- | [Output Only] Status of the action, which can be one of the following: @PROPAGATING@, @PROPAGATED@, @ABANDONED@, @FAILED@, or @DONE@.+    state ::+      ( Core.Maybe+          SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo' with the minimum fields required to make a request.+newSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo ::+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+newSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo =+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+    { error =+        Core.Nothing,+      state = Core.Nothing+    }++instance+  Core.FromJSON+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+  where+  parseJSON =+    Core.withObject+      "SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo"+      ( \o ->+          SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+            Core.<$> (o Core..:? "error")+            Core.<*> (o Core..:? "state")+      )++instance+  Core.ToJSON+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+  where+  toJSON+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo {..} =+      Core.object+        ( Core.catMaybes+            [ ("error" Core..=) Core.<$> error,+              ("state" Core..=) Core.<$> state+            ]+        )++-- | 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++--+-- /See:/ 'newTargetConfiguration' smart constructor.+data TargetConfiguration = TargetConfiguration+  { -- | The configuration to use for this deployment.+    config :: (Core.Maybe ConfigFile),+    -- | Specifies any files to import for this configuration. This can be used to import templates or other files. For example, you might import a text file in order to use the file in a template.+    imports :: (Core.Maybe [ImportFile])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetConfiguration' with the minimum fields required to make a request.+newTargetConfiguration ::+  TargetConfiguration+newTargetConfiguration =+  TargetConfiguration+    { config = Core.Nothing,+      imports = Core.Nothing+    }++instance Core.FromJSON TargetConfiguration where+  parseJSON =+    Core.withObject+      "TargetConfiguration"+      ( \o ->+          TargetConfiguration+            Core.<$> (o Core..:? "config")+            Core.<*> (o Core..:? "imports")+      )++instance Core.ToJSON TargetConfiguration where+  toJSON TargetConfiguration {..} =+    Core.object+      ( Core.catMaybes+          [ ("config" Core..=) Core.<$> config,+            ("imports" Core..=) Core.<$> imports+          ]+      )++--+-- /See:/ 'newTestPermissionsRequest' smart constructor.+newtype TestPermissionsRequest = TestPermissionsRequest+  { -- | The set of permissions to check for the \'resource\'. Permissions with wildcards (such as \'/\' or \'storage./\') are not allowed.+    permissions :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TestPermissionsRequest' with the minimum fields required to make a request.+newTestPermissionsRequest ::+  TestPermissionsRequest+newTestPermissionsRequest =+  TestPermissionsRequest {permissions = Core.Nothing}++instance Core.FromJSON TestPermissionsRequest where+  parseJSON =+    Core.withObject+      "TestPermissionsRequest"+      (\o -> TestPermissionsRequest Core.<$> (o Core..:? "permissions"))++instance Core.ToJSON TestPermissionsRequest where+  toJSON TestPermissionsRequest {..} =+    Core.object+      (Core.catMaybes [("permissions" Core..=) Core.<$> permissions])++--+-- /See:/ 'newTestPermissionsResponse' smart constructor.+newtype TestPermissionsResponse = TestPermissionsResponse+  { -- | A subset of @TestPermissionsRequest.permissions@ that the caller is allowed.+    permissions :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TestPermissionsResponse' with the minimum fields required to make a request.+newTestPermissionsResponse ::+  TestPermissionsResponse+newTestPermissionsResponse =+  TestPermissionsResponse {permissions = Core.Nothing}++instance Core.FromJSON TestPermissionsResponse where+  parseJSON =+    Core.withObject+      "TestPermissionsResponse"+      ( \o ->+          TestPermissionsResponse Core.<$> (o Core..:? "permissions")+      )++instance Core.ToJSON TestPermissionsResponse where+  toJSON TestPermissionsResponse {..} =+    Core.object+      (Core.catMaybes [("permissions" Core..=) Core.<$> permissions])++-- | A resource type supported by Deployment Manager.+--+-- /See:/ 'newType' smart constructor.+data Type = Type+  { id :: (Core.Maybe Core.Word64),+    -- | Output only. Creation timestamp in RFC3339 text format.+    insertTime :: (Core.Maybe Core.Text),+    -- | Name of the type.+    name :: (Core.Maybe Core.Text),+    -- | Output only. The Operation that most recently ran, or is currently running, on this type.+    operation :: (Core.Maybe Operation),+    -- | Output only. Server defined URL for the resource.+    selfLink :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Type' with the minimum fields required to make a request.+newType ::+  Type+newType =+  Type+    { id = Core.Nothing,+      insertTime = Core.Nothing,+      name = Core.Nothing,+      operation = Core.Nothing,+      selfLink = Core.Nothing+    }++instance Core.FromJSON Type where+  parseJSON =+    Core.withObject+      "Type"+      ( \o ->+          Type+            Core.<$> (o Core..:? "id" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "insertTime")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "operation")+            Core.<*> (o Core..:? "selfLink")+      )++instance Core.ToJSON Type where+  toJSON Type {..} =+    Core.object+      ( Core.catMaybes+          [ ("id" Core..=) Core.. Core.AsText Core.<$> id,+            ("insertTime" Core..=) Core.<$> insertTime,+            ("name" Core..=) Core.<$> name,+            ("operation" Core..=) Core.<$> operation,+            ("selfLink" Core..=) Core.<$> selfLink+          ]+      )++-- | A response that returns all Types supported by Deployment Manager+--+-- /See:/ 'newTypesListResponse' smart constructor.+data TypesListResponse = TypesListResponse+  { -- | A token used to continue a truncated list request.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | Output only. A list of resource types supported by Deployment Manager.+    types :: (Core.Maybe [Type])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TypesListResponse' with the minimum fields required to make a request.+newTypesListResponse ::+  TypesListResponse+newTypesListResponse =+  TypesListResponse+    { nextPageToken = Core.Nothing,+      types = Core.Nothing+    }++instance Core.FromJSON TypesListResponse where+  parseJSON =+    Core.withObject+      "TypesListResponse"+      ( \o ->+          TypesListResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "types")+      )++instance Core.ToJSON TypesListResponse where+  toJSON TypesListResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("types" Core..=) Core.<$> types+          ]+      )
+ gen/Gogol/DeploymentManager/Internal/Sum.hs view
@@ -0,0 +1,1358 @@+{-# 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.DeploymentManager.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.DeploymentManager.Internal.Sum+  ( -- * Xgafv+    Xgafv+      ( Xgafv_1,+        Xgafv_2,+        ..+      ),++    -- * AuditLogConfig_LogType+    AuditLogConfig_LogType+      ( AuditLogConfig_LogType_LOGTYPEUNSPECIFIED,+        AuditLogConfig_LogType_ADMINREAD,+        AuditLogConfig_LogType_DATAWRITE,+        AuditLogConfig_LogType_DATAREAD,+        ..+      ),++    -- * BulkInsertOperationStatus_Status+    BulkInsertOperationStatus_Status+      ( BulkInsertOperationStatus_Status_STATUSUNSPECIFIED,+        BulkInsertOperationStatus_Status_Creating,+        BulkInsertOperationStatus_Status_ROLLINGBACK,+        BulkInsertOperationStatus_Status_Done,+        ..+      ),++    -- * Operation_Status+    Operation_Status+      ( Operation_Status_Pending,+        Operation_Status_Running,+        Operation_Status_Done,+        ..+      ),++    -- * Operation_WarningsItem_Code+    Operation_WarningsItem_Code+      ( Operation_WarningsItem_Code_DEPRECATEDRESOURCEUSED,+        Operation_WarningsItem_Code_NORESULTSONPAGE,+        Operation_WarningsItem_Code_Unreachable,+        Operation_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED,+        Operation_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND,+        Operation_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK,+        Operation_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD,+        Operation_WarningsItem_Code_NEXTHOPNOTRUNNING,+        Operation_WarningsItem_Code_INJECTEDKERNELSDEPRECATED,+        Operation_WarningsItem_Code_REQUIREDTOSAGREEMENT,+        Operation_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE,+        Operation_WarningsItem_Code_RESOURCENOTDELETED,+        Operation_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE,+        Operation_WarningsItem_Code_NOTCRITICALERROR,+        Operation_WarningsItem_Code_CLEANUPFAILED,+        Operation_WarningsItem_Code_FIELDVALUEOVERRIDEN,+        Operation_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING,+        Operation_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED,+        Operation_WarningsItem_Code_PAGEMISSINGRESULTS,+        Operation_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED,+        Operation_WarningsItem_Code_RESOURCENOTFOUNDWARNING,+        Operation_WarningsItem_Code_MISSINGTYPEDEPENDENCY,+        Operation_WarningsItem_Code_EXTERNALAPIWARNING,+        Operation_WarningsItem_Code_SCHEMAVALIDATIONIGNORED,+        Operation_WarningsItem_Code_UNDECLAREDPROPERTIES,+        Operation_WarningsItem_Code_EXPERIMENTALTYPEUSED,+        Operation_WarningsItem_Code_DEPRECATEDTYPEUSED,+        Operation_WarningsItem_Code_PARTIALSUCCESS,+        Operation_WarningsItem_Code_LARGEDEPLOYMENTWARNING,+        Operation_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE,+        Operation_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB,+        Operation_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED,+        Operation_WarningsItem_Code_QUOTAINFOUNAVAILABLE,+        Operation_WarningsItem_Code_RESOURCEUSESGLOBALDNS,+        Operation_WarningsItem_Code_RATELIMITEXCEEDED,+        Operation_WarningsItem_Code_RESERVED_ENTRY_135,+        Operation_WarningsItem_Code_RESERVED_ENTRY_136,+        Operation_WarningsItem_Code_RESERVED_ENTRY_139,+        Operation_WarningsItem_Code_RESERVED_ENTRY_141,+        Operation_WarningsItem_Code_RESERVED_ENTRY_142,+        ..+      ),++    -- * QuotaExceededInfo_RolloutStatus+    QuotaExceededInfo_RolloutStatus+      ( QuotaExceededInfo_RolloutStatus_ROLLOUTSTATUSUNSPECIFIED,+        QuotaExceededInfo_RolloutStatus_INPROGRESS,+        ..+      ),++    -- * Resource_WarningsItem_Code+    Resource_WarningsItem_Code+      ( Resource_WarningsItem_Code_DEPRECATEDRESOURCEUSED,+        Resource_WarningsItem_Code_NORESULTSONPAGE,+        Resource_WarningsItem_Code_Unreachable,+        Resource_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED,+        Resource_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND,+        Resource_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK,+        Resource_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD,+        Resource_WarningsItem_Code_NEXTHOPNOTRUNNING,+        Resource_WarningsItem_Code_INJECTEDKERNELSDEPRECATED,+        Resource_WarningsItem_Code_REQUIREDTOSAGREEMENT,+        Resource_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE,+        Resource_WarningsItem_Code_RESOURCENOTDELETED,+        Resource_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE,+        Resource_WarningsItem_Code_NOTCRITICALERROR,+        Resource_WarningsItem_Code_CLEANUPFAILED,+        Resource_WarningsItem_Code_FIELDVALUEOVERRIDEN,+        Resource_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING,+        Resource_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED,+        Resource_WarningsItem_Code_PAGEMISSINGRESULTS,+        Resource_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED,+        Resource_WarningsItem_Code_RESOURCENOTFOUNDWARNING,+        Resource_WarningsItem_Code_MISSINGTYPEDEPENDENCY,+        Resource_WarningsItem_Code_EXTERNALAPIWARNING,+        Resource_WarningsItem_Code_SCHEMAVALIDATIONIGNORED,+        Resource_WarningsItem_Code_UNDECLAREDPROPERTIES,+        Resource_WarningsItem_Code_EXPERIMENTALTYPEUSED,+        Resource_WarningsItem_Code_DEPRECATEDTYPEUSED,+        Resource_WarningsItem_Code_PARTIALSUCCESS,+        Resource_WarningsItem_Code_LARGEDEPLOYMENTWARNING,+        Resource_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE,+        Resource_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB,+        Resource_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED,+        Resource_WarningsItem_Code_QUOTAINFOUNAVAILABLE,+        Resource_WarningsItem_Code_RESOURCEUSESGLOBALDNS,+        Resource_WarningsItem_Code_RATELIMITEXCEEDED,+        Resource_WarningsItem_Code_RESERVED_ENTRY_135,+        Resource_WarningsItem_Code_RESERVED_ENTRY_136,+        Resource_WarningsItem_Code_RESERVED_ENTRY_139,+        Resource_WarningsItem_Code_RESERVED_ENTRY_141,+        Resource_WarningsItem_Code_RESERVED_ENTRY_142,+        ..+      ),++    -- * ResourceUpdate_Intent+    ResourceUpdate_Intent+      ( ResourceUpdate_Intent_CREATEORACQUIRE,+        ResourceUpdate_Intent_Delete',+        ResourceUpdate_Intent_Acquire,+        ResourceUpdate_Intent_Update,+        ResourceUpdate_Intent_Abandon,+        ResourceUpdate_Intent_Create,+        ..+      ),++    -- * ResourceUpdate_State+    ResourceUpdate_State+      ( ResourceUpdate_State_Pending,+        ResourceUpdate_State_INPROGRESS,+        ResourceUpdate_State_INPREVIEW,+        ResourceUpdate_State_Failed,+        ResourceUpdate_State_Aborted,+        ..+      ),++    -- * ResourceUpdate_WarningsItem_Code+    ResourceUpdate_WarningsItem_Code+      ( ResourceUpdate_WarningsItem_Code_DEPRECATEDRESOURCEUSED,+        ResourceUpdate_WarningsItem_Code_NORESULTSONPAGE,+        ResourceUpdate_WarningsItem_Code_Unreachable,+        ResourceUpdate_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED,+        ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND,+        ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK,+        ResourceUpdate_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD,+        ResourceUpdate_WarningsItem_Code_NEXTHOPNOTRUNNING,+        ResourceUpdate_WarningsItem_Code_INJECTEDKERNELSDEPRECATED,+        ResourceUpdate_WarningsItem_Code_REQUIREDTOSAGREEMENT,+        ResourceUpdate_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE,+        ResourceUpdate_WarningsItem_Code_RESOURCENOTDELETED,+        ResourceUpdate_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE,+        ResourceUpdate_WarningsItem_Code_NOTCRITICALERROR,+        ResourceUpdate_WarningsItem_Code_CLEANUPFAILED,+        ResourceUpdate_WarningsItem_Code_FIELDVALUEOVERRIDEN,+        ResourceUpdate_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING,+        ResourceUpdate_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED,+        ResourceUpdate_WarningsItem_Code_PAGEMISSINGRESULTS,+        ResourceUpdate_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED,+        ResourceUpdate_WarningsItem_Code_RESOURCENOTFOUNDWARNING,+        ResourceUpdate_WarningsItem_Code_MISSINGTYPEDEPENDENCY,+        ResourceUpdate_WarningsItem_Code_EXTERNALAPIWARNING,+        ResourceUpdate_WarningsItem_Code_SCHEMAVALIDATIONIGNORED,+        ResourceUpdate_WarningsItem_Code_UNDECLAREDPROPERTIES,+        ResourceUpdate_WarningsItem_Code_EXPERIMENTALTYPEUSED,+        ResourceUpdate_WarningsItem_Code_DEPRECATEDTYPEUSED,+        ResourceUpdate_WarningsItem_Code_PARTIALSUCCESS,+        ResourceUpdate_WarningsItem_Code_LARGEDEPLOYMENTWARNING,+        ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE,+        ResourceUpdate_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB,+        ResourceUpdate_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED,+        ResourceUpdate_WarningsItem_Code_QUOTAINFOUNAVAILABLE,+        ResourceUpdate_WarningsItem_Code_RESOURCEUSESGLOBALDNS,+        ResourceUpdate_WarningsItem_Code_RATELIMITEXCEEDED,+        ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_135,+        ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_136,+        ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_139,+        ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_141,+        ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_142,+        ..+      ),++    -- * SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+      ( SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Unspecified,+        SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagating,+        SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagated,+        SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Abandoned,+        SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Failed,+        SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Done,+        ..+      ),++    -- * DeploymentsDeleteDeletePolicy+    DeploymentsDeleteDeletePolicy+      ( DeploymentsDeleteDeletePolicy_Delete',+        DeploymentsDeleteDeletePolicy_Abandon,+        ..+      ),++    -- * DeploymentsInsertCreatePolicy+    DeploymentsInsertCreatePolicy+      ( DeploymentsInsertCreatePolicy_CREATEORACQUIRE,+        DeploymentsInsertCreatePolicy_Acquire,+        ..+      ),++    -- * DeploymentsPatchCreatePolicy+    DeploymentsPatchCreatePolicy+      ( DeploymentsPatchCreatePolicy_CREATEORACQUIRE,+        DeploymentsPatchCreatePolicy_Acquire,+        ..+      ),++    -- * DeploymentsPatchDeletePolicy+    DeploymentsPatchDeletePolicy+      ( DeploymentsPatchDeletePolicy_Delete',+        DeploymentsPatchDeletePolicy_Abandon,+        ..+      ),++    -- * DeploymentsUpdateCreatePolicy+    DeploymentsUpdateCreatePolicy+      ( DeploymentsUpdateCreatePolicy_CREATEORACQUIRE,+        DeploymentsUpdateCreatePolicy_Acquire,+        ..+      ),++    -- * DeploymentsUpdateDeletePolicy+    DeploymentsUpdateDeletePolicy+      ( DeploymentsUpdateDeletePolicy_Delete',+        DeploymentsUpdateDeletePolicy_Abandon,+        ..+      ),+  )+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+  #-}++-- | The log type that this config enables.+newtype AuditLogConfig_LogType = AuditLogConfig_LogType {fromAuditLogConfig_LogType :: 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 case. Should never be this.+pattern AuditLogConfig_LogType_LOGTYPEUNSPECIFIED :: AuditLogConfig_LogType+pattern AuditLogConfig_LogType_LOGTYPEUNSPECIFIED = AuditLogConfig_LogType "LOG_TYPE_UNSPECIFIED"++-- | Admin reads. Example: CloudIAM getIamPolicy+pattern AuditLogConfig_LogType_ADMINREAD :: AuditLogConfig_LogType+pattern AuditLogConfig_LogType_ADMINREAD = AuditLogConfig_LogType "ADMIN_READ"++-- | Data writes. Example: CloudSQL Users create+pattern AuditLogConfig_LogType_DATAWRITE :: AuditLogConfig_LogType+pattern AuditLogConfig_LogType_DATAWRITE = AuditLogConfig_LogType "DATA_WRITE"++-- | Data reads. Example: CloudSQL Users list+pattern AuditLogConfig_LogType_DATAREAD :: AuditLogConfig_LogType+pattern AuditLogConfig_LogType_DATAREAD = AuditLogConfig_LogType "DATA_READ"++{-# COMPLETE+  AuditLogConfig_LogType_LOGTYPEUNSPECIFIED,+  AuditLogConfig_LogType_ADMINREAD,+  AuditLogConfig_LogType_DATAWRITE,+  AuditLogConfig_LogType_DATAREAD,+  AuditLogConfig_LogType+  #-}++-- | [Output Only] Creation status of BulkInsert operation - information if the flow is rolling forward or rolling back.+newtype BulkInsertOperationStatus_Status = BulkInsertOperationStatus_Status {fromBulkInsertOperationStatus_Status :: 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+    )++pattern BulkInsertOperationStatus_Status_STATUSUNSPECIFIED :: BulkInsertOperationStatus_Status+pattern BulkInsertOperationStatus_Status_STATUSUNSPECIFIED = BulkInsertOperationStatus_Status "STATUS_UNSPECIFIED"++-- | Rolling forward - creating VMs.+pattern BulkInsertOperationStatus_Status_Creating :: BulkInsertOperationStatus_Status+pattern BulkInsertOperationStatus_Status_Creating = BulkInsertOperationStatus_Status "CREATING"++-- | Rolling back - cleaning up after an error.+pattern BulkInsertOperationStatus_Status_ROLLINGBACK :: BulkInsertOperationStatus_Status+pattern BulkInsertOperationStatus_Status_ROLLINGBACK = BulkInsertOperationStatus_Status "ROLLING_BACK"++-- | Done+pattern BulkInsertOperationStatus_Status_Done :: BulkInsertOperationStatus_Status+pattern BulkInsertOperationStatus_Status_Done = BulkInsertOperationStatus_Status "DONE"++{-# COMPLETE+  BulkInsertOperationStatus_Status_STATUSUNSPECIFIED,+  BulkInsertOperationStatus_Status_Creating,+  BulkInsertOperationStatus_Status_ROLLINGBACK,+  BulkInsertOperationStatus_Status_Done,+  BulkInsertOperationStatus_Status+  #-}++-- | [Output Only] The status of the operation, which can be one of the following: @PENDING@, @RUNNING@, or @DONE@.+newtype Operation_Status = Operation_Status {fromOperation_Status :: 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+    )++pattern Operation_Status_Pending :: Operation_Status+pattern Operation_Status_Pending = Operation_Status "PENDING"++pattern Operation_Status_Running :: Operation_Status+pattern Operation_Status_Running = Operation_Status "RUNNING"++pattern Operation_Status_Done :: Operation_Status+pattern Operation_Status_Done = Operation_Status "DONE"++{-# COMPLETE+  Operation_Status_Pending,+  Operation_Status_Running,+  Operation_Status_Done,+  Operation_Status+  #-}++-- | [Output Only] A warning code, if applicable. For example, Compute Engine returns NO/RESULTS/ON_PAGE if there are no results in the response.+newtype Operation_WarningsItem_Code = Operation_WarningsItem_Code {fromOperation_WarningsItem_Code :: 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+    )++-- | A link to a deprecated resource was created.+pattern Operation_WarningsItem_Code_DEPRECATEDRESOURCEUSED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_DEPRECATEDRESOURCEUSED = Operation_WarningsItem_Code "DEPRECATED_RESOURCE_USED"++-- | No results are present on a particular list page.+pattern Operation_WarningsItem_Code_NORESULTSONPAGE :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NORESULTSONPAGE = Operation_WarningsItem_Code "NO_RESULTS_ON_PAGE"++-- | A given scope cannot be reached.+pattern Operation_WarningsItem_Code_Unreachable :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_Unreachable = Operation_WarningsItem_Code "UNREACHABLE"++-- | The route\'s nextHopIp address is not assigned to an instance on the network.+pattern Operation_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED = Operation_WarningsItem_Code "NEXT_HOP_ADDRESS_NOT_ASSIGNED"++-- | The route\'s nextHopInstance URL refers to an instance that does not exist.+pattern Operation_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND = Operation_WarningsItem_Code "NEXT_HOP_INSTANCE_NOT_FOUND"++-- | The route\'s nextHopInstance URL refers to an instance that is not on the same network as the route.+pattern Operation_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK = Operation_WarningsItem_Code "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"++-- | The route\'s next hop instance cannot ip forward.+pattern Operation_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD = Operation_WarningsItem_Code "NEXT_HOP_CANNOT_IP_FORWARD"++-- | The route\'s next hop instance does not have a status of RUNNING.+pattern Operation_WarningsItem_Code_NEXTHOPNOTRUNNING :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NEXTHOPNOTRUNNING = Operation_WarningsItem_Code "NEXT_HOP_NOT_RUNNING"++-- | The operation involved use of an injected kernel, which is deprecated.+pattern Operation_WarningsItem_Code_INJECTEDKERNELSDEPRECATED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_INJECTEDKERNELSDEPRECATED = Operation_WarningsItem_Code "INJECTED_KERNELS_DEPRECATED"++-- | The user attempted to use a resource that requires a TOS they have not accepted.+pattern Operation_WarningsItem_Code_REQUIREDTOSAGREEMENT :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_REQUIREDTOSAGREEMENT = Operation_WarningsItem_Code "REQUIRED_TOS_AGREEMENT"++-- | The user created a boot disk that is larger than image size.+pattern Operation_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE = Operation_WarningsItem_Code "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"++-- | One or more of the resources set to auto-delete could not be deleted because they were in use.+pattern Operation_WarningsItem_Code_RESOURCENOTDELETED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESOURCENOTDELETED = Operation_WarningsItem_Code "RESOURCE_NOT_DELETED"++-- | Instance template used in instance group manager is valid as such, but its application does not make a lot of sense, because it allows only single instance in instance group.+pattern Operation_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE = Operation_WarningsItem_Code "SINGLE_INSTANCE_PROPERTY_TEMPLATE"++-- | Error which is not critical. We decided to continue the process despite the mentioned error.+pattern Operation_WarningsItem_Code_NOTCRITICALERROR :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NOTCRITICALERROR = Operation_WarningsItem_Code "NOT_CRITICAL_ERROR"++-- | Warning about failed cleanup of transient changes made by a failed operation.+pattern Operation_WarningsItem_Code_CLEANUPFAILED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_CLEANUPFAILED = Operation_WarningsItem_Code "CLEANUP_FAILED"++-- | Warning that value of a field has been overridden. Deprecated unused field.+pattern Operation_WarningsItem_Code_FIELDVALUEOVERRIDEN :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_FIELDVALUEOVERRIDEN = Operation_WarningsItem_Code "FIELD_VALUE_OVERRIDEN"++-- | Warning that a resource is in use.+pattern Operation_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING = Operation_WarningsItem_Code "RESOURCE_IN_USE_BY_OTHER_RESOURCE_WARNING"++-- | Warning that network endpoint was not detached.+pattern Operation_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED = Operation_WarningsItem_Code "NETWORK_ENDPOINT_NOT_DETACHED"++-- | Current page contains less results than requested but a next page token exists.+pattern Operation_WarningsItem_Code_PAGEMISSINGRESULTS :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_PAGEMISSINGRESULTS = Operation_WarningsItem_Code "PAGE_MISSING_RESULTS"++-- | Warning that SSL policy resource in the response does not contain information about the list of enabled features.+pattern Operation_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED = Operation_WarningsItem_Code "SSL_POLICY_ENABLED_FEATURES_NOT_FETCHED"++-- | Warning that a resource is not found.+pattern Operation_WarningsItem_Code_RESOURCENOTFOUNDWARNING :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESOURCENOTFOUNDWARNING = Operation_WarningsItem_Code "RESOURCE_NOT_FOUND_WARNING"++-- | A resource depends on a missing type+pattern Operation_WarningsItem_Code_MISSINGTYPEDEPENDENCY :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_MISSINGTYPEDEPENDENCY = Operation_WarningsItem_Code "MISSING_TYPE_DEPENDENCY"++-- | Warning that is present in an external api call+pattern Operation_WarningsItem_Code_EXTERNALAPIWARNING :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_EXTERNALAPIWARNING = Operation_WarningsItem_Code "EXTERNAL_API_WARNING"++-- | When a resource schema validation is ignored.+pattern Operation_WarningsItem_Code_SCHEMAVALIDATIONIGNORED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_SCHEMAVALIDATIONIGNORED = Operation_WarningsItem_Code "SCHEMA_VALIDATION_IGNORED"++-- | When undeclared properties in the schema are present+pattern Operation_WarningsItem_Code_UNDECLAREDPROPERTIES :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_UNDECLAREDPROPERTIES = Operation_WarningsItem_Code "UNDECLARED_PROPERTIES"++-- | When deploying and at least one of the resources has a type marked as experimental+pattern Operation_WarningsItem_Code_EXPERIMENTALTYPEUSED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_EXPERIMENTALTYPEUSED = Operation_WarningsItem_Code "EXPERIMENTAL_TYPE_USED"++-- | When deploying and at least one of the resources has a type marked as deprecated+pattern Operation_WarningsItem_Code_DEPRECATEDTYPEUSED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_DEPRECATEDTYPEUSED = Operation_WarningsItem_Code "DEPRECATED_TYPE_USED"++-- | Success is reported, but some results may be missing due to errors+pattern Operation_WarningsItem_Code_PARTIALSUCCESS :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_PARTIALSUCCESS = Operation_WarningsItem_Code "PARTIAL_SUCCESS"++-- | When deploying a deployment with a exceedingly large number of resources+pattern Operation_WarningsItem_Code_LARGEDEPLOYMENTWARNING :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_LARGEDEPLOYMENTWARNING = Operation_WarningsItem_Code "LARGE_DEPLOYMENT_WARNING"++-- | The route\'s nextHopInstance URL refers to an instance that does not have an ipv6 interface on the same network as the route.+pattern Operation_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE = Operation_WarningsItem_Code "NEXT_HOP_INSTANCE_HAS_NO_IPV6_INTERFACE"++-- | A WEIGHTED_MAGLEV backend service is associated with a health check that is not of type HTTP\/HTTPS\/HTTP2.+pattern Operation_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB = Operation_WarningsItem_Code "INVALID_HEALTH_CHECK_FOR_DYNAMIC_WIEGHTED_LB"++-- | Resource can\'t be retrieved due to list overhead quota exceed which captures the amount of resources filtered out by user-defined list filter.+pattern Operation_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED = Operation_WarningsItem_Code "LIST_OVERHEAD_QUOTA_EXCEED"++-- | Quota information is not available to client requests (e.g: regions.list).+pattern Operation_WarningsItem_Code_QUOTAINFOUNAVAILABLE :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_QUOTAINFOUNAVAILABLE = Operation_WarningsItem_Code "QUOTA_INFO_UNAVAILABLE"++-- | Indicates that a VM is using global DNS. Can also be used to indicate that a resource has attributes that could result in the creation of a VM that uses global DNS.+pattern Operation_WarningsItem_Code_RESOURCEUSESGLOBALDNS :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESOURCEUSESGLOBALDNS = Operation_WarningsItem_Code "RESOURCE_USES_GLOBAL_DNS"++-- | Resource can\'t be retrieved due to api quota exceeded.+pattern Operation_WarningsItem_Code_RATELIMITEXCEEDED :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RATELIMITEXCEEDED = Operation_WarningsItem_Code "RATE_LIMIT_EXCEEDED"++-- | Reserved entries for quickly adding new warnings without breaking dependent clients.+pattern Operation_WarningsItem_Code_RESERVED_ENTRY_135 :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESERVED_ENTRY_135 = Operation_WarningsItem_Code "RESERVED_ENTRY_135"++pattern Operation_WarningsItem_Code_RESERVED_ENTRY_136 :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESERVED_ENTRY_136 = Operation_WarningsItem_Code "RESERVED_ENTRY_136"++pattern Operation_WarningsItem_Code_RESERVED_ENTRY_139 :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESERVED_ENTRY_139 = Operation_WarningsItem_Code "RESERVED_ENTRY_139"++pattern Operation_WarningsItem_Code_RESERVED_ENTRY_141 :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESERVED_ENTRY_141 = Operation_WarningsItem_Code "RESERVED_ENTRY_141"++pattern Operation_WarningsItem_Code_RESERVED_ENTRY_142 :: Operation_WarningsItem_Code+pattern Operation_WarningsItem_Code_RESERVED_ENTRY_142 = Operation_WarningsItem_Code "RESERVED_ENTRY_142"++{-# COMPLETE+  Operation_WarningsItem_Code_DEPRECATEDRESOURCEUSED,+  Operation_WarningsItem_Code_NORESULTSONPAGE,+  Operation_WarningsItem_Code_Unreachable,+  Operation_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED,+  Operation_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND,+  Operation_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK,+  Operation_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD,+  Operation_WarningsItem_Code_NEXTHOPNOTRUNNING,+  Operation_WarningsItem_Code_INJECTEDKERNELSDEPRECATED,+  Operation_WarningsItem_Code_REQUIREDTOSAGREEMENT,+  Operation_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE,+  Operation_WarningsItem_Code_RESOURCENOTDELETED,+  Operation_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE,+  Operation_WarningsItem_Code_NOTCRITICALERROR,+  Operation_WarningsItem_Code_CLEANUPFAILED,+  Operation_WarningsItem_Code_FIELDVALUEOVERRIDEN,+  Operation_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING,+  Operation_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED,+  Operation_WarningsItem_Code_PAGEMISSINGRESULTS,+  Operation_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED,+  Operation_WarningsItem_Code_RESOURCENOTFOUNDWARNING,+  Operation_WarningsItem_Code_MISSINGTYPEDEPENDENCY,+  Operation_WarningsItem_Code_EXTERNALAPIWARNING,+  Operation_WarningsItem_Code_SCHEMAVALIDATIONIGNORED,+  Operation_WarningsItem_Code_UNDECLAREDPROPERTIES,+  Operation_WarningsItem_Code_EXPERIMENTALTYPEUSED,+  Operation_WarningsItem_Code_DEPRECATEDTYPEUSED,+  Operation_WarningsItem_Code_PARTIALSUCCESS,+  Operation_WarningsItem_Code_LARGEDEPLOYMENTWARNING,+  Operation_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE,+  Operation_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB,+  Operation_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED,+  Operation_WarningsItem_Code_QUOTAINFOUNAVAILABLE,+  Operation_WarningsItem_Code_RESOURCEUSESGLOBALDNS,+  Operation_WarningsItem_Code_RATELIMITEXCEEDED,+  Operation_WarningsItem_Code_RESERVED_ENTRY_135,+  Operation_WarningsItem_Code_RESERVED_ENTRY_136,+  Operation_WarningsItem_Code_RESERVED_ENTRY_139,+  Operation_WarningsItem_Code_RESERVED_ENTRY_141,+  Operation_WarningsItem_Code_RESERVED_ENTRY_142,+  Operation_WarningsItem_Code+  #-}++-- | Rollout status of the future quota limit.+newtype QuotaExceededInfo_RolloutStatus = QuotaExceededInfo_RolloutStatus {fromQuotaExceededInfo_RolloutStatus :: 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+    )++-- | ROLLOUT/STATUS/UNSPECIFIED - Rollout status is not specified. The default value.+pattern QuotaExceededInfo_RolloutStatus_ROLLOUTSTATUSUNSPECIFIED :: QuotaExceededInfo_RolloutStatus+pattern QuotaExceededInfo_RolloutStatus_ROLLOUTSTATUSUNSPECIFIED = QuotaExceededInfo_RolloutStatus "ROLLOUT_STATUS_UNSPECIFIED"++-- | IN_PROGRESS - A rollout is in process which will change the limit value to future limit.+pattern QuotaExceededInfo_RolloutStatus_INPROGRESS :: QuotaExceededInfo_RolloutStatus+pattern QuotaExceededInfo_RolloutStatus_INPROGRESS = QuotaExceededInfo_RolloutStatus "IN_PROGRESS"++{-# COMPLETE+  QuotaExceededInfo_RolloutStatus_ROLLOUTSTATUSUNSPECIFIED,+  QuotaExceededInfo_RolloutStatus_INPROGRESS,+  QuotaExceededInfo_RolloutStatus+  #-}++-- | [Output Only] A warning code, if applicable. For example, Compute Engine returns NO/RESULTS/ON_PAGE if there are no results in the response.+newtype Resource_WarningsItem_Code = Resource_WarningsItem_Code {fromResource_WarningsItem_Code :: 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+    )++-- | A link to a deprecated resource was created.+pattern Resource_WarningsItem_Code_DEPRECATEDRESOURCEUSED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_DEPRECATEDRESOURCEUSED = Resource_WarningsItem_Code "DEPRECATED_RESOURCE_USED"++-- | No results are present on a particular list page.+pattern Resource_WarningsItem_Code_NORESULTSONPAGE :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NORESULTSONPAGE = Resource_WarningsItem_Code "NO_RESULTS_ON_PAGE"++-- | A given scope cannot be reached.+pattern Resource_WarningsItem_Code_Unreachable :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_Unreachable = Resource_WarningsItem_Code "UNREACHABLE"++-- | The route\'s nextHopIp address is not assigned to an instance on the network.+pattern Resource_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED = Resource_WarningsItem_Code "NEXT_HOP_ADDRESS_NOT_ASSIGNED"++-- | The route\'s nextHopInstance URL refers to an instance that does not exist.+pattern Resource_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND = Resource_WarningsItem_Code "NEXT_HOP_INSTANCE_NOT_FOUND"++-- | The route\'s nextHopInstance URL refers to an instance that is not on the same network as the route.+pattern Resource_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK = Resource_WarningsItem_Code "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"++-- | The route\'s next hop instance cannot ip forward.+pattern Resource_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD = Resource_WarningsItem_Code "NEXT_HOP_CANNOT_IP_FORWARD"++-- | The route\'s next hop instance does not have a status of RUNNING.+pattern Resource_WarningsItem_Code_NEXTHOPNOTRUNNING :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NEXTHOPNOTRUNNING = Resource_WarningsItem_Code "NEXT_HOP_NOT_RUNNING"++-- | The operation involved use of an injected kernel, which is deprecated.+pattern Resource_WarningsItem_Code_INJECTEDKERNELSDEPRECATED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_INJECTEDKERNELSDEPRECATED = Resource_WarningsItem_Code "INJECTED_KERNELS_DEPRECATED"++-- | The user attempted to use a resource that requires a TOS they have not accepted.+pattern Resource_WarningsItem_Code_REQUIREDTOSAGREEMENT :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_REQUIREDTOSAGREEMENT = Resource_WarningsItem_Code "REQUIRED_TOS_AGREEMENT"++-- | The user created a boot disk that is larger than image size.+pattern Resource_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE = Resource_WarningsItem_Code "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"++-- | One or more of the resources set to auto-delete could not be deleted because they were in use.+pattern Resource_WarningsItem_Code_RESOURCENOTDELETED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESOURCENOTDELETED = Resource_WarningsItem_Code "RESOURCE_NOT_DELETED"++-- | Instance template used in instance group manager is valid as such, but its application does not make a lot of sense, because it allows only single instance in instance group.+pattern Resource_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE = Resource_WarningsItem_Code "SINGLE_INSTANCE_PROPERTY_TEMPLATE"++-- | Error which is not critical. We decided to continue the process despite the mentioned error.+pattern Resource_WarningsItem_Code_NOTCRITICALERROR :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NOTCRITICALERROR = Resource_WarningsItem_Code "NOT_CRITICAL_ERROR"++-- | Warning about failed cleanup of transient changes made by a failed operation.+pattern Resource_WarningsItem_Code_CLEANUPFAILED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_CLEANUPFAILED = Resource_WarningsItem_Code "CLEANUP_FAILED"++-- | Warning that value of a field has been overridden. Deprecated unused field.+pattern Resource_WarningsItem_Code_FIELDVALUEOVERRIDEN :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_FIELDVALUEOVERRIDEN = Resource_WarningsItem_Code "FIELD_VALUE_OVERRIDEN"++-- | Warning that a resource is in use.+pattern Resource_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING = Resource_WarningsItem_Code "RESOURCE_IN_USE_BY_OTHER_RESOURCE_WARNING"++-- | Warning that network endpoint was not detached.+pattern Resource_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED = Resource_WarningsItem_Code "NETWORK_ENDPOINT_NOT_DETACHED"++-- | Current page contains less results than requested but a next page token exists.+pattern Resource_WarningsItem_Code_PAGEMISSINGRESULTS :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_PAGEMISSINGRESULTS = Resource_WarningsItem_Code "PAGE_MISSING_RESULTS"++-- | Warning that SSL policy resource in the response does not contain information about the list of enabled features.+pattern Resource_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED = Resource_WarningsItem_Code "SSL_POLICY_ENABLED_FEATURES_NOT_FETCHED"++-- | Warning that a resource is not found.+pattern Resource_WarningsItem_Code_RESOURCENOTFOUNDWARNING :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESOURCENOTFOUNDWARNING = Resource_WarningsItem_Code "RESOURCE_NOT_FOUND_WARNING"++-- | A resource depends on a missing type+pattern Resource_WarningsItem_Code_MISSINGTYPEDEPENDENCY :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_MISSINGTYPEDEPENDENCY = Resource_WarningsItem_Code "MISSING_TYPE_DEPENDENCY"++-- | Warning that is present in an external api call+pattern Resource_WarningsItem_Code_EXTERNALAPIWARNING :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_EXTERNALAPIWARNING = Resource_WarningsItem_Code "EXTERNAL_API_WARNING"++-- | When a resource schema validation is ignored.+pattern Resource_WarningsItem_Code_SCHEMAVALIDATIONIGNORED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_SCHEMAVALIDATIONIGNORED = Resource_WarningsItem_Code "SCHEMA_VALIDATION_IGNORED"++-- | When undeclared properties in the schema are present+pattern Resource_WarningsItem_Code_UNDECLAREDPROPERTIES :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_UNDECLAREDPROPERTIES = Resource_WarningsItem_Code "UNDECLARED_PROPERTIES"++-- | When deploying and at least one of the resources has a type marked as experimental+pattern Resource_WarningsItem_Code_EXPERIMENTALTYPEUSED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_EXPERIMENTALTYPEUSED = Resource_WarningsItem_Code "EXPERIMENTAL_TYPE_USED"++-- | When deploying and at least one of the resources has a type marked as deprecated+pattern Resource_WarningsItem_Code_DEPRECATEDTYPEUSED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_DEPRECATEDTYPEUSED = Resource_WarningsItem_Code "DEPRECATED_TYPE_USED"++-- | Success is reported, but some results may be missing due to errors+pattern Resource_WarningsItem_Code_PARTIALSUCCESS :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_PARTIALSUCCESS = Resource_WarningsItem_Code "PARTIAL_SUCCESS"++-- | When deploying a deployment with a exceedingly large number of resources+pattern Resource_WarningsItem_Code_LARGEDEPLOYMENTWARNING :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_LARGEDEPLOYMENTWARNING = Resource_WarningsItem_Code "LARGE_DEPLOYMENT_WARNING"++-- | The route\'s nextHopInstance URL refers to an instance that does not have an ipv6 interface on the same network as the route.+pattern Resource_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE = Resource_WarningsItem_Code "NEXT_HOP_INSTANCE_HAS_NO_IPV6_INTERFACE"++-- | A WEIGHTED_MAGLEV backend service is associated with a health check that is not of type HTTP\/HTTPS\/HTTP2.+pattern Resource_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB = Resource_WarningsItem_Code "INVALID_HEALTH_CHECK_FOR_DYNAMIC_WIEGHTED_LB"++-- | Resource can\'t be retrieved due to list overhead quota exceed which captures the amount of resources filtered out by user-defined list filter.+pattern Resource_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED = Resource_WarningsItem_Code "LIST_OVERHEAD_QUOTA_EXCEED"++-- | Quota information is not available to client requests (e.g: regions.list).+pattern Resource_WarningsItem_Code_QUOTAINFOUNAVAILABLE :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_QUOTAINFOUNAVAILABLE = Resource_WarningsItem_Code "QUOTA_INFO_UNAVAILABLE"++-- | Indicates that a VM is using global DNS. Can also be used to indicate that a resource has attributes that could result in the creation of a VM that uses global DNS.+pattern Resource_WarningsItem_Code_RESOURCEUSESGLOBALDNS :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESOURCEUSESGLOBALDNS = Resource_WarningsItem_Code "RESOURCE_USES_GLOBAL_DNS"++-- | Resource can\'t be retrieved due to api quota exceeded.+pattern Resource_WarningsItem_Code_RATELIMITEXCEEDED :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RATELIMITEXCEEDED = Resource_WarningsItem_Code "RATE_LIMIT_EXCEEDED"++-- | Reserved entries for quickly adding new warnings without breaking dependent clients.+pattern Resource_WarningsItem_Code_RESERVED_ENTRY_135 :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESERVED_ENTRY_135 = Resource_WarningsItem_Code "RESERVED_ENTRY_135"++pattern Resource_WarningsItem_Code_RESERVED_ENTRY_136 :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESERVED_ENTRY_136 = Resource_WarningsItem_Code "RESERVED_ENTRY_136"++pattern Resource_WarningsItem_Code_RESERVED_ENTRY_139 :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESERVED_ENTRY_139 = Resource_WarningsItem_Code "RESERVED_ENTRY_139"++pattern Resource_WarningsItem_Code_RESERVED_ENTRY_141 :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESERVED_ENTRY_141 = Resource_WarningsItem_Code "RESERVED_ENTRY_141"++pattern Resource_WarningsItem_Code_RESERVED_ENTRY_142 :: Resource_WarningsItem_Code+pattern Resource_WarningsItem_Code_RESERVED_ENTRY_142 = Resource_WarningsItem_Code "RESERVED_ENTRY_142"++{-# COMPLETE+  Resource_WarningsItem_Code_DEPRECATEDRESOURCEUSED,+  Resource_WarningsItem_Code_NORESULTSONPAGE,+  Resource_WarningsItem_Code_Unreachable,+  Resource_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED,+  Resource_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND,+  Resource_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK,+  Resource_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD,+  Resource_WarningsItem_Code_NEXTHOPNOTRUNNING,+  Resource_WarningsItem_Code_INJECTEDKERNELSDEPRECATED,+  Resource_WarningsItem_Code_REQUIREDTOSAGREEMENT,+  Resource_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE,+  Resource_WarningsItem_Code_RESOURCENOTDELETED,+  Resource_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE,+  Resource_WarningsItem_Code_NOTCRITICALERROR,+  Resource_WarningsItem_Code_CLEANUPFAILED,+  Resource_WarningsItem_Code_FIELDVALUEOVERRIDEN,+  Resource_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING,+  Resource_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED,+  Resource_WarningsItem_Code_PAGEMISSINGRESULTS,+  Resource_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED,+  Resource_WarningsItem_Code_RESOURCENOTFOUNDWARNING,+  Resource_WarningsItem_Code_MISSINGTYPEDEPENDENCY,+  Resource_WarningsItem_Code_EXTERNALAPIWARNING,+  Resource_WarningsItem_Code_SCHEMAVALIDATIONIGNORED,+  Resource_WarningsItem_Code_UNDECLAREDPROPERTIES,+  Resource_WarningsItem_Code_EXPERIMENTALTYPEUSED,+  Resource_WarningsItem_Code_DEPRECATEDTYPEUSED,+  Resource_WarningsItem_Code_PARTIALSUCCESS,+  Resource_WarningsItem_Code_LARGEDEPLOYMENTWARNING,+  Resource_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE,+  Resource_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB,+  Resource_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED,+  Resource_WarningsItem_Code_QUOTAINFOUNAVAILABLE,+  Resource_WarningsItem_Code_RESOURCEUSESGLOBALDNS,+  Resource_WarningsItem_Code_RATELIMITEXCEEDED,+  Resource_WarningsItem_Code_RESERVED_ENTRY_135,+  Resource_WarningsItem_Code_RESERVED_ENTRY_136,+  Resource_WarningsItem_Code_RESERVED_ENTRY_139,+  Resource_WarningsItem_Code_RESERVED_ENTRY_141,+  Resource_WarningsItem_Code_RESERVED_ENTRY_142,+  Resource_WarningsItem_Code+  #-}++-- | Output only. The intent of the resource: @PREVIEW@, @UPDATE@, or @CANCEL@.+newtype ResourceUpdate_Intent = ResourceUpdate_Intent {fromResourceUpdate_Intent :: 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 resource is scheduled to be created, or if it already exists, acquired.+pattern ResourceUpdate_Intent_CREATEORACQUIRE :: ResourceUpdate_Intent+pattern ResourceUpdate_Intent_CREATEORACQUIRE = ResourceUpdate_Intent "CREATE_OR_ACQUIRE"++-- | The resource is scheduled to be deleted.+pattern ResourceUpdate_Intent_Delete' :: ResourceUpdate_Intent+pattern ResourceUpdate_Intent_Delete' = ResourceUpdate_Intent "DELETE"++-- | The resource is scheduled to be acquired.+pattern ResourceUpdate_Intent_Acquire :: ResourceUpdate_Intent+pattern ResourceUpdate_Intent_Acquire = ResourceUpdate_Intent "ACQUIRE"++-- | The resource is scheduled to be updated via the UPDATE method.+pattern ResourceUpdate_Intent_Update :: ResourceUpdate_Intent+pattern ResourceUpdate_Intent_Update = ResourceUpdate_Intent "UPDATE"++-- | The resource is scheduled to be abandoned.+pattern ResourceUpdate_Intent_Abandon :: ResourceUpdate_Intent+pattern ResourceUpdate_Intent_Abandon = ResourceUpdate_Intent "ABANDON"++-- | The resource is scheduled to be created.+pattern ResourceUpdate_Intent_Create :: ResourceUpdate_Intent+pattern ResourceUpdate_Intent_Create = ResourceUpdate_Intent "CREATE"++{-# COMPLETE+  ResourceUpdate_Intent_CREATEORACQUIRE,+  ResourceUpdate_Intent_Delete',+  ResourceUpdate_Intent_Acquire,+  ResourceUpdate_Intent_Update,+  ResourceUpdate_Intent_Abandon,+  ResourceUpdate_Intent_Create,+  ResourceUpdate_Intent+  #-}++-- | Output only. The state of the resource.+newtype ResourceUpdate_State = ResourceUpdate_State {fromResourceUpdate_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+    )++-- | There are changes pending for this resource.+pattern ResourceUpdate_State_Pending :: ResourceUpdate_State+pattern ResourceUpdate_State_Pending = ResourceUpdate_State "PENDING"++-- | The service is executing changes on the resource.+pattern ResourceUpdate_State_INPROGRESS :: ResourceUpdate_State+pattern ResourceUpdate_State_INPROGRESS = ResourceUpdate_State "IN_PROGRESS"++-- | The service is previewing changes on the resource.+pattern ResourceUpdate_State_INPREVIEW :: ResourceUpdate_State+pattern ResourceUpdate_State_INPREVIEW = ResourceUpdate_State "IN_PREVIEW"++-- | The service has failed to change the resource.+pattern ResourceUpdate_State_Failed :: ResourceUpdate_State+pattern ResourceUpdate_State_Failed = ResourceUpdate_State "FAILED"++-- | The service has aborted trying to change the resource.+pattern ResourceUpdate_State_Aborted :: ResourceUpdate_State+pattern ResourceUpdate_State_Aborted = ResourceUpdate_State "ABORTED"++{-# COMPLETE+  ResourceUpdate_State_Pending,+  ResourceUpdate_State_INPROGRESS,+  ResourceUpdate_State_INPREVIEW,+  ResourceUpdate_State_Failed,+  ResourceUpdate_State_Aborted,+  ResourceUpdate_State+  #-}++-- | [Output Only] A warning code, if applicable. For example, Compute Engine returns NO/RESULTS/ON_PAGE if there are no results in the response.+newtype ResourceUpdate_WarningsItem_Code = ResourceUpdate_WarningsItem_Code {fromResourceUpdate_WarningsItem_Code :: 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+    )++-- | A link to a deprecated resource was created.+pattern ResourceUpdate_WarningsItem_Code_DEPRECATEDRESOURCEUSED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_DEPRECATEDRESOURCEUSED = ResourceUpdate_WarningsItem_Code "DEPRECATED_RESOURCE_USED"++-- | No results are present on a particular list page.+pattern ResourceUpdate_WarningsItem_Code_NORESULTSONPAGE :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NORESULTSONPAGE = ResourceUpdate_WarningsItem_Code "NO_RESULTS_ON_PAGE"++-- | A given scope cannot be reached.+pattern ResourceUpdate_WarningsItem_Code_Unreachable :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_Unreachable = ResourceUpdate_WarningsItem_Code "UNREACHABLE"++-- | The route\'s nextHopIp address is not assigned to an instance on the network.+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED = ResourceUpdate_WarningsItem_Code "NEXT_HOP_ADDRESS_NOT_ASSIGNED"++-- | The route\'s nextHopInstance URL refers to an instance that does not exist.+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND = ResourceUpdate_WarningsItem_Code "NEXT_HOP_INSTANCE_NOT_FOUND"++-- | The route\'s nextHopInstance URL refers to an instance that is not on the same network as the route.+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK = ResourceUpdate_WarningsItem_Code "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"++-- | The route\'s next hop instance cannot ip forward.+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD = ResourceUpdate_WarningsItem_Code "NEXT_HOP_CANNOT_IP_FORWARD"++-- | The route\'s next hop instance does not have a status of RUNNING.+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPNOTRUNNING :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPNOTRUNNING = ResourceUpdate_WarningsItem_Code "NEXT_HOP_NOT_RUNNING"++-- | The operation involved use of an injected kernel, which is deprecated.+pattern ResourceUpdate_WarningsItem_Code_INJECTEDKERNELSDEPRECATED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_INJECTEDKERNELSDEPRECATED = ResourceUpdate_WarningsItem_Code "INJECTED_KERNELS_DEPRECATED"++-- | The user attempted to use a resource that requires a TOS they have not accepted.+pattern ResourceUpdate_WarningsItem_Code_REQUIREDTOSAGREEMENT :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_REQUIREDTOSAGREEMENT = ResourceUpdate_WarningsItem_Code "REQUIRED_TOS_AGREEMENT"++-- | The user created a boot disk that is larger than image size.+pattern ResourceUpdate_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE = ResourceUpdate_WarningsItem_Code "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"++-- | One or more of the resources set to auto-delete could not be deleted because they were in use.+pattern ResourceUpdate_WarningsItem_Code_RESOURCENOTDELETED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESOURCENOTDELETED = ResourceUpdate_WarningsItem_Code "RESOURCE_NOT_DELETED"++-- | Instance template used in instance group manager is valid as such, but its application does not make a lot of sense, because it allows only single instance in instance group.+pattern ResourceUpdate_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE = ResourceUpdate_WarningsItem_Code "SINGLE_INSTANCE_PROPERTY_TEMPLATE"++-- | Error which is not critical. We decided to continue the process despite the mentioned error.+pattern ResourceUpdate_WarningsItem_Code_NOTCRITICALERROR :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NOTCRITICALERROR = ResourceUpdate_WarningsItem_Code "NOT_CRITICAL_ERROR"++-- | Warning about failed cleanup of transient changes made by a failed operation.+pattern ResourceUpdate_WarningsItem_Code_CLEANUPFAILED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_CLEANUPFAILED = ResourceUpdate_WarningsItem_Code "CLEANUP_FAILED"++-- | Warning that value of a field has been overridden. Deprecated unused field.+pattern ResourceUpdate_WarningsItem_Code_FIELDVALUEOVERRIDEN :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_FIELDVALUEOVERRIDEN = ResourceUpdate_WarningsItem_Code "FIELD_VALUE_OVERRIDEN"++-- | Warning that a resource is in use.+pattern ResourceUpdate_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING = ResourceUpdate_WarningsItem_Code "RESOURCE_IN_USE_BY_OTHER_RESOURCE_WARNING"++-- | Warning that network endpoint was not detached.+pattern ResourceUpdate_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED = ResourceUpdate_WarningsItem_Code "NETWORK_ENDPOINT_NOT_DETACHED"++-- | Current page contains less results than requested but a next page token exists.+pattern ResourceUpdate_WarningsItem_Code_PAGEMISSINGRESULTS :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_PAGEMISSINGRESULTS = ResourceUpdate_WarningsItem_Code "PAGE_MISSING_RESULTS"++-- | Warning that SSL policy resource in the response does not contain information about the list of enabled features.+pattern ResourceUpdate_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED = ResourceUpdate_WarningsItem_Code "SSL_POLICY_ENABLED_FEATURES_NOT_FETCHED"++-- | Warning that a resource is not found.+pattern ResourceUpdate_WarningsItem_Code_RESOURCENOTFOUNDWARNING :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESOURCENOTFOUNDWARNING = ResourceUpdate_WarningsItem_Code "RESOURCE_NOT_FOUND_WARNING"++-- | A resource depends on a missing type+pattern ResourceUpdate_WarningsItem_Code_MISSINGTYPEDEPENDENCY :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_MISSINGTYPEDEPENDENCY = ResourceUpdate_WarningsItem_Code "MISSING_TYPE_DEPENDENCY"++-- | Warning that is present in an external api call+pattern ResourceUpdate_WarningsItem_Code_EXTERNALAPIWARNING :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_EXTERNALAPIWARNING = ResourceUpdate_WarningsItem_Code "EXTERNAL_API_WARNING"++-- | When a resource schema validation is ignored.+pattern ResourceUpdate_WarningsItem_Code_SCHEMAVALIDATIONIGNORED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_SCHEMAVALIDATIONIGNORED = ResourceUpdate_WarningsItem_Code "SCHEMA_VALIDATION_IGNORED"++-- | When undeclared properties in the schema are present+pattern ResourceUpdate_WarningsItem_Code_UNDECLAREDPROPERTIES :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_UNDECLAREDPROPERTIES = ResourceUpdate_WarningsItem_Code "UNDECLARED_PROPERTIES"++-- | When deploying and at least one of the resources has a type marked as experimental+pattern ResourceUpdate_WarningsItem_Code_EXPERIMENTALTYPEUSED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_EXPERIMENTALTYPEUSED = ResourceUpdate_WarningsItem_Code "EXPERIMENTAL_TYPE_USED"++-- | When deploying and at least one of the resources has a type marked as deprecated+pattern ResourceUpdate_WarningsItem_Code_DEPRECATEDTYPEUSED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_DEPRECATEDTYPEUSED = ResourceUpdate_WarningsItem_Code "DEPRECATED_TYPE_USED"++-- | Success is reported, but some results may be missing due to errors+pattern ResourceUpdate_WarningsItem_Code_PARTIALSUCCESS :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_PARTIALSUCCESS = ResourceUpdate_WarningsItem_Code "PARTIAL_SUCCESS"++-- | When deploying a deployment with a exceedingly large number of resources+pattern ResourceUpdate_WarningsItem_Code_LARGEDEPLOYMENTWARNING :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_LARGEDEPLOYMENTWARNING = ResourceUpdate_WarningsItem_Code "LARGE_DEPLOYMENT_WARNING"++-- | The route\'s nextHopInstance URL refers to an instance that does not have an ipv6 interface on the same network as the route.+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE = ResourceUpdate_WarningsItem_Code "NEXT_HOP_INSTANCE_HAS_NO_IPV6_INTERFACE"++-- | A WEIGHTED_MAGLEV backend service is associated with a health check that is not of type HTTP\/HTTPS\/HTTP2.+pattern ResourceUpdate_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB = ResourceUpdate_WarningsItem_Code "INVALID_HEALTH_CHECK_FOR_DYNAMIC_WIEGHTED_LB"++-- | Resource can\'t be retrieved due to list overhead quota exceed which captures the amount of resources filtered out by user-defined list filter.+pattern ResourceUpdate_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED = ResourceUpdate_WarningsItem_Code "LIST_OVERHEAD_QUOTA_EXCEED"++-- | Quota information is not available to client requests (e.g: regions.list).+pattern ResourceUpdate_WarningsItem_Code_QUOTAINFOUNAVAILABLE :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_QUOTAINFOUNAVAILABLE = ResourceUpdate_WarningsItem_Code "QUOTA_INFO_UNAVAILABLE"++-- | Indicates that a VM is using global DNS. Can also be used to indicate that a resource has attributes that could result in the creation of a VM that uses global DNS.+pattern ResourceUpdate_WarningsItem_Code_RESOURCEUSESGLOBALDNS :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESOURCEUSESGLOBALDNS = ResourceUpdate_WarningsItem_Code "RESOURCE_USES_GLOBAL_DNS"++-- | Resource can\'t be retrieved due to api quota exceeded.+pattern ResourceUpdate_WarningsItem_Code_RATELIMITEXCEEDED :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RATELIMITEXCEEDED = ResourceUpdate_WarningsItem_Code "RATE_LIMIT_EXCEEDED"++-- | Reserved entries for quickly adding new warnings without breaking dependent clients.+pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_135 :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_135 = ResourceUpdate_WarningsItem_Code "RESERVED_ENTRY_135"++pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_136 :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_136 = ResourceUpdate_WarningsItem_Code "RESERVED_ENTRY_136"++pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_139 :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_139 = ResourceUpdate_WarningsItem_Code "RESERVED_ENTRY_139"++pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_141 :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_141 = ResourceUpdate_WarningsItem_Code "RESERVED_ENTRY_141"++pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_142 :: ResourceUpdate_WarningsItem_Code+pattern ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_142 = ResourceUpdate_WarningsItem_Code "RESERVED_ENTRY_142"++{-# COMPLETE+  ResourceUpdate_WarningsItem_Code_DEPRECATEDRESOURCEUSED,+  ResourceUpdate_WarningsItem_Code_NORESULTSONPAGE,+  ResourceUpdate_WarningsItem_Code_Unreachable,+  ResourceUpdate_WarningsItem_Code_NEXTHOPADDRESSNOTASSIGNED,+  ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTFOUND,+  ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCENOTONNETWORK,+  ResourceUpdate_WarningsItem_Code_NEXTHOPCANNOTIPFORWARD,+  ResourceUpdate_WarningsItem_Code_NEXTHOPNOTRUNNING,+  ResourceUpdate_WarningsItem_Code_INJECTEDKERNELSDEPRECATED,+  ResourceUpdate_WarningsItem_Code_REQUIREDTOSAGREEMENT,+  ResourceUpdate_WarningsItem_Code_DISKSIZELARGERTHANIMAGESIZE,+  ResourceUpdate_WarningsItem_Code_RESOURCENOTDELETED,+  ResourceUpdate_WarningsItem_Code_SINGLEINSTANCEPROPERTYTEMPLATE,+  ResourceUpdate_WarningsItem_Code_NOTCRITICALERROR,+  ResourceUpdate_WarningsItem_Code_CLEANUPFAILED,+  ResourceUpdate_WarningsItem_Code_FIELDVALUEOVERRIDEN,+  ResourceUpdate_WarningsItem_Code_RESOURCEINUSEBYOTHERRESOURCEWARNING,+  ResourceUpdate_WarningsItem_Code_NETWORKENDPOINTNOTDETACHED,+  ResourceUpdate_WarningsItem_Code_PAGEMISSINGRESULTS,+  ResourceUpdate_WarningsItem_Code_SSLPOLICYENABLEDFEATURESNOTFETCHED,+  ResourceUpdate_WarningsItem_Code_RESOURCENOTFOUNDWARNING,+  ResourceUpdate_WarningsItem_Code_MISSINGTYPEDEPENDENCY,+  ResourceUpdate_WarningsItem_Code_EXTERNALAPIWARNING,+  ResourceUpdate_WarningsItem_Code_SCHEMAVALIDATIONIGNORED,+  ResourceUpdate_WarningsItem_Code_UNDECLAREDPROPERTIES,+  ResourceUpdate_WarningsItem_Code_EXPERIMENTALTYPEUSED,+  ResourceUpdate_WarningsItem_Code_DEPRECATEDTYPEUSED,+  ResourceUpdate_WarningsItem_Code_PARTIALSUCCESS,+  ResourceUpdate_WarningsItem_Code_LARGEDEPLOYMENTWARNING,+  ResourceUpdate_WarningsItem_Code_NEXTHOPINSTANCEHASNOIPV6INTERFACE,+  ResourceUpdate_WarningsItem_Code_INVALIDHEALTHCHECKFORDYNAMICWIEGHTEDLB,+  ResourceUpdate_WarningsItem_Code_LISTOVERHEADQUOTAEXCEED,+  ResourceUpdate_WarningsItem_Code_QUOTAINFOUNAVAILABLE,+  ResourceUpdate_WarningsItem_Code_RESOURCEUSESGLOBALDNS,+  ResourceUpdate_WarningsItem_Code_RATELIMITEXCEEDED,+  ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_135,+  ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_136,+  ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_139,+  ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_141,+  ResourceUpdate_WarningsItem_Code_RESERVED_ENTRY_142,+  ResourceUpdate_WarningsItem_Code+  #-}++-- | [Output Only] Status of the action, which can be one of the following: @PROPAGATING@, @PROPAGATED@, @ABANDONED@, @FAILED@, or @DONE@.+newtype SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State {fromSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_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+    )++pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Unspecified :: SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Unspecified = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State "UNSPECIFIED"++-- | Operation is not yet confirmed to have been created in the location.+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagating :: SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagating = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State "PROPAGATING"++-- | Operation is confirmed to be in the location.+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagated :: SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagated = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State "PROPAGATED"++-- | Operation not tracked in this location e.g. zone is marked as DOWN.+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Abandoned :: SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Abandoned = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State "ABANDONED"++-- | Operation is in an error state.+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Failed :: SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Failed = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State "FAILED"++-- | Operation has completed successfully.+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Done :: SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+pattern SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Done = SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State "DONE"++{-# COMPLETE+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Unspecified,+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagating,+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Propagated,+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Abandoned,+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Failed,+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State_Done,+  SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+  #-}++-- | Sets the policy to use for deleting resources.+newtype DeploymentsDeleteDeletePolicy = DeploymentsDeleteDeletePolicy {fromDeploymentsDeleteDeletePolicy :: 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+    )++pattern DeploymentsDeleteDeletePolicy_Delete' :: DeploymentsDeleteDeletePolicy+pattern DeploymentsDeleteDeletePolicy_Delete' = DeploymentsDeleteDeletePolicy "DELETE"++pattern DeploymentsDeleteDeletePolicy_Abandon :: DeploymentsDeleteDeletePolicy+pattern DeploymentsDeleteDeletePolicy_Abandon = DeploymentsDeleteDeletePolicy "ABANDON"++{-# COMPLETE+  DeploymentsDeleteDeletePolicy_Delete',+  DeploymentsDeleteDeletePolicy_Abandon,+  DeploymentsDeleteDeletePolicy+  #-}++-- | Sets the policy to use for creating new resources.+newtype DeploymentsInsertCreatePolicy = DeploymentsInsertCreatePolicy {fromDeploymentsInsertCreatePolicy :: 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+    )++pattern DeploymentsInsertCreatePolicy_CREATEORACQUIRE :: DeploymentsInsertCreatePolicy+pattern DeploymentsInsertCreatePolicy_CREATEORACQUIRE = DeploymentsInsertCreatePolicy "CREATE_OR_ACQUIRE"++pattern DeploymentsInsertCreatePolicy_Acquire :: DeploymentsInsertCreatePolicy+pattern DeploymentsInsertCreatePolicy_Acquire = DeploymentsInsertCreatePolicy "ACQUIRE"++{-# COMPLETE+  DeploymentsInsertCreatePolicy_CREATEORACQUIRE,+  DeploymentsInsertCreatePolicy_Acquire,+  DeploymentsInsertCreatePolicy+  #-}++-- | Sets the policy to use for creating new resources.+newtype DeploymentsPatchCreatePolicy = DeploymentsPatchCreatePolicy {fromDeploymentsPatchCreatePolicy :: 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+    )++pattern DeploymentsPatchCreatePolicy_CREATEORACQUIRE :: DeploymentsPatchCreatePolicy+pattern DeploymentsPatchCreatePolicy_CREATEORACQUIRE = DeploymentsPatchCreatePolicy "CREATE_OR_ACQUIRE"++pattern DeploymentsPatchCreatePolicy_Acquire :: DeploymentsPatchCreatePolicy+pattern DeploymentsPatchCreatePolicy_Acquire = DeploymentsPatchCreatePolicy "ACQUIRE"++{-# COMPLETE+  DeploymentsPatchCreatePolicy_CREATEORACQUIRE,+  DeploymentsPatchCreatePolicy_Acquire,+  DeploymentsPatchCreatePolicy+  #-}++-- | Sets the policy to use for deleting resources.+newtype DeploymentsPatchDeletePolicy = DeploymentsPatchDeletePolicy {fromDeploymentsPatchDeletePolicy :: 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+    )++pattern DeploymentsPatchDeletePolicy_Delete' :: DeploymentsPatchDeletePolicy+pattern DeploymentsPatchDeletePolicy_Delete' = DeploymentsPatchDeletePolicy "DELETE"++pattern DeploymentsPatchDeletePolicy_Abandon :: DeploymentsPatchDeletePolicy+pattern DeploymentsPatchDeletePolicy_Abandon = DeploymentsPatchDeletePolicy "ABANDON"++{-# COMPLETE+  DeploymentsPatchDeletePolicy_Delete',+  DeploymentsPatchDeletePolicy_Abandon,+  DeploymentsPatchDeletePolicy+  #-}++-- | Sets the policy to use for creating new resources.+newtype DeploymentsUpdateCreatePolicy = DeploymentsUpdateCreatePolicy {fromDeploymentsUpdateCreatePolicy :: 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+    )++pattern DeploymentsUpdateCreatePolicy_CREATEORACQUIRE :: DeploymentsUpdateCreatePolicy+pattern DeploymentsUpdateCreatePolicy_CREATEORACQUIRE = DeploymentsUpdateCreatePolicy "CREATE_OR_ACQUIRE"++pattern DeploymentsUpdateCreatePolicy_Acquire :: DeploymentsUpdateCreatePolicy+pattern DeploymentsUpdateCreatePolicy_Acquire = DeploymentsUpdateCreatePolicy "ACQUIRE"++{-# COMPLETE+  DeploymentsUpdateCreatePolicy_CREATEORACQUIRE,+  DeploymentsUpdateCreatePolicy_Acquire,+  DeploymentsUpdateCreatePolicy+  #-}++-- | Sets the policy to use for deleting resources.+newtype DeploymentsUpdateDeletePolicy = DeploymentsUpdateDeletePolicy {fromDeploymentsUpdateDeletePolicy :: 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+    )++pattern DeploymentsUpdateDeletePolicy_Delete' :: DeploymentsUpdateDeletePolicy+pattern DeploymentsUpdateDeletePolicy_Delete' = DeploymentsUpdateDeletePolicy "DELETE"++pattern DeploymentsUpdateDeletePolicy_Abandon :: DeploymentsUpdateDeletePolicy+pattern DeploymentsUpdateDeletePolicy_Abandon = DeploymentsUpdateDeletePolicy "ABANDON"++{-# COMPLETE+  DeploymentsUpdateDeletePolicy_Delete',+  DeploymentsUpdateDeletePolicy_Abandon,+  DeploymentsUpdateDeletePolicy+  #-}
+ gen/Gogol/DeploymentManager/Manifests/Get.hs view
@@ -0,0 +1,136 @@+{-# 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.DeploymentManager.Manifests.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 information about a specific manifest.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.manifests.get@.+module Gogol.DeploymentManager.Manifests.Get+  ( -- * Resource+    DeploymentManagerManifestsGetResource,++    -- ** Constructing a Request+    DeploymentManagerManifestsGet (..),+    newDeploymentManagerManifestsGet,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.manifests.get@ method which the+-- 'DeploymentManagerManifestsGet' request conforms to.+type DeploymentManagerManifestsGetResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> "manifests"+    Core.:> Core.Capture "manifest" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Manifest++-- | Gets information about a specific manifest.+--+-- /See:/ 'newDeploymentManagerManifestsGet' smart constructor.+data DeploymentManagerManifestsGet = DeploymentManagerManifestsGet+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | The name of the manifest for this request.+    manifest :: Core.Text,+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerManifestsGet' with the minimum fields required to make a request.+newDeploymentManagerManifestsGet ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  The name of the manifest for this request. See 'manifest'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerManifestsGet+newDeploymentManagerManifestsGet deployment manifest project =+  DeploymentManagerManifestsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deployment = deployment,+      headerBypassBillingFilter = Core.Nothing,+      manifest = manifest,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerManifestsGet where+  type Rs DeploymentManagerManifestsGet = Manifest+  type+    Scopes DeploymentManagerManifestsGet =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerManifestsGet {..} =+    go+      project+      deployment+      manifest+      xgafv+      accessToken+      callback+      headerBypassBillingFilter+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerManifestsGetResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Manifests/List.hs view
@@ -0,0 +1,147 @@+{-# 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.DeploymentManager.Manifests.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 all manifests for a given deployment.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.manifests.list@.+module Gogol.DeploymentManager.Manifests.List+  ( -- * Resource+    DeploymentManagerManifestsListResource,++    -- ** Constructing a Request+    DeploymentManagerManifestsList (..),+    newDeploymentManagerManifestsList,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.manifests.list@ method which the+-- 'DeploymentManagerManifestsList' request conforms to.+type DeploymentManagerManifestsListResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> "manifests"+    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 "maxResults" Core.Word32+    Core.:> Core.QueryParam "orderBy" Core.Text+    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] ManifestsListResponse++-- | Lists all manifests for a given deployment.+--+-- /See:/ 'newDeploymentManagerManifestsList' smart constructor.+data DeploymentManagerManifestsList = DeploymentManagerManifestsList+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    -- | A filter expression that filters resources listed in the response. Most Compute resources support two types of filter expressions: expressions that support regular expressions and expressions that follow API improvement proposal AIP-160. These two types of filter expressions cannot be mixed in one request. If you want to use AIP-160, your expression must specify the field name, an operator, and the value that you want to use for filtering. The value must be a string, a number, or a boolean. The operator must be either @=@, @!=@, @>@, @\<@, @\<=@, @>=@ or @:@. For example, if you are filtering Compute Engine instances, you can exclude instances named @example-instance@ by specifying @name != example-instance@. The @:*@ comparison can be used to test whether a key has been defined. For example, to find all objects with @owner@ label use: @labels.owner:*@ You can also filter nested fields. For example, you could specify @scheduling.automaticRestart = false@ to include instances only if they are not scheduled for+    -- automatic restarts. You can use filtering on nested fields to filter based on resource labels. To filter on multiple expressions, provide each separate expression within parentheses. For example: @(scheduling.automaticRestart = true) (cpuPlatform = \"Intel Skylake\")@ By default, each expression is an @AND@ expression. However, you can include @AND@ and @OR@ expressions explicitly. For example: @(cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel Broadwell\") AND (scheduling.automaticRestart = true)@ If you want to use a regular expression, use the @eq@ (equal) or @ne@ (not equal) operator against a single un-parenthesized expression with or without quotes or against multiple parenthesized expressions. Examples: @fieldname eq unquoted literal@ @fieldname eq \'single quoted literal\'@ @fieldname eq \"double quoted literal\"@ @(fieldname1 eq literal) (fieldname2 ne \"literal\")@ The literal value is interpreted as a regular expression using Google RE2 library syntax. The literal value must match the+    -- entire field. For example, to filter for instances that do not end with name \"instance\", you would use @name ne .*instance@. You cannot combine constraints on multiple fields using regular expressions.+    filter :: (Core.Maybe Core.Text),+    -- | The maximum number of results per page that should be returned. If the number of available results is larger than @maxResults@, Compute Engine returns a @nextPageToken@ that can be used to get the next page of results in subsequent list requests. Acceptable values are @0@ to @500@, inclusive. (Default: @500@)+    maxResults :: Core.Word32,+    -- | Sorts list results by a certain order. By default, results are returned in alphanumerical order based on the resource name. You can also sort results in descending order based on the creation timestamp using @orderBy=\"creationTimestamp desc\"@. This sorts results based on the @creationTimestamp@ field in reverse chronological order (newest result first). Use this to sort resources like operations so that the newest operation is returned first. Currently, only sorting by @name@ or @creationTimestamp desc@ is supported.+    orderBy :: (Core.Maybe Core.Text),+    -- | Specifies a page token to use. Set @pageToken@ to the @nextPageToken@ returned by a previous list request to get the next page of results.+    pageToken :: (Core.Maybe Core.Text),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerManifestsList' with the minimum fields required to make a request.+newDeploymentManagerManifestsList ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerManifestsList+newDeploymentManagerManifestsList deployment project =+  DeploymentManagerManifestsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deployment = deployment,+      filter = Core.Nothing,+      maxResults = 500,+      orderBy = Core.Nothing,+      pageToken = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerManifestsList where+  type Rs DeploymentManagerManifestsList = ManifestsListResponse+  type+    Scopes DeploymentManagerManifestsList =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerManifestsList {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      filter+      (Core.Just maxResults)+      orderBy+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerManifestsListResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Operations/Get.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.DeploymentManager.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 information about a specific operation.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.operations.get@.+module Gogol.DeploymentManager.Operations.Get+  ( -- * Resource+    DeploymentManagerOperationsGetResource,++    -- ** Constructing a Request+    DeploymentManagerOperationsGet (..),+    newDeploymentManagerOperationsGet,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.operations.get@ method which the+-- 'DeploymentManagerOperationsGet' request conforms to.+type DeploymentManagerOperationsGetResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "operations"+    Core.:> Core.Capture "operation" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    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 information about a specific operation.+--+-- /See:/ 'newDeploymentManagerOperationsGet' smart constructor.+data DeploymentManagerOperationsGet = DeploymentManagerOperationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | The name of the operation for this request.+    operation :: Core.Text,+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerOperationsGet' with the minimum fields required to make a request.+newDeploymentManagerOperationsGet ::+  -- |  The name of the operation for this request. See 'operation'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerOperationsGet+newDeploymentManagerOperationsGet operation project =+  DeploymentManagerOperationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      headerBypassBillingFilter = Core.Nothing,+      operation = operation,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerOperationsGet where+  type Rs DeploymentManagerOperationsGet = Operation+  type+    Scopes DeploymentManagerOperationsGet =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerOperationsGet {..} =+    go+      project+      operation+      xgafv+      accessToken+      callback+      headerBypassBillingFilter+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerOperationsGetResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Operations/List.hs view
@@ -0,0 +1,139 @@+{-# 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.DeploymentManager.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 all operations for a project.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.operations.list@.+module Gogol.DeploymentManager.Operations.List+  ( -- * Resource+    DeploymentManagerOperationsListResource,++    -- ** Constructing a Request+    DeploymentManagerOperationsList (..),+    newDeploymentManagerOperationsList,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.operations.list@ method which the+-- 'DeploymentManagerOperationsList' request conforms to.+type DeploymentManagerOperationsListResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    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 "maxResults" Core.Word32+    Core.:> Core.QueryParam "orderBy" Core.Text+    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] OperationsListResponse++-- | Lists all operations for a project.+--+-- /See:/ 'newDeploymentManagerOperationsList' smart constructor.+data DeploymentManagerOperationsList = DeploymentManagerOperationsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | A filter expression that filters resources listed in the response. Most Compute resources support two types of filter expressions: expressions that support regular expressions and expressions that follow API improvement proposal AIP-160. These two types of filter expressions cannot be mixed in one request. If you want to use AIP-160, your expression must specify the field name, an operator, and the value that you want to use for filtering. The value must be a string, a number, or a boolean. The operator must be either @=@, @!=@, @>@, @\<@, @\<=@, @>=@ or @:@. For example, if you are filtering Compute Engine instances, you can exclude instances named @example-instance@ by specifying @name != example-instance@. The @:*@ comparison can be used to test whether a key has been defined. For example, to find all objects with @owner@ label use: @labels.owner:*@ You can also filter nested fields. For example, you could specify @scheduling.automaticRestart = false@ to include instances only if they are not scheduled for+    -- automatic restarts. You can use filtering on nested fields to filter based on resource labels. To filter on multiple expressions, provide each separate expression within parentheses. For example: @(scheduling.automaticRestart = true) (cpuPlatform = \"Intel Skylake\")@ By default, each expression is an @AND@ expression. However, you can include @AND@ and @OR@ expressions explicitly. For example: @(cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel Broadwell\") AND (scheduling.automaticRestart = true)@ If you want to use a regular expression, use the @eq@ (equal) or @ne@ (not equal) operator against a single un-parenthesized expression with or without quotes or against multiple parenthesized expressions. Examples: @fieldname eq unquoted literal@ @fieldname eq \'single quoted literal\'@ @fieldname eq \"double quoted literal\"@ @(fieldname1 eq literal) (fieldname2 ne \"literal\")@ The literal value is interpreted as a regular expression using Google RE2 library syntax. The literal value must match the+    -- entire field. For example, to filter for instances that do not end with name \"instance\", you would use @name ne .*instance@. You cannot combine constraints on multiple fields using regular expressions.+    filter :: (Core.Maybe Core.Text),+    -- | The maximum number of results per page that should be returned. If the number of available results is larger than @maxResults@, Compute Engine returns a @nextPageToken@ that can be used to get the next page of results in subsequent list requests. Acceptable values are @0@ to @500@, inclusive. (Default: @500@)+    maxResults :: Core.Word32,+    -- | Sorts list results by a certain order. By default, results are returned in alphanumerical order based on the resource name. You can also sort results in descending order based on the creation timestamp using @orderBy=\"creationTimestamp desc\"@. This sorts results based on the @creationTimestamp@ field in reverse chronological order (newest result first). Use this to sort resources like operations so that the newest operation is returned first. Currently, only sorting by @name@ or @creationTimestamp desc@ is supported.+    orderBy :: (Core.Maybe Core.Text),+    -- | Specifies a page token to use. Set @pageToken@ to the @nextPageToken@ returned by a previous list request to get the next page of results.+    pageToken :: (Core.Maybe Core.Text),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerOperationsList' with the minimum fields required to make a request.+newDeploymentManagerOperationsList ::+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerOperationsList+newDeploymentManagerOperationsList project =+  DeploymentManagerOperationsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      maxResults = 500,+      orderBy = Core.Nothing,+      pageToken = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerOperationsList where+  type Rs DeploymentManagerOperationsList = OperationsListResponse+  type+    Scopes DeploymentManagerOperationsList =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerOperationsList {..} =+    go+      project+      xgafv+      accessToken+      callback+      filter+      (Core.Just maxResults)+      orderBy+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerOperationsListResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Resources/Get.hs view
@@ -0,0 +1,136 @@+{-# 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.DeploymentManager.Resources.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 information about a single resource.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.resources.get@.+module Gogol.DeploymentManager.Resources.Get+  ( -- * Resource+    DeploymentManagerResourcesGetResource,++    -- ** Constructing a Request+    DeploymentManagerResourcesGet (..),+    newDeploymentManagerResourcesGet,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.resources.get@ method which the+-- 'DeploymentManagerResourcesGet' request conforms to.+type DeploymentManagerResourcesGetResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> "resources"+    Core.:> Core.Capture "resource" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "header.bypassBillingFilter" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Resource++-- | Gets information about a single resource.+--+-- /See:/ 'newDeploymentManagerResourcesGet' smart constructor.+data DeploymentManagerResourcesGet = DeploymentManagerResourcesGet+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    headerBypassBillingFilter :: (Core.Maybe Core.Bool),+    -- | The project ID for this request.+    project :: Core.Text,+    -- | The name of the resource for this request.+    resource :: 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 'DeploymentManagerResourcesGet' with the minimum fields required to make a request.+newDeploymentManagerResourcesGet ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  -- |  The name of the resource for this request. See 'resource'.+  Core.Text ->+  DeploymentManagerResourcesGet+newDeploymentManagerResourcesGet deployment project resource =+  DeploymentManagerResourcesGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deployment = deployment,+      headerBypassBillingFilter = Core.Nothing,+      project = project,+      resource = resource,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerResourcesGet where+  type Rs DeploymentManagerResourcesGet = Resource+  type+    Scopes DeploymentManagerResourcesGet =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerResourcesGet {..} =+    go+      project+      deployment+      resource+      xgafv+      accessToken+      callback+      headerBypassBillingFilter+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerResourcesGetResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Resources/List.hs view
@@ -0,0 +1,147 @@+{-# 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.DeploymentManager.Resources.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 all resources in a given deployment.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.resources.list@.+module Gogol.DeploymentManager.Resources.List+  ( -- * Resource+    DeploymentManagerResourcesListResource,++    -- ** Constructing a Request+    DeploymentManagerResourcesList (..),+    newDeploymentManagerResourcesList,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.resources.list@ method which the+-- 'DeploymentManagerResourcesList' request conforms to.+type DeploymentManagerResourcesListResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "deployments"+    Core.:> Core.Capture "deployment" Core.Text+    Core.:> "resources"+    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 "maxResults" Core.Word32+    Core.:> Core.QueryParam "orderBy" Core.Text+    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] ResourcesListResponse++-- | Lists all resources in a given deployment.+--+-- /See:/ 'newDeploymentManagerResourcesList' smart constructor.+data DeploymentManagerResourcesList = DeploymentManagerResourcesList+  { -- | 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 deployment for this request.+    deployment :: Core.Text,+    -- | A filter expression that filters resources listed in the response. Most Compute resources support two types of filter expressions: expressions that support regular expressions and expressions that follow API improvement proposal AIP-160. These two types of filter expressions cannot be mixed in one request. If you want to use AIP-160, your expression must specify the field name, an operator, and the value that you want to use for filtering. The value must be a string, a number, or a boolean. The operator must be either @=@, @!=@, @>@, @\<@, @\<=@, @>=@ or @:@. For example, if you are filtering Compute Engine instances, you can exclude instances named @example-instance@ by specifying @name != example-instance@. The @:*@ comparison can be used to test whether a key has been defined. For example, to find all objects with @owner@ label use: @labels.owner:*@ You can also filter nested fields. For example, you could specify @scheduling.automaticRestart = false@ to include instances only if they are not scheduled for+    -- automatic restarts. You can use filtering on nested fields to filter based on resource labels. To filter on multiple expressions, provide each separate expression within parentheses. For example: @(scheduling.automaticRestart = true) (cpuPlatform = \"Intel Skylake\")@ By default, each expression is an @AND@ expression. However, you can include @AND@ and @OR@ expressions explicitly. For example: @(cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel Broadwell\") AND (scheduling.automaticRestart = true)@ If you want to use a regular expression, use the @eq@ (equal) or @ne@ (not equal) operator against a single un-parenthesized expression with or without quotes or against multiple parenthesized expressions. Examples: @fieldname eq unquoted literal@ @fieldname eq \'single quoted literal\'@ @fieldname eq \"double quoted literal\"@ @(fieldname1 eq literal) (fieldname2 ne \"literal\")@ The literal value is interpreted as a regular expression using Google RE2 library syntax. The literal value must match the+    -- entire field. For example, to filter for instances that do not end with name \"instance\", you would use @name ne .*instance@. You cannot combine constraints on multiple fields using regular expressions.+    filter :: (Core.Maybe Core.Text),+    -- | The maximum number of results per page that should be returned. If the number of available results is larger than @maxResults@, Compute Engine returns a @nextPageToken@ that can be used to get the next page of results in subsequent list requests. Acceptable values are @0@ to @500@, inclusive. (Default: @500@)+    maxResults :: Core.Word32,+    -- | Sorts list results by a certain order. By default, results are returned in alphanumerical order based on the resource name. You can also sort results in descending order based on the creation timestamp using @orderBy=\"creationTimestamp desc\"@. This sorts results based on the @creationTimestamp@ field in reverse chronological order (newest result first). Use this to sort resources like operations so that the newest operation is returned first. Currently, only sorting by @name@ or @creationTimestamp desc@ is supported.+    orderBy :: (Core.Maybe Core.Text),+    -- | Specifies a page token to use. Set @pageToken@ to the @nextPageToken@ returned by a previous list request to get the next page of results.+    pageToken :: (Core.Maybe Core.Text),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerResourcesList' with the minimum fields required to make a request.+newDeploymentManagerResourcesList ::+  -- |  The name of the deployment for this request. See 'deployment'.+  Core.Text ->+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerResourcesList+newDeploymentManagerResourcesList deployment project =+  DeploymentManagerResourcesList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      deployment = deployment,+      filter = Core.Nothing,+      maxResults = 500,+      orderBy = Core.Nothing,+      pageToken = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerResourcesList where+  type Rs DeploymentManagerResourcesList = ResourcesListResponse+  type+    Scopes DeploymentManagerResourcesList =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerResourcesList {..} =+    go+      project+      deployment+      xgafv+      accessToken+      callback+      filter+      (Core.Just maxResults)+      orderBy+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerResourcesListResource)+          Core.mempty
+ gen/Gogol/DeploymentManager/Types.hs view
@@ -0,0 +1,340 @@+{-# 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.DeploymentManager.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.DeploymentManager.Types+  ( -- * Configuration+    deploymentManagerService,++    -- * OAuth Scopes+    CloudPlatform'FullControl,+    CloudPlatform'ReadOnly,+    Ndev'Cloudman,+    Ndev'Cloudman'Readonly,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** AuditConfig+    AuditConfig (..),+    newAuditConfig,++    -- ** AuditLogConfig+    AuditLogConfig (..),+    newAuditLogConfig,++    -- ** AuditLogConfig_LogType+    AuditLogConfig_LogType (..),++    -- ** Binding+    Binding (..),+    newBinding,++    -- ** BulkInsertOperationStatus+    BulkInsertOperationStatus (..),+    newBulkInsertOperationStatus,++    -- ** BulkInsertOperationStatus_Status+    BulkInsertOperationStatus_Status (..),++    -- ** ConfigFile+    ConfigFile (..),+    newConfigFile,++    -- ** DebugInfo+    DebugInfo (..),+    newDebugInfo,++    -- ** Deployment+    Deployment (..),+    newDeployment,++    -- ** DeploymentLabelEntry+    DeploymentLabelEntry (..),+    newDeploymentLabelEntry,++    -- ** DeploymentUpdate+    DeploymentUpdate (..),+    newDeploymentUpdate,++    -- ** DeploymentUpdateLabelEntry+    DeploymentUpdateLabelEntry (..),+    newDeploymentUpdateLabelEntry,++    -- ** DeploymentsCancelPreviewRequest+    DeploymentsCancelPreviewRequest (..),+    newDeploymentsCancelPreviewRequest,++    -- ** DeploymentsListResponse+    DeploymentsListResponse (..),+    newDeploymentsListResponse,++    -- ** DeploymentsStopRequest+    DeploymentsStopRequest (..),+    newDeploymentsStopRequest,++    -- ** ErrorInfo+    ErrorInfo (..),+    newErrorInfo,++    -- ** ErrorInfo_Metadatas+    ErrorInfo_Metadatas (..),+    newErrorInfo_Metadatas,++    -- ** Expr+    Expr (..),+    newExpr,++    -- ** GlobalSetPolicyRequest+    GlobalSetPolicyRequest (..),+    newGlobalSetPolicyRequest,++    -- ** Help+    Help (..),+    newHelp,++    -- ** HelpLink+    HelpLink (..),+    newHelpLink,++    -- ** ImportFile+    ImportFile (..),+    newImportFile,++    -- ** InstancesBulkInsertOperationMetadata+    InstancesBulkInsertOperationMetadata (..),+    newInstancesBulkInsertOperationMetadata,++    -- ** InstancesBulkInsertOperationMetadata_PerLocationStatus+    InstancesBulkInsertOperationMetadata_PerLocationStatus (..),+    newInstancesBulkInsertOperationMetadata_PerLocationStatus,++    -- ** LocalizedMessage+    LocalizedMessage (..),+    newLocalizedMessage,++    -- ** Manifest+    Manifest (..),+    newManifest,++    -- ** ManifestsListResponse+    ManifestsListResponse (..),+    newManifestsListResponse,++    -- ** Operation+    Operation (..),+    newOperation,++    -- ** Operation_Error+    Operation_Error (..),+    newOperation_Error,++    -- ** Operation_Error_ErrorsItem+    Operation_Error_ErrorsItem (..),+    newOperation_Error_ErrorsItem,++    -- ** Operation_Error_ErrorsItem_ErrorDetailsItem+    Operation_Error_ErrorsItem_ErrorDetailsItem (..),+    newOperation_Error_ErrorsItem_ErrorDetailsItem,++    -- ** Operation_Status+    Operation_Status (..),++    -- ** Operation_WarningsItem+    Operation_WarningsItem (..),+    newOperation_WarningsItem,++    -- ** Operation_WarningsItem_Code+    Operation_WarningsItem_Code (..),++    -- ** Operation_WarningsItem_DataItem+    Operation_WarningsItem_DataItem (..),+    newOperation_WarningsItem_DataItem,++    -- ** OperationsListResponse+    OperationsListResponse (..),+    newOperationsListResponse,++    -- ** Policy+    Policy (..),+    newPolicy,++    -- ** QuotaExceededInfo+    QuotaExceededInfo (..),+    newQuotaExceededInfo,++    -- ** QuotaExceededInfo_Dimensions+    QuotaExceededInfo_Dimensions (..),+    newQuotaExceededInfo_Dimensions,++    -- ** QuotaExceededInfo_RolloutStatus+    QuotaExceededInfo_RolloutStatus (..),++    -- ** Resource+    Resource (..),+    newResource,++    -- ** Resource_WarningsItem+    Resource_WarningsItem (..),+    newResource_WarningsItem,++    -- ** Resource_WarningsItem_Code+    Resource_WarningsItem_Code (..),++    -- ** Resource_WarningsItem_DataItem+    Resource_WarningsItem_DataItem (..),+    newResource_WarningsItem_DataItem,++    -- ** ResourceAccessControl+    ResourceAccessControl (..),+    newResourceAccessControl,++    -- ** ResourceUpdate+    ResourceUpdate (..),+    newResourceUpdate,++    -- ** ResourceUpdate_Error+    ResourceUpdate_Error (..),+    newResourceUpdate_Error,++    -- ** ResourceUpdate_Error_ErrorsItem+    ResourceUpdate_Error_ErrorsItem (..),+    newResourceUpdate_Error_ErrorsItem,++    -- ** ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem+    ResourceUpdate_Error_ErrorsItem_ErrorDetailsItem (..),+    newResourceUpdate_Error_ErrorsItem_ErrorDetailsItem,++    -- ** ResourceUpdate_Intent+    ResourceUpdate_Intent (..),++    -- ** ResourceUpdate_State+    ResourceUpdate_State (..),++    -- ** ResourceUpdate_WarningsItem+    ResourceUpdate_WarningsItem (..),+    newResourceUpdate_WarningsItem,++    -- ** ResourceUpdate_WarningsItem_Code+    ResourceUpdate_WarningsItem_Code (..),++    -- ** ResourceUpdate_WarningsItem_DataItem+    ResourceUpdate_WarningsItem_DataItem (..),+    newResourceUpdate_WarningsItem_DataItem,++    -- ** ResourcesListResponse+    ResourcesListResponse (..),+    newResourcesListResponse,++    -- ** SetCommonInstanceMetadataOperationMetadata+    SetCommonInstanceMetadataOperationMetadata (..),+    newSetCommonInstanceMetadataOperationMetadata,++    -- ** SetCommonInstanceMetadataOperationMetadata_PerLocationOperations+    SetCommonInstanceMetadataOperationMetadata_PerLocationOperations (..),+    newSetCommonInstanceMetadataOperationMetadata_PerLocationOperations,++    -- ** SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo (..),+    newSetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo,++    -- ** SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State+    SetCommonInstanceMetadataOperationMetadataPerLocationOperationInfo_State (..),++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** TargetConfiguration+    TargetConfiguration (..),+    newTargetConfiguration,++    -- ** TestPermissionsRequest+    TestPermissionsRequest (..),+    newTestPermissionsRequest,++    -- ** TestPermissionsResponse+    TestPermissionsResponse (..),+    newTestPermissionsResponse,++    -- ** Type+    Type (..),+    newType,++    -- ** TypesListResponse+    TypesListResponse (..),+    newTypesListResponse,++    -- ** DeploymentsDeleteDeletePolicy+    DeploymentsDeleteDeletePolicy (..),++    -- ** DeploymentsInsertCreatePolicy+    DeploymentsInsertCreatePolicy (..),++    -- ** DeploymentsPatchCreatePolicy+    DeploymentsPatchCreatePolicy (..),++    -- ** DeploymentsPatchDeletePolicy+    DeploymentsPatchDeletePolicy (..),++    -- ** DeploymentsUpdateCreatePolicy+    DeploymentsUpdateCreatePolicy (..),++    -- ** DeploymentsUpdateDeletePolicy+    DeploymentsUpdateDeletePolicy (..),+  )+where++import Gogol.DeploymentManager.Internal.Product+import Gogol.DeploymentManager.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v2@ of the Cloud Deployment Manager V2 API. This contains the host and root path used as a starting point for constructing service requests.+deploymentManagerService :: Core.ServiceConfig+deploymentManagerService =+  Core.defaultService+    (Core.ServiceId "deploymentmanager:v2")+    "deploymentmanager.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"++-- | View your data across Google Cloud services and see the email address of your Google Account+type CloudPlatform'ReadOnly =+  "https://www.googleapis.com/auth/cloud-platform.read-only"++-- | View and manage your Google Cloud Platform management resources and deployment status information+type Ndev'Cloudman =+  "https://www.googleapis.com/auth/ndev.cloudman"++-- | View your Google Cloud Platform management resources and deployment status information+type Ndev'Cloudman'Readonly =+  "https://www.googleapis.com/auth/ndev.cloudman.readonly"
+ gen/Gogol/DeploymentManager/Types/List.hs view
@@ -0,0 +1,139 @@+{-# 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.DeploymentManager.Types.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 all resource types for Deployment Manager.+--+-- /See:/ <https://cloud.google.com/deployment-manager Cloud Deployment Manager V2 API Reference> for @deploymentmanager.types.list@.+module Gogol.DeploymentManager.Types.List+  ( -- * Resource+    DeploymentManagerTypesListResource,++    -- ** Constructing a Request+    DeploymentManagerTypesList (..),+    newDeploymentManagerTypesList,+  )+where++import Gogol.DeploymentManager.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @deploymentmanager.types.list@ method which the+-- 'DeploymentManagerTypesList' request conforms to.+type DeploymentManagerTypesListResource =+  "deploymentmanager"+    Core.:> "v2"+    Core.:> "projects"+    Core.:> Core.Capture "project" Core.Text+    Core.:> "global"+    Core.:> "types"+    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 "maxResults" Core.Word32+    Core.:> Core.QueryParam "orderBy" Core.Text+    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] TypesListResponse++-- | Lists all resource types for Deployment Manager.+--+-- /See:/ 'newDeploymentManagerTypesList' smart constructor.+data DeploymentManagerTypesList = DeploymentManagerTypesList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | A filter expression that filters resources listed in the response. Most Compute resources support two types of filter expressions: expressions that support regular expressions and expressions that follow API improvement proposal AIP-160. These two types of filter expressions cannot be mixed in one request. If you want to use AIP-160, your expression must specify the field name, an operator, and the value that you want to use for filtering. The value must be a string, a number, or a boolean. The operator must be either @=@, @!=@, @>@, @\<@, @\<=@, @>=@ or @:@. For example, if you are filtering Compute Engine instances, you can exclude instances named @example-instance@ by specifying @name != example-instance@. The @:*@ comparison can be used to test whether a key has been defined. For example, to find all objects with @owner@ label use: @labels.owner:*@ You can also filter nested fields. For example, you could specify @scheduling.automaticRestart = false@ to include instances only if they are not scheduled for+    -- automatic restarts. You can use filtering on nested fields to filter based on resource labels. To filter on multiple expressions, provide each separate expression within parentheses. For example: @(scheduling.automaticRestart = true) (cpuPlatform = \"Intel Skylake\")@ By default, each expression is an @AND@ expression. However, you can include @AND@ and @OR@ expressions explicitly. For example: @(cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel Broadwell\") AND (scheduling.automaticRestart = true)@ If you want to use a regular expression, use the @eq@ (equal) or @ne@ (not equal) operator against a single un-parenthesized expression with or without quotes or against multiple parenthesized expressions. Examples: @fieldname eq unquoted literal@ @fieldname eq \'single quoted literal\'@ @fieldname eq \"double quoted literal\"@ @(fieldname1 eq literal) (fieldname2 ne \"literal\")@ The literal value is interpreted as a regular expression using Google RE2 library syntax. The literal value must match the+    -- entire field. For example, to filter for instances that do not end with name \"instance\", you would use @name ne .*instance@. You cannot combine constraints on multiple fields using regular expressions.+    filter :: (Core.Maybe Core.Text),+    -- | The maximum number of results per page that should be returned. If the number of available results is larger than @maxResults@, Compute Engine returns a @nextPageToken@ that can be used to get the next page of results in subsequent list requests. Acceptable values are @0@ to @500@, inclusive. (Default: @500@)+    maxResults :: Core.Word32,+    -- | Sorts list results by a certain order. By default, results are returned in alphanumerical order based on the resource name. You can also sort results in descending order based on the creation timestamp using @orderBy=\"creationTimestamp desc\"@. This sorts results based on the @creationTimestamp@ field in reverse chronological order (newest result first). Use this to sort resources like operations so that the newest operation is returned first. Currently, only sorting by @name@ or @creationTimestamp desc@ is supported.+    orderBy :: (Core.Maybe Core.Text),+    -- | Specifies a page token to use. Set @pageToken@ to the @nextPageToken@ returned by a previous list request to get the next page of results.+    pageToken :: (Core.Maybe Core.Text),+    -- | The project ID for this request.+    project :: 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 'DeploymentManagerTypesList' with the minimum fields required to make a request.+newDeploymentManagerTypesList ::+  -- |  The project ID for this request. See 'project'.+  Core.Text ->+  DeploymentManagerTypesList+newDeploymentManagerTypesList project =+  DeploymentManagerTypesList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      maxResults = 500,+      orderBy = Core.Nothing,+      pageToken = Core.Nothing,+      project = project,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DeploymentManagerTypesList where+  type Rs DeploymentManagerTypesList = TypesListResponse+  type+    Scopes DeploymentManagerTypesList =+      '[ CloudPlatform'FullControl,+         CloudPlatform'ReadOnly,+         Ndev'Cloudman,+         Ndev'Cloudman'Readonly+       ]+  requestClient DeploymentManagerTypesList {..} =+    go+      project+      xgafv+      accessToken+      callback+      filter+      (Core.Just maxResults)+      orderBy+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      deploymentManagerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DeploymentManagerTypesListResource)+          Core.mempty
− gen/Network/Google/DeploymentManager.hs 
@@ -1,495 +0,0 @@-{-# LANGUAGE DataKinds         #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators     #-}--{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module      : Network.Google.DeploymentManager--- 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)------ Declares, configures, and deploys complex solutions on Google Cloud--- Platform.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference>-module Network.Google.DeploymentManager-    (-    -- * Service Configuration-      deploymentManagerService--    -- * OAuth Scopes-    , cloudPlatformReadOnlyScope-    , cloudPlatformScope-    , ndevCloudmanScope-    , ndevCloudmanReadOnlyScope--    -- * API Declaration-    , DeploymentManagerAPI--    -- * Resources--    -- ** deploymentmanager.deployments.cancelPreview-    , module Network.Google.Resource.DeploymentManager.Deployments.CancelPreview--    -- ** deploymentmanager.deployments.delete-    , module Network.Google.Resource.DeploymentManager.Deployments.Delete--    -- ** deploymentmanager.deployments.get-    , module Network.Google.Resource.DeploymentManager.Deployments.Get--    -- ** deploymentmanager.deployments.getIamPolicy-    , module Network.Google.Resource.DeploymentManager.Deployments.GetIAMPolicy--    -- ** deploymentmanager.deployments.insert-    , module Network.Google.Resource.DeploymentManager.Deployments.Insert--    -- ** deploymentmanager.deployments.list-    , module Network.Google.Resource.DeploymentManager.Deployments.List--    -- ** deploymentmanager.deployments.patch-    , module Network.Google.Resource.DeploymentManager.Deployments.Patch--    -- ** deploymentmanager.deployments.setIamPolicy-    , module Network.Google.Resource.DeploymentManager.Deployments.SetIAMPolicy--    -- ** deploymentmanager.deployments.stop-    , module Network.Google.Resource.DeploymentManager.Deployments.Stop--    -- ** deploymentmanager.deployments.testIamPermissions-    , module Network.Google.Resource.DeploymentManager.Deployments.TestIAMPermissions--    -- ** deploymentmanager.deployments.update-    , module Network.Google.Resource.DeploymentManager.Deployments.Update--    -- ** deploymentmanager.manifests.get-    , module Network.Google.Resource.DeploymentManager.Manifests.Get--    -- ** deploymentmanager.manifests.list-    , module Network.Google.Resource.DeploymentManager.Manifests.List--    -- ** deploymentmanager.operations.get-    , module Network.Google.Resource.DeploymentManager.Operations.Get--    -- ** deploymentmanager.operations.list-    , module Network.Google.Resource.DeploymentManager.Operations.List--    -- ** deploymentmanager.resources.get-    , module Network.Google.Resource.DeploymentManager.Resources.Get--    -- ** deploymentmanager.resources.list-    , module Network.Google.Resource.DeploymentManager.Resources.List--    -- ** deploymentmanager.types.list-    , module Network.Google.Resource.DeploymentManager.Types.List--    -- * Types--    -- ** OperationWarningsItemDataItem-    , OperationWarningsItemDataItem-    , operationWarningsItemDataItem-    , owidiValue-    , owidiKey--    -- ** ConfigFile-    , ConfigFile-    , configFile-    , cfContent--    -- ** AuditConfig-    , AuditConfig-    , auditConfig-    , acService-    , acAuditLogConfigs-    , acExemptedMembers--    -- ** DeploymentsUpdateCreatePolicy-    , DeploymentsUpdateCreatePolicy (..)--    -- ** Expr-    , Expr-    , expr-    , eLocation-    , eExpression-    , eTitle-    , eDescription--    -- ** OperationsListResponse-    , OperationsListResponse-    , operationsListResponse-    , olrNextPageToken-    , olrOperations--    -- ** ResourceUpdateWarningsItemDataItem-    , ResourceUpdateWarningsItemDataItem-    , resourceUpdateWarningsItemDataItem-    , ruwidiValue-    , ruwidiKey--    -- ** DeploymentsDeleteDeletePolicy-    , DeploymentsDeleteDeletePolicy (..)--    -- ** TypesListResponse-    , TypesListResponse-    , typesListResponse-    , tlrNextPageToken-    , tlrTypes--    -- ** LogConfigCounterOptions-    , LogConfigCounterOptions-    , logConfigCounterOptions-    , lccoField-    , lccoMetric--    -- ** DeploymentsUpdateDeletePolicy-    , DeploymentsUpdateDeletePolicy (..)--    -- ** DeploymentsPatchDeletePolicy-    , DeploymentsPatchDeletePolicy (..)--    -- ** Operation-    , Operation-    , operation-    , oTargetId-    , oStatus-    , oInsertTime-    , oProgress-    , oStartTime-    , oKind-    , oError-    , oHTTPErrorMessage-    , oZone-    , oWarnings-    , oHTTPErrorStatusCode-    , oUser-    , oSelfLink-    , oName-    , oStatusMessage-    , oCreationTimestamp-    , oEndTime-    , oId-    , oOperationType-    , oRegion-    , oDescription-    , oTargetLink-    , oClientOperationId--    -- ** TestPermissionsResponse-    , TestPermissionsResponse-    , testPermissionsResponse-    , tprPermissions--    -- ** DeploymentsPatchCreatePolicy-    , DeploymentsPatchCreatePolicy (..)--    -- ** ResourcesListResponse-    , ResourcesListResponse-    , resourcesListResponse-    , rlrNextPageToken-    , rlrResources--    -- ** DeploymentUpdate-    , DeploymentUpdate-    , deploymentUpdate-    , duManifest-    , duLabels-    , duDescription--    -- ** ResourceUpdate-    , ResourceUpdate-    , resourceUpdate-    , ruState-    , ruError-    , ruAccessControl-    , ruWarnings-    , ruIntent-    , ruManifest-    , ruFinalProperties-    , ruProperties--    -- ** DeploymentLabelEntry-    , DeploymentLabelEntry-    , deploymentLabelEntry-    , dleValue-    , dleKey--    -- ** Rule-    , Rule-    , rule-    , rAction-    , rNotIns-    , rIns-    , rLogConfigs-    , rConditions-    , rPermissions-    , rDescription--    -- ** TestPermissionsRequest-    , TestPermissionsRequest-    , testPermissionsRequest-    , tPermissions--    -- ** Manifest-    , Manifest-    , manifest-    , mInsertTime-    , mLayout-    , mConfig-    , mExpandedConfig-    , mImports-    , mSelfLink-    , mName-    , mId--    -- ** ResourceUpdateWarningsItem-    , ResourceUpdateWarningsItem-    , resourceUpdateWarningsItem-    , ruwiData-    , ruwiCode-    , ruwiMessage--    -- ** DeploymentsCancelPreviewRequest-    , DeploymentsCancelPreviewRequest-    , deploymentsCancelPreviewRequest-    , dcprFingerprint--    -- ** LogConfigCloudAuditOptions-    , LogConfigCloudAuditOptions-    , logConfigCloudAuditOptions-    , lccaoAuthorizationLoggingOptions-    , lccaoLogName--    -- ** Resource-    , Resource-    , resource-    , rInsertTime-    , rAccessControl-    , rURL-    , rWarnings-    , rUpdateTime-    , rName-    , rManifest-    , rFinalProperties-    , rId-    , rType-    , rUpdate-    , rProperties--    -- ** LogConfigDataAccessOptions-    , LogConfigDataAccessOptions-    , logConfigDataAccessOptions-    , lcdaoLogMode--    -- ** DeploymentUpdateLabelEntry-    , DeploymentUpdateLabelEntry-    , deploymentUpdateLabelEntry-    , duleValue-    , duleKey--    -- ** ResourceUpdateErrorErrorsItem-    , ResourceUpdateErrorErrorsItem-    , resourceUpdateErrorErrorsItem-    , rueeiLocation-    , rueeiCode-    , rueeiMessage--    -- ** ManifestsListResponse-    , ManifestsListResponse-    , manifestsListResponse-    , mlrNextPageToken-    , mlrManifests--    -- ** OperationError-    , OperationError-    , operationError-    , oeErrors--    -- ** GlobalSetPolicyRequest-    , GlobalSetPolicyRequest-    , globalSetPolicyRequest-    , gsprEtag-    , gsprBindings-    , gsprPolicy--    -- ** AuthorizationLoggingOptions-    , AuthorizationLoggingOptions-    , authorizationLoggingOptions-    , aloPermissionType--    -- ** Policy-    , Policy-    , policy-    , pAuditConfigs-    , pEtag-    , pRules-    , pVersion-    , pBindings-    , pIAMOwned--    -- ** Type-    , Type-    , type'-    , tInsertTime-    , tOperation-    , tSelfLink-    , tName-    , tId--    -- ** ImportFile-    , ImportFile-    , importFile-    , ifContent-    , ifName--    -- ** OperationErrorErrorsItem-    , OperationErrorErrorsItem-    , operationErrorErrorsItem-    , oeeiLocation-    , oeeiCode-    , oeeiMessage--    -- ** DeploymentsStopRequest-    , DeploymentsStopRequest-    , deploymentsStopRequest-    , dsrFingerprint--    -- ** ResourceWarningsItemDataItem-    , ResourceWarningsItemDataItem-    , resourceWarningsItemDataItem-    , rwidiValue-    , rwidiKey--    -- ** AuditLogConfig-    , AuditLogConfig-    , auditLogConfig-    , alcLogType-    , alcExemptedMembers--    -- ** ResourceUpdateError-    , ResourceUpdateError-    , resourceUpdateError-    , rueErrors--    -- ** Condition-    , Condition-    , condition-    , cOp-    , cIAM-    , cValues-    , cValue-    , cSys-    , cSvc--    -- ** DeploymentsListResponse-    , DeploymentsListResponse-    , deploymentsListResponse-    , dlrNextPageToken-    , dlrDeployments--    -- ** ResourceWarningsItem-    , ResourceWarningsItem-    , resourceWarningsItem-    , rwiData-    , rwiCode-    , rwiMessage--    -- ** LogConfig-    , LogConfig-    , logConfig-    , lcCloudAudit-    , lcDataAccess-    , lcCounter--    -- ** ResourceAccessControl-    , ResourceAccessControl-    , resourceAccessControl-    , racGcpIAMPolicy--    -- ** TargetConfiguration-    , TargetConfiguration-    , targetConfiguration-    , tcConfig-    , tcImports--    -- ** OperationWarningsItem-    , OperationWarningsItem-    , operationWarningsItem-    , owiData-    , owiCode-    , owiMessage--    -- ** Binding-    , Binding-    , binding-    , bMembers-    , bRole-    , bCondition--    -- ** Deployment-    , Deployment-    , deployment-    , dInsertTime-    , dOperation-    , dFingerprint-    , dUpdateTime-    , dSelfLink-    , dName-    , dManifest-    , dId-    , dLabels-    , dDescription-    , dUpdate-    , dTarget--    -- ** DeploymentsInsertCreatePolicy-    , DeploymentsInsertCreatePolicy (..)-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude-import           Network.Google.Resource.DeploymentManager.Deployments.CancelPreview-import           Network.Google.Resource.DeploymentManager.Deployments.Delete-import           Network.Google.Resource.DeploymentManager.Deployments.Get-import           Network.Google.Resource.DeploymentManager.Deployments.GetIAMPolicy-import           Network.Google.Resource.DeploymentManager.Deployments.Insert-import           Network.Google.Resource.DeploymentManager.Deployments.List-import           Network.Google.Resource.DeploymentManager.Deployments.Patch-import           Network.Google.Resource.DeploymentManager.Deployments.SetIAMPolicy-import           Network.Google.Resource.DeploymentManager.Deployments.Stop-import           Network.Google.Resource.DeploymentManager.Deployments.TestIAMPermissions-import           Network.Google.Resource.DeploymentManager.Deployments.Update-import           Network.Google.Resource.DeploymentManager.Manifests.Get-import           Network.Google.Resource.DeploymentManager.Manifests.List-import           Network.Google.Resource.DeploymentManager.Operations.Get-import           Network.Google.Resource.DeploymentManager.Operations.List-import           Network.Google.Resource.DeploymentManager.Resources.Get-import           Network.Google.Resource.DeploymentManager.Resources.List-import           Network.Google.Resource.DeploymentManager.Types.List--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Google Cloud Deployment Manager API service.-type DeploymentManagerAPI =-     TypesListResource :<|> ResourcesListResource :<|>-       ResourcesGetResource-       :<|> ManifestsListResource-       :<|> ManifestsGetResource-       :<|> DeploymentsInsertResource-       :<|> DeploymentsListResource-       :<|> DeploymentsGetIAMPolicyResource-       :<|> DeploymentsPatchResource-       :<|> DeploymentsGetResource-       :<|> DeploymentsCancelPreviewResource-       :<|> DeploymentsSetIAMPolicyResource-       :<|> DeploymentsStopResource-       :<|> DeploymentsTestIAMPermissionsResource-       :<|> DeploymentsDeleteResource-       :<|> DeploymentsUpdateResource-       :<|> OperationsListResource-       :<|> OperationsGetResource
− gen/Network/Google/DeploymentManager/Types.hs 
@@ -1,414 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.DeploymentManager.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.DeploymentManager.Types-    (-    -- * Service Configuration-      deploymentManagerService--    -- * OAuth Scopes-    , cloudPlatformReadOnlyScope-    , cloudPlatformScope-    , ndevCloudmanScope-    , ndevCloudmanReadOnlyScope--    -- * OperationWarningsItemDataItem-    , OperationWarningsItemDataItem-    , operationWarningsItemDataItem-    , owidiValue-    , owidiKey--    -- * ConfigFile-    , ConfigFile-    , configFile-    , cfContent--    -- * AuditConfig-    , AuditConfig-    , auditConfig-    , acService-    , acAuditLogConfigs-    , acExemptedMembers--    -- * DeploymentsUpdateCreatePolicy-    , DeploymentsUpdateCreatePolicy (..)--    -- * Expr-    , Expr-    , expr-    , eLocation-    , eExpression-    , eTitle-    , eDescription--    -- * OperationsListResponse-    , OperationsListResponse-    , operationsListResponse-    , olrNextPageToken-    , olrOperations--    -- * ResourceUpdateWarningsItemDataItem-    , ResourceUpdateWarningsItemDataItem-    , resourceUpdateWarningsItemDataItem-    , ruwidiValue-    , ruwidiKey--    -- * DeploymentsDeleteDeletePolicy-    , DeploymentsDeleteDeletePolicy (..)--    -- * TypesListResponse-    , TypesListResponse-    , typesListResponse-    , tlrNextPageToken-    , tlrTypes--    -- * LogConfigCounterOptions-    , LogConfigCounterOptions-    , logConfigCounterOptions-    , lccoField-    , lccoMetric--    -- * DeploymentsUpdateDeletePolicy-    , DeploymentsUpdateDeletePolicy (..)--    -- * DeploymentsPatchDeletePolicy-    , DeploymentsPatchDeletePolicy (..)--    -- * Operation-    , Operation-    , operation-    , oTargetId-    , oStatus-    , oInsertTime-    , oProgress-    , oStartTime-    , oKind-    , oError-    , oHTTPErrorMessage-    , oZone-    , oWarnings-    , oHTTPErrorStatusCode-    , oUser-    , oSelfLink-    , oName-    , oStatusMessage-    , oCreationTimestamp-    , oEndTime-    , oId-    , oOperationType-    , oRegion-    , oDescription-    , oTargetLink-    , oClientOperationId--    -- * TestPermissionsResponse-    , TestPermissionsResponse-    , testPermissionsResponse-    , tprPermissions--    -- * DeploymentsPatchCreatePolicy-    , DeploymentsPatchCreatePolicy (..)--    -- * ResourcesListResponse-    , ResourcesListResponse-    , resourcesListResponse-    , rlrNextPageToken-    , rlrResources--    -- * DeploymentUpdate-    , DeploymentUpdate-    , deploymentUpdate-    , duManifest-    , duLabels-    , duDescription--    -- * ResourceUpdate-    , ResourceUpdate-    , resourceUpdate-    , ruState-    , ruError-    , ruAccessControl-    , ruWarnings-    , ruIntent-    , ruManifest-    , ruFinalProperties-    , ruProperties--    -- * DeploymentLabelEntry-    , DeploymentLabelEntry-    , deploymentLabelEntry-    , dleValue-    , dleKey--    -- * Rule-    , Rule-    , rule-    , rAction-    , rNotIns-    , rIns-    , rLogConfigs-    , rConditions-    , rPermissions-    , rDescription--    -- * TestPermissionsRequest-    , TestPermissionsRequest-    , testPermissionsRequest-    , tPermissions--    -- * Manifest-    , Manifest-    , manifest-    , mInsertTime-    , mLayout-    , mConfig-    , mExpandedConfig-    , mImports-    , mSelfLink-    , mName-    , mId--    -- * ResourceUpdateWarningsItem-    , ResourceUpdateWarningsItem-    , resourceUpdateWarningsItem-    , ruwiData-    , ruwiCode-    , ruwiMessage--    -- * DeploymentsCancelPreviewRequest-    , DeploymentsCancelPreviewRequest-    , deploymentsCancelPreviewRequest-    , dcprFingerprint--    -- * LogConfigCloudAuditOptions-    , LogConfigCloudAuditOptions-    , logConfigCloudAuditOptions-    , lccaoAuthorizationLoggingOptions-    , lccaoLogName--    -- * Resource-    , Resource-    , resource-    , rInsertTime-    , rAccessControl-    , rURL-    , rWarnings-    , rUpdateTime-    , rName-    , rManifest-    , rFinalProperties-    , rId-    , rType-    , rUpdate-    , rProperties--    -- * LogConfigDataAccessOptions-    , LogConfigDataAccessOptions-    , logConfigDataAccessOptions-    , lcdaoLogMode--    -- * DeploymentUpdateLabelEntry-    , DeploymentUpdateLabelEntry-    , deploymentUpdateLabelEntry-    , duleValue-    , duleKey--    -- * ResourceUpdateErrorErrorsItem-    , ResourceUpdateErrorErrorsItem-    , resourceUpdateErrorErrorsItem-    , rueeiLocation-    , rueeiCode-    , rueeiMessage--    -- * ManifestsListResponse-    , ManifestsListResponse-    , manifestsListResponse-    , mlrNextPageToken-    , mlrManifests--    -- * OperationError-    , OperationError-    , operationError-    , oeErrors--    -- * GlobalSetPolicyRequest-    , GlobalSetPolicyRequest-    , globalSetPolicyRequest-    , gsprEtag-    , gsprBindings-    , gsprPolicy--    -- * AuthorizationLoggingOptions-    , AuthorizationLoggingOptions-    , authorizationLoggingOptions-    , aloPermissionType--    -- * Policy-    , Policy-    , policy-    , pAuditConfigs-    , pEtag-    , pRules-    , pVersion-    , pBindings-    , pIAMOwned--    -- * Type-    , Type-    , type'-    , tInsertTime-    , tOperation-    , tSelfLink-    , tName-    , tId--    -- * ImportFile-    , ImportFile-    , importFile-    , ifContent-    , ifName--    -- * OperationErrorErrorsItem-    , OperationErrorErrorsItem-    , operationErrorErrorsItem-    , oeeiLocation-    , oeeiCode-    , oeeiMessage--    -- * DeploymentsStopRequest-    , DeploymentsStopRequest-    , deploymentsStopRequest-    , dsrFingerprint--    -- * ResourceWarningsItemDataItem-    , ResourceWarningsItemDataItem-    , resourceWarningsItemDataItem-    , rwidiValue-    , rwidiKey--    -- * AuditLogConfig-    , AuditLogConfig-    , auditLogConfig-    , alcLogType-    , alcExemptedMembers--    -- * ResourceUpdateError-    , ResourceUpdateError-    , resourceUpdateError-    , rueErrors--    -- * Condition-    , Condition-    , condition-    , cOp-    , cIAM-    , cValues-    , cValue-    , cSys-    , cSvc--    -- * DeploymentsListResponse-    , DeploymentsListResponse-    , deploymentsListResponse-    , dlrNextPageToken-    , dlrDeployments--    -- * ResourceWarningsItem-    , ResourceWarningsItem-    , resourceWarningsItem-    , rwiData-    , rwiCode-    , rwiMessage--    -- * LogConfig-    , LogConfig-    , logConfig-    , lcCloudAudit-    , lcDataAccess-    , lcCounter--    -- * ResourceAccessControl-    , ResourceAccessControl-    , resourceAccessControl-    , racGcpIAMPolicy--    -- * TargetConfiguration-    , TargetConfiguration-    , targetConfiguration-    , tcConfig-    , tcImports--    -- * OperationWarningsItem-    , OperationWarningsItem-    , operationWarningsItem-    , owiData-    , owiCode-    , owiMessage--    -- * Binding-    , Binding-    , binding-    , bMembers-    , bRole-    , bCondition--    -- * Deployment-    , Deployment-    , deployment-    , dInsertTime-    , dOperation-    , dFingerprint-    , dUpdateTime-    , dSelfLink-    , dName-    , dManifest-    , dId-    , dLabels-    , dDescription-    , dUpdate-    , dTarget--    -- * DeploymentsInsertCreatePolicy-    , DeploymentsInsertCreatePolicy (..)-    ) where--import           Network.Google.DeploymentManager.Types.Product-import           Network.Google.DeploymentManager.Types.Sum-import           Network.Google.Prelude---- | Default request referring to version 'v2' of the Google Cloud Deployment Manager API. This contains the host and root path used as a starting point for constructing service requests.-deploymentManagerService :: ServiceConfig-deploymentManagerService-  = defaultService (ServiceId "deploymentmanager:v2")-      "www.googleapis.com"---- | View your data across Google Cloud Platform services-cloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]-cloudPlatformReadOnlyScope = Proxy---- | View and manage your data across Google Cloud Platform services-cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy---- | View and manage your Google Cloud Platform management resources and--- deployment status information-ndevCloudmanScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman"]-ndevCloudmanScope = Proxy---- | View your Google Cloud Platform management resources and deployment--- status information-ndevCloudmanReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman.readonly"]-ndevCloudmanReadOnlyScope = Proxy
− gen/Network/Google/DeploymentManager/Types/Product.hs 
@@ -1,3268 +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.DeploymentManager.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.DeploymentManager.Types.Product where--import           Network.Google.DeploymentManager.Types.Sum-import           Network.Google.Prelude------- /See:/ 'operationWarningsItemDataItem' smart constructor.-data OperationWarningsItemDataItem =-  OperationWarningsItemDataItem'-    { _owidiValue :: !(Maybe Text)-    , _owidiKey   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationWarningsItemDataItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'owidiValue'------ * 'owidiKey'-operationWarningsItemDataItem-    :: OperationWarningsItemDataItem-operationWarningsItemDataItem =-  OperationWarningsItemDataItem' {_owidiValue = Nothing, _owidiKey = Nothing}----- | [Output Only] A warning data value corresponding to the key.-owidiValue :: Lens' OperationWarningsItemDataItem (Maybe Text)-owidiValue-  = lens _owidiValue (\ s a -> s{_owidiValue = a})---- | [Output Only] A key that provides more detail on the warning being--- returned. For example, for warnings where there are no results in a list--- request for a particular zone, this key might be scope and the key value--- might be the zone name. Other examples might be a key indicating a--- deprecated resource and a suggested replacement, or a warning about--- invalid network settings (for example, if an instance attempts to--- perform IP forwarding but is not enabled for IP forwarding).-owidiKey :: Lens' OperationWarningsItemDataItem (Maybe Text)-owidiKey = lens _owidiKey (\ s a -> s{_owidiKey = a})--instance FromJSON OperationWarningsItemDataItem where-        parseJSON-          = withObject "OperationWarningsItemDataItem"-              (\ o ->-                 OperationWarningsItemDataItem' <$>-                   (o .:? "value") <*> (o .:? "key"))--instance ToJSON OperationWarningsItemDataItem where-        toJSON OperationWarningsItemDataItem'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _owidiValue,-                  ("key" .=) <$> _owidiKey])---- |------ /See:/ 'configFile' smart constructor.-newtype ConfigFile =-  ConfigFile'-    { _cfContent :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfigFile' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfContent'-configFile-    :: ConfigFile-configFile = ConfigFile' {_cfContent = Nothing}----- | The contents of the file.-cfContent :: Lens' ConfigFile (Maybe Text)-cfContent-  = lens _cfContent (\ s a -> s{_cfContent = a})--instance FromJSON ConfigFile where-        parseJSON-          = withObject "ConfigFile"-              (\ o -> ConfigFile' <$> (o .:? "content"))--instance ToJSON ConfigFile where-        toJSON ConfigFile'{..}-          = object (catMaybes [("content" .=) <$> _cfContent])---- | Specifies the audit configuration for a service. The configuration--- determines which permission types are logged, and what identities, if--- any, are exempted from logging. An AuditConfig must have one or more--- AuditLogConfigs. If there are AuditConfigs for both \`allServices\` and--- a specific service, the union of the two AuditConfigs is used for that--- service: the log_types specified in each AuditConfig are enabled, and--- the exempted_members in each AuditLogConfig are exempted. Example Policy--- with multiple AuditConfigs: { \"audit_configs\": [ { \"service\":--- \"allServices\" \"audit_log_configs\": [ { \"log_type\": \"DATA_READ\",--- \"exempted_members\": [ \"user:foo\'gmail.com\" ] }, { \"log_type\":--- \"DATA_WRITE\", }, { \"log_type\": \"ADMIN_READ\", } ] }, { \"service\":--- \"fooservice.googleapis.com\" \"audit_log_configs\": [ { \"log_type\":--- \"DATA_READ\", }, { \"log_type\": \"DATA_WRITE\", \"exempted_members\":--- [ \"user:bar\'gmail.com\" ] } ] } ] } For fooservice, this policy--- enables DATA_READ, DATA_WRITE and ADMIN_READ logging. It also exempts--- foo\'gmail.com from DATA_READ logging, and bar\'gmail.com from--- DATA_WRITE logging.------ /See:/ 'auditConfig' smart constructor.-data AuditConfig =-  AuditConfig'-    { _acService         :: !(Maybe Text)-    , _acAuditLogConfigs :: !(Maybe [AuditLogConfig])-    , _acExemptedMembers :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AuditConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'acService'------ * 'acAuditLogConfigs'------ * 'acExemptedMembers'-auditConfig-    :: AuditConfig-auditConfig =-  AuditConfig'-    { _acService = Nothing-    , _acAuditLogConfigs = Nothing-    , _acExemptedMembers = Nothing-    }----- | Specifies a service that will be enabled for audit logging. For example,--- \`storage.googleapis.com\`, \`cloudsql.googleapis.com\`. \`allServices\`--- is a special value that covers all services.-acService :: Lens' AuditConfig (Maybe Text)-acService-  = lens _acService (\ s a -> s{_acService = a})---- | The configuration for logging of each type of permission.-acAuditLogConfigs :: Lens' AuditConfig [AuditLogConfig]-acAuditLogConfigs-  = lens _acAuditLogConfigs-      (\ s a -> s{_acAuditLogConfigs = a})-      . _Default-      . _Coerce---- |-acExemptedMembers :: Lens' AuditConfig [Text]-acExemptedMembers-  = lens _acExemptedMembers-      (\ s a -> s{_acExemptedMembers = a})-      . _Default-      . _Coerce--instance FromJSON AuditConfig where-        parseJSON-          = withObject "AuditConfig"-              (\ o ->-                 AuditConfig' <$>-                   (o .:? "service") <*>-                     (o .:? "auditLogConfigs" .!= mempty)-                     <*> (o .:? "exemptedMembers" .!= mempty))--instance ToJSON AuditConfig where-        toJSON AuditConfig'{..}-          = object-              (catMaybes-                 [("service" .=) <$> _acService,-                  ("auditLogConfigs" .=) <$> _acAuditLogConfigs,-                  ("exemptedMembers" .=) <$> _acExemptedMembers])---- | Represents an expression text. Example: title: \"User account presence\"--- description: \"Determines whether the request has a user account\"--- expression: \"size(request.user) > 0\"------ /See:/ 'expr' smart constructor.-data Expr =-  Expr'-    { _eLocation    :: !(Maybe Text)-    , _eExpression  :: !(Maybe Text)-    , _eTitle       :: !(Maybe Text)-    , _eDescription :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Expr' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eLocation'------ * 'eExpression'------ * 'eTitle'------ * 'eDescription'-expr-    :: Expr-expr =-  Expr'-    { _eLocation = Nothing-    , _eExpression = Nothing-    , _eTitle = Nothing-    , _eDescription = Nothing-    }----- | An optional string indicating the location of the expression for error--- reporting, e.g. a file name and a position in the file.-eLocation :: Lens' Expr (Maybe Text)-eLocation-  = lens _eLocation (\ s a -> s{_eLocation = a})---- | Textual representation of an expression in Common Expression Language--- syntax. The application context of the containing message determines--- which well-known feature set of CEL is supported.-eExpression :: Lens' Expr (Maybe Text)-eExpression-  = lens _eExpression (\ s a -> s{_eExpression = a})---- | An optional title for the expression, i.e. a short string describing its--- purpose. This can be used e.g. in UIs which allow to enter the--- expression.-eTitle :: Lens' Expr (Maybe Text)-eTitle = lens _eTitle (\ s a -> s{_eTitle = a})---- | An optional description of the expression. This is a longer text which--- describes the expression, e.g. when hovered over it in a UI.-eDescription :: Lens' Expr (Maybe Text)-eDescription-  = lens _eDescription (\ s a -> s{_eDescription = a})--instance FromJSON Expr where-        parseJSON-          = withObject "Expr"-              (\ o ->-                 Expr' <$>-                   (o .:? "location") <*> (o .:? "expression") <*>-                     (o .:? "title")-                     <*> (o .:? "description"))--instance ToJSON Expr where-        toJSON Expr'{..}-          = object-              (catMaybes-                 [("location" .=) <$> _eLocation,-                  ("expression" .=) <$> _eExpression,-                  ("title" .=) <$> _eTitle,-                  ("description" .=) <$> _eDescription])---- | A response containing a partial list of operations and a page token used--- to build the next request if the request has been truncated.------ /See:/ 'operationsListResponse' smart constructor.-data OperationsListResponse =-  OperationsListResponse'-    { _olrNextPageToken :: !(Maybe Text)-    , _olrOperations    :: !(Maybe [Operation])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'olrNextPageToken'------ * 'olrOperations'-operationsListResponse-    :: OperationsListResponse-operationsListResponse =-  OperationsListResponse'-    {_olrNextPageToken = Nothing, _olrOperations = Nothing}----- | Output only. A token used to continue a truncated list request.-olrNextPageToken :: Lens' OperationsListResponse (Maybe Text)-olrNextPageToken-  = lens _olrNextPageToken-      (\ s a -> s{_olrNextPageToken = a})---- | Output only. Operations contained in this list response.-olrOperations :: Lens' OperationsListResponse [Operation]-olrOperations-  = lens _olrOperations-      (\ s a -> s{_olrOperations = a})-      . _Default-      . _Coerce--instance FromJSON OperationsListResponse where-        parseJSON-          = withObject "OperationsListResponse"-              (\ o ->-                 OperationsListResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "operations" .!= mempty))--instance ToJSON OperationsListResponse where-        toJSON OperationsListResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _olrNextPageToken,-                  ("operations" .=) <$> _olrOperations])------- /See:/ 'resourceUpdateWarningsItemDataItem' smart constructor.-data ResourceUpdateWarningsItemDataItem =-  ResourceUpdateWarningsItemDataItem'-    { _ruwidiValue :: !(Maybe Text)-    , _ruwidiKey   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceUpdateWarningsItemDataItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ruwidiValue'------ * 'ruwidiKey'-resourceUpdateWarningsItemDataItem-    :: ResourceUpdateWarningsItemDataItem-resourceUpdateWarningsItemDataItem =-  ResourceUpdateWarningsItemDataItem'-    {_ruwidiValue = Nothing, _ruwidiKey = Nothing}----- | [Output Only] A warning data value corresponding to the key.-ruwidiValue :: Lens' ResourceUpdateWarningsItemDataItem (Maybe Text)-ruwidiValue-  = lens _ruwidiValue (\ s a -> s{_ruwidiValue = a})---- | [Output Only] A key that provides more detail on the warning being--- returned. For example, for warnings where there are no results in a list--- request for a particular zone, this key might be scope and the key value--- might be the zone name. Other examples might be a key indicating a--- deprecated resource and a suggested replacement, or a warning about--- invalid network settings (for example, if an instance attempts to--- perform IP forwarding but is not enabled for IP forwarding).-ruwidiKey :: Lens' ResourceUpdateWarningsItemDataItem (Maybe Text)-ruwidiKey-  = lens _ruwidiKey (\ s a -> s{_ruwidiKey = a})--instance FromJSON ResourceUpdateWarningsItemDataItem-         where-        parseJSON-          = withObject "ResourceUpdateWarningsItemDataItem"-              (\ o ->-                 ResourceUpdateWarningsItemDataItem' <$>-                   (o .:? "value") <*> (o .:? "key"))--instance ToJSON ResourceUpdateWarningsItemDataItem-         where-        toJSON ResourceUpdateWarningsItemDataItem'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _ruwidiValue,-                  ("key" .=) <$> _ruwidiKey])---- | A response that returns all Types supported by Deployment Manager------ /See:/ 'typesListResponse' smart constructor.-data TypesListResponse =-  TypesListResponse'-    { _tlrNextPageToken :: !(Maybe Text)-    , _tlrTypes         :: !(Maybe [Type])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TypesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tlrNextPageToken'------ * 'tlrTypes'-typesListResponse-    :: TypesListResponse-typesListResponse =-  TypesListResponse' {_tlrNextPageToken = Nothing, _tlrTypes = Nothing}----- | A token used to continue a truncated list request.-tlrNextPageToken :: Lens' TypesListResponse (Maybe Text)-tlrNextPageToken-  = lens _tlrNextPageToken-      (\ s a -> s{_tlrNextPageToken = a})---- | Output only. A list of resource types supported by Deployment Manager.-tlrTypes :: Lens' TypesListResponse [Type]-tlrTypes-  = lens _tlrTypes (\ s a -> s{_tlrTypes = a}) .-      _Default-      . _Coerce--instance FromJSON TypesListResponse where-        parseJSON-          = withObject "TypesListResponse"-              (\ o ->-                 TypesListResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "types" .!= mempty))--instance ToJSON TypesListResponse where-        toJSON TypesListResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _tlrNextPageToken,-                  ("types" .=) <$> _tlrTypes])---- | Increment a streamz counter with the specified metric and field names.--- Metric names should start with a \'\/\', generally be lowercase-only,--- and end in \"_count\". Field names should not contain an initial slash.--- The actual exported metric names will have \"\/iam\/policy\" prepended.--- Field names correspond to IAM request parameters and field values are--- their respective values. Supported field names: - \"authority\", which--- is \"[token]\" if IAMContext.token is present, otherwise the value of--- IAMContext.authority_selector if present, and otherwise a representation--- of IAMContext.principal; or - \"iam_principal\", a representation of--- IAMContext.principal even if a token or authority selector is present;--- or - \"\" (empty string), resulting in a counter with no fields.--- Examples: counter { metric: \"\/debug_access_count\" field:--- \"iam_principal\" } ==> increment counter--- \/iam\/policy\/backend_debug_access_count {iam_principal=[value of--- IAMContext.principal]} At this time we do not support multiple field--- names (though this may be supported in the future).------ /See:/ 'logConfigCounterOptions' smart constructor.-data LogConfigCounterOptions =-  LogConfigCounterOptions'-    { _lccoField  :: !(Maybe Text)-    , _lccoMetric :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LogConfigCounterOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lccoField'------ * 'lccoMetric'-logConfigCounterOptions-    :: LogConfigCounterOptions-logConfigCounterOptions =-  LogConfigCounterOptions' {_lccoField = Nothing, _lccoMetric = Nothing}----- | The field value to attribute.-lccoField :: Lens' LogConfigCounterOptions (Maybe Text)-lccoField-  = lens _lccoField (\ s a -> s{_lccoField = a})---- | The metric to update.-lccoMetric :: Lens' LogConfigCounterOptions (Maybe Text)-lccoMetric-  = lens _lccoMetric (\ s a -> s{_lccoMetric = a})--instance FromJSON LogConfigCounterOptions where-        parseJSON-          = withObject "LogConfigCounterOptions"-              (\ o ->-                 LogConfigCounterOptions' <$>-                   (o .:? "field") <*> (o .:? "metric"))--instance ToJSON LogConfigCounterOptions where-        toJSON LogConfigCounterOptions'{..}-          = object-              (catMaybes-                 [("field" .=) <$> _lccoField,-                  ("metric" .=) <$> _lccoMetric])---- | An Operation resource, used to manage asynchronous API requests. (==--- resource_for v1.globalOperations ==) (== resource_for--- beta.globalOperations ==) (== resource_for v1.regionOperations ==) (==--- resource_for beta.regionOperations ==) (== resource_for--- v1.zoneOperations ==) (== resource_for beta.zoneOperations ==)------ /See:/ 'operation' smart constructor.-data Operation =-  Operation'-    { _oTargetId            :: !(Maybe (Textual Word64))-    , _oStatus              :: !(Maybe Text)-    , _oInsertTime          :: !(Maybe Text)-    , _oProgress            :: !(Maybe (Textual Int32))-    , _oStartTime           :: !(Maybe Text)-    , _oKind                :: !Text-    , _oError               :: !(Maybe OperationError)-    , _oHTTPErrorMessage    :: !(Maybe Text)-    , _oZone                :: !(Maybe Text)-    , _oWarnings            :: !(Maybe [OperationWarningsItem])-    , _oHTTPErrorStatusCode :: !(Maybe (Textual Int32))-    , _oUser                :: !(Maybe Text)-    , _oSelfLink            :: !(Maybe Text)-    , _oName                :: !(Maybe Text)-    , _oStatusMessage       :: !(Maybe Text)-    , _oCreationTimestamp   :: !(Maybe Text)-    , _oEndTime             :: !(Maybe Text)-    , _oId                  :: !(Maybe (Textual Word64))-    , _oOperationType       :: !(Maybe Text)-    , _oRegion              :: !(Maybe Text)-    , _oDescription         :: !(Maybe Text)-    , _oTargetLink          :: !(Maybe Text)-    , _oClientOperationId   :: !(Maybe Text)-    }-  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:------ * 'oTargetId'------ * 'oStatus'------ * 'oInsertTime'------ * 'oProgress'------ * 'oStartTime'------ * 'oKind'------ * 'oError'------ * 'oHTTPErrorMessage'------ * 'oZone'------ * 'oWarnings'------ * 'oHTTPErrorStatusCode'------ * 'oUser'------ * 'oSelfLink'------ * 'oName'------ * 'oStatusMessage'------ * 'oCreationTimestamp'------ * 'oEndTime'------ * 'oId'------ * 'oOperationType'------ * 'oRegion'------ * 'oDescription'------ * 'oTargetLink'------ * 'oClientOperationId'-operation-    :: Operation-operation =-  Operation'-    { _oTargetId = Nothing-    , _oStatus = Nothing-    , _oInsertTime = Nothing-    , _oProgress = Nothing-    , _oStartTime = Nothing-    , _oKind = "deploymentmanager#operation"-    , _oError = Nothing-    , _oHTTPErrorMessage = Nothing-    , _oZone = Nothing-    , _oWarnings = Nothing-    , _oHTTPErrorStatusCode = Nothing-    , _oUser = Nothing-    , _oSelfLink = Nothing-    , _oName = Nothing-    , _oStatusMessage = Nothing-    , _oCreationTimestamp = Nothing-    , _oEndTime = Nothing-    , _oId = Nothing-    , _oOperationType = Nothing-    , _oRegion = Nothing-    , _oDescription = Nothing-    , _oTargetLink = Nothing-    , _oClientOperationId = Nothing-    }----- | [Output Only] The unique target ID, which identifies a specific--- incarnation of the target resource.-oTargetId :: Lens' Operation (Maybe Word64)-oTargetId-  = lens _oTargetId (\ s a -> s{_oTargetId = a}) .-      mapping _Coerce---- | [Output Only] The status of the operation, which can be one of the--- following: PENDING, RUNNING, or DONE.-oStatus :: Lens' Operation (Maybe Text)-oStatus = lens _oStatus (\ s a -> s{_oStatus = a})---- | [Output Only] The time that this operation was requested. This value is--- in RFC3339 text format.-oInsertTime :: Lens' Operation (Maybe Text)-oInsertTime-  = lens _oInsertTime (\ s a -> s{_oInsertTime = a})---- | [Output Only] An optional progress indicator that ranges from 0 to 100.--- There is no requirement that this be linear or support any granularity--- of operations. This should not be used to guess when the operation will--- be complete. This number should monotonically increase as the operation--- progresses.-oProgress :: Lens' Operation (Maybe Int32)-oProgress-  = lens _oProgress (\ s a -> s{_oProgress = a}) .-      mapping _Coerce---- | [Output Only] The time that this operation was started by the server.--- This value is in RFC3339 text format.-oStartTime :: Lens' Operation (Maybe Text)-oStartTime-  = lens _oStartTime (\ s a -> s{_oStartTime = a})---- | [Output Only] Type of the resource. Always compute#operation for--- Operation resources.-oKind :: Lens' Operation Text-oKind = lens _oKind (\ s a -> s{_oKind = a})---- | [Output Only] If errors are generated during processing of the--- operation, this field will be populated.-oError :: Lens' Operation (Maybe OperationError)-oError = lens _oError (\ s a -> s{_oError = a})---- | [Output Only] If the operation fails, this field contains the HTTP error--- message that was returned, such as NOT FOUND.-oHTTPErrorMessage :: Lens' Operation (Maybe Text)-oHTTPErrorMessage-  = lens _oHTTPErrorMessage-      (\ s a -> s{_oHTTPErrorMessage = a})---- | [Output Only] The URL of the zone where the operation resides. Only--- available when performing per-zone operations. You must specify this--- field as part of the HTTP request URL. It is not settable as a field in--- the request body.-oZone :: Lens' Operation (Maybe Text)-oZone = lens _oZone (\ s a -> s{_oZone = a})---- | [Output Only] If warning messages are generated during processing of the--- operation, this field will be populated.-oWarnings :: Lens' Operation [OperationWarningsItem]-oWarnings-  = lens _oWarnings (\ s a -> s{_oWarnings = a}) .-      _Default-      . _Coerce---- | [Output Only] If the operation fails, this field contains the HTTP error--- status code that was returned. For example, a 404 means the resource was--- not found.-oHTTPErrorStatusCode :: Lens' Operation (Maybe Int32)-oHTTPErrorStatusCode-  = lens _oHTTPErrorStatusCode-      (\ s a -> s{_oHTTPErrorStatusCode = a})-      . mapping _Coerce---- | [Output Only] User who requested the operation, for example:--- user\'example.com.-oUser :: Lens' Operation (Maybe Text)-oUser = lens _oUser (\ s a -> s{_oUser = a})---- | [Output Only] Server-defined URL for the resource.-oSelfLink :: Lens' Operation (Maybe Text)-oSelfLink-  = lens _oSelfLink (\ s a -> s{_oSelfLink = a})---- | [Output Only] Name of the resource.-oName :: Lens' Operation (Maybe Text)-oName = lens _oName (\ s a -> s{_oName = a})---- | [Output Only] An optional textual description of the current status of--- the operation.-oStatusMessage :: Lens' Operation (Maybe Text)-oStatusMessage-  = lens _oStatusMessage-      (\ s a -> s{_oStatusMessage = a})---- | [Deprecated] This field is deprecated.-oCreationTimestamp :: Lens' Operation (Maybe Text)-oCreationTimestamp-  = lens _oCreationTimestamp-      (\ s a -> s{_oCreationTimestamp = a})---- | [Output Only] The time that this operation was completed. This value is--- in RFC3339 text format.-oEndTime :: Lens' Operation (Maybe Text)-oEndTime = lens _oEndTime (\ s a -> s{_oEndTime = a})---- | [Output Only] The unique identifier for the resource. This identifier is--- defined by the server.-oId :: Lens' Operation (Maybe Word64)-oId-  = lens _oId (\ s a -> s{_oId = a}) . mapping _Coerce---- | [Output Only] The type of operation, such as insert, update, or delete,--- and so on.-oOperationType :: Lens' Operation (Maybe Text)-oOperationType-  = lens _oOperationType-      (\ s a -> s{_oOperationType = a})---- | [Output Only] The URL of the region where the operation resides. Only--- available when performing regional operations. You must specify this--- field as part of the HTTP request URL. It is not settable as a field in--- the request body.-oRegion :: Lens' Operation (Maybe Text)-oRegion = lens _oRegion (\ s a -> s{_oRegion = a})---- | [Output Only] A textual description of the operation, which is set when--- the operation is created.-oDescription :: Lens' Operation (Maybe Text)-oDescription-  = lens _oDescription (\ s a -> s{_oDescription = a})---- | [Output Only] The URL of the resource that the operation modifies. For--- operations related to creating a snapshot, this points to the persistent--- disk that the snapshot was created from.-oTargetLink :: Lens' Operation (Maybe Text)-oTargetLink-  = lens _oTargetLink (\ s a -> s{_oTargetLink = a})---- | [Output Only] The value of \`requestId\` if you provided it in the--- request. Not present otherwise.-oClientOperationId :: Lens' Operation (Maybe Text)-oClientOperationId-  = lens _oClientOperationId-      (\ s a -> s{_oClientOperationId = a})--instance FromJSON Operation where-        parseJSON-          = withObject "Operation"-              (\ o ->-                 Operation' <$>-                   (o .:? "targetId") <*> (o .:? "status") <*>-                     (o .:? "insertTime")-                     <*> (o .:? "progress")-                     <*> (o .:? "startTime")-                     <*> (o .:? "kind" .!= "deploymentmanager#operation")-                     <*> (o .:? "error")-                     <*> (o .:? "httpErrorMessage")-                     <*> (o .:? "zone")-                     <*> (o .:? "warnings" .!= mempty)-                     <*> (o .:? "httpErrorStatusCode")-                     <*> (o .:? "user")-                     <*> (o .:? "selfLink")-                     <*> (o .:? "name")-                     <*> (o .:? "statusMessage")-                     <*> (o .:? "creationTimestamp")-                     <*> (o .:? "endTime")-                     <*> (o .:? "id")-                     <*> (o .:? "operationType")-                     <*> (o .:? "region")-                     <*> (o .:? "description")-                     <*> (o .:? "targetLink")-                     <*> (o .:? "clientOperationId"))--instance ToJSON Operation where-        toJSON Operation'{..}-          = object-              (catMaybes-                 [("targetId" .=) <$> _oTargetId,-                  ("status" .=) <$> _oStatus,-                  ("insertTime" .=) <$> _oInsertTime,-                  ("progress" .=) <$> _oProgress,-                  ("startTime" .=) <$> _oStartTime,-                  Just ("kind" .= _oKind), ("error" .=) <$> _oError,-                  ("httpErrorMessage" .=) <$> _oHTTPErrorMessage,-                  ("zone" .=) <$> _oZone,-                  ("warnings" .=) <$> _oWarnings,-                  ("httpErrorStatusCode" .=) <$> _oHTTPErrorStatusCode,-                  ("user" .=) <$> _oUser,-                  ("selfLink" .=) <$> _oSelfLink,-                  ("name" .=) <$> _oName,-                  ("statusMessage" .=) <$> _oStatusMessage,-                  ("creationTimestamp" .=) <$> _oCreationTimestamp,-                  ("endTime" .=) <$> _oEndTime, ("id" .=) <$> _oId,-                  ("operationType" .=) <$> _oOperationType,-                  ("region" .=) <$> _oRegion,-                  ("description" .=) <$> _oDescription,-                  ("targetLink" .=) <$> _oTargetLink,-                  ("clientOperationId" .=) <$> _oClientOperationId])------- /See:/ 'testPermissionsResponse' smart constructor.-newtype TestPermissionsResponse =-  TestPermissionsResponse'-    { _tprPermissions :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TestPermissionsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tprPermissions'-testPermissionsResponse-    :: TestPermissionsResponse-testPermissionsResponse = TestPermissionsResponse' {_tprPermissions = Nothing}----- | A subset of \`TestPermissionsRequest.permissions\` that the caller is--- allowed.-tprPermissions :: Lens' TestPermissionsResponse [Text]-tprPermissions-  = lens _tprPermissions-      (\ s a -> s{_tprPermissions = a})-      . _Default-      . _Coerce--instance FromJSON TestPermissionsResponse where-        parseJSON-          = withObject "TestPermissionsResponse"-              (\ o ->-                 TestPermissionsResponse' <$>-                   (o .:? "permissions" .!= mempty))--instance ToJSON TestPermissionsResponse where-        toJSON TestPermissionsResponse'{..}-          = object-              (catMaybes [("permissions" .=) <$> _tprPermissions])---- | A response containing a partial list of resources and a page token used--- to build the next request if the request has been truncated.------ /See:/ 'resourcesListResponse' smart constructor.-data ResourcesListResponse =-  ResourcesListResponse'-    { _rlrNextPageToken :: !(Maybe Text)-    , _rlrResources     :: !(Maybe [Resource])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourcesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rlrNextPageToken'------ * 'rlrResources'-resourcesListResponse-    :: ResourcesListResponse-resourcesListResponse =-  ResourcesListResponse' {_rlrNextPageToken = Nothing, _rlrResources = Nothing}----- | A token used to continue a truncated list request.-rlrNextPageToken :: Lens' ResourcesListResponse (Maybe Text)-rlrNextPageToken-  = lens _rlrNextPageToken-      (\ s a -> s{_rlrNextPageToken = a})---- | Resources contained in this list response.-rlrResources :: Lens' ResourcesListResponse [Resource]-rlrResources-  = lens _rlrResources (\ s a -> s{_rlrResources = a})-      . _Default-      . _Coerce--instance FromJSON ResourcesListResponse where-        parseJSON-          = withObject "ResourcesListResponse"-              (\ o ->-                 ResourcesListResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "resources" .!= mempty))--instance ToJSON ResourcesListResponse where-        toJSON ResourcesListResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _rlrNextPageToken,-                  ("resources" .=) <$> _rlrResources])---- |------ /See:/ 'deploymentUpdate' smart constructor.-data DeploymentUpdate =-  DeploymentUpdate'-    { _duManifest    :: !(Maybe Text)-    , _duLabels      :: !(Maybe [DeploymentUpdateLabelEntry])-    , _duDescription :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'duManifest'------ * 'duLabels'------ * 'duDescription'-deploymentUpdate-    :: DeploymentUpdate-deploymentUpdate =-  DeploymentUpdate'-    {_duManifest = Nothing, _duLabels = Nothing, _duDescription = Nothing}----- | Output only. URL of the manifest representing the update configuration--- of this deployment.-duManifest :: Lens' DeploymentUpdate (Maybe Text)-duManifest-  = lens _duManifest (\ s a -> s{_duManifest = a})---- | Output only. Map of labels; provided by the client when the resource is--- created or updated. Specifically: Label keys must be between 1 and 63--- characters long and must conform to the following regular expression:--- [a-z]([-a-z0-9]*[a-z0-9])? Label values must be between 0 and 63--- characters long and must conform to the regular expression--- ([a-z]([-a-z0-9]*[a-z0-9])?)?-duLabels :: Lens' DeploymentUpdate [DeploymentUpdateLabelEntry]-duLabels-  = lens _duLabels (\ s a -> s{_duLabels = a}) .-      _Default-      . _Coerce---- | Output only. An optional user-provided description of the deployment--- after the current update has been applied.-duDescription :: Lens' DeploymentUpdate (Maybe Text)-duDescription-  = lens _duDescription-      (\ s a -> s{_duDescription = a})--instance FromJSON DeploymentUpdate where-        parseJSON-          = withObject "DeploymentUpdate"-              (\ o ->-                 DeploymentUpdate' <$>-                   (o .:? "manifest") <*> (o .:? "labels" .!= mempty)-                     <*> (o .:? "description"))--instance ToJSON DeploymentUpdate where-        toJSON DeploymentUpdate'{..}-          = object-              (catMaybes-                 [("manifest" .=) <$> _duManifest,-                  ("labels" .=) <$> _duLabels,-                  ("description" .=) <$> _duDescription])---- |------ /See:/ 'resourceUpdate' smart constructor.-data ResourceUpdate =-  ResourceUpdate'-    { _ruState           :: !(Maybe Text)-    , _ruError           :: !(Maybe ResourceUpdateError)-    , _ruAccessControl   :: !(Maybe ResourceAccessControl)-    , _ruWarnings        :: !(Maybe [ResourceUpdateWarningsItem])-    , _ruIntent          :: !(Maybe Text)-    , _ruManifest        :: !(Maybe Text)-    , _ruFinalProperties :: !(Maybe Text)-    , _ruProperties      :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ruState'------ * 'ruError'------ * 'ruAccessControl'------ * 'ruWarnings'------ * 'ruIntent'------ * 'ruManifest'------ * 'ruFinalProperties'------ * 'ruProperties'-resourceUpdate-    :: ResourceUpdate-resourceUpdate =-  ResourceUpdate'-    { _ruState = Nothing-    , _ruError = Nothing-    , _ruAccessControl = Nothing-    , _ruWarnings = Nothing-    , _ruIntent = Nothing-    , _ruManifest = Nothing-    , _ruFinalProperties = Nothing-    , _ruProperties = Nothing-    }----- | Output only. The state of the resource.-ruState :: Lens' ResourceUpdate (Maybe Text)-ruState = lens _ruState (\ s a -> s{_ruState = a})---- | Output only. If errors are generated during update of the resource, this--- field will be populated.-ruError :: Lens' ResourceUpdate (Maybe ResourceUpdateError)-ruError = lens _ruError (\ s a -> s{_ruError = a})---- | The Access Control Policy to set on this resource after updating the--- resource itself.-ruAccessControl :: Lens' ResourceUpdate (Maybe ResourceAccessControl)-ruAccessControl-  = lens _ruAccessControl-      (\ s a -> s{_ruAccessControl = a})---- | Output only. If warning messages are generated during processing of this--- resource, this field will be populated.-ruWarnings :: Lens' ResourceUpdate [ResourceUpdateWarningsItem]-ruWarnings-  = lens _ruWarnings (\ s a -> s{_ruWarnings = a}) .-      _Default-      . _Coerce---- | Output only. The intent of the resource: PREVIEW, UPDATE, or CANCEL.-ruIntent :: Lens' ResourceUpdate (Maybe Text)-ruIntent = lens _ruIntent (\ s a -> s{_ruIntent = a})---- | Output only. URL of the manifest representing the update configuration--- of this resource.-ruManifest :: Lens' ResourceUpdate (Maybe Text)-ruManifest-  = lens _ruManifest (\ s a -> s{_ruManifest = a})---- | Output only. The expanded properties of the resource with reference--- values expanded. Returned as serialized YAML.-ruFinalProperties :: Lens' ResourceUpdate (Maybe Text)-ruFinalProperties-  = lens _ruFinalProperties-      (\ s a -> s{_ruFinalProperties = a})---- | Output only. The set of updated properties for this resource, before--- references are expanded. Returned as serialized YAML.-ruProperties :: Lens' ResourceUpdate (Maybe Text)-ruProperties-  = lens _ruProperties (\ s a -> s{_ruProperties = a})--instance FromJSON ResourceUpdate where-        parseJSON-          = withObject "ResourceUpdate"-              (\ o ->-                 ResourceUpdate' <$>-                   (o .:? "state") <*> (o .:? "error") <*>-                     (o .:? "accessControl")-                     <*> (o .:? "warnings" .!= mempty)-                     <*> (o .:? "intent")-                     <*> (o .:? "manifest")-                     <*> (o .:? "finalProperties")-                     <*> (o .:? "properties"))--instance ToJSON ResourceUpdate where-        toJSON ResourceUpdate'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _ruState,-                  ("error" .=) <$> _ruError,-                  ("accessControl" .=) <$> _ruAccessControl,-                  ("warnings" .=) <$> _ruWarnings,-                  ("intent" .=) <$> _ruIntent,-                  ("manifest" .=) <$> _ruManifest,-                  ("finalProperties" .=) <$> _ruFinalProperties,-                  ("properties" .=) <$> _ruProperties])------- /See:/ 'deploymentLabelEntry' smart constructor.-data DeploymentLabelEntry =-  DeploymentLabelEntry'-    { _dleValue :: !(Maybe Text)-    , _dleKey   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentLabelEntry' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dleValue'------ * 'dleKey'-deploymentLabelEntry-    :: DeploymentLabelEntry-deploymentLabelEntry =-  DeploymentLabelEntry' {_dleValue = Nothing, _dleKey = Nothing}---dleValue :: Lens' DeploymentLabelEntry (Maybe Text)-dleValue = lens _dleValue (\ s a -> s{_dleValue = a})--dleKey :: Lens' DeploymentLabelEntry (Maybe Text)-dleKey = lens _dleKey (\ s a -> s{_dleKey = a})--instance FromJSON DeploymentLabelEntry where-        parseJSON-          = withObject "DeploymentLabelEntry"-              (\ o ->-                 DeploymentLabelEntry' <$>-                   (o .:? "value") <*> (o .:? "key"))--instance ToJSON DeploymentLabelEntry where-        toJSON DeploymentLabelEntry'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _dleValue, ("key" .=) <$> _dleKey])---- | A rule to be applied in a Policy.------ /See:/ 'rule' smart constructor.-data Rule =-  Rule'-    { _rAction      :: !(Maybe Text)-    , _rNotIns      :: !(Maybe [Text])-    , _rIns         :: !(Maybe [Text])-    , _rLogConfigs  :: !(Maybe [LogConfig])-    , _rConditions  :: !(Maybe [Condition])-    , _rPermissions :: !(Maybe [Text])-    , _rDescription :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Rule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rAction'------ * 'rNotIns'------ * 'rIns'------ * 'rLogConfigs'------ * 'rConditions'------ * 'rPermissions'------ * 'rDescription'-rule-    :: Rule-rule =-  Rule'-    { _rAction = Nothing-    , _rNotIns = Nothing-    , _rIns = Nothing-    , _rLogConfigs = Nothing-    , _rConditions = Nothing-    , _rPermissions = Nothing-    , _rDescription = Nothing-    }----- | Required-rAction :: Lens' Rule (Maybe Text)-rAction = lens _rAction (\ s a -> s{_rAction = a})---- | If one or more \'not_in\' clauses are specified, the rule matches if the--- PRINCIPAL\/AUTHORITY_SELECTOR is in none of the entries.-rNotIns :: Lens' Rule [Text]-rNotIns-  = lens _rNotIns (\ s a -> s{_rNotIns = a}) . _Default-      . _Coerce---- | If one or more \'in\' clauses are specified, the rule matches if the--- PRINCIPAL\/AUTHORITY_SELECTOR is in at least one of these entries.-rIns :: Lens' Rule [Text]-rIns-  = lens _rIns (\ s a -> s{_rIns = a}) . _Default .-      _Coerce---- | The config returned to callers of tech.iam.IAM.CheckPolicy for any--- entries that match the LOG action.-rLogConfigs :: Lens' Rule [LogConfig]-rLogConfigs-  = lens _rLogConfigs (\ s a -> s{_rLogConfigs = a}) .-      _Default-      . _Coerce---- | Additional restrictions that must be met. All conditions must pass for--- the rule to match.-rConditions :: Lens' Rule [Condition]-rConditions-  = lens _rConditions (\ s a -> s{_rConditions = a}) .-      _Default-      . _Coerce---- | A permission is a string of form \'..\' (e.g.,--- \'storage.buckets.list\'). A value of \'*\' matches all permissions, and--- a verb part of \'*\' (e.g., \'storage.buckets.*\') matches all verbs.-rPermissions :: Lens' Rule [Text]-rPermissions-  = lens _rPermissions (\ s a -> s{_rPermissions = a})-      . _Default-      . _Coerce---- | Human-readable description of the rule.-rDescription :: Lens' Rule (Maybe Text)-rDescription-  = lens _rDescription (\ s a -> s{_rDescription = a})--instance FromJSON Rule where-        parseJSON-          = withObject "Rule"-              (\ o ->-                 Rule' <$>-                   (o .:? "action") <*> (o .:? "notIns" .!= mempty) <*>-                     (o .:? "ins" .!= mempty)-                     <*> (o .:? "logConfigs" .!= mempty)-                     <*> (o .:? "conditions" .!= mempty)-                     <*> (o .:? "permissions" .!= mempty)-                     <*> (o .:? "description"))--instance ToJSON Rule where-        toJSON Rule'{..}-          = object-              (catMaybes-                 [("action" .=) <$> _rAction,-                  ("notIns" .=) <$> _rNotIns, ("ins" .=) <$> _rIns,-                  ("logConfigs" .=) <$> _rLogConfigs,-                  ("conditions" .=) <$> _rConditions,-                  ("permissions" .=) <$> _rPermissions,-                  ("description" .=) <$> _rDescription])------- /See:/ 'testPermissionsRequest' smart constructor.-newtype TestPermissionsRequest =-  TestPermissionsRequest'-    { _tPermissions :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TestPermissionsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tPermissions'-testPermissionsRequest-    :: TestPermissionsRequest-testPermissionsRequest = TestPermissionsRequest' {_tPermissions = Nothing}----- | The set of permissions to check for the \'resource\'. Permissions with--- wildcards (such as \'*\' or \'storage.*\') are not allowed.-tPermissions :: Lens' TestPermissionsRequest [Text]-tPermissions-  = lens _tPermissions (\ s a -> s{_tPermissions = a})-      . _Default-      . _Coerce--instance FromJSON TestPermissionsRequest where-        parseJSON-          = withObject "TestPermissionsRequest"-              (\ o ->-                 TestPermissionsRequest' <$>-                   (o .:? "permissions" .!= mempty))--instance ToJSON TestPermissionsRequest where-        toJSON TestPermissionsRequest'{..}-          = object-              (catMaybes [("permissions" .=) <$> _tPermissions])---- |------ /See:/ 'manifest' smart constructor.-data Manifest =-  Manifest'-    { _mInsertTime     :: !(Maybe Text)-    , _mLayout         :: !(Maybe Text)-    , _mConfig         :: !(Maybe ConfigFile)-    , _mExpandedConfig :: !(Maybe Text)-    , _mImports        :: !(Maybe [ImportFile])-    , _mSelfLink       :: !(Maybe Text)-    , _mName           :: !(Maybe Text)-    , _mId             :: !(Maybe (Textual Word64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Manifest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mInsertTime'------ * 'mLayout'------ * 'mConfig'------ * 'mExpandedConfig'------ * 'mImports'------ * 'mSelfLink'------ * 'mName'------ * 'mId'-manifest-    :: Manifest-manifest =-  Manifest'-    { _mInsertTime = Nothing-    , _mLayout = Nothing-    , _mConfig = Nothing-    , _mExpandedConfig = Nothing-    , _mImports = Nothing-    , _mSelfLink = Nothing-    , _mName = Nothing-    , _mId = Nothing-    }----- | Output only. Creation timestamp in RFC3339 text format.-mInsertTime :: Lens' Manifest (Maybe Text)-mInsertTime-  = lens _mInsertTime (\ s a -> s{_mInsertTime = a})---- | Output only. The YAML layout for this manifest.-mLayout :: Lens' Manifest (Maybe Text)-mLayout = lens _mLayout (\ s a -> s{_mLayout = a})---- | Output only. The YAML configuration for this manifest.-mConfig :: Lens' Manifest (Maybe ConfigFile)-mConfig = lens _mConfig (\ s a -> s{_mConfig = a})---- | Output only. The fully-expanded configuration file, including any--- templates and references.-mExpandedConfig :: Lens' Manifest (Maybe Text)-mExpandedConfig-  = lens _mExpandedConfig-      (\ s a -> s{_mExpandedConfig = a})---- | Output only. The imported files for this manifest.-mImports :: Lens' Manifest [ImportFile]-mImports-  = lens _mImports (\ s a -> s{_mImports = a}) .-      _Default-      . _Coerce---- | Output only. Self link for the manifest.-mSelfLink :: Lens' Manifest (Maybe Text)-mSelfLink-  = lens _mSelfLink (\ s a -> s{_mSelfLink = a})---- | Output only. The name of the manifest.-mName :: Lens' Manifest (Maybe Text)-mName = lens _mName (\ s a -> s{_mName = a})--mId :: Lens' Manifest (Maybe Word64)-mId-  = lens _mId (\ s a -> s{_mId = a}) . mapping _Coerce--instance FromJSON Manifest where-        parseJSON-          = withObject "Manifest"-              (\ o ->-                 Manifest' <$>-                   (o .:? "insertTime") <*> (o .:? "layout") <*>-                     (o .:? "config")-                     <*> (o .:? "expandedConfig")-                     <*> (o .:? "imports" .!= mempty)-                     <*> (o .:? "selfLink")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON Manifest where-        toJSON Manifest'{..}-          = object-              (catMaybes-                 [("insertTime" .=) <$> _mInsertTime,-                  ("layout" .=) <$> _mLayout,-                  ("config" .=) <$> _mConfig,-                  ("expandedConfig" .=) <$> _mExpandedConfig,-                  ("imports" .=) <$> _mImports,-                  ("selfLink" .=) <$> _mSelfLink,-                  ("name" .=) <$> _mName, ("id" .=) <$> _mId])------- /See:/ 'resourceUpdateWarningsItem' smart constructor.-data ResourceUpdateWarningsItem =-  ResourceUpdateWarningsItem'-    { _ruwiData    :: !(Maybe [ResourceUpdateWarningsItemDataItem])-    , _ruwiCode    :: !(Maybe Text)-    , _ruwiMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceUpdateWarningsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ruwiData'------ * 'ruwiCode'------ * 'ruwiMessage'-resourceUpdateWarningsItem-    :: ResourceUpdateWarningsItem-resourceUpdateWarningsItem =-  ResourceUpdateWarningsItem'-    {_ruwiData = Nothing, _ruwiCode = Nothing, _ruwiMessage = Nothing}----- | [Output Only] Metadata about this warning in key: value format. For--- example: \"data\": [ { \"key\": \"scope\", \"value\":--- \"zones\/us-east1-d\" }-ruwiData :: Lens' ResourceUpdateWarningsItem [ResourceUpdateWarningsItemDataItem]-ruwiData-  = lens _ruwiData (\ s a -> s{_ruwiData = a}) .-      _Default-      . _Coerce---- | [Output Only] A warning code, if applicable. For example, Compute Engine--- returns NO_RESULTS_ON_PAGE if there are no results in the response.-ruwiCode :: Lens' ResourceUpdateWarningsItem (Maybe Text)-ruwiCode = lens _ruwiCode (\ s a -> s{_ruwiCode = a})---- | [Output Only] A human-readable description of the warning code.-ruwiMessage :: Lens' ResourceUpdateWarningsItem (Maybe Text)-ruwiMessage-  = lens _ruwiMessage (\ s a -> s{_ruwiMessage = a})--instance FromJSON ResourceUpdateWarningsItem where-        parseJSON-          = withObject "ResourceUpdateWarningsItem"-              (\ o ->-                 ResourceUpdateWarningsItem' <$>-                   (o .:? "data" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON ResourceUpdateWarningsItem where-        toJSON ResourceUpdateWarningsItem'{..}-          = object-              (catMaybes-                 [("data" .=) <$> _ruwiData,-                  ("code" .=) <$> _ruwiCode,-                  ("message" .=) <$> _ruwiMessage])---- |------ /See:/ 'deploymentsCancelPreviewRequest' smart constructor.-newtype DeploymentsCancelPreviewRequest =-  DeploymentsCancelPreviewRequest'-    { _dcprFingerprint :: Maybe Bytes-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsCancelPreviewRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcprFingerprint'-deploymentsCancelPreviewRequest-    :: DeploymentsCancelPreviewRequest-deploymentsCancelPreviewRequest =-  DeploymentsCancelPreviewRequest' {_dcprFingerprint = Nothing}----- | Specifies a fingerprint for cancelPreview() requests. A fingerprint is a--- randomly generated value that must be provided in cancelPreview()--- requests to perform optimistic locking. This ensures optimistic--- concurrency so that the deployment does not have conflicting requests--- (e.g. if someone attempts to make a new update request while another--- user attempts to cancel a preview, this would prevent one of the--- requests). The fingerprint is initially generated by Deployment Manager--- and changes after every request to modify a deployment. To get the--- latest fingerprint value, perform a get() request on the deployment.-dcprFingerprint :: Lens' DeploymentsCancelPreviewRequest (Maybe ByteString)-dcprFingerprint-  = lens _dcprFingerprint-      (\ s a -> s{_dcprFingerprint = a})-      . mapping _Bytes--instance FromJSON DeploymentsCancelPreviewRequest-         where-        parseJSON-          = withObject "DeploymentsCancelPreviewRequest"-              (\ o ->-                 DeploymentsCancelPreviewRequest' <$>-                   (o .:? "fingerprint"))--instance ToJSON DeploymentsCancelPreviewRequest where-        toJSON DeploymentsCancelPreviewRequest'{..}-          = object-              (catMaybes [("fingerprint" .=) <$> _dcprFingerprint])---- | Write a Cloud Audit log------ /See:/ 'logConfigCloudAuditOptions' smart constructor.-data LogConfigCloudAuditOptions =-  LogConfigCloudAuditOptions'-    { _lccaoAuthorizationLoggingOptions :: !(Maybe AuthorizationLoggingOptions)-    , _lccaoLogName                     :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LogConfigCloudAuditOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lccaoAuthorizationLoggingOptions'------ * 'lccaoLogName'-logConfigCloudAuditOptions-    :: LogConfigCloudAuditOptions-logConfigCloudAuditOptions =-  LogConfigCloudAuditOptions'-    {_lccaoAuthorizationLoggingOptions = Nothing, _lccaoLogName = Nothing}----- | Information used by the Cloud Audit Logging pipeline.-lccaoAuthorizationLoggingOptions :: Lens' LogConfigCloudAuditOptions (Maybe AuthorizationLoggingOptions)-lccaoAuthorizationLoggingOptions-  = lens _lccaoAuthorizationLoggingOptions-      (\ s a -> s{_lccaoAuthorizationLoggingOptions = a})---- | The log_name to populate in the Cloud Audit Record.-lccaoLogName :: Lens' LogConfigCloudAuditOptions (Maybe Text)-lccaoLogName-  = lens _lccaoLogName (\ s a -> s{_lccaoLogName = a})--instance FromJSON LogConfigCloudAuditOptions where-        parseJSON-          = withObject "LogConfigCloudAuditOptions"-              (\ o ->-                 LogConfigCloudAuditOptions' <$>-                   (o .:? "authorizationLoggingOptions") <*>-                     (o .:? "logName"))--instance ToJSON LogConfigCloudAuditOptions where-        toJSON LogConfigCloudAuditOptions'{..}-          = object-              (catMaybes-                 [("authorizationLoggingOptions" .=) <$>-                    _lccaoAuthorizationLoggingOptions,-                  ("logName" .=) <$> _lccaoLogName])---- |------ /See:/ 'resource' smart constructor.-data Resource =-  Resource'-    { _rInsertTime      :: !(Maybe Text)-    , _rAccessControl   :: !(Maybe ResourceAccessControl)-    , _rURL             :: !(Maybe Text)-    , _rWarnings        :: !(Maybe [ResourceWarningsItem])-    , _rUpdateTime      :: !(Maybe Text)-    , _rName            :: !(Maybe Text)-    , _rManifest        :: !(Maybe Text)-    , _rFinalProperties :: !(Maybe Text)-    , _rId              :: !(Maybe (Textual Word64))-    , _rType            :: !(Maybe Text)-    , _rUpdate          :: !(Maybe ResourceUpdate)-    , _rProperties      :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Resource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rInsertTime'------ * 'rAccessControl'------ * 'rURL'------ * 'rWarnings'------ * 'rUpdateTime'------ * 'rName'------ * 'rManifest'------ * 'rFinalProperties'------ * 'rId'------ * 'rType'------ * 'rUpdate'------ * 'rProperties'-resource-    :: Resource-resource =-  Resource'-    { _rInsertTime = Nothing-    , _rAccessControl = Nothing-    , _rURL = Nothing-    , _rWarnings = Nothing-    , _rUpdateTime = Nothing-    , _rName = Nothing-    , _rManifest = Nothing-    , _rFinalProperties = Nothing-    , _rId = Nothing-    , _rType = Nothing-    , _rUpdate = Nothing-    , _rProperties = Nothing-    }----- | Output only. Creation timestamp in RFC3339 text format.-rInsertTime :: Lens' Resource (Maybe Text)-rInsertTime-  = lens _rInsertTime (\ s a -> s{_rInsertTime = a})---- | The Access Control Policy set on this resource.-rAccessControl :: Lens' Resource (Maybe ResourceAccessControl)-rAccessControl-  = lens _rAccessControl-      (\ s a -> s{_rAccessControl = a})---- | Output only. The URL of the actual resource.-rURL :: Lens' Resource (Maybe Text)-rURL = lens _rURL (\ s a -> s{_rURL = a})---- | Output only. If warning messages are generated during processing of this--- resource, this field will be populated.-rWarnings :: Lens' Resource [ResourceWarningsItem]-rWarnings-  = lens _rWarnings (\ s a -> s{_rWarnings = a}) .-      _Default-      . _Coerce---- | Output only. Update timestamp in RFC3339 text format.-rUpdateTime :: Lens' Resource (Maybe Text)-rUpdateTime-  = lens _rUpdateTime (\ s a -> s{_rUpdateTime = a})---- | Output only. The name of the resource as it appears in the YAML config.-rName :: Lens' Resource (Maybe Text)-rName = lens _rName (\ s a -> s{_rName = a})---- | Output only. URL of the manifest representing the current configuration--- of this resource.-rManifest :: Lens' Resource (Maybe Text)-rManifest-  = lens _rManifest (\ s a -> s{_rManifest = a})---- | Output only. The evaluated properties of the resource with references--- expanded. Returned as serialized YAML.-rFinalProperties :: Lens' Resource (Maybe Text)-rFinalProperties-  = lens _rFinalProperties-      (\ s a -> s{_rFinalProperties = a})--rId :: Lens' Resource (Maybe Word64)-rId-  = lens _rId (\ s a -> s{_rId = a}) . mapping _Coerce---- | Output only. The type of the resource, for example compute.v1.instance,--- or cloudfunctions.v1beta1.function.-rType :: Lens' Resource (Maybe Text)-rType = lens _rType (\ s a -> s{_rType = a})---- | Output only. If Deployment Manager is currently updating or previewing--- an update to this resource, the updated configuration appears here.-rUpdate :: Lens' Resource (Maybe ResourceUpdate)-rUpdate = lens _rUpdate (\ s a -> s{_rUpdate = a})---- | Output only. The current properties of the resource before any--- references have been filled in. Returned as serialized YAML.-rProperties :: Lens' Resource (Maybe Text)-rProperties-  = lens _rProperties (\ s a -> s{_rProperties = a})--instance FromJSON Resource where-        parseJSON-          = withObject "Resource"-              (\ o ->-                 Resource' <$>-                   (o .:? "insertTime") <*> (o .:? "accessControl") <*>-                     (o .:? "url")-                     <*> (o .:? "warnings" .!= mempty)-                     <*> (o .:? "updateTime")-                     <*> (o .:? "name")-                     <*> (o .:? "manifest")-                     <*> (o .:? "finalProperties")-                     <*> (o .:? "id")-                     <*> (o .:? "type")-                     <*> (o .:? "update")-                     <*> (o .:? "properties"))--instance ToJSON Resource where-        toJSON Resource'{..}-          = object-              (catMaybes-                 [("insertTime" .=) <$> _rInsertTime,-                  ("accessControl" .=) <$> _rAccessControl,-                  ("url" .=) <$> _rURL, ("warnings" .=) <$> _rWarnings,-                  ("updateTime" .=) <$> _rUpdateTime,-                  ("name" .=) <$> _rName,-                  ("manifest" .=) <$> _rManifest,-                  ("finalProperties" .=) <$> _rFinalProperties,-                  ("id" .=) <$> _rId, ("type" .=) <$> _rType,-                  ("update" .=) <$> _rUpdate,-                  ("properties" .=) <$> _rProperties])---- | Write a Data Access (Gin) log------ /See:/ 'logConfigDataAccessOptions' smart constructor.-newtype LogConfigDataAccessOptions =-  LogConfigDataAccessOptions'-    { _lcdaoLogMode :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LogConfigDataAccessOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lcdaoLogMode'-logConfigDataAccessOptions-    :: LogConfigDataAccessOptions-logConfigDataAccessOptions =-  LogConfigDataAccessOptions' {_lcdaoLogMode = Nothing}----- | Whether Gin logging should happen in a fail-closed manner at the caller.--- This is relevant only in the LocalIAM implementation, for now. NOTE:--- Logging to Gin in a fail-closed manner is currently unsupported while--- work is being done to satisfy the requirements of go\/345. Currently,--- setting LOG_FAIL_CLOSED mode will have no effect, but still exists--- because there is active work being done to support it (b\/115874152).-lcdaoLogMode :: Lens' LogConfigDataAccessOptions (Maybe Text)-lcdaoLogMode-  = lens _lcdaoLogMode (\ s a -> s{_lcdaoLogMode = a})--instance FromJSON LogConfigDataAccessOptions where-        parseJSON-          = withObject "LogConfigDataAccessOptions"-              (\ o ->-                 LogConfigDataAccessOptions' <$> (o .:? "logMode"))--instance ToJSON LogConfigDataAccessOptions where-        toJSON LogConfigDataAccessOptions'{..}-          = object-              (catMaybes [("logMode" .=) <$> _lcdaoLogMode])------- /See:/ 'deploymentUpdateLabelEntry' smart constructor.-data DeploymentUpdateLabelEntry =-  DeploymentUpdateLabelEntry'-    { _duleValue :: !(Maybe Text)-    , _duleKey   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentUpdateLabelEntry' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'duleValue'------ * 'duleKey'-deploymentUpdateLabelEntry-    :: DeploymentUpdateLabelEntry-deploymentUpdateLabelEntry =-  DeploymentUpdateLabelEntry' {_duleValue = Nothing, _duleKey = Nothing}---duleValue :: Lens' DeploymentUpdateLabelEntry (Maybe Text)-duleValue-  = lens _duleValue (\ s a -> s{_duleValue = a})--duleKey :: Lens' DeploymentUpdateLabelEntry (Maybe Text)-duleKey = lens _duleKey (\ s a -> s{_duleKey = a})--instance FromJSON DeploymentUpdateLabelEntry where-        parseJSON-          = withObject "DeploymentUpdateLabelEntry"-              (\ o ->-                 DeploymentUpdateLabelEntry' <$>-                   (o .:? "value") <*> (o .:? "key"))--instance ToJSON DeploymentUpdateLabelEntry where-        toJSON DeploymentUpdateLabelEntry'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _duleValue,-                  ("key" .=) <$> _duleKey])------- /See:/ 'resourceUpdateErrorErrorsItem' smart constructor.-data ResourceUpdateErrorErrorsItem =-  ResourceUpdateErrorErrorsItem'-    { _rueeiLocation :: !(Maybe Text)-    , _rueeiCode     :: !(Maybe Text)-    , _rueeiMessage  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceUpdateErrorErrorsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rueeiLocation'------ * 'rueeiCode'------ * 'rueeiMessage'-resourceUpdateErrorErrorsItem-    :: ResourceUpdateErrorErrorsItem-resourceUpdateErrorErrorsItem =-  ResourceUpdateErrorErrorsItem'-    {_rueeiLocation = Nothing, _rueeiCode = Nothing, _rueeiMessage = Nothing}----- | [Output Only] Indicates the field in the request that caused the error.--- This property is optional.-rueeiLocation :: Lens' ResourceUpdateErrorErrorsItem (Maybe Text)-rueeiLocation-  = lens _rueeiLocation-      (\ s a -> s{_rueeiLocation = a})---- | [Output Only] The error type identifier for this error.-rueeiCode :: Lens' ResourceUpdateErrorErrorsItem (Maybe Text)-rueeiCode-  = lens _rueeiCode (\ s a -> s{_rueeiCode = a})---- | [Output Only] An optional, human-readable error message.-rueeiMessage :: Lens' ResourceUpdateErrorErrorsItem (Maybe Text)-rueeiMessage-  = lens _rueeiMessage (\ s a -> s{_rueeiMessage = a})--instance FromJSON ResourceUpdateErrorErrorsItem where-        parseJSON-          = withObject "ResourceUpdateErrorErrorsItem"-              (\ o ->-                 ResourceUpdateErrorErrorsItem' <$>-                   (o .:? "location") <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON ResourceUpdateErrorErrorsItem where-        toJSON ResourceUpdateErrorErrorsItem'{..}-          = object-              (catMaybes-                 [("location" .=) <$> _rueeiLocation,-                  ("code" .=) <$> _rueeiCode,-                  ("message" .=) <$> _rueeiMessage])---- | A response containing a partial list of manifests and a page token used--- to build the next request if the request has been truncated.------ /See:/ 'manifestsListResponse' smart constructor.-data ManifestsListResponse =-  ManifestsListResponse'-    { _mlrNextPageToken :: !(Maybe Text)-    , _mlrManifests     :: !(Maybe [Manifest])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ManifestsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mlrNextPageToken'------ * 'mlrManifests'-manifestsListResponse-    :: ManifestsListResponse-manifestsListResponse =-  ManifestsListResponse' {_mlrNextPageToken = Nothing, _mlrManifests = Nothing}----- | Output only. A token used to continue a truncated list request.-mlrNextPageToken :: Lens' ManifestsListResponse (Maybe Text)-mlrNextPageToken-  = lens _mlrNextPageToken-      (\ s a -> s{_mlrNextPageToken = a})---- | Output only. Manifests contained in this list response.-mlrManifests :: Lens' ManifestsListResponse [Manifest]-mlrManifests-  = lens _mlrManifests (\ s a -> s{_mlrManifests = a})-      . _Default-      . _Coerce--instance FromJSON ManifestsListResponse where-        parseJSON-          = withObject "ManifestsListResponse"-              (\ o ->-                 ManifestsListResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "manifests" .!= mempty))--instance ToJSON ManifestsListResponse where-        toJSON ManifestsListResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _mlrNextPageToken,-                  ("manifests" .=) <$> _mlrManifests])---- | [Output Only] If errors are generated during processing of the--- operation, this field will be populated.------ /See:/ 'operationError' smart constructor.-newtype OperationError =-  OperationError'-    { _oeErrors :: Maybe [OperationErrorErrorsItem]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationError' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oeErrors'-operationError-    :: OperationError-operationError = OperationError' {_oeErrors = Nothing}----- | [Output Only] The array of errors encountered while processing this--- operation.-oeErrors :: Lens' OperationError [OperationErrorErrorsItem]-oeErrors-  = lens _oeErrors (\ s a -> s{_oeErrors = a}) .-      _Default-      . _Coerce--instance FromJSON OperationError where-        parseJSON-          = withObject "OperationError"-              (\ o ->-                 OperationError' <$> (o .:? "errors" .!= mempty))--instance ToJSON OperationError where-        toJSON OperationError'{..}-          = object (catMaybes [("errors" .=) <$> _oeErrors])------- /See:/ 'globalSetPolicyRequest' smart constructor.-data GlobalSetPolicyRequest =-  GlobalSetPolicyRequest'-    { _gsprEtag     :: !(Maybe Bytes)-    , _gsprBindings :: !(Maybe [Binding])-    , _gsprPolicy   :: !(Maybe Policy)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GlobalSetPolicyRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gsprEtag'------ * 'gsprBindings'------ * 'gsprPolicy'-globalSetPolicyRequest-    :: GlobalSetPolicyRequest-globalSetPolicyRequest =-  GlobalSetPolicyRequest'-    {_gsprEtag = Nothing, _gsprBindings = Nothing, _gsprPolicy = Nothing}----- | Flatten Policy to create a backward compatible wire-format. Deprecated.--- Use \'policy\' to specify the etag.-gsprEtag :: Lens' GlobalSetPolicyRequest (Maybe ByteString)-gsprEtag-  = lens _gsprEtag (\ s a -> s{_gsprEtag = a}) .-      mapping _Bytes---- | Flatten Policy to create a backward compatible wire-format. Deprecated.--- Use \'policy\' to specify bindings.-gsprBindings :: Lens' GlobalSetPolicyRequest [Binding]-gsprBindings-  = lens _gsprBindings (\ s a -> s{_gsprBindings = a})-      . _Default-      . _Coerce---- | REQUIRED: The complete policy to be applied to the \'resource\'. The--- size of the policy is limited to a few 10s of KB. An empty policy is in--- general a valid policy but certain services (like Projects) might reject--- them.-gsprPolicy :: Lens' GlobalSetPolicyRequest (Maybe Policy)-gsprPolicy-  = lens _gsprPolicy (\ s a -> s{_gsprPolicy = a})--instance FromJSON GlobalSetPolicyRequest where-        parseJSON-          = withObject "GlobalSetPolicyRequest"-              (\ o ->-                 GlobalSetPolicyRequest' <$>-                   (o .:? "etag") <*> (o .:? "bindings" .!= mempty) <*>-                     (o .:? "policy"))--instance ToJSON GlobalSetPolicyRequest where-        toJSON GlobalSetPolicyRequest'{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _gsprEtag,-                  ("bindings" .=) <$> _gsprBindings,-                  ("policy" .=) <$> _gsprPolicy])---- | Authorization-related information used by Cloud Audit Logging.------ /See:/ 'authorizationLoggingOptions' smart constructor.-newtype AuthorizationLoggingOptions =-  AuthorizationLoggingOptions'-    { _aloPermissionType :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AuthorizationLoggingOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aloPermissionType'-authorizationLoggingOptions-    :: AuthorizationLoggingOptions-authorizationLoggingOptions =-  AuthorizationLoggingOptions' {_aloPermissionType = Nothing}----- | The type of the permission that was checked.-aloPermissionType :: Lens' AuthorizationLoggingOptions (Maybe Text)-aloPermissionType-  = lens _aloPermissionType-      (\ s a -> s{_aloPermissionType = a})--instance FromJSON AuthorizationLoggingOptions where-        parseJSON-          = withObject "AuthorizationLoggingOptions"-              (\ o ->-                 AuthorizationLoggingOptions' <$>-                   (o .:? "permissionType"))--instance ToJSON AuthorizationLoggingOptions where-        toJSON AuthorizationLoggingOptions'{..}-          = object-              (catMaybes-                 [("permissionType" .=) <$> _aloPermissionType])---- | Defines an Identity and Access Management (IAM) policy. It is used to--- specify access control policies for Cloud Platform resources. A--- \`Policy\` consists of a list of \`bindings\`. A \`binding\` binds a--- list of \`members\` to a \`role\`, where the members can be user--- accounts, Google groups, Google domains, and service accounts. A--- \`role\` is a named list of permissions defined by IAM. **JSON Example**--- { \"bindings\": [ { \"role\": \"roles\/owner\", \"members\": [--- \"user:mike\'example.com\", \"group:admins\'example.com\",--- \"domain:google.com\",--- \"serviceAccount:my-other-app\'appspot.gserviceaccount.com\" ] }, {--- \"role\": \"roles\/viewer\", \"members\": [\"user:sean\'example.com\"] }--- ] } **YAML Example** bindings: - members: - user:mike\'example.com ---- group:admins\'example.com - domain:google.com ---- serviceAccount:my-other-app\'appspot.gserviceaccount.com role:--- roles\/owner - members: - user:sean\'example.com role: roles\/viewer For--- a description of IAM and its features, see the [IAM developer\'s--- guide](https:\/\/cloud.google.com\/iam\/docs).------ /See:/ 'policy' smart constructor.-data Policy =-  Policy'-    { _pAuditConfigs :: !(Maybe [AuditConfig])-    , _pEtag         :: !(Maybe Bytes)-    , _pRules        :: !(Maybe [Rule])-    , _pVersion      :: !(Maybe (Textual Int32))-    , _pBindings     :: !(Maybe [Binding])-    , _pIAMOwned     :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Policy' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pAuditConfigs'------ * 'pEtag'------ * 'pRules'------ * 'pVersion'------ * 'pBindings'------ * 'pIAMOwned'-policy-    :: Policy-policy =-  Policy'-    { _pAuditConfigs = Nothing-    , _pEtag = Nothing-    , _pRules = Nothing-    , _pVersion = Nothing-    , _pBindings = Nothing-    , _pIAMOwned = Nothing-    }----- | Specifies cloud audit logging configuration for this policy.-pAuditConfigs :: Lens' Policy [AuditConfig]-pAuditConfigs-  = lens _pAuditConfigs-      (\ s a -> s{_pAuditConfigs = a})-      . _Default-      . _Coerce---- | \`etag\` is used for optimistic concurrency control as a way to help--- prevent simultaneous updates of a policy from overwriting each other. It--- is strongly suggested that systems make use of the \`etag\` in the--- read-modify-write cycle to perform policy updates in order to avoid race--- conditions: An \`etag\` is returned in the response to \`getIamPolicy\`,--- and systems are expected to put that etag in the request to--- \`setIamPolicy\` to ensure that their change will be applied to the same--- version of the policy. If no \`etag\` is provided in the call to--- \`setIamPolicy\`, then the existing policy is overwritten blindly.-pEtag :: Lens' Policy (Maybe ByteString)-pEtag-  = lens _pEtag (\ s a -> s{_pEtag = a}) .-      mapping _Bytes---- | If more than one rule is specified, the rules are applied in the--- following manner: - All matching LOG rules are always applied. - If any--- DENY\/DENY_WITH_LOG rule matches, permission is denied. Logging will be--- applied if one or more matching rule requires logging. - Otherwise, if--- any ALLOW\/ALLOW_WITH_LOG rule matches, permission is granted. Logging--- will be applied if one or more matching rule requires logging. ---- Otherwise, if no rule applies, permission is denied.-pRules :: Lens' Policy [Rule]-pRules-  = lens _pRules (\ s a -> s{_pRules = a}) . _Default .-      _Coerce---- | Deprecated.-pVersion :: Lens' Policy (Maybe Int32)-pVersion-  = lens _pVersion (\ s a -> s{_pVersion = a}) .-      mapping _Coerce---- | Associates a list of \`members\` to a \`role\`. \`bindings\` with no--- members will result in an error.-pBindings :: Lens' Policy [Binding]-pBindings-  = lens _pBindings (\ s a -> s{_pBindings = a}) .-      _Default-      . _Coerce---- |-pIAMOwned :: Lens' Policy (Maybe Bool)-pIAMOwned-  = lens _pIAMOwned (\ s a -> s{_pIAMOwned = a})--instance FromJSON Policy where-        parseJSON-          = withObject "Policy"-              (\ o ->-                 Policy' <$>-                   (o .:? "auditConfigs" .!= mempty) <*> (o .:? "etag")-                     <*> (o .:? "rules" .!= mempty)-                     <*> (o .:? "version")-                     <*> (o .:? "bindings" .!= mempty)-                     <*> (o .:? "iamOwned"))--instance ToJSON Policy where-        toJSON Policy'{..}-          = object-              (catMaybes-                 [("auditConfigs" .=) <$> _pAuditConfigs,-                  ("etag" .=) <$> _pEtag, ("rules" .=) <$> _pRules,-                  ("version" .=) <$> _pVersion,-                  ("bindings" .=) <$> _pBindings,-                  ("iamOwned" .=) <$> _pIAMOwned])---- | A resource type supported by Deployment Manager.------ /See:/ 'type'' smart constructor.-data Type =-  Type'-    { _tInsertTime :: !(Maybe Text)-    , _tOperation  :: !(Maybe Operation)-    , _tSelfLink   :: !(Maybe Text)-    , _tName       :: !(Maybe Text)-    , _tId         :: !(Maybe (Textual Word64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Type' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tInsertTime'------ * 'tOperation'------ * 'tSelfLink'------ * 'tName'------ * 'tId'-type'-    :: Type-type' =-  Type'-    { _tInsertTime = Nothing-    , _tOperation = Nothing-    , _tSelfLink = Nothing-    , _tName = Nothing-    , _tId = Nothing-    }----- | Output only. Creation timestamp in RFC3339 text format.-tInsertTime :: Lens' Type (Maybe Text)-tInsertTime-  = lens _tInsertTime (\ s a -> s{_tInsertTime = a})---- | Output only. The Operation that most recently ran, or is currently--- running, on this type.-tOperation :: Lens' Type (Maybe Operation)-tOperation-  = lens _tOperation (\ s a -> s{_tOperation = a})---- | Output only. Server defined URL for the resource.-tSelfLink :: Lens' Type (Maybe Text)-tSelfLink-  = lens _tSelfLink (\ s a -> s{_tSelfLink = a})---- | Name of the type.-tName :: Lens' Type (Maybe Text)-tName = lens _tName (\ s a -> s{_tName = a})--tId :: Lens' Type (Maybe Word64)-tId-  = lens _tId (\ s a -> s{_tId = a}) . mapping _Coerce--instance FromJSON Type where-        parseJSON-          = withObject "Type"-              (\ o ->-                 Type' <$>-                   (o .:? "insertTime") <*> (o .:? "operation") <*>-                     (o .:? "selfLink")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON Type where-        toJSON Type'{..}-          = object-              (catMaybes-                 [("insertTime" .=) <$> _tInsertTime,-                  ("operation" .=) <$> _tOperation,-                  ("selfLink" .=) <$> _tSelfLink,-                  ("name" .=) <$> _tName, ("id" .=) <$> _tId])---- |------ /See:/ 'importFile' smart constructor.-data ImportFile =-  ImportFile'-    { _ifContent :: !(Maybe Text)-    , _ifName    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ImportFile' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ifContent'------ * 'ifName'-importFile-    :: ImportFile-importFile = ImportFile' {_ifContent = Nothing, _ifName = Nothing}----- | The contents of the file.-ifContent :: Lens' ImportFile (Maybe Text)-ifContent-  = lens _ifContent (\ s a -> s{_ifContent = a})---- | The name of the file.-ifName :: Lens' ImportFile (Maybe Text)-ifName = lens _ifName (\ s a -> s{_ifName = a})--instance FromJSON ImportFile where-        parseJSON-          = withObject "ImportFile"-              (\ o ->-                 ImportFile' <$> (o .:? "content") <*> (o .:? "name"))--instance ToJSON ImportFile where-        toJSON ImportFile'{..}-          = object-              (catMaybes-                 [("content" .=) <$> _ifContent,-                  ("name" .=) <$> _ifName])------- /See:/ 'operationErrorErrorsItem' smart constructor.-data OperationErrorErrorsItem =-  OperationErrorErrorsItem'-    { _oeeiLocation :: !(Maybe Text)-    , _oeeiCode     :: !(Maybe Text)-    , _oeeiMessage  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationErrorErrorsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oeeiLocation'------ * 'oeeiCode'------ * 'oeeiMessage'-operationErrorErrorsItem-    :: OperationErrorErrorsItem-operationErrorErrorsItem =-  OperationErrorErrorsItem'-    {_oeeiLocation = Nothing, _oeeiCode = Nothing, _oeeiMessage = Nothing}----- | [Output Only] Indicates the field in the request that caused the error.--- This property is optional.-oeeiLocation :: Lens' OperationErrorErrorsItem (Maybe Text)-oeeiLocation-  = lens _oeeiLocation (\ s a -> s{_oeeiLocation = a})---- | [Output Only] The error type identifier for this error.-oeeiCode :: Lens' OperationErrorErrorsItem (Maybe Text)-oeeiCode = lens _oeeiCode (\ s a -> s{_oeeiCode = a})---- | [Output Only] An optional, human-readable error message.-oeeiMessage :: Lens' OperationErrorErrorsItem (Maybe Text)-oeeiMessage-  = lens _oeeiMessage (\ s a -> s{_oeeiMessage = a})--instance FromJSON OperationErrorErrorsItem where-        parseJSON-          = withObject "OperationErrorErrorsItem"-              (\ o ->-                 OperationErrorErrorsItem' <$>-                   (o .:? "location") <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON OperationErrorErrorsItem where-        toJSON OperationErrorErrorsItem'{..}-          = object-              (catMaybes-                 [("location" .=) <$> _oeeiLocation,-                  ("code" .=) <$> _oeeiCode,-                  ("message" .=) <$> _oeeiMessage])---- |------ /See:/ 'deploymentsStopRequest' smart constructor.-newtype DeploymentsStopRequest =-  DeploymentsStopRequest'-    { _dsrFingerprint :: Maybe Bytes-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsStopRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsrFingerprint'-deploymentsStopRequest-    :: DeploymentsStopRequest-deploymentsStopRequest = DeploymentsStopRequest' {_dsrFingerprint = Nothing}----- | Specifies a fingerprint for stop() requests. A fingerprint is a randomly--- generated value that must be provided in stop() requests to perform--- optimistic locking. This ensures optimistic concurrency so that the--- deployment does not have conflicting requests (e.g. if someone attempts--- to make a new update request while another user attempts to stop an--- ongoing update request, this would prevent a collision). The fingerprint--- is initially generated by Deployment Manager and changes after every--- request to modify a deployment. To get the latest fingerprint value,--- perform a get() request on the deployment.-dsrFingerprint :: Lens' DeploymentsStopRequest (Maybe ByteString)-dsrFingerprint-  = lens _dsrFingerprint-      (\ s a -> s{_dsrFingerprint = a})-      . mapping _Bytes--instance FromJSON DeploymentsStopRequest where-        parseJSON-          = withObject "DeploymentsStopRequest"-              (\ o ->-                 DeploymentsStopRequest' <$> (o .:? "fingerprint"))--instance ToJSON DeploymentsStopRequest where-        toJSON DeploymentsStopRequest'{..}-          = object-              (catMaybes [("fingerprint" .=) <$> _dsrFingerprint])------- /See:/ 'resourceWarningsItemDataItem' smart constructor.-data ResourceWarningsItemDataItem =-  ResourceWarningsItemDataItem'-    { _rwidiValue :: !(Maybe Text)-    , _rwidiKey   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceWarningsItemDataItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rwidiValue'------ * 'rwidiKey'-resourceWarningsItemDataItem-    :: ResourceWarningsItemDataItem-resourceWarningsItemDataItem =-  ResourceWarningsItemDataItem' {_rwidiValue = Nothing, _rwidiKey = Nothing}----- | [Output Only] A warning data value corresponding to the key.-rwidiValue :: Lens' ResourceWarningsItemDataItem (Maybe Text)-rwidiValue-  = lens _rwidiValue (\ s a -> s{_rwidiValue = a})---- | [Output Only] A key that provides more detail on the warning being--- returned. For example, for warnings where there are no results in a list--- request for a particular zone, this key might be scope and the key value--- might be the zone name. Other examples might be a key indicating a--- deprecated resource and a suggested replacement, or a warning about--- invalid network settings (for example, if an instance attempts to--- perform IP forwarding but is not enabled for IP forwarding).-rwidiKey :: Lens' ResourceWarningsItemDataItem (Maybe Text)-rwidiKey = lens _rwidiKey (\ s a -> s{_rwidiKey = a})--instance FromJSON ResourceWarningsItemDataItem where-        parseJSON-          = withObject "ResourceWarningsItemDataItem"-              (\ o ->-                 ResourceWarningsItemDataItem' <$>-                   (o .:? "value") <*> (o .:? "key"))--instance ToJSON ResourceWarningsItemDataItem where-        toJSON ResourceWarningsItemDataItem'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _rwidiValue,-                  ("key" .=) <$> _rwidiKey])---- | Provides the configuration for logging a type of permissions. Example: {--- \"audit_log_configs\": [ { \"log_type\": \"DATA_READ\",--- \"exempted_members\": [ \"user:foo\'gmail.com\" ] }, { \"log_type\":--- \"DATA_WRITE\", } ] } This enables \'DATA_READ\' and \'DATA_WRITE\'--- logging, while exempting foo\'gmail.com from DATA_READ logging.------ /See:/ 'auditLogConfig' smart constructor.-data AuditLogConfig =-  AuditLogConfig'-    { _alcLogType         :: !(Maybe Text)-    , _alcExemptedMembers :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AuditLogConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'alcLogType'------ * 'alcExemptedMembers'-auditLogConfig-    :: AuditLogConfig-auditLogConfig =-  AuditLogConfig' {_alcLogType = Nothing, _alcExemptedMembers = Nothing}----- | The log type that this config enables.-alcLogType :: Lens' AuditLogConfig (Maybe Text)-alcLogType-  = lens _alcLogType (\ s a -> s{_alcLogType = a})---- | Specifies the identities that do not cause logging for this type of--- permission. Follows the same format of [Binding.members][].-alcExemptedMembers :: Lens' AuditLogConfig [Text]-alcExemptedMembers-  = lens _alcExemptedMembers-      (\ s a -> s{_alcExemptedMembers = a})-      . _Default-      . _Coerce--instance FromJSON AuditLogConfig where-        parseJSON-          = withObject "AuditLogConfig"-              (\ o ->-                 AuditLogConfig' <$>-                   (o .:? "logType") <*>-                     (o .:? "exemptedMembers" .!= mempty))--instance ToJSON AuditLogConfig where-        toJSON AuditLogConfig'{..}-          = object-              (catMaybes-                 [("logType" .=) <$> _alcLogType,-                  ("exemptedMembers" .=) <$> _alcExemptedMembers])---- | Output only. If errors are generated during update of the resource, this--- field will be populated.------ /See:/ 'resourceUpdateError' smart constructor.-newtype ResourceUpdateError =-  ResourceUpdateError'-    { _rueErrors :: Maybe [ResourceUpdateErrorErrorsItem]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceUpdateError' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rueErrors'-resourceUpdateError-    :: ResourceUpdateError-resourceUpdateError = ResourceUpdateError' {_rueErrors = Nothing}----- | [Output Only] The array of errors encountered while processing this--- operation.-rueErrors :: Lens' ResourceUpdateError [ResourceUpdateErrorErrorsItem]-rueErrors-  = lens _rueErrors (\ s a -> s{_rueErrors = a}) .-      _Default-      . _Coerce--instance FromJSON ResourceUpdateError where-        parseJSON-          = withObject "ResourceUpdateError"-              (\ o ->-                 ResourceUpdateError' <$> (o .:? "errors" .!= mempty))--instance ToJSON ResourceUpdateError where-        toJSON ResourceUpdateError'{..}-          = object (catMaybes [("errors" .=) <$> _rueErrors])---- | A condition to be met.------ /See:/ 'condition' smart constructor.-data Condition =-  Condition'-    { _cOp     :: !(Maybe Text)-    , _cIAM    :: !(Maybe Text)-    , _cValues :: !(Maybe [Text])-    , _cValue  :: !(Maybe Text)-    , _cSys    :: !(Maybe Text)-    , _cSvc    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Condition' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cOp'------ * 'cIAM'------ * 'cValues'------ * 'cValue'------ * 'cSys'------ * 'cSvc'-condition-    :: Condition-condition =-  Condition'-    { _cOp = Nothing-    , _cIAM = Nothing-    , _cValues = Nothing-    , _cValue = Nothing-    , _cSys = Nothing-    , _cSvc = Nothing-    }----- | An operator to apply the subject with.-cOp :: Lens' Condition (Maybe Text)-cOp = lens _cOp (\ s a -> s{_cOp = a})---- | Trusted attributes supplied by the IAM system.-cIAM :: Lens' Condition (Maybe Text)-cIAM = lens _cIAM (\ s a -> s{_cIAM = a})---- | The objects of the condition. This is mutually exclusive with \'value\'.-cValues :: Lens' Condition [Text]-cValues-  = lens _cValues (\ s a -> s{_cValues = a}) . _Default-      . _Coerce---- | DEPRECATED. Use \'values\' instead.-cValue :: Lens' Condition (Maybe Text)-cValue = lens _cValue (\ s a -> s{_cValue = a})---- | Trusted attributes supplied by any service that owns resources and uses--- the IAM system for access control.-cSys :: Lens' Condition (Maybe Text)-cSys = lens _cSys (\ s a -> s{_cSys = a})---- | Trusted attributes discharged by the service.-cSvc :: Lens' Condition (Maybe Text)-cSvc = lens _cSvc (\ s a -> s{_cSvc = a})--instance FromJSON Condition where-        parseJSON-          = withObject "Condition"-              (\ o ->-                 Condition' <$>-                   (o .:? "op") <*> (o .:? "iam") <*>-                     (o .:? "values" .!= mempty)-                     <*> (o .:? "value")-                     <*> (o .:? "sys")-                     <*> (o .:? "svc"))--instance ToJSON Condition where-        toJSON Condition'{..}-          = object-              (catMaybes-                 [("op" .=) <$> _cOp, ("iam" .=) <$> _cIAM,-                  ("values" .=) <$> _cValues, ("value" .=) <$> _cValue,-                  ("sys" .=) <$> _cSys, ("svc" .=) <$> _cSvc])---- | A response containing a partial list of deployments and a page token--- used to build the next request if the request has been truncated.------ /See:/ 'deploymentsListResponse' smart constructor.-data DeploymentsListResponse =-  DeploymentsListResponse'-    { _dlrNextPageToken :: !(Maybe Text)-    , _dlrDeployments   :: !(Maybe [Deployment])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlrNextPageToken'------ * 'dlrDeployments'-deploymentsListResponse-    :: DeploymentsListResponse-deploymentsListResponse =-  DeploymentsListResponse'-    {_dlrNextPageToken = Nothing, _dlrDeployments = Nothing}----- | Output only. A token used to continue a truncated list request.-dlrNextPageToken :: Lens' DeploymentsListResponse (Maybe Text)-dlrNextPageToken-  = lens _dlrNextPageToken-      (\ s a -> s{_dlrNextPageToken = a})---- | Output only. The deployments contained in this response.-dlrDeployments :: Lens' DeploymentsListResponse [Deployment]-dlrDeployments-  = lens _dlrDeployments-      (\ s a -> s{_dlrDeployments = a})-      . _Default-      . _Coerce--instance FromJSON DeploymentsListResponse where-        parseJSON-          = withObject "DeploymentsListResponse"-              (\ o ->-                 DeploymentsListResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "deployments" .!= mempty))--instance ToJSON DeploymentsListResponse where-        toJSON DeploymentsListResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _dlrNextPageToken,-                  ("deployments" .=) <$> _dlrDeployments])------- /See:/ 'resourceWarningsItem' smart constructor.-data ResourceWarningsItem =-  ResourceWarningsItem'-    { _rwiData    :: !(Maybe [ResourceWarningsItemDataItem])-    , _rwiCode    :: !(Maybe Text)-    , _rwiMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceWarningsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rwiData'------ * 'rwiCode'------ * 'rwiMessage'-resourceWarningsItem-    :: ResourceWarningsItem-resourceWarningsItem =-  ResourceWarningsItem'-    {_rwiData = Nothing, _rwiCode = Nothing, _rwiMessage = Nothing}----- | [Output Only] Metadata about this warning in key: value format. For--- example: \"data\": [ { \"key\": \"scope\", \"value\":--- \"zones\/us-east1-d\" }-rwiData :: Lens' ResourceWarningsItem [ResourceWarningsItemDataItem]-rwiData-  = lens _rwiData (\ s a -> s{_rwiData = a}) . _Default-      . _Coerce---- | [Output Only] A warning code, if applicable. For example, Compute Engine--- returns NO_RESULTS_ON_PAGE if there are no results in the response.-rwiCode :: Lens' ResourceWarningsItem (Maybe Text)-rwiCode = lens _rwiCode (\ s a -> s{_rwiCode = a})---- | [Output Only] A human-readable description of the warning code.-rwiMessage :: Lens' ResourceWarningsItem (Maybe Text)-rwiMessage-  = lens _rwiMessage (\ s a -> s{_rwiMessage = a})--instance FromJSON ResourceWarningsItem where-        parseJSON-          = withObject "ResourceWarningsItem"-              (\ o ->-                 ResourceWarningsItem' <$>-                   (o .:? "data" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON ResourceWarningsItem where-        toJSON ResourceWarningsItem'{..}-          = object-              (catMaybes-                 [("data" .=) <$> _rwiData, ("code" .=) <$> _rwiCode,-                  ("message" .=) <$> _rwiMessage])---- | Specifies what kind of log the caller must write------ /See:/ 'logConfig' smart constructor.-data LogConfig =-  LogConfig'-    { _lcCloudAudit :: !(Maybe LogConfigCloudAuditOptions)-    , _lcDataAccess :: !(Maybe LogConfigDataAccessOptions)-    , _lcCounter    :: !(Maybe LogConfigCounterOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LogConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lcCloudAudit'------ * 'lcDataAccess'------ * 'lcCounter'-logConfig-    :: LogConfig-logConfig =-  LogConfig'-    {_lcCloudAudit = Nothing, _lcDataAccess = Nothing, _lcCounter = Nothing}----- | Cloud audit options.-lcCloudAudit :: Lens' LogConfig (Maybe LogConfigCloudAuditOptions)-lcCloudAudit-  = lens _lcCloudAudit (\ s a -> s{_lcCloudAudit = a})---- | Data access options.-lcDataAccess :: Lens' LogConfig (Maybe LogConfigDataAccessOptions)-lcDataAccess-  = lens _lcDataAccess (\ s a -> s{_lcDataAccess = a})---- | Counter options.-lcCounter :: Lens' LogConfig (Maybe LogConfigCounterOptions)-lcCounter-  = lens _lcCounter (\ s a -> s{_lcCounter = a})--instance FromJSON LogConfig where-        parseJSON-          = withObject "LogConfig"-              (\ o ->-                 LogConfig' <$>-                   (o .:? "cloudAudit") <*> (o .:? "dataAccess") <*>-                     (o .:? "counter"))--instance ToJSON LogConfig where-        toJSON LogConfig'{..}-          = object-              (catMaybes-                 [("cloudAudit" .=) <$> _lcCloudAudit,-                  ("dataAccess" .=) <$> _lcDataAccess,-                  ("counter" .=) <$> _lcCounter])---- | The access controls set on the resource.------ /See:/ 'resourceAccessControl' smart constructor.-newtype ResourceAccessControl =-  ResourceAccessControl'-    { _racGcpIAMPolicy :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceAccessControl' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'racGcpIAMPolicy'-resourceAccessControl-    :: ResourceAccessControl-resourceAccessControl = ResourceAccessControl' {_racGcpIAMPolicy = Nothing}----- | The GCP IAM Policy to set on the resource.-racGcpIAMPolicy :: Lens' ResourceAccessControl (Maybe Text)-racGcpIAMPolicy-  = lens _racGcpIAMPolicy-      (\ s a -> s{_racGcpIAMPolicy = a})--instance FromJSON ResourceAccessControl where-        parseJSON-          = withObject "ResourceAccessControl"-              (\ o ->-                 ResourceAccessControl' <$> (o .:? "gcpIamPolicy"))--instance ToJSON ResourceAccessControl where-        toJSON ResourceAccessControl'{..}-          = object-              (catMaybes-                 [("gcpIamPolicy" .=) <$> _racGcpIAMPolicy])---- |------ /See:/ 'targetConfiguration' smart constructor.-data TargetConfiguration =-  TargetConfiguration'-    { _tcConfig  :: !(Maybe ConfigFile)-    , _tcImports :: !(Maybe [ImportFile])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tcConfig'------ * 'tcImports'-targetConfiguration-    :: TargetConfiguration-targetConfiguration =-  TargetConfiguration' {_tcConfig = Nothing, _tcImports = Nothing}----- | The configuration to use for this deployment.-tcConfig :: Lens' TargetConfiguration (Maybe ConfigFile)-tcConfig = lens _tcConfig (\ s a -> s{_tcConfig = a})---- | Specifies any files to import for this configuration. This can be used--- to import templates or other files. For example, you might import a text--- file in order to use the file in a template.-tcImports :: Lens' TargetConfiguration [ImportFile]-tcImports-  = lens _tcImports (\ s a -> s{_tcImports = a}) .-      _Default-      . _Coerce--instance FromJSON TargetConfiguration where-        parseJSON-          = withObject "TargetConfiguration"-              (\ o ->-                 TargetConfiguration' <$>-                   (o .:? "config") <*> (o .:? "imports" .!= mempty))--instance ToJSON TargetConfiguration where-        toJSON TargetConfiguration'{..}-          = object-              (catMaybes-                 [("config" .=) <$> _tcConfig,-                  ("imports" .=) <$> _tcImports])------- /See:/ 'operationWarningsItem' smart constructor.-data OperationWarningsItem =-  OperationWarningsItem'-    { _owiData    :: !(Maybe [OperationWarningsItemDataItem])-    , _owiCode    :: !(Maybe Text)-    , _owiMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationWarningsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'owiData'------ * 'owiCode'------ * 'owiMessage'-operationWarningsItem-    :: OperationWarningsItem-operationWarningsItem =-  OperationWarningsItem'-    {_owiData = Nothing, _owiCode = Nothing, _owiMessage = Nothing}----- | [Output Only] Metadata about this warning in key: value format. For--- example: \"data\": [ { \"key\": \"scope\", \"value\":--- \"zones\/us-east1-d\" }-owiData :: Lens' OperationWarningsItem [OperationWarningsItemDataItem]-owiData-  = lens _owiData (\ s a -> s{_owiData = a}) . _Default-      . _Coerce---- | [Output Only] A warning code, if applicable. For example, Compute Engine--- returns NO_RESULTS_ON_PAGE if there are no results in the response.-owiCode :: Lens' OperationWarningsItem (Maybe Text)-owiCode = lens _owiCode (\ s a -> s{_owiCode = a})---- | [Output Only] A human-readable description of the warning code.-owiMessage :: Lens' OperationWarningsItem (Maybe Text)-owiMessage-  = lens _owiMessage (\ s a -> s{_owiMessage = a})--instance FromJSON OperationWarningsItem where-        parseJSON-          = withObject "OperationWarningsItem"-              (\ o ->-                 OperationWarningsItem' <$>-                   (o .:? "data" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON OperationWarningsItem where-        toJSON OperationWarningsItem'{..}-          = object-              (catMaybes-                 [("data" .=) <$> _owiData, ("code" .=) <$> _owiCode,-                  ("message" .=) <$> _owiMessage])---- | Associates \`members\` with a \`role\`.------ /See:/ 'binding' smart constructor.-data Binding =-  Binding'-    { _bMembers   :: !(Maybe [Text])-    , _bRole      :: !(Maybe Text)-    , _bCondition :: !(Maybe Expr)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Binding' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bMembers'------ * 'bRole'------ * 'bCondition'-binding-    :: Binding-binding =-  Binding' {_bMembers = Nothing, _bRole = Nothing, _bCondition = Nothing}----- | Specifies the identities requesting access for a Cloud Platform--- resource. \`members\` can have the following values: * \`allUsers\`: A--- special identifier that represents anyone who is on the internet; with--- or without a Google account. * \`allAuthenticatedUsers\`: A special--- identifier that represents anyone who is authenticated with a Google--- account or a service account. * \`user:{emailid}\`: An email address--- that represents a specific Google account. For example,--- \`alice\'gmail.com\` . * \`serviceAccount:{emailid}\`: An email address--- that represents a service account. For example,--- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An--- email address that represents a Google group. For example,--- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain--- name that represents all the users of that domain. For example,--- \`google.com\` or \`example.com\`.-bMembers :: Lens' Binding [Text]-bMembers-  = lens _bMembers (\ s a -> s{_bMembers = a}) .-      _Default-      . _Coerce---- | Role that is assigned to \`members\`. For example, \`roles\/viewer\`,--- \`roles\/editor\`, or \`roles\/owner\`.-bRole :: Lens' Binding (Maybe Text)-bRole = lens _bRole (\ s a -> s{_bRole = a})---- | Unimplemented. The condition that is associated with this binding. NOTE:--- an unsatisfied condition will not allow user access via current binding.--- Different bindings, including their conditions, are examined--- independently.-bCondition :: Lens' Binding (Maybe Expr)-bCondition-  = lens _bCondition (\ s a -> s{_bCondition = a})--instance FromJSON Binding where-        parseJSON-          = withObject "Binding"-              (\ o ->-                 Binding' <$>-                   (o .:? "members" .!= mempty) <*> (o .:? "role") <*>-                     (o .:? "condition"))--instance ToJSON Binding where-        toJSON Binding'{..}-          = object-              (catMaybes-                 [("members" .=) <$> _bMembers,-                  ("role" .=) <$> _bRole,-                  ("condition" .=) <$> _bCondition])---- |------ /See:/ 'deployment' smart constructor.-data Deployment =-  Deployment'-    { _dInsertTime  :: !(Maybe Text)-    , _dOperation   :: !(Maybe Operation)-    , _dFingerprint :: !(Maybe Bytes)-    , _dUpdateTime  :: !(Maybe Text)-    , _dSelfLink    :: !(Maybe Text)-    , _dName        :: !(Maybe Text)-    , _dManifest    :: !(Maybe Text)-    , _dId          :: !(Maybe (Textual Word64))-    , _dLabels      :: !(Maybe [DeploymentLabelEntry])-    , _dDescription :: !(Maybe Text)-    , _dUpdate      :: !(Maybe DeploymentUpdate)-    , _dTarget      :: !(Maybe TargetConfiguration)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Deployment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dInsertTime'------ * 'dOperation'------ * 'dFingerprint'------ * 'dUpdateTime'------ * 'dSelfLink'------ * 'dName'------ * 'dManifest'------ * 'dId'------ * 'dLabels'------ * 'dDescription'------ * 'dUpdate'------ * 'dTarget'-deployment-    :: Deployment-deployment =-  Deployment'-    { _dInsertTime = Nothing-    , _dOperation = Nothing-    , _dFingerprint = Nothing-    , _dUpdateTime = Nothing-    , _dSelfLink = Nothing-    , _dName = Nothing-    , _dManifest = Nothing-    , _dId = Nothing-    , _dLabels = Nothing-    , _dDescription = Nothing-    , _dUpdate = Nothing-    , _dTarget = Nothing-    }----- | Output only. Creation timestamp in RFC3339 text format.-dInsertTime :: Lens' Deployment (Maybe Text)-dInsertTime-  = lens _dInsertTime (\ s a -> s{_dInsertTime = a})---- | Output only. The Operation that most recently ran, or is currently--- running, on this deployment.-dOperation :: Lens' Deployment (Maybe Operation)-dOperation-  = lens _dOperation (\ s a -> s{_dOperation = a})---- | Provides a fingerprint to use in requests to modify a deployment, such--- as update(), stop(), and cancelPreview() requests. A fingerprint is a--- randomly generated value that must be provided with update(), stop(),--- and cancelPreview() requests to perform optimistic locking. This ensures--- optimistic concurrency so that only one request happens at a time. The--- fingerprint is initially generated by Deployment Manager and changes--- after every request to modify data. To get the latest fingerprint value,--- perform a get() request to a deployment.-dFingerprint :: Lens' Deployment (Maybe ByteString)-dFingerprint-  = lens _dFingerprint (\ s a -> s{_dFingerprint = a})-      . mapping _Bytes---- | Output only. Update timestamp in RFC3339 text format.-dUpdateTime :: Lens' Deployment (Maybe Text)-dUpdateTime-  = lens _dUpdateTime (\ s a -> s{_dUpdateTime = a})---- | Output only. Server defined URL for the resource.-dSelfLink :: Lens' Deployment (Maybe Text)-dSelfLink-  = lens _dSelfLink (\ s a -> s{_dSelfLink = a})---- | Name of the resource; provided by the client when the resource is--- created. The name must be 1-63 characters long, and comply with RFC1035.--- Specifically, the name must be 1-63 characters long and match the--- regular expression [a-z]([-a-z0-9]*[a-z0-9])? which means the first--- character must be a lowercase letter, and all following characters must--- be a dash, lowercase letter, or digit, except the last character, which--- cannot be a dash.-dName :: Lens' Deployment (Maybe Text)-dName = lens _dName (\ s a -> s{_dName = a})---- | Output only. URL of the manifest representing the last manifest that was--- successfully deployed.-dManifest :: Lens' Deployment (Maybe Text)-dManifest-  = lens _dManifest (\ s a -> s{_dManifest = a})--dId :: Lens' Deployment (Maybe Word64)-dId-  = lens _dId (\ s a -> s{_dId = a}) . mapping _Coerce---- | Map of labels; provided by the client when the resource is created or--- updated. Specifically: Label keys must be between 1 and 63 characters--- long and must conform to the following regular expression:--- [a-z]([-a-z0-9]*[a-z0-9])? Label values must be between 0 and 63--- characters long and must conform to the regular expression--- ([a-z]([-a-z0-9]*[a-z0-9])?)?-dLabels :: Lens' Deployment [DeploymentLabelEntry]-dLabels-  = lens _dLabels (\ s a -> s{_dLabels = a}) . _Default-      . _Coerce---- | An optional user-provided description of the deployment.-dDescription :: Lens' Deployment (Maybe Text)-dDescription-  = lens _dDescription (\ s a -> s{_dDescription = a})---- | Output only. If Deployment Manager is currently updating or previewing--- an update to this deployment, the updated configuration appears here.-dUpdate :: Lens' Deployment (Maybe DeploymentUpdate)-dUpdate = lens _dUpdate (\ s a -> s{_dUpdate = a})---- | [Input Only] The parameters that define your deployment, including the--- deployment configuration and relevant templates.-dTarget :: Lens' Deployment (Maybe TargetConfiguration)-dTarget = lens _dTarget (\ s a -> s{_dTarget = a})--instance FromJSON Deployment where-        parseJSON-          = withObject "Deployment"-              (\ o ->-                 Deployment' <$>-                   (o .:? "insertTime") <*> (o .:? "operation") <*>-                     (o .:? "fingerprint")-                     <*> (o .:? "updateTime")-                     <*> (o .:? "selfLink")-                     <*> (o .:? "name")-                     <*> (o .:? "manifest")-                     <*> (o .:? "id")-                     <*> (o .:? "labels" .!= mempty)-                     <*> (o .:? "description")-                     <*> (o .:? "update")-                     <*> (o .:? "target"))--instance ToJSON Deployment where-        toJSON Deployment'{..}-          = object-              (catMaybes-                 [("insertTime" .=) <$> _dInsertTime,-                  ("operation" .=) <$> _dOperation,-                  ("fingerprint" .=) <$> _dFingerprint,-                  ("updateTime" .=) <$> _dUpdateTime,-                  ("selfLink" .=) <$> _dSelfLink,-                  ("name" .=) <$> _dName,-                  ("manifest" .=) <$> _dManifest, ("id" .=) <$> _dId,-                  ("labels" .=) <$> _dLabels,-                  ("description" .=) <$> _dDescription,-                  ("update" .=) <$> _dUpdate,-                  ("target" .=) <$> _dTarget])
− gen/Network/Google/DeploymentManager/Types/Sum.hs 
@@ -1,181 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.DeploymentManager.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.DeploymentManager.Types.Sum where--import           Network.Google.Prelude hiding (Bytes)---- | Sets the policy to use for creating new resources.-data DeploymentsUpdateCreatePolicy-    = Acquire-      -- ^ @ACQUIRE@-    | CreateOrAcquire-      -- ^ @CREATE_OR_ACQUIRE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DeploymentsUpdateCreatePolicy--instance FromHttpApiData DeploymentsUpdateCreatePolicy where-    parseQueryParam = \case-        "ACQUIRE" -> Right Acquire-        "CREATE_OR_ACQUIRE" -> Right CreateOrAcquire-        x -> Left ("Unable to parse DeploymentsUpdateCreatePolicy from: " <> x)--instance ToHttpApiData DeploymentsUpdateCreatePolicy where-    toQueryParam = \case-        Acquire -> "ACQUIRE"-        CreateOrAcquire -> "CREATE_OR_ACQUIRE"--instance FromJSON DeploymentsUpdateCreatePolicy where-    parseJSON = parseJSONText "DeploymentsUpdateCreatePolicy"--instance ToJSON DeploymentsUpdateCreatePolicy where-    toJSON = toJSONText---- | Sets the policy to use for deleting resources.-data DeploymentsDeleteDeletePolicy-    = Abandon-      -- ^ @ABANDON@-    | Delete'-      -- ^ @DELETE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DeploymentsDeleteDeletePolicy--instance FromHttpApiData DeploymentsDeleteDeletePolicy where-    parseQueryParam = \case-        "ABANDON" -> Right Abandon-        "DELETE" -> Right Delete'-        x -> Left ("Unable to parse DeploymentsDeleteDeletePolicy from: " <> x)--instance ToHttpApiData DeploymentsDeleteDeletePolicy where-    toQueryParam = \case-        Abandon -> "ABANDON"-        Delete' -> "DELETE"--instance FromJSON DeploymentsDeleteDeletePolicy where-    parseJSON = parseJSONText "DeploymentsDeleteDeletePolicy"--instance ToJSON DeploymentsDeleteDeletePolicy where-    toJSON = toJSONText---- | Sets the policy to use for deleting resources.-data DeploymentsUpdateDeletePolicy-    = DUDPAbandon-      -- ^ @ABANDON@-    | DUDPDelete'-      -- ^ @DELETE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DeploymentsUpdateDeletePolicy--instance FromHttpApiData DeploymentsUpdateDeletePolicy where-    parseQueryParam = \case-        "ABANDON" -> Right DUDPAbandon-        "DELETE" -> Right DUDPDelete'-        x -> Left ("Unable to parse DeploymentsUpdateDeletePolicy from: " <> x)--instance ToHttpApiData DeploymentsUpdateDeletePolicy where-    toQueryParam = \case-        DUDPAbandon -> "ABANDON"-        DUDPDelete' -> "DELETE"--instance FromJSON DeploymentsUpdateDeletePolicy where-    parseJSON = parseJSONText "DeploymentsUpdateDeletePolicy"--instance ToJSON DeploymentsUpdateDeletePolicy where-    toJSON = toJSONText---- | Sets the policy to use for deleting resources.-data DeploymentsPatchDeletePolicy-    = DPDPAbandon-      -- ^ @ABANDON@-    | DPDPDelete'-      -- ^ @DELETE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DeploymentsPatchDeletePolicy--instance FromHttpApiData DeploymentsPatchDeletePolicy where-    parseQueryParam = \case-        "ABANDON" -> Right DPDPAbandon-        "DELETE" -> Right DPDPDelete'-        x -> Left ("Unable to parse DeploymentsPatchDeletePolicy from: " <> x)--instance ToHttpApiData DeploymentsPatchDeletePolicy where-    toQueryParam = \case-        DPDPAbandon -> "ABANDON"-        DPDPDelete' -> "DELETE"--instance FromJSON DeploymentsPatchDeletePolicy where-    parseJSON = parseJSONText "DeploymentsPatchDeletePolicy"--instance ToJSON DeploymentsPatchDeletePolicy where-    toJSON = toJSONText---- | Sets the policy to use for creating new resources.-data DeploymentsPatchCreatePolicy-    = DPCPAcquire-      -- ^ @ACQUIRE@-    | DPCPCreateOrAcquire-      -- ^ @CREATE_OR_ACQUIRE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DeploymentsPatchCreatePolicy--instance FromHttpApiData DeploymentsPatchCreatePolicy where-    parseQueryParam = \case-        "ACQUIRE" -> Right DPCPAcquire-        "CREATE_OR_ACQUIRE" -> Right DPCPCreateOrAcquire-        x -> Left ("Unable to parse DeploymentsPatchCreatePolicy from: " <> x)--instance ToHttpApiData DeploymentsPatchCreatePolicy where-    toQueryParam = \case-        DPCPAcquire -> "ACQUIRE"-        DPCPCreateOrAcquire -> "CREATE_OR_ACQUIRE"--instance FromJSON DeploymentsPatchCreatePolicy where-    parseJSON = parseJSONText "DeploymentsPatchCreatePolicy"--instance ToJSON DeploymentsPatchCreatePolicy where-    toJSON = toJSONText---- | Sets the policy to use for creating new resources.-data DeploymentsInsertCreatePolicy-    = DICPAcquire-      -- ^ @ACQUIRE@-    | DICPCreateOrAcquire-      -- ^ @CREATE_OR_ACQUIRE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DeploymentsInsertCreatePolicy--instance FromHttpApiData DeploymentsInsertCreatePolicy where-    parseQueryParam = \case-        "ACQUIRE" -> Right DICPAcquire-        "CREATE_OR_ACQUIRE" -> Right DICPCreateOrAcquire-        x -> Left ("Unable to parse DeploymentsInsertCreatePolicy from: " <> x)--instance ToHttpApiData DeploymentsInsertCreatePolicy where-    toQueryParam = \case-        DICPAcquire -> "ACQUIRE"-        DICPCreateOrAcquire -> "CREATE_OR_ACQUIRE"--instance FromJSON DeploymentsInsertCreatePolicy where-    parseJSON = parseJSONText "DeploymentsInsertCreatePolicy"--instance ToJSON DeploymentsInsertCreatePolicy where-    toJSON = toJSONText
− gen/Network/Google/Resource/DeploymentManager/Deployments/CancelPreview.hs 
@@ -1,123 +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.DeploymentManager.Deployments.CancelPreview--- 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)------ Cancels and removes the preview currently associated with the--- deployment.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.cancelPreview@.-module Network.Google.Resource.DeploymentManager.Deployments.CancelPreview-    (-    -- * REST Resource-      DeploymentsCancelPreviewResource--    -- * Creating a Request-    , deploymentsCancelPreview-    , DeploymentsCancelPreview--    -- * Request Lenses-    , dcpProject-    , dcpPayload-    , dcpDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.cancelPreview@ method which the--- 'DeploymentsCancelPreview' request conforms to.-type DeploymentsCancelPreviewResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   "cancelPreview" :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] DeploymentsCancelPreviewRequest :>-                         Post '[JSON] Operation---- | Cancels and removes the preview currently associated with the--- deployment.------ /See:/ 'deploymentsCancelPreview' smart constructor.-data DeploymentsCancelPreview =-  DeploymentsCancelPreview'-    { _dcpProject    :: !Text-    , _dcpPayload    :: !DeploymentsCancelPreviewRequest-    , _dcpDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsCancelPreview' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcpProject'------ * 'dcpPayload'------ * 'dcpDeployment'-deploymentsCancelPreview-    :: Text -- ^ 'dcpProject'-    -> DeploymentsCancelPreviewRequest -- ^ 'dcpPayload'-    -> Text -- ^ 'dcpDeployment'-    -> DeploymentsCancelPreview-deploymentsCancelPreview pDcpProject_ pDcpPayload_ pDcpDeployment_ =-  DeploymentsCancelPreview'-    { _dcpProject = pDcpProject_-    , _dcpPayload = pDcpPayload_-    , _dcpDeployment = pDcpDeployment_-    }----- | The project ID for this request.-dcpProject :: Lens' DeploymentsCancelPreview Text-dcpProject-  = lens _dcpProject (\ s a -> s{_dcpProject = a})---- | Multipart request metadata.-dcpPayload :: Lens' DeploymentsCancelPreview DeploymentsCancelPreviewRequest-dcpPayload-  = lens _dcpPayload (\ s a -> s{_dcpPayload = a})---- | The name of the deployment for this request.-dcpDeployment :: Lens' DeploymentsCancelPreview Text-dcpDeployment-  = lens _dcpDeployment-      (\ s a -> s{_dcpDeployment = a})--instance GoogleRequest DeploymentsCancelPreview where-        type Rs DeploymentsCancelPreview = Operation-        type Scopes DeploymentsCancelPreview =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsCancelPreview'{..}-          = go _dcpProject _dcpDeployment (Just AltJSON)-              _dcpPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsCancelPreviewResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs 
@@ -1,120 +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.DeploymentManager.Deployments.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 deployment and all of the resources in the deployment.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.delete@.-module Network.Google.Resource.DeploymentManager.Deployments.Delete-    (-    -- * REST Resource-      DeploymentsDeleteResource--    -- * Creating a Request-    , deploymentsDelete-    , DeploymentsDelete--    -- * Request Lenses-    , ddProject-    , ddDeletePolicy-    , ddDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.delete@ method which the--- 'DeploymentsDelete' request conforms to.-type DeploymentsDeleteResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   QueryParam "deletePolicy"-                     DeploymentsDeleteDeletePolicy-                     :>-                     QueryParam "alt" AltJSON :> Delete '[JSON] Operation---- | Deletes a deployment and all of the resources in the deployment.------ /See:/ 'deploymentsDelete' smart constructor.-data DeploymentsDelete =-  DeploymentsDelete'-    { _ddProject      :: !Text-    , _ddDeletePolicy :: !DeploymentsDeleteDeletePolicy-    , _ddDeployment   :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddProject'------ * 'ddDeletePolicy'------ * 'ddDeployment'-deploymentsDelete-    :: Text -- ^ 'ddProject'-    -> Text -- ^ 'ddDeployment'-    -> DeploymentsDelete-deploymentsDelete pDdProject_ pDdDeployment_ =-  DeploymentsDelete'-    { _ddProject = pDdProject_-    , _ddDeletePolicy = Delete'-    , _ddDeployment = pDdDeployment_-    }----- | The project ID for this request.-ddProject :: Lens' DeploymentsDelete Text-ddProject-  = lens _ddProject (\ s a -> s{_ddProject = a})---- | Sets the policy to use for deleting resources.-ddDeletePolicy :: Lens' DeploymentsDelete DeploymentsDeleteDeletePolicy-ddDeletePolicy-  = lens _ddDeletePolicy-      (\ s a -> s{_ddDeletePolicy = a})---- | The name of the deployment for this request.-ddDeployment :: Lens' DeploymentsDelete Text-ddDeployment-  = lens _ddDeployment (\ s a -> s{_ddDeployment = a})--instance GoogleRequest DeploymentsDelete where-        type Rs DeploymentsDelete = Operation-        type Scopes DeploymentsDelete =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsDelete'{..}-          = go _ddProject _ddDeployment (Just _ddDeletePolicy)-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsDeleteResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs 
@@ -1,103 +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.DeploymentManager.Deployments.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 information about a specific deployment.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.get@.-module Network.Google.Resource.DeploymentManager.Deployments.Get-    (-    -- * REST Resource-      DeploymentsGetResource--    -- * Creating a Request-    , deploymentsGet-    , DeploymentsGet--    -- * Request Lenses-    , dgProject-    , dgDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.get@ method which the--- 'DeploymentsGet' request conforms to.-type DeploymentsGetResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   QueryParam "alt" AltJSON :> Get '[JSON] Deployment---- | Gets information about a specific deployment.------ /See:/ 'deploymentsGet' smart constructor.-data DeploymentsGet =-  DeploymentsGet'-    { _dgProject    :: !Text-    , _dgDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dgProject'------ * 'dgDeployment'-deploymentsGet-    :: Text -- ^ 'dgProject'-    -> Text -- ^ 'dgDeployment'-    -> DeploymentsGet-deploymentsGet pDgProject_ pDgDeployment_ =-  DeploymentsGet' {_dgProject = pDgProject_, _dgDeployment = pDgDeployment_}----- | The project ID for this request.-dgProject :: Lens' DeploymentsGet Text-dgProject-  = lens _dgProject (\ s a -> s{_dgProject = a})---- | The name of the deployment for this request.-dgDeployment :: Lens' DeploymentsGet Text-dgDeployment-  = lens _dgDeployment (\ s a -> s{_dgDeployment = a})--instance GoogleRequest DeploymentsGet where-        type Rs DeploymentsGet = Deployment-        type Scopes DeploymentsGet =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient DeploymentsGet'{..}-          = go _dgProject _dgDeployment (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy DeploymentsGetResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/GetIAMPolicy.hs 
@@ -1,106 +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.DeploymentManager.Deployments.GetIAMPolicy--- 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 access control policy for a resource. May be empty if no such--- policy or resource exists.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.getIamPolicy@.-module Network.Google.Resource.DeploymentManager.Deployments.GetIAMPolicy-    (-    -- * REST Resource-      DeploymentsGetIAMPolicyResource--    -- * Creating a Request-    , deploymentsGetIAMPolicy-    , DeploymentsGetIAMPolicy--    -- * Request Lenses-    , dgipProject-    , dgipResource-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.getIamPolicy@ method which the--- 'DeploymentsGetIAMPolicy' request conforms to.-type DeploymentsGetIAMPolicyResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "resource" Text :>-                   "getIamPolicy" :>-                     QueryParam "alt" AltJSON :> Get '[JSON] Policy---- | Gets the access control policy for a resource. May be empty if no such--- policy or resource exists.------ /See:/ 'deploymentsGetIAMPolicy' smart constructor.-data DeploymentsGetIAMPolicy =-  DeploymentsGetIAMPolicy'-    { _dgipProject  :: !Text-    , _dgipResource :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsGetIAMPolicy' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dgipProject'------ * 'dgipResource'-deploymentsGetIAMPolicy-    :: Text -- ^ 'dgipProject'-    -> Text -- ^ 'dgipResource'-    -> DeploymentsGetIAMPolicy-deploymentsGetIAMPolicy pDgipProject_ pDgipResource_ =-  DeploymentsGetIAMPolicy'-    {_dgipProject = pDgipProject_, _dgipResource = pDgipResource_}----- | Project ID for this request.-dgipProject :: Lens' DeploymentsGetIAMPolicy Text-dgipProject-  = lens _dgipProject (\ s a -> s{_dgipProject = a})---- | Name or id of the resource for this request.-dgipResource :: Lens' DeploymentsGetIAMPolicy Text-dgipResource-  = lens _dgipResource (\ s a -> s{_dgipResource = a})--instance GoogleRequest DeploymentsGetIAMPolicy where-        type Rs DeploymentsGetIAMPolicy = Policy-        type Scopes DeploymentsGetIAMPolicy =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsGetIAMPolicy'{..}-          = go _dgipProject _dgipResource (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsGetIAMPolicyResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs 
@@ -1,141 +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.DeploymentManager.Deployments.Insert--- 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)------ Creates a deployment and all of the resources described by the--- deployment manifest.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.insert@.-module Network.Google.Resource.DeploymentManager.Deployments.Insert-    (-    -- * REST Resource-      DeploymentsInsertResource--    -- * Creating a Request-    , deploymentsInsert-    , DeploymentsInsert--    -- * Request Lenses-    , diCreatePolicy-    , diProject-    , diPayload-    , diPreview-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.insert@ method which the--- 'DeploymentsInsert' request conforms to.-type DeploymentsInsertResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 QueryParam "createPolicy"-                   DeploymentsInsertCreatePolicy-                   :>-                   QueryParam "preview" Bool :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] Deployment :> Post '[JSON] Operation---- | Creates a deployment and all of the resources described by the--- deployment manifest.------ /See:/ 'deploymentsInsert' smart constructor.-data DeploymentsInsert =-  DeploymentsInsert'-    { _diCreatePolicy :: !DeploymentsInsertCreatePolicy-    , _diProject      :: !Text-    , _diPayload      :: !Deployment-    , _diPreview      :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'diCreatePolicy'------ * 'diProject'------ * 'diPayload'------ * 'diPreview'-deploymentsInsert-    :: Text -- ^ 'diProject'-    -> Deployment -- ^ 'diPayload'-    -> DeploymentsInsert-deploymentsInsert pDiProject_ pDiPayload_ =-  DeploymentsInsert'-    { _diCreatePolicy = DICPCreateOrAcquire-    , _diProject = pDiProject_-    , _diPayload = pDiPayload_-    , _diPreview = Nothing-    }----- | Sets the policy to use for creating new resources.-diCreatePolicy :: Lens' DeploymentsInsert DeploymentsInsertCreatePolicy-diCreatePolicy-  = lens _diCreatePolicy-      (\ s a -> s{_diCreatePolicy = a})---- | The project ID for this request.-diProject :: Lens' DeploymentsInsert Text-diProject-  = lens _diProject (\ s a -> s{_diProject = a})---- | Multipart request metadata.-diPayload :: Lens' DeploymentsInsert Deployment-diPayload-  = lens _diPayload (\ s a -> s{_diPayload = a})---- | If set to true, creates a deployment and creates \"shell\" resources but--- does not actually instantiate these resources. This allows you to--- preview what your deployment looks like. After previewing a deployment,--- you can deploy your resources by making a request with the update()--- method or you can use the cancelPreview() method to cancel the preview--- altogether. Note that the deployment will still exist after you cancel--- the preview and you must separately delete this deployment if you want--- to remove it.-diPreview :: Lens' DeploymentsInsert (Maybe Bool)-diPreview-  = lens _diPreview (\ s a -> s{_diPreview = a})--instance GoogleRequest DeploymentsInsert where-        type Rs DeploymentsInsert = Operation-        type Scopes DeploymentsInsert =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsInsert'{..}-          = go _diProject (Just _diCreatePolicy) _diPreview-              (Just AltJSON)-              _diPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsInsertResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs 
@@ -1,169 +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.DeploymentManager.Deployments.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 all deployments for a given project.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.list@.-module Network.Google.Resource.DeploymentManager.Deployments.List-    (-    -- * REST Resource-      DeploymentsListResource--    -- * Creating a Request-    , deploymentsList-    , DeploymentsList--    -- * Request Lenses-    , dlOrderBy-    , dlProject-    , dlFilter-    , dlPageToken-    , dlMaxResults-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.list@ method which the--- 'DeploymentsList' request conforms to.-type DeploymentsListResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 QueryParam "orderBy" Text :>-                   QueryParam "filter" Text :>-                     QueryParam "pageToken" Text :>-                       QueryParam "maxResults" (Textual Word32) :>-                         QueryParam "alt" AltJSON :>-                           Get '[JSON] DeploymentsListResponse---- | Lists all deployments for a given project.------ /See:/ 'deploymentsList' smart constructor.-data DeploymentsList =-  DeploymentsList'-    { _dlOrderBy    :: !(Maybe Text)-    , _dlProject    :: !Text-    , _dlFilter     :: !(Maybe Text)-    , _dlPageToken  :: !(Maybe Text)-    , _dlMaxResults :: !(Textual Word32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlOrderBy'------ * 'dlProject'------ * 'dlFilter'------ * 'dlPageToken'------ * 'dlMaxResults'-deploymentsList-    :: Text -- ^ 'dlProject'-    -> DeploymentsList-deploymentsList pDlProject_ =-  DeploymentsList'-    { _dlOrderBy = Nothing-    , _dlProject = pDlProject_-    , _dlFilter = Nothing-    , _dlPageToken = Nothing-    , _dlMaxResults = 500-    }----- | Sorts list results by a certain order. By default, results are returned--- in alphanumerical order based on the resource name. You can also sort--- results in descending order based on the creation timestamp using--- orderBy=\"creationTimestamp desc\". This sorts results based on the--- creationTimestamp field in reverse chronological order (newest result--- first). Use this to sort resources like operations so that the newest--- operation is returned first. Currently, only sorting by name or--- creationTimestamp desc is supported.-dlOrderBy :: Lens' DeploymentsList (Maybe Text)-dlOrderBy-  = lens _dlOrderBy (\ s a -> s{_dlOrderBy = a})---- | The project ID for this request.-dlProject :: Lens' DeploymentsList Text-dlProject-  = lens _dlProject (\ s a -> s{_dlProject = a})---- | A filter expression that filters resources listed in the response. The--- expression must specify the field name, a comparison operator, and the--- value that you want to use for filtering. The value must be a string, a--- number, or a boolean. The comparison operator must be either =, !=, >,--- or \<. For example, if you are filtering Compute Engine instances, you--- can exclude instances named example-instance by specifying name !=--- example-instance. You can also filter nested fields. For example, you--- could specify scheduling.automaticRestart = false to include instances--- only if they are not scheduled for automatic restarts. You can use--- filtering on nested fields to filter based on resource labels. To filter--- on multiple expressions, provide each separate expression within--- parentheses. For example, (scheduling.automaticRestart = true)--- (cpuPlatform = \"Intel Skylake\"). By default, each expression is an AND--- expression. However, you can include AND and OR expressions explicitly.--- For example, (cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel--- Broadwell\") AND (scheduling.automaticRestart = true).-dlFilter :: Lens' DeploymentsList (Maybe Text)-dlFilter = lens _dlFilter (\ s a -> s{_dlFilter = a})---- | Specifies a page token to use. Set pageToken to the nextPageToken--- returned by a previous list request to get the next page of results.-dlPageToken :: Lens' DeploymentsList (Maybe Text)-dlPageToken-  = lens _dlPageToken (\ s a -> s{_dlPageToken = a})---- | The maximum number of results per page that should be returned. If the--- number of available results is larger than maxResults, Compute Engine--- returns a nextPageToken that can be used to get the next page of results--- in subsequent list requests. Acceptable values are 0 to 500, inclusive.--- (Default: 500)-dlMaxResults :: Lens' DeploymentsList Word32-dlMaxResults-  = lens _dlMaxResults (\ s a -> s{_dlMaxResults = a})-      . _Coerce--instance GoogleRequest DeploymentsList where-        type Rs DeploymentsList = DeploymentsListResponse-        type Scopes DeploymentsList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient DeploymentsList'{..}-          = go _dlProject _dlOrderBy _dlFilter _dlPageToken-              (Just _dlMaxResults)-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsListResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs 
@@ -1,171 +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.DeploymentManager.Deployments.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)------ Updates a deployment and all of the resources described by the--- deployment manifest. This method supports patch semantics.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.patch@.-module Network.Google.Resource.DeploymentManager.Deployments.Patch-    (-    -- * REST Resource-      DeploymentsPatchResource--    -- * Creating a Request-    , deploymentsPatch-    , DeploymentsPatch--    -- * Request Lenses-    , dpCreatePolicy-    , dpProject-    , dpPayload-    , dpDeletePolicy-    , dpPreview-    , dpDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.patch@ method which the--- 'DeploymentsPatch' request conforms to.-type DeploymentsPatchResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   QueryParam "createPolicy"-                     DeploymentsPatchCreatePolicy-                     :>-                     QueryParam "deletePolicy"-                       DeploymentsPatchDeletePolicy-                       :>-                       QueryParam "preview" Bool :>-                         QueryParam "alt" AltJSON :>-                           ReqBody '[JSON] Deployment :> Patch '[JSON] Operation---- | Updates a deployment and all of the resources described by the--- deployment manifest. This method supports patch semantics.------ /See:/ 'deploymentsPatch' smart constructor.-data DeploymentsPatch =-  DeploymentsPatch'-    { _dpCreatePolicy :: !DeploymentsPatchCreatePolicy-    , _dpProject      :: !Text-    , _dpPayload      :: !Deployment-    , _dpDeletePolicy :: !DeploymentsPatchDeletePolicy-    , _dpPreview      :: !Bool-    , _dpDeployment   :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dpCreatePolicy'------ * 'dpProject'------ * 'dpPayload'------ * 'dpDeletePolicy'------ * 'dpPreview'------ * 'dpDeployment'-deploymentsPatch-    :: Text -- ^ 'dpProject'-    -> Deployment -- ^ 'dpPayload'-    -> Text -- ^ 'dpDeployment'-    -> DeploymentsPatch-deploymentsPatch pDpProject_ pDpPayload_ pDpDeployment_ =-  DeploymentsPatch'-    { _dpCreatePolicy = DPCPCreateOrAcquire-    , _dpProject = pDpProject_-    , _dpPayload = pDpPayload_-    , _dpDeletePolicy = DPDPDelete'-    , _dpPreview = False-    , _dpDeployment = pDpDeployment_-    }----- | Sets the policy to use for creating new resources.-dpCreatePolicy :: Lens' DeploymentsPatch DeploymentsPatchCreatePolicy-dpCreatePolicy-  = lens _dpCreatePolicy-      (\ s a -> s{_dpCreatePolicy = a})---- | The project ID for this request.-dpProject :: Lens' DeploymentsPatch Text-dpProject-  = lens _dpProject (\ s a -> s{_dpProject = a})---- | Multipart request metadata.-dpPayload :: Lens' DeploymentsPatch Deployment-dpPayload-  = lens _dpPayload (\ s a -> s{_dpPayload = a})---- | Sets the policy to use for deleting resources.-dpDeletePolicy :: Lens' DeploymentsPatch DeploymentsPatchDeletePolicy-dpDeletePolicy-  = lens _dpDeletePolicy-      (\ s a -> s{_dpDeletePolicy = a})---- | If set to true, updates the deployment and creates and updates the--- \"shell\" resources but does not actually alter or instantiate these--- resources. This allows you to preview what your deployment will look--- like. You can use this intent to preview how an update would affect your--- deployment. You must provide a target.config with a configuration if--- this is set to true. After previewing a deployment, you can deploy your--- resources by making a request with the update() or you can--- cancelPreview() to remove the preview altogether. Note that the--- deployment will still exist after you cancel the preview and you must--- separately delete this deployment if you want to remove it.-dpPreview :: Lens' DeploymentsPatch Bool-dpPreview-  = lens _dpPreview (\ s a -> s{_dpPreview = a})---- | The name of the deployment for this request.-dpDeployment :: Lens' DeploymentsPatch Text-dpDeployment-  = lens _dpDeployment (\ s a -> s{_dpDeployment = a})--instance GoogleRequest DeploymentsPatch where-        type Rs DeploymentsPatch = Operation-        type Scopes DeploymentsPatch =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsPatch'{..}-          = go _dpProject _dpDeployment (Just _dpCreatePolicy)-              (Just _dpDeletePolicy)-              (Just _dpPreview)-              (Just AltJSON)-              _dpPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsPatchResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/SetIAMPolicy.hs 
@@ -1,122 +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.DeploymentManager.Deployments.SetIAMPolicy--- 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)------ Sets the access control policy on the specified resource. Replaces any--- existing policy.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.setIamPolicy@.-module Network.Google.Resource.DeploymentManager.Deployments.SetIAMPolicy-    (-    -- * REST Resource-      DeploymentsSetIAMPolicyResource--    -- * Creating a Request-    , deploymentsSetIAMPolicy-    , DeploymentsSetIAMPolicy--    -- * Request Lenses-    , dsipProject-    , dsipPayload-    , dsipResource-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.setIamPolicy@ method which the--- 'DeploymentsSetIAMPolicy' request conforms to.-type DeploymentsSetIAMPolicyResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "resource" Text :>-                   "setIamPolicy" :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] GlobalSetPolicyRequest :>-                         Post '[JSON] Policy---- | Sets the access control policy on the specified resource. Replaces any--- existing policy.------ /See:/ 'deploymentsSetIAMPolicy' smart constructor.-data DeploymentsSetIAMPolicy =-  DeploymentsSetIAMPolicy'-    { _dsipProject  :: !Text-    , _dsipPayload  :: !GlobalSetPolicyRequest-    , _dsipResource :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsSetIAMPolicy' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsipProject'------ * 'dsipPayload'------ * 'dsipResource'-deploymentsSetIAMPolicy-    :: Text -- ^ 'dsipProject'-    -> GlobalSetPolicyRequest -- ^ 'dsipPayload'-    -> Text -- ^ 'dsipResource'-    -> DeploymentsSetIAMPolicy-deploymentsSetIAMPolicy pDsipProject_ pDsipPayload_ pDsipResource_ =-  DeploymentsSetIAMPolicy'-    { _dsipProject = pDsipProject_-    , _dsipPayload = pDsipPayload_-    , _dsipResource = pDsipResource_-    }----- | Project ID for this request.-dsipProject :: Lens' DeploymentsSetIAMPolicy Text-dsipProject-  = lens _dsipProject (\ s a -> s{_dsipProject = a})---- | Multipart request metadata.-dsipPayload :: Lens' DeploymentsSetIAMPolicy GlobalSetPolicyRequest-dsipPayload-  = lens _dsipPayload (\ s a -> s{_dsipPayload = a})---- | Name or id of the resource for this request.-dsipResource :: Lens' DeploymentsSetIAMPolicy Text-dsipResource-  = lens _dsipResource (\ s a -> s{_dsipResource = a})--instance GoogleRequest DeploymentsSetIAMPolicy where-        type Rs DeploymentsSetIAMPolicy = Policy-        type Scopes DeploymentsSetIAMPolicy =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsSetIAMPolicy'{..}-          = go _dsipProject _dsipResource (Just AltJSON)-              _dsipPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsSetIAMPolicyResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/Stop.hs 
@@ -1,122 +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.DeploymentManager.Deployments.Stop--- 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)------ Stops an ongoing operation. This does not roll back any work that has--- already been completed, but prevents any new work from being started.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.stop@.-module Network.Google.Resource.DeploymentManager.Deployments.Stop-    (-    -- * REST Resource-      DeploymentsStopResource--    -- * Creating a Request-    , deploymentsStop-    , DeploymentsStop--    -- * Request Lenses-    , dsProject-    , dsPayload-    , dsDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.stop@ method which the--- 'DeploymentsStop' request conforms to.-type DeploymentsStopResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   "stop" :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] DeploymentsStopRequest :>-                         Post '[JSON] Operation---- | Stops an ongoing operation. This does not roll back any work that has--- already been completed, but prevents any new work from being started.------ /See:/ 'deploymentsStop' smart constructor.-data DeploymentsStop =-  DeploymentsStop'-    { _dsProject    :: !Text-    , _dsPayload    :: !DeploymentsStopRequest-    , _dsDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsStop' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsProject'------ * 'dsPayload'------ * 'dsDeployment'-deploymentsStop-    :: Text -- ^ 'dsProject'-    -> DeploymentsStopRequest -- ^ 'dsPayload'-    -> Text -- ^ 'dsDeployment'-    -> DeploymentsStop-deploymentsStop pDsProject_ pDsPayload_ pDsDeployment_ =-  DeploymentsStop'-    { _dsProject = pDsProject_-    , _dsPayload = pDsPayload_-    , _dsDeployment = pDsDeployment_-    }----- | The project ID for this request.-dsProject :: Lens' DeploymentsStop Text-dsProject-  = lens _dsProject (\ s a -> s{_dsProject = a})---- | Multipart request metadata.-dsPayload :: Lens' DeploymentsStop DeploymentsStopRequest-dsPayload-  = lens _dsPayload (\ s a -> s{_dsPayload = a})---- | The name of the deployment for this request.-dsDeployment :: Lens' DeploymentsStop Text-dsDeployment-  = lens _dsDeployment (\ s a -> s{_dsDeployment = a})--instance GoogleRequest DeploymentsStop where-        type Rs DeploymentsStop = Operation-        type Scopes DeploymentsStop =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsStop'{..}-          = go _dsProject _dsDeployment (Just AltJSON)-              _dsPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsStopResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/TestIAMPermissions.hs 
@@ -1,123 +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.DeploymentManager.Deployments.TestIAMPermissions--- 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)------ Returns permissions that a caller has on the specified resource.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.testIamPermissions@.-module Network.Google.Resource.DeploymentManager.Deployments.TestIAMPermissions-    (-    -- * REST Resource-      DeploymentsTestIAMPermissionsResource--    -- * Creating a Request-    , deploymentsTestIAMPermissions-    , DeploymentsTestIAMPermissions--    -- * Request Lenses-    , dtipProject-    , dtipPayload-    , dtipResource-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.testIamPermissions@ method which the--- 'DeploymentsTestIAMPermissions' request conforms to.-type DeploymentsTestIAMPermissionsResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "resource" Text :>-                   "testIamPermissions" :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] TestPermissionsRequest :>-                         Post '[JSON] TestPermissionsResponse---- | Returns permissions that a caller has on the specified resource.------ /See:/ 'deploymentsTestIAMPermissions' smart constructor.-data DeploymentsTestIAMPermissions =-  DeploymentsTestIAMPermissions'-    { _dtipProject  :: !Text-    , _dtipPayload  :: !TestPermissionsRequest-    , _dtipResource :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsTestIAMPermissions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtipProject'------ * 'dtipPayload'------ * 'dtipResource'-deploymentsTestIAMPermissions-    :: Text -- ^ 'dtipProject'-    -> TestPermissionsRequest -- ^ 'dtipPayload'-    -> Text -- ^ 'dtipResource'-    -> DeploymentsTestIAMPermissions-deploymentsTestIAMPermissions pDtipProject_ pDtipPayload_ pDtipResource_ =-  DeploymentsTestIAMPermissions'-    { _dtipProject = pDtipProject_-    , _dtipPayload = pDtipPayload_-    , _dtipResource = pDtipResource_-    }----- | Project ID for this request.-dtipProject :: Lens' DeploymentsTestIAMPermissions Text-dtipProject-  = lens _dtipProject (\ s a -> s{_dtipProject = a})---- | Multipart request metadata.-dtipPayload :: Lens' DeploymentsTestIAMPermissions TestPermissionsRequest-dtipPayload-  = lens _dtipPayload (\ s a -> s{_dtipPayload = a})---- | Name or id of the resource for this request.-dtipResource :: Lens' DeploymentsTestIAMPermissions Text-dtipResource-  = lens _dtipResource (\ s a -> s{_dtipResource = a})--instance GoogleRequest DeploymentsTestIAMPermissions-         where-        type Rs DeploymentsTestIAMPermissions =-             TestPermissionsResponse-        type Scopes DeploymentsTestIAMPermissions =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsTestIAMPermissions'{..}-          = go _dtipProject _dtipResource (Just AltJSON)-              _dtipPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy DeploymentsTestIAMPermissionsResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs 
@@ -1,171 +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.DeploymentManager.Deployments.Update--- 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)------ Updates a deployment and all of the resources described by the--- deployment manifest.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.deployments.update@.-module Network.Google.Resource.DeploymentManager.Deployments.Update-    (-    -- * REST Resource-      DeploymentsUpdateResource--    -- * Creating a Request-    , deploymentsUpdate-    , DeploymentsUpdate--    -- * Request Lenses-    , duCreatePolicy-    , duProject-    , duPayload-    , duDeletePolicy-    , duPreview-    , duDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.deployments.update@ method which the--- 'DeploymentsUpdate' request conforms to.-type DeploymentsUpdateResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   QueryParam "createPolicy"-                     DeploymentsUpdateCreatePolicy-                     :>-                     QueryParam "deletePolicy"-                       DeploymentsUpdateDeletePolicy-                       :>-                       QueryParam "preview" Bool :>-                         QueryParam "alt" AltJSON :>-                           ReqBody '[JSON] Deployment :> Put '[JSON] Operation---- | Updates a deployment and all of the resources described by the--- deployment manifest.------ /See:/ 'deploymentsUpdate' smart constructor.-data DeploymentsUpdate =-  DeploymentsUpdate'-    { _duCreatePolicy :: !DeploymentsUpdateCreatePolicy-    , _duProject      :: !Text-    , _duPayload      :: !Deployment-    , _duDeletePolicy :: !DeploymentsUpdateDeletePolicy-    , _duPreview      :: !Bool-    , _duDeployment   :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeploymentsUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'duCreatePolicy'------ * 'duProject'------ * 'duPayload'------ * 'duDeletePolicy'------ * 'duPreview'------ * 'duDeployment'-deploymentsUpdate-    :: Text -- ^ 'duProject'-    -> Deployment -- ^ 'duPayload'-    -> Text -- ^ 'duDeployment'-    -> DeploymentsUpdate-deploymentsUpdate pDuProject_ pDuPayload_ pDuDeployment_ =-  DeploymentsUpdate'-    { _duCreatePolicy = CreateOrAcquire-    , _duProject = pDuProject_-    , _duPayload = pDuPayload_-    , _duDeletePolicy = DUDPDelete'-    , _duPreview = False-    , _duDeployment = pDuDeployment_-    }----- | Sets the policy to use for creating new resources.-duCreatePolicy :: Lens' DeploymentsUpdate DeploymentsUpdateCreatePolicy-duCreatePolicy-  = lens _duCreatePolicy-      (\ s a -> s{_duCreatePolicy = a})---- | The project ID for this request.-duProject :: Lens' DeploymentsUpdate Text-duProject-  = lens _duProject (\ s a -> s{_duProject = a})---- | Multipart request metadata.-duPayload :: Lens' DeploymentsUpdate Deployment-duPayload-  = lens _duPayload (\ s a -> s{_duPayload = a})---- | Sets the policy to use for deleting resources.-duDeletePolicy :: Lens' DeploymentsUpdate DeploymentsUpdateDeletePolicy-duDeletePolicy-  = lens _duDeletePolicy-      (\ s a -> s{_duDeletePolicy = a})---- | If set to true, updates the deployment and creates and updates the--- \"shell\" resources but does not actually alter or instantiate these--- resources. This allows you to preview what your deployment will look--- like. You can use this intent to preview how an update would affect your--- deployment. You must provide a target.config with a configuration if--- this is set to true. After previewing a deployment, you can deploy your--- resources by making a request with the update() or you can--- cancelPreview() to remove the preview altogether. Note that the--- deployment will still exist after you cancel the preview and you must--- separately delete this deployment if you want to remove it.-duPreview :: Lens' DeploymentsUpdate Bool-duPreview-  = lens _duPreview (\ s a -> s{_duPreview = a})---- | The name of the deployment for this request.-duDeployment :: Lens' DeploymentsUpdate Text-duDeployment-  = lens _duDeployment (\ s a -> s{_duDeployment = a})--instance GoogleRequest DeploymentsUpdate where-        type Rs DeploymentsUpdate = Operation-        type Scopes DeploymentsUpdate =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/ndev.cloudman"]-        requestClient DeploymentsUpdate'{..}-          = go _duProject _duDeployment (Just _duCreatePolicy)-              (Just _duDeletePolicy)-              (Just _duPreview)-              (Just AltJSON)-              _duPayload-              deploymentManagerService-          where go-                  = buildClient-                      (Proxy :: Proxy DeploymentsUpdateResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs 
@@ -1,120 +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.DeploymentManager.Manifests.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 information about a specific manifest.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.manifests.get@.-module Network.Google.Resource.DeploymentManager.Manifests.Get-    (-    -- * REST Resource-      ManifestsGetResource--    -- * Creating a Request-    , manifestsGet-    , ManifestsGet--    -- * Request Lenses-    , mgProject-    , mgManifest-    , mgDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.manifests.get@ method which the--- 'ManifestsGet' request conforms to.-type ManifestsGetResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   "manifests" :>-                     Capture "manifest" Text :>-                       QueryParam "alt" AltJSON :> Get '[JSON] Manifest---- | Gets information about a specific manifest.------ /See:/ 'manifestsGet' smart constructor.-data ManifestsGet =-  ManifestsGet'-    { _mgProject    :: !Text-    , _mgManifest   :: !Text-    , _mgDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ManifestsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mgProject'------ * 'mgManifest'------ * 'mgDeployment'-manifestsGet-    :: Text -- ^ 'mgProject'-    -> Text -- ^ 'mgManifest'-    -> Text -- ^ 'mgDeployment'-    -> ManifestsGet-manifestsGet pMgProject_ pMgManifest_ pMgDeployment_ =-  ManifestsGet'-    { _mgProject = pMgProject_-    , _mgManifest = pMgManifest_-    , _mgDeployment = pMgDeployment_-    }----- | The project ID for this request.-mgProject :: Lens' ManifestsGet Text-mgProject-  = lens _mgProject (\ s a -> s{_mgProject = a})---- | The name of the manifest for this request.-mgManifest :: Lens' ManifestsGet Text-mgManifest-  = lens _mgManifest (\ s a -> s{_mgManifest = a})---- | The name of the deployment for this request.-mgDeployment :: Lens' ManifestsGet Text-mgDeployment-  = lens _mgDeployment (\ s a -> s{_mgDeployment = a})--instance GoogleRequest ManifestsGet where-        type Rs ManifestsGet = Manifest-        type Scopes ManifestsGet =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient ManifestsGet'{..}-          = go _mgProject _mgDeployment _mgManifest-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy ManifestsGetResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs 
@@ -1,182 +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.DeploymentManager.Manifests.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 all manifests for a given deployment.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.manifests.list@.-module Network.Google.Resource.DeploymentManager.Manifests.List-    (-    -- * REST Resource-      ManifestsListResource--    -- * Creating a Request-    , manifestsList-    , ManifestsList--    -- * Request Lenses-    , mlOrderBy-    , mlProject-    , mlFilter-    , mlPageToken-    , mlMaxResults-    , mlDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.manifests.list@ method which the--- 'ManifestsList' request conforms to.-type ManifestsListResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   "manifests" :>-                     QueryParam "orderBy" Text :>-                       QueryParam "filter" Text :>-                         QueryParam "pageToken" Text :>-                           QueryParam "maxResults" (Textual Word32) :>-                             QueryParam "alt" AltJSON :>-                               Get '[JSON] ManifestsListResponse---- | Lists all manifests for a given deployment.------ /See:/ 'manifestsList' smart constructor.-data ManifestsList =-  ManifestsList'-    { _mlOrderBy    :: !(Maybe Text)-    , _mlProject    :: !Text-    , _mlFilter     :: !(Maybe Text)-    , _mlPageToken  :: !(Maybe Text)-    , _mlMaxResults :: !(Textual Word32)-    , _mlDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ManifestsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mlOrderBy'------ * 'mlProject'------ * 'mlFilter'------ * 'mlPageToken'------ * 'mlMaxResults'------ * 'mlDeployment'-manifestsList-    :: Text -- ^ 'mlProject'-    -> Text -- ^ 'mlDeployment'-    -> ManifestsList-manifestsList pMlProject_ pMlDeployment_ =-  ManifestsList'-    { _mlOrderBy = Nothing-    , _mlProject = pMlProject_-    , _mlFilter = Nothing-    , _mlPageToken = Nothing-    , _mlMaxResults = 500-    , _mlDeployment = pMlDeployment_-    }----- | Sorts list results by a certain order. By default, results are returned--- in alphanumerical order based on the resource name. You can also sort--- results in descending order based on the creation timestamp using--- orderBy=\"creationTimestamp desc\". This sorts results based on the--- creationTimestamp field in reverse chronological order (newest result--- first). Use this to sort resources like operations so that the newest--- operation is returned first. Currently, only sorting by name or--- creationTimestamp desc is supported.-mlOrderBy :: Lens' ManifestsList (Maybe Text)-mlOrderBy-  = lens _mlOrderBy (\ s a -> s{_mlOrderBy = a})---- | The project ID for this request.-mlProject :: Lens' ManifestsList Text-mlProject-  = lens _mlProject (\ s a -> s{_mlProject = a})---- | A filter expression that filters resources listed in the response. The--- expression must specify the field name, a comparison operator, and the--- value that you want to use for filtering. The value must be a string, a--- number, or a boolean. The comparison operator must be either =, !=, >,--- or \<. For example, if you are filtering Compute Engine instances, you--- can exclude instances named example-instance by specifying name !=--- example-instance. You can also filter nested fields. For example, you--- could specify scheduling.automaticRestart = false to include instances--- only if they are not scheduled for automatic restarts. You can use--- filtering on nested fields to filter based on resource labels. To filter--- on multiple expressions, provide each separate expression within--- parentheses. For example, (scheduling.automaticRestart = true)--- (cpuPlatform = \"Intel Skylake\"). By default, each expression is an AND--- expression. However, you can include AND and OR expressions explicitly.--- For example, (cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel--- Broadwell\") AND (scheduling.automaticRestart = true).-mlFilter :: Lens' ManifestsList (Maybe Text)-mlFilter = lens _mlFilter (\ s a -> s{_mlFilter = a})---- | Specifies a page token to use. Set pageToken to the nextPageToken--- returned by a previous list request to get the next page of results.-mlPageToken :: Lens' ManifestsList (Maybe Text)-mlPageToken-  = lens _mlPageToken (\ s a -> s{_mlPageToken = a})---- | The maximum number of results per page that should be returned. If the--- number of available results is larger than maxResults, Compute Engine--- returns a nextPageToken that can be used to get the next page of results--- in subsequent list requests. Acceptable values are 0 to 500, inclusive.--- (Default: 500)-mlMaxResults :: Lens' ManifestsList Word32-mlMaxResults-  = lens _mlMaxResults (\ s a -> s{_mlMaxResults = a})-      . _Coerce---- | The name of the deployment for this request.-mlDeployment :: Lens' ManifestsList Text-mlDeployment-  = lens _mlDeployment (\ s a -> s{_mlDeployment = a})--instance GoogleRequest ManifestsList where-        type Rs ManifestsList = ManifestsListResponse-        type Scopes ManifestsList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient ManifestsList'{..}-          = go _mlProject _mlDeployment _mlOrderBy _mlFilter-              _mlPageToken-              (Just _mlMaxResults)-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy ManifestsListResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs 
@@ -1,103 +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.DeploymentManager.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 information about a specific operation.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.operations.get@.-module Network.Google.Resource.DeploymentManager.Operations.Get-    (-    -- * REST Resource-      OperationsGetResource--    -- * Creating a Request-    , operationsGet-    , OperationsGet--    -- * Request Lenses-    , ogProject-    , ogOperation-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.operations.get@ method which the--- 'OperationsGet' request conforms to.-type OperationsGetResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "operations" :>-                 Capture "operation" Text :>-                   QueryParam "alt" AltJSON :> Get '[JSON] Operation---- | Gets information about a specific operation.------ /See:/ 'operationsGet' smart constructor.-data OperationsGet =-  OperationsGet'-    { _ogProject   :: !Text-    , _ogOperation :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ogProject'------ * 'ogOperation'-operationsGet-    :: Text -- ^ 'ogProject'-    -> Text -- ^ 'ogOperation'-    -> OperationsGet-operationsGet pOgProject_ pOgOperation_ =-  OperationsGet' {_ogProject = pOgProject_, _ogOperation = pOgOperation_}----- | The project ID for this request.-ogProject :: Lens' OperationsGet Text-ogProject-  = lens _ogProject (\ s a -> s{_ogProject = a})---- | The name of the operation for this request.-ogOperation :: Lens' OperationsGet Text-ogOperation-  = lens _ogOperation (\ s a -> s{_ogOperation = a})--instance GoogleRequest OperationsGet where-        type Rs OperationsGet = Operation-        type Scopes OperationsGet =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient OperationsGet'{..}-          = go _ogProject _ogOperation (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy OperationsGetResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Operations/List.hs 
@@ -1,168 +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.DeploymentManager.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 all operations for a project.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.operations.list@.-module Network.Google.Resource.DeploymentManager.Operations.List-    (-    -- * REST Resource-      OperationsListResource--    -- * Creating a Request-    , operationsList-    , OperationsList--    -- * Request Lenses-    , olOrderBy-    , olProject-    , olFilter-    , olPageToken-    , olMaxResults-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.operations.list@ method which the--- 'OperationsList' request conforms to.-type OperationsListResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "operations" :>-                 QueryParam "orderBy" Text :>-                   QueryParam "filter" Text :>-                     QueryParam "pageToken" Text :>-                       QueryParam "maxResults" (Textual Word32) :>-                         QueryParam "alt" AltJSON :>-                           Get '[JSON] OperationsListResponse---- | Lists all operations for a project.------ /See:/ 'operationsList' smart constructor.-data OperationsList =-  OperationsList'-    { _olOrderBy    :: !(Maybe Text)-    , _olProject    :: !Text-    , _olFilter     :: !(Maybe Text)-    , _olPageToken  :: !(Maybe Text)-    , _olMaxResults :: !(Textual Word32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'olOrderBy'------ * 'olProject'------ * 'olFilter'------ * 'olPageToken'------ * 'olMaxResults'-operationsList-    :: Text -- ^ 'olProject'-    -> OperationsList-operationsList pOlProject_ =-  OperationsList'-    { _olOrderBy = Nothing-    , _olProject = pOlProject_-    , _olFilter = Nothing-    , _olPageToken = Nothing-    , _olMaxResults = 500-    }----- | Sorts list results by a certain order. By default, results are returned--- in alphanumerical order based on the resource name. You can also sort--- results in descending order based on the creation timestamp using--- orderBy=\"creationTimestamp desc\". This sorts results based on the--- creationTimestamp field in reverse chronological order (newest result--- first). Use this to sort resources like operations so that the newest--- operation is returned first. Currently, only sorting by name or--- creationTimestamp desc is supported.-olOrderBy :: Lens' OperationsList (Maybe Text)-olOrderBy-  = lens _olOrderBy (\ s a -> s{_olOrderBy = a})---- | The project ID for this request.-olProject :: Lens' OperationsList Text-olProject-  = lens _olProject (\ s a -> s{_olProject = a})---- | A filter expression that filters resources listed in the response. The--- expression must specify the field name, a comparison operator, and the--- value that you want to use for filtering. The value must be a string, a--- number, or a boolean. The comparison operator must be either =, !=, >,--- or \<. For example, if you are filtering Compute Engine instances, you--- can exclude instances named example-instance by specifying name !=--- example-instance. You can also filter nested fields. For example, you--- could specify scheduling.automaticRestart = false to include instances--- only if they are not scheduled for automatic restarts. You can use--- filtering on nested fields to filter based on resource labels. To filter--- on multiple expressions, provide each separate expression within--- parentheses. For example, (scheduling.automaticRestart = true)--- (cpuPlatform = \"Intel Skylake\"). By default, each expression is an AND--- expression. However, you can include AND and OR expressions explicitly.--- For example, (cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel--- Broadwell\") AND (scheduling.automaticRestart = true).-olFilter :: Lens' OperationsList (Maybe Text)-olFilter = lens _olFilter (\ s a -> s{_olFilter = a})---- | Specifies a page token to use. Set pageToken to the nextPageToken--- returned by a previous list request to get the next page of results.-olPageToken :: Lens' OperationsList (Maybe Text)-olPageToken-  = lens _olPageToken (\ s a -> s{_olPageToken = a})---- | The maximum number of results per page that should be returned. If the--- number of available results is larger than maxResults, Compute Engine--- returns a nextPageToken that can be used to get the next page of results--- in subsequent list requests. Acceptable values are 0 to 500, inclusive.--- (Default: 500)-olMaxResults :: Lens' OperationsList Word32-olMaxResults-  = lens _olMaxResults (\ s a -> s{_olMaxResults = a})-      . _Coerce--instance GoogleRequest OperationsList where-        type Rs OperationsList = OperationsListResponse-        type Scopes OperationsList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient OperationsList'{..}-          = go _olProject _olOrderBy _olFilter _olPageToken-              (Just _olMaxResults)-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy OperationsListResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs 
@@ -1,120 +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.DeploymentManager.Resources.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 information about a single resource.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.resources.get@.-module Network.Google.Resource.DeploymentManager.Resources.Get-    (-    -- * REST Resource-      ResourcesGetResource--    -- * Creating a Request-    , resourcesGet-    , ResourcesGet--    -- * Request Lenses-    , rgProject-    , rgResource-    , rgDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.resources.get@ method which the--- 'ResourcesGet' request conforms to.-type ResourcesGetResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   "resources" :>-                     Capture "resource" Text :>-                       QueryParam "alt" AltJSON :> Get '[JSON] Resource---- | Gets information about a single resource.------ /See:/ 'resourcesGet' smart constructor.-data ResourcesGet =-  ResourcesGet'-    { _rgProject    :: !Text-    , _rgResource   :: !Text-    , _rgDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourcesGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rgProject'------ * 'rgResource'------ * 'rgDeployment'-resourcesGet-    :: Text -- ^ 'rgProject'-    -> Text -- ^ 'rgResource'-    -> Text -- ^ 'rgDeployment'-    -> ResourcesGet-resourcesGet pRgProject_ pRgResource_ pRgDeployment_ =-  ResourcesGet'-    { _rgProject = pRgProject_-    , _rgResource = pRgResource_-    , _rgDeployment = pRgDeployment_-    }----- | The project ID for this request.-rgProject :: Lens' ResourcesGet Text-rgProject-  = lens _rgProject (\ s a -> s{_rgProject = a})---- | The name of the resource for this request.-rgResource :: Lens' ResourcesGet Text-rgResource-  = lens _rgResource (\ s a -> s{_rgResource = a})---- | The name of the deployment for this request.-rgDeployment :: Lens' ResourcesGet Text-rgDeployment-  = lens _rgDeployment (\ s a -> s{_rgDeployment = a})--instance GoogleRequest ResourcesGet where-        type Rs ResourcesGet = Resource-        type Scopes ResourcesGet =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient ResourcesGet'{..}-          = go _rgProject _rgDeployment _rgResource-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy ResourcesGetResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Resources/List.hs 
@@ -1,182 +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.DeploymentManager.Resources.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 all resources in a given deployment.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.resources.list@.-module Network.Google.Resource.DeploymentManager.Resources.List-    (-    -- * REST Resource-      ResourcesListResource--    -- * Creating a Request-    , resourcesList-    , ResourcesList--    -- * Request Lenses-    , rlOrderBy-    , rlProject-    , rlFilter-    , rlPageToken-    , rlMaxResults-    , rlDeployment-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.resources.list@ method which the--- 'ResourcesList' request conforms to.-type ResourcesListResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "deployments" :>-                 Capture "deployment" Text :>-                   "resources" :>-                     QueryParam "orderBy" Text :>-                       QueryParam "filter" Text :>-                         QueryParam "pageToken" Text :>-                           QueryParam "maxResults" (Textual Word32) :>-                             QueryParam "alt" AltJSON :>-                               Get '[JSON] ResourcesListResponse---- | Lists all resources in a given deployment.------ /See:/ 'resourcesList' smart constructor.-data ResourcesList =-  ResourcesList'-    { _rlOrderBy    :: !(Maybe Text)-    , _rlProject    :: !Text-    , _rlFilter     :: !(Maybe Text)-    , _rlPageToken  :: !(Maybe Text)-    , _rlMaxResults :: !(Textual Word32)-    , _rlDeployment :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourcesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rlOrderBy'------ * 'rlProject'------ * 'rlFilter'------ * 'rlPageToken'------ * 'rlMaxResults'------ * 'rlDeployment'-resourcesList-    :: Text -- ^ 'rlProject'-    -> Text -- ^ 'rlDeployment'-    -> ResourcesList-resourcesList pRlProject_ pRlDeployment_ =-  ResourcesList'-    { _rlOrderBy = Nothing-    , _rlProject = pRlProject_-    , _rlFilter = Nothing-    , _rlPageToken = Nothing-    , _rlMaxResults = 500-    , _rlDeployment = pRlDeployment_-    }----- | Sorts list results by a certain order. By default, results are returned--- in alphanumerical order based on the resource name. You can also sort--- results in descending order based on the creation timestamp using--- orderBy=\"creationTimestamp desc\". This sorts results based on the--- creationTimestamp field in reverse chronological order (newest result--- first). Use this to sort resources like operations so that the newest--- operation is returned first. Currently, only sorting by name or--- creationTimestamp desc is supported.-rlOrderBy :: Lens' ResourcesList (Maybe Text)-rlOrderBy-  = lens _rlOrderBy (\ s a -> s{_rlOrderBy = a})---- | The project ID for this request.-rlProject :: Lens' ResourcesList Text-rlProject-  = lens _rlProject (\ s a -> s{_rlProject = a})---- | A filter expression that filters resources listed in the response. The--- expression must specify the field name, a comparison operator, and the--- value that you want to use for filtering. The value must be a string, a--- number, or a boolean. The comparison operator must be either =, !=, >,--- or \<. For example, if you are filtering Compute Engine instances, you--- can exclude instances named example-instance by specifying name !=--- example-instance. You can also filter nested fields. For example, you--- could specify scheduling.automaticRestart = false to include instances--- only if they are not scheduled for automatic restarts. You can use--- filtering on nested fields to filter based on resource labels. To filter--- on multiple expressions, provide each separate expression within--- parentheses. For example, (scheduling.automaticRestart = true)--- (cpuPlatform = \"Intel Skylake\"). By default, each expression is an AND--- expression. However, you can include AND and OR expressions explicitly.--- For example, (cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel--- Broadwell\") AND (scheduling.automaticRestart = true).-rlFilter :: Lens' ResourcesList (Maybe Text)-rlFilter = lens _rlFilter (\ s a -> s{_rlFilter = a})---- | Specifies a page token to use. Set pageToken to the nextPageToken--- returned by a previous list request to get the next page of results.-rlPageToken :: Lens' ResourcesList (Maybe Text)-rlPageToken-  = lens _rlPageToken (\ s a -> s{_rlPageToken = a})---- | The maximum number of results per page that should be returned. If the--- number of available results is larger than maxResults, Compute Engine--- returns a nextPageToken that can be used to get the next page of results--- in subsequent list requests. Acceptable values are 0 to 500, inclusive.--- (Default: 500)-rlMaxResults :: Lens' ResourcesList Word32-rlMaxResults-  = lens _rlMaxResults (\ s a -> s{_rlMaxResults = a})-      . _Coerce---- | The name of the deployment for this request.-rlDeployment :: Lens' ResourcesList Text-rlDeployment-  = lens _rlDeployment (\ s a -> s{_rlDeployment = a})--instance GoogleRequest ResourcesList where-        type Rs ResourcesList = ResourcesListResponse-        type Scopes ResourcesList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient ResourcesList'{..}-          = go _rlProject _rlDeployment _rlOrderBy _rlFilter-              _rlPageToken-              (Just _rlMaxResults)-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy ResourcesListResource)-                      mempty
− gen/Network/Google/Resource/DeploymentManager/Types/List.hs 
@@ -1,168 +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.DeploymentManager.Types.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 all resource types for Deployment Manager.------ /See:/ <https://cloud.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference> for @deploymentmanager.types.list@.-module Network.Google.Resource.DeploymentManager.Types.List-    (-    -- * REST Resource-      TypesListResource--    -- * Creating a Request-    , typesList-    , TypesList--    -- * Request Lenses-    , tlOrderBy-    , tlProject-    , tlFilter-    , tlPageToken-    , tlMaxResults-    ) where--import           Network.Google.DeploymentManager.Types-import           Network.Google.Prelude---- | A resource alias for @deploymentmanager.types.list@ method which the--- 'TypesList' request conforms to.-type TypesListResource =-     "deploymentmanager" :>-       "v2" :>-         "projects" :>-           Capture "project" Text :>-             "global" :>-               "types" :>-                 QueryParam "orderBy" Text :>-                   QueryParam "filter" Text :>-                     QueryParam "pageToken" Text :>-                       QueryParam "maxResults" (Textual Word32) :>-                         QueryParam "alt" AltJSON :>-                           Get '[JSON] TypesListResponse---- | Lists all resource types for Deployment Manager.------ /See:/ 'typesList' smart constructor.-data TypesList =-  TypesList'-    { _tlOrderBy    :: !(Maybe Text)-    , _tlProject    :: !Text-    , _tlFilter     :: !(Maybe Text)-    , _tlPageToken  :: !(Maybe Text)-    , _tlMaxResults :: !(Textual Word32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TypesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tlOrderBy'------ * 'tlProject'------ * 'tlFilter'------ * 'tlPageToken'------ * 'tlMaxResults'-typesList-    :: Text -- ^ 'tlProject'-    -> TypesList-typesList pTlProject_ =-  TypesList'-    { _tlOrderBy = Nothing-    , _tlProject = pTlProject_-    , _tlFilter = Nothing-    , _tlPageToken = Nothing-    , _tlMaxResults = 500-    }----- | Sorts list results by a certain order. By default, results are returned--- in alphanumerical order based on the resource name. You can also sort--- results in descending order based on the creation timestamp using--- orderBy=\"creationTimestamp desc\". This sorts results based on the--- creationTimestamp field in reverse chronological order (newest result--- first). Use this to sort resources like operations so that the newest--- operation is returned first. Currently, only sorting by name or--- creationTimestamp desc is supported.-tlOrderBy :: Lens' TypesList (Maybe Text)-tlOrderBy-  = lens _tlOrderBy (\ s a -> s{_tlOrderBy = a})---- | The project ID for this request.-tlProject :: Lens' TypesList Text-tlProject-  = lens _tlProject (\ s a -> s{_tlProject = a})---- | A filter expression that filters resources listed in the response. The--- expression must specify the field name, a comparison operator, and the--- value that you want to use for filtering. The value must be a string, a--- number, or a boolean. The comparison operator must be either =, !=, >,--- or \<. For example, if you are filtering Compute Engine instances, you--- can exclude instances named example-instance by specifying name !=--- example-instance. You can also filter nested fields. For example, you--- could specify scheduling.automaticRestart = false to include instances--- only if they are not scheduled for automatic restarts. You can use--- filtering on nested fields to filter based on resource labels. To filter--- on multiple expressions, provide each separate expression within--- parentheses. For example, (scheduling.automaticRestart = true)--- (cpuPlatform = \"Intel Skylake\"). By default, each expression is an AND--- expression. However, you can include AND and OR expressions explicitly.--- For example, (cpuPlatform = \"Intel Skylake\") OR (cpuPlatform = \"Intel--- Broadwell\") AND (scheduling.automaticRestart = true).-tlFilter :: Lens' TypesList (Maybe Text)-tlFilter = lens _tlFilter (\ s a -> s{_tlFilter = a})---- | Specifies a page token to use. Set pageToken to the nextPageToken--- returned by a previous list request to get the next page of results.-tlPageToken :: Lens' TypesList (Maybe Text)-tlPageToken-  = lens _tlPageToken (\ s a -> s{_tlPageToken = a})---- | The maximum number of results per page that should be returned. If the--- number of available results is larger than maxResults, Compute Engine--- returns a nextPageToken that can be used to get the next page of results--- in subsequent list requests. Acceptable values are 0 to 500, inclusive.--- (Default: 500)-tlMaxResults :: Lens' TypesList Word32-tlMaxResults-  = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})-      . _Coerce--instance GoogleRequest TypesList where-        type Rs TypesList = TypesListResponse-        type Scopes TypesList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/cloud-platform.read-only",-               "https://www.googleapis.com/auth/ndev.cloudman",-               "https://www.googleapis.com/auth/ndev.cloudman.readonly"]-        requestClient TypesList'{..}-          = go _tlProject _tlOrderBy _tlFilter _tlPageToken-              (Just _tlMaxResults)-              (Just AltJSON)-              deploymentManagerService-          where go-                  = buildClient (Proxy :: Proxy TypesListResource)-                      mempty
gogol-deploymentmanager.cabal view
@@ -1,64 +1,78 @@-name:                  gogol-deploymentmanager-version:               0.5.0-synopsis:              Google Cloud Deployment Manager 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-deploymentmanager+version:            1.0.0+synopsis:           Google Cloud Deployment Manager V2 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:-    Declares, configures, and deploys complex solutions 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 @v2@-    of the API.+  The Google Cloud Deployment Manager v2 API provides services for configuring, deploying, and viewing Google Cloud services and APIs via templates which specify deployments of Cloud resources.+  .+  /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 @v2@+  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-deploymentmanager +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.DeploymentManager-        , Network.Google.DeploymentManager.Types-        , Network.Google.Resource.DeploymentManager.Deployments.CancelPreview-        , Network.Google.Resource.DeploymentManager.Deployments.Delete-        , Network.Google.Resource.DeploymentManager.Deployments.Get-        , Network.Google.Resource.DeploymentManager.Deployments.GetIAMPolicy-        , Network.Google.Resource.DeploymentManager.Deployments.Insert-        , Network.Google.Resource.DeploymentManager.Deployments.List-        , Network.Google.Resource.DeploymentManager.Deployments.Patch-        , Network.Google.Resource.DeploymentManager.Deployments.SetIAMPolicy-        , Network.Google.Resource.DeploymentManager.Deployments.Stop-        , Network.Google.Resource.DeploymentManager.Deployments.TestIAMPermissions-        , Network.Google.Resource.DeploymentManager.Deployments.Update-        , Network.Google.Resource.DeploymentManager.Manifests.Get-        , Network.Google.Resource.DeploymentManager.Manifests.List-        , Network.Google.Resource.DeploymentManager.Operations.Get-        , Network.Google.Resource.DeploymentManager.Operations.List-        , Network.Google.Resource.DeploymentManager.Resources.Get-        , Network.Google.Resource.DeploymentManager.Resources.List-        , Network.Google.Resource.DeploymentManager.Types.List+  exposed-modules:+    Gogol.DeploymentManager+    Gogol.DeploymentManager.Deployments.CancelPreview+    Gogol.DeploymentManager.Deployments.Delete+    Gogol.DeploymentManager.Deployments.Get+    Gogol.DeploymentManager.Deployments.GetIamPolicy+    Gogol.DeploymentManager.Deployments.Insert+    Gogol.DeploymentManager.Deployments.List+    Gogol.DeploymentManager.Deployments.Patch+    Gogol.DeploymentManager.Deployments.SetIamPolicy+    Gogol.DeploymentManager.Deployments.Stop+    Gogol.DeploymentManager.Deployments.TestIamPermissions+    Gogol.DeploymentManager.Deployments.Update+    Gogol.DeploymentManager.Manifests.Get+    Gogol.DeploymentManager.Manifests.List+    Gogol.DeploymentManager.Operations.Get+    Gogol.DeploymentManager.Operations.List+    Gogol.DeploymentManager.Resources.Get+    Gogol.DeploymentManager.Resources.List+    Gogol.DeploymentManager.Types+    Gogol.DeploymentManager.Types.List -    other-modules:-          Network.Google.DeploymentManager.Types.Product-        , Network.Google.DeploymentManager.Types.Sum+  other-modules:+    Gogol.DeploymentManager.Internal.Product+    Gogol.DeploymentManager.Internal.Sum -    build-depends:-          gogol-core == 0.5.0.*-        , base       >= 4.7 && < 5+  build-depends:    gogol-core ^>=1.0.0