{-# 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.EMR.GetBlockPublicAccessConfiguration
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Returns the Amazon EMR block public access configuration for your Amazon
-- Web Services account in the current Region. For more information see
-- <https://docs.aws.amazon.com/emr/latest/ManagementGuide/configure-block-public-access.html Configure Block Public Access for Amazon EMR>
-- in the /Amazon EMR Management Guide/.
module Amazonka.EMR.GetBlockPublicAccessConfiguration
  ( -- * Creating a Request
    GetBlockPublicAccessConfiguration (..),
    newGetBlockPublicAccessConfiguration,

    -- * Destructuring the Response
    GetBlockPublicAccessConfigurationResponse (..),
    newGetBlockPublicAccessConfigurationResponse,

    -- * Response Lenses
    getBlockPublicAccessConfigurationResponse_httpStatus,
    getBlockPublicAccessConfigurationResponse_blockPublicAccessConfiguration,
    getBlockPublicAccessConfigurationResponse_blockPublicAccessConfigurationMetadata,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EMR.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newGetBlockPublicAccessConfiguration' smart constructor.
data GetBlockPublicAccessConfiguration = GetBlockPublicAccessConfiguration'
  {
  }
  deriving (GetBlockPublicAccessConfiguration
-> GetBlockPublicAccessConfiguration -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetBlockPublicAccessConfiguration
-> GetBlockPublicAccessConfiguration -> Bool
$c/= :: GetBlockPublicAccessConfiguration
-> GetBlockPublicAccessConfiguration -> Bool
== :: GetBlockPublicAccessConfiguration
-> GetBlockPublicAccessConfiguration -> Bool
$c== :: GetBlockPublicAccessConfiguration
-> GetBlockPublicAccessConfiguration -> Bool
Prelude.Eq, ReadPrec [GetBlockPublicAccessConfiguration]
ReadPrec GetBlockPublicAccessConfiguration
Int -> ReadS GetBlockPublicAccessConfiguration
ReadS [GetBlockPublicAccessConfiguration]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetBlockPublicAccessConfiguration]
$creadListPrec :: ReadPrec [GetBlockPublicAccessConfiguration]
readPrec :: ReadPrec GetBlockPublicAccessConfiguration
$creadPrec :: ReadPrec GetBlockPublicAccessConfiguration
readList :: ReadS [GetBlockPublicAccessConfiguration]
$creadList :: ReadS [GetBlockPublicAccessConfiguration]
readsPrec :: Int -> ReadS GetBlockPublicAccessConfiguration
$creadsPrec :: Int -> ReadS GetBlockPublicAccessConfiguration
Prelude.Read, Int -> GetBlockPublicAccessConfiguration -> ShowS
[GetBlockPublicAccessConfiguration] -> ShowS
GetBlockPublicAccessConfiguration -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetBlockPublicAccessConfiguration] -> ShowS
$cshowList :: [GetBlockPublicAccessConfiguration] -> ShowS
show :: GetBlockPublicAccessConfiguration -> String
$cshow :: GetBlockPublicAccessConfiguration -> String
showsPrec :: Int -> GetBlockPublicAccessConfiguration -> ShowS
$cshowsPrec :: Int -> GetBlockPublicAccessConfiguration -> ShowS
Prelude.Show, forall x.
Rep GetBlockPublicAccessConfiguration x
-> GetBlockPublicAccessConfiguration
forall x.
GetBlockPublicAccessConfiguration
-> Rep GetBlockPublicAccessConfiguration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetBlockPublicAccessConfiguration x
-> GetBlockPublicAccessConfiguration
$cfrom :: forall x.
GetBlockPublicAccessConfiguration
-> Rep GetBlockPublicAccessConfiguration x
Prelude.Generic)

-- |
-- Create a value of 'GetBlockPublicAccessConfiguration' 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.
newGetBlockPublicAccessConfiguration ::
  GetBlockPublicAccessConfiguration
newGetBlockPublicAccessConfiguration :: GetBlockPublicAccessConfiguration
newGetBlockPublicAccessConfiguration =
  GetBlockPublicAccessConfiguration
GetBlockPublicAccessConfiguration'

instance
  Core.AWSRequest
    GetBlockPublicAccessConfiguration
  where
  type
    AWSResponse GetBlockPublicAccessConfiguration =
      GetBlockPublicAccessConfigurationResponse
  request :: (Service -> Service)
-> GetBlockPublicAccessConfiguration
-> Request GetBlockPublicAccessConfiguration
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 GetBlockPublicAccessConfiguration
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse (AWSResponse GetBlockPublicAccessConfiguration)))
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 ->
          Int
-> BlockPublicAccessConfiguration
-> BlockPublicAccessConfigurationMetadata
-> GetBlockPublicAccessConfigurationResponse
GetBlockPublicAccessConfigurationResponse'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"BlockPublicAccessConfiguration")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
                            forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"BlockPublicAccessConfigurationMetadata"
                        )
      )

instance
  Prelude.Hashable
    GetBlockPublicAccessConfiguration
  where
  hashWithSalt :: Int -> GetBlockPublicAccessConfiguration -> Int
hashWithSalt Int
_salt GetBlockPublicAccessConfiguration
_ =
    Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ()

instance
  Prelude.NFData
    GetBlockPublicAccessConfiguration
  where
  rnf :: GetBlockPublicAccessConfiguration -> ()
rnf GetBlockPublicAccessConfiguration
_ = ()

instance
  Data.ToHeaders
    GetBlockPublicAccessConfiguration
  where
  toHeaders :: GetBlockPublicAccessConfiguration -> 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
"ElasticMapReduce.GetBlockPublicAccessConfiguration" ::
                          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
    GetBlockPublicAccessConfiguration
  where
  toJSON :: GetBlockPublicAccessConfiguration -> Value
toJSON = forall a b. a -> b -> a
Prelude.const (Object -> Value
Data.Object forall a. Monoid a => a
Prelude.mempty)

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

instance
  Data.ToQuery
    GetBlockPublicAccessConfiguration
  where
  toQuery :: GetBlockPublicAccessConfiguration -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newGetBlockPublicAccessConfigurationResponse' smart constructor.
data GetBlockPublicAccessConfigurationResponse = GetBlockPublicAccessConfigurationResponse'
  { -- | The response's http status code.
    GetBlockPublicAccessConfigurationResponse -> Int
httpStatus :: Prelude.Int,
    -- | A configuration for Amazon EMR block public access. The configuration
    -- applies to all clusters created in your account for the current Region.
    -- The configuration specifies whether block public access is enabled. If
    -- block public access is enabled, security groups associated with the
    -- cluster cannot have rules that allow inbound traffic from 0.0.0.0\/0 or
    -- ::\/0 on a port, unless the port is specified as an exception using
    -- @PermittedPublicSecurityGroupRuleRanges@ in the
    -- @BlockPublicAccessConfiguration@. By default, Port 22 (SSH) is an
    -- exception, and public access is allowed on this port. You can change
    -- this by updating the block public access configuration to remove the
    -- exception.
    --
    -- For accounts that created clusters in a Region before November 25, 2019,
    -- block public access is disabled by default in that Region. To use this
    -- feature, you must manually enable and configure it. For accounts that
    -- did not create an EMR cluster in a Region before this date, block public
    -- access is enabled by default in that Region.
    GetBlockPublicAccessConfigurationResponse
-> BlockPublicAccessConfiguration
blockPublicAccessConfiguration :: BlockPublicAccessConfiguration,
    -- | Properties that describe the Amazon Web Services principal that created
    -- the @BlockPublicAccessConfiguration@ using the
    -- @PutBlockPublicAccessConfiguration@ action as well as the date and time
    -- that the configuration was created. Each time a configuration for block
    -- public access is updated, Amazon EMR updates this metadata.
    GetBlockPublicAccessConfigurationResponse
-> BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata :: BlockPublicAccessConfigurationMetadata
  }
  deriving (GetBlockPublicAccessConfigurationResponse
-> GetBlockPublicAccessConfigurationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetBlockPublicAccessConfigurationResponse
-> GetBlockPublicAccessConfigurationResponse -> Bool
$c/= :: GetBlockPublicAccessConfigurationResponse
-> GetBlockPublicAccessConfigurationResponse -> Bool
== :: GetBlockPublicAccessConfigurationResponse
-> GetBlockPublicAccessConfigurationResponse -> Bool
$c== :: GetBlockPublicAccessConfigurationResponse
-> GetBlockPublicAccessConfigurationResponse -> Bool
Prelude.Eq, ReadPrec [GetBlockPublicAccessConfigurationResponse]
ReadPrec GetBlockPublicAccessConfigurationResponse
Int -> ReadS GetBlockPublicAccessConfigurationResponse
ReadS [GetBlockPublicAccessConfigurationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetBlockPublicAccessConfigurationResponse]
$creadListPrec :: ReadPrec [GetBlockPublicAccessConfigurationResponse]
readPrec :: ReadPrec GetBlockPublicAccessConfigurationResponse
$creadPrec :: ReadPrec GetBlockPublicAccessConfigurationResponse
readList :: ReadS [GetBlockPublicAccessConfigurationResponse]
$creadList :: ReadS [GetBlockPublicAccessConfigurationResponse]
readsPrec :: Int -> ReadS GetBlockPublicAccessConfigurationResponse
$creadsPrec :: Int -> ReadS GetBlockPublicAccessConfigurationResponse
Prelude.Read, Int -> GetBlockPublicAccessConfigurationResponse -> ShowS
[GetBlockPublicAccessConfigurationResponse] -> ShowS
GetBlockPublicAccessConfigurationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetBlockPublicAccessConfigurationResponse] -> ShowS
$cshowList :: [GetBlockPublicAccessConfigurationResponse] -> ShowS
show :: GetBlockPublicAccessConfigurationResponse -> String
$cshow :: GetBlockPublicAccessConfigurationResponse -> String
showsPrec :: Int -> GetBlockPublicAccessConfigurationResponse -> ShowS
$cshowsPrec :: Int -> GetBlockPublicAccessConfigurationResponse -> ShowS
Prelude.Show, forall x.
Rep GetBlockPublicAccessConfigurationResponse x
-> GetBlockPublicAccessConfigurationResponse
forall x.
GetBlockPublicAccessConfigurationResponse
-> Rep GetBlockPublicAccessConfigurationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetBlockPublicAccessConfigurationResponse x
-> GetBlockPublicAccessConfigurationResponse
$cfrom :: forall x.
GetBlockPublicAccessConfigurationResponse
-> Rep GetBlockPublicAccessConfigurationResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetBlockPublicAccessConfigurationResponse' 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:
--
-- 'httpStatus', 'getBlockPublicAccessConfigurationResponse_httpStatus' - The response's http status code.
--
-- 'blockPublicAccessConfiguration', 'getBlockPublicAccessConfigurationResponse_blockPublicAccessConfiguration' - A configuration for Amazon EMR block public access. The configuration
-- applies to all clusters created in your account for the current Region.
-- The configuration specifies whether block public access is enabled. If
-- block public access is enabled, security groups associated with the
-- cluster cannot have rules that allow inbound traffic from 0.0.0.0\/0 or
-- ::\/0 on a port, unless the port is specified as an exception using
-- @PermittedPublicSecurityGroupRuleRanges@ in the
-- @BlockPublicAccessConfiguration@. By default, Port 22 (SSH) is an
-- exception, and public access is allowed on this port. You can change
-- this by updating the block public access configuration to remove the
-- exception.
--
-- For accounts that created clusters in a Region before November 25, 2019,
-- block public access is disabled by default in that Region. To use this
-- feature, you must manually enable and configure it. For accounts that
-- did not create an EMR cluster in a Region before this date, block public
-- access is enabled by default in that Region.
--
-- 'blockPublicAccessConfigurationMetadata', 'getBlockPublicAccessConfigurationResponse_blockPublicAccessConfigurationMetadata' - Properties that describe the Amazon Web Services principal that created
-- the @BlockPublicAccessConfiguration@ using the
-- @PutBlockPublicAccessConfiguration@ action as well as the date and time
-- that the configuration was created. Each time a configuration for block
-- public access is updated, Amazon EMR updates this metadata.
newGetBlockPublicAccessConfigurationResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  -- | 'blockPublicAccessConfiguration'
  BlockPublicAccessConfiguration ->
  -- | 'blockPublicAccessConfigurationMetadata'
  BlockPublicAccessConfigurationMetadata ->
  GetBlockPublicAccessConfigurationResponse
newGetBlockPublicAccessConfigurationResponse :: Int
-> BlockPublicAccessConfiguration
-> BlockPublicAccessConfigurationMetadata
-> GetBlockPublicAccessConfigurationResponse
newGetBlockPublicAccessConfigurationResponse
  Int
pHttpStatus_
  BlockPublicAccessConfiguration
pBlockPublicAccessConfiguration_
  BlockPublicAccessConfigurationMetadata
pBlockPublicAccessConfigurationMetadata_ =
    GetBlockPublicAccessConfigurationResponse'
      { $sel:httpStatus:GetBlockPublicAccessConfigurationResponse' :: Int
httpStatus =
          Int
pHttpStatus_,
        $sel:blockPublicAccessConfiguration:GetBlockPublicAccessConfigurationResponse' :: BlockPublicAccessConfiguration
blockPublicAccessConfiguration =
          BlockPublicAccessConfiguration
pBlockPublicAccessConfiguration_,
        $sel:blockPublicAccessConfigurationMetadata:GetBlockPublicAccessConfigurationResponse' :: BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata =
          BlockPublicAccessConfigurationMetadata
pBlockPublicAccessConfigurationMetadata_
      }

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

-- | A configuration for Amazon EMR block public access. The configuration
-- applies to all clusters created in your account for the current Region.
-- The configuration specifies whether block public access is enabled. If
-- block public access is enabled, security groups associated with the
-- cluster cannot have rules that allow inbound traffic from 0.0.0.0\/0 or
-- ::\/0 on a port, unless the port is specified as an exception using
-- @PermittedPublicSecurityGroupRuleRanges@ in the
-- @BlockPublicAccessConfiguration@. By default, Port 22 (SSH) is an
-- exception, and public access is allowed on this port. You can change
-- this by updating the block public access configuration to remove the
-- exception.
--
-- For accounts that created clusters in a Region before November 25, 2019,
-- block public access is disabled by default in that Region. To use this
-- feature, you must manually enable and configure it. For accounts that
-- did not create an EMR cluster in a Region before this date, block public
-- access is enabled by default in that Region.
getBlockPublicAccessConfigurationResponse_blockPublicAccessConfiguration :: Lens.Lens' GetBlockPublicAccessConfigurationResponse BlockPublicAccessConfiguration
getBlockPublicAccessConfigurationResponse_blockPublicAccessConfiguration :: Lens'
  GetBlockPublicAccessConfigurationResponse
  BlockPublicAccessConfiguration
getBlockPublicAccessConfigurationResponse_blockPublicAccessConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBlockPublicAccessConfigurationResponse' {BlockPublicAccessConfiguration
blockPublicAccessConfiguration :: BlockPublicAccessConfiguration
$sel:blockPublicAccessConfiguration:GetBlockPublicAccessConfigurationResponse' :: GetBlockPublicAccessConfigurationResponse
-> BlockPublicAccessConfiguration
blockPublicAccessConfiguration} -> BlockPublicAccessConfiguration
blockPublicAccessConfiguration) (\s :: GetBlockPublicAccessConfigurationResponse
s@GetBlockPublicAccessConfigurationResponse' {} BlockPublicAccessConfiguration
a -> GetBlockPublicAccessConfigurationResponse
s {$sel:blockPublicAccessConfiguration:GetBlockPublicAccessConfigurationResponse' :: BlockPublicAccessConfiguration
blockPublicAccessConfiguration = BlockPublicAccessConfiguration
a} :: GetBlockPublicAccessConfigurationResponse)

-- | Properties that describe the Amazon Web Services principal that created
-- the @BlockPublicAccessConfiguration@ using the
-- @PutBlockPublicAccessConfiguration@ action as well as the date and time
-- that the configuration was created. Each time a configuration for block
-- public access is updated, Amazon EMR updates this metadata.
getBlockPublicAccessConfigurationResponse_blockPublicAccessConfigurationMetadata :: Lens.Lens' GetBlockPublicAccessConfigurationResponse BlockPublicAccessConfigurationMetadata
getBlockPublicAccessConfigurationResponse_blockPublicAccessConfigurationMetadata :: Lens'
  GetBlockPublicAccessConfigurationResponse
  BlockPublicAccessConfigurationMetadata
getBlockPublicAccessConfigurationResponse_blockPublicAccessConfigurationMetadata = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBlockPublicAccessConfigurationResponse' {BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata :: BlockPublicAccessConfigurationMetadata
$sel:blockPublicAccessConfigurationMetadata:GetBlockPublicAccessConfigurationResponse' :: GetBlockPublicAccessConfigurationResponse
-> BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata} -> BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata) (\s :: GetBlockPublicAccessConfigurationResponse
s@GetBlockPublicAccessConfigurationResponse' {} BlockPublicAccessConfigurationMetadata
a -> GetBlockPublicAccessConfigurationResponse
s {$sel:blockPublicAccessConfigurationMetadata:GetBlockPublicAccessConfigurationResponse' :: BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata = BlockPublicAccessConfigurationMetadata
a} :: GetBlockPublicAccessConfigurationResponse)

instance
  Prelude.NFData
    GetBlockPublicAccessConfigurationResponse
  where
  rnf :: GetBlockPublicAccessConfigurationResponse -> ()
rnf GetBlockPublicAccessConfigurationResponse' {Int
BlockPublicAccessConfigurationMetadata
BlockPublicAccessConfiguration
blockPublicAccessConfigurationMetadata :: BlockPublicAccessConfigurationMetadata
blockPublicAccessConfiguration :: BlockPublicAccessConfiguration
httpStatus :: Int
$sel:blockPublicAccessConfigurationMetadata:GetBlockPublicAccessConfigurationResponse' :: GetBlockPublicAccessConfigurationResponse
-> BlockPublicAccessConfigurationMetadata
$sel:blockPublicAccessConfiguration:GetBlockPublicAccessConfigurationResponse' :: GetBlockPublicAccessConfigurationResponse
-> BlockPublicAccessConfiguration
$sel:httpStatus:GetBlockPublicAccessConfigurationResponse' :: GetBlockPublicAccessConfigurationResponse -> Int
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf BlockPublicAccessConfiguration
blockPublicAccessConfiguration
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf BlockPublicAccessConfigurationMetadata
blockPublicAccessConfigurationMetadata