{-# 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
(
FoldersVersionsSearchResource
, foldersVersionsSearch
, FoldersVersionsSearch
, fvsXgafv
, fvsUploadProtocol
, fvsAccessToken
, fvsUploadType
, fvsResource
, fvsQuery
, fvsPageToken
, fvsPageSize
, fvsCallback
) where
import Network.Google.CloudPrivateCatalog.Types
import Network.Google.Prelude
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
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)
foldersVersionsSearch
:: Text
-> FoldersVersionsSearch
foldersVersionsSearch pFvsResource_ =
FoldersVersionsSearch'
{ _fvsXgafv = Nothing
, _fvsUploadProtocol = Nothing
, _fvsAccessToken = Nothing
, _fvsUploadType = Nothing
, _fvsResource = pFvsResource_
, _fvsQuery = Nothing
, _fvsPageToken = Nothing
, _fvsPageSize = Nothing
, _fvsCallback = Nothing
}
fvsXgafv :: Lens' FoldersVersionsSearch (Maybe Xgafv)
fvsXgafv = lens _fvsXgafv (\ s a -> s{_fvsXgafv = a})
fvsUploadProtocol :: Lens' FoldersVersionsSearch (Maybe Text)
fvsUploadProtocol
= lens _fvsUploadProtocol
(\ s a -> s{_fvsUploadProtocol = a})
fvsAccessToken :: Lens' FoldersVersionsSearch (Maybe Text)
fvsAccessToken
= lens _fvsAccessToken
(\ s a -> s{_fvsAccessToken = a})
fvsUploadType :: Lens' FoldersVersionsSearch (Maybe Text)
fvsUploadType
= lens _fvsUploadType
(\ s a -> s{_fvsUploadType = a})
fvsResource :: Lens' FoldersVersionsSearch Text
fvsResource
= lens _fvsResource (\ s a -> s{_fvsResource = a})
fvsQuery :: Lens' FoldersVersionsSearch (Maybe Text)
fvsQuery = lens _fvsQuery (\ s a -> s{_fvsQuery = a})
fvsPageToken :: Lens' FoldersVersionsSearch (Maybe Text)
fvsPageToken
= lens _fvsPageToken (\ s a -> s{_fvsPageToken = a})
fvsPageSize :: Lens' FoldersVersionsSearch (Maybe Int32)
fvsPageSize
= lens _fvsPageSize (\ s a -> s{_fvsPageSize = a}) .
mapping _Coerce
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