{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.EC2.ModifyVerifiedAccessEndpointPolicy
(
ModifyVerifiedAccessEndpointPolicy (..),
newModifyVerifiedAccessEndpointPolicy,
modifyVerifiedAccessEndpointPolicy_clientToken,
modifyVerifiedAccessEndpointPolicy_dryRun,
modifyVerifiedAccessEndpointPolicy_policyDocument,
modifyVerifiedAccessEndpointPolicy_verifiedAccessEndpointId,
modifyVerifiedAccessEndpointPolicy_policyEnabled,
ModifyVerifiedAccessEndpointPolicyResponse (..),
newModifyVerifiedAccessEndpointPolicyResponse,
modifyVerifiedAccessEndpointPolicyResponse_policyDocument,
modifyVerifiedAccessEndpointPolicyResponse_policyEnabled,
modifyVerifiedAccessEndpointPolicyResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EC2.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ModifyVerifiedAccessEndpointPolicy = ModifyVerifiedAccessEndpointPolicy'
{
ModifyVerifiedAccessEndpointPolicy -> Maybe Text
clientToken :: Prelude.Maybe Prelude.Text,
ModifyVerifiedAccessEndpointPolicy -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
ModifyVerifiedAccessEndpointPolicy -> Maybe Text
policyDocument :: Prelude.Maybe Prelude.Text,
ModifyVerifiedAccessEndpointPolicy -> Text
verifiedAccessEndpointId :: Prelude.Text,
ModifyVerifiedAccessEndpointPolicy -> Bool
policyEnabled :: Prelude.Bool
}
deriving (ModifyVerifiedAccessEndpointPolicy
-> ModifyVerifiedAccessEndpointPolicy -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyVerifiedAccessEndpointPolicy
-> ModifyVerifiedAccessEndpointPolicy -> Bool
$c/= :: ModifyVerifiedAccessEndpointPolicy
-> ModifyVerifiedAccessEndpointPolicy -> Bool
== :: ModifyVerifiedAccessEndpointPolicy
-> ModifyVerifiedAccessEndpointPolicy -> Bool
$c== :: ModifyVerifiedAccessEndpointPolicy
-> ModifyVerifiedAccessEndpointPolicy -> Bool
Prelude.Eq, ReadPrec [ModifyVerifiedAccessEndpointPolicy]
ReadPrec ModifyVerifiedAccessEndpointPolicy
Int -> ReadS ModifyVerifiedAccessEndpointPolicy
ReadS [ModifyVerifiedAccessEndpointPolicy]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyVerifiedAccessEndpointPolicy]
$creadListPrec :: ReadPrec [ModifyVerifiedAccessEndpointPolicy]
readPrec :: ReadPrec ModifyVerifiedAccessEndpointPolicy
$creadPrec :: ReadPrec ModifyVerifiedAccessEndpointPolicy
readList :: ReadS [ModifyVerifiedAccessEndpointPolicy]
$creadList :: ReadS [ModifyVerifiedAccessEndpointPolicy]
readsPrec :: Int -> ReadS ModifyVerifiedAccessEndpointPolicy
$creadsPrec :: Int -> ReadS ModifyVerifiedAccessEndpointPolicy
Prelude.Read, Int -> ModifyVerifiedAccessEndpointPolicy -> ShowS
[ModifyVerifiedAccessEndpointPolicy] -> ShowS
ModifyVerifiedAccessEndpointPolicy -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyVerifiedAccessEndpointPolicy] -> ShowS
$cshowList :: [ModifyVerifiedAccessEndpointPolicy] -> ShowS
show :: ModifyVerifiedAccessEndpointPolicy -> String
$cshow :: ModifyVerifiedAccessEndpointPolicy -> String
showsPrec :: Int -> ModifyVerifiedAccessEndpointPolicy -> ShowS
$cshowsPrec :: Int -> ModifyVerifiedAccessEndpointPolicy -> ShowS
Prelude.Show, forall x.
Rep ModifyVerifiedAccessEndpointPolicy x
-> ModifyVerifiedAccessEndpointPolicy
forall x.
ModifyVerifiedAccessEndpointPolicy
-> Rep ModifyVerifiedAccessEndpointPolicy x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyVerifiedAccessEndpointPolicy x
-> ModifyVerifiedAccessEndpointPolicy
$cfrom :: forall x.
ModifyVerifiedAccessEndpointPolicy
-> Rep ModifyVerifiedAccessEndpointPolicy x
Prelude.Generic)
newModifyVerifiedAccessEndpointPolicy ::
Prelude.Text ->
Prelude.Bool ->
ModifyVerifiedAccessEndpointPolicy
newModifyVerifiedAccessEndpointPolicy :: Text -> Bool -> ModifyVerifiedAccessEndpointPolicy
newModifyVerifiedAccessEndpointPolicy
Text
pVerifiedAccessEndpointId_
Bool
pPolicyEnabled_ =
ModifyVerifiedAccessEndpointPolicy'
{ $sel:clientToken:ModifyVerifiedAccessEndpointPolicy' :: Maybe Text
clientToken =
forall a. Maybe a
Prelude.Nothing,
$sel:dryRun:ModifyVerifiedAccessEndpointPolicy' :: Maybe Bool
dryRun = forall a. Maybe a
Prelude.Nothing,
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicy' :: Maybe Text
policyDocument = forall a. Maybe a
Prelude.Nothing,
$sel:verifiedAccessEndpointId:ModifyVerifiedAccessEndpointPolicy' :: Text
verifiedAccessEndpointId =
Text
pVerifiedAccessEndpointId_,
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicy' :: Bool
policyEnabled = Bool
pPolicyEnabled_
}
modifyVerifiedAccessEndpointPolicy_clientToken :: Lens.Lens' ModifyVerifiedAccessEndpointPolicy (Prelude.Maybe Prelude.Text)
modifyVerifiedAccessEndpointPolicy_clientToken :: Lens' ModifyVerifiedAccessEndpointPolicy (Maybe Text)
modifyVerifiedAccessEndpointPolicy_clientToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicy' {Maybe Text
clientToken :: Maybe Text
$sel:clientToken:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
clientToken} -> Maybe Text
clientToken) (\s :: ModifyVerifiedAccessEndpointPolicy
s@ModifyVerifiedAccessEndpointPolicy' {} Maybe Text
a -> ModifyVerifiedAccessEndpointPolicy
s {$sel:clientToken:ModifyVerifiedAccessEndpointPolicy' :: Maybe Text
clientToken = Maybe Text
a} :: ModifyVerifiedAccessEndpointPolicy)
modifyVerifiedAccessEndpointPolicy_dryRun :: Lens.Lens' ModifyVerifiedAccessEndpointPolicy (Prelude.Maybe Prelude.Bool)
modifyVerifiedAccessEndpointPolicy_dryRun :: Lens' ModifyVerifiedAccessEndpointPolicy (Maybe Bool)
modifyVerifiedAccessEndpointPolicy_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicy' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: ModifyVerifiedAccessEndpointPolicy
s@ModifyVerifiedAccessEndpointPolicy' {} Maybe Bool
a -> ModifyVerifiedAccessEndpointPolicy
s {$sel:dryRun:ModifyVerifiedAccessEndpointPolicy' :: Maybe Bool
dryRun = Maybe Bool
a} :: ModifyVerifiedAccessEndpointPolicy)
modifyVerifiedAccessEndpointPolicy_policyDocument :: Lens.Lens' ModifyVerifiedAccessEndpointPolicy (Prelude.Maybe Prelude.Text)
modifyVerifiedAccessEndpointPolicy_policyDocument :: Lens' ModifyVerifiedAccessEndpointPolicy (Maybe Text)
modifyVerifiedAccessEndpointPolicy_policyDocument = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicy' {Maybe Text
policyDocument :: Maybe Text
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
policyDocument} -> Maybe Text
policyDocument) (\s :: ModifyVerifiedAccessEndpointPolicy
s@ModifyVerifiedAccessEndpointPolicy' {} Maybe Text
a -> ModifyVerifiedAccessEndpointPolicy
s {$sel:policyDocument:ModifyVerifiedAccessEndpointPolicy' :: Maybe Text
policyDocument = Maybe Text
a} :: ModifyVerifiedAccessEndpointPolicy)
modifyVerifiedAccessEndpointPolicy_verifiedAccessEndpointId :: Lens.Lens' ModifyVerifiedAccessEndpointPolicy Prelude.Text
modifyVerifiedAccessEndpointPolicy_verifiedAccessEndpointId :: Lens' ModifyVerifiedAccessEndpointPolicy Text
modifyVerifiedAccessEndpointPolicy_verifiedAccessEndpointId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicy' {Text
verifiedAccessEndpointId :: Text
$sel:verifiedAccessEndpointId:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Text
verifiedAccessEndpointId} -> Text
verifiedAccessEndpointId) (\s :: ModifyVerifiedAccessEndpointPolicy
s@ModifyVerifiedAccessEndpointPolicy' {} Text
a -> ModifyVerifiedAccessEndpointPolicy
s {$sel:verifiedAccessEndpointId:ModifyVerifiedAccessEndpointPolicy' :: Text
verifiedAccessEndpointId = Text
a} :: ModifyVerifiedAccessEndpointPolicy)
modifyVerifiedAccessEndpointPolicy_policyEnabled :: Lens.Lens' ModifyVerifiedAccessEndpointPolicy Prelude.Bool
modifyVerifiedAccessEndpointPolicy_policyEnabled :: Lens' ModifyVerifiedAccessEndpointPolicy Bool
modifyVerifiedAccessEndpointPolicy_policyEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicy' {Bool
policyEnabled :: Bool
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Bool
policyEnabled} -> Bool
policyEnabled) (\s :: ModifyVerifiedAccessEndpointPolicy
s@ModifyVerifiedAccessEndpointPolicy' {} Bool
a -> ModifyVerifiedAccessEndpointPolicy
s {$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicy' :: Bool
policyEnabled = Bool
a} :: ModifyVerifiedAccessEndpointPolicy)
instance
Core.AWSRequest
ModifyVerifiedAccessEndpointPolicy
where
type
AWSResponse ModifyVerifiedAccessEndpointPolicy =
ModifyVerifiedAccessEndpointPolicyResponse
request :: (Service -> Service)
-> ModifyVerifiedAccessEndpointPolicy
-> Request ModifyVerifiedAccessEndpointPolicy
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ModifyVerifiedAccessEndpointPolicy
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ModifyVerifiedAccessEndpointPolicy)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXML
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe Text
-> Maybe Bool -> Int -> ModifyVerifiedAccessEndpointPolicyResponse
ModifyVerifiedAccessEndpointPolicyResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"policyDocument")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"policyEnabled")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
ModifyVerifiedAccessEndpointPolicy
where
hashWithSalt :: Int -> ModifyVerifiedAccessEndpointPolicy -> Int
hashWithSalt
Int
_salt
ModifyVerifiedAccessEndpointPolicy' {Bool
Maybe Bool
Maybe Text
Text
policyEnabled :: Bool
verifiedAccessEndpointId :: Text
policyDocument :: Maybe Text
dryRun :: Maybe Bool
clientToken :: Maybe Text
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Bool
$sel:verifiedAccessEndpointId:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Text
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
$sel:dryRun:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Bool
$sel:clientToken:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
clientToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
dryRun
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
policyDocument
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
verifiedAccessEndpointId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Bool
policyEnabled
instance
Prelude.NFData
ModifyVerifiedAccessEndpointPolicy
where
rnf :: ModifyVerifiedAccessEndpointPolicy -> ()
rnf ModifyVerifiedAccessEndpointPolicy' {Bool
Maybe Bool
Maybe Text
Text
policyEnabled :: Bool
verifiedAccessEndpointId :: Text
policyDocument :: Maybe Text
dryRun :: Maybe Bool
clientToken :: Maybe Text
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Bool
$sel:verifiedAccessEndpointId:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Text
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
$sel:dryRun:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Bool
$sel:clientToken:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
clientToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
dryRun
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
policyDocument
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
verifiedAccessEndpointId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Bool
policyEnabled
instance
Data.ToHeaders
ModifyVerifiedAccessEndpointPolicy
where
toHeaders :: ModifyVerifiedAccessEndpointPolicy -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance
Data.ToPath
ModifyVerifiedAccessEndpointPolicy
where
toPath :: ModifyVerifiedAccessEndpointPolicy -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
ModifyVerifiedAccessEndpointPolicy
where
toQuery :: ModifyVerifiedAccessEndpointPolicy -> QueryString
toQuery ModifyVerifiedAccessEndpointPolicy' {Bool
Maybe Bool
Maybe Text
Text
policyEnabled :: Bool
verifiedAccessEndpointId :: Text
policyDocument :: Maybe Text
dryRun :: Maybe Bool
clientToken :: Maybe Text
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Bool
$sel:verifiedAccessEndpointId:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Text
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
$sel:dryRun:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Bool
$sel:clientToken:ModifyVerifiedAccessEndpointPolicy' :: ModifyVerifiedAccessEndpointPolicy -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"ModifyVerifiedAccessEndpointPolicy" ::
Prelude.ByteString
),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2016-11-15" :: Prelude.ByteString),
ByteString
"ClientToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
clientToken,
ByteString
"DryRun" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
dryRun,
ByteString
"PolicyDocument" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
policyDocument,
ByteString
"VerifiedAccessEndpointId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
verifiedAccessEndpointId,
ByteString
"PolicyEnabled" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Bool
policyEnabled
]
data ModifyVerifiedAccessEndpointPolicyResponse = ModifyVerifiedAccessEndpointPolicyResponse'
{
ModifyVerifiedAccessEndpointPolicyResponse -> Maybe Text
policyDocument :: Prelude.Maybe Prelude.Text,
ModifyVerifiedAccessEndpointPolicyResponse -> Maybe Bool
policyEnabled :: Prelude.Maybe Prelude.Bool,
ModifyVerifiedAccessEndpointPolicyResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ModifyVerifiedAccessEndpointPolicyResponse
-> ModifyVerifiedAccessEndpointPolicyResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyVerifiedAccessEndpointPolicyResponse
-> ModifyVerifiedAccessEndpointPolicyResponse -> Bool
$c/= :: ModifyVerifiedAccessEndpointPolicyResponse
-> ModifyVerifiedAccessEndpointPolicyResponse -> Bool
== :: ModifyVerifiedAccessEndpointPolicyResponse
-> ModifyVerifiedAccessEndpointPolicyResponse -> Bool
$c== :: ModifyVerifiedAccessEndpointPolicyResponse
-> ModifyVerifiedAccessEndpointPolicyResponse -> Bool
Prelude.Eq, ReadPrec [ModifyVerifiedAccessEndpointPolicyResponse]
ReadPrec ModifyVerifiedAccessEndpointPolicyResponse
Int -> ReadS ModifyVerifiedAccessEndpointPolicyResponse
ReadS [ModifyVerifiedAccessEndpointPolicyResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyVerifiedAccessEndpointPolicyResponse]
$creadListPrec :: ReadPrec [ModifyVerifiedAccessEndpointPolicyResponse]
readPrec :: ReadPrec ModifyVerifiedAccessEndpointPolicyResponse
$creadPrec :: ReadPrec ModifyVerifiedAccessEndpointPolicyResponse
readList :: ReadS [ModifyVerifiedAccessEndpointPolicyResponse]
$creadList :: ReadS [ModifyVerifiedAccessEndpointPolicyResponse]
readsPrec :: Int -> ReadS ModifyVerifiedAccessEndpointPolicyResponse
$creadsPrec :: Int -> ReadS ModifyVerifiedAccessEndpointPolicyResponse
Prelude.Read, Int -> ModifyVerifiedAccessEndpointPolicyResponse -> ShowS
[ModifyVerifiedAccessEndpointPolicyResponse] -> ShowS
ModifyVerifiedAccessEndpointPolicyResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyVerifiedAccessEndpointPolicyResponse] -> ShowS
$cshowList :: [ModifyVerifiedAccessEndpointPolicyResponse] -> ShowS
show :: ModifyVerifiedAccessEndpointPolicyResponse -> String
$cshow :: ModifyVerifiedAccessEndpointPolicyResponse -> String
showsPrec :: Int -> ModifyVerifiedAccessEndpointPolicyResponse -> ShowS
$cshowsPrec :: Int -> ModifyVerifiedAccessEndpointPolicyResponse -> ShowS
Prelude.Show, forall x.
Rep ModifyVerifiedAccessEndpointPolicyResponse x
-> ModifyVerifiedAccessEndpointPolicyResponse
forall x.
ModifyVerifiedAccessEndpointPolicyResponse
-> Rep ModifyVerifiedAccessEndpointPolicyResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyVerifiedAccessEndpointPolicyResponse x
-> ModifyVerifiedAccessEndpointPolicyResponse
$cfrom :: forall x.
ModifyVerifiedAccessEndpointPolicyResponse
-> Rep ModifyVerifiedAccessEndpointPolicyResponse x
Prelude.Generic)
newModifyVerifiedAccessEndpointPolicyResponse ::
Prelude.Int ->
ModifyVerifiedAccessEndpointPolicyResponse
newModifyVerifiedAccessEndpointPolicyResponse :: Int -> ModifyVerifiedAccessEndpointPolicyResponse
newModifyVerifiedAccessEndpointPolicyResponse
Int
pHttpStatus_ =
ModifyVerifiedAccessEndpointPolicyResponse'
{ $sel:policyDocument:ModifyVerifiedAccessEndpointPolicyResponse' :: Maybe Text
policyDocument =
forall a. Maybe a
Prelude.Nothing,
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicyResponse' :: Maybe Bool
policyEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ModifyVerifiedAccessEndpointPolicyResponse' :: Int
httpStatus = Int
pHttpStatus_
}
modifyVerifiedAccessEndpointPolicyResponse_policyDocument :: Lens.Lens' ModifyVerifiedAccessEndpointPolicyResponse (Prelude.Maybe Prelude.Text)
modifyVerifiedAccessEndpointPolicyResponse_policyDocument :: Lens' ModifyVerifiedAccessEndpointPolicyResponse (Maybe Text)
modifyVerifiedAccessEndpointPolicyResponse_policyDocument = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicyResponse' {Maybe Text
policyDocument :: Maybe Text
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicyResponse' :: ModifyVerifiedAccessEndpointPolicyResponse -> Maybe Text
policyDocument} -> Maybe Text
policyDocument) (\s :: ModifyVerifiedAccessEndpointPolicyResponse
s@ModifyVerifiedAccessEndpointPolicyResponse' {} Maybe Text
a -> ModifyVerifiedAccessEndpointPolicyResponse
s {$sel:policyDocument:ModifyVerifiedAccessEndpointPolicyResponse' :: Maybe Text
policyDocument = Maybe Text
a} :: ModifyVerifiedAccessEndpointPolicyResponse)
modifyVerifiedAccessEndpointPolicyResponse_policyEnabled :: Lens.Lens' ModifyVerifiedAccessEndpointPolicyResponse (Prelude.Maybe Prelude.Bool)
modifyVerifiedAccessEndpointPolicyResponse_policyEnabled :: Lens' ModifyVerifiedAccessEndpointPolicyResponse (Maybe Bool)
modifyVerifiedAccessEndpointPolicyResponse_policyEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicyResponse' {Maybe Bool
policyEnabled :: Maybe Bool
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicyResponse' :: ModifyVerifiedAccessEndpointPolicyResponse -> Maybe Bool
policyEnabled} -> Maybe Bool
policyEnabled) (\s :: ModifyVerifiedAccessEndpointPolicyResponse
s@ModifyVerifiedAccessEndpointPolicyResponse' {} Maybe Bool
a -> ModifyVerifiedAccessEndpointPolicyResponse
s {$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicyResponse' :: Maybe Bool
policyEnabled = Maybe Bool
a} :: ModifyVerifiedAccessEndpointPolicyResponse)
modifyVerifiedAccessEndpointPolicyResponse_httpStatus :: Lens.Lens' ModifyVerifiedAccessEndpointPolicyResponse Prelude.Int
modifyVerifiedAccessEndpointPolicyResponse_httpStatus :: Lens' ModifyVerifiedAccessEndpointPolicyResponse Int
modifyVerifiedAccessEndpointPolicyResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVerifiedAccessEndpointPolicyResponse' {Int
httpStatus :: Int
$sel:httpStatus:ModifyVerifiedAccessEndpointPolicyResponse' :: ModifyVerifiedAccessEndpointPolicyResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ModifyVerifiedAccessEndpointPolicyResponse
s@ModifyVerifiedAccessEndpointPolicyResponse' {} Int
a -> ModifyVerifiedAccessEndpointPolicyResponse
s {$sel:httpStatus:ModifyVerifiedAccessEndpointPolicyResponse' :: Int
httpStatus = Int
a} :: ModifyVerifiedAccessEndpointPolicyResponse)
instance
Prelude.NFData
ModifyVerifiedAccessEndpointPolicyResponse
where
rnf :: ModifyVerifiedAccessEndpointPolicyResponse -> ()
rnf ModifyVerifiedAccessEndpointPolicyResponse' {Int
Maybe Bool
Maybe Text
httpStatus :: Int
policyEnabled :: Maybe Bool
policyDocument :: Maybe Text
$sel:httpStatus:ModifyVerifiedAccessEndpointPolicyResponse' :: ModifyVerifiedAccessEndpointPolicyResponse -> Int
$sel:policyEnabled:ModifyVerifiedAccessEndpointPolicyResponse' :: ModifyVerifiedAccessEndpointPolicyResponse -> Maybe Bool
$sel:policyDocument:ModifyVerifiedAccessEndpointPolicyResponse' :: ModifyVerifiedAccessEndpointPolicyResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
policyDocument
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
policyEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus