{-# 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.Container.Projects.Zones.Clusters.NodePools.Get
(
ProjectsZonesClustersNodePoolsGetResource
, projectsZonesClustersNodePoolsGet
, ProjectsZonesClustersNodePoolsGet
, pzcnpgXgafv
, pzcnpgUploadProtocol
, pzcnpgAccessToken
, pzcnpgUploadType
, pzcnpgZone
, pzcnpgNodePoolId
, pzcnpgName
, pzcnpgClusterId
, pzcnpgProjectId
, pzcnpgCallback
) where
import Network.Google.Container.Types
import Network.Google.Prelude
type ProjectsZonesClustersNodePoolsGetResource =
"v1" :>
"projects" :>
Capture "projectId" Text :>
"zones" :>
Capture "zone" Text :>
"clusters" :>
Capture "clusterId" Text :>
"nodePools" :>
Capture "nodePoolId" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "name" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] NodePool
data ProjectsZonesClustersNodePoolsGet = ProjectsZonesClustersNodePoolsGet'
{ _pzcnpgXgafv :: !(Maybe Xgafv)
, _pzcnpgUploadProtocol :: !(Maybe Text)
, _pzcnpgAccessToken :: !(Maybe Text)
, _pzcnpgUploadType :: !(Maybe Text)
, _pzcnpgZone :: !Text
, _pzcnpgNodePoolId :: !Text
, _pzcnpgName :: !(Maybe Text)
, _pzcnpgClusterId :: !Text
, _pzcnpgProjectId :: !Text
, _pzcnpgCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsZonesClustersNodePoolsGet
:: Text
-> Text
-> Text
-> Text
-> ProjectsZonesClustersNodePoolsGet
projectsZonesClustersNodePoolsGet pPzcnpgZone_ pPzcnpgNodePoolId_ pPzcnpgClusterId_ pPzcnpgProjectId_ =
ProjectsZonesClustersNodePoolsGet'
{ _pzcnpgXgafv = Nothing
, _pzcnpgUploadProtocol = Nothing
, _pzcnpgAccessToken = Nothing
, _pzcnpgUploadType = Nothing
, _pzcnpgZone = pPzcnpgZone_
, _pzcnpgNodePoolId = pPzcnpgNodePoolId_
, _pzcnpgName = Nothing
, _pzcnpgClusterId = pPzcnpgClusterId_
, _pzcnpgProjectId = pPzcnpgProjectId_
, _pzcnpgCallback = Nothing
}
pzcnpgXgafv :: Lens' ProjectsZonesClustersNodePoolsGet (Maybe Xgafv)
pzcnpgXgafv
= lens _pzcnpgXgafv (\ s a -> s{_pzcnpgXgafv = a})
pzcnpgUploadProtocol :: Lens' ProjectsZonesClustersNodePoolsGet (Maybe Text)
pzcnpgUploadProtocol
= lens _pzcnpgUploadProtocol
(\ s a -> s{_pzcnpgUploadProtocol = a})
pzcnpgAccessToken :: Lens' ProjectsZonesClustersNodePoolsGet (Maybe Text)
pzcnpgAccessToken
= lens _pzcnpgAccessToken
(\ s a -> s{_pzcnpgAccessToken = a})
pzcnpgUploadType :: Lens' ProjectsZonesClustersNodePoolsGet (Maybe Text)
pzcnpgUploadType
= lens _pzcnpgUploadType
(\ s a -> s{_pzcnpgUploadType = a})
pzcnpgZone :: Lens' ProjectsZonesClustersNodePoolsGet Text
pzcnpgZone
= lens _pzcnpgZone (\ s a -> s{_pzcnpgZone = a})
pzcnpgNodePoolId :: Lens' ProjectsZonesClustersNodePoolsGet Text
pzcnpgNodePoolId
= lens _pzcnpgNodePoolId
(\ s a -> s{_pzcnpgNodePoolId = a})
pzcnpgName :: Lens' ProjectsZonesClustersNodePoolsGet (Maybe Text)
pzcnpgName
= lens _pzcnpgName (\ s a -> s{_pzcnpgName = a})
pzcnpgClusterId :: Lens' ProjectsZonesClustersNodePoolsGet Text
pzcnpgClusterId
= lens _pzcnpgClusterId
(\ s a -> s{_pzcnpgClusterId = a})
pzcnpgProjectId :: Lens' ProjectsZonesClustersNodePoolsGet Text
pzcnpgProjectId
= lens _pzcnpgProjectId
(\ s a -> s{_pzcnpgProjectId = a})
pzcnpgCallback :: Lens' ProjectsZonesClustersNodePoolsGet (Maybe Text)
pzcnpgCallback
= lens _pzcnpgCallback
(\ s a -> s{_pzcnpgCallback = a})
instance GoogleRequest
ProjectsZonesClustersNodePoolsGet where
type Rs ProjectsZonesClustersNodePoolsGet = NodePool
type Scopes ProjectsZonesClustersNodePoolsGet =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient ProjectsZonesClustersNodePoolsGet'{..}
= go _pzcnpgProjectId _pzcnpgZone _pzcnpgClusterId
_pzcnpgNodePoolId
_pzcnpgXgafv
_pzcnpgUploadProtocol
_pzcnpgAccessToken
_pzcnpgUploadType
_pzcnpgName
_pzcnpgCallback
(Just AltJSON)
containerService
where go
= buildClient
(Proxy ::
Proxy ProjectsZonesClustersNodePoolsGetResource)
mempty