{-# 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
(
ProjectsProductsSearchResource
, projectsProductsSearch
, ProjectsProductsSearch
, ppsXgafv
, ppsUploadProtocol
, ppsAccessToken
, ppsUploadType
, ppsResource
, ppsQuery
, ppsPageToken
, ppsPageSize
, ppsCallback
) where
import Network.Google.CloudPrivateCatalog.Types
import Network.Google.Prelude
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
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)
projectsProductsSearch
:: Text
-> ProjectsProductsSearch
projectsProductsSearch pPpsResource_ =
ProjectsProductsSearch'
{ _ppsXgafv = Nothing
, _ppsUploadProtocol = Nothing
, _ppsAccessToken = Nothing
, _ppsUploadType = Nothing
, _ppsResource = pPpsResource_
, _ppsQuery = Nothing
, _ppsPageToken = Nothing
, _ppsPageSize = Nothing
, _ppsCallback = Nothing
}
ppsXgafv :: Lens' ProjectsProductsSearch (Maybe Xgafv)
ppsXgafv = lens _ppsXgafv (\ s a -> s{_ppsXgafv = a})
ppsUploadProtocol :: Lens' ProjectsProductsSearch (Maybe Text)
ppsUploadProtocol
= lens _ppsUploadProtocol
(\ s a -> s{_ppsUploadProtocol = a})
ppsAccessToken :: Lens' ProjectsProductsSearch (Maybe Text)
ppsAccessToken
= lens _ppsAccessToken
(\ s a -> s{_ppsAccessToken = a})
ppsUploadType :: Lens' ProjectsProductsSearch (Maybe Text)
ppsUploadType
= lens _ppsUploadType
(\ s a -> s{_ppsUploadType = a})
ppsResource :: Lens' ProjectsProductsSearch Text
ppsResource
= lens _ppsResource (\ s a -> s{_ppsResource = a})
ppsQuery :: Lens' ProjectsProductsSearch (Maybe Text)
ppsQuery = lens _ppsQuery (\ s a -> s{_ppsQuery = a})
ppsPageToken :: Lens' ProjectsProductsSearch (Maybe Text)
ppsPageToken
= lens _ppsPageToken (\ s a -> s{_ppsPageToken = a})
ppsPageSize :: Lens' ProjectsProductsSearch (Maybe Int32)
ppsPageSize
= lens _ppsPageSize (\ s a -> s{_ppsPageSize = a}) .
mapping _Coerce
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