{-# 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.ElasticSearch.UpgradeElasticsearchDomain
(
UpgradeElasticsearchDomain (..),
newUpgradeElasticsearchDomain,
upgradeElasticsearchDomain_performCheckOnly,
upgradeElasticsearchDomain_domainName,
upgradeElasticsearchDomain_targetVersion,
UpgradeElasticsearchDomainResponse (..),
newUpgradeElasticsearchDomainResponse,
upgradeElasticsearchDomainResponse_changeProgressDetails,
upgradeElasticsearchDomainResponse_domainName,
upgradeElasticsearchDomainResponse_performCheckOnly,
upgradeElasticsearchDomainResponse_targetVersion,
upgradeElasticsearchDomainResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.ElasticSearch.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data UpgradeElasticsearchDomain = UpgradeElasticsearchDomain'
{
UpgradeElasticsearchDomain -> Maybe Bool
performCheckOnly :: Prelude.Maybe Prelude.Bool,
UpgradeElasticsearchDomain -> Text
domainName :: Prelude.Text,
UpgradeElasticsearchDomain -> Text
targetVersion :: Prelude.Text
}
deriving (UpgradeElasticsearchDomain -> UpgradeElasticsearchDomain -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpgradeElasticsearchDomain -> UpgradeElasticsearchDomain -> Bool
$c/= :: UpgradeElasticsearchDomain -> UpgradeElasticsearchDomain -> Bool
== :: UpgradeElasticsearchDomain -> UpgradeElasticsearchDomain -> Bool
$c== :: UpgradeElasticsearchDomain -> UpgradeElasticsearchDomain -> Bool
Prelude.Eq, ReadPrec [UpgradeElasticsearchDomain]
ReadPrec UpgradeElasticsearchDomain
Int -> ReadS UpgradeElasticsearchDomain
ReadS [UpgradeElasticsearchDomain]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpgradeElasticsearchDomain]
$creadListPrec :: ReadPrec [UpgradeElasticsearchDomain]
readPrec :: ReadPrec UpgradeElasticsearchDomain
$creadPrec :: ReadPrec UpgradeElasticsearchDomain
readList :: ReadS [UpgradeElasticsearchDomain]
$creadList :: ReadS [UpgradeElasticsearchDomain]
readsPrec :: Int -> ReadS UpgradeElasticsearchDomain
$creadsPrec :: Int -> ReadS UpgradeElasticsearchDomain
Prelude.Read, Int -> UpgradeElasticsearchDomain -> ShowS
[UpgradeElasticsearchDomain] -> ShowS
UpgradeElasticsearchDomain -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpgradeElasticsearchDomain] -> ShowS
$cshowList :: [UpgradeElasticsearchDomain] -> ShowS
show :: UpgradeElasticsearchDomain -> String
$cshow :: UpgradeElasticsearchDomain -> String
showsPrec :: Int -> UpgradeElasticsearchDomain -> ShowS
$cshowsPrec :: Int -> UpgradeElasticsearchDomain -> ShowS
Prelude.Show, forall x.
Rep UpgradeElasticsearchDomain x -> UpgradeElasticsearchDomain
forall x.
UpgradeElasticsearchDomain -> Rep UpgradeElasticsearchDomain x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpgradeElasticsearchDomain x -> UpgradeElasticsearchDomain
$cfrom :: forall x.
UpgradeElasticsearchDomain -> Rep UpgradeElasticsearchDomain x
Prelude.Generic)
newUpgradeElasticsearchDomain ::
Prelude.Text ->
Prelude.Text ->
UpgradeElasticsearchDomain
newUpgradeElasticsearchDomain :: Text -> Text -> UpgradeElasticsearchDomain
newUpgradeElasticsearchDomain
Text
pDomainName_
Text
pTargetVersion_ =
UpgradeElasticsearchDomain'
{ $sel:performCheckOnly:UpgradeElasticsearchDomain' :: Maybe Bool
performCheckOnly =
forall a. Maybe a
Prelude.Nothing,
$sel:domainName:UpgradeElasticsearchDomain' :: Text
domainName = Text
pDomainName_,
$sel:targetVersion:UpgradeElasticsearchDomain' :: Text
targetVersion = Text
pTargetVersion_
}
upgradeElasticsearchDomain_performCheckOnly :: Lens.Lens' UpgradeElasticsearchDomain (Prelude.Maybe Prelude.Bool)
upgradeElasticsearchDomain_performCheckOnly :: Lens' UpgradeElasticsearchDomain (Maybe Bool)
upgradeElasticsearchDomain_performCheckOnly = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomain' {Maybe Bool
performCheckOnly :: Maybe Bool
$sel:performCheckOnly:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Maybe Bool
performCheckOnly} -> Maybe Bool
performCheckOnly) (\s :: UpgradeElasticsearchDomain
s@UpgradeElasticsearchDomain' {} Maybe Bool
a -> UpgradeElasticsearchDomain
s {$sel:performCheckOnly:UpgradeElasticsearchDomain' :: Maybe Bool
performCheckOnly = Maybe Bool
a} :: UpgradeElasticsearchDomain)
upgradeElasticsearchDomain_domainName :: Lens.Lens' UpgradeElasticsearchDomain Prelude.Text
upgradeElasticsearchDomain_domainName :: Lens' UpgradeElasticsearchDomain Text
upgradeElasticsearchDomain_domainName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomain' {Text
domainName :: Text
$sel:domainName:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
domainName} -> Text
domainName) (\s :: UpgradeElasticsearchDomain
s@UpgradeElasticsearchDomain' {} Text
a -> UpgradeElasticsearchDomain
s {$sel:domainName:UpgradeElasticsearchDomain' :: Text
domainName = Text
a} :: UpgradeElasticsearchDomain)
upgradeElasticsearchDomain_targetVersion :: Lens.Lens' UpgradeElasticsearchDomain Prelude.Text
upgradeElasticsearchDomain_targetVersion :: Lens' UpgradeElasticsearchDomain Text
upgradeElasticsearchDomain_targetVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomain' {Text
targetVersion :: Text
$sel:targetVersion:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
targetVersion} -> Text
targetVersion) (\s :: UpgradeElasticsearchDomain
s@UpgradeElasticsearchDomain' {} Text
a -> UpgradeElasticsearchDomain
s {$sel:targetVersion:UpgradeElasticsearchDomain' :: Text
targetVersion = Text
a} :: UpgradeElasticsearchDomain)
instance Core.AWSRequest UpgradeElasticsearchDomain where
type
AWSResponse UpgradeElasticsearchDomain =
UpgradeElasticsearchDomainResponse
request :: (Service -> Service)
-> UpgradeElasticsearchDomain -> Request UpgradeElasticsearchDomain
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy UpgradeElasticsearchDomain
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse UpgradeElasticsearchDomain)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe ChangeProgressDetails
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Int
-> UpgradeElasticsearchDomainResponse
UpgradeElasticsearchDomainResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"ChangeProgressDetails")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"DomainName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"PerformCheckOnly")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"TargetVersion")
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 UpgradeElasticsearchDomain where
hashWithSalt :: Int -> UpgradeElasticsearchDomain -> Int
hashWithSalt Int
_salt UpgradeElasticsearchDomain' {Maybe Bool
Text
targetVersion :: Text
domainName :: Text
performCheckOnly :: Maybe Bool
$sel:targetVersion:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
$sel:domainName:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
$sel:performCheckOnly:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
performCheckOnly
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
domainName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
targetVersion
instance Prelude.NFData UpgradeElasticsearchDomain where
rnf :: UpgradeElasticsearchDomain -> ()
rnf UpgradeElasticsearchDomain' {Maybe Bool
Text
targetVersion :: Text
domainName :: Text
performCheckOnly :: Maybe Bool
$sel:targetVersion:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
$sel:domainName:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
$sel:performCheckOnly:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
performCheckOnly
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
domainName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
targetVersion
instance Data.ToHeaders UpgradeElasticsearchDomain where
toHeaders :: UpgradeElasticsearchDomain -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToJSON UpgradeElasticsearchDomain where
toJSON :: UpgradeElasticsearchDomain -> Value
toJSON UpgradeElasticsearchDomain' {Maybe Bool
Text
targetVersion :: Text
domainName :: Text
performCheckOnly :: Maybe Bool
$sel:targetVersion:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
$sel:domainName:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Text
$sel:performCheckOnly:UpgradeElasticsearchDomain' :: UpgradeElasticsearchDomain -> Maybe Bool
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"PerformCheckOnly" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
performCheckOnly,
forall a. a -> Maybe a
Prelude.Just (Key
"DomainName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
domainName),
forall a. a -> Maybe a
Prelude.Just
(Key
"TargetVersion" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
targetVersion)
]
)
instance Data.ToPath UpgradeElasticsearchDomain where
toPath :: UpgradeElasticsearchDomain -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/2015-01-01/es/upgradeDomain"
instance Data.ToQuery UpgradeElasticsearchDomain where
toQuery :: UpgradeElasticsearchDomain -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpgradeElasticsearchDomainResponse = UpgradeElasticsearchDomainResponse'
{ UpgradeElasticsearchDomainResponse -> Maybe ChangeProgressDetails
changeProgressDetails :: Prelude.Maybe ChangeProgressDetails,
UpgradeElasticsearchDomainResponse -> Maybe Text
domainName :: Prelude.Maybe Prelude.Text,
UpgradeElasticsearchDomainResponse -> Maybe Bool
performCheckOnly :: Prelude.Maybe Prelude.Bool,
UpgradeElasticsearchDomainResponse -> Maybe Text
targetVersion :: Prelude.Maybe Prelude.Text,
UpgradeElasticsearchDomainResponse -> Int
httpStatus :: Prelude.Int
}
deriving (UpgradeElasticsearchDomainResponse
-> UpgradeElasticsearchDomainResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpgradeElasticsearchDomainResponse
-> UpgradeElasticsearchDomainResponse -> Bool
$c/= :: UpgradeElasticsearchDomainResponse
-> UpgradeElasticsearchDomainResponse -> Bool
== :: UpgradeElasticsearchDomainResponse
-> UpgradeElasticsearchDomainResponse -> Bool
$c== :: UpgradeElasticsearchDomainResponse
-> UpgradeElasticsearchDomainResponse -> Bool
Prelude.Eq, ReadPrec [UpgradeElasticsearchDomainResponse]
ReadPrec UpgradeElasticsearchDomainResponse
Int -> ReadS UpgradeElasticsearchDomainResponse
ReadS [UpgradeElasticsearchDomainResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpgradeElasticsearchDomainResponse]
$creadListPrec :: ReadPrec [UpgradeElasticsearchDomainResponse]
readPrec :: ReadPrec UpgradeElasticsearchDomainResponse
$creadPrec :: ReadPrec UpgradeElasticsearchDomainResponse
readList :: ReadS [UpgradeElasticsearchDomainResponse]
$creadList :: ReadS [UpgradeElasticsearchDomainResponse]
readsPrec :: Int -> ReadS UpgradeElasticsearchDomainResponse
$creadsPrec :: Int -> ReadS UpgradeElasticsearchDomainResponse
Prelude.Read, Int -> UpgradeElasticsearchDomainResponse -> ShowS
[UpgradeElasticsearchDomainResponse] -> ShowS
UpgradeElasticsearchDomainResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpgradeElasticsearchDomainResponse] -> ShowS
$cshowList :: [UpgradeElasticsearchDomainResponse] -> ShowS
show :: UpgradeElasticsearchDomainResponse -> String
$cshow :: UpgradeElasticsearchDomainResponse -> String
showsPrec :: Int -> UpgradeElasticsearchDomainResponse -> ShowS
$cshowsPrec :: Int -> UpgradeElasticsearchDomainResponse -> ShowS
Prelude.Show, forall x.
Rep UpgradeElasticsearchDomainResponse x
-> UpgradeElasticsearchDomainResponse
forall x.
UpgradeElasticsearchDomainResponse
-> Rep UpgradeElasticsearchDomainResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpgradeElasticsearchDomainResponse x
-> UpgradeElasticsearchDomainResponse
$cfrom :: forall x.
UpgradeElasticsearchDomainResponse
-> Rep UpgradeElasticsearchDomainResponse x
Prelude.Generic)
newUpgradeElasticsearchDomainResponse ::
Prelude.Int ->
UpgradeElasticsearchDomainResponse
newUpgradeElasticsearchDomainResponse :: Int -> UpgradeElasticsearchDomainResponse
newUpgradeElasticsearchDomainResponse Int
pHttpStatus_ =
UpgradeElasticsearchDomainResponse'
{ $sel:changeProgressDetails:UpgradeElasticsearchDomainResponse' :: Maybe ChangeProgressDetails
changeProgressDetails =
forall a. Maybe a
Prelude.Nothing,
$sel:domainName:UpgradeElasticsearchDomainResponse' :: Maybe Text
domainName = forall a. Maybe a
Prelude.Nothing,
$sel:performCheckOnly:UpgradeElasticsearchDomainResponse' :: Maybe Bool
performCheckOnly = forall a. Maybe a
Prelude.Nothing,
$sel:targetVersion:UpgradeElasticsearchDomainResponse' :: Maybe Text
targetVersion = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:UpgradeElasticsearchDomainResponse' :: Int
httpStatus = Int
pHttpStatus_
}
upgradeElasticsearchDomainResponse_changeProgressDetails :: Lens.Lens' UpgradeElasticsearchDomainResponse (Prelude.Maybe ChangeProgressDetails)
upgradeElasticsearchDomainResponse_changeProgressDetails :: Lens'
UpgradeElasticsearchDomainResponse (Maybe ChangeProgressDetails)
upgradeElasticsearchDomainResponse_changeProgressDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomainResponse' {Maybe ChangeProgressDetails
changeProgressDetails :: Maybe ChangeProgressDetails
$sel:changeProgressDetails:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe ChangeProgressDetails
changeProgressDetails} -> Maybe ChangeProgressDetails
changeProgressDetails) (\s :: UpgradeElasticsearchDomainResponse
s@UpgradeElasticsearchDomainResponse' {} Maybe ChangeProgressDetails
a -> UpgradeElasticsearchDomainResponse
s {$sel:changeProgressDetails:UpgradeElasticsearchDomainResponse' :: Maybe ChangeProgressDetails
changeProgressDetails = Maybe ChangeProgressDetails
a} :: UpgradeElasticsearchDomainResponse)
upgradeElasticsearchDomainResponse_domainName :: Lens.Lens' UpgradeElasticsearchDomainResponse (Prelude.Maybe Prelude.Text)
upgradeElasticsearchDomainResponse_domainName :: Lens' UpgradeElasticsearchDomainResponse (Maybe Text)
upgradeElasticsearchDomainResponse_domainName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomainResponse' {Maybe Text
domainName :: Maybe Text
$sel:domainName:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe Text
domainName} -> Maybe Text
domainName) (\s :: UpgradeElasticsearchDomainResponse
s@UpgradeElasticsearchDomainResponse' {} Maybe Text
a -> UpgradeElasticsearchDomainResponse
s {$sel:domainName:UpgradeElasticsearchDomainResponse' :: Maybe Text
domainName = Maybe Text
a} :: UpgradeElasticsearchDomainResponse)
upgradeElasticsearchDomainResponse_performCheckOnly :: Lens.Lens' UpgradeElasticsearchDomainResponse (Prelude.Maybe Prelude.Bool)
upgradeElasticsearchDomainResponse_performCheckOnly :: Lens' UpgradeElasticsearchDomainResponse (Maybe Bool)
upgradeElasticsearchDomainResponse_performCheckOnly = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomainResponse' {Maybe Bool
performCheckOnly :: Maybe Bool
$sel:performCheckOnly:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe Bool
performCheckOnly} -> Maybe Bool
performCheckOnly) (\s :: UpgradeElasticsearchDomainResponse
s@UpgradeElasticsearchDomainResponse' {} Maybe Bool
a -> UpgradeElasticsearchDomainResponse
s {$sel:performCheckOnly:UpgradeElasticsearchDomainResponse' :: Maybe Bool
performCheckOnly = Maybe Bool
a} :: UpgradeElasticsearchDomainResponse)
upgradeElasticsearchDomainResponse_targetVersion :: Lens.Lens' UpgradeElasticsearchDomainResponse (Prelude.Maybe Prelude.Text)
upgradeElasticsearchDomainResponse_targetVersion :: Lens' UpgradeElasticsearchDomainResponse (Maybe Text)
upgradeElasticsearchDomainResponse_targetVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomainResponse' {Maybe Text
targetVersion :: Maybe Text
$sel:targetVersion:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe Text
targetVersion} -> Maybe Text
targetVersion) (\s :: UpgradeElasticsearchDomainResponse
s@UpgradeElasticsearchDomainResponse' {} Maybe Text
a -> UpgradeElasticsearchDomainResponse
s {$sel:targetVersion:UpgradeElasticsearchDomainResponse' :: Maybe Text
targetVersion = Maybe Text
a} :: UpgradeElasticsearchDomainResponse)
upgradeElasticsearchDomainResponse_httpStatus :: Lens.Lens' UpgradeElasticsearchDomainResponse Prelude.Int
upgradeElasticsearchDomainResponse_httpStatus :: Lens' UpgradeElasticsearchDomainResponse Int
upgradeElasticsearchDomainResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpgradeElasticsearchDomainResponse' {Int
httpStatus :: Int
$sel:httpStatus:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: UpgradeElasticsearchDomainResponse
s@UpgradeElasticsearchDomainResponse' {} Int
a -> UpgradeElasticsearchDomainResponse
s {$sel:httpStatus:UpgradeElasticsearchDomainResponse' :: Int
httpStatus = Int
a} :: UpgradeElasticsearchDomainResponse)
instance
Prelude.NFData
UpgradeElasticsearchDomainResponse
where
rnf :: UpgradeElasticsearchDomainResponse -> ()
rnf UpgradeElasticsearchDomainResponse' {Int
Maybe Bool
Maybe Text
Maybe ChangeProgressDetails
httpStatus :: Int
targetVersion :: Maybe Text
performCheckOnly :: Maybe Bool
domainName :: Maybe Text
changeProgressDetails :: Maybe ChangeProgressDetails
$sel:httpStatus:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Int
$sel:targetVersion:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe Text
$sel:performCheckOnly:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe Bool
$sel:domainName:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe Text
$sel:changeProgressDetails:UpgradeElasticsearchDomainResponse' :: UpgradeElasticsearchDomainResponse -> Maybe ChangeProgressDetails
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ChangeProgressDetails
changeProgressDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
domainName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
performCheckOnly
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
targetVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus