{-# 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.Sources.List
(
OrganizationsSourcesListResource
, organizationsSourcesList
, OrganizationsSourcesList
, oslParent
, oslXgafv
, oslUploadProtocol
, oslAccessToken
, oslUploadType
, oslPageToken
, oslPageSize
, oslCallback
) where
import Network.Google.Prelude
import Network.Google.SecurityCenter.Types
type OrganizationsSourcesListResource =
"v1" :>
Capture "parent" Text :>
"sources" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListSourcesResponse
data OrganizationsSourcesList =
OrganizationsSourcesList'
{ _oslParent :: !Text
, _oslXgafv :: !(Maybe Xgafv)
, _oslUploadProtocol :: !(Maybe Text)
, _oslAccessToken :: !(Maybe Text)
, _oslUploadType :: !(Maybe Text)
, _oslPageToken :: !(Maybe Text)
, _oslPageSize :: !(Maybe (Textual Int32))
, _oslCallback :: !(Maybe Text)
}
deriving (Eq, Show, Data, Typeable, Generic)
organizationsSourcesList
:: Text
-> OrganizationsSourcesList
organizationsSourcesList pOslParent_ =
OrganizationsSourcesList'
{ _oslParent = pOslParent_
, _oslXgafv = Nothing
, _oslUploadProtocol = Nothing
, _oslAccessToken = Nothing
, _oslUploadType = Nothing
, _oslPageToken = Nothing
, _oslPageSize = Nothing
, _oslCallback = Nothing
}
oslParent :: Lens' OrganizationsSourcesList Text
oslParent
= lens _oslParent (\ s a -> s{_oslParent = a})
oslXgafv :: Lens' OrganizationsSourcesList (Maybe Xgafv)
oslXgafv = lens _oslXgafv (\ s a -> s{_oslXgafv = a})
oslUploadProtocol :: Lens' OrganizationsSourcesList (Maybe Text)
oslUploadProtocol
= lens _oslUploadProtocol
(\ s a -> s{_oslUploadProtocol = a})
oslAccessToken :: Lens' OrganizationsSourcesList (Maybe Text)
oslAccessToken
= lens _oslAccessToken
(\ s a -> s{_oslAccessToken = a})
oslUploadType :: Lens' OrganizationsSourcesList (Maybe Text)
oslUploadType
= lens _oslUploadType
(\ s a -> s{_oslUploadType = a})
oslPageToken :: Lens' OrganizationsSourcesList (Maybe Text)
oslPageToken
= lens _oslPageToken (\ s a -> s{_oslPageToken = a})
oslPageSize :: Lens' OrganizationsSourcesList (Maybe Int32)
oslPageSize
= lens _oslPageSize (\ s a -> s{_oslPageSize = a}) .
mapping _Coerce
oslCallback :: Lens' OrganizationsSourcesList (Maybe Text)
oslCallback
= lens _oslCallback (\ s a -> s{_oslCallback = a})
instance GoogleRequest OrganizationsSourcesList where
type Rs OrganizationsSourcesList =
ListSourcesResponse
type Scopes OrganizationsSourcesList =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient OrganizationsSourcesList'{..}
= go _oslParent _oslXgafv _oslUploadProtocol
_oslAccessToken
_oslUploadType
_oslPageToken
_oslPageSize
_oslCallback
(Just AltJSON)
securityCenterService
where go
= buildClient
(Proxy :: Proxy OrganizationsSourcesListResource)
mempty