{-# 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.Route53.ListTrafficPolicyInstancesByHostedZone
(
ListTrafficPolicyInstancesByHostedZone (..),
newListTrafficPolicyInstancesByHostedZone,
listTrafficPolicyInstancesByHostedZone_maxItems,
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceNameMarker,
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceTypeMarker,
listTrafficPolicyInstancesByHostedZone_hostedZoneId,
ListTrafficPolicyInstancesByHostedZoneResponse (..),
newListTrafficPolicyInstancesByHostedZoneResponse,
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceNameMarker,
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceTypeMarker,
listTrafficPolicyInstancesByHostedZoneResponse_httpStatus,
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstances,
listTrafficPolicyInstancesByHostedZoneResponse_isTruncated,
listTrafficPolicyInstancesByHostedZoneResponse_maxItems,
)
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 qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.Route53.Types
data ListTrafficPolicyInstancesByHostedZone = ListTrafficPolicyInstancesByHostedZone'
{
ListTrafficPolicyInstancesByHostedZone -> Maybe Text
maxItems :: Prelude.Maybe Prelude.Text,
ListTrafficPolicyInstancesByHostedZone -> Maybe Text
trafficPolicyInstanceNameMarker :: Prelude.Maybe Prelude.Text,
ListTrafficPolicyInstancesByHostedZone -> Maybe RRType
trafficPolicyInstanceTypeMarker :: Prelude.Maybe RRType,
ListTrafficPolicyInstancesByHostedZone -> ResourceId
hostedZoneId :: ResourceId
}
deriving (ListTrafficPolicyInstancesByHostedZone
-> ListTrafficPolicyInstancesByHostedZone -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListTrafficPolicyInstancesByHostedZone
-> ListTrafficPolicyInstancesByHostedZone -> Bool
$c/= :: ListTrafficPolicyInstancesByHostedZone
-> ListTrafficPolicyInstancesByHostedZone -> Bool
== :: ListTrafficPolicyInstancesByHostedZone
-> ListTrafficPolicyInstancesByHostedZone -> Bool
$c== :: ListTrafficPolicyInstancesByHostedZone
-> ListTrafficPolicyInstancesByHostedZone -> Bool
Prelude.Eq, ReadPrec [ListTrafficPolicyInstancesByHostedZone]
ReadPrec ListTrafficPolicyInstancesByHostedZone
Int -> ReadS ListTrafficPolicyInstancesByHostedZone
ReadS [ListTrafficPolicyInstancesByHostedZone]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListTrafficPolicyInstancesByHostedZone]
$creadListPrec :: ReadPrec [ListTrafficPolicyInstancesByHostedZone]
readPrec :: ReadPrec ListTrafficPolicyInstancesByHostedZone
$creadPrec :: ReadPrec ListTrafficPolicyInstancesByHostedZone
readList :: ReadS [ListTrafficPolicyInstancesByHostedZone]
$creadList :: ReadS [ListTrafficPolicyInstancesByHostedZone]
readsPrec :: Int -> ReadS ListTrafficPolicyInstancesByHostedZone
$creadsPrec :: Int -> ReadS ListTrafficPolicyInstancesByHostedZone
Prelude.Read, Int -> ListTrafficPolicyInstancesByHostedZone -> ShowS
[ListTrafficPolicyInstancesByHostedZone] -> ShowS
ListTrafficPolicyInstancesByHostedZone -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListTrafficPolicyInstancesByHostedZone] -> ShowS
$cshowList :: [ListTrafficPolicyInstancesByHostedZone] -> ShowS
show :: ListTrafficPolicyInstancesByHostedZone -> String
$cshow :: ListTrafficPolicyInstancesByHostedZone -> String
showsPrec :: Int -> ListTrafficPolicyInstancesByHostedZone -> ShowS
$cshowsPrec :: Int -> ListTrafficPolicyInstancesByHostedZone -> ShowS
Prelude.Show, forall x.
Rep ListTrafficPolicyInstancesByHostedZone x
-> ListTrafficPolicyInstancesByHostedZone
forall x.
ListTrafficPolicyInstancesByHostedZone
-> Rep ListTrafficPolicyInstancesByHostedZone x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListTrafficPolicyInstancesByHostedZone x
-> ListTrafficPolicyInstancesByHostedZone
$cfrom :: forall x.
ListTrafficPolicyInstancesByHostedZone
-> Rep ListTrafficPolicyInstancesByHostedZone x
Prelude.Generic)
newListTrafficPolicyInstancesByHostedZone ::
ResourceId ->
ListTrafficPolicyInstancesByHostedZone
newListTrafficPolicyInstancesByHostedZone :: ResourceId -> ListTrafficPolicyInstancesByHostedZone
newListTrafficPolicyInstancesByHostedZone
ResourceId
pHostedZoneId_ =
ListTrafficPolicyInstancesByHostedZone'
{ $sel:maxItems:ListTrafficPolicyInstancesByHostedZone' :: Maybe Text
maxItems =
forall a. Maybe a
Prelude.Nothing,
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZone' :: Maybe Text
trafficPolicyInstanceNameMarker =
forall a. Maybe a
Prelude.Nothing,
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZone' :: Maybe RRType
trafficPolicyInstanceTypeMarker =
forall a. Maybe a
Prelude.Nothing,
$sel:hostedZoneId:ListTrafficPolicyInstancesByHostedZone' :: ResourceId
hostedZoneId = ResourceId
pHostedZoneId_
}
listTrafficPolicyInstancesByHostedZone_maxItems :: Lens.Lens' ListTrafficPolicyInstancesByHostedZone (Prelude.Maybe Prelude.Text)
listTrafficPolicyInstancesByHostedZone_maxItems :: Lens' ListTrafficPolicyInstancesByHostedZone (Maybe Text)
listTrafficPolicyInstancesByHostedZone_maxItems = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZone' {Maybe Text
maxItems :: Maybe Text
$sel:maxItems:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
maxItems} -> Maybe Text
maxItems) (\s :: ListTrafficPolicyInstancesByHostedZone
s@ListTrafficPolicyInstancesByHostedZone' {} Maybe Text
a -> ListTrafficPolicyInstancesByHostedZone
s {$sel:maxItems:ListTrafficPolicyInstancesByHostedZone' :: Maybe Text
maxItems = Maybe Text
a} :: ListTrafficPolicyInstancesByHostedZone)
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceNameMarker :: Lens.Lens' ListTrafficPolicyInstancesByHostedZone (Prelude.Maybe Prelude.Text)
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceNameMarker :: Lens' ListTrafficPolicyInstancesByHostedZone (Maybe Text)
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceNameMarker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZone' {Maybe Text
trafficPolicyInstanceNameMarker :: Maybe Text
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
trafficPolicyInstanceNameMarker} -> Maybe Text
trafficPolicyInstanceNameMarker) (\s :: ListTrafficPolicyInstancesByHostedZone
s@ListTrafficPolicyInstancesByHostedZone' {} Maybe Text
a -> ListTrafficPolicyInstancesByHostedZone
s {$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZone' :: Maybe Text
trafficPolicyInstanceNameMarker = Maybe Text
a} :: ListTrafficPolicyInstancesByHostedZone)
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceTypeMarker :: Lens.Lens' ListTrafficPolicyInstancesByHostedZone (Prelude.Maybe RRType)
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceTypeMarker :: Lens' ListTrafficPolicyInstancesByHostedZone (Maybe RRType)
listTrafficPolicyInstancesByHostedZone_trafficPolicyInstanceTypeMarker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZone' {Maybe RRType
trafficPolicyInstanceTypeMarker :: Maybe RRType
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe RRType
trafficPolicyInstanceTypeMarker} -> Maybe RRType
trafficPolicyInstanceTypeMarker) (\s :: ListTrafficPolicyInstancesByHostedZone
s@ListTrafficPolicyInstancesByHostedZone' {} Maybe RRType
a -> ListTrafficPolicyInstancesByHostedZone
s {$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZone' :: Maybe RRType
trafficPolicyInstanceTypeMarker = Maybe RRType
a} :: ListTrafficPolicyInstancesByHostedZone)
listTrafficPolicyInstancesByHostedZone_hostedZoneId :: Lens.Lens' ListTrafficPolicyInstancesByHostedZone ResourceId
listTrafficPolicyInstancesByHostedZone_hostedZoneId :: Lens' ListTrafficPolicyInstancesByHostedZone ResourceId
listTrafficPolicyInstancesByHostedZone_hostedZoneId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZone' {ResourceId
hostedZoneId :: ResourceId
$sel:hostedZoneId:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> ResourceId
hostedZoneId} -> ResourceId
hostedZoneId) (\s :: ListTrafficPolicyInstancesByHostedZone
s@ListTrafficPolicyInstancesByHostedZone' {} ResourceId
a -> ListTrafficPolicyInstancesByHostedZone
s {$sel:hostedZoneId:ListTrafficPolicyInstancesByHostedZone' :: ResourceId
hostedZoneId = ResourceId
a} :: ListTrafficPolicyInstancesByHostedZone)
instance
Core.AWSRequest
ListTrafficPolicyInstancesByHostedZone
where
type
AWSResponse
ListTrafficPolicyInstancesByHostedZone =
ListTrafficPolicyInstancesByHostedZoneResponse
request :: (Service -> Service)
-> ListTrafficPolicyInstancesByHostedZone
-> Request ListTrafficPolicyInstancesByHostedZone
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListTrafficPolicyInstancesByHostedZone
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse ListTrafficPolicyInstancesByHostedZone)))
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 RRType
-> Int
-> [TrafficPolicyInstance]
-> Bool
-> Text
-> ListTrafficPolicyInstancesByHostedZoneResponse
ListTrafficPolicyInstancesByHostedZoneResponse'
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
"TrafficPolicyInstanceNameMarker")
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
"TrafficPolicyInstanceTypeMarker")
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))
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
"TrafficPolicyInstances"
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 a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"TrafficPolicyInstance"
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String a
Data..@ Text
"IsTruncated")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String a
Data..@ Text
"MaxItems")
)
instance
Prelude.Hashable
ListTrafficPolicyInstancesByHostedZone
where
hashWithSalt :: Int -> ListTrafficPolicyInstancesByHostedZone -> Int
hashWithSalt
Int
_salt
ListTrafficPolicyInstancesByHostedZone' {Maybe Text
Maybe RRType
ResourceId
hostedZoneId :: ResourceId
trafficPolicyInstanceTypeMarker :: Maybe RRType
trafficPolicyInstanceNameMarker :: Maybe Text
maxItems :: Maybe Text
$sel:hostedZoneId:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> ResourceId
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe RRType
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
$sel:maxItems:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
maxItems
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
trafficPolicyInstanceNameMarker
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RRType
trafficPolicyInstanceTypeMarker
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ResourceId
hostedZoneId
instance
Prelude.NFData
ListTrafficPolicyInstancesByHostedZone
where
rnf :: ListTrafficPolicyInstancesByHostedZone -> ()
rnf ListTrafficPolicyInstancesByHostedZone' {Maybe Text
Maybe RRType
ResourceId
hostedZoneId :: ResourceId
trafficPolicyInstanceTypeMarker :: Maybe RRType
trafficPolicyInstanceNameMarker :: Maybe Text
maxItems :: Maybe Text
$sel:hostedZoneId:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> ResourceId
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe RRType
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
$sel:maxItems:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
maxItems
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
trafficPolicyInstanceNameMarker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RRType
trafficPolicyInstanceTypeMarker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ResourceId
hostedZoneId
instance
Data.ToHeaders
ListTrafficPolicyInstancesByHostedZone
where
toHeaders :: ListTrafficPolicyInstancesByHostedZone -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance
Data.ToPath
ListTrafficPolicyInstancesByHostedZone
where
toPath :: ListTrafficPolicyInstancesByHostedZone -> ByteString
toPath =
forall a b. a -> b -> a
Prelude.const
ByteString
"/2013-04-01/trafficpolicyinstances/hostedzone"
instance
Data.ToQuery
ListTrafficPolicyInstancesByHostedZone
where
toQuery :: ListTrafficPolicyInstancesByHostedZone -> QueryString
toQuery ListTrafficPolicyInstancesByHostedZone' {Maybe Text
Maybe RRType
ResourceId
hostedZoneId :: ResourceId
trafficPolicyInstanceTypeMarker :: Maybe RRType
trafficPolicyInstanceNameMarker :: Maybe Text
maxItems :: Maybe Text
$sel:hostedZoneId:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> ResourceId
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe RRType
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
$sel:maxItems:ListTrafficPolicyInstancesByHostedZone' :: ListTrafficPolicyInstancesByHostedZone -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"maxitems" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
maxItems,
ByteString
"trafficpolicyinstancename"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
trafficPolicyInstanceNameMarker,
ByteString
"trafficpolicyinstancetype"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe RRType
trafficPolicyInstanceTypeMarker,
ByteString
"id" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ResourceId
hostedZoneId
]
data ListTrafficPolicyInstancesByHostedZoneResponse = ListTrafficPolicyInstancesByHostedZoneResponse'
{
ListTrafficPolicyInstancesByHostedZoneResponse -> Maybe Text
trafficPolicyInstanceNameMarker :: Prelude.Maybe Prelude.Text,
ListTrafficPolicyInstancesByHostedZoneResponse -> Maybe RRType
trafficPolicyInstanceTypeMarker :: Prelude.Maybe RRType,
ListTrafficPolicyInstancesByHostedZoneResponse -> Int
httpStatus :: Prelude.Int,
ListTrafficPolicyInstancesByHostedZoneResponse
-> [TrafficPolicyInstance]
trafficPolicyInstances :: [TrafficPolicyInstance],
ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
isTruncated :: Prelude.Bool,
ListTrafficPolicyInstancesByHostedZoneResponse -> Text
maxItems :: Prelude.Text
}
deriving (ListTrafficPolicyInstancesByHostedZoneResponse
-> ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListTrafficPolicyInstancesByHostedZoneResponse
-> ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
$c/= :: ListTrafficPolicyInstancesByHostedZoneResponse
-> ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
== :: ListTrafficPolicyInstancesByHostedZoneResponse
-> ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
$c== :: ListTrafficPolicyInstancesByHostedZoneResponse
-> ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
Prelude.Eq, ReadPrec [ListTrafficPolicyInstancesByHostedZoneResponse]
ReadPrec ListTrafficPolicyInstancesByHostedZoneResponse
Int -> ReadS ListTrafficPolicyInstancesByHostedZoneResponse
ReadS [ListTrafficPolicyInstancesByHostedZoneResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListTrafficPolicyInstancesByHostedZoneResponse]
$creadListPrec :: ReadPrec [ListTrafficPolicyInstancesByHostedZoneResponse]
readPrec :: ReadPrec ListTrafficPolicyInstancesByHostedZoneResponse
$creadPrec :: ReadPrec ListTrafficPolicyInstancesByHostedZoneResponse
readList :: ReadS [ListTrafficPolicyInstancesByHostedZoneResponse]
$creadList :: ReadS [ListTrafficPolicyInstancesByHostedZoneResponse]
readsPrec :: Int -> ReadS ListTrafficPolicyInstancesByHostedZoneResponse
$creadsPrec :: Int -> ReadS ListTrafficPolicyInstancesByHostedZoneResponse
Prelude.Read, Int -> ListTrafficPolicyInstancesByHostedZoneResponse -> ShowS
[ListTrafficPolicyInstancesByHostedZoneResponse] -> ShowS
ListTrafficPolicyInstancesByHostedZoneResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListTrafficPolicyInstancesByHostedZoneResponse] -> ShowS
$cshowList :: [ListTrafficPolicyInstancesByHostedZoneResponse] -> ShowS
show :: ListTrafficPolicyInstancesByHostedZoneResponse -> String
$cshow :: ListTrafficPolicyInstancesByHostedZoneResponse -> String
showsPrec :: Int -> ListTrafficPolicyInstancesByHostedZoneResponse -> ShowS
$cshowsPrec :: Int -> ListTrafficPolicyInstancesByHostedZoneResponse -> ShowS
Prelude.Show, forall x.
Rep ListTrafficPolicyInstancesByHostedZoneResponse x
-> ListTrafficPolicyInstancesByHostedZoneResponse
forall x.
ListTrafficPolicyInstancesByHostedZoneResponse
-> Rep ListTrafficPolicyInstancesByHostedZoneResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListTrafficPolicyInstancesByHostedZoneResponse x
-> ListTrafficPolicyInstancesByHostedZoneResponse
$cfrom :: forall x.
ListTrafficPolicyInstancesByHostedZoneResponse
-> Rep ListTrafficPolicyInstancesByHostedZoneResponse x
Prelude.Generic)
newListTrafficPolicyInstancesByHostedZoneResponse ::
Prelude.Int ->
Prelude.Bool ->
Prelude.Text ->
ListTrafficPolicyInstancesByHostedZoneResponse
newListTrafficPolicyInstancesByHostedZoneResponse :: Int
-> Bool -> Text -> ListTrafficPolicyInstancesByHostedZoneResponse
newListTrafficPolicyInstancesByHostedZoneResponse
Int
pHttpStatus_
Bool
pIsTruncated_
Text
pMaxItems_ =
ListTrafficPolicyInstancesByHostedZoneResponse'
{ $sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: Maybe Text
trafficPolicyInstanceNameMarker =
forall a. Maybe a
Prelude.Nothing,
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: Maybe RRType
trafficPolicyInstanceTypeMarker =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListTrafficPolicyInstancesByHostedZoneResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:trafficPolicyInstances:ListTrafficPolicyInstancesByHostedZoneResponse' :: [TrafficPolicyInstance]
trafficPolicyInstances =
forall a. Monoid a => a
Prelude.mempty,
$sel:isTruncated:ListTrafficPolicyInstancesByHostedZoneResponse' :: Bool
isTruncated = Bool
pIsTruncated_,
$sel:maxItems:ListTrafficPolicyInstancesByHostedZoneResponse' :: Text
maxItems = Text
pMaxItems_
}
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceNameMarker :: Lens.Lens' ListTrafficPolicyInstancesByHostedZoneResponse (Prelude.Maybe Prelude.Text)
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceNameMarker :: Lens' ListTrafficPolicyInstancesByHostedZoneResponse (Maybe Text)
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceNameMarker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZoneResponse' {Maybe Text
trafficPolicyInstanceNameMarker :: Maybe Text
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Maybe Text
trafficPolicyInstanceNameMarker} -> Maybe Text
trafficPolicyInstanceNameMarker) (\s :: ListTrafficPolicyInstancesByHostedZoneResponse
s@ListTrafficPolicyInstancesByHostedZoneResponse' {} Maybe Text
a -> ListTrafficPolicyInstancesByHostedZoneResponse
s {$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: Maybe Text
trafficPolicyInstanceNameMarker = Maybe Text
a} :: ListTrafficPolicyInstancesByHostedZoneResponse)
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceTypeMarker :: Lens.Lens' ListTrafficPolicyInstancesByHostedZoneResponse (Prelude.Maybe RRType)
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceTypeMarker :: Lens' ListTrafficPolicyInstancesByHostedZoneResponse (Maybe RRType)
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstanceTypeMarker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZoneResponse' {Maybe RRType
trafficPolicyInstanceTypeMarker :: Maybe RRType
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Maybe RRType
trafficPolicyInstanceTypeMarker} -> Maybe RRType
trafficPolicyInstanceTypeMarker) (\s :: ListTrafficPolicyInstancesByHostedZoneResponse
s@ListTrafficPolicyInstancesByHostedZoneResponse' {} Maybe RRType
a -> ListTrafficPolicyInstancesByHostedZoneResponse
s {$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: Maybe RRType
trafficPolicyInstanceTypeMarker = Maybe RRType
a} :: ListTrafficPolicyInstancesByHostedZoneResponse)
listTrafficPolicyInstancesByHostedZoneResponse_httpStatus :: Lens.Lens' ListTrafficPolicyInstancesByHostedZoneResponse Prelude.Int
listTrafficPolicyInstancesByHostedZoneResponse_httpStatus :: Lens' ListTrafficPolicyInstancesByHostedZoneResponse Int
listTrafficPolicyInstancesByHostedZoneResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZoneResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListTrafficPolicyInstancesByHostedZoneResponse
s@ListTrafficPolicyInstancesByHostedZoneResponse' {} Int
a -> ListTrafficPolicyInstancesByHostedZoneResponse
s {$sel:httpStatus:ListTrafficPolicyInstancesByHostedZoneResponse' :: Int
httpStatus = Int
a} :: ListTrafficPolicyInstancesByHostedZoneResponse)
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstances :: Lens.Lens' ListTrafficPolicyInstancesByHostedZoneResponse [TrafficPolicyInstance]
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstances :: Lens'
ListTrafficPolicyInstancesByHostedZoneResponse
[TrafficPolicyInstance]
listTrafficPolicyInstancesByHostedZoneResponse_trafficPolicyInstances = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZoneResponse' {[TrafficPolicyInstance]
trafficPolicyInstances :: [TrafficPolicyInstance]
$sel:trafficPolicyInstances:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse
-> [TrafficPolicyInstance]
trafficPolicyInstances} -> [TrafficPolicyInstance]
trafficPolicyInstances) (\s :: ListTrafficPolicyInstancesByHostedZoneResponse
s@ListTrafficPolicyInstancesByHostedZoneResponse' {} [TrafficPolicyInstance]
a -> ListTrafficPolicyInstancesByHostedZoneResponse
s {$sel:trafficPolicyInstances:ListTrafficPolicyInstancesByHostedZoneResponse' :: [TrafficPolicyInstance]
trafficPolicyInstances = [TrafficPolicyInstance]
a} :: ListTrafficPolicyInstancesByHostedZoneResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
listTrafficPolicyInstancesByHostedZoneResponse_isTruncated :: Lens.Lens' ListTrafficPolicyInstancesByHostedZoneResponse Prelude.Bool
listTrafficPolicyInstancesByHostedZoneResponse_isTruncated :: Lens' ListTrafficPolicyInstancesByHostedZoneResponse Bool
listTrafficPolicyInstancesByHostedZoneResponse_isTruncated = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZoneResponse' {Bool
isTruncated :: Bool
$sel:isTruncated:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
isTruncated} -> Bool
isTruncated) (\s :: ListTrafficPolicyInstancesByHostedZoneResponse
s@ListTrafficPolicyInstancesByHostedZoneResponse' {} Bool
a -> ListTrafficPolicyInstancesByHostedZoneResponse
s {$sel:isTruncated:ListTrafficPolicyInstancesByHostedZoneResponse' :: Bool
isTruncated = Bool
a} :: ListTrafficPolicyInstancesByHostedZoneResponse)
listTrafficPolicyInstancesByHostedZoneResponse_maxItems :: Lens.Lens' ListTrafficPolicyInstancesByHostedZoneResponse Prelude.Text
listTrafficPolicyInstancesByHostedZoneResponse_maxItems :: Lens' ListTrafficPolicyInstancesByHostedZoneResponse Text
listTrafficPolicyInstancesByHostedZoneResponse_maxItems = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTrafficPolicyInstancesByHostedZoneResponse' {Text
maxItems :: Text
$sel:maxItems:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Text
maxItems} -> Text
maxItems) (\s :: ListTrafficPolicyInstancesByHostedZoneResponse
s@ListTrafficPolicyInstancesByHostedZoneResponse' {} Text
a -> ListTrafficPolicyInstancesByHostedZoneResponse
s {$sel:maxItems:ListTrafficPolicyInstancesByHostedZoneResponse' :: Text
maxItems = Text
a} :: ListTrafficPolicyInstancesByHostedZoneResponse)
instance
Prelude.NFData
ListTrafficPolicyInstancesByHostedZoneResponse
where
rnf :: ListTrafficPolicyInstancesByHostedZoneResponse -> ()
rnf
ListTrafficPolicyInstancesByHostedZoneResponse' {Bool
Int
[TrafficPolicyInstance]
Maybe Text
Maybe RRType
Text
maxItems :: Text
isTruncated :: Bool
trafficPolicyInstances :: [TrafficPolicyInstance]
httpStatus :: Int
trafficPolicyInstanceTypeMarker :: Maybe RRType
trafficPolicyInstanceNameMarker :: Maybe Text
$sel:maxItems:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Text
$sel:isTruncated:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Bool
$sel:trafficPolicyInstances:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse
-> [TrafficPolicyInstance]
$sel:httpStatus:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Int
$sel:trafficPolicyInstanceTypeMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Maybe RRType
$sel:trafficPolicyInstanceNameMarker:ListTrafficPolicyInstancesByHostedZoneResponse' :: ListTrafficPolicyInstancesByHostedZoneResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
trafficPolicyInstanceNameMarker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RRType
trafficPolicyInstanceTypeMarker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [TrafficPolicyInstance]
trafficPolicyInstances
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Bool
isTruncated
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
maxItems