module Network.Google.Resource.CloudResourceManager.Organizations.SetIAMPolicy
(
OrganizationsSetIAMPolicyResource
, organizationsSetIAMPolicy
, OrganizationsSetIAMPolicy
, osipXgafv
, osipUploadProtocol
, osipPp
, osipAccessToken
, osipUploadType
, osipPayload
, osipBearerToken
, osipResource
, osipCallback
) where
import Network.Google.Prelude
import Network.Google.ResourceManager.Types
type OrganizationsSetIAMPolicyResource =
"v1beta1" :>
"organizations" :>
CaptureMode "resource" "setIamPolicy" Text :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] SetIAMPolicyRequest :>
Post '[JSON] Policy
data OrganizationsSetIAMPolicy = OrganizationsSetIAMPolicy
{ _osipXgafv :: !(Maybe Text)
, _osipUploadProtocol :: !(Maybe Text)
, _osipPp :: !Bool
, _osipAccessToken :: !(Maybe Text)
, _osipUploadType :: !(Maybe Text)
, _osipPayload :: !SetIAMPolicyRequest
, _osipBearerToken :: !(Maybe Text)
, _osipResource :: !Text
, _osipCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
organizationsSetIAMPolicy
:: SetIAMPolicyRequest
-> Text
-> OrganizationsSetIAMPolicy
organizationsSetIAMPolicy pOsipPayload_ pOsipResource_ =
OrganizationsSetIAMPolicy
{ _osipXgafv = Nothing
, _osipUploadProtocol = Nothing
, _osipPp = True
, _osipAccessToken = Nothing
, _osipUploadType = Nothing
, _osipPayload = pOsipPayload_
, _osipBearerToken = Nothing
, _osipResource = pOsipResource_
, _osipCallback = Nothing
}
osipXgafv :: Lens' OrganizationsSetIAMPolicy (Maybe Text)
osipXgafv
= lens _osipXgafv (\ s a -> s{_osipXgafv = a})
osipUploadProtocol :: Lens' OrganizationsSetIAMPolicy (Maybe Text)
osipUploadProtocol
= lens _osipUploadProtocol
(\ s a -> s{_osipUploadProtocol = a})
osipPp :: Lens' OrganizationsSetIAMPolicy Bool
osipPp = lens _osipPp (\ s a -> s{_osipPp = a})
osipAccessToken :: Lens' OrganizationsSetIAMPolicy (Maybe Text)
osipAccessToken
= lens _osipAccessToken
(\ s a -> s{_osipAccessToken = a})
osipUploadType :: Lens' OrganizationsSetIAMPolicy (Maybe Text)
osipUploadType
= lens _osipUploadType
(\ s a -> s{_osipUploadType = a})
osipPayload :: Lens' OrganizationsSetIAMPolicy SetIAMPolicyRequest
osipPayload
= lens _osipPayload (\ s a -> s{_osipPayload = a})
osipBearerToken :: Lens' OrganizationsSetIAMPolicy (Maybe Text)
osipBearerToken
= lens _osipBearerToken
(\ s a -> s{_osipBearerToken = a})
osipResource :: Lens' OrganizationsSetIAMPolicy Text
osipResource
= lens _osipResource (\ s a -> s{_osipResource = a})
osipCallback :: Lens' OrganizationsSetIAMPolicy (Maybe Text)
osipCallback
= lens _osipCallback (\ s a -> s{_osipCallback = a})
instance GoogleRequest OrganizationsSetIAMPolicy
where
type Rs OrganizationsSetIAMPolicy = Policy
requestClient OrganizationsSetIAMPolicy{..}
= go _osipResource _osipXgafv _osipUploadProtocol
(Just _osipPp)
_osipAccessToken
_osipUploadType
_osipBearerToken
_osipCallback
(Just AltJSON)
_osipPayload
resourceManagerService
where go
= buildClient
(Proxy :: Proxy OrganizationsSetIAMPolicyResource)
mempty