{-# 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.CloudHSM.DescribeHsm
(
DescribeHsm (..),
newDescribeHsm,
describeHsm_hsmArn,
describeHsm_hsmSerialNumber,
DescribeHsmResponse (..),
newDescribeHsmResponse,
describeHsmResponse_availabilityZone,
describeHsmResponse_eniId,
describeHsmResponse_eniIp,
describeHsmResponse_hsmArn,
describeHsmResponse_hsmType,
describeHsmResponse_iamRoleArn,
describeHsmResponse_partitions,
describeHsmResponse_serialNumber,
describeHsmResponse_serverCertLastUpdated,
describeHsmResponse_serverCertUri,
describeHsmResponse_softwareVersion,
describeHsmResponse_sshKeyLastUpdated,
describeHsmResponse_sshPublicKey,
describeHsmResponse_status,
describeHsmResponse_statusDetails,
describeHsmResponse_subnetId,
describeHsmResponse_subscriptionEndDate,
describeHsmResponse_subscriptionStartDate,
describeHsmResponse_subscriptionType,
describeHsmResponse_vendorName,
describeHsmResponse_vpcId,
describeHsmResponse_httpStatus,
)
where
import Amazonka.CloudHSM.Types
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
data DescribeHsm = DescribeHsm'
{
DescribeHsm -> Maybe Text
hsmArn :: Prelude.Maybe Prelude.Text,
DescribeHsm -> Maybe Text
hsmSerialNumber :: Prelude.Maybe Prelude.Text
}
deriving (DescribeHsm -> DescribeHsm -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeHsm -> DescribeHsm -> Bool
$c/= :: DescribeHsm -> DescribeHsm -> Bool
== :: DescribeHsm -> DescribeHsm -> Bool
$c== :: DescribeHsm -> DescribeHsm -> Bool
Prelude.Eq, ReadPrec [DescribeHsm]
ReadPrec DescribeHsm
Int -> ReadS DescribeHsm
ReadS [DescribeHsm]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeHsm]
$creadListPrec :: ReadPrec [DescribeHsm]
readPrec :: ReadPrec DescribeHsm
$creadPrec :: ReadPrec DescribeHsm
readList :: ReadS [DescribeHsm]
$creadList :: ReadS [DescribeHsm]
readsPrec :: Int -> ReadS DescribeHsm
$creadsPrec :: Int -> ReadS DescribeHsm
Prelude.Read, Int -> DescribeHsm -> ShowS
[DescribeHsm] -> ShowS
DescribeHsm -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeHsm] -> ShowS
$cshowList :: [DescribeHsm] -> ShowS
show :: DescribeHsm -> String
$cshow :: DescribeHsm -> String
showsPrec :: Int -> DescribeHsm -> ShowS
$cshowsPrec :: Int -> DescribeHsm -> ShowS
Prelude.Show, forall x. Rep DescribeHsm x -> DescribeHsm
forall x. DescribeHsm -> Rep DescribeHsm x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeHsm x -> DescribeHsm
$cfrom :: forall x. DescribeHsm -> Rep DescribeHsm x
Prelude.Generic)
newDescribeHsm ::
DescribeHsm
newDescribeHsm :: DescribeHsm
newDescribeHsm =
DescribeHsm'
{ $sel:hsmArn:DescribeHsm' :: Maybe Text
hsmArn = forall a. Maybe a
Prelude.Nothing,
$sel:hsmSerialNumber:DescribeHsm' :: Maybe Text
hsmSerialNumber = forall a. Maybe a
Prelude.Nothing
}
describeHsm_hsmArn :: Lens.Lens' DescribeHsm (Prelude.Maybe Prelude.Text)
describeHsm_hsmArn :: Lens' DescribeHsm (Maybe Text)
describeHsm_hsmArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsm' {Maybe Text
hsmArn :: Maybe Text
$sel:hsmArn:DescribeHsm' :: DescribeHsm -> Maybe Text
hsmArn} -> Maybe Text
hsmArn) (\s :: DescribeHsm
s@DescribeHsm' {} Maybe Text
a -> DescribeHsm
s {$sel:hsmArn:DescribeHsm' :: Maybe Text
hsmArn = Maybe Text
a} :: DescribeHsm)
describeHsm_hsmSerialNumber :: Lens.Lens' DescribeHsm (Prelude.Maybe Prelude.Text)
describeHsm_hsmSerialNumber :: Lens' DescribeHsm (Maybe Text)
describeHsm_hsmSerialNumber = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsm' {Maybe Text
hsmSerialNumber :: Maybe Text
$sel:hsmSerialNumber:DescribeHsm' :: DescribeHsm -> Maybe Text
hsmSerialNumber} -> Maybe Text
hsmSerialNumber) (\s :: DescribeHsm
s@DescribeHsm' {} Maybe Text
a -> DescribeHsm
s {$sel:hsmSerialNumber:DescribeHsm' :: Maybe Text
hsmSerialNumber = Maybe Text
a} :: DescribeHsm)
instance Core.AWSRequest DescribeHsm where
type AWSResponse DescribeHsm = DescribeHsmResponse
request :: (Service -> Service) -> DescribeHsm -> Request DescribeHsm
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 DescribeHsm
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse DescribeHsm)))
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 Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe HsmStatus
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe SubscriptionType
-> Maybe Text
-> Maybe Text
-> Int
-> DescribeHsmResponse
DescribeHsmResponse'
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
"AvailabilityZone")
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
"EniId")
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
"EniIp")
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
"HsmArn")
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
"HsmType")
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
"IamRoleArn")
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
"Partitions" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
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
"SerialNumber")
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
"ServerCertLastUpdated")
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
"ServerCertUri")
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
"SoftwareVersion")
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
"SshKeyLastUpdated")
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
"SshPublicKey")
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
"Status")
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
"StatusDetails")
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
"SubnetId")
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
"SubscriptionEndDate")
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
"SubscriptionStartDate")
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
"SubscriptionType")
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
"VendorName")
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
"VpcId")
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 DescribeHsm where
hashWithSalt :: Int -> DescribeHsm -> Int
hashWithSalt Int
_salt DescribeHsm' {Maybe Text
hsmSerialNumber :: Maybe Text
hsmArn :: Maybe Text
$sel:hsmSerialNumber:DescribeHsm' :: DescribeHsm -> Maybe Text
$sel:hsmArn:DescribeHsm' :: DescribeHsm -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
hsmArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
hsmSerialNumber
instance Prelude.NFData DescribeHsm where
rnf :: DescribeHsm -> ()
rnf DescribeHsm' {Maybe Text
hsmSerialNumber :: Maybe Text
hsmArn :: Maybe Text
$sel:hsmSerialNumber:DescribeHsm' :: DescribeHsm -> Maybe Text
$sel:hsmArn:DescribeHsm' :: DescribeHsm -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hsmArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hsmSerialNumber
instance Data.ToHeaders DescribeHsm where
toHeaders :: DescribeHsm -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"CloudHsmFrontendService.DescribeHsm" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON DescribeHsm where
toJSON :: DescribeHsm -> Value
toJSON DescribeHsm' {Maybe Text
hsmSerialNumber :: Maybe Text
hsmArn :: Maybe Text
$sel:hsmSerialNumber:DescribeHsm' :: DescribeHsm -> Maybe Text
$sel:hsmArn:DescribeHsm' :: DescribeHsm -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"HsmArn" 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 Text
hsmArn,
(Key
"HsmSerialNumber" 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 Text
hsmSerialNumber
]
)
instance Data.ToPath DescribeHsm where
toPath :: DescribeHsm -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeHsm where
toQuery :: DescribeHsm -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeHsmResponse = DescribeHsmResponse'
{
DescribeHsmResponse -> Maybe Text
availabilityZone :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
eniId :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
eniIp :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
hsmArn :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
hsmType :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
iamRoleArn :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe [Text]
partitions :: Prelude.Maybe [Prelude.Text],
DescribeHsmResponse -> Maybe Text
serialNumber :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
serverCertLastUpdated :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
serverCertUri :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
softwareVersion :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
sshKeyLastUpdated :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
sshPublicKey :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe HsmStatus
status :: Prelude.Maybe HsmStatus,
DescribeHsmResponse -> Maybe Text
statusDetails :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
subnetId :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
subscriptionEndDate :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
subscriptionStartDate :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe SubscriptionType
subscriptionType :: Prelude.Maybe SubscriptionType,
DescribeHsmResponse -> Maybe Text
vendorName :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Maybe Text
vpcId :: Prelude.Maybe Prelude.Text,
DescribeHsmResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeHsmResponse -> DescribeHsmResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeHsmResponse -> DescribeHsmResponse -> Bool
$c/= :: DescribeHsmResponse -> DescribeHsmResponse -> Bool
== :: DescribeHsmResponse -> DescribeHsmResponse -> Bool
$c== :: DescribeHsmResponse -> DescribeHsmResponse -> Bool
Prelude.Eq, ReadPrec [DescribeHsmResponse]
ReadPrec DescribeHsmResponse
Int -> ReadS DescribeHsmResponse
ReadS [DescribeHsmResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeHsmResponse]
$creadListPrec :: ReadPrec [DescribeHsmResponse]
readPrec :: ReadPrec DescribeHsmResponse
$creadPrec :: ReadPrec DescribeHsmResponse
readList :: ReadS [DescribeHsmResponse]
$creadList :: ReadS [DescribeHsmResponse]
readsPrec :: Int -> ReadS DescribeHsmResponse
$creadsPrec :: Int -> ReadS DescribeHsmResponse
Prelude.Read, Int -> DescribeHsmResponse -> ShowS
[DescribeHsmResponse] -> ShowS
DescribeHsmResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeHsmResponse] -> ShowS
$cshowList :: [DescribeHsmResponse] -> ShowS
show :: DescribeHsmResponse -> String
$cshow :: DescribeHsmResponse -> String
showsPrec :: Int -> DescribeHsmResponse -> ShowS
$cshowsPrec :: Int -> DescribeHsmResponse -> ShowS
Prelude.Show, forall x. Rep DescribeHsmResponse x -> DescribeHsmResponse
forall x. DescribeHsmResponse -> Rep DescribeHsmResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeHsmResponse x -> DescribeHsmResponse
$cfrom :: forall x. DescribeHsmResponse -> Rep DescribeHsmResponse x
Prelude.Generic)
newDescribeHsmResponse ::
Prelude.Int ->
DescribeHsmResponse
newDescribeHsmResponse :: Int -> DescribeHsmResponse
newDescribeHsmResponse Int
pHttpStatus_ =
DescribeHsmResponse'
{ $sel:availabilityZone:DescribeHsmResponse' :: Maybe Text
availabilityZone =
forall a. Maybe a
Prelude.Nothing,
$sel:eniId:DescribeHsmResponse' :: Maybe Text
eniId = forall a. Maybe a
Prelude.Nothing,
$sel:eniIp:DescribeHsmResponse' :: Maybe Text
eniIp = forall a. Maybe a
Prelude.Nothing,
$sel:hsmArn:DescribeHsmResponse' :: Maybe Text
hsmArn = forall a. Maybe a
Prelude.Nothing,
$sel:hsmType:DescribeHsmResponse' :: Maybe Text
hsmType = forall a. Maybe a
Prelude.Nothing,
$sel:iamRoleArn:DescribeHsmResponse' :: Maybe Text
iamRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:partitions:DescribeHsmResponse' :: Maybe [Text]
partitions = forall a. Maybe a
Prelude.Nothing,
$sel:serialNumber:DescribeHsmResponse' :: Maybe Text
serialNumber = forall a. Maybe a
Prelude.Nothing,
$sel:serverCertLastUpdated:DescribeHsmResponse' :: Maybe Text
serverCertLastUpdated = forall a. Maybe a
Prelude.Nothing,
$sel:serverCertUri:DescribeHsmResponse' :: Maybe Text
serverCertUri = forall a. Maybe a
Prelude.Nothing,
$sel:softwareVersion:DescribeHsmResponse' :: Maybe Text
softwareVersion = forall a. Maybe a
Prelude.Nothing,
$sel:sshKeyLastUpdated:DescribeHsmResponse' :: Maybe Text
sshKeyLastUpdated = forall a. Maybe a
Prelude.Nothing,
$sel:sshPublicKey:DescribeHsmResponse' :: Maybe Text
sshPublicKey = forall a. Maybe a
Prelude.Nothing,
$sel:status:DescribeHsmResponse' :: Maybe HsmStatus
status = forall a. Maybe a
Prelude.Nothing,
$sel:statusDetails:DescribeHsmResponse' :: Maybe Text
statusDetails = forall a. Maybe a
Prelude.Nothing,
$sel:subnetId:DescribeHsmResponse' :: Maybe Text
subnetId = forall a. Maybe a
Prelude.Nothing,
$sel:subscriptionEndDate:DescribeHsmResponse' :: Maybe Text
subscriptionEndDate = forall a. Maybe a
Prelude.Nothing,
$sel:subscriptionStartDate:DescribeHsmResponse' :: Maybe Text
subscriptionStartDate = forall a. Maybe a
Prelude.Nothing,
$sel:subscriptionType:DescribeHsmResponse' :: Maybe SubscriptionType
subscriptionType = forall a. Maybe a
Prelude.Nothing,
$sel:vendorName:DescribeHsmResponse' :: Maybe Text
vendorName = forall a. Maybe a
Prelude.Nothing,
$sel:vpcId:DescribeHsmResponse' :: Maybe Text
vpcId = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeHsmResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeHsmResponse_availabilityZone :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_availabilityZone :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_availabilityZone = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
availabilityZone :: Maybe Text
$sel:availabilityZone:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
availabilityZone} -> Maybe Text
availabilityZone) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:availabilityZone:DescribeHsmResponse' :: Maybe Text
availabilityZone = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_eniId :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_eniId :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_eniId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
eniId :: Maybe Text
$sel:eniId:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
eniId} -> Maybe Text
eniId) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:eniId:DescribeHsmResponse' :: Maybe Text
eniId = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_eniIp :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_eniIp :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_eniIp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
eniIp :: Maybe Text
$sel:eniIp:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
eniIp} -> Maybe Text
eniIp) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:eniIp:DescribeHsmResponse' :: Maybe Text
eniIp = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_hsmArn :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_hsmArn :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_hsmArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
hsmArn :: Maybe Text
$sel:hsmArn:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
hsmArn} -> Maybe Text
hsmArn) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:hsmArn:DescribeHsmResponse' :: Maybe Text
hsmArn = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_hsmType :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_hsmType :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_hsmType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
hsmType :: Maybe Text
$sel:hsmType:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
hsmType} -> Maybe Text
hsmType) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:hsmType:DescribeHsmResponse' :: Maybe Text
hsmType = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_iamRoleArn :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_iamRoleArn :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_iamRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
iamRoleArn :: Maybe Text
$sel:iamRoleArn:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
iamRoleArn} -> Maybe Text
iamRoleArn) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:iamRoleArn:DescribeHsmResponse' :: Maybe Text
iamRoleArn = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_partitions :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe [Prelude.Text])
describeHsmResponse_partitions :: Lens' DescribeHsmResponse (Maybe [Text])
describeHsmResponse_partitions = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe [Text]
partitions :: Maybe [Text]
$sel:partitions:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe [Text]
partitions} -> Maybe [Text]
partitions) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe [Text]
a -> DescribeHsmResponse
s {$sel:partitions:DescribeHsmResponse' :: Maybe [Text]
partitions = Maybe [Text]
a} :: DescribeHsmResponse) 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
describeHsmResponse_serialNumber :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_serialNumber :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_serialNumber = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
serialNumber :: Maybe Text
$sel:serialNumber:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
serialNumber} -> Maybe Text
serialNumber) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:serialNumber:DescribeHsmResponse' :: Maybe Text
serialNumber = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_serverCertLastUpdated :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_serverCertLastUpdated :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_serverCertLastUpdated = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
serverCertLastUpdated :: Maybe Text
$sel:serverCertLastUpdated:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
serverCertLastUpdated} -> Maybe Text
serverCertLastUpdated) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:serverCertLastUpdated:DescribeHsmResponse' :: Maybe Text
serverCertLastUpdated = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_serverCertUri :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_serverCertUri :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_serverCertUri = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
serverCertUri :: Maybe Text
$sel:serverCertUri:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
serverCertUri} -> Maybe Text
serverCertUri) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:serverCertUri:DescribeHsmResponse' :: Maybe Text
serverCertUri = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_softwareVersion :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_softwareVersion :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_softwareVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
softwareVersion :: Maybe Text
$sel:softwareVersion:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
softwareVersion} -> Maybe Text
softwareVersion) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:softwareVersion:DescribeHsmResponse' :: Maybe Text
softwareVersion = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_sshKeyLastUpdated :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_sshKeyLastUpdated :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_sshKeyLastUpdated = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
sshKeyLastUpdated :: Maybe Text
$sel:sshKeyLastUpdated:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
sshKeyLastUpdated} -> Maybe Text
sshKeyLastUpdated) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:sshKeyLastUpdated:DescribeHsmResponse' :: Maybe Text
sshKeyLastUpdated = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_sshPublicKey :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_sshPublicKey :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_sshPublicKey = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
sshPublicKey :: Maybe Text
$sel:sshPublicKey:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
sshPublicKey} -> Maybe Text
sshPublicKey) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:sshPublicKey:DescribeHsmResponse' :: Maybe Text
sshPublicKey = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_status :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe HsmStatus)
describeHsmResponse_status :: Lens' DescribeHsmResponse (Maybe HsmStatus)
describeHsmResponse_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe HsmStatus
status :: Maybe HsmStatus
$sel:status:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe HsmStatus
status} -> Maybe HsmStatus
status) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe HsmStatus
a -> DescribeHsmResponse
s {$sel:status:DescribeHsmResponse' :: Maybe HsmStatus
status = Maybe HsmStatus
a} :: DescribeHsmResponse)
describeHsmResponse_statusDetails :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_statusDetails :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_statusDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
statusDetails :: Maybe Text
$sel:statusDetails:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
statusDetails} -> Maybe Text
statusDetails) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:statusDetails:DescribeHsmResponse' :: Maybe Text
statusDetails = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_subnetId :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_subnetId :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_subnetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
subnetId :: Maybe Text
$sel:subnetId:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
subnetId} -> Maybe Text
subnetId) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:subnetId:DescribeHsmResponse' :: Maybe Text
subnetId = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_subscriptionEndDate :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_subscriptionEndDate :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_subscriptionEndDate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
subscriptionEndDate :: Maybe Text
$sel:subscriptionEndDate:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
subscriptionEndDate} -> Maybe Text
subscriptionEndDate) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:subscriptionEndDate:DescribeHsmResponse' :: Maybe Text
subscriptionEndDate = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_subscriptionStartDate :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_subscriptionStartDate :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_subscriptionStartDate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
subscriptionStartDate :: Maybe Text
$sel:subscriptionStartDate:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
subscriptionStartDate} -> Maybe Text
subscriptionStartDate) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:subscriptionStartDate:DescribeHsmResponse' :: Maybe Text
subscriptionStartDate = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_subscriptionType :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe SubscriptionType)
describeHsmResponse_subscriptionType :: Lens' DescribeHsmResponse (Maybe SubscriptionType)
describeHsmResponse_subscriptionType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe SubscriptionType
subscriptionType :: Maybe SubscriptionType
$sel:subscriptionType:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe SubscriptionType
subscriptionType} -> Maybe SubscriptionType
subscriptionType) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe SubscriptionType
a -> DescribeHsmResponse
s {$sel:subscriptionType:DescribeHsmResponse' :: Maybe SubscriptionType
subscriptionType = Maybe SubscriptionType
a} :: DescribeHsmResponse)
describeHsmResponse_vendorName :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_vendorName :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_vendorName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
vendorName :: Maybe Text
$sel:vendorName:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
vendorName} -> Maybe Text
vendorName) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:vendorName:DescribeHsmResponse' :: Maybe Text
vendorName = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_vpcId :: Lens.Lens' DescribeHsmResponse (Prelude.Maybe Prelude.Text)
describeHsmResponse_vpcId :: Lens' DescribeHsmResponse (Maybe Text)
describeHsmResponse_vpcId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Maybe Text
vpcId :: Maybe Text
$sel:vpcId:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
vpcId} -> Maybe Text
vpcId) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Maybe Text
a -> DescribeHsmResponse
s {$sel:vpcId:DescribeHsmResponse' :: Maybe Text
vpcId = Maybe Text
a} :: DescribeHsmResponse)
describeHsmResponse_httpStatus :: Lens.Lens' DescribeHsmResponse Prelude.Int
describeHsmResponse_httpStatus :: Lens' DescribeHsmResponse Int
describeHsmResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHsmResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeHsmResponse' :: DescribeHsmResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeHsmResponse
s@DescribeHsmResponse' {} Int
a -> DescribeHsmResponse
s {$sel:httpStatus:DescribeHsmResponse' :: Int
httpStatus = Int
a} :: DescribeHsmResponse)
instance Prelude.NFData DescribeHsmResponse where
rnf :: DescribeHsmResponse -> ()
rnf DescribeHsmResponse' {Int
Maybe [Text]
Maybe Text
Maybe HsmStatus
Maybe SubscriptionType
httpStatus :: Int
vpcId :: Maybe Text
vendorName :: Maybe Text
subscriptionType :: Maybe SubscriptionType
subscriptionStartDate :: Maybe Text
subscriptionEndDate :: Maybe Text
subnetId :: Maybe Text
statusDetails :: Maybe Text
status :: Maybe HsmStatus
sshPublicKey :: Maybe Text
sshKeyLastUpdated :: Maybe Text
softwareVersion :: Maybe Text
serverCertUri :: Maybe Text
serverCertLastUpdated :: Maybe Text
serialNumber :: Maybe Text
partitions :: Maybe [Text]
iamRoleArn :: Maybe Text
hsmType :: Maybe Text
hsmArn :: Maybe Text
eniIp :: Maybe Text
eniId :: Maybe Text
availabilityZone :: Maybe Text
$sel:httpStatus:DescribeHsmResponse' :: DescribeHsmResponse -> Int
$sel:vpcId:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:vendorName:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:subscriptionType:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe SubscriptionType
$sel:subscriptionStartDate:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:subscriptionEndDate:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:subnetId:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:statusDetails:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:status:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe HsmStatus
$sel:sshPublicKey:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:sshKeyLastUpdated:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:softwareVersion:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:serverCertUri:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:serverCertLastUpdated:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:serialNumber:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:partitions:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe [Text]
$sel:iamRoleArn:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:hsmType:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:hsmArn:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:eniIp:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:eniId:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
$sel:availabilityZone:DescribeHsmResponse' :: DescribeHsmResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
availabilityZone
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
eniId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
eniIp
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hsmArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hsmType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
iamRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
partitions
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
serialNumber
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
serverCertLastUpdated
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
serverCertUri
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
softwareVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
sshKeyLastUpdated
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
sshPublicKey
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe HsmStatus
status
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
statusDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
subnetId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
subscriptionEndDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
subscriptionStartDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SubscriptionType
subscriptionType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
vendorName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
vpcId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus