{-# 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.RDS.DescribeDBProxyEndpoints
(
DescribeDBProxyEndpoints (..),
newDescribeDBProxyEndpoints,
describeDBProxyEndpoints_dbProxyEndpointName,
describeDBProxyEndpoints_dbProxyName,
describeDBProxyEndpoints_filters,
describeDBProxyEndpoints_marker,
describeDBProxyEndpoints_maxRecords,
DescribeDBProxyEndpointsResponse (..),
newDescribeDBProxyEndpointsResponse,
describeDBProxyEndpointsResponse_dbProxyEndpoints,
describeDBProxyEndpointsResponse_marker,
describeDBProxyEndpointsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.RDS.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeDBProxyEndpoints = DescribeDBProxyEndpoints'
{
DescribeDBProxyEndpoints -> Maybe Text
dbProxyEndpointName :: Prelude.Maybe Prelude.Text,
DescribeDBProxyEndpoints -> Maybe Text
dbProxyName :: Prelude.Maybe Prelude.Text,
DescribeDBProxyEndpoints -> Maybe [Filter]
filters :: Prelude.Maybe [Filter],
DescribeDBProxyEndpoints -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeDBProxyEndpoints -> Maybe Natural
maxRecords :: Prelude.Maybe Prelude.Natural
}
deriving (DescribeDBProxyEndpoints -> DescribeDBProxyEndpoints -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeDBProxyEndpoints -> DescribeDBProxyEndpoints -> Bool
$c/= :: DescribeDBProxyEndpoints -> DescribeDBProxyEndpoints -> Bool
== :: DescribeDBProxyEndpoints -> DescribeDBProxyEndpoints -> Bool
$c== :: DescribeDBProxyEndpoints -> DescribeDBProxyEndpoints -> Bool
Prelude.Eq, ReadPrec [DescribeDBProxyEndpoints]
ReadPrec DescribeDBProxyEndpoints
Int -> ReadS DescribeDBProxyEndpoints
ReadS [DescribeDBProxyEndpoints]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeDBProxyEndpoints]
$creadListPrec :: ReadPrec [DescribeDBProxyEndpoints]
readPrec :: ReadPrec DescribeDBProxyEndpoints
$creadPrec :: ReadPrec DescribeDBProxyEndpoints
readList :: ReadS [DescribeDBProxyEndpoints]
$creadList :: ReadS [DescribeDBProxyEndpoints]
readsPrec :: Int -> ReadS DescribeDBProxyEndpoints
$creadsPrec :: Int -> ReadS DescribeDBProxyEndpoints
Prelude.Read, Int -> DescribeDBProxyEndpoints -> ShowS
[DescribeDBProxyEndpoints] -> ShowS
DescribeDBProxyEndpoints -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeDBProxyEndpoints] -> ShowS
$cshowList :: [DescribeDBProxyEndpoints] -> ShowS
show :: DescribeDBProxyEndpoints -> String
$cshow :: DescribeDBProxyEndpoints -> String
showsPrec :: Int -> DescribeDBProxyEndpoints -> ShowS
$cshowsPrec :: Int -> DescribeDBProxyEndpoints -> ShowS
Prelude.Show, forall x.
Rep DescribeDBProxyEndpoints x -> DescribeDBProxyEndpoints
forall x.
DescribeDBProxyEndpoints -> Rep DescribeDBProxyEndpoints x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeDBProxyEndpoints x -> DescribeDBProxyEndpoints
$cfrom :: forall x.
DescribeDBProxyEndpoints -> Rep DescribeDBProxyEndpoints x
Prelude.Generic)
newDescribeDBProxyEndpoints ::
DescribeDBProxyEndpoints
newDescribeDBProxyEndpoints :: DescribeDBProxyEndpoints
newDescribeDBProxyEndpoints =
DescribeDBProxyEndpoints'
{ $sel:dbProxyEndpointName:DescribeDBProxyEndpoints' :: Maybe Text
dbProxyEndpointName =
forall a. Maybe a
Prelude.Nothing,
$sel:dbProxyName:DescribeDBProxyEndpoints' :: Maybe Text
dbProxyName = forall a. Maybe a
Prelude.Nothing,
$sel:filters:DescribeDBProxyEndpoints' :: Maybe [Filter]
filters = forall a. Maybe a
Prelude.Nothing,
$sel:marker:DescribeDBProxyEndpoints' :: Maybe Text
marker = forall a. Maybe a
Prelude.Nothing,
$sel:maxRecords:DescribeDBProxyEndpoints' :: Maybe Natural
maxRecords = forall a. Maybe a
Prelude.Nothing
}
describeDBProxyEndpoints_dbProxyEndpointName :: Lens.Lens' DescribeDBProxyEndpoints (Prelude.Maybe Prelude.Text)
describeDBProxyEndpoints_dbProxyEndpointName :: Lens' DescribeDBProxyEndpoints (Maybe Text)
describeDBProxyEndpoints_dbProxyEndpointName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpoints' {Maybe Text
dbProxyEndpointName :: Maybe Text
$sel:dbProxyEndpointName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
dbProxyEndpointName} -> Maybe Text
dbProxyEndpointName) (\s :: DescribeDBProxyEndpoints
s@DescribeDBProxyEndpoints' {} Maybe Text
a -> DescribeDBProxyEndpoints
s {$sel:dbProxyEndpointName:DescribeDBProxyEndpoints' :: Maybe Text
dbProxyEndpointName = Maybe Text
a} :: DescribeDBProxyEndpoints)
describeDBProxyEndpoints_dbProxyName :: Lens.Lens' DescribeDBProxyEndpoints (Prelude.Maybe Prelude.Text)
describeDBProxyEndpoints_dbProxyName :: Lens' DescribeDBProxyEndpoints (Maybe Text)
describeDBProxyEndpoints_dbProxyName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpoints' {Maybe Text
dbProxyName :: Maybe Text
$sel:dbProxyName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
dbProxyName} -> Maybe Text
dbProxyName) (\s :: DescribeDBProxyEndpoints
s@DescribeDBProxyEndpoints' {} Maybe Text
a -> DescribeDBProxyEndpoints
s {$sel:dbProxyName:DescribeDBProxyEndpoints' :: Maybe Text
dbProxyName = Maybe Text
a} :: DescribeDBProxyEndpoints)
describeDBProxyEndpoints_filters :: Lens.Lens' DescribeDBProxyEndpoints (Prelude.Maybe [Filter])
describeDBProxyEndpoints_filters :: Lens' DescribeDBProxyEndpoints (Maybe [Filter])
describeDBProxyEndpoints_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpoints' {Maybe [Filter]
filters :: Maybe [Filter]
$sel:filters:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe [Filter]
filters} -> Maybe [Filter]
filters) (\s :: DescribeDBProxyEndpoints
s@DescribeDBProxyEndpoints' {} Maybe [Filter]
a -> DescribeDBProxyEndpoints
s {$sel:filters:DescribeDBProxyEndpoints' :: Maybe [Filter]
filters = Maybe [Filter]
a} :: DescribeDBProxyEndpoints) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeDBProxyEndpoints_marker :: Lens.Lens' DescribeDBProxyEndpoints (Prelude.Maybe Prelude.Text)
describeDBProxyEndpoints_marker :: Lens' DescribeDBProxyEndpoints (Maybe Text)
describeDBProxyEndpoints_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpoints' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeDBProxyEndpoints
s@DescribeDBProxyEndpoints' {} Maybe Text
a -> DescribeDBProxyEndpoints
s {$sel:marker:DescribeDBProxyEndpoints' :: Maybe Text
marker = Maybe Text
a} :: DescribeDBProxyEndpoints)
describeDBProxyEndpoints_maxRecords :: Lens.Lens' DescribeDBProxyEndpoints (Prelude.Maybe Prelude.Natural)
describeDBProxyEndpoints_maxRecords :: Lens' DescribeDBProxyEndpoints (Maybe Natural)
describeDBProxyEndpoints_maxRecords = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpoints' {Maybe Natural
maxRecords :: Maybe Natural
$sel:maxRecords:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Natural
maxRecords} -> Maybe Natural
maxRecords) (\s :: DescribeDBProxyEndpoints
s@DescribeDBProxyEndpoints' {} Maybe Natural
a -> DescribeDBProxyEndpoints
s {$sel:maxRecords:DescribeDBProxyEndpoints' :: Maybe Natural
maxRecords = Maybe Natural
a} :: DescribeDBProxyEndpoints)
instance Core.AWSPager DescribeDBProxyEndpoints where
page :: DescribeDBProxyEndpoints
-> AWSResponse DescribeDBProxyEndpoints
-> Maybe DescribeDBProxyEndpoints
page DescribeDBProxyEndpoints
rq AWSResponse DescribeDBProxyEndpoints
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeDBProxyEndpoints
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeDBProxyEndpointsResponse (Maybe Text)
describeDBProxyEndpointsResponse_marker
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeDBProxyEndpoints
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeDBProxyEndpointsResponse (Maybe [DBProxyEndpoint])
describeDBProxyEndpointsResponse_dbProxyEndpoints
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ DescribeDBProxyEndpoints
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeDBProxyEndpoints (Maybe Text)
describeDBProxyEndpoints_marker
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeDBProxyEndpoints
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeDBProxyEndpointsResponse (Maybe Text)
describeDBProxyEndpointsResponse_marker
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest DescribeDBProxyEndpoints where
type
AWSResponse DescribeDBProxyEndpoints =
DescribeDBProxyEndpointsResponse
request :: (Service -> Service)
-> DescribeDBProxyEndpoints -> Request DescribeDBProxyEndpoints
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 DescribeDBProxyEndpoints
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeDBProxyEndpoints)))
response =
forall (m :: * -> *) a.
MonadResource m =>
Text
-> (Int
-> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXMLWrapper
Text
"DescribeDBProxyEndpointsResult"
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe [DBProxyEndpoint]
-> Maybe Text -> Int -> DescribeDBProxyEndpointsResponse
DescribeDBProxyEndpointsResponse'
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
"DBProxyEndpoints"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may (forall a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"member")
)
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
"Marker")
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 DescribeDBProxyEndpoints where
hashWithSalt :: Int -> DescribeDBProxyEndpoints -> Int
hashWithSalt Int
_salt DescribeDBProxyEndpoints' {Maybe Natural
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Natural
marker :: Maybe Text
filters :: Maybe [Filter]
dbProxyName :: Maybe Text
dbProxyEndpointName :: Maybe Text
$sel:maxRecords:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Natural
$sel:marker:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
$sel:filters:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe [Filter]
$sel:dbProxyName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
$sel:dbProxyEndpointName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbProxyEndpointName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbProxyName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Filter]
filters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
marker
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxRecords
instance Prelude.NFData DescribeDBProxyEndpoints where
rnf :: DescribeDBProxyEndpoints -> ()
rnf DescribeDBProxyEndpoints' {Maybe Natural
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Natural
marker :: Maybe Text
filters :: Maybe [Filter]
dbProxyName :: Maybe Text
dbProxyEndpointName :: Maybe Text
$sel:maxRecords:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Natural
$sel:marker:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
$sel:filters:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe [Filter]
$sel:dbProxyName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
$sel:dbProxyEndpointName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbProxyEndpointName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbProxyName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Filter]
filters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxRecords
instance Data.ToHeaders DescribeDBProxyEndpoints where
toHeaders :: DescribeDBProxyEndpoints -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath DescribeDBProxyEndpoints where
toPath :: DescribeDBProxyEndpoints -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeDBProxyEndpoints where
toQuery :: DescribeDBProxyEndpoints -> QueryString
toQuery DescribeDBProxyEndpoints' {Maybe Natural
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Natural
marker :: Maybe Text
filters :: Maybe [Filter]
dbProxyName :: Maybe Text
dbProxyEndpointName :: Maybe Text
$sel:maxRecords:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Natural
$sel:marker:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
$sel:filters:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe [Filter]
$sel:dbProxyName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
$sel:dbProxyEndpointName:DescribeDBProxyEndpoints' :: DescribeDBProxyEndpoints -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"DescribeDBProxyEndpoints" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2014-10-31" :: Prelude.ByteString),
ByteString
"DBProxyEndpointName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbProxyEndpointName,
ByteString
"DBProxyName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbProxyName,
ByteString
"Filters"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: forall a. ToQuery a => a -> QueryString
Data.toQuery
(forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Data.toQueryList ByteString
"Filter" forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Filter]
filters),
ByteString
"Marker" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
marker,
ByteString
"MaxRecords" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxRecords
]
data DescribeDBProxyEndpointsResponse = DescribeDBProxyEndpointsResponse'
{
DescribeDBProxyEndpointsResponse -> Maybe [DBProxyEndpoint]
dbProxyEndpoints :: Prelude.Maybe [DBProxyEndpoint],
DescribeDBProxyEndpointsResponse -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeDBProxyEndpointsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeDBProxyEndpointsResponse
-> DescribeDBProxyEndpointsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeDBProxyEndpointsResponse
-> DescribeDBProxyEndpointsResponse -> Bool
$c/= :: DescribeDBProxyEndpointsResponse
-> DescribeDBProxyEndpointsResponse -> Bool
== :: DescribeDBProxyEndpointsResponse
-> DescribeDBProxyEndpointsResponse -> Bool
$c== :: DescribeDBProxyEndpointsResponse
-> DescribeDBProxyEndpointsResponse -> Bool
Prelude.Eq, ReadPrec [DescribeDBProxyEndpointsResponse]
ReadPrec DescribeDBProxyEndpointsResponse
Int -> ReadS DescribeDBProxyEndpointsResponse
ReadS [DescribeDBProxyEndpointsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeDBProxyEndpointsResponse]
$creadListPrec :: ReadPrec [DescribeDBProxyEndpointsResponse]
readPrec :: ReadPrec DescribeDBProxyEndpointsResponse
$creadPrec :: ReadPrec DescribeDBProxyEndpointsResponse
readList :: ReadS [DescribeDBProxyEndpointsResponse]
$creadList :: ReadS [DescribeDBProxyEndpointsResponse]
readsPrec :: Int -> ReadS DescribeDBProxyEndpointsResponse
$creadsPrec :: Int -> ReadS DescribeDBProxyEndpointsResponse
Prelude.Read, Int -> DescribeDBProxyEndpointsResponse -> ShowS
[DescribeDBProxyEndpointsResponse] -> ShowS
DescribeDBProxyEndpointsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeDBProxyEndpointsResponse] -> ShowS
$cshowList :: [DescribeDBProxyEndpointsResponse] -> ShowS
show :: DescribeDBProxyEndpointsResponse -> String
$cshow :: DescribeDBProxyEndpointsResponse -> String
showsPrec :: Int -> DescribeDBProxyEndpointsResponse -> ShowS
$cshowsPrec :: Int -> DescribeDBProxyEndpointsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeDBProxyEndpointsResponse x
-> DescribeDBProxyEndpointsResponse
forall x.
DescribeDBProxyEndpointsResponse
-> Rep DescribeDBProxyEndpointsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeDBProxyEndpointsResponse x
-> DescribeDBProxyEndpointsResponse
$cfrom :: forall x.
DescribeDBProxyEndpointsResponse
-> Rep DescribeDBProxyEndpointsResponse x
Prelude.Generic)
newDescribeDBProxyEndpointsResponse ::
Prelude.Int ->
DescribeDBProxyEndpointsResponse
newDescribeDBProxyEndpointsResponse :: Int -> DescribeDBProxyEndpointsResponse
newDescribeDBProxyEndpointsResponse Int
pHttpStatus_ =
DescribeDBProxyEndpointsResponse'
{ $sel:dbProxyEndpoints:DescribeDBProxyEndpointsResponse' :: Maybe [DBProxyEndpoint]
dbProxyEndpoints =
forall a. Maybe a
Prelude.Nothing,
$sel:marker:DescribeDBProxyEndpointsResponse' :: Maybe Text
marker = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeDBProxyEndpointsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeDBProxyEndpointsResponse_dbProxyEndpoints :: Lens.Lens' DescribeDBProxyEndpointsResponse (Prelude.Maybe [DBProxyEndpoint])
describeDBProxyEndpointsResponse_dbProxyEndpoints :: Lens' DescribeDBProxyEndpointsResponse (Maybe [DBProxyEndpoint])
describeDBProxyEndpointsResponse_dbProxyEndpoints = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpointsResponse' {Maybe [DBProxyEndpoint]
dbProxyEndpoints :: Maybe [DBProxyEndpoint]
$sel:dbProxyEndpoints:DescribeDBProxyEndpointsResponse' :: DescribeDBProxyEndpointsResponse -> Maybe [DBProxyEndpoint]
dbProxyEndpoints} -> Maybe [DBProxyEndpoint]
dbProxyEndpoints) (\s :: DescribeDBProxyEndpointsResponse
s@DescribeDBProxyEndpointsResponse' {} Maybe [DBProxyEndpoint]
a -> DescribeDBProxyEndpointsResponse
s {$sel:dbProxyEndpoints:DescribeDBProxyEndpointsResponse' :: Maybe [DBProxyEndpoint]
dbProxyEndpoints = Maybe [DBProxyEndpoint]
a} :: DescribeDBProxyEndpointsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeDBProxyEndpointsResponse_marker :: Lens.Lens' DescribeDBProxyEndpointsResponse (Prelude.Maybe Prelude.Text)
describeDBProxyEndpointsResponse_marker :: Lens' DescribeDBProxyEndpointsResponse (Maybe Text)
describeDBProxyEndpointsResponse_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpointsResponse' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeDBProxyEndpointsResponse' :: DescribeDBProxyEndpointsResponse -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeDBProxyEndpointsResponse
s@DescribeDBProxyEndpointsResponse' {} Maybe Text
a -> DescribeDBProxyEndpointsResponse
s {$sel:marker:DescribeDBProxyEndpointsResponse' :: Maybe Text
marker = Maybe Text
a} :: DescribeDBProxyEndpointsResponse)
describeDBProxyEndpointsResponse_httpStatus :: Lens.Lens' DescribeDBProxyEndpointsResponse Prelude.Int
describeDBProxyEndpointsResponse_httpStatus :: Lens' DescribeDBProxyEndpointsResponse Int
describeDBProxyEndpointsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxyEndpointsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeDBProxyEndpointsResponse' :: DescribeDBProxyEndpointsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeDBProxyEndpointsResponse
s@DescribeDBProxyEndpointsResponse' {} Int
a -> DescribeDBProxyEndpointsResponse
s {$sel:httpStatus:DescribeDBProxyEndpointsResponse' :: Int
httpStatus = Int
a} :: DescribeDBProxyEndpointsResponse)
instance
Prelude.NFData
DescribeDBProxyEndpointsResponse
where
rnf :: DescribeDBProxyEndpointsResponse -> ()
rnf DescribeDBProxyEndpointsResponse' {Int
Maybe [DBProxyEndpoint]
Maybe Text
httpStatus :: Int
marker :: Maybe Text
dbProxyEndpoints :: Maybe [DBProxyEndpoint]
$sel:httpStatus:DescribeDBProxyEndpointsResponse' :: DescribeDBProxyEndpointsResponse -> Int
$sel:marker:DescribeDBProxyEndpointsResponse' :: DescribeDBProxyEndpointsResponse -> Maybe Text
$sel:dbProxyEndpoints:DescribeDBProxyEndpointsResponse' :: DescribeDBProxyEndpointsResponse -> Maybe [DBProxyEndpoint]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [DBProxyEndpoint]
dbProxyEndpoints
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus