Copyright	(c) 2013-2017 Brendan Hay
License	Mozilla Public License, v. 2.0.
Maintainer	Brendan Hay <brendan.g.hay+amazonka@gmail.com>
Stability	auto-generated
Portability	non-portable (GHC extensions)
Safe Haskell	None
Language	Haskell2010

Network.AWS.S3.PutBucketPolicy

Contents

Creating a Request
Request Lenses
Destructuring the Response

Description

Replaces a policy on a bucket. If the bucket already has a policy, the one in this request completely replaces it.

Creating a Request

putBucketPolicy Source #

Arguments

:: BucketName	`pbpBucket`
-> HashMap Text Value	`pbpPolicy`
-> PutBucketPolicy

Creates a value of PutBucketPolicy with the minimum fields required to make a request.

Use one of the following lenses to modify other fields as desired:

pbpConfirmRemoveSelfBucketAccess - Set this parameter to true to confirm that you want to remove your permissions to change this bucket policy in the future.
pbpContentMD5 - Undocumented member.
pbpBucket - Undocumented member.
pbpPolicy - The bucket policy as a JSON document.

data PutBucketPolicy Source #

See: putBucketPolicy smart constructor.

Instances

Eq PutBucketPolicy Source #
Methods (==) :: PutBucketPolicy -> PutBucketPolicy -> Bool # (/=) :: PutBucketPolicy -> PutBucketPolicy -> Bool #
Data PutBucketPolicy Source #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> PutBucketPolicy -> c PutBucketPolicy # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c PutBucketPolicy # toConstr :: PutBucketPolicy -> Constr # dataTypeOf :: PutBucketPolicy -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c PutBucketPolicy) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c PutBucketPolicy) # gmapT :: (forall b. Data b => b -> b) -> PutBucketPolicy -> PutBucketPolicy # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> PutBucketPolicy -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> PutBucketPolicy -> r # gmapQ :: (forall d. Data d => d -> u) -> PutBucketPolicy -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> PutBucketPolicy -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> PutBucketPolicy -> m PutBucketPolicy # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> PutBucketPolicy -> m PutBucketPolicy # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> PutBucketPolicy -> m PutBucketPolicy #
Show PutBucketPolicy Source #
Methods showsPrec :: Int -> PutBucketPolicy -> ShowS # show :: PutBucketPolicy -> String # showList :: [PutBucketPolicy] -> ShowS #
Generic PutBucketPolicy Source #
Associated Types type Rep PutBucketPolicy :: * -> * # Methods from :: PutBucketPolicy -> Rep PutBucketPolicy x # to :: Rep PutBucketPolicy x -> PutBucketPolicy #
Hashable PutBucketPolicy Source #
Methods hashWithSalt :: Int -> PutBucketPolicy -> Int # hash :: PutBucketPolicy -> Int #
NFData PutBucketPolicy Source #
Methods rnf :: PutBucketPolicy -> () #
AWSRequest PutBucketPolicy Source #
Associated Types type Rs PutBucketPolicy :: * # Methods request :: PutBucketPolicy -> Request PutBucketPolicy # response :: MonadResource m => Logger -> Service -> Proxy * PutBucketPolicy -> ClientResponse -> m (Response PutBucketPolicy) #
ToBody PutBucketPolicy Source #
Methods toBody :: PutBucketPolicy -> RqBody #
ToQuery PutBucketPolicy Source #
Methods toQuery :: PutBucketPolicy -> QueryString #
ToPath PutBucketPolicy Source #
Methods toPath :: PutBucketPolicy -> ByteString #
ToHeaders PutBucketPolicy Source #
Methods toHeaders :: PutBucketPolicy -> [Header] #
type Rep PutBucketPolicy Source #
type Rep PutBucketPolicy = D1 (MetaData "PutBucketPolicy" "Network.AWS.S3.PutBucketPolicy" "amazonka-s3-1.5.0-4i2REsRgyXL98WvgynC9is" False) (C1 (MetaCons "PutBucketPolicy'" PrefixI True) ((::) ((::) (S1 (MetaSel (Just Symbol "_pbpConfirmRemoveSelfBucketAccess") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe Bool))) (S1 (MetaSel (Just Symbol "_pbpContentMD5") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe Text)))) ((:*:) (S1 (MetaSel (Just Symbol "_pbpBucket") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 BucketName)) (S1 (MetaSel (Just Symbol "_pbpPolicy") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (HashMap Text Value))))))
type Rs PutBucketPolicy Source #
type Rs PutBucketPolicy = PutBucketPolicyResponse

Request Lenses

pbpConfirmRemoveSelfBucketAccess :: Lens' PutBucketPolicy (Maybe Bool) Source #

Set this parameter to true to confirm that you want to remove your permissions to change this bucket policy in the future.

pbpContentMD5 :: Lens' PutBucketPolicy (Maybe Text) Source #

Undocumented member.

pbpBucket :: Lens' PutBucketPolicy BucketName Source #

Undocumented member.

pbpPolicy :: Lens' PutBucketPolicy (HashMap Text Value) Source #

The bucket policy as a JSON document.

Destructuring the Response

putBucketPolicyResponse :: PutBucketPolicyResponse Source #

Creates a value of PutBucketPolicyResponse with the minimum fields required to make a request.

data PutBucketPolicyResponse Source #

See: putBucketPolicyResponse smart constructor.

Instances

Eq PutBucketPolicyResponse Source #
Methods (==) :: PutBucketPolicyResponse -> PutBucketPolicyResponse -> Bool # (/=) :: PutBucketPolicyResponse -> PutBucketPolicyResponse -> Bool #
Data PutBucketPolicyResponse Source #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> PutBucketPolicyResponse -> c PutBucketPolicyResponse # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c PutBucketPolicyResponse # toConstr :: PutBucketPolicyResponse -> Constr # dataTypeOf :: PutBucketPolicyResponse -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c PutBucketPolicyResponse) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c PutBucketPolicyResponse) # gmapT :: (forall b. Data b => b -> b) -> PutBucketPolicyResponse -> PutBucketPolicyResponse # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> PutBucketPolicyResponse -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> PutBucketPolicyResponse -> r # gmapQ :: (forall d. Data d => d -> u) -> PutBucketPolicyResponse -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> PutBucketPolicyResponse -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> PutBucketPolicyResponse -> m PutBucketPolicyResponse # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> PutBucketPolicyResponse -> m PutBucketPolicyResponse # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> PutBucketPolicyResponse -> m PutBucketPolicyResponse #
Read PutBucketPolicyResponse Source #
Methods readsPrec :: Int -> ReadS PutBucketPolicyResponse # readList :: ReadS [PutBucketPolicyResponse] # readPrec :: ReadPrec PutBucketPolicyResponse # readListPrec :: ReadPrec [PutBucketPolicyResponse] #
Show PutBucketPolicyResponse Source #
Methods showsPrec :: Int -> PutBucketPolicyResponse -> ShowS # show :: PutBucketPolicyResponse -> String # showList :: [PutBucketPolicyResponse] -> ShowS #
Generic PutBucketPolicyResponse Source #
Associated Types type Rep PutBucketPolicyResponse :: * -> * # Methods from :: PutBucketPolicyResponse -> Rep PutBucketPolicyResponse x # to :: Rep PutBucketPolicyResponse x -> PutBucketPolicyResponse #
NFData PutBucketPolicyResponse Source #
Methods rnf :: PutBucketPolicyResponse -> () #
type Rep PutBucketPolicyResponse Source #
type Rep PutBucketPolicyResponse = D1 (MetaData "PutBucketPolicyResponse" "Network.AWS.S3.PutBucketPolicy" "amazonka-s3-1.5.0-4i2REsRgyXL98WvgynC9is" False) (C1 (MetaCons "PutBucketPolicyResponse'" PrefixI False) U1)