{-# 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.SecurityCenter.Organizations.GetOrganizationSettings
(
OrganizationsGetOrganizationSettingsResource
, organizationsGetOrganizationSettings
, OrganizationsGetOrganizationSettings
, ogosXgafv
, ogosUploadProtocol
, ogosAccessToken
, ogosUploadType
, ogosName
, ogosCallback
) where
import Network.Google.Prelude
import Network.Google.SecurityCenter.Types
type OrganizationsGetOrganizationSettingsResource =
"v1" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] OrganizationSettings
data OrganizationsGetOrganizationSettings =
OrganizationsGetOrganizationSettings'
{ _ogosXgafv :: !(Maybe Xgafv)
, _ogosUploadProtocol :: !(Maybe Text)
, _ogosAccessToken :: !(Maybe Text)
, _ogosUploadType :: !(Maybe Text)
, _ogosName :: !Text
, _ogosCallback :: !(Maybe Text)
}
deriving (Eq, Show, Data, Typeable, Generic)
organizationsGetOrganizationSettings
:: Text
-> OrganizationsGetOrganizationSettings
organizationsGetOrganizationSettings pOgosName_ =
OrganizationsGetOrganizationSettings'
{ _ogosXgafv = Nothing
, _ogosUploadProtocol = Nothing
, _ogosAccessToken = Nothing
, _ogosUploadType = Nothing
, _ogosName = pOgosName_
, _ogosCallback = Nothing
}
ogosXgafv :: Lens' OrganizationsGetOrganizationSettings (Maybe Xgafv)
ogosXgafv
= lens _ogosXgafv (\ s a -> s{_ogosXgafv = a})
ogosUploadProtocol :: Lens' OrganizationsGetOrganizationSettings (Maybe Text)
ogosUploadProtocol
= lens _ogosUploadProtocol
(\ s a -> s{_ogosUploadProtocol = a})
ogosAccessToken :: Lens' OrganizationsGetOrganizationSettings (Maybe Text)
ogosAccessToken
= lens _ogosAccessToken
(\ s a -> s{_ogosAccessToken = a})
ogosUploadType :: Lens' OrganizationsGetOrganizationSettings (Maybe Text)
ogosUploadType
= lens _ogosUploadType
(\ s a -> s{_ogosUploadType = a})
ogosName :: Lens' OrganizationsGetOrganizationSettings Text
ogosName = lens _ogosName (\ s a -> s{_ogosName = a})
ogosCallback :: Lens' OrganizationsGetOrganizationSettings (Maybe Text)
ogosCallback
= lens _ogosCallback (\ s a -> s{_ogosCallback = a})
instance GoogleRequest
OrganizationsGetOrganizationSettings
where
type Rs OrganizationsGetOrganizationSettings =
OrganizationSettings
type Scopes OrganizationsGetOrganizationSettings =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient
OrganizationsGetOrganizationSettings'{..}
= go _ogosName _ogosXgafv _ogosUploadProtocol
_ogosAccessToken
_ogosUploadType
_ogosCallback
(Just AltJSON)
securityCenterService
where go
= buildClient
(Proxy ::
Proxy OrganizationsGetOrganizationSettingsResource)
mempty