{-# 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.Autoscaling
(
ProjectsZonesClustersNodePoolsAutoscalingResource
, projectsZonesClustersNodePoolsAutoscaling
, ProjectsZonesClustersNodePoolsAutoscaling
, pzcnpaXgafv
, pzcnpaUploadProtocol
, pzcnpaAccessToken
, pzcnpaUploadType
, pzcnpaZone
, pzcnpaPayload
, pzcnpaNodePoolId
, pzcnpaClusterId
, pzcnpaProjectId
, pzcnpaCallback
) where
import Network.Google.Container.Types
import Network.Google.Prelude
type ProjectsZonesClustersNodePoolsAutoscalingResource
=
"v1" :>
"projects" :>
Capture "projectId" Text :>
"zones" :>
Capture "zone" Text :>
"clusters" :>
Capture "clusterId" Text :>
"nodePools" :>
Capture "nodePoolId" Text :>
"autoscaling" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON]
SetNodePoolAutoscalingRequest
:> Post '[JSON] Operation
data ProjectsZonesClustersNodePoolsAutoscaling = ProjectsZonesClustersNodePoolsAutoscaling'
{ _pzcnpaXgafv :: !(Maybe Xgafv)
, _pzcnpaUploadProtocol :: !(Maybe Text)
, _pzcnpaAccessToken :: !(Maybe Text)
, _pzcnpaUploadType :: !(Maybe Text)
, _pzcnpaZone :: !Text
, _pzcnpaPayload :: !SetNodePoolAutoscalingRequest
, _pzcnpaNodePoolId :: !Text
, _pzcnpaClusterId :: !Text
, _pzcnpaProjectId :: !Text
, _pzcnpaCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsZonesClustersNodePoolsAutoscaling
:: Text
-> SetNodePoolAutoscalingRequest
-> Text
-> Text
-> Text
-> ProjectsZonesClustersNodePoolsAutoscaling
projectsZonesClustersNodePoolsAutoscaling pPzcnpaZone_ pPzcnpaPayload_ pPzcnpaNodePoolId_ pPzcnpaClusterId_ pPzcnpaProjectId_ =
ProjectsZonesClustersNodePoolsAutoscaling'
{ _pzcnpaXgafv = Nothing
, _pzcnpaUploadProtocol = Nothing
, _pzcnpaAccessToken = Nothing
, _pzcnpaUploadType = Nothing
, _pzcnpaZone = pPzcnpaZone_
, _pzcnpaPayload = pPzcnpaPayload_
, _pzcnpaNodePoolId = pPzcnpaNodePoolId_
, _pzcnpaClusterId = pPzcnpaClusterId_
, _pzcnpaProjectId = pPzcnpaProjectId_
, _pzcnpaCallback = Nothing
}
pzcnpaXgafv :: Lens' ProjectsZonesClustersNodePoolsAutoscaling (Maybe Xgafv)
pzcnpaXgafv
= lens _pzcnpaXgafv (\ s a -> s{_pzcnpaXgafv = a})
pzcnpaUploadProtocol :: Lens' ProjectsZonesClustersNodePoolsAutoscaling (Maybe Text)
pzcnpaUploadProtocol
= lens _pzcnpaUploadProtocol
(\ s a -> s{_pzcnpaUploadProtocol = a})
pzcnpaAccessToken :: Lens' ProjectsZonesClustersNodePoolsAutoscaling (Maybe Text)
pzcnpaAccessToken
= lens _pzcnpaAccessToken
(\ s a -> s{_pzcnpaAccessToken = a})
pzcnpaUploadType :: Lens' ProjectsZonesClustersNodePoolsAutoscaling (Maybe Text)
pzcnpaUploadType
= lens _pzcnpaUploadType
(\ s a -> s{_pzcnpaUploadType = a})
pzcnpaZone :: Lens' ProjectsZonesClustersNodePoolsAutoscaling Text
pzcnpaZone
= lens _pzcnpaZone (\ s a -> s{_pzcnpaZone = a})
pzcnpaPayload :: Lens' ProjectsZonesClustersNodePoolsAutoscaling SetNodePoolAutoscalingRequest
pzcnpaPayload
= lens _pzcnpaPayload
(\ s a -> s{_pzcnpaPayload = a})
pzcnpaNodePoolId :: Lens' ProjectsZonesClustersNodePoolsAutoscaling Text
pzcnpaNodePoolId
= lens _pzcnpaNodePoolId
(\ s a -> s{_pzcnpaNodePoolId = a})
pzcnpaClusterId :: Lens' ProjectsZonesClustersNodePoolsAutoscaling Text
pzcnpaClusterId
= lens _pzcnpaClusterId
(\ s a -> s{_pzcnpaClusterId = a})
pzcnpaProjectId :: Lens' ProjectsZonesClustersNodePoolsAutoscaling Text
pzcnpaProjectId
= lens _pzcnpaProjectId
(\ s a -> s{_pzcnpaProjectId = a})
pzcnpaCallback :: Lens' ProjectsZonesClustersNodePoolsAutoscaling (Maybe Text)
pzcnpaCallback
= lens _pzcnpaCallback
(\ s a -> s{_pzcnpaCallback = a})
instance GoogleRequest
ProjectsZonesClustersNodePoolsAutoscaling where
type Rs ProjectsZonesClustersNodePoolsAutoscaling =
Operation
type Scopes ProjectsZonesClustersNodePoolsAutoscaling
= '["https://www.googleapis.com/auth/cloud-platform"]
requestClient
ProjectsZonesClustersNodePoolsAutoscaling'{..}
= go _pzcnpaProjectId _pzcnpaZone _pzcnpaClusterId
_pzcnpaNodePoolId
_pzcnpaXgafv
_pzcnpaUploadProtocol
_pzcnpaAccessToken
_pzcnpaUploadType
_pzcnpaCallback
(Just AltJSON)
_pzcnpaPayload
containerService
where go
= buildClient
(Proxy ::
Proxy
ProjectsZonesClustersNodePoolsAutoscalingResource)
mempty