{-# 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.DLP.Projects.DeidentifyTemplates.Get
(
ProjectsDeidentifyTemplatesGetResource
, projectsDeidentifyTemplatesGet
, ProjectsDeidentifyTemplatesGet
, pdtgXgafv
, pdtgUploadProtocol
, pdtgAccessToken
, pdtgUploadType
, pdtgName
, pdtgCallback
) where
import Network.Google.DLP.Types
import Network.Google.Prelude
type ProjectsDeidentifyTemplatesGetResource =
"v2" :>
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] GooglePrivacyDlpV2DeidentifyTemplate
data ProjectsDeidentifyTemplatesGet = ProjectsDeidentifyTemplatesGet'
{ _pdtgXgafv :: !(Maybe Xgafv)
, _pdtgUploadProtocol :: !(Maybe Text)
, _pdtgAccessToken :: !(Maybe Text)
, _pdtgUploadType :: !(Maybe Text)
, _pdtgName :: !Text
, _pdtgCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsDeidentifyTemplatesGet
:: Text
-> ProjectsDeidentifyTemplatesGet
projectsDeidentifyTemplatesGet pPdtgName_ =
ProjectsDeidentifyTemplatesGet'
{ _pdtgXgafv = Nothing
, _pdtgUploadProtocol = Nothing
, _pdtgAccessToken = Nothing
, _pdtgUploadType = Nothing
, _pdtgName = pPdtgName_
, _pdtgCallback = Nothing
}
pdtgXgafv :: Lens' ProjectsDeidentifyTemplatesGet (Maybe Xgafv)
pdtgXgafv
= lens _pdtgXgafv (\ s a -> s{_pdtgXgafv = a})
pdtgUploadProtocol :: Lens' ProjectsDeidentifyTemplatesGet (Maybe Text)
pdtgUploadProtocol
= lens _pdtgUploadProtocol
(\ s a -> s{_pdtgUploadProtocol = a})
pdtgAccessToken :: Lens' ProjectsDeidentifyTemplatesGet (Maybe Text)
pdtgAccessToken
= lens _pdtgAccessToken
(\ s a -> s{_pdtgAccessToken = a})
pdtgUploadType :: Lens' ProjectsDeidentifyTemplatesGet (Maybe Text)
pdtgUploadType
= lens _pdtgUploadType
(\ s a -> s{_pdtgUploadType = a})
pdtgName :: Lens' ProjectsDeidentifyTemplatesGet Text
pdtgName = lens _pdtgName (\ s a -> s{_pdtgName = a})
pdtgCallback :: Lens' ProjectsDeidentifyTemplatesGet (Maybe Text)
pdtgCallback
= lens _pdtgCallback (\ s a -> s{_pdtgCallback = a})
instance GoogleRequest ProjectsDeidentifyTemplatesGet
where
type Rs ProjectsDeidentifyTemplatesGet =
GooglePrivacyDlpV2DeidentifyTemplate
type Scopes ProjectsDeidentifyTemplatesGet =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient ProjectsDeidentifyTemplatesGet'{..}
= go _pdtgName _pdtgXgafv _pdtgUploadProtocol
_pdtgAccessToken
_pdtgUploadType
_pdtgCallback
(Just AltJSON)
dLPService
where go
= buildClient
(Proxy ::
Proxy ProjectsDeidentifyTemplatesGetResource)
mempty