Copyright	(c) 2013-2018 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.Glacier.SetVaultAccessPolicy

Contents

Creating a Request
Request Lenses
Destructuring the Response

Description

This operation configures an access policy for a vault and will overwrite an existing policy. To configure a vault access policy, send a PUT request to the access-policy subresource of the vault. An access policy is specific to a vault and is also called a vault subresource. You can set one access policy per vault and the policy can be up to 20 KB in size. For more information about vault access policies, see Amazon Glacier Access Control with Vault Access Policies .

Creating a Request

setVaultAccessPolicy #

Arguments

:: Text	`svapAccountId`
-> Text	`svapVaultName`
-> SetVaultAccessPolicy

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

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

svapPolicy - The vault access policy as a JSON string.
svapAccountId - The AccountId value is the AWS account ID of the account that owns the vault. You can either specify an AWS account ID or optionally a single '- ' (hyphen), in which case Amazon Glacier uses the AWS account ID associated with the credentials used to sign the request. If you use an account ID, do not include any hyphens (-) in the ID.
svapVaultName - The name of the vault.

data SetVaultAccessPolicy #

SetVaultAccessPolicy input.

See: setVaultAccessPolicy smart constructor.

Instances

Eq SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods (==) :: SetVaultAccessPolicy -> SetVaultAccessPolicy -> Bool # (/=) :: SetVaultAccessPolicy -> SetVaultAccessPolicy -> Bool #
Data SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SetVaultAccessPolicy -> c SetVaultAccessPolicy # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SetVaultAccessPolicy # toConstr :: SetVaultAccessPolicy -> Constr # dataTypeOf :: SetVaultAccessPolicy -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SetVaultAccessPolicy) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SetVaultAccessPolicy) # gmapT :: (forall b. Data b => b -> b) -> SetVaultAccessPolicy -> SetVaultAccessPolicy # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SetVaultAccessPolicy -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SetVaultAccessPolicy -> r # gmapQ :: (forall d. Data d => d -> u) -> SetVaultAccessPolicy -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> SetVaultAccessPolicy -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> SetVaultAccessPolicy -> m SetVaultAccessPolicy # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> SetVaultAccessPolicy -> m SetVaultAccessPolicy # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> SetVaultAccessPolicy -> m SetVaultAccessPolicy #
Read SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods readsPrec :: Int -> ReadS SetVaultAccessPolicy # readList :: ReadS [SetVaultAccessPolicy] # readPrec :: ReadPrec SetVaultAccessPolicy # readListPrec :: ReadPrec [SetVaultAccessPolicy] #
Show SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods showsPrec :: Int -> SetVaultAccessPolicy -> ShowS # show :: SetVaultAccessPolicy -> String # showList :: [SetVaultAccessPolicy] -> ShowS #
Generic SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Associated Types type Rep SetVaultAccessPolicy :: Type -> Type # Methods from :: SetVaultAccessPolicy -> Rep SetVaultAccessPolicy x # to :: Rep SetVaultAccessPolicy x -> SetVaultAccessPolicy #
Hashable SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods hashWithSalt :: Int -> SetVaultAccessPolicy -> Int # hash :: SetVaultAccessPolicy -> Int #
ToJSON SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods toJSON :: SetVaultAccessPolicy -> Value # toEncoding :: SetVaultAccessPolicy -> Encoding # toJSONList :: [SetVaultAccessPolicy] -> Value # toEncodingList :: [SetVaultAccessPolicy] -> Encoding #
AWSRequest SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Associated Types type Rs SetVaultAccessPolicy :: Type # Methods request :: SetVaultAccessPolicy -> Request SetVaultAccessPolicy # response :: (MonadResource m, MonadThrow m) => Logger -> Service -> Proxy SetVaultAccessPolicy -> ClientResponse -> m (Response SetVaultAccessPolicy) #
ToHeaders SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods toHeaders :: SetVaultAccessPolicy -> [Header] #
ToPath SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods toPath :: SetVaultAccessPolicy -> ByteString #
ToQuery SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods toQuery :: SetVaultAccessPolicy -> QueryString #
NFData SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy Methods rnf :: SetVaultAccessPolicy -> () #
type Rep SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy type Rep SetVaultAccessPolicy = D1 (MetaData "SetVaultAccessPolicy" "Network.AWS.Glacier.SetVaultAccessPolicy" "amazonka-glacier-1.6.1-DKdHCKUvjITxCgj6hhopJ" False) (C1 (MetaCons "SetVaultAccessPolicy'" PrefixI True) (S1 (MetaSel (Just "_svapPolicy") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe VaultAccessPolicy)) :: (S1 (MetaSel (Just "_svapAccountId") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text) :: S1 (MetaSel (Just "_svapVaultName") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text))))
type Rs SetVaultAccessPolicy #
Instance details Defined in Network.AWS.Glacier.SetVaultAccessPolicy type Rs SetVaultAccessPolicy = SetVaultAccessPolicyResponse

Request Lenses

svapPolicy :: Lens' SetVaultAccessPolicy (Maybe VaultAccessPolicy) #

The vault access policy as a JSON string.

svapAccountId :: Lens' SetVaultAccessPolicy Text #

The AccountId value is the AWS account ID of the account that owns the vault. You can either specify an AWS account ID or optionally a single '- ' (hyphen), in which case Amazon Glacier uses the AWS account ID associated with the credentials used to sign the request. If you use an account ID, do not include any hyphens (-) in the ID.

svapVaultName :: Lens' SetVaultAccessPolicy Text #

The name of the vault.

Destructuring the Response

setVaultAccessPolicyResponse :: SetVaultAccessPolicyResponse #

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

data SetVaultAccessPolicyResponse #

See: setVaultAccessPolicyResponse smart constructor.

Instances

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