{-# 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.DescribeHostReservationOfferings
(
DescribeHostReservationOfferings (..),
newDescribeHostReservationOfferings,
describeHostReservationOfferings_filter,
describeHostReservationOfferings_maxDuration,
describeHostReservationOfferings_maxResults,
describeHostReservationOfferings_minDuration,
describeHostReservationOfferings_nextToken,
describeHostReservationOfferings_offeringId,
DescribeHostReservationOfferingsResponse (..),
newDescribeHostReservationOfferingsResponse,
describeHostReservationOfferingsResponse_nextToken,
describeHostReservationOfferingsResponse_offeringSet,
describeHostReservationOfferingsResponse_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 DescribeHostReservationOfferings = DescribeHostReservationOfferings'
{
DescribeHostReservationOfferings -> Maybe [Filter]
filter' :: Prelude.Maybe [Filter],
DescribeHostReservationOfferings -> Maybe Int
maxDuration :: Prelude.Maybe Prelude.Int,
DescribeHostReservationOfferings -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
DescribeHostReservationOfferings -> Maybe Int
minDuration :: Prelude.Maybe Prelude.Int,
DescribeHostReservationOfferings -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeHostReservationOfferings -> Maybe Text
offeringId :: Prelude.Maybe Prelude.Text
}
deriving (DescribeHostReservationOfferings
-> DescribeHostReservationOfferings -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeHostReservationOfferings
-> DescribeHostReservationOfferings -> Bool
$c/= :: DescribeHostReservationOfferings
-> DescribeHostReservationOfferings -> Bool
== :: DescribeHostReservationOfferings
-> DescribeHostReservationOfferings -> Bool
$c== :: DescribeHostReservationOfferings
-> DescribeHostReservationOfferings -> Bool
Prelude.Eq, ReadPrec [DescribeHostReservationOfferings]
ReadPrec DescribeHostReservationOfferings
Int -> ReadS DescribeHostReservationOfferings
ReadS [DescribeHostReservationOfferings]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeHostReservationOfferings]
$creadListPrec :: ReadPrec [DescribeHostReservationOfferings]
readPrec :: ReadPrec DescribeHostReservationOfferings
$creadPrec :: ReadPrec DescribeHostReservationOfferings
readList :: ReadS [DescribeHostReservationOfferings]
$creadList :: ReadS [DescribeHostReservationOfferings]
readsPrec :: Int -> ReadS DescribeHostReservationOfferings
$creadsPrec :: Int -> ReadS DescribeHostReservationOfferings
Prelude.Read, Int -> DescribeHostReservationOfferings -> ShowS
[DescribeHostReservationOfferings] -> ShowS
DescribeHostReservationOfferings -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeHostReservationOfferings] -> ShowS
$cshowList :: [DescribeHostReservationOfferings] -> ShowS
show :: DescribeHostReservationOfferings -> String
$cshow :: DescribeHostReservationOfferings -> String
showsPrec :: Int -> DescribeHostReservationOfferings -> ShowS
$cshowsPrec :: Int -> DescribeHostReservationOfferings -> ShowS
Prelude.Show, forall x.
Rep DescribeHostReservationOfferings x
-> DescribeHostReservationOfferings
forall x.
DescribeHostReservationOfferings
-> Rep DescribeHostReservationOfferings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeHostReservationOfferings x
-> DescribeHostReservationOfferings
$cfrom :: forall x.
DescribeHostReservationOfferings
-> Rep DescribeHostReservationOfferings x
Prelude.Generic)
newDescribeHostReservationOfferings ::
DescribeHostReservationOfferings
newDescribeHostReservationOfferings :: DescribeHostReservationOfferings
newDescribeHostReservationOfferings =
DescribeHostReservationOfferings'
{ $sel:filter':DescribeHostReservationOfferings' :: Maybe [Filter]
filter' =
forall a. Maybe a
Prelude.Nothing,
$sel:maxDuration:DescribeHostReservationOfferings' :: Maybe Int
maxDuration = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:DescribeHostReservationOfferings' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:minDuration:DescribeHostReservationOfferings' :: Maybe Int
minDuration = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeHostReservationOfferings' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:offeringId:DescribeHostReservationOfferings' :: Maybe Text
offeringId = forall a. Maybe a
Prelude.Nothing
}
describeHostReservationOfferings_filter :: Lens.Lens' DescribeHostReservationOfferings (Prelude.Maybe [Filter])
describeHostReservationOfferings_filter :: Lens' DescribeHostReservationOfferings (Maybe [Filter])
describeHostReservationOfferings_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferings' {Maybe [Filter]
filter' :: Maybe [Filter]
$sel:filter':DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe [Filter]
filter'} -> Maybe [Filter]
filter') (\s :: DescribeHostReservationOfferings
s@DescribeHostReservationOfferings' {} Maybe [Filter]
a -> DescribeHostReservationOfferings
s {$sel:filter':DescribeHostReservationOfferings' :: Maybe [Filter]
filter' = Maybe [Filter]
a} :: DescribeHostReservationOfferings) 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
describeHostReservationOfferings_maxDuration :: Lens.Lens' DescribeHostReservationOfferings (Prelude.Maybe Prelude.Int)
describeHostReservationOfferings_maxDuration :: Lens' DescribeHostReservationOfferings (Maybe Int)
describeHostReservationOfferings_maxDuration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferings' {Maybe Int
maxDuration :: Maybe Int
$sel:maxDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
maxDuration} -> Maybe Int
maxDuration) (\s :: DescribeHostReservationOfferings
s@DescribeHostReservationOfferings' {} Maybe Int
a -> DescribeHostReservationOfferings
s {$sel:maxDuration:DescribeHostReservationOfferings' :: Maybe Int
maxDuration = Maybe Int
a} :: DescribeHostReservationOfferings)
describeHostReservationOfferings_maxResults :: Lens.Lens' DescribeHostReservationOfferings (Prelude.Maybe Prelude.Natural)
describeHostReservationOfferings_maxResults :: Lens' DescribeHostReservationOfferings (Maybe Natural)
describeHostReservationOfferings_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferings' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: DescribeHostReservationOfferings
s@DescribeHostReservationOfferings' {} Maybe Natural
a -> DescribeHostReservationOfferings
s {$sel:maxResults:DescribeHostReservationOfferings' :: Maybe Natural
maxResults = Maybe Natural
a} :: DescribeHostReservationOfferings)
describeHostReservationOfferings_minDuration :: Lens.Lens' DescribeHostReservationOfferings (Prelude.Maybe Prelude.Int)
describeHostReservationOfferings_minDuration :: Lens' DescribeHostReservationOfferings (Maybe Int)
describeHostReservationOfferings_minDuration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferings' {Maybe Int
minDuration :: Maybe Int
$sel:minDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
minDuration} -> Maybe Int
minDuration) (\s :: DescribeHostReservationOfferings
s@DescribeHostReservationOfferings' {} Maybe Int
a -> DescribeHostReservationOfferings
s {$sel:minDuration:DescribeHostReservationOfferings' :: Maybe Int
minDuration = Maybe Int
a} :: DescribeHostReservationOfferings)
describeHostReservationOfferings_nextToken :: Lens.Lens' DescribeHostReservationOfferings (Prelude.Maybe Prelude.Text)
describeHostReservationOfferings_nextToken :: Lens' DescribeHostReservationOfferings (Maybe Text)
describeHostReservationOfferings_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferings' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeHostReservationOfferings
s@DescribeHostReservationOfferings' {} Maybe Text
a -> DescribeHostReservationOfferings
s {$sel:nextToken:DescribeHostReservationOfferings' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeHostReservationOfferings)
describeHostReservationOfferings_offeringId :: Lens.Lens' DescribeHostReservationOfferings (Prelude.Maybe Prelude.Text)
describeHostReservationOfferings_offeringId :: Lens' DescribeHostReservationOfferings (Maybe Text)
describeHostReservationOfferings_offeringId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferings' {Maybe Text
offeringId :: Maybe Text
$sel:offeringId:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
offeringId} -> Maybe Text
offeringId) (\s :: DescribeHostReservationOfferings
s@DescribeHostReservationOfferings' {} Maybe Text
a -> DescribeHostReservationOfferings
s {$sel:offeringId:DescribeHostReservationOfferings' :: Maybe Text
offeringId = Maybe Text
a} :: DescribeHostReservationOfferings)
instance
Core.AWSPager
DescribeHostReservationOfferings
where
page :: DescribeHostReservationOfferings
-> AWSResponse DescribeHostReservationOfferings
-> Maybe DescribeHostReservationOfferings
page DescribeHostReservationOfferings
rq AWSResponse DescribeHostReservationOfferings
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeHostReservationOfferings
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeHostReservationOfferingsResponse (Maybe Text)
describeHostReservationOfferingsResponse_nextToken
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 DescribeHostReservationOfferings
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
DescribeHostReservationOfferingsResponse (Maybe [HostOffering])
describeHostReservationOfferingsResponse_offeringSet
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.$ DescribeHostReservationOfferings
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeHostReservationOfferings (Maybe Text)
describeHostReservationOfferings_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeHostReservationOfferings
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeHostReservationOfferingsResponse (Maybe Text)
describeHostReservationOfferingsResponse_nextToken
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
DescribeHostReservationOfferings
where
type
AWSResponse DescribeHostReservationOfferings =
DescribeHostReservationOfferingsResponse
request :: (Service -> Service)
-> DescribeHostReservationOfferings
-> Request DescribeHostReservationOfferings
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 DescribeHostReservationOfferings
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DescribeHostReservationOfferings)))
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 [HostOffering]
-> Int
-> DescribeHostReservationOfferingsResponse
DescribeHostReservationOfferingsResponse'
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
"nextToken")
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
"offeringSet"
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
"item")
)
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
DescribeHostReservationOfferings
where
hashWithSalt :: Int -> DescribeHostReservationOfferings -> Int
hashWithSalt
Int
_salt
DescribeHostReservationOfferings' {Maybe Int
Maybe Natural
Maybe [Filter]
Maybe Text
offeringId :: Maybe Text
nextToken :: Maybe Text
minDuration :: Maybe Int
maxResults :: Maybe Natural
maxDuration :: Maybe Int
filter' :: Maybe [Filter]
$sel:offeringId:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
$sel:nextToken:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
$sel:minDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
$sel:maxResults:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Natural
$sel:maxDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
$sel:filter':DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe [Filter]
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Filter]
filter'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxDuration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
minDuration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
offeringId
instance
Prelude.NFData
DescribeHostReservationOfferings
where
rnf :: DescribeHostReservationOfferings -> ()
rnf DescribeHostReservationOfferings' {Maybe Int
Maybe Natural
Maybe [Filter]
Maybe Text
offeringId :: Maybe Text
nextToken :: Maybe Text
minDuration :: Maybe Int
maxResults :: Maybe Natural
maxDuration :: Maybe Int
filter' :: Maybe [Filter]
$sel:offeringId:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
$sel:nextToken:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
$sel:minDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
$sel:maxResults:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Natural
$sel:maxDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
$sel:filter':DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe [Filter]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [Filter]
filter'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxDuration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
minDuration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
offeringId
instance
Data.ToHeaders
DescribeHostReservationOfferings
where
toHeaders :: DescribeHostReservationOfferings -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath DescribeHostReservationOfferings where
toPath :: DescribeHostReservationOfferings -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DescribeHostReservationOfferings
where
toQuery :: DescribeHostReservationOfferings -> QueryString
toQuery DescribeHostReservationOfferings' {Maybe Int
Maybe Natural
Maybe [Filter]
Maybe Text
offeringId :: Maybe Text
nextToken :: Maybe Text
minDuration :: Maybe Int
maxResults :: Maybe Natural
maxDuration :: Maybe Int
filter' :: Maybe [Filter]
$sel:offeringId:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
$sel:nextToken:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Text
$sel:minDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
$sel:maxResults:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Natural
$sel:maxDuration:DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe Int
$sel:filter':DescribeHostReservationOfferings' :: DescribeHostReservationOfferings -> Maybe [Filter]
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"DescribeHostReservationOfferings" ::
Prelude.ByteString
),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2016-11-15" :: Prelude.ByteString),
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]
filter'),
ByteString
"MaxDuration" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
maxDuration,
ByteString
"MaxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"MinDuration" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
minDuration,
ByteString
"NextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken,
ByteString
"OfferingId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
offeringId
]
data DescribeHostReservationOfferingsResponse = DescribeHostReservationOfferingsResponse'
{
DescribeHostReservationOfferingsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeHostReservationOfferingsResponse -> Maybe [HostOffering]
offeringSet :: Prelude.Maybe [HostOffering],
DescribeHostReservationOfferingsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeHostReservationOfferingsResponse
-> DescribeHostReservationOfferingsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeHostReservationOfferingsResponse
-> DescribeHostReservationOfferingsResponse -> Bool
$c/= :: DescribeHostReservationOfferingsResponse
-> DescribeHostReservationOfferingsResponse -> Bool
== :: DescribeHostReservationOfferingsResponse
-> DescribeHostReservationOfferingsResponse -> Bool
$c== :: DescribeHostReservationOfferingsResponse
-> DescribeHostReservationOfferingsResponse -> Bool
Prelude.Eq, ReadPrec [DescribeHostReservationOfferingsResponse]
ReadPrec DescribeHostReservationOfferingsResponse
Int -> ReadS DescribeHostReservationOfferingsResponse
ReadS [DescribeHostReservationOfferingsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeHostReservationOfferingsResponse]
$creadListPrec :: ReadPrec [DescribeHostReservationOfferingsResponse]
readPrec :: ReadPrec DescribeHostReservationOfferingsResponse
$creadPrec :: ReadPrec DescribeHostReservationOfferingsResponse
readList :: ReadS [DescribeHostReservationOfferingsResponse]
$creadList :: ReadS [DescribeHostReservationOfferingsResponse]
readsPrec :: Int -> ReadS DescribeHostReservationOfferingsResponse
$creadsPrec :: Int -> ReadS DescribeHostReservationOfferingsResponse
Prelude.Read, Int -> DescribeHostReservationOfferingsResponse -> ShowS
[DescribeHostReservationOfferingsResponse] -> ShowS
DescribeHostReservationOfferingsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeHostReservationOfferingsResponse] -> ShowS
$cshowList :: [DescribeHostReservationOfferingsResponse] -> ShowS
show :: DescribeHostReservationOfferingsResponse -> String
$cshow :: DescribeHostReservationOfferingsResponse -> String
showsPrec :: Int -> DescribeHostReservationOfferingsResponse -> ShowS
$cshowsPrec :: Int -> DescribeHostReservationOfferingsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeHostReservationOfferingsResponse x
-> DescribeHostReservationOfferingsResponse
forall x.
DescribeHostReservationOfferingsResponse
-> Rep DescribeHostReservationOfferingsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeHostReservationOfferingsResponse x
-> DescribeHostReservationOfferingsResponse
$cfrom :: forall x.
DescribeHostReservationOfferingsResponse
-> Rep DescribeHostReservationOfferingsResponse x
Prelude.Generic)
newDescribeHostReservationOfferingsResponse ::
Prelude.Int ->
DescribeHostReservationOfferingsResponse
newDescribeHostReservationOfferingsResponse :: Int -> DescribeHostReservationOfferingsResponse
newDescribeHostReservationOfferingsResponse
Int
pHttpStatus_ =
DescribeHostReservationOfferingsResponse'
{ $sel:nextToken:DescribeHostReservationOfferingsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:offeringSet:DescribeHostReservationOfferingsResponse' :: Maybe [HostOffering]
offeringSet = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeHostReservationOfferingsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeHostReservationOfferingsResponse_nextToken :: Lens.Lens' DescribeHostReservationOfferingsResponse (Prelude.Maybe Prelude.Text)
describeHostReservationOfferingsResponse_nextToken :: Lens' DescribeHostReservationOfferingsResponse (Maybe Text)
describeHostReservationOfferingsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferingsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeHostReservationOfferingsResponse' :: DescribeHostReservationOfferingsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeHostReservationOfferingsResponse
s@DescribeHostReservationOfferingsResponse' {} Maybe Text
a -> DescribeHostReservationOfferingsResponse
s {$sel:nextToken:DescribeHostReservationOfferingsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeHostReservationOfferingsResponse)
describeHostReservationOfferingsResponse_offeringSet :: Lens.Lens' DescribeHostReservationOfferingsResponse (Prelude.Maybe [HostOffering])
describeHostReservationOfferingsResponse_offeringSet :: Lens'
DescribeHostReservationOfferingsResponse (Maybe [HostOffering])
describeHostReservationOfferingsResponse_offeringSet = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferingsResponse' {Maybe [HostOffering]
offeringSet :: Maybe [HostOffering]
$sel:offeringSet:DescribeHostReservationOfferingsResponse' :: DescribeHostReservationOfferingsResponse -> Maybe [HostOffering]
offeringSet} -> Maybe [HostOffering]
offeringSet) (\s :: DescribeHostReservationOfferingsResponse
s@DescribeHostReservationOfferingsResponse' {} Maybe [HostOffering]
a -> DescribeHostReservationOfferingsResponse
s {$sel:offeringSet:DescribeHostReservationOfferingsResponse' :: Maybe [HostOffering]
offeringSet = Maybe [HostOffering]
a} :: DescribeHostReservationOfferingsResponse) 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
describeHostReservationOfferingsResponse_httpStatus :: Lens.Lens' DescribeHostReservationOfferingsResponse Prelude.Int
describeHostReservationOfferingsResponse_httpStatus :: Lens' DescribeHostReservationOfferingsResponse Int
describeHostReservationOfferingsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHostReservationOfferingsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeHostReservationOfferingsResponse' :: DescribeHostReservationOfferingsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeHostReservationOfferingsResponse
s@DescribeHostReservationOfferingsResponse' {} Int
a -> DescribeHostReservationOfferingsResponse
s {$sel:httpStatus:DescribeHostReservationOfferingsResponse' :: Int
httpStatus = Int
a} :: DescribeHostReservationOfferingsResponse)
instance
Prelude.NFData
DescribeHostReservationOfferingsResponse
where
rnf :: DescribeHostReservationOfferingsResponse -> ()
rnf DescribeHostReservationOfferingsResponse' {Int
Maybe [HostOffering]
Maybe Text
httpStatus :: Int
offeringSet :: Maybe [HostOffering]
nextToken :: Maybe Text
$sel:httpStatus:DescribeHostReservationOfferingsResponse' :: DescribeHostReservationOfferingsResponse -> Int
$sel:offeringSet:DescribeHostReservationOfferingsResponse' :: DescribeHostReservationOfferingsResponse -> Maybe [HostOffering]
$sel:nextToken:DescribeHostReservationOfferingsResponse' :: DescribeHostReservationOfferingsResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [HostOffering]
offeringSet
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus