{-# 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.Assets.UpdateSecurityMarks
(
OrganizationsAssetsUpdateSecurityMarksResource
, organizationsAssetsUpdateSecurityMarks
, OrganizationsAssetsUpdateSecurityMarks
, oausmXgafv
, oausmUploadProtocol
, oausmStartTime
, oausmUpdateMask
, oausmAccessToken
, oausmUploadType
, oausmPayload
, oausmName
, oausmCallback
) where
import Network.Google.Prelude
import Network.Google.SecurityCenter.Types
type OrganizationsAssetsUpdateSecurityMarksResource =
"v1" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "startTime" DateTime' :>
QueryParam "updateMask" GFieldMask :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] SecurityMarks :>
Patch '[JSON] SecurityMarks
data OrganizationsAssetsUpdateSecurityMarks =
OrganizationsAssetsUpdateSecurityMarks'
{ _oausmXgafv :: !(Maybe Xgafv)
, _oausmUploadProtocol :: !(Maybe Text)
, _oausmStartTime :: !(Maybe DateTime')
, _oausmUpdateMask :: !(Maybe GFieldMask)
, _oausmAccessToken :: !(Maybe Text)
, _oausmUploadType :: !(Maybe Text)
, _oausmPayload :: !SecurityMarks
, _oausmName :: !Text
, _oausmCallback :: !(Maybe Text)
}
deriving (Eq, Show, Data, Typeable, Generic)
organizationsAssetsUpdateSecurityMarks
:: SecurityMarks
-> Text
-> OrganizationsAssetsUpdateSecurityMarks
organizationsAssetsUpdateSecurityMarks pOausmPayload_ pOausmName_ =
OrganizationsAssetsUpdateSecurityMarks'
{ _oausmXgafv = Nothing
, _oausmUploadProtocol = Nothing
, _oausmStartTime = Nothing
, _oausmUpdateMask = Nothing
, _oausmAccessToken = Nothing
, _oausmUploadType = Nothing
, _oausmPayload = pOausmPayload_
, _oausmName = pOausmName_
, _oausmCallback = Nothing
}
oausmXgafv :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe Xgafv)
oausmXgafv
= lens _oausmXgafv (\ s a -> s{_oausmXgafv = a})
oausmUploadProtocol :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe Text)
oausmUploadProtocol
= lens _oausmUploadProtocol
(\ s a -> s{_oausmUploadProtocol = a})
oausmStartTime :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe UTCTime)
oausmStartTime
= lens _oausmStartTime
(\ s a -> s{_oausmStartTime = a})
. mapping _DateTime
oausmUpdateMask :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe GFieldMask)
oausmUpdateMask
= lens _oausmUpdateMask
(\ s a -> s{_oausmUpdateMask = a})
oausmAccessToken :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe Text)
oausmAccessToken
= lens _oausmAccessToken
(\ s a -> s{_oausmAccessToken = a})
oausmUploadType :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe Text)
oausmUploadType
= lens _oausmUploadType
(\ s a -> s{_oausmUploadType = a})
oausmPayload :: Lens' OrganizationsAssetsUpdateSecurityMarks SecurityMarks
oausmPayload
= lens _oausmPayload (\ s a -> s{_oausmPayload = a})
oausmName :: Lens' OrganizationsAssetsUpdateSecurityMarks Text
oausmName
= lens _oausmName (\ s a -> s{_oausmName = a})
oausmCallback :: Lens' OrganizationsAssetsUpdateSecurityMarks (Maybe Text)
oausmCallback
= lens _oausmCallback
(\ s a -> s{_oausmCallback = a})
instance GoogleRequest
OrganizationsAssetsUpdateSecurityMarks
where
type Rs OrganizationsAssetsUpdateSecurityMarks =
SecurityMarks
type Scopes OrganizationsAssetsUpdateSecurityMarks =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient
OrganizationsAssetsUpdateSecurityMarks'{..}
= go _oausmName _oausmXgafv _oausmUploadProtocol
_oausmStartTime
_oausmUpdateMask
_oausmAccessToken
_oausmUploadType
_oausmCallback
(Just AltJSON)
_oausmPayload
securityCenterService
where go
= buildClient
(Proxy ::
Proxy OrganizationsAssetsUpdateSecurityMarksResource)
mempty