{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.EC2.StartVpcEndpointServicePrivateDnsVerification
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Initiates the verification process to prove that the service provider
-- owns the private DNS name domain for the endpoint service.
--
-- The service provider must successfully perform the verification before
-- the consumer can use the name to access the service.
--
-- Before the service provider runs this command, they must add a record to
-- the DNS server.
module Amazonka.EC2.StartVpcEndpointServicePrivateDnsVerification
  ( -- * Creating a Request
    StartVpcEndpointServicePrivateDnsVerification (..),
    newStartVpcEndpointServicePrivateDnsVerification,

    -- * Request Lenses
    startVpcEndpointServicePrivateDnsVerification_dryRun,
    startVpcEndpointServicePrivateDnsVerification_serviceId,

    -- * Destructuring the Response
    StartVpcEndpointServicePrivateDnsVerificationResponse (..),
    newStartVpcEndpointServicePrivateDnsVerificationResponse,

    -- * Response Lenses
    startVpcEndpointServicePrivateDnsVerificationResponse_returnValue,
    startVpcEndpointServicePrivateDnsVerificationResponse_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

-- | /See:/ 'newStartVpcEndpointServicePrivateDnsVerification' smart constructor.
data StartVpcEndpointServicePrivateDnsVerification = StartVpcEndpointServicePrivateDnsVerification'
  { -- | Checks whether you have the required permissions for the action, without
    -- actually making the request, and provides an error response. If you have
    -- the required permissions, the error response is @DryRunOperation@.
    -- Otherwise, it is @UnauthorizedOperation@.
    StartVpcEndpointServicePrivateDnsVerification -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
    -- | The ID of the endpoint service.
    StartVpcEndpointServicePrivateDnsVerification -> Text
serviceId :: Prelude.Text
  }
  deriving (StartVpcEndpointServicePrivateDnsVerification
-> StartVpcEndpointServicePrivateDnsVerification -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartVpcEndpointServicePrivateDnsVerification
-> StartVpcEndpointServicePrivateDnsVerification -> Bool
$c/= :: StartVpcEndpointServicePrivateDnsVerification
-> StartVpcEndpointServicePrivateDnsVerification -> Bool
== :: StartVpcEndpointServicePrivateDnsVerification
-> StartVpcEndpointServicePrivateDnsVerification -> Bool
$c== :: StartVpcEndpointServicePrivateDnsVerification
-> StartVpcEndpointServicePrivateDnsVerification -> Bool
Prelude.Eq, ReadPrec [StartVpcEndpointServicePrivateDnsVerification]
ReadPrec StartVpcEndpointServicePrivateDnsVerification
Int -> ReadS StartVpcEndpointServicePrivateDnsVerification
ReadS [StartVpcEndpointServicePrivateDnsVerification]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartVpcEndpointServicePrivateDnsVerification]
$creadListPrec :: ReadPrec [StartVpcEndpointServicePrivateDnsVerification]
readPrec :: ReadPrec StartVpcEndpointServicePrivateDnsVerification
$creadPrec :: ReadPrec StartVpcEndpointServicePrivateDnsVerification
readList :: ReadS [StartVpcEndpointServicePrivateDnsVerification]
$creadList :: ReadS [StartVpcEndpointServicePrivateDnsVerification]
readsPrec :: Int -> ReadS StartVpcEndpointServicePrivateDnsVerification
$creadsPrec :: Int -> ReadS StartVpcEndpointServicePrivateDnsVerification
Prelude.Read, Int -> StartVpcEndpointServicePrivateDnsVerification -> ShowS
[StartVpcEndpointServicePrivateDnsVerification] -> ShowS
StartVpcEndpointServicePrivateDnsVerification -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartVpcEndpointServicePrivateDnsVerification] -> ShowS
$cshowList :: [StartVpcEndpointServicePrivateDnsVerification] -> ShowS
show :: StartVpcEndpointServicePrivateDnsVerification -> String
$cshow :: StartVpcEndpointServicePrivateDnsVerification -> String
showsPrec :: Int -> StartVpcEndpointServicePrivateDnsVerification -> ShowS
$cshowsPrec :: Int -> StartVpcEndpointServicePrivateDnsVerification -> ShowS
Prelude.Show, forall x.
Rep StartVpcEndpointServicePrivateDnsVerification x
-> StartVpcEndpointServicePrivateDnsVerification
forall x.
StartVpcEndpointServicePrivateDnsVerification
-> Rep StartVpcEndpointServicePrivateDnsVerification x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartVpcEndpointServicePrivateDnsVerification x
-> StartVpcEndpointServicePrivateDnsVerification
$cfrom :: forall x.
StartVpcEndpointServicePrivateDnsVerification
-> Rep StartVpcEndpointServicePrivateDnsVerification x
Prelude.Generic)

-- |
-- Create a value of 'StartVpcEndpointServicePrivateDnsVerification' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'dryRun', 'startVpcEndpointServicePrivateDnsVerification_dryRun' - Checks whether you have the required permissions for the action, without
-- actually making the request, and provides an error response. If you have
-- the required permissions, the error response is @DryRunOperation@.
-- Otherwise, it is @UnauthorizedOperation@.
--
-- 'serviceId', 'startVpcEndpointServicePrivateDnsVerification_serviceId' - The ID of the endpoint service.
newStartVpcEndpointServicePrivateDnsVerification ::
  -- | 'serviceId'
  Prelude.Text ->
  StartVpcEndpointServicePrivateDnsVerification
newStartVpcEndpointServicePrivateDnsVerification :: Text -> StartVpcEndpointServicePrivateDnsVerification
newStartVpcEndpointServicePrivateDnsVerification
  Text
pServiceId_ =
    StartVpcEndpointServicePrivateDnsVerification'
      { $sel:dryRun:StartVpcEndpointServicePrivateDnsVerification' :: Maybe Bool
dryRun =
          forall a. Maybe a
Prelude.Nothing,
        $sel:serviceId:StartVpcEndpointServicePrivateDnsVerification' :: Text
serviceId = Text
pServiceId_
      }

-- | Checks whether you have the required permissions for the action, without
-- actually making the request, and provides an error response. If you have
-- the required permissions, the error response is @DryRunOperation@.
-- Otherwise, it is @UnauthorizedOperation@.
startVpcEndpointServicePrivateDnsVerification_dryRun :: Lens.Lens' StartVpcEndpointServicePrivateDnsVerification (Prelude.Maybe Prelude.Bool)
startVpcEndpointServicePrivateDnsVerification_dryRun :: Lens' StartVpcEndpointServicePrivateDnsVerification (Maybe Bool)
startVpcEndpointServicePrivateDnsVerification_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartVpcEndpointServicePrivateDnsVerification' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: StartVpcEndpointServicePrivateDnsVerification
s@StartVpcEndpointServicePrivateDnsVerification' {} Maybe Bool
a -> StartVpcEndpointServicePrivateDnsVerification
s {$sel:dryRun:StartVpcEndpointServicePrivateDnsVerification' :: Maybe Bool
dryRun = Maybe Bool
a} :: StartVpcEndpointServicePrivateDnsVerification)

-- | The ID of the endpoint service.
startVpcEndpointServicePrivateDnsVerification_serviceId :: Lens.Lens' StartVpcEndpointServicePrivateDnsVerification Prelude.Text
startVpcEndpointServicePrivateDnsVerification_serviceId :: Lens' StartVpcEndpointServicePrivateDnsVerification Text
startVpcEndpointServicePrivateDnsVerification_serviceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartVpcEndpointServicePrivateDnsVerification' {Text
serviceId :: Text
$sel:serviceId:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Text
serviceId} -> Text
serviceId) (\s :: StartVpcEndpointServicePrivateDnsVerification
s@StartVpcEndpointServicePrivateDnsVerification' {} Text
a -> StartVpcEndpointServicePrivateDnsVerification
s {$sel:serviceId:StartVpcEndpointServicePrivateDnsVerification' :: Text
serviceId = Text
a} :: StartVpcEndpointServicePrivateDnsVerification)

instance
  Core.AWSRequest
    StartVpcEndpointServicePrivateDnsVerification
  where
  type
    AWSResponse
      StartVpcEndpointServicePrivateDnsVerification =
      StartVpcEndpointServicePrivateDnsVerificationResponse
  request :: (Service -> Service)
-> StartVpcEndpointServicePrivateDnsVerification
-> Request StartVpcEndpointServicePrivateDnsVerification
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 StartVpcEndpointServicePrivateDnsVerification
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse
           (AWSResponse StartVpcEndpointServicePrivateDnsVerification)))
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 Bool
-> Int -> StartVpcEndpointServicePrivateDnsVerificationResponse
StartVpcEndpointServicePrivateDnsVerificationResponse'
            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
"return")
            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
    StartVpcEndpointServicePrivateDnsVerification
  where
  hashWithSalt :: Int -> StartVpcEndpointServicePrivateDnsVerification -> Int
hashWithSalt
    Int
_salt
    StartVpcEndpointServicePrivateDnsVerification' {Maybe Bool
Text
serviceId :: Text
dryRun :: Maybe Bool
$sel:serviceId:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Text
$sel:dryRun:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Maybe Bool
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
dryRun
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
serviceId

instance
  Prelude.NFData
    StartVpcEndpointServicePrivateDnsVerification
  where
  rnf :: StartVpcEndpointServicePrivateDnsVerification -> ()
rnf
    StartVpcEndpointServicePrivateDnsVerification' {Maybe Bool
Text
serviceId :: Text
dryRun :: Maybe Bool
$sel:serviceId:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Text
$sel:dryRun:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Maybe Bool
..} =
      forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
dryRun
        seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
serviceId

instance
  Data.ToHeaders
    StartVpcEndpointServicePrivateDnsVerification
  where
  toHeaders :: StartVpcEndpointServicePrivateDnsVerification -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

instance
  Data.ToPath
    StartVpcEndpointServicePrivateDnsVerification
  where
  toPath :: StartVpcEndpointServicePrivateDnsVerification -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance
  Data.ToQuery
    StartVpcEndpointServicePrivateDnsVerification
  where
  toQuery :: StartVpcEndpointServicePrivateDnsVerification -> QueryString
toQuery
    StartVpcEndpointServicePrivateDnsVerification' {Maybe Bool
Text
serviceId :: Text
dryRun :: Maybe Bool
$sel:serviceId:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Text
$sel:dryRun:StartVpcEndpointServicePrivateDnsVerification' :: StartVpcEndpointServicePrivateDnsVerification -> Maybe Bool
..} =
      forall a. Monoid a => [a] -> a
Prelude.mconcat
        [ ByteString
"Action"
            forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"StartVpcEndpointServicePrivateDnsVerification" ::
                        Prelude.ByteString
                    ),
          ByteString
"Version"
            forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2016-11-15" :: Prelude.ByteString),
          ByteString
"DryRun" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
dryRun,
          ByteString
"ServiceId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
serviceId
        ]

-- | /See:/ 'newStartVpcEndpointServicePrivateDnsVerificationResponse' smart constructor.
data StartVpcEndpointServicePrivateDnsVerificationResponse = StartVpcEndpointServicePrivateDnsVerificationResponse'
  { -- | Returns @true@ if the request succeeds; otherwise, it returns an error.
    StartVpcEndpointServicePrivateDnsVerificationResponse -> Maybe Bool
returnValue :: Prelude.Maybe Prelude.Bool,
    -- | The response's http status code.
    StartVpcEndpointServicePrivateDnsVerificationResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (StartVpcEndpointServicePrivateDnsVerificationResponse
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartVpcEndpointServicePrivateDnsVerificationResponse
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> Bool
$c/= :: StartVpcEndpointServicePrivateDnsVerificationResponse
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> Bool
== :: StartVpcEndpointServicePrivateDnsVerificationResponse
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> Bool
$c== :: StartVpcEndpointServicePrivateDnsVerificationResponse
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> Bool
Prelude.Eq, ReadPrec [StartVpcEndpointServicePrivateDnsVerificationResponse]
ReadPrec StartVpcEndpointServicePrivateDnsVerificationResponse
Int -> ReadS StartVpcEndpointServicePrivateDnsVerificationResponse
ReadS [StartVpcEndpointServicePrivateDnsVerificationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartVpcEndpointServicePrivateDnsVerificationResponse]
$creadListPrec :: ReadPrec [StartVpcEndpointServicePrivateDnsVerificationResponse]
readPrec :: ReadPrec StartVpcEndpointServicePrivateDnsVerificationResponse
$creadPrec :: ReadPrec StartVpcEndpointServicePrivateDnsVerificationResponse
readList :: ReadS [StartVpcEndpointServicePrivateDnsVerificationResponse]
$creadList :: ReadS [StartVpcEndpointServicePrivateDnsVerificationResponse]
readsPrec :: Int -> ReadS StartVpcEndpointServicePrivateDnsVerificationResponse
$creadsPrec :: Int -> ReadS StartVpcEndpointServicePrivateDnsVerificationResponse
Prelude.Read, Int
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> ShowS
[StartVpcEndpointServicePrivateDnsVerificationResponse] -> ShowS
StartVpcEndpointServicePrivateDnsVerificationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartVpcEndpointServicePrivateDnsVerificationResponse] -> ShowS
$cshowList :: [StartVpcEndpointServicePrivateDnsVerificationResponse] -> ShowS
show :: StartVpcEndpointServicePrivateDnsVerificationResponse -> String
$cshow :: StartVpcEndpointServicePrivateDnsVerificationResponse -> String
showsPrec :: Int
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> ShowS
$cshowsPrec :: Int
-> StartVpcEndpointServicePrivateDnsVerificationResponse -> ShowS
Prelude.Show, forall x.
Rep StartVpcEndpointServicePrivateDnsVerificationResponse x
-> StartVpcEndpointServicePrivateDnsVerificationResponse
forall x.
StartVpcEndpointServicePrivateDnsVerificationResponse
-> Rep StartVpcEndpointServicePrivateDnsVerificationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartVpcEndpointServicePrivateDnsVerificationResponse x
-> StartVpcEndpointServicePrivateDnsVerificationResponse
$cfrom :: forall x.
StartVpcEndpointServicePrivateDnsVerificationResponse
-> Rep StartVpcEndpointServicePrivateDnsVerificationResponse x
Prelude.Generic)

-- |
-- Create a value of 'StartVpcEndpointServicePrivateDnsVerificationResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'returnValue', 'startVpcEndpointServicePrivateDnsVerificationResponse_returnValue' - Returns @true@ if the request succeeds; otherwise, it returns an error.
--
-- 'httpStatus', 'startVpcEndpointServicePrivateDnsVerificationResponse_httpStatus' - The response's http status code.
newStartVpcEndpointServicePrivateDnsVerificationResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  StartVpcEndpointServicePrivateDnsVerificationResponse
newStartVpcEndpointServicePrivateDnsVerificationResponse :: Int -> StartVpcEndpointServicePrivateDnsVerificationResponse
newStartVpcEndpointServicePrivateDnsVerificationResponse
  Int
pHttpStatus_ =
    StartVpcEndpointServicePrivateDnsVerificationResponse'
      { $sel:returnValue:StartVpcEndpointServicePrivateDnsVerificationResponse' :: Maybe Bool
returnValue =
          forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:StartVpcEndpointServicePrivateDnsVerificationResponse' :: Int
httpStatus =
          Int
pHttpStatus_
      }

-- | Returns @true@ if the request succeeds; otherwise, it returns an error.
startVpcEndpointServicePrivateDnsVerificationResponse_returnValue :: Lens.Lens' StartVpcEndpointServicePrivateDnsVerificationResponse (Prelude.Maybe Prelude.Bool)
startVpcEndpointServicePrivateDnsVerificationResponse_returnValue :: Lens'
  StartVpcEndpointServicePrivateDnsVerificationResponse (Maybe Bool)
startVpcEndpointServicePrivateDnsVerificationResponse_returnValue = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartVpcEndpointServicePrivateDnsVerificationResponse' {Maybe Bool
returnValue :: Maybe Bool
$sel:returnValue:StartVpcEndpointServicePrivateDnsVerificationResponse' :: StartVpcEndpointServicePrivateDnsVerificationResponse -> Maybe Bool
returnValue} -> Maybe Bool
returnValue) (\s :: StartVpcEndpointServicePrivateDnsVerificationResponse
s@StartVpcEndpointServicePrivateDnsVerificationResponse' {} Maybe Bool
a -> StartVpcEndpointServicePrivateDnsVerificationResponse
s {$sel:returnValue:StartVpcEndpointServicePrivateDnsVerificationResponse' :: Maybe Bool
returnValue = Maybe Bool
a} :: StartVpcEndpointServicePrivateDnsVerificationResponse)

-- | The response's http status code.
startVpcEndpointServicePrivateDnsVerificationResponse_httpStatus :: Lens.Lens' StartVpcEndpointServicePrivateDnsVerificationResponse Prelude.Int
startVpcEndpointServicePrivateDnsVerificationResponse_httpStatus :: Lens' StartVpcEndpointServicePrivateDnsVerificationResponse Int
startVpcEndpointServicePrivateDnsVerificationResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartVpcEndpointServicePrivateDnsVerificationResponse' {Int
httpStatus :: Int
$sel:httpStatus:StartVpcEndpointServicePrivateDnsVerificationResponse' :: StartVpcEndpointServicePrivateDnsVerificationResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: StartVpcEndpointServicePrivateDnsVerificationResponse
s@StartVpcEndpointServicePrivateDnsVerificationResponse' {} Int
a -> StartVpcEndpointServicePrivateDnsVerificationResponse
s {$sel:httpStatus:StartVpcEndpointServicePrivateDnsVerificationResponse' :: Int
httpStatus = Int
a} :: StartVpcEndpointServicePrivateDnsVerificationResponse)

instance
  Prelude.NFData
    StartVpcEndpointServicePrivateDnsVerificationResponse
  where
  rnf :: StartVpcEndpointServicePrivateDnsVerificationResponse -> ()
rnf
    StartVpcEndpointServicePrivateDnsVerificationResponse' {Int
Maybe Bool
httpStatus :: Int
returnValue :: Maybe Bool
$sel:httpStatus:StartVpcEndpointServicePrivateDnsVerificationResponse' :: StartVpcEndpointServicePrivateDnsVerificationResponse -> Int
$sel:returnValue:StartVpcEndpointServicePrivateDnsVerificationResponse' :: StartVpcEndpointServicePrivateDnsVerificationResponse -> Maybe Bool
..} =
      forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
returnValue
        seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus