{-# 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.Locations.Clusters.WellKnown.GetOpenidConfiguration
(
ProjectsLocationsClustersWellKnownGetOpenidConfigurationResource
, projectsLocationsClustersWellKnownGetOpenidConfiguration
, ProjectsLocationsClustersWellKnownGetOpenidConfiguration
, plcwkgocParent
, plcwkgocXgafv
, plcwkgocUploadProtocol
, plcwkgocAccessToken
, plcwkgocUploadType
, plcwkgocCallback
) where
import Network.Google.Container.Types
import Network.Google.Prelude
type ProjectsLocationsClustersWellKnownGetOpenidConfigurationResource
=
"v1" :>
Capture "parent" Text :>
".well-known" :>
"openid-configuration" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] GetOpenIdConfigResponse
data ProjectsLocationsClustersWellKnownGetOpenidConfiguration =
ProjectsLocationsClustersWellKnownGetOpenidConfiguration'
{ _plcwkgocParent :: !Text
, _plcwkgocXgafv :: !(Maybe Xgafv)
, _plcwkgocUploadProtocol :: !(Maybe Text)
, _plcwkgocAccessToken :: !(Maybe Text)
, _plcwkgocUploadType :: !(Maybe Text)
, _plcwkgocCallback :: !(Maybe Text)
}
deriving (Eq, Show, Data, Typeable, Generic)
projectsLocationsClustersWellKnownGetOpenidConfiguration
:: Text
-> ProjectsLocationsClustersWellKnownGetOpenidConfiguration
projectsLocationsClustersWellKnownGetOpenidConfiguration pPlcwkgocParent_ =
ProjectsLocationsClustersWellKnownGetOpenidConfiguration'
{ _plcwkgocParent = pPlcwkgocParent_
, _plcwkgocXgafv = Nothing
, _plcwkgocUploadProtocol = Nothing
, _plcwkgocAccessToken = Nothing
, _plcwkgocUploadType = Nothing
, _plcwkgocCallback = Nothing
}
plcwkgocParent :: Lens' ProjectsLocationsClustersWellKnownGetOpenidConfiguration Text
plcwkgocParent
= lens _plcwkgocParent
(\ s a -> s{_plcwkgocParent = a})
plcwkgocXgafv :: Lens' ProjectsLocationsClustersWellKnownGetOpenidConfiguration (Maybe Xgafv)
plcwkgocXgafv
= lens _plcwkgocXgafv
(\ s a -> s{_plcwkgocXgafv = a})
plcwkgocUploadProtocol :: Lens' ProjectsLocationsClustersWellKnownGetOpenidConfiguration (Maybe Text)
plcwkgocUploadProtocol
= lens _plcwkgocUploadProtocol
(\ s a -> s{_plcwkgocUploadProtocol = a})
plcwkgocAccessToken :: Lens' ProjectsLocationsClustersWellKnownGetOpenidConfiguration (Maybe Text)
plcwkgocAccessToken
= lens _plcwkgocAccessToken
(\ s a -> s{_plcwkgocAccessToken = a})
plcwkgocUploadType :: Lens' ProjectsLocationsClustersWellKnownGetOpenidConfiguration (Maybe Text)
plcwkgocUploadType
= lens _plcwkgocUploadType
(\ s a -> s{_plcwkgocUploadType = a})
plcwkgocCallback :: Lens' ProjectsLocationsClustersWellKnownGetOpenidConfiguration (Maybe Text)
plcwkgocCallback
= lens _plcwkgocCallback
(\ s a -> s{_plcwkgocCallback = a})
instance GoogleRequest
ProjectsLocationsClustersWellKnownGetOpenidConfiguration
where
type Rs
ProjectsLocationsClustersWellKnownGetOpenidConfiguration
= GetOpenIdConfigResponse
type Scopes
ProjectsLocationsClustersWellKnownGetOpenidConfiguration
= '["https://www.googleapis.com/auth/cloud-platform"]
requestClient
ProjectsLocationsClustersWellKnownGetOpenidConfiguration'{..}
= go _plcwkgocParent _plcwkgocXgafv
_plcwkgocUploadProtocol
_plcwkgocAccessToken
_plcwkgocUploadType
_plcwkgocCallback
(Just AltJSON)
containerService
where go
= buildClient
(Proxy ::
Proxy
ProjectsLocationsClustersWellKnownGetOpenidConfigurationResource)
mempty