diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ ## Version -`0.5.0` +`1.0.0` ## Description diff --git a/Setup.hs b/Setup.hs --- a/Setup.hs +++ b/Setup.hs @@ -1,2 +1,3 @@ -import Distribution.Simple +import Distribution.Simple + main = defaultMain diff --git a/gen/Gogol/CloudPrivateCatalog.hs b/gen/Gogol/CloudPrivateCatalog.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog.hs @@ -0,0 +1,132 @@ +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE DerivingStrategies #-} +{-# LANGUAGE DuplicateRecordFields #-} +{-# LANGUAGE ImportQualifiedPost #-} +{-# LANGUAGE LambdaCase #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE PatternSynonyms #-} +{-# LANGUAGE RecordWildCards #-} +{-# LANGUAGE StrictData #-} +{-# LANGUAGE TypeFamilies #-} +{-# LANGUAGE NoImplicitPrelude #-} +{-# OPTIONS_GHC -fno-warn-duplicate-exports #-} +{-# OPTIONS_GHC -fno-warn-name-shadowing #-} +{-# OPTIONS_GHC -fno-warn-unused-binds #-} +{-# OPTIONS_GHC -fno-warn-unused-imports #-} +{-# OPTIONS_GHC -fno-warn-unused-matches #-} + +-- | +-- Module : Gogol.CloudPrivateCatalog +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Enable cloud users to discover enterprise catalogs and products in their organizations. +-- +-- /See:/ +module Gogol.CloudPrivateCatalog + ( -- * Configuration + cloudPrivateCatalogService, + + -- * OAuth Scopes + CloudPlatform'FullControl, + + -- * Resources + + -- ** cloudprivatecatalog.folders.catalogs.search + CloudPrivateCatalogFoldersCatalogsSearchResource, + CloudPrivateCatalogFoldersCatalogsSearch (..), + newCloudPrivateCatalogFoldersCatalogsSearch, + + -- ** cloudprivatecatalog.folders.products.search + CloudPrivateCatalogFoldersProductsSearchResource, + CloudPrivateCatalogFoldersProductsSearch (..), + newCloudPrivateCatalogFoldersProductsSearch, + + -- ** cloudprivatecatalog.folders.versions.search + CloudPrivateCatalogFoldersVersionsSearchResource, + CloudPrivateCatalogFoldersVersionsSearch (..), + newCloudPrivateCatalogFoldersVersionsSearch, + + -- ** cloudprivatecatalog.organizations.catalogs.search + CloudPrivateCatalogOrganizationsCatalogsSearchResource, + CloudPrivateCatalogOrganizationsCatalogsSearch (..), + newCloudPrivateCatalogOrganizationsCatalogsSearch, + + -- ** cloudprivatecatalog.organizations.products.search + CloudPrivateCatalogOrganizationsProductsSearchResource, + CloudPrivateCatalogOrganizationsProductsSearch (..), + newCloudPrivateCatalogOrganizationsProductsSearch, + + -- ** cloudprivatecatalog.organizations.versions.search + CloudPrivateCatalogOrganizationsVersionsSearchResource, + CloudPrivateCatalogOrganizationsVersionsSearch (..), + newCloudPrivateCatalogOrganizationsVersionsSearch, + + -- ** cloudprivatecatalog.projects.catalogs.search + CloudPrivateCatalogProjectsCatalogsSearchResource, + CloudPrivateCatalogProjectsCatalogsSearch (..), + newCloudPrivateCatalogProjectsCatalogsSearch, + + -- ** cloudprivatecatalog.projects.products.search + CloudPrivateCatalogProjectsProductsSearchResource, + CloudPrivateCatalogProjectsProductsSearch (..), + newCloudPrivateCatalogProjectsProductsSearch, + + -- ** cloudprivatecatalog.projects.versions.search + CloudPrivateCatalogProjectsVersionsSearchResource, + CloudPrivateCatalogProjectsVersionsSearch (..), + newCloudPrivateCatalogProjectsVersionsSearch, + + -- * Types + + -- ** Xgafv + Xgafv (..), + + -- ** GoogleCloudPrivatecatalogV1beta1Catalog + GoogleCloudPrivatecatalogV1beta1Catalog (..), + newGoogleCloudPrivatecatalogV1beta1Catalog, + + -- ** GoogleCloudPrivatecatalogV1beta1Product + GoogleCloudPrivatecatalogV1beta1Product (..), + newGoogleCloudPrivatecatalogV1beta1Product, + + -- ** GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata (..), + newGoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata, + + -- ** GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse, + + -- ** GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchProductsResponse, + + -- ** GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchVersionsResponse, + + -- ** GoogleCloudPrivatecatalogV1beta1Version + GoogleCloudPrivatecatalogV1beta1Version (..), + newGoogleCloudPrivatecatalogV1beta1Version, + + -- ** GoogleCloudPrivatecatalogV1beta1Version_Asset + GoogleCloudPrivatecatalogV1beta1Version_Asset (..), + newGoogleCloudPrivatecatalogV1beta1Version_Asset, + ) +where + +import Gogol.CloudPrivateCatalog.Folders.Catalogs.Search +import Gogol.CloudPrivateCatalog.Folders.Products.Search +import Gogol.CloudPrivateCatalog.Folders.Versions.Search +import Gogol.CloudPrivateCatalog.Organizations.Catalogs.Search +import Gogol.CloudPrivateCatalog.Organizations.Products.Search +import Gogol.CloudPrivateCatalog.Organizations.Versions.Search +import Gogol.CloudPrivateCatalog.Projects.Catalogs.Search +import Gogol.CloudPrivateCatalog.Projects.Products.Search +import Gogol.CloudPrivateCatalog.Projects.Versions.Search +import Gogol.CloudPrivateCatalog.Types diff --git a/gen/Gogol/CloudPrivateCatalog/Folders/Catalogs/Search.hs b/gen/Gogol/CloudPrivateCatalog/Folders/Catalogs/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Folders/Catalogs/Search.hs @@ -0,0 +1,144 @@ +{-# 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.CloudPrivateCatalog.Folders.Catalogs.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Catalog resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.folders.catalogs.search@. +module Gogol.CloudPrivateCatalog.Folders.Catalogs.Search + ( -- * Resource + CloudPrivateCatalogFoldersCatalogsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogFoldersCatalogsSearch (..), + newCloudPrivateCatalogFoldersCatalogsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.folders.catalogs.search@ method which the +-- 'CloudPrivateCatalogFoldersCatalogsSearch' request conforms to. +type CloudPrivateCatalogFoldersCatalogsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "catalogs:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + +-- | Search Catalog resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogFoldersCatalogsSearch' smart constructor. +data CloudPrivateCatalogFoldersCatalogsSearch = CloudPrivateCatalogFoldersCatalogsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchCatalogs that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the catalogs. The supported queries are: + -- + -- - Get a single catalog: @name=catalogs\/{catalog_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. It can be in following formats: + -- + -- - @projects\/{project_id}@ + -- - @folders\/{folder_id}@ + -- - @organizations\/{organization_id}@ + 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 'CloudPrivateCatalogFoldersCatalogsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogFoldersCatalogsSearch :: + -- | Required. The name of the resource context. It can be in following formats: + -- + -- - @projects\/{project_id}@ + -- - @folders\/{folder_id}@ + -- - @organizations\/{organization_id}@ See 'resource'. + Core.Text -> + CloudPrivateCatalogFoldersCatalogsSearch +newCloudPrivateCatalogFoldersCatalogsSearch resource = + CloudPrivateCatalogFoldersCatalogsSearch + { xgafv = Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogFoldersCatalogsSearch + where + type + Rs CloudPrivateCatalogFoldersCatalogsSearch = + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + type + Scopes CloudPrivateCatalogFoldersCatalogsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogFoldersCatalogsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogFoldersCatalogsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Folders/Products/Search.hs b/gen/Gogol/CloudPrivateCatalog/Folders/Products/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Folders/Products/Search.hs @@ -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.CloudPrivateCatalog.Folders.Products.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Product resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.folders.products.search@. +module Gogol.CloudPrivateCatalog.Folders.Products.Search + ( -- * Resource + CloudPrivateCatalogFoldersProductsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogFoldersProductsSearch (..), + newCloudPrivateCatalogFoldersProductsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.folders.products.search@ method which the +-- 'CloudPrivateCatalogFoldersProductsSearch' request conforms to. +type CloudPrivateCatalogFoldersProductsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "products:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + +-- | Search Product resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogFoldersProductsSearch' smart constructor. +data CloudPrivateCatalogFoldersProductsSearch = CloudPrivateCatalogFoldersProductsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchProducts that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the products. + -- + -- The supported queries are: * List products of all catalogs: empty * List products under a catalog: @parent=catalogs\/{catalog_id}@ * Get a product by name: @name=catalogs\/{catalog_id}\/products\/{product_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. + 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 'CloudPrivateCatalogFoldersProductsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogFoldersProductsSearch :: + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. See 'resource'. + Core.Text -> + CloudPrivateCatalogFoldersProductsSearch +newCloudPrivateCatalogFoldersProductsSearch resource = + CloudPrivateCatalogFoldersProductsSearch + { xgafv = Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogFoldersProductsSearch + where + type + Rs CloudPrivateCatalogFoldersProductsSearch = + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + type + Scopes CloudPrivateCatalogFoldersProductsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogFoldersProductsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogFoldersProductsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Folders/Versions/Search.hs b/gen/Gogol/CloudPrivateCatalog/Folders/Versions/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Folders/Versions/Search.hs @@ -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.CloudPrivateCatalog.Folders.Versions.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Version resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.folders.versions.search@. +module Gogol.CloudPrivateCatalog.Folders.Versions.Search + ( -- * Resource + CloudPrivateCatalogFoldersVersionsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogFoldersVersionsSearch (..), + newCloudPrivateCatalogFoldersVersionsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.folders.versions.search@ method which the +-- 'CloudPrivateCatalogFoldersVersionsSearch' request conforms to. +type CloudPrivateCatalogFoldersVersionsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "versions:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + +-- | Search Version resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogFoldersVersionsSearch' smart constructor. +data CloudPrivateCatalogFoldersVersionsSearch = CloudPrivateCatalogFoldersVersionsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchVersions that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the versions. Required. + -- + -- The supported queries are: * List versions under a product: @parent=catalogs\/{catalog_id}\/products\/{product_id}@ * Get a version by name: @name=catalogs\/{catalog_id}\/products\/{product_id}\/versions\/{version_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. + 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 'CloudPrivateCatalogFoldersVersionsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogFoldersVersionsSearch :: + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. See 'resource'. + Core.Text -> + CloudPrivateCatalogFoldersVersionsSearch +newCloudPrivateCatalogFoldersVersionsSearch resource = + CloudPrivateCatalogFoldersVersionsSearch + { xgafv = Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogFoldersVersionsSearch + where + type + Rs CloudPrivateCatalogFoldersVersionsSearch = + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + type + Scopes CloudPrivateCatalogFoldersVersionsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogFoldersVersionsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogFoldersVersionsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Internal/Product.hs b/gen/Gogol/CloudPrivateCatalog/Internal/Product.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Internal/Product.hs @@ -0,0 +1,470 @@ +{-# 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.CloudPrivateCatalog.Internal.Product +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +module Gogol.CloudPrivateCatalog.Internal.Product + ( -- * GoogleCloudPrivatecatalogV1beta1Catalog + GoogleCloudPrivatecatalogV1beta1Catalog (..), + newGoogleCloudPrivatecatalogV1beta1Catalog, + + -- * GoogleCloudPrivatecatalogV1beta1Product + GoogleCloudPrivatecatalogV1beta1Product (..), + newGoogleCloudPrivatecatalogV1beta1Product, + + -- * GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata (..), + newGoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata, + + -- * GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse, + + -- * GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchProductsResponse, + + -- * GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchVersionsResponse, + + -- * GoogleCloudPrivatecatalogV1beta1Version + GoogleCloudPrivatecatalogV1beta1Version (..), + newGoogleCloudPrivatecatalogV1beta1Version, + + -- * GoogleCloudPrivatecatalogV1beta1Version_Asset + GoogleCloudPrivatecatalogV1beta1Version_Asset (..), + newGoogleCloudPrivatecatalogV1beta1Version_Asset, + ) +where + +import Gogol.CloudPrivateCatalog.Internal.Sum +import Gogol.Prelude qualified as Core + +-- | The readonly representation of a catalog computed with a given resource context. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1Catalog' smart constructor. +data GoogleCloudPrivatecatalogV1beta1Catalog = GoogleCloudPrivatecatalogV1beta1Catalog + { -- | Output only. The time when the catalog was created. + createTime :: (Core.Maybe Core.DateTime), + -- | Output only. The description of the catalog. + description :: (Core.Maybe Core.Text), + -- | Output only. The descriptive name of the catalog as it appears in UIs. + displayName :: (Core.Maybe Core.Text), + -- | Output only. The resource name of the target catalog, in the format of \`catalogs\/{catalog_id}\'. + name :: (Core.Maybe Core.Text), + -- | Output only. The time when the catalog was last updated. + updateTime :: (Core.Maybe Core.DateTime) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Catalog' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1Catalog :: + GoogleCloudPrivatecatalogV1beta1Catalog +newGoogleCloudPrivatecatalogV1beta1Catalog = + GoogleCloudPrivatecatalogV1beta1Catalog + { createTime = + Core.Nothing, + description = Core.Nothing, + displayName = Core.Nothing, + name = Core.Nothing, + updateTime = Core.Nothing + } + +instance Core.FromJSON GoogleCloudPrivatecatalogV1beta1Catalog where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1Catalog" + ( \o -> + GoogleCloudPrivatecatalogV1beta1Catalog + Core.<$> (o Core..:? "createTime") + Core.<*> (o Core..:? "description") + Core.<*> (o Core..:? "displayName") + Core.<*> (o Core..:? "name") + Core.<*> (o Core..:? "updateTime") + ) + +instance Core.ToJSON GoogleCloudPrivatecatalogV1beta1Catalog where + toJSON GoogleCloudPrivatecatalogV1beta1Catalog {..} = + Core.object + ( Core.catMaybes + [ ("createTime" Core..=) Core.<$> createTime, + ("description" Core..=) Core.<$> description, + ("displayName" Core..=) Core.<$> displayName, + ("name" Core..=) Core.<$> name, + ("updateTime" Core..=) Core.<$> updateTime + ] + ) + +-- | The readonly representation of a product computed with a given resource context. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1Product' smart constructor. +data GoogleCloudPrivatecatalogV1beta1Product = GoogleCloudPrivatecatalogV1beta1Product + { -- | Output only. The type of the product asset. It can be one of the following values: + -- + -- - @google.deploymentmanager.Template@ + -- - @google.cloudprivatecatalog.ListingOnly@ + assetType :: (Core.Maybe Core.Text), + -- | Output only. The time when the product was created. + createTime :: (Core.Maybe Core.DateTime), + -- | Output only. The display metadata to describe the product. The JSON schema of the metadata differs by Product.asset_type. When the type is @google.deploymentmanager.Template@, the schema is as follows: + -- + -- \`\`\` \"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: object properties: name: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 tagline: type: string minLength: 1 maxLength: 100 support/info: type: string minLength: 1 maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 documentation: type: array items: type: object properties: url: type: string pattern: \"^(https?):\/\/[-a-zA-Z0-9+&\@#\/%?=~/|!:,.;]*[-a-zA-Z0-9+&\@#\/%=~_|]\" title: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 required: - name - description additionalProperties: false + -- + -- \`\`\` + -- + -- When the asset type is @google.cloudprivatecatalog.ListingOnly@, the schema is as follows: + -- + -- @\"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: object properties: name: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 tagline: type: string minLength: 1 maxLength: 100 support_info: type: string minLength: 1 maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 documentation: type: array items: type: object properties: url: type: string pattern: \"^(https?):\/\/[-a-zA-Z0-9+&\@#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\@#\/%=~_|]\" title: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 signup_url: type: string pattern: \"^(https?):\/\/[-a-zA-Z0-9+&\@#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\@#\/%=~_|]\" required: - name - description - signup_url additionalProperties: false@ + displayMetadata :: + ( Core.Maybe + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + ), + -- | Output only. The icon URI of the product. + iconUri :: (Core.Maybe Core.Text), + -- | Output only. The resource name of the target product, in the format of \`products\/a-z*[a-z0-9]\'. + -- + -- A unique identifier for the product under a catalog. + name :: (Core.Maybe Core.Text), + -- | Output only. The time when the product was last updated. + updateTime :: (Core.Maybe Core.DateTime) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Product' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1Product :: + GoogleCloudPrivatecatalogV1beta1Product +newGoogleCloudPrivatecatalogV1beta1Product = + GoogleCloudPrivatecatalogV1beta1Product + { assetType = Core.Nothing, + createTime = Core.Nothing, + displayMetadata = Core.Nothing, + iconUri = Core.Nothing, + name = Core.Nothing, + updateTime = Core.Nothing + } + +instance Core.FromJSON GoogleCloudPrivatecatalogV1beta1Product where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1Product" + ( \o -> + GoogleCloudPrivatecatalogV1beta1Product + Core.<$> (o Core..:? "assetType") + Core.<*> (o Core..:? "createTime") + Core.<*> (o Core..:? "displayMetadata") + Core.<*> (o Core..:? "iconUri") + Core.<*> (o Core..:? "name") + Core.<*> (o Core..:? "updateTime") + ) + +instance Core.ToJSON GoogleCloudPrivatecatalogV1beta1Product where + toJSON GoogleCloudPrivatecatalogV1beta1Product {..} = + Core.object + ( Core.catMaybes + [ ("assetType" Core..=) Core.<$> assetType, + ("createTime" Core..=) Core.<$> createTime, + ("displayMetadata" Core..=) Core.<$> displayMetadata, + ("iconUri" Core..=) Core.<$> iconUri, + ("name" Core..=) Core.<$> name, + ("updateTime" Core..=) Core.<$> updateTime + ] + ) + +-- | Output only. The display metadata to describe the product. The JSON schema of the metadata differs by Product.asset_type. When the type is @google.deploymentmanager.Template@, the schema is as follows: +-- +-- \`\`\` \"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: object properties: name: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 tagline: type: string minLength: 1 maxLength: 100 support/info: type: string minLength: 1 maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 documentation: type: array items: type: object properties: url: type: string pattern: \"^(https?):\/\/[-a-zA-Z0-9+&\@#\/%?=~/|!:,.;]*[-a-zA-Z0-9+&\@#\/%=~_|]\" title: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 required: - name - description additionalProperties: false +-- +-- \`\`\` +-- +-- When the asset type is @google.cloudprivatecatalog.ListingOnly@, the schema is as follows: +-- +-- @\"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: object properties: name: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 tagline: type: string minLength: 1 maxLength: 100 support_info: type: string minLength: 1 maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 documentation: type: array items: type: object properties: url: type: string pattern: \"^(https?):\/\/[-a-zA-Z0-9+&\@#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\@#\/%=~_|]\" title: type: string minLength: 1 maxLength: 64 description: type: string minLength: 1 maxLength: 2048 signup_url: type: string pattern: \"^(https?):\/\/[-a-zA-Z0-9+&\@#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\@#\/%=~_|]\" required: - name - description - signup_url additionalProperties: false@ +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata' smart constructor. +newtype GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata = GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + { -- | Properties of the object. + additional :: (Core.HashMap Core.Text Core.Value) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata :: + -- | Properties of the object. See 'additional'. + Core.HashMap Core.Text Core.Value -> + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata +newGoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + additional = + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + { additional = + additional + } + +instance + Core.FromJSON + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata" + ( \o -> + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + Core.<$> (Core.parseJSONObject o) + ) + +instance + Core.ToJSON + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + where + toJSON GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata {..} = + Core.toJSON additional + +-- | Response message for PrivateCatalog.SearchCatalogs. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse' smart constructor. +data GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse = GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + { -- | The @Catalog@s computed from the resource context. + catalogs :: (Core.Maybe [GoogleCloudPrivatecatalogV1beta1Catalog]), + -- | A pagination token returned from a previous call to SearchCatalogs that indicates from where listing should continue. This field is optional. + nextPageToken :: (Core.Maybe Core.Text) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse :: + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse +newGoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse = + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + { catalogs = + Core.Nothing, + nextPageToken = Core.Nothing + } + +instance + Core.FromJSON + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse" + ( \o -> + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + Core.<$> (o Core..:? "catalogs") + Core.<*> (o Core..:? "nextPageToken") + ) + +instance + Core.ToJSON + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + where + toJSON GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse {..} = + Core.object + ( Core.catMaybes + [ ("catalogs" Core..=) Core.<$> catalogs, + ("nextPageToken" Core..=) Core.<$> nextPageToken + ] + ) + +-- | Response message for PrivateCatalog.SearchProducts. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1SearchProductsResponse' smart constructor. +data GoogleCloudPrivatecatalogV1beta1SearchProductsResponse = GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + { -- | A pagination token returned from a previous call to SearchProducts that indicates from where listing should continue. This field is optional. + nextPageToken :: (Core.Maybe Core.Text), + -- | The @Product@ resources computed from the resource context. + products :: (Core.Maybe [GoogleCloudPrivatecatalogV1beta1Product]) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1SearchProductsResponse' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1SearchProductsResponse :: + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse +newGoogleCloudPrivatecatalogV1beta1SearchProductsResponse = + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + { nextPageToken = + Core.Nothing, + products = Core.Nothing + } + +instance + Core.FromJSON + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1SearchProductsResponse" + ( \o -> + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + Core.<$> (o Core..:? "nextPageToken") + Core.<*> (o Core..:? "products") + ) + +instance + Core.ToJSON + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + where + toJSON GoogleCloudPrivatecatalogV1beta1SearchProductsResponse {..} = + Core.object + ( Core.catMaybes + [ ("nextPageToken" Core..=) Core.<$> nextPageToken, + ("products" Core..=) Core.<$> products + ] + ) + +-- | Response message for PrivateCatalog.SearchVersions. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1SearchVersionsResponse' smart constructor. +data GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse = GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + { -- | A pagination token returned from a previous call to SearchVersions that indicates from where the listing should continue. This field is optional. + nextPageToken :: (Core.Maybe Core.Text), + -- | The @Version@ resources computed from the resource context. + versions :: (Core.Maybe [GoogleCloudPrivatecatalogV1beta1Version]) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1SearchVersionsResponse :: + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse +newGoogleCloudPrivatecatalogV1beta1SearchVersionsResponse = + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + { nextPageToken = + Core.Nothing, + versions = Core.Nothing + } + +instance + Core.FromJSON + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse" + ( \o -> + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + Core.<$> (o Core..:? "nextPageToken") + Core.<*> (o Core..:? "versions") + ) + +instance + Core.ToJSON + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + where + toJSON GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse {..} = + Core.object + ( Core.catMaybes + [ ("nextPageToken" Core..=) Core.<$> nextPageToken, + ("versions" Core..=) Core.<$> versions + ] + ) + +-- | The consumer representation of a version which is a child resource under a @Product@ with asset data. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1Version' smart constructor. +data GoogleCloudPrivatecatalogV1beta1Version = GoogleCloudPrivatecatalogV1beta1Version + { -- | Output only. The asset which has been validated and is ready to be provisioned. See google.cloud.privatecatalogproducer.v1beta.Version.asset for details. + asset :: (Core.Maybe GoogleCloudPrivatecatalogV1beta1Version_Asset), + -- | Output only. The time when the version was created. + createTime :: (Core.Maybe Core.DateTime), + -- | Output only. The user-supplied description of the version. Maximum of 256 characters. + description :: (Core.Maybe Core.Text), + -- | Output only. The resource name of the version, in the format \`catalogs\/{catalog/id}\/products\/{product/id}\/versions\/a-z*[a-z0-9]\'. + -- + -- A unique identifier for the version under a product. + name :: (Core.Maybe Core.Text), + -- | Output only. The time when the version was last updated. + updateTime :: (Core.Maybe Core.DateTime) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Version' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1Version :: + GoogleCloudPrivatecatalogV1beta1Version +newGoogleCloudPrivatecatalogV1beta1Version = + GoogleCloudPrivatecatalogV1beta1Version + { asset = Core.Nothing, + createTime = Core.Nothing, + description = Core.Nothing, + name = Core.Nothing, + updateTime = Core.Nothing + } + +instance Core.FromJSON GoogleCloudPrivatecatalogV1beta1Version where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1Version" + ( \o -> + GoogleCloudPrivatecatalogV1beta1Version + Core.<$> (o Core..:? "asset") + Core.<*> (o Core..:? "createTime") + Core.<*> (o Core..:? "description") + Core.<*> (o Core..:? "name") + Core.<*> (o Core..:? "updateTime") + ) + +instance Core.ToJSON GoogleCloudPrivatecatalogV1beta1Version where + toJSON GoogleCloudPrivatecatalogV1beta1Version {..} = + Core.object + ( Core.catMaybes + [ ("asset" Core..=) Core.<$> asset, + ("createTime" Core..=) Core.<$> createTime, + ("description" Core..=) Core.<$> description, + ("name" Core..=) Core.<$> name, + ("updateTime" Core..=) Core.<$> updateTime + ] + ) + +-- | Output only. The asset which has been validated and is ready to be provisioned. See google.cloud.privatecatalogproducer.v1beta.Version.asset for details. +-- +-- /See:/ 'newGoogleCloudPrivatecatalogV1beta1Version_Asset' smart constructor. +newtype GoogleCloudPrivatecatalogV1beta1Version_Asset = GoogleCloudPrivatecatalogV1beta1Version_Asset + { -- | Properties of the object. + additional :: (Core.HashMap Core.Text Core.Value) + } + deriving (Core.Eq, Core.Show, Core.Generic) + +-- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Version_Asset' with the minimum fields required to make a request. +newGoogleCloudPrivatecatalogV1beta1Version_Asset :: + -- | Properties of the object. See 'additional'. + Core.HashMap Core.Text Core.Value -> + GoogleCloudPrivatecatalogV1beta1Version_Asset +newGoogleCloudPrivatecatalogV1beta1Version_Asset additional = + GoogleCloudPrivatecatalogV1beta1Version_Asset + { additional = + additional + } + +instance + Core.FromJSON + GoogleCloudPrivatecatalogV1beta1Version_Asset + where + parseJSON = + Core.withObject + "GoogleCloudPrivatecatalogV1beta1Version_Asset" + ( \o -> + GoogleCloudPrivatecatalogV1beta1Version_Asset + Core.<$> (Core.parseJSONObject o) + ) + +instance Core.ToJSON GoogleCloudPrivatecatalogV1beta1Version_Asset where + toJSON GoogleCloudPrivatecatalogV1beta1Version_Asset {..} = + Core.toJSON additional diff --git a/gen/Gogol/CloudPrivateCatalog/Internal/Sum.hs b/gen/Gogol/CloudPrivateCatalog/Internal/Sum.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Internal/Sum.hs @@ -0,0 +1,63 @@ +{-# 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.CloudPrivateCatalog.Internal.Sum +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +module Gogol.CloudPrivateCatalog.Internal.Sum + ( -- * Xgafv + Xgafv + ( Xgafv_1, + Xgafv_2, + .. + ), + ) +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 + #-} diff --git a/gen/Gogol/CloudPrivateCatalog/Organizations/Catalogs/Search.hs b/gen/Gogol/CloudPrivateCatalog/Organizations/Catalogs/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Organizations/Catalogs/Search.hs @@ -0,0 +1,145 @@ +{-# 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.CloudPrivateCatalog.Organizations.Catalogs.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Catalog resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.organizations.catalogs.search@. +module Gogol.CloudPrivateCatalog.Organizations.Catalogs.Search + ( -- * Resource + CloudPrivateCatalogOrganizationsCatalogsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogOrganizationsCatalogsSearch (..), + newCloudPrivateCatalogOrganizationsCatalogsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.organizations.catalogs.search@ method which the +-- 'CloudPrivateCatalogOrganizationsCatalogsSearch' request conforms to. +type CloudPrivateCatalogOrganizationsCatalogsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "catalogs:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + +-- | Search Catalog resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogOrganizationsCatalogsSearch' smart constructor. +data CloudPrivateCatalogOrganizationsCatalogsSearch = CloudPrivateCatalogOrganizationsCatalogsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchCatalogs that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the catalogs. The supported queries are: + -- + -- - Get a single catalog: @name=catalogs\/{catalog_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. It can be in following formats: + -- + -- - @projects\/{project_id}@ + -- - @folders\/{folder_id}@ + -- - @organizations\/{organization_id}@ + 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 'CloudPrivateCatalogOrganizationsCatalogsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogOrganizationsCatalogsSearch :: + -- | Required. The name of the resource context. It can be in following formats: + -- + -- - @projects\/{project_id}@ + -- - @folders\/{folder_id}@ + -- - @organizations\/{organization_id}@ See 'resource'. + Core.Text -> + CloudPrivateCatalogOrganizationsCatalogsSearch +newCloudPrivateCatalogOrganizationsCatalogsSearch resource = + CloudPrivateCatalogOrganizationsCatalogsSearch + { xgafv = + Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogOrganizationsCatalogsSearch + where + type + Rs CloudPrivateCatalogOrganizationsCatalogsSearch = + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + type + Scopes CloudPrivateCatalogOrganizationsCatalogsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogOrganizationsCatalogsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogOrganizationsCatalogsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Organizations/Products/Search.hs b/gen/Gogol/CloudPrivateCatalog/Organizations/Products/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Organizations/Products/Search.hs @@ -0,0 +1,137 @@ +{-# 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.CloudPrivateCatalog.Organizations.Products.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Product resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.organizations.products.search@. +module Gogol.CloudPrivateCatalog.Organizations.Products.Search + ( -- * Resource + CloudPrivateCatalogOrganizationsProductsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogOrganizationsProductsSearch (..), + newCloudPrivateCatalogOrganizationsProductsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.organizations.products.search@ method which the +-- 'CloudPrivateCatalogOrganizationsProductsSearch' request conforms to. +type CloudPrivateCatalogOrganizationsProductsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "products:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + +-- | Search Product resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogOrganizationsProductsSearch' smart constructor. +data CloudPrivateCatalogOrganizationsProductsSearch = CloudPrivateCatalogOrganizationsProductsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchProducts that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the products. + -- + -- The supported queries are: * List products of all catalogs: empty * List products under a catalog: @parent=catalogs\/{catalog_id}@ * Get a product by name: @name=catalogs\/{catalog_id}\/products\/{product_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. + 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 'CloudPrivateCatalogOrganizationsProductsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogOrganizationsProductsSearch :: + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. See 'resource'. + Core.Text -> + CloudPrivateCatalogOrganizationsProductsSearch +newCloudPrivateCatalogOrganizationsProductsSearch resource = + CloudPrivateCatalogOrganizationsProductsSearch + { xgafv = + Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogOrganizationsProductsSearch + where + type + Rs CloudPrivateCatalogOrganizationsProductsSearch = + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + type + Scopes CloudPrivateCatalogOrganizationsProductsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogOrganizationsProductsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogOrganizationsProductsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Organizations/Versions/Search.hs b/gen/Gogol/CloudPrivateCatalog/Organizations/Versions/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Organizations/Versions/Search.hs @@ -0,0 +1,137 @@ +{-# 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.CloudPrivateCatalog.Organizations.Versions.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Version resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.organizations.versions.search@. +module Gogol.CloudPrivateCatalog.Organizations.Versions.Search + ( -- * Resource + CloudPrivateCatalogOrganizationsVersionsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogOrganizationsVersionsSearch (..), + newCloudPrivateCatalogOrganizationsVersionsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.organizations.versions.search@ method which the +-- 'CloudPrivateCatalogOrganizationsVersionsSearch' request conforms to. +type CloudPrivateCatalogOrganizationsVersionsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "versions:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + +-- | Search Version resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogOrganizationsVersionsSearch' smart constructor. +data CloudPrivateCatalogOrganizationsVersionsSearch = CloudPrivateCatalogOrganizationsVersionsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchVersions that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the versions. Required. + -- + -- The supported queries are: * List versions under a product: @parent=catalogs\/{catalog_id}\/products\/{product_id}@ * Get a version by name: @name=catalogs\/{catalog_id}\/products\/{product_id}\/versions\/{version_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. + 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 'CloudPrivateCatalogOrganizationsVersionsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogOrganizationsVersionsSearch :: + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. See 'resource'. + Core.Text -> + CloudPrivateCatalogOrganizationsVersionsSearch +newCloudPrivateCatalogOrganizationsVersionsSearch resource = + CloudPrivateCatalogOrganizationsVersionsSearch + { xgafv = + Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogOrganizationsVersionsSearch + where + type + Rs CloudPrivateCatalogOrganizationsVersionsSearch = + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + type + Scopes CloudPrivateCatalogOrganizationsVersionsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogOrganizationsVersionsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogOrganizationsVersionsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Projects/Catalogs/Search.hs b/gen/Gogol/CloudPrivateCatalog/Projects/Catalogs/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Projects/Catalogs/Search.hs @@ -0,0 +1,144 @@ +{-# 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.CloudPrivateCatalog.Projects.Catalogs.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Catalog resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.projects.catalogs.search@. +module Gogol.CloudPrivateCatalog.Projects.Catalogs.Search + ( -- * Resource + CloudPrivateCatalogProjectsCatalogsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogProjectsCatalogsSearch (..), + newCloudPrivateCatalogProjectsCatalogsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.projects.catalogs.search@ method which the +-- 'CloudPrivateCatalogProjectsCatalogsSearch' request conforms to. +type CloudPrivateCatalogProjectsCatalogsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "catalogs:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + +-- | Search Catalog resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogProjectsCatalogsSearch' smart constructor. +data CloudPrivateCatalogProjectsCatalogsSearch = CloudPrivateCatalogProjectsCatalogsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchCatalogs that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the catalogs. The supported queries are: + -- + -- - Get a single catalog: @name=catalogs\/{catalog_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. It can be in following formats: + -- + -- - @projects\/{project_id}@ + -- - @folders\/{folder_id}@ + -- - @organizations\/{organization_id}@ + 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 'CloudPrivateCatalogProjectsCatalogsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogProjectsCatalogsSearch :: + -- | Required. The name of the resource context. It can be in following formats: + -- + -- - @projects\/{project_id}@ + -- - @folders\/{folder_id}@ + -- - @organizations\/{organization_id}@ See 'resource'. + Core.Text -> + CloudPrivateCatalogProjectsCatalogsSearch +newCloudPrivateCatalogProjectsCatalogsSearch resource = + CloudPrivateCatalogProjectsCatalogsSearch + { xgafv = Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogProjectsCatalogsSearch + where + type + Rs CloudPrivateCatalogProjectsCatalogsSearch = + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + type + Scopes CloudPrivateCatalogProjectsCatalogsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogProjectsCatalogsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogProjectsCatalogsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Projects/Products/Search.hs b/gen/Gogol/CloudPrivateCatalog/Projects/Products/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Projects/Products/Search.hs @@ -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.CloudPrivateCatalog.Projects.Products.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Product resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.projects.products.search@. +module Gogol.CloudPrivateCatalog.Projects.Products.Search + ( -- * Resource + CloudPrivateCatalogProjectsProductsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogProjectsProductsSearch (..), + newCloudPrivateCatalogProjectsProductsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.projects.products.search@ method which the +-- 'CloudPrivateCatalogProjectsProductsSearch' request conforms to. +type CloudPrivateCatalogProjectsProductsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "products:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + +-- | Search Product resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogProjectsProductsSearch' smart constructor. +data CloudPrivateCatalogProjectsProductsSearch = CloudPrivateCatalogProjectsProductsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchProducts that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the products. + -- + -- The supported queries are: * List products of all catalogs: empty * List products under a catalog: @parent=catalogs\/{catalog_id}@ * Get a product by name: @name=catalogs\/{catalog_id}\/products\/{product_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. + 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 'CloudPrivateCatalogProjectsProductsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogProjectsProductsSearch :: + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. See 'resource'. + Core.Text -> + CloudPrivateCatalogProjectsProductsSearch +newCloudPrivateCatalogProjectsProductsSearch resource = + CloudPrivateCatalogProjectsProductsSearch + { xgafv = Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogProjectsProductsSearch + where + type + Rs CloudPrivateCatalogProjectsProductsSearch = + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + type + Scopes CloudPrivateCatalogProjectsProductsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogProjectsProductsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogProjectsProductsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Projects/Versions/Search.hs b/gen/Gogol/CloudPrivateCatalog/Projects/Versions/Search.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Projects/Versions/Search.hs @@ -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.CloudPrivateCatalog.Projects.Versions.Search +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +-- +-- Search Version resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ for @cloudprivatecatalog.projects.versions.search@. +module Gogol.CloudPrivateCatalog.Projects.Versions.Search + ( -- * Resource + CloudPrivateCatalogProjectsVersionsSearchResource, + + -- ** Constructing a Request + CloudPrivateCatalogProjectsVersionsSearch (..), + newCloudPrivateCatalogProjectsVersionsSearch, + ) +where + +import Gogol.CloudPrivateCatalog.Types +import Gogol.Prelude qualified as Core + +-- | A resource alias for @cloudprivatecatalog.projects.versions.search@ method which the +-- 'CloudPrivateCatalogProjectsVersionsSearch' request conforms to. +type CloudPrivateCatalogProjectsVersionsSearchResource = + "v1beta1" + Core.:> Core.Capture "resource" Core.Text + Core.:> "versions:search" + Core.:> Core.QueryParam "$.xgafv" Xgafv + Core.:> Core.QueryParam "access_token" Core.Text + Core.:> Core.QueryParam "callback" Core.Text + Core.:> Core.QueryParam "pageSize" Core.Int32 + Core.:> Core.QueryParam "pageToken" Core.Text + Core.:> Core.QueryParam "query" 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] + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + +-- | Search Version resources that consumers have access to, within the scope of the consumer cloud resource hierarchy context. +-- +-- /See:/ 'newCloudPrivateCatalogProjectsVersionsSearch' smart constructor. +data CloudPrivateCatalogProjectsVersionsSearch = CloudPrivateCatalogProjectsVersionsSearch + { -- | V1 error format. + xgafv :: (Core.Maybe Xgafv), + -- | OAuth access token. + accessToken :: (Core.Maybe Core.Text), + -- | JSONP + callback :: (Core.Maybe Core.Text), + -- | The maximum number of entries that are requested. + pageSize :: (Core.Maybe Core.Int32), + -- | A pagination token returned from a previous call to SearchVersions that indicates where this listing should continue from. This field is optional. + pageToken :: (Core.Maybe Core.Text), + -- | The query to filter the versions. Required. + -- + -- The supported queries are: * List versions under a product: @parent=catalogs\/{catalog_id}\/products\/{product_id}@ * Get a version by name: @name=catalogs\/{catalog_id}\/products\/{product_id}\/versions\/{version_id}@ + query :: (Core.Maybe Core.Text), + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. + 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 'CloudPrivateCatalogProjectsVersionsSearch' with the minimum fields required to make a request. +newCloudPrivateCatalogProjectsVersionsSearch :: + -- | Required. The name of the resource context. See SearchCatalogsRequest.resource for details. See 'resource'. + Core.Text -> + CloudPrivateCatalogProjectsVersionsSearch +newCloudPrivateCatalogProjectsVersionsSearch resource = + CloudPrivateCatalogProjectsVersionsSearch + { xgafv = Core.Nothing, + accessToken = Core.Nothing, + callback = Core.Nothing, + pageSize = Core.Nothing, + pageToken = Core.Nothing, + query = Core.Nothing, + resource = resource, + uploadType = Core.Nothing, + uploadProtocol = Core.Nothing + } + +instance + Core.GoogleRequest + CloudPrivateCatalogProjectsVersionsSearch + where + type + Rs CloudPrivateCatalogProjectsVersionsSearch = + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + type + Scopes CloudPrivateCatalogProjectsVersionsSearch = + '[CloudPlatform'FullControl] + requestClient CloudPrivateCatalogProjectsVersionsSearch {..} = + go + resource + xgafv + accessToken + callback + pageSize + pageToken + query + uploadType + uploadProtocol + (Core.Just Core.AltJSON) + cloudPrivateCatalogService + where + go = + Core.buildClient + ( Core.Proxy :: + Core.Proxy CloudPrivateCatalogProjectsVersionsSearchResource + ) + Core.mempty diff --git a/gen/Gogol/CloudPrivateCatalog/Types.hs b/gen/Gogol/CloudPrivateCatalog/Types.hs new file mode 100644 --- /dev/null +++ b/gen/Gogol/CloudPrivateCatalog/Types.hs @@ -0,0 +1,85 @@ +{-# 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.CloudPrivateCatalog.Types +-- Copyright : (c) 2015-2025 Brendan Hay +-- License : Mozilla Public License, v. 2.0. +-- Maintainer : Brendan Hay +-- Toni Cebrián +-- Stability : auto-generated +-- Portability : non-portable (GHC extensions) +module Gogol.CloudPrivateCatalog.Types + ( -- * Configuration + cloudPrivateCatalogService, + + -- * OAuth Scopes + CloudPlatform'FullControl, + + -- * Types + + -- ** Xgafv + Xgafv (..), + + -- ** GoogleCloudPrivatecatalogV1beta1Catalog + GoogleCloudPrivatecatalogV1beta1Catalog (..), + newGoogleCloudPrivatecatalogV1beta1Catalog, + + -- ** GoogleCloudPrivatecatalogV1beta1Product + GoogleCloudPrivatecatalogV1beta1Product (..), + newGoogleCloudPrivatecatalogV1beta1Product, + + -- ** GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata + GoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata (..), + newGoogleCloudPrivatecatalogV1beta1Product_DisplayMetadata, + + -- ** GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse + GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse, + + -- ** GoogleCloudPrivatecatalogV1beta1SearchProductsResponse + GoogleCloudPrivatecatalogV1beta1SearchProductsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchProductsResponse, + + -- ** GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse + GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse (..), + newGoogleCloudPrivatecatalogV1beta1SearchVersionsResponse, + + -- ** GoogleCloudPrivatecatalogV1beta1Version + GoogleCloudPrivatecatalogV1beta1Version (..), + newGoogleCloudPrivatecatalogV1beta1Version, + + -- ** GoogleCloudPrivatecatalogV1beta1Version_Asset + GoogleCloudPrivatecatalogV1beta1Version_Asset (..), + newGoogleCloudPrivatecatalogV1beta1Version_Asset, + ) +where + +import Gogol.CloudPrivateCatalog.Internal.Product +import Gogol.CloudPrivateCatalog.Internal.Sum +import Gogol.Prelude qualified as Core + +-- | Default request referring to version @v1beta1@ of the Cloud Private Catalog API. This contains the host and root path used as a starting point for constructing service requests. +cloudPrivateCatalogService :: Core.ServiceConfig +cloudPrivateCatalogService = + Core.defaultService + (Core.ServiceId "cloudprivatecatalog:v1beta1") + "cloudprivatecatalog.googleapis.com" + +-- | View and manage your data across Google Cloud Platform services +type CloudPlatform'FullControl = + "https://www.googleapis.com/auth/cloud-platform" diff --git a/gen/Network/Google/CloudPrivateCatalog.hs b/gen/Network/Google/CloudPrivateCatalog.hs deleted file mode 100644 --- a/gen/Network/Google/CloudPrivateCatalog.hs +++ /dev/null @@ -1,148 +0,0 @@ -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE NoImplicitPrelude #-} -{-# LANGUAGE TypeOperators #-} - -{-# OPTIONS_GHC -fno-warn-unused-imports #-} -{-# OPTIONS_GHC -fno-warn-duplicate-exports #-} - --- | --- Module : Network.Google.CloudPrivateCatalog --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Enable cloud users to discover enterprise catalogs and products in their --- organizations. --- --- /See:/ -module Network.Google.CloudPrivateCatalog - ( - -- * Service Configuration - cloudPrivateCatalogService - - -- * OAuth Scopes - , cloudPlatformScope - - -- * API Declaration - , CloudPrivateCatalogAPI - - -- * Resources - - -- ** cloudprivatecatalog.folders.catalogs.search - , module Network.Google.Resource.CloudPrivateCatalog.Folders.Catalogs.Search - - -- ** cloudprivatecatalog.folders.products.search - , module Network.Google.Resource.CloudPrivateCatalog.Folders.Products.Search - - -- ** cloudprivatecatalog.folders.versions.search - , module Network.Google.Resource.CloudPrivateCatalog.Folders.Versions.Search - - -- ** cloudprivatecatalog.organizations.catalogs.search - , module Network.Google.Resource.CloudPrivateCatalog.Organizations.Catalogs.Search - - -- ** cloudprivatecatalog.organizations.products.search - , module Network.Google.Resource.CloudPrivateCatalog.Organizations.Products.Search - - -- ** cloudprivatecatalog.organizations.versions.search - , module Network.Google.Resource.CloudPrivateCatalog.Organizations.Versions.Search - - -- ** cloudprivatecatalog.projects.catalogs.search - , module Network.Google.Resource.CloudPrivateCatalog.Projects.Catalogs.Search - - -- ** cloudprivatecatalog.projects.products.search - , module Network.Google.Resource.CloudPrivateCatalog.Projects.Products.Search - - -- ** cloudprivatecatalog.projects.versions.search - , module Network.Google.Resource.CloudPrivateCatalog.Projects.Versions.Search - - -- * Types - - -- ** GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - , GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - , googleCloudPrivatecatalogV1beta1SearchCatalogsResponse - , gcpvscrNextPageToken - , gcpvscrCatalogs - - -- ** GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata - , GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata - , googleCloudPrivatecatalogV1beta1ProductDisplayMetadata - , gcpvpdmAddtional - - -- ** GoogleCloudPrivatecatalogV1beta1Catalog - , GoogleCloudPrivatecatalogV1beta1Catalog - , googleCloudPrivatecatalogV1beta1Catalog - , gcpvcUpdateTime - , gcpvcName - , gcpvcDisplayName - , gcpvcDescription - , gcpvcCreateTime - - -- ** GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - , GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - , googleCloudPrivatecatalogV1beta1SearchProductsResponse - , gcpvsprNextPageToken - , gcpvsprProducts - - -- ** Xgafv - , Xgafv (..) - - -- ** GoogleCloudPrivatecatalogV1beta1VersionAsset - , GoogleCloudPrivatecatalogV1beta1VersionAsset - , googleCloudPrivatecatalogV1beta1VersionAsset - , gcpvvaAddtional - - -- ** GoogleCloudPrivatecatalogV1beta1Version - , GoogleCloudPrivatecatalogV1beta1Version - , googleCloudPrivatecatalogV1beta1Version - , gcpvvAsset - , gcpvvUpdateTime - , gcpvvName - , gcpvvDescription - , gcpvvCreateTime - - -- ** GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - , GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - , googleCloudPrivatecatalogV1beta1SearchVersionsResponse - , gcpvsvrNextPageToken - , gcpvsvrVersions - - -- ** GoogleCloudPrivatecatalogV1beta1Product - , GoogleCloudPrivatecatalogV1beta1Product - , googleCloudPrivatecatalogV1beta1Product - , gcpvpIconURI - , gcpvpUpdateTime - , gcpvpDisplayMetadata - , gcpvpName - , gcpvpAssetType - , gcpvpCreateTime - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude -import Network.Google.Resource.CloudPrivateCatalog.Folders.Catalogs.Search -import Network.Google.Resource.CloudPrivateCatalog.Folders.Products.Search -import Network.Google.Resource.CloudPrivateCatalog.Folders.Versions.Search -import Network.Google.Resource.CloudPrivateCatalog.Organizations.Catalogs.Search -import Network.Google.Resource.CloudPrivateCatalog.Organizations.Products.Search -import Network.Google.Resource.CloudPrivateCatalog.Organizations.Versions.Search -import Network.Google.Resource.CloudPrivateCatalog.Projects.Catalogs.Search -import Network.Google.Resource.CloudPrivateCatalog.Projects.Products.Search -import Network.Google.Resource.CloudPrivateCatalog.Projects.Versions.Search - -{- $resources -TODO --} - --- | Represents the entirety of the methods and resources available for the Cloud Private Catalog API service. -type CloudPrivateCatalogAPI = - FoldersCatalogsSearchResource :<|> - FoldersVersionsSearchResource - :<|> FoldersProductsSearchResource - :<|> OrganizationsCatalogsSearchResource - :<|> OrganizationsVersionsSearchResource - :<|> OrganizationsProductsSearchResource - :<|> ProjectsCatalogsSearchResource - :<|> ProjectsVersionsSearchResource - :<|> ProjectsProductsSearchResource diff --git a/gen/Network/Google/CloudPrivateCatalog/Types.hs b/gen/Network/Google/CloudPrivateCatalog/Types.hs deleted file mode 100644 --- a/gen/Network/Google/CloudPrivateCatalog/Types.hs +++ /dev/null @@ -1,98 +0,0 @@ -{-# LANGUAGE DataKinds #-} -{-# LANGUAGE DeriveDataTypeable #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE NoImplicitPrelude #-} -{-# LANGUAGE OverloadedStrings #-} - -{-# OPTIONS_GHC -fno-warn-unused-imports #-} - --- | --- Module : Network.Google.CloudPrivateCatalog.Types --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- -module Network.Google.CloudPrivateCatalog.Types - ( - -- * Service Configuration - cloudPrivateCatalogService - - -- * OAuth Scopes - , cloudPlatformScope - - -- * GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - , GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - , googleCloudPrivatecatalogV1beta1SearchCatalogsResponse - , gcpvscrNextPageToken - , gcpvscrCatalogs - - -- * GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata - , GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata - , googleCloudPrivatecatalogV1beta1ProductDisplayMetadata - , gcpvpdmAddtional - - -- * GoogleCloudPrivatecatalogV1beta1Catalog - , GoogleCloudPrivatecatalogV1beta1Catalog - , googleCloudPrivatecatalogV1beta1Catalog - , gcpvcUpdateTime - , gcpvcName - , gcpvcDisplayName - , gcpvcDescription - , gcpvcCreateTime - - -- * GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - , GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - , googleCloudPrivatecatalogV1beta1SearchProductsResponse - , gcpvsprNextPageToken - , gcpvsprProducts - - -- * Xgafv - , Xgafv (..) - - -- * GoogleCloudPrivatecatalogV1beta1VersionAsset - , GoogleCloudPrivatecatalogV1beta1VersionAsset - , googleCloudPrivatecatalogV1beta1VersionAsset - , gcpvvaAddtional - - -- * GoogleCloudPrivatecatalogV1beta1Version - , GoogleCloudPrivatecatalogV1beta1Version - , googleCloudPrivatecatalogV1beta1Version - , gcpvvAsset - , gcpvvUpdateTime - , gcpvvName - , gcpvvDescription - , gcpvvCreateTime - - -- * GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - , GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - , googleCloudPrivatecatalogV1beta1SearchVersionsResponse - , gcpvsvrNextPageToken - , gcpvsvrVersions - - -- * GoogleCloudPrivatecatalogV1beta1Product - , GoogleCloudPrivatecatalogV1beta1Product - , googleCloudPrivatecatalogV1beta1Product - , gcpvpIconURI - , gcpvpUpdateTime - , gcpvpDisplayMetadata - , gcpvpName - , gcpvpAssetType - , gcpvpCreateTime - ) where - -import Network.Google.CloudPrivateCatalog.Types.Product -import Network.Google.CloudPrivateCatalog.Types.Sum -import Network.Google.Prelude - --- | Default request referring to version 'v1beta1' of the Cloud Private Catalog API. This contains the host and root path used as a starting point for constructing service requests. -cloudPrivateCatalogService :: ServiceConfig -cloudPrivateCatalogService - = defaultService - (ServiceId "cloudprivatecatalog:v1beta1") - "cloudprivatecatalog.googleapis.com" - --- | View and manage your data across Google Cloud Platform services -cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"] -cloudPlatformScope = Proxy diff --git a/gen/Network/Google/CloudPrivateCatalog/Types/Product.hs b/gen/Network/Google/CloudPrivateCatalog/Types/Product.hs deleted file mode 100644 --- a/gen/Network/Google/CloudPrivateCatalog/Types/Product.hs +++ /dev/null @@ -1,662 +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.CloudPrivateCatalog.Types.Product --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- -module Network.Google.CloudPrivateCatalog.Types.Product where - -import Network.Google.CloudPrivateCatalog.Types.Sum -import Network.Google.Prelude - --- | Response message for PrivateCatalog.SearchCatalogs. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1SearchCatalogsResponse' smart constructor. -data GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse = - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse' - { _gcpvscrNextPageToken :: !(Maybe Text) - , _gcpvscrCatalogs :: !(Maybe [GoogleCloudPrivatecatalogV1beta1Catalog]) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvscrNextPageToken' --- --- * 'gcpvscrCatalogs' -googleCloudPrivatecatalogV1beta1SearchCatalogsResponse - :: GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse -googleCloudPrivatecatalogV1beta1SearchCatalogsResponse = - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse' - {_gcpvscrNextPageToken = Nothing, _gcpvscrCatalogs = Nothing} - - --- | A pagination token returned from a previous call to SearchCatalogs that --- indicates from where listing should continue. This field is optional. -gcpvscrNextPageToken :: Lens' GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse (Maybe Text) -gcpvscrNextPageToken - = lens _gcpvscrNextPageToken - (\ s a -> s{_gcpvscrNextPageToken = a}) - --- | The \`Catalog\`s computed from the resource context. -gcpvscrCatalogs :: Lens' GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse [GoogleCloudPrivatecatalogV1beta1Catalog] -gcpvscrCatalogs - = lens _gcpvscrCatalogs - (\ s a -> s{_gcpvscrCatalogs = a}) - . _Default - . _Coerce - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse" - (\ o -> - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse' - <$> - (o .:? "nextPageToken") <*> - (o .:? "catalogs" .!= mempty)) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - where - toJSON - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse'{..} - = object - (catMaybes - [("nextPageToken" .=) <$> _gcpvscrNextPageToken, - ("catalogs" .=) <$> _gcpvscrCatalogs]) - --- | Output only. The display metadata to describe the product. The JSON --- schema of the metadata differs by Product.asset_type. When the type is --- \`google.deploymentmanager.Template\`, the schema is as follows: \`\`\` --- \"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: object --- properties: name: type: string minLength: 1 maxLength: 64 description: --- type: string minLength: 1 maxLength: 2048 tagline: type: string --- minLength: 1 maxLength: 100 support_info: type: string minLength: 1 --- maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 --- documentation: type: array items: type: object properties: url: type: --- string pattern: --- \"^(https?):\/\/[-a-zA-Z0-9+&\'#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\'#\/%=~_|]\" --- title: type: string minLength: 1 maxLength: 64 description: type: string --- minLength: 1 maxLength: 2048 required: - name - description --- additionalProperties: false \`\`\` When the asset type is --- \`google.cloudprivatecatalog.ListingOnly\`, the schema is as follows: --- \`\`\` \"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: --- object properties: name: type: string minLength: 1 maxLength: 64 --- description: type: string minLength: 1 maxLength: 2048 tagline: type: --- string minLength: 1 maxLength: 100 support_info: type: string minLength: --- 1 maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 --- documentation: type: array items: type: object properties: url: type: --- string pattern: --- \"^(https?):\/\/[-a-zA-Z0-9+&\'#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\'#\/%=~_|]\" --- title: type: string minLength: 1 maxLength: 64 description: type: string --- minLength: 1 maxLength: 2048 signup_url: type: string pattern: --- \"^(https?):\/\/[-a-zA-Z0-9+&\'#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\'#\/%=~_|]\" --- required: - name - description - signup_url additionalProperties: false --- \`\`\` --- --- /See:/ 'googleCloudPrivatecatalogV1beta1ProductDisplayMetadata' smart constructor. -newtype GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata = - GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata' - { _gcpvpdmAddtional :: HashMap Text JSONValue - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvpdmAddtional' -googleCloudPrivatecatalogV1beta1ProductDisplayMetadata - :: HashMap Text JSONValue -- ^ 'gcpvpdmAddtional' - -> GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata -googleCloudPrivatecatalogV1beta1ProductDisplayMetadata pGcpvpdmAddtional_ = - GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata' - {_gcpvpdmAddtional = _Coerce # pGcpvpdmAddtional_} - - --- | Properties of the object. -gcpvpdmAddtional :: Lens' GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata (HashMap Text JSONValue) -gcpvpdmAddtional - = lens _gcpvpdmAddtional - (\ s a -> s{_gcpvpdmAddtional = a}) - . _Coerce - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata" - (\ o -> - GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata' - <$> (parseJSONObject o)) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata - where - toJSON = toJSON . _gcpvpdmAddtional - --- | The readonly representation of a catalog computed with a given resource --- context. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1Catalog' smart constructor. -data GoogleCloudPrivatecatalogV1beta1Catalog = - GoogleCloudPrivatecatalogV1beta1Catalog' - { _gcpvcUpdateTime :: !(Maybe DateTime') - , _gcpvcName :: !(Maybe Text) - , _gcpvcDisplayName :: !(Maybe Text) - , _gcpvcDescription :: !(Maybe Text) - , _gcpvcCreateTime :: !(Maybe DateTime') - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Catalog' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvcUpdateTime' --- --- * 'gcpvcName' --- --- * 'gcpvcDisplayName' --- --- * 'gcpvcDescription' --- --- * 'gcpvcCreateTime' -googleCloudPrivatecatalogV1beta1Catalog - :: GoogleCloudPrivatecatalogV1beta1Catalog -googleCloudPrivatecatalogV1beta1Catalog = - GoogleCloudPrivatecatalogV1beta1Catalog' - { _gcpvcUpdateTime = Nothing - , _gcpvcName = Nothing - , _gcpvcDisplayName = Nothing - , _gcpvcDescription = Nothing - , _gcpvcCreateTime = Nothing - } - - --- | Output only. The time when the catalog was last updated. -gcpvcUpdateTime :: Lens' GoogleCloudPrivatecatalogV1beta1Catalog (Maybe UTCTime) -gcpvcUpdateTime - = lens _gcpvcUpdateTime - (\ s a -> s{_gcpvcUpdateTime = a}) - . mapping _DateTime - --- | Output only. The resource name of the target catalog, in the format of --- \`catalogs\/{catalog_id}\'. -gcpvcName :: Lens' GoogleCloudPrivatecatalogV1beta1Catalog (Maybe Text) -gcpvcName - = lens _gcpvcName (\ s a -> s{_gcpvcName = a}) - --- | Output only. The descriptive name of the catalog as it appears in UIs. -gcpvcDisplayName :: Lens' GoogleCloudPrivatecatalogV1beta1Catalog (Maybe Text) -gcpvcDisplayName - = lens _gcpvcDisplayName - (\ s a -> s{_gcpvcDisplayName = a}) - --- | Output only. The description of the catalog. -gcpvcDescription :: Lens' GoogleCloudPrivatecatalogV1beta1Catalog (Maybe Text) -gcpvcDescription - = lens _gcpvcDescription - (\ s a -> s{_gcpvcDescription = a}) - --- | Output only. The time when the catalog was created. -gcpvcCreateTime :: Lens' GoogleCloudPrivatecatalogV1beta1Catalog (Maybe UTCTime) -gcpvcCreateTime - = lens _gcpvcCreateTime - (\ s a -> s{_gcpvcCreateTime = a}) - . mapping _DateTime - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1Catalog - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1Catalog" - (\ o -> - GoogleCloudPrivatecatalogV1beta1Catalog' <$> - (o .:? "updateTime") <*> (o .:? "name") <*> - (o .:? "displayName") - <*> (o .:? "description") - <*> (o .:? "createTime")) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1Catalog - where - toJSON GoogleCloudPrivatecatalogV1beta1Catalog'{..} - = object - (catMaybes - [("updateTime" .=) <$> _gcpvcUpdateTime, - ("name" .=) <$> _gcpvcName, - ("displayName" .=) <$> _gcpvcDisplayName, - ("description" .=) <$> _gcpvcDescription, - ("createTime" .=) <$> _gcpvcCreateTime]) - --- | Response message for PrivateCatalog.SearchProducts. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1SearchProductsResponse' smart constructor. -data GoogleCloudPrivatecatalogV1beta1SearchProductsResponse = - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse' - { _gcpvsprNextPageToken :: !(Maybe Text) - , _gcpvsprProducts :: !(Maybe [GoogleCloudPrivatecatalogV1beta1Product]) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1SearchProductsResponse' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvsprNextPageToken' --- --- * 'gcpvsprProducts' -googleCloudPrivatecatalogV1beta1SearchProductsResponse - :: GoogleCloudPrivatecatalogV1beta1SearchProductsResponse -googleCloudPrivatecatalogV1beta1SearchProductsResponse = - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse' - {_gcpvsprNextPageToken = Nothing, _gcpvsprProducts = Nothing} - - --- | A pagination token returned from a previous call to SearchProducts that --- indicates from where listing should continue. This field is optional. -gcpvsprNextPageToken :: Lens' GoogleCloudPrivatecatalogV1beta1SearchProductsResponse (Maybe Text) -gcpvsprNextPageToken - = lens _gcpvsprNextPageToken - (\ s a -> s{_gcpvsprNextPageToken = a}) - --- | The \`Product\` resources computed from the resource context. -gcpvsprProducts :: Lens' GoogleCloudPrivatecatalogV1beta1SearchProductsResponse [GoogleCloudPrivatecatalogV1beta1Product] -gcpvsprProducts - = lens _gcpvsprProducts - (\ s a -> s{_gcpvsprProducts = a}) - . _Default - . _Coerce - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1SearchProductsResponse" - (\ o -> - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse' - <$> - (o .:? "nextPageToken") <*> - (o .:? "products" .!= mempty)) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - where - toJSON - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse'{..} - = object - (catMaybes - [("nextPageToken" .=) <$> _gcpvsprNextPageToken, - ("products" .=) <$> _gcpvsprProducts]) - --- | Output only. The asset which has been validated and is ready to be --- provisioned. See --- google.cloud.privatecatalogproducer.v1beta.Version.asset for details. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1VersionAsset' smart constructor. -newtype GoogleCloudPrivatecatalogV1beta1VersionAsset = - GoogleCloudPrivatecatalogV1beta1VersionAsset' - { _gcpvvaAddtional :: HashMap Text JSONValue - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1VersionAsset' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvvaAddtional' -googleCloudPrivatecatalogV1beta1VersionAsset - :: HashMap Text JSONValue -- ^ 'gcpvvaAddtional' - -> GoogleCloudPrivatecatalogV1beta1VersionAsset -googleCloudPrivatecatalogV1beta1VersionAsset pGcpvvaAddtional_ = - GoogleCloudPrivatecatalogV1beta1VersionAsset' - {_gcpvvaAddtional = _Coerce # pGcpvvaAddtional_} - - --- | Properties of the object. -gcpvvaAddtional :: Lens' GoogleCloudPrivatecatalogV1beta1VersionAsset (HashMap Text JSONValue) -gcpvvaAddtional - = lens _gcpvvaAddtional - (\ s a -> s{_gcpvvaAddtional = a}) - . _Coerce - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1VersionAsset - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1VersionAsset" - (\ o -> - GoogleCloudPrivatecatalogV1beta1VersionAsset' <$> - (parseJSONObject o)) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1VersionAsset - where - toJSON = toJSON . _gcpvvaAddtional - --- | The consumer representation of a version which is a child resource under --- a \`Product\` with asset data. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1Version' smart constructor. -data GoogleCloudPrivatecatalogV1beta1Version = - GoogleCloudPrivatecatalogV1beta1Version' - { _gcpvvAsset :: !(Maybe GoogleCloudPrivatecatalogV1beta1VersionAsset) - , _gcpvvUpdateTime :: !(Maybe DateTime') - , _gcpvvName :: !(Maybe Text) - , _gcpvvDescription :: !(Maybe Text) - , _gcpvvCreateTime :: !(Maybe DateTime') - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Version' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvvAsset' --- --- * 'gcpvvUpdateTime' --- --- * 'gcpvvName' --- --- * 'gcpvvDescription' --- --- * 'gcpvvCreateTime' -googleCloudPrivatecatalogV1beta1Version - :: GoogleCloudPrivatecatalogV1beta1Version -googleCloudPrivatecatalogV1beta1Version = - GoogleCloudPrivatecatalogV1beta1Version' - { _gcpvvAsset = Nothing - , _gcpvvUpdateTime = Nothing - , _gcpvvName = Nothing - , _gcpvvDescription = Nothing - , _gcpvvCreateTime = Nothing - } - - --- | Output only. The asset which has been validated and is ready to be --- provisioned. See --- google.cloud.privatecatalogproducer.v1beta.Version.asset for details. -gcpvvAsset :: Lens' GoogleCloudPrivatecatalogV1beta1Version (Maybe GoogleCloudPrivatecatalogV1beta1VersionAsset) -gcpvvAsset - = lens _gcpvvAsset (\ s a -> s{_gcpvvAsset = a}) - --- | Output only. The time when the version was last updated. -gcpvvUpdateTime :: Lens' GoogleCloudPrivatecatalogV1beta1Version (Maybe UTCTime) -gcpvvUpdateTime - = lens _gcpvvUpdateTime - (\ s a -> s{_gcpvvUpdateTime = a}) - . mapping _DateTime - --- | Output only. The resource name of the version, in the format --- \`catalogs\/{catalog_id}\/products\/{product_id}\/versions\/a-z*[a-z0-9]\'. --- A unique identifier for the version under a product. -gcpvvName :: Lens' GoogleCloudPrivatecatalogV1beta1Version (Maybe Text) -gcpvvName - = lens _gcpvvName (\ s a -> s{_gcpvvName = a}) - --- | Output only. The user-supplied description of the version. Maximum of --- 256 characters. -gcpvvDescription :: Lens' GoogleCloudPrivatecatalogV1beta1Version (Maybe Text) -gcpvvDescription - = lens _gcpvvDescription - (\ s a -> s{_gcpvvDescription = a}) - --- | Output only. The time when the version was created. -gcpvvCreateTime :: Lens' GoogleCloudPrivatecatalogV1beta1Version (Maybe UTCTime) -gcpvvCreateTime - = lens _gcpvvCreateTime - (\ s a -> s{_gcpvvCreateTime = a}) - . mapping _DateTime - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1Version - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1Version" - (\ o -> - GoogleCloudPrivatecatalogV1beta1Version' <$> - (o .:? "asset") <*> (o .:? "updateTime") <*> - (o .:? "name") - <*> (o .:? "description") - <*> (o .:? "createTime")) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1Version - where - toJSON GoogleCloudPrivatecatalogV1beta1Version'{..} - = object - (catMaybes - [("asset" .=) <$> _gcpvvAsset, - ("updateTime" .=) <$> _gcpvvUpdateTime, - ("name" .=) <$> _gcpvvName, - ("description" .=) <$> _gcpvvDescription, - ("createTime" .=) <$> _gcpvvCreateTime]) - --- | Response message for PrivateCatalog.SearchVersions. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1SearchVersionsResponse' smart constructor. -data GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse = - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse' - { _gcpvsvrNextPageToken :: !(Maybe Text) - , _gcpvsvrVersions :: !(Maybe [GoogleCloudPrivatecatalogV1beta1Version]) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvsvrNextPageToken' --- --- * 'gcpvsvrVersions' -googleCloudPrivatecatalogV1beta1SearchVersionsResponse - :: GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse -googleCloudPrivatecatalogV1beta1SearchVersionsResponse = - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse' - {_gcpvsvrNextPageToken = Nothing, _gcpvsvrVersions = Nothing} - - --- | A pagination token returned from a previous call to SearchVersions that --- indicates from where the listing should continue. This field is --- optional. -gcpvsvrNextPageToken :: Lens' GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse (Maybe Text) -gcpvsvrNextPageToken - = lens _gcpvsvrNextPageToken - (\ s a -> s{_gcpvsvrNextPageToken = a}) - --- | The \`Version\` resources computed from the resource context. -gcpvsvrVersions :: Lens' GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse [GoogleCloudPrivatecatalogV1beta1Version] -gcpvsvrVersions - = lens _gcpvsvrVersions - (\ s a -> s{_gcpvsvrVersions = a}) - . _Default - . _Coerce - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse" - (\ o -> - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse' - <$> - (o .:? "nextPageToken") <*> - (o .:? "versions" .!= mempty)) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - where - toJSON - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse'{..} - = object - (catMaybes - [("nextPageToken" .=) <$> _gcpvsvrNextPageToken, - ("versions" .=) <$> _gcpvsvrVersions]) - --- | The readonly representation of a product computed with a given resource --- context. --- --- /See:/ 'googleCloudPrivatecatalogV1beta1Product' smart constructor. -data GoogleCloudPrivatecatalogV1beta1Product = - GoogleCloudPrivatecatalogV1beta1Product' - { _gcpvpIconURI :: !(Maybe Text) - , _gcpvpUpdateTime :: !(Maybe DateTime') - , _gcpvpDisplayMetadata :: !(Maybe GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata) - , _gcpvpName :: !(Maybe Text) - , _gcpvpAssetType :: !(Maybe Text) - , _gcpvpCreateTime :: !(Maybe DateTime') - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'GoogleCloudPrivatecatalogV1beta1Product' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'gcpvpIconURI' --- --- * 'gcpvpUpdateTime' --- --- * 'gcpvpDisplayMetadata' --- --- * 'gcpvpName' --- --- * 'gcpvpAssetType' --- --- * 'gcpvpCreateTime' -googleCloudPrivatecatalogV1beta1Product - :: GoogleCloudPrivatecatalogV1beta1Product -googleCloudPrivatecatalogV1beta1Product = - GoogleCloudPrivatecatalogV1beta1Product' - { _gcpvpIconURI = Nothing - , _gcpvpUpdateTime = Nothing - , _gcpvpDisplayMetadata = Nothing - , _gcpvpName = Nothing - , _gcpvpAssetType = Nothing - , _gcpvpCreateTime = Nothing - } - - --- | Output only. The icon URI of the product. -gcpvpIconURI :: Lens' GoogleCloudPrivatecatalogV1beta1Product (Maybe Text) -gcpvpIconURI - = lens _gcpvpIconURI (\ s a -> s{_gcpvpIconURI = a}) - --- | Output only. The time when the product was last updated. -gcpvpUpdateTime :: Lens' GoogleCloudPrivatecatalogV1beta1Product (Maybe UTCTime) -gcpvpUpdateTime - = lens _gcpvpUpdateTime - (\ s a -> s{_gcpvpUpdateTime = a}) - . mapping _DateTime - --- | Output only. The display metadata to describe the product. The JSON --- schema of the metadata differs by Product.asset_type. When the type is --- \`google.deploymentmanager.Template\`, the schema is as follows: \`\`\` --- \"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: object --- properties: name: type: string minLength: 1 maxLength: 64 description: --- type: string minLength: 1 maxLength: 2048 tagline: type: string --- minLength: 1 maxLength: 100 support_info: type: string minLength: 1 --- maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 --- documentation: type: array items: type: object properties: url: type: --- string pattern: --- \"^(https?):\/\/[-a-zA-Z0-9+&\'#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\'#\/%=~_|]\" --- title: type: string minLength: 1 maxLength: 64 description: type: string --- minLength: 1 maxLength: 2048 required: - name - description --- additionalProperties: false \`\`\` When the asset type is --- \`google.cloudprivatecatalog.ListingOnly\`, the schema is as follows: --- \`\`\` \"$schema\": http:\/\/json-schema.org\/draft-04\/schema# type: --- object properties: name: type: string minLength: 1 maxLength: 64 --- description: type: string minLength: 1 maxLength: 2048 tagline: type: --- string minLength: 1 maxLength: 100 support_info: type: string minLength: --- 1 maxLength: 2048 creator: type: string minLength: 1 maxLength: 100 --- documentation: type: array items: type: object properties: url: type: --- string pattern: --- \"^(https?):\/\/[-a-zA-Z0-9+&\'#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\'#\/%=~_|]\" --- title: type: string minLength: 1 maxLength: 64 description: type: string --- minLength: 1 maxLength: 2048 signup_url: type: string pattern: --- \"^(https?):\/\/[-a-zA-Z0-9+&\'#\/%?=~_|!:,.;]*[-a-zA-Z0-9+&\'#\/%=~_|]\" --- required: - name - description - signup_url additionalProperties: false --- \`\`\` -gcpvpDisplayMetadata :: Lens' GoogleCloudPrivatecatalogV1beta1Product (Maybe GoogleCloudPrivatecatalogV1beta1ProductDisplayMetadata) -gcpvpDisplayMetadata - = lens _gcpvpDisplayMetadata - (\ s a -> s{_gcpvpDisplayMetadata = a}) - --- | Output only. The resource name of the target product, in the format of --- \`products\/a-z*[a-z0-9]\'. A unique identifier for the product under a --- catalog. -gcpvpName :: Lens' GoogleCloudPrivatecatalogV1beta1Product (Maybe Text) -gcpvpName - = lens _gcpvpName (\ s a -> s{_gcpvpName = a}) - --- | Output only. The type of the product asset. It can be one of the --- following values: * \`google.deploymentmanager.Template\` * --- \`google.cloudprivatecatalog.ListingOnly\` -gcpvpAssetType :: Lens' GoogleCloudPrivatecatalogV1beta1Product (Maybe Text) -gcpvpAssetType - = lens _gcpvpAssetType - (\ s a -> s{_gcpvpAssetType = a}) - --- | Output only. The time when the product was created. -gcpvpCreateTime :: Lens' GoogleCloudPrivatecatalogV1beta1Product (Maybe UTCTime) -gcpvpCreateTime - = lens _gcpvpCreateTime - (\ s a -> s{_gcpvpCreateTime = a}) - . mapping _DateTime - -instance FromJSON - GoogleCloudPrivatecatalogV1beta1Product - where - parseJSON - = withObject - "GoogleCloudPrivatecatalogV1beta1Product" - (\ o -> - GoogleCloudPrivatecatalogV1beta1Product' <$> - (o .:? "iconUri") <*> (o .:? "updateTime") <*> - (o .:? "displayMetadata") - <*> (o .:? "name") - <*> (o .:? "assetType") - <*> (o .:? "createTime")) - -instance ToJSON - GoogleCloudPrivatecatalogV1beta1Product - where - toJSON GoogleCloudPrivatecatalogV1beta1Product'{..} - = object - (catMaybes - [("iconUri" .=) <$> _gcpvpIconURI, - ("updateTime" .=) <$> _gcpvpUpdateTime, - ("displayMetadata" .=) <$> _gcpvpDisplayMetadata, - ("name" .=) <$> _gcpvpName, - ("assetType" .=) <$> _gcpvpAssetType, - ("createTime" .=) <$> _gcpvpCreateTime]) diff --git a/gen/Network/Google/CloudPrivateCatalog/Types/Sum.hs b/gen/Network/Google/CloudPrivateCatalog/Types/Sum.hs deleted file mode 100644 --- a/gen/Network/Google/CloudPrivateCatalog/Types/Sum.hs +++ /dev/null @@ -1,48 +0,0 @@ -{-# LANGUAGE DeriveDataTypeable #-} -{-# LANGUAGE DeriveGeneric #-} -{-# LANGUAGE LambdaCase #-} -{-# LANGUAGE NoImplicitPrelude #-} -{-# LANGUAGE OverloadedStrings #-} - -{-# OPTIONS_GHC -fno-warn-unused-imports #-} - --- | --- Module : Network.Google.CloudPrivateCatalog.Types.Sum --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- -module Network.Google.CloudPrivateCatalog.Types.Sum where - -import Network.Google.Prelude hiding (Bytes) - --- | V1 error format. -data Xgafv - = X1 - -- ^ @1@ - -- v1 error format - | X2 - -- ^ @2@ - -- v2 error format - deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic) - -instance Hashable Xgafv - -instance FromHttpApiData Xgafv where - parseQueryParam = \case - "1" -> Right X1 - "2" -> Right X2 - x -> Left ("Unable to parse Xgafv from: " <> x) - -instance ToHttpApiData Xgafv where - toQueryParam = \case - X1 -> "1" - X2 -> "2" - -instance FromJSON Xgafv where - parseJSON = parseJSONText "Xgafv" - -instance ToJSON Xgafv where - toJSON = toJSONText diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Catalogs/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Catalogs/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Catalogs/Search.hs +++ /dev/null @@ -1,196 +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.CloudPrivateCatalog.Folders.Catalogs.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Catalog resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.folders.catalogs.search@. -module Network.Google.Resource.CloudPrivateCatalog.Folders.Catalogs.Search - ( - -- * REST Resource - FoldersCatalogsSearchResource - - -- * Creating a Request - , foldersCatalogsSearch - , FoldersCatalogsSearch - - -- * Request Lenses - , fcsXgafv - , fcsUploadProtocol - , fcsAccessToken - , fcsUploadType - , fcsResource - , fcsQuery - , fcsPageToken - , fcsPageSize - , fcsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.folders.catalogs.search@ method which the --- 'FoldersCatalogsSearch' request conforms to. -type FoldersCatalogsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "catalogs:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - --- | Search Catalog resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'foldersCatalogsSearch' smart constructor. -data FoldersCatalogsSearch = - FoldersCatalogsSearch' - { _fcsXgafv :: !(Maybe Xgafv) - , _fcsUploadProtocol :: !(Maybe Text) - , _fcsAccessToken :: !(Maybe Text) - , _fcsUploadType :: !(Maybe Text) - , _fcsResource :: !Text - , _fcsQuery :: !(Maybe Text) - , _fcsPageToken :: !(Maybe Text) - , _fcsPageSize :: !(Maybe (Textual Int32)) - , _fcsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'FoldersCatalogsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'fcsXgafv' --- --- * 'fcsUploadProtocol' --- --- * 'fcsAccessToken' --- --- * 'fcsUploadType' --- --- * 'fcsResource' --- --- * 'fcsQuery' --- --- * 'fcsPageToken' --- --- * 'fcsPageSize' --- --- * 'fcsCallback' -foldersCatalogsSearch - :: Text -- ^ 'fcsResource' - -> FoldersCatalogsSearch -foldersCatalogsSearch pFcsResource_ = - FoldersCatalogsSearch' - { _fcsXgafv = Nothing - , _fcsUploadProtocol = Nothing - , _fcsAccessToken = Nothing - , _fcsUploadType = Nothing - , _fcsResource = pFcsResource_ - , _fcsQuery = Nothing - , _fcsPageToken = Nothing - , _fcsPageSize = Nothing - , _fcsCallback = Nothing - } - - --- | V1 error format. -fcsXgafv :: Lens' FoldersCatalogsSearch (Maybe Xgafv) -fcsXgafv = lens _fcsXgafv (\ s a -> s{_fcsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -fcsUploadProtocol :: Lens' FoldersCatalogsSearch (Maybe Text) -fcsUploadProtocol - = lens _fcsUploadProtocol - (\ s a -> s{_fcsUploadProtocol = a}) - --- | OAuth access token. -fcsAccessToken :: Lens' FoldersCatalogsSearch (Maybe Text) -fcsAccessToken - = lens _fcsAccessToken - (\ s a -> s{_fcsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -fcsUploadType :: Lens' FoldersCatalogsSearch (Maybe Text) -fcsUploadType - = lens _fcsUploadType - (\ s a -> s{_fcsUploadType = a}) - --- | Required. The name of the resource context. It can be in following --- formats: * \`projects\/{project_id}\` * \`folders\/{folder_id}\` * --- \`organizations\/{organization_id}\` -fcsResource :: Lens' FoldersCatalogsSearch Text -fcsResource - = lens _fcsResource (\ s a -> s{_fcsResource = a}) - --- | The query to filter the catalogs. The supported queries are: * Get a --- single catalog: \`name=catalogs\/{catalog_id}\` -fcsQuery :: Lens' FoldersCatalogsSearch (Maybe Text) -fcsQuery = lens _fcsQuery (\ s a -> s{_fcsQuery = a}) - --- | A pagination token returned from a previous call to SearchCatalogs that --- indicates where this listing should continue from. This field is --- optional. -fcsPageToken :: Lens' FoldersCatalogsSearch (Maybe Text) -fcsPageToken - = lens _fcsPageToken (\ s a -> s{_fcsPageToken = a}) - --- | The maximum number of entries that are requested. -fcsPageSize :: Lens' FoldersCatalogsSearch (Maybe Int32) -fcsPageSize - = lens _fcsPageSize (\ s a -> s{_fcsPageSize = a}) . - mapping _Coerce - --- | JSONP -fcsCallback :: Lens' FoldersCatalogsSearch (Maybe Text) -fcsCallback - = lens _fcsCallback (\ s a -> s{_fcsCallback = a}) - -instance GoogleRequest FoldersCatalogsSearch where - type Rs FoldersCatalogsSearch = - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - type Scopes FoldersCatalogsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient FoldersCatalogsSearch'{..} - = go _fcsResource _fcsXgafv _fcsUploadProtocol - _fcsAccessToken - _fcsUploadType - _fcsQuery - _fcsPageToken - _fcsPageSize - _fcsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy FoldersCatalogsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Products/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Products/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Products/Search.hs +++ /dev/null @@ -1,197 +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.CloudPrivateCatalog.Folders.Products.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Product resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.folders.products.search@. -module Network.Google.Resource.CloudPrivateCatalog.Folders.Products.Search - ( - -- * REST Resource - FoldersProductsSearchResource - - -- * Creating a Request - , foldersProductsSearch - , FoldersProductsSearch - - -- * Request Lenses - , fpsXgafv - , fpsUploadProtocol - , fpsAccessToken - , fpsUploadType - , fpsResource - , fpsQuery - , fpsPageToken - , fpsPageSize - , fpsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.folders.products.search@ method which the --- 'FoldersProductsSearch' request conforms to. -type FoldersProductsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "products:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - --- | Search Product resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'foldersProductsSearch' smart constructor. -data FoldersProductsSearch = - FoldersProductsSearch' - { _fpsXgafv :: !(Maybe Xgafv) - , _fpsUploadProtocol :: !(Maybe Text) - , _fpsAccessToken :: !(Maybe Text) - , _fpsUploadType :: !(Maybe Text) - , _fpsResource :: !Text - , _fpsQuery :: !(Maybe Text) - , _fpsPageToken :: !(Maybe Text) - , _fpsPageSize :: !(Maybe (Textual Int32)) - , _fpsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'FoldersProductsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'fpsXgafv' --- --- * 'fpsUploadProtocol' --- --- * 'fpsAccessToken' --- --- * 'fpsUploadType' --- --- * 'fpsResource' --- --- * 'fpsQuery' --- --- * 'fpsPageToken' --- --- * 'fpsPageSize' --- --- * 'fpsCallback' -foldersProductsSearch - :: Text -- ^ 'fpsResource' - -> FoldersProductsSearch -foldersProductsSearch pFpsResource_ = - FoldersProductsSearch' - { _fpsXgafv = Nothing - , _fpsUploadProtocol = Nothing - , _fpsAccessToken = Nothing - , _fpsUploadType = Nothing - , _fpsResource = pFpsResource_ - , _fpsQuery = Nothing - , _fpsPageToken = Nothing - , _fpsPageSize = Nothing - , _fpsCallback = Nothing - } - - --- | V1 error format. -fpsXgafv :: Lens' FoldersProductsSearch (Maybe Xgafv) -fpsXgafv = lens _fpsXgafv (\ s a -> s{_fpsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -fpsUploadProtocol :: Lens' FoldersProductsSearch (Maybe Text) -fpsUploadProtocol - = lens _fpsUploadProtocol - (\ s a -> s{_fpsUploadProtocol = a}) - --- | OAuth access token. -fpsAccessToken :: Lens' FoldersProductsSearch (Maybe Text) -fpsAccessToken - = lens _fpsAccessToken - (\ s a -> s{_fpsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -fpsUploadType :: Lens' FoldersProductsSearch (Maybe Text) -fpsUploadType - = lens _fpsUploadType - (\ s a -> s{_fpsUploadType = a}) - --- | Required. The name of the resource context. See --- SearchCatalogsRequest.resource for details. -fpsResource :: Lens' FoldersProductsSearch Text -fpsResource - = lens _fpsResource (\ s a -> s{_fpsResource = a}) - --- | The query to filter the products. The supported queries are: * List --- products of all catalogs: empty * List products under a catalog: --- \`parent=catalogs\/{catalog_id}\` * Get a product by name: --- \`name=catalogs\/{catalog_id}\/products\/{product_id}\` -fpsQuery :: Lens' FoldersProductsSearch (Maybe Text) -fpsQuery = lens _fpsQuery (\ s a -> s{_fpsQuery = a}) - --- | A pagination token returned from a previous call to SearchProducts that --- indicates where this listing should continue from. This field is --- optional. -fpsPageToken :: Lens' FoldersProductsSearch (Maybe Text) -fpsPageToken - = lens _fpsPageToken (\ s a -> s{_fpsPageToken = a}) - --- | The maximum number of entries that are requested. -fpsPageSize :: Lens' FoldersProductsSearch (Maybe Int32) -fpsPageSize - = lens _fpsPageSize (\ s a -> s{_fpsPageSize = a}) . - mapping _Coerce - --- | JSONP -fpsCallback :: Lens' FoldersProductsSearch (Maybe Text) -fpsCallback - = lens _fpsCallback (\ s a -> s{_fpsCallback = a}) - -instance GoogleRequest FoldersProductsSearch where - type Rs FoldersProductsSearch = - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - type Scopes FoldersProductsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient FoldersProductsSearch'{..} - = go _fpsResource _fpsXgafv _fpsUploadProtocol - _fpsAccessToken - _fpsUploadType - _fpsQuery - _fpsPageToken - _fpsPageSize - _fpsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy FoldersProductsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Versions/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Versions/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Versions/Search.hs +++ /dev/null @@ -1,198 +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.CloudPrivateCatalog.Folders.Versions.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Version resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.folders.versions.search@. -module Network.Google.Resource.CloudPrivateCatalog.Folders.Versions.Search - ( - -- * REST Resource - FoldersVersionsSearchResource - - -- * Creating a Request - , foldersVersionsSearch - , FoldersVersionsSearch - - -- * Request Lenses - , fvsXgafv - , fvsUploadProtocol - , fvsAccessToken - , fvsUploadType - , fvsResource - , fvsQuery - , fvsPageToken - , fvsPageSize - , fvsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.folders.versions.search@ method which the --- 'FoldersVersionsSearch' request conforms to. -type FoldersVersionsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "versions:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - --- | Search Version resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'foldersVersionsSearch' smart constructor. -data FoldersVersionsSearch = - FoldersVersionsSearch' - { _fvsXgafv :: !(Maybe Xgafv) - , _fvsUploadProtocol :: !(Maybe Text) - , _fvsAccessToken :: !(Maybe Text) - , _fvsUploadType :: !(Maybe Text) - , _fvsResource :: !Text - , _fvsQuery :: !(Maybe Text) - , _fvsPageToken :: !(Maybe Text) - , _fvsPageSize :: !(Maybe (Textual Int32)) - , _fvsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'FoldersVersionsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'fvsXgafv' --- --- * 'fvsUploadProtocol' --- --- * 'fvsAccessToken' --- --- * 'fvsUploadType' --- --- * 'fvsResource' --- --- * 'fvsQuery' --- --- * 'fvsPageToken' --- --- * 'fvsPageSize' --- --- * 'fvsCallback' -foldersVersionsSearch - :: Text -- ^ 'fvsResource' - -> FoldersVersionsSearch -foldersVersionsSearch pFvsResource_ = - FoldersVersionsSearch' - { _fvsXgafv = Nothing - , _fvsUploadProtocol = Nothing - , _fvsAccessToken = Nothing - , _fvsUploadType = Nothing - , _fvsResource = pFvsResource_ - , _fvsQuery = Nothing - , _fvsPageToken = Nothing - , _fvsPageSize = Nothing - , _fvsCallback = Nothing - } - - --- | V1 error format. -fvsXgafv :: Lens' FoldersVersionsSearch (Maybe Xgafv) -fvsXgafv = lens _fvsXgafv (\ s a -> s{_fvsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -fvsUploadProtocol :: Lens' FoldersVersionsSearch (Maybe Text) -fvsUploadProtocol - = lens _fvsUploadProtocol - (\ s a -> s{_fvsUploadProtocol = a}) - --- | OAuth access token. -fvsAccessToken :: Lens' FoldersVersionsSearch (Maybe Text) -fvsAccessToken - = lens _fvsAccessToken - (\ s a -> s{_fvsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -fvsUploadType :: Lens' FoldersVersionsSearch (Maybe Text) -fvsUploadType - = lens _fvsUploadType - (\ s a -> s{_fvsUploadType = a}) - --- | Required. The name of the resource context. See --- SearchCatalogsRequest.resource for details. -fvsResource :: Lens' FoldersVersionsSearch Text -fvsResource - = lens _fvsResource (\ s a -> s{_fvsResource = a}) - --- | The query to filter the versions. Required. The supported queries are: * --- List versions under a product: --- \`parent=catalogs\/{catalog_id}\/products\/{product_id}\` * Get a --- version by name: --- \`name=catalogs\/{catalog_id}\/products\/{product_id}\/versions\/{version_id}\` -fvsQuery :: Lens' FoldersVersionsSearch (Maybe Text) -fvsQuery = lens _fvsQuery (\ s a -> s{_fvsQuery = a}) - --- | A pagination token returned from a previous call to SearchVersions that --- indicates where this listing should continue from. This field is --- optional. -fvsPageToken :: Lens' FoldersVersionsSearch (Maybe Text) -fvsPageToken - = lens _fvsPageToken (\ s a -> s{_fvsPageToken = a}) - --- | The maximum number of entries that are requested. -fvsPageSize :: Lens' FoldersVersionsSearch (Maybe Int32) -fvsPageSize - = lens _fvsPageSize (\ s a -> s{_fvsPageSize = a}) . - mapping _Coerce - --- | JSONP -fvsCallback :: Lens' FoldersVersionsSearch (Maybe Text) -fvsCallback - = lens _fvsCallback (\ s a -> s{_fvsCallback = a}) - -instance GoogleRequest FoldersVersionsSearch where - type Rs FoldersVersionsSearch = - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - type Scopes FoldersVersionsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient FoldersVersionsSearch'{..} - = go _fvsResource _fvsXgafv _fvsUploadProtocol - _fvsAccessToken - _fvsUploadType - _fvsQuery - _fvsPageToken - _fvsPageSize - _fvsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy FoldersVersionsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Catalogs/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Catalogs/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Catalogs/Search.hs +++ /dev/null @@ -1,197 +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.CloudPrivateCatalog.Organizations.Catalogs.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Catalog resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.organizations.catalogs.search@. -module Network.Google.Resource.CloudPrivateCatalog.Organizations.Catalogs.Search - ( - -- * REST Resource - OrganizationsCatalogsSearchResource - - -- * Creating a Request - , organizationsCatalogsSearch - , OrganizationsCatalogsSearch - - -- * Request Lenses - , ocsXgafv - , ocsUploadProtocol - , ocsAccessToken - , ocsUploadType - , ocsResource - , ocsQuery - , ocsPageToken - , ocsPageSize - , ocsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.organizations.catalogs.search@ method which the --- 'OrganizationsCatalogsSearch' request conforms to. -type OrganizationsCatalogsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "catalogs:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - --- | Search Catalog resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'organizationsCatalogsSearch' smart constructor. -data OrganizationsCatalogsSearch = - OrganizationsCatalogsSearch' - { _ocsXgafv :: !(Maybe Xgafv) - , _ocsUploadProtocol :: !(Maybe Text) - , _ocsAccessToken :: !(Maybe Text) - , _ocsUploadType :: !(Maybe Text) - , _ocsResource :: !Text - , _ocsQuery :: !(Maybe Text) - , _ocsPageToken :: !(Maybe Text) - , _ocsPageSize :: !(Maybe (Textual Int32)) - , _ocsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'OrganizationsCatalogsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'ocsXgafv' --- --- * 'ocsUploadProtocol' --- --- * 'ocsAccessToken' --- --- * 'ocsUploadType' --- --- * 'ocsResource' --- --- * 'ocsQuery' --- --- * 'ocsPageToken' --- --- * 'ocsPageSize' --- --- * 'ocsCallback' -organizationsCatalogsSearch - :: Text -- ^ 'ocsResource' - -> OrganizationsCatalogsSearch -organizationsCatalogsSearch pOcsResource_ = - OrganizationsCatalogsSearch' - { _ocsXgafv = Nothing - , _ocsUploadProtocol = Nothing - , _ocsAccessToken = Nothing - , _ocsUploadType = Nothing - , _ocsResource = pOcsResource_ - , _ocsQuery = Nothing - , _ocsPageToken = Nothing - , _ocsPageSize = Nothing - , _ocsCallback = Nothing - } - - --- | V1 error format. -ocsXgafv :: Lens' OrganizationsCatalogsSearch (Maybe Xgafv) -ocsXgafv = lens _ocsXgafv (\ s a -> s{_ocsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -ocsUploadProtocol :: Lens' OrganizationsCatalogsSearch (Maybe Text) -ocsUploadProtocol - = lens _ocsUploadProtocol - (\ s a -> s{_ocsUploadProtocol = a}) - --- | OAuth access token. -ocsAccessToken :: Lens' OrganizationsCatalogsSearch (Maybe Text) -ocsAccessToken - = lens _ocsAccessToken - (\ s a -> s{_ocsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -ocsUploadType :: Lens' OrganizationsCatalogsSearch (Maybe Text) -ocsUploadType - = lens _ocsUploadType - (\ s a -> s{_ocsUploadType = a}) - --- | Required. The name of the resource context. It can be in following --- formats: * \`projects\/{project_id}\` * \`folders\/{folder_id}\` * --- \`organizations\/{organization_id}\` -ocsResource :: Lens' OrganizationsCatalogsSearch Text -ocsResource - = lens _ocsResource (\ s a -> s{_ocsResource = a}) - --- | The query to filter the catalogs. The supported queries are: * Get a --- single catalog: \`name=catalogs\/{catalog_id}\` -ocsQuery :: Lens' OrganizationsCatalogsSearch (Maybe Text) -ocsQuery = lens _ocsQuery (\ s a -> s{_ocsQuery = a}) - --- | A pagination token returned from a previous call to SearchCatalogs that --- indicates where this listing should continue from. This field is --- optional. -ocsPageToken :: Lens' OrganizationsCatalogsSearch (Maybe Text) -ocsPageToken - = lens _ocsPageToken (\ s a -> s{_ocsPageToken = a}) - --- | The maximum number of entries that are requested. -ocsPageSize :: Lens' OrganizationsCatalogsSearch (Maybe Int32) -ocsPageSize - = lens _ocsPageSize (\ s a -> s{_ocsPageSize = a}) . - mapping _Coerce - --- | JSONP -ocsCallback :: Lens' OrganizationsCatalogsSearch (Maybe Text) -ocsCallback - = lens _ocsCallback (\ s a -> s{_ocsCallback = a}) - -instance GoogleRequest OrganizationsCatalogsSearch - where - type Rs OrganizationsCatalogsSearch = - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - type Scopes OrganizationsCatalogsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient OrganizationsCatalogsSearch'{..} - = go _ocsResource _ocsXgafv _ocsUploadProtocol - _ocsAccessToken - _ocsUploadType - _ocsQuery - _ocsPageToken - _ocsPageSize - _ocsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy OrganizationsCatalogsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Products/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Products/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Products/Search.hs +++ /dev/null @@ -1,198 +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.CloudPrivateCatalog.Organizations.Products.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Product resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.organizations.products.search@. -module Network.Google.Resource.CloudPrivateCatalog.Organizations.Products.Search - ( - -- * REST Resource - OrganizationsProductsSearchResource - - -- * Creating a Request - , organizationsProductsSearch - , OrganizationsProductsSearch - - -- * Request Lenses - , opsXgafv - , opsUploadProtocol - , opsAccessToken - , opsUploadType - , opsResource - , opsQuery - , opsPageToken - , opsPageSize - , opsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.organizations.products.search@ method which the --- 'OrganizationsProductsSearch' request conforms to. -type OrganizationsProductsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "products:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - --- | Search Product resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'organizationsProductsSearch' smart constructor. -data OrganizationsProductsSearch = - OrganizationsProductsSearch' - { _opsXgafv :: !(Maybe Xgafv) - , _opsUploadProtocol :: !(Maybe Text) - , _opsAccessToken :: !(Maybe Text) - , _opsUploadType :: !(Maybe Text) - , _opsResource :: !Text - , _opsQuery :: !(Maybe Text) - , _opsPageToken :: !(Maybe Text) - , _opsPageSize :: !(Maybe (Textual Int32)) - , _opsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'OrganizationsProductsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'opsXgafv' --- --- * 'opsUploadProtocol' --- --- * 'opsAccessToken' --- --- * 'opsUploadType' --- --- * 'opsResource' --- --- * 'opsQuery' --- --- * 'opsPageToken' --- --- * 'opsPageSize' --- --- * 'opsCallback' -organizationsProductsSearch - :: Text -- ^ 'opsResource' - -> OrganizationsProductsSearch -organizationsProductsSearch pOpsResource_ = - OrganizationsProductsSearch' - { _opsXgafv = Nothing - , _opsUploadProtocol = Nothing - , _opsAccessToken = Nothing - , _opsUploadType = Nothing - , _opsResource = pOpsResource_ - , _opsQuery = Nothing - , _opsPageToken = Nothing - , _opsPageSize = Nothing - , _opsCallback = Nothing - } - - --- | V1 error format. -opsXgafv :: Lens' OrganizationsProductsSearch (Maybe Xgafv) -opsXgafv = lens _opsXgafv (\ s a -> s{_opsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -opsUploadProtocol :: Lens' OrganizationsProductsSearch (Maybe Text) -opsUploadProtocol - = lens _opsUploadProtocol - (\ s a -> s{_opsUploadProtocol = a}) - --- | OAuth access token. -opsAccessToken :: Lens' OrganizationsProductsSearch (Maybe Text) -opsAccessToken - = lens _opsAccessToken - (\ s a -> s{_opsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -opsUploadType :: Lens' OrganizationsProductsSearch (Maybe Text) -opsUploadType - = lens _opsUploadType - (\ s a -> s{_opsUploadType = a}) - --- | Required. The name of the resource context. See --- SearchCatalogsRequest.resource for details. -opsResource :: Lens' OrganizationsProductsSearch Text -opsResource - = lens _opsResource (\ s a -> s{_opsResource = a}) - --- | The query to filter the products. The supported queries are: * List --- products of all catalogs: empty * List products under a catalog: --- \`parent=catalogs\/{catalog_id}\` * Get a product by name: --- \`name=catalogs\/{catalog_id}\/products\/{product_id}\` -opsQuery :: Lens' OrganizationsProductsSearch (Maybe Text) -opsQuery = lens _opsQuery (\ s a -> s{_opsQuery = a}) - --- | A pagination token returned from a previous call to SearchProducts that --- indicates where this listing should continue from. This field is --- optional. -opsPageToken :: Lens' OrganizationsProductsSearch (Maybe Text) -opsPageToken - = lens _opsPageToken (\ s a -> s{_opsPageToken = a}) - --- | The maximum number of entries that are requested. -opsPageSize :: Lens' OrganizationsProductsSearch (Maybe Int32) -opsPageSize - = lens _opsPageSize (\ s a -> s{_opsPageSize = a}) . - mapping _Coerce - --- | JSONP -opsCallback :: Lens' OrganizationsProductsSearch (Maybe Text) -opsCallback - = lens _opsCallback (\ s a -> s{_opsCallback = a}) - -instance GoogleRequest OrganizationsProductsSearch - where - type Rs OrganizationsProductsSearch = - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - type Scopes OrganizationsProductsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient OrganizationsProductsSearch'{..} - = go _opsResource _opsXgafv _opsUploadProtocol - _opsAccessToken - _opsUploadType - _opsQuery - _opsPageToken - _opsPageSize - _opsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy OrganizationsProductsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Versions/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Versions/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Versions/Search.hs +++ /dev/null @@ -1,199 +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.CloudPrivateCatalog.Organizations.Versions.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Version resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.organizations.versions.search@. -module Network.Google.Resource.CloudPrivateCatalog.Organizations.Versions.Search - ( - -- * REST Resource - OrganizationsVersionsSearchResource - - -- * Creating a Request - , organizationsVersionsSearch - , OrganizationsVersionsSearch - - -- * Request Lenses - , ovsXgafv - , ovsUploadProtocol - , ovsAccessToken - , ovsUploadType - , ovsResource - , ovsQuery - , ovsPageToken - , ovsPageSize - , ovsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.organizations.versions.search@ method which the --- 'OrganizationsVersionsSearch' request conforms to. -type OrganizationsVersionsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "versions:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - --- | Search Version resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'organizationsVersionsSearch' smart constructor. -data OrganizationsVersionsSearch = - OrganizationsVersionsSearch' - { _ovsXgafv :: !(Maybe Xgafv) - , _ovsUploadProtocol :: !(Maybe Text) - , _ovsAccessToken :: !(Maybe Text) - , _ovsUploadType :: !(Maybe Text) - , _ovsResource :: !Text - , _ovsQuery :: !(Maybe Text) - , _ovsPageToken :: !(Maybe Text) - , _ovsPageSize :: !(Maybe (Textual Int32)) - , _ovsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'OrganizationsVersionsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'ovsXgafv' --- --- * 'ovsUploadProtocol' --- --- * 'ovsAccessToken' --- --- * 'ovsUploadType' --- --- * 'ovsResource' --- --- * 'ovsQuery' --- --- * 'ovsPageToken' --- --- * 'ovsPageSize' --- --- * 'ovsCallback' -organizationsVersionsSearch - :: Text -- ^ 'ovsResource' - -> OrganizationsVersionsSearch -organizationsVersionsSearch pOvsResource_ = - OrganizationsVersionsSearch' - { _ovsXgafv = Nothing - , _ovsUploadProtocol = Nothing - , _ovsAccessToken = Nothing - , _ovsUploadType = Nothing - , _ovsResource = pOvsResource_ - , _ovsQuery = Nothing - , _ovsPageToken = Nothing - , _ovsPageSize = Nothing - , _ovsCallback = Nothing - } - - --- | V1 error format. -ovsXgafv :: Lens' OrganizationsVersionsSearch (Maybe Xgafv) -ovsXgafv = lens _ovsXgafv (\ s a -> s{_ovsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -ovsUploadProtocol :: Lens' OrganizationsVersionsSearch (Maybe Text) -ovsUploadProtocol - = lens _ovsUploadProtocol - (\ s a -> s{_ovsUploadProtocol = a}) - --- | OAuth access token. -ovsAccessToken :: Lens' OrganizationsVersionsSearch (Maybe Text) -ovsAccessToken - = lens _ovsAccessToken - (\ s a -> s{_ovsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -ovsUploadType :: Lens' OrganizationsVersionsSearch (Maybe Text) -ovsUploadType - = lens _ovsUploadType - (\ s a -> s{_ovsUploadType = a}) - --- | Required. The name of the resource context. See --- SearchCatalogsRequest.resource for details. -ovsResource :: Lens' OrganizationsVersionsSearch Text -ovsResource - = lens _ovsResource (\ s a -> s{_ovsResource = a}) - --- | The query to filter the versions. Required. The supported queries are: * --- List versions under a product: --- \`parent=catalogs\/{catalog_id}\/products\/{product_id}\` * Get a --- version by name: --- \`name=catalogs\/{catalog_id}\/products\/{product_id}\/versions\/{version_id}\` -ovsQuery :: Lens' OrganizationsVersionsSearch (Maybe Text) -ovsQuery = lens _ovsQuery (\ s a -> s{_ovsQuery = a}) - --- | A pagination token returned from a previous call to SearchVersions that --- indicates where this listing should continue from. This field is --- optional. -ovsPageToken :: Lens' OrganizationsVersionsSearch (Maybe Text) -ovsPageToken - = lens _ovsPageToken (\ s a -> s{_ovsPageToken = a}) - --- | The maximum number of entries that are requested. -ovsPageSize :: Lens' OrganizationsVersionsSearch (Maybe Int32) -ovsPageSize - = lens _ovsPageSize (\ s a -> s{_ovsPageSize = a}) . - mapping _Coerce - --- | JSONP -ovsCallback :: Lens' OrganizationsVersionsSearch (Maybe Text) -ovsCallback - = lens _ovsCallback (\ s a -> s{_ovsCallback = a}) - -instance GoogleRequest OrganizationsVersionsSearch - where - type Rs OrganizationsVersionsSearch = - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - type Scopes OrganizationsVersionsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient OrganizationsVersionsSearch'{..} - = go _ovsResource _ovsXgafv _ovsUploadProtocol - _ovsAccessToken - _ovsUploadType - _ovsQuery - _ovsPageToken - _ovsPageSize - _ovsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy OrganizationsVersionsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Catalogs/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Catalogs/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Catalogs/Search.hs +++ /dev/null @@ -1,196 +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.CloudPrivateCatalog.Projects.Catalogs.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Catalog resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.projects.catalogs.search@. -module Network.Google.Resource.CloudPrivateCatalog.Projects.Catalogs.Search - ( - -- * REST Resource - ProjectsCatalogsSearchResource - - -- * Creating a Request - , projectsCatalogsSearch - , ProjectsCatalogsSearch - - -- * Request Lenses - , pcsXgafv - , pcsUploadProtocol - , pcsAccessToken - , pcsUploadType - , pcsResource - , pcsQuery - , pcsPageToken - , pcsPageSize - , pcsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.projects.catalogs.search@ method which the --- 'ProjectsCatalogsSearch' request conforms to. -type ProjectsCatalogsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "catalogs:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - --- | Search Catalog resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'projectsCatalogsSearch' smart constructor. -data ProjectsCatalogsSearch = - ProjectsCatalogsSearch' - { _pcsXgafv :: !(Maybe Xgafv) - , _pcsUploadProtocol :: !(Maybe Text) - , _pcsAccessToken :: !(Maybe Text) - , _pcsUploadType :: !(Maybe Text) - , _pcsResource :: !Text - , _pcsQuery :: !(Maybe Text) - , _pcsPageToken :: !(Maybe Text) - , _pcsPageSize :: !(Maybe (Textual Int32)) - , _pcsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'ProjectsCatalogsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'pcsXgafv' --- --- * 'pcsUploadProtocol' --- --- * 'pcsAccessToken' --- --- * 'pcsUploadType' --- --- * 'pcsResource' --- --- * 'pcsQuery' --- --- * 'pcsPageToken' --- --- * 'pcsPageSize' --- --- * 'pcsCallback' -projectsCatalogsSearch - :: Text -- ^ 'pcsResource' - -> ProjectsCatalogsSearch -projectsCatalogsSearch pPcsResource_ = - ProjectsCatalogsSearch' - { _pcsXgafv = Nothing - , _pcsUploadProtocol = Nothing - , _pcsAccessToken = Nothing - , _pcsUploadType = Nothing - , _pcsResource = pPcsResource_ - , _pcsQuery = Nothing - , _pcsPageToken = Nothing - , _pcsPageSize = Nothing - , _pcsCallback = Nothing - } - - --- | V1 error format. -pcsXgafv :: Lens' ProjectsCatalogsSearch (Maybe Xgafv) -pcsXgafv = lens _pcsXgafv (\ s a -> s{_pcsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -pcsUploadProtocol :: Lens' ProjectsCatalogsSearch (Maybe Text) -pcsUploadProtocol - = lens _pcsUploadProtocol - (\ s a -> s{_pcsUploadProtocol = a}) - --- | OAuth access token. -pcsAccessToken :: Lens' ProjectsCatalogsSearch (Maybe Text) -pcsAccessToken - = lens _pcsAccessToken - (\ s a -> s{_pcsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -pcsUploadType :: Lens' ProjectsCatalogsSearch (Maybe Text) -pcsUploadType - = lens _pcsUploadType - (\ s a -> s{_pcsUploadType = a}) - --- | Required. The name of the resource context. It can be in following --- formats: * \`projects\/{project_id}\` * \`folders\/{folder_id}\` * --- \`organizations\/{organization_id}\` -pcsResource :: Lens' ProjectsCatalogsSearch Text -pcsResource - = lens _pcsResource (\ s a -> s{_pcsResource = a}) - --- | The query to filter the catalogs. The supported queries are: * Get a --- single catalog: \`name=catalogs\/{catalog_id}\` -pcsQuery :: Lens' ProjectsCatalogsSearch (Maybe Text) -pcsQuery = lens _pcsQuery (\ s a -> s{_pcsQuery = a}) - --- | A pagination token returned from a previous call to SearchCatalogs that --- indicates where this listing should continue from. This field is --- optional. -pcsPageToken :: Lens' ProjectsCatalogsSearch (Maybe Text) -pcsPageToken - = lens _pcsPageToken (\ s a -> s{_pcsPageToken = a}) - --- | The maximum number of entries that are requested. -pcsPageSize :: Lens' ProjectsCatalogsSearch (Maybe Int32) -pcsPageSize - = lens _pcsPageSize (\ s a -> s{_pcsPageSize = a}) . - mapping _Coerce - --- | JSONP -pcsCallback :: Lens' ProjectsCatalogsSearch (Maybe Text) -pcsCallback - = lens _pcsCallback (\ s a -> s{_pcsCallback = a}) - -instance GoogleRequest ProjectsCatalogsSearch where - type Rs ProjectsCatalogsSearch = - GoogleCloudPrivatecatalogV1beta1SearchCatalogsResponse - type Scopes ProjectsCatalogsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient ProjectsCatalogsSearch'{..} - = go _pcsResource _pcsXgafv _pcsUploadProtocol - _pcsAccessToken - _pcsUploadType - _pcsQuery - _pcsPageToken - _pcsPageSize - _pcsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy ProjectsCatalogsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Products/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Products/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Products/Search.hs +++ /dev/null @@ -1,197 +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.CloudPrivateCatalog.Projects.Products.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Product resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.projects.products.search@. -module Network.Google.Resource.CloudPrivateCatalog.Projects.Products.Search - ( - -- * REST Resource - ProjectsProductsSearchResource - - -- * Creating a Request - , projectsProductsSearch - , ProjectsProductsSearch - - -- * Request Lenses - , ppsXgafv - , ppsUploadProtocol - , ppsAccessToken - , ppsUploadType - , ppsResource - , ppsQuery - , ppsPageToken - , ppsPageSize - , ppsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.projects.products.search@ method which the --- 'ProjectsProductsSearch' request conforms to. -type ProjectsProductsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "products:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - --- | Search Product resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'projectsProductsSearch' smart constructor. -data ProjectsProductsSearch = - ProjectsProductsSearch' - { _ppsXgafv :: !(Maybe Xgafv) - , _ppsUploadProtocol :: !(Maybe Text) - , _ppsAccessToken :: !(Maybe Text) - , _ppsUploadType :: !(Maybe Text) - , _ppsResource :: !Text - , _ppsQuery :: !(Maybe Text) - , _ppsPageToken :: !(Maybe Text) - , _ppsPageSize :: !(Maybe (Textual Int32)) - , _ppsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'ProjectsProductsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'ppsXgafv' --- --- * 'ppsUploadProtocol' --- --- * 'ppsAccessToken' --- --- * 'ppsUploadType' --- --- * 'ppsResource' --- --- * 'ppsQuery' --- --- * 'ppsPageToken' --- --- * 'ppsPageSize' --- --- * 'ppsCallback' -projectsProductsSearch - :: Text -- ^ 'ppsResource' - -> ProjectsProductsSearch -projectsProductsSearch pPpsResource_ = - ProjectsProductsSearch' - { _ppsXgafv = Nothing - , _ppsUploadProtocol = Nothing - , _ppsAccessToken = Nothing - , _ppsUploadType = Nothing - , _ppsResource = pPpsResource_ - , _ppsQuery = Nothing - , _ppsPageToken = Nothing - , _ppsPageSize = Nothing - , _ppsCallback = Nothing - } - - --- | V1 error format. -ppsXgafv :: Lens' ProjectsProductsSearch (Maybe Xgafv) -ppsXgafv = lens _ppsXgafv (\ s a -> s{_ppsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -ppsUploadProtocol :: Lens' ProjectsProductsSearch (Maybe Text) -ppsUploadProtocol - = lens _ppsUploadProtocol - (\ s a -> s{_ppsUploadProtocol = a}) - --- | OAuth access token. -ppsAccessToken :: Lens' ProjectsProductsSearch (Maybe Text) -ppsAccessToken - = lens _ppsAccessToken - (\ s a -> s{_ppsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -ppsUploadType :: Lens' ProjectsProductsSearch (Maybe Text) -ppsUploadType - = lens _ppsUploadType - (\ s a -> s{_ppsUploadType = a}) - --- | Required. The name of the resource context. See --- SearchCatalogsRequest.resource for details. -ppsResource :: Lens' ProjectsProductsSearch Text -ppsResource - = lens _ppsResource (\ s a -> s{_ppsResource = a}) - --- | The query to filter the products. The supported queries are: * List --- products of all catalogs: empty * List products under a catalog: --- \`parent=catalogs\/{catalog_id}\` * Get a product by name: --- \`name=catalogs\/{catalog_id}\/products\/{product_id}\` -ppsQuery :: Lens' ProjectsProductsSearch (Maybe Text) -ppsQuery = lens _ppsQuery (\ s a -> s{_ppsQuery = a}) - --- | A pagination token returned from a previous call to SearchProducts that --- indicates where this listing should continue from. This field is --- optional. -ppsPageToken :: Lens' ProjectsProductsSearch (Maybe Text) -ppsPageToken - = lens _ppsPageToken (\ s a -> s{_ppsPageToken = a}) - --- | The maximum number of entries that are requested. -ppsPageSize :: Lens' ProjectsProductsSearch (Maybe Int32) -ppsPageSize - = lens _ppsPageSize (\ s a -> s{_ppsPageSize = a}) . - mapping _Coerce - --- | JSONP -ppsCallback :: Lens' ProjectsProductsSearch (Maybe Text) -ppsCallback - = lens _ppsCallback (\ s a -> s{_ppsCallback = a}) - -instance GoogleRequest ProjectsProductsSearch where - type Rs ProjectsProductsSearch = - GoogleCloudPrivatecatalogV1beta1SearchProductsResponse - type Scopes ProjectsProductsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient ProjectsProductsSearch'{..} - = go _ppsResource _ppsXgafv _ppsUploadProtocol - _ppsAccessToken - _ppsUploadType - _ppsQuery - _ppsPageToken - _ppsPageSize - _ppsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy ProjectsProductsSearchResource) - mempty diff --git a/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Versions/Search.hs b/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Versions/Search.hs deleted file mode 100644 --- a/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Versions/Search.hs +++ /dev/null @@ -1,198 +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.CloudPrivateCatalog.Projects.Versions.Search --- Copyright : (c) 2015-2016 Brendan Hay --- License : Mozilla Public License, v. 2.0. --- Maintainer : Brendan Hay --- Stability : auto-generated --- Portability : non-portable (GHC extensions) --- --- Search Version resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ for @cloudprivatecatalog.projects.versions.search@. -module Network.Google.Resource.CloudPrivateCatalog.Projects.Versions.Search - ( - -- * REST Resource - ProjectsVersionsSearchResource - - -- * Creating a Request - , projectsVersionsSearch - , ProjectsVersionsSearch - - -- * Request Lenses - , pvsXgafv - , pvsUploadProtocol - , pvsAccessToken - , pvsUploadType - , pvsResource - , pvsQuery - , pvsPageToken - , pvsPageSize - , pvsCallback - ) where - -import Network.Google.CloudPrivateCatalog.Types -import Network.Google.Prelude - --- | A resource alias for @cloudprivatecatalog.projects.versions.search@ method which the --- 'ProjectsVersionsSearch' request conforms to. -type ProjectsVersionsSearchResource = - "v1beta1" :> - Capture "resource" Text :> - "versions:search" :> - QueryParam "$.xgafv" Xgafv :> - QueryParam "upload_protocol" Text :> - QueryParam "access_token" Text :> - QueryParam "uploadType" Text :> - QueryParam "query" Text :> - QueryParam "pageToken" Text :> - QueryParam "pageSize" (Textual Int32) :> - QueryParam "callback" Text :> - QueryParam "alt" AltJSON :> - Get '[JSON] - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - --- | Search Version resources that consumers have access to, within the scope --- of the consumer cloud resource hierarchy context. --- --- /See:/ 'projectsVersionsSearch' smart constructor. -data ProjectsVersionsSearch = - ProjectsVersionsSearch' - { _pvsXgafv :: !(Maybe Xgafv) - , _pvsUploadProtocol :: !(Maybe Text) - , _pvsAccessToken :: !(Maybe Text) - , _pvsUploadType :: !(Maybe Text) - , _pvsResource :: !Text - , _pvsQuery :: !(Maybe Text) - , _pvsPageToken :: !(Maybe Text) - , _pvsPageSize :: !(Maybe (Textual Int32)) - , _pvsCallback :: !(Maybe Text) - } - deriving (Eq, Show, Data, Typeable, Generic) - - --- | Creates a value of 'ProjectsVersionsSearch' with the minimum fields required to make a request. --- --- Use one of the following lenses to modify other fields as desired: --- --- * 'pvsXgafv' --- --- * 'pvsUploadProtocol' --- --- * 'pvsAccessToken' --- --- * 'pvsUploadType' --- --- * 'pvsResource' --- --- * 'pvsQuery' --- --- * 'pvsPageToken' --- --- * 'pvsPageSize' --- --- * 'pvsCallback' -projectsVersionsSearch - :: Text -- ^ 'pvsResource' - -> ProjectsVersionsSearch -projectsVersionsSearch pPvsResource_ = - ProjectsVersionsSearch' - { _pvsXgafv = Nothing - , _pvsUploadProtocol = Nothing - , _pvsAccessToken = Nothing - , _pvsUploadType = Nothing - , _pvsResource = pPvsResource_ - , _pvsQuery = Nothing - , _pvsPageToken = Nothing - , _pvsPageSize = Nothing - , _pvsCallback = Nothing - } - - --- | V1 error format. -pvsXgafv :: Lens' ProjectsVersionsSearch (Maybe Xgafv) -pvsXgafv = lens _pvsXgafv (\ s a -> s{_pvsXgafv = a}) - --- | Upload protocol for media (e.g. \"raw\", \"multipart\"). -pvsUploadProtocol :: Lens' ProjectsVersionsSearch (Maybe Text) -pvsUploadProtocol - = lens _pvsUploadProtocol - (\ s a -> s{_pvsUploadProtocol = a}) - --- | OAuth access token. -pvsAccessToken :: Lens' ProjectsVersionsSearch (Maybe Text) -pvsAccessToken - = lens _pvsAccessToken - (\ s a -> s{_pvsAccessToken = a}) - --- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). -pvsUploadType :: Lens' ProjectsVersionsSearch (Maybe Text) -pvsUploadType - = lens _pvsUploadType - (\ s a -> s{_pvsUploadType = a}) - --- | Required. The name of the resource context. See --- SearchCatalogsRequest.resource for details. -pvsResource :: Lens' ProjectsVersionsSearch Text -pvsResource - = lens _pvsResource (\ s a -> s{_pvsResource = a}) - --- | The query to filter the versions. Required. The supported queries are: * --- List versions under a product: --- \`parent=catalogs\/{catalog_id}\/products\/{product_id}\` * Get a --- version by name: --- \`name=catalogs\/{catalog_id}\/products\/{product_id}\/versions\/{version_id}\` -pvsQuery :: Lens' ProjectsVersionsSearch (Maybe Text) -pvsQuery = lens _pvsQuery (\ s a -> s{_pvsQuery = a}) - --- | A pagination token returned from a previous call to SearchVersions that --- indicates where this listing should continue from. This field is --- optional. -pvsPageToken :: Lens' ProjectsVersionsSearch (Maybe Text) -pvsPageToken - = lens _pvsPageToken (\ s a -> s{_pvsPageToken = a}) - --- | The maximum number of entries that are requested. -pvsPageSize :: Lens' ProjectsVersionsSearch (Maybe Int32) -pvsPageSize - = lens _pvsPageSize (\ s a -> s{_pvsPageSize = a}) . - mapping _Coerce - --- | JSONP -pvsCallback :: Lens' ProjectsVersionsSearch (Maybe Text) -pvsCallback - = lens _pvsCallback (\ s a -> s{_pvsCallback = a}) - -instance GoogleRequest ProjectsVersionsSearch where - type Rs ProjectsVersionsSearch = - GoogleCloudPrivatecatalogV1beta1SearchVersionsResponse - type Scopes ProjectsVersionsSearch = - '["https://www.googleapis.com/auth/cloud-platform"] - requestClient ProjectsVersionsSearch'{..} - = go _pvsResource _pvsXgafv _pvsUploadProtocol - _pvsAccessToken - _pvsUploadType - _pvsQuery - _pvsPageToken - _pvsPageSize - _pvsCallback - (Just AltJSON) - cloudPrivateCatalogService - where go - = buildClient - (Proxy :: Proxy ProjectsVersionsSearchResource) - mempty diff --git a/gogol-cloudprivatecatalog.cabal b/gogol-cloudprivatecatalog.cabal --- a/gogol-cloudprivatecatalog.cabal +++ b/gogol-cloudprivatecatalog.cabal @@ -1,55 +1,69 @@ -name: gogol-cloudprivatecatalog -version: 0.5.0 -synopsis: Google Cloud Private Catalog 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 -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-cloudprivatecatalog +version: 1.0.0 +synopsis: Google Cloud Private Catalog 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 , Toni Cebrián +copyright: Copyright (c) 2015-2025 Brendan Hay +category: Google +build-type: Simple +extra-source-files: + README.md + src/.gitkeep + description: - Enable cloud users to discover enterprise catalogs and products in their - organizations. - . - /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 @v1beta1@ - of the API. + Enable cloud users to discover enterprise catalogs and products in their organizations. + . + /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 @v1beta1@ + 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-cloudprivatecatalog +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.CloudPrivateCatalog - , Network.Google.CloudPrivateCatalog.Types - , Network.Google.Resource.CloudPrivateCatalog.Folders.Catalogs.Search - , Network.Google.Resource.CloudPrivateCatalog.Folders.Products.Search - , Network.Google.Resource.CloudPrivateCatalog.Folders.Versions.Search - , Network.Google.Resource.CloudPrivateCatalog.Organizations.Catalogs.Search - , Network.Google.Resource.CloudPrivateCatalog.Organizations.Products.Search - , Network.Google.Resource.CloudPrivateCatalog.Organizations.Versions.Search - , Network.Google.Resource.CloudPrivateCatalog.Projects.Catalogs.Search - , Network.Google.Resource.CloudPrivateCatalog.Projects.Products.Search - , Network.Google.Resource.CloudPrivateCatalog.Projects.Versions.Search + exposed-modules: + Gogol.CloudPrivateCatalog + Gogol.CloudPrivateCatalog.Folders.Catalogs.Search + Gogol.CloudPrivateCatalog.Folders.Products.Search + Gogol.CloudPrivateCatalog.Folders.Versions.Search + Gogol.CloudPrivateCatalog.Organizations.Catalogs.Search + Gogol.CloudPrivateCatalog.Organizations.Products.Search + Gogol.CloudPrivateCatalog.Organizations.Versions.Search + Gogol.CloudPrivateCatalog.Projects.Catalogs.Search + Gogol.CloudPrivateCatalog.Projects.Products.Search + Gogol.CloudPrivateCatalog.Projects.Versions.Search + Gogol.CloudPrivateCatalog.Types - other-modules: - Network.Google.CloudPrivateCatalog.Types.Product - , Network.Google.CloudPrivateCatalog.Types.Sum + other-modules: + Gogol.CloudPrivateCatalog.Internal.Product + Gogol.CloudPrivateCatalog.Internal.Sum - build-depends: - gogol-core == 0.5.0.* - , base >= 4.7 && < 5 + build-depends: gogol-core ^>=1.0.0