{-# 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.Glue.GetSecurityConfigurations
(
GetSecurityConfigurations (..),
newGetSecurityConfigurations,
getSecurityConfigurations_nextToken,
getSecurityConfigurations_maxResults,
GetSecurityConfigurationsResponse (..),
newGetSecurityConfigurationsResponse,
getSecurityConfigurationsResponse_securityConfigurations,
getSecurityConfigurationsResponse_nextToken,
getSecurityConfigurationsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import Amazonka.Glue.Types
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data GetSecurityConfigurations = GetSecurityConfigurations'
{
GetSecurityConfigurations -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetSecurityConfigurations -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural
}
deriving (GetSecurityConfigurations -> GetSecurityConfigurations -> Bool
(GetSecurityConfigurations -> GetSecurityConfigurations -> Bool)
-> (GetSecurityConfigurations -> GetSecurityConfigurations -> Bool)
-> Eq GetSecurityConfigurations
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSecurityConfigurations -> GetSecurityConfigurations -> Bool
$c/= :: GetSecurityConfigurations -> GetSecurityConfigurations -> Bool
== :: GetSecurityConfigurations -> GetSecurityConfigurations -> Bool
$c== :: GetSecurityConfigurations -> GetSecurityConfigurations -> Bool
Prelude.Eq, ReadPrec [GetSecurityConfigurations]
ReadPrec GetSecurityConfigurations
Int -> ReadS GetSecurityConfigurations
ReadS [GetSecurityConfigurations]
(Int -> ReadS GetSecurityConfigurations)
-> ReadS [GetSecurityConfigurations]
-> ReadPrec GetSecurityConfigurations
-> ReadPrec [GetSecurityConfigurations]
-> Read GetSecurityConfigurations
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetSecurityConfigurations]
$creadListPrec :: ReadPrec [GetSecurityConfigurations]
readPrec :: ReadPrec GetSecurityConfigurations
$creadPrec :: ReadPrec GetSecurityConfigurations
readList :: ReadS [GetSecurityConfigurations]
$creadList :: ReadS [GetSecurityConfigurations]
readsPrec :: Int -> ReadS GetSecurityConfigurations
$creadsPrec :: Int -> ReadS GetSecurityConfigurations
Prelude.Read, Int -> GetSecurityConfigurations -> ShowS
[GetSecurityConfigurations] -> ShowS
GetSecurityConfigurations -> String
(Int -> GetSecurityConfigurations -> ShowS)
-> (GetSecurityConfigurations -> String)
-> ([GetSecurityConfigurations] -> ShowS)
-> Show GetSecurityConfigurations
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSecurityConfigurations] -> ShowS
$cshowList :: [GetSecurityConfigurations] -> ShowS
show :: GetSecurityConfigurations -> String
$cshow :: GetSecurityConfigurations -> String
showsPrec :: Int -> GetSecurityConfigurations -> ShowS
$cshowsPrec :: Int -> GetSecurityConfigurations -> ShowS
Prelude.Show, (forall x.
GetSecurityConfigurations -> Rep GetSecurityConfigurations x)
-> (forall x.
Rep GetSecurityConfigurations x -> GetSecurityConfigurations)
-> Generic GetSecurityConfigurations
forall x.
Rep GetSecurityConfigurations x -> GetSecurityConfigurations
forall x.
GetSecurityConfigurations -> Rep GetSecurityConfigurations x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetSecurityConfigurations x -> GetSecurityConfigurations
$cfrom :: forall x.
GetSecurityConfigurations -> Rep GetSecurityConfigurations x
Prelude.Generic)
newGetSecurityConfigurations ::
GetSecurityConfigurations
newGetSecurityConfigurations :: GetSecurityConfigurations
newGetSecurityConfigurations =
GetSecurityConfigurations' :: Maybe Text -> Maybe Natural -> GetSecurityConfigurations
GetSecurityConfigurations'
{ $sel:nextToken:GetSecurityConfigurations' :: Maybe Text
nextToken =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:GetSecurityConfigurations' :: Maybe Natural
maxResults = Maybe Natural
forall a. Maybe a
Prelude.Nothing
}
getSecurityConfigurations_nextToken :: Lens.Lens' GetSecurityConfigurations (Prelude.Maybe Prelude.Text)
getSecurityConfigurations_nextToken :: (Maybe Text -> f (Maybe Text))
-> GetSecurityConfigurations -> f GetSecurityConfigurations
getSecurityConfigurations_nextToken = (GetSecurityConfigurations -> Maybe Text)
-> (GetSecurityConfigurations
-> Maybe Text -> GetSecurityConfigurations)
-> Lens
GetSecurityConfigurations
GetSecurityConfigurations
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetSecurityConfigurations' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetSecurityConfigurations' :: GetSecurityConfigurations -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetSecurityConfigurations
s@GetSecurityConfigurations' {} Maybe Text
a -> GetSecurityConfigurations
s {$sel:nextToken:GetSecurityConfigurations' :: Maybe Text
nextToken = Maybe Text
a} :: GetSecurityConfigurations)
getSecurityConfigurations_maxResults :: Lens.Lens' GetSecurityConfigurations (Prelude.Maybe Prelude.Natural)
getSecurityConfigurations_maxResults :: (Maybe Natural -> f (Maybe Natural))
-> GetSecurityConfigurations -> f GetSecurityConfigurations
getSecurityConfigurations_maxResults = (GetSecurityConfigurations -> Maybe Natural)
-> (GetSecurityConfigurations
-> Maybe Natural -> GetSecurityConfigurations)
-> Lens
GetSecurityConfigurations
GetSecurityConfigurations
(Maybe Natural)
(Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetSecurityConfigurations' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:GetSecurityConfigurations' :: GetSecurityConfigurations -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: GetSecurityConfigurations
s@GetSecurityConfigurations' {} Maybe Natural
a -> GetSecurityConfigurations
s {$sel:maxResults:GetSecurityConfigurations' :: Maybe Natural
maxResults = Maybe Natural
a} :: GetSecurityConfigurations)
instance Core.AWSPager GetSecurityConfigurations where
page :: GetSecurityConfigurations
-> AWSResponse GetSecurityConfigurations
-> Maybe GetSecurityConfigurations
page GetSecurityConfigurations
rq AWSResponse GetSecurityConfigurations
rs
| Maybe Text -> Bool
forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse GetSecurityConfigurations
GetSecurityConfigurationsResponse
rs
GetSecurityConfigurationsResponse
-> Getting (First Text) GetSecurityConfigurationsResponse Text
-> Maybe Text
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? (Maybe Text -> Const (First Text) (Maybe Text))
-> GetSecurityConfigurationsResponse
-> Const (First Text) GetSecurityConfigurationsResponse
Lens' GetSecurityConfigurationsResponse (Maybe Text)
getSecurityConfigurationsResponse_nextToken
((Maybe Text -> Const (First Text) (Maybe Text))
-> GetSecurityConfigurationsResponse
-> Const (First Text) GetSecurityConfigurationsResponse)
-> ((Text -> Const (First Text) Text)
-> Maybe Text -> Const (First Text) (Maybe Text))
-> Getting (First Text) GetSecurityConfigurationsResponse Text
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. (Text -> Const (First Text) Text)
-> Maybe Text -> Const (First Text) (Maybe Text)
forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
Maybe GetSecurityConfigurations
forall a. Maybe a
Prelude.Nothing
| Maybe [SecurityConfiguration] -> Bool
forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse GetSecurityConfigurations
GetSecurityConfigurationsResponse
rs
GetSecurityConfigurationsResponse
-> Getting
(First [SecurityConfiguration])
GetSecurityConfigurationsResponse
[SecurityConfiguration]
-> Maybe [SecurityConfiguration]
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? (Maybe [SecurityConfiguration]
-> Const
(First [SecurityConfiguration]) (Maybe [SecurityConfiguration]))
-> GetSecurityConfigurationsResponse
-> Const
(First [SecurityConfiguration]) GetSecurityConfigurationsResponse
Lens'
GetSecurityConfigurationsResponse (Maybe [SecurityConfiguration])
getSecurityConfigurationsResponse_securityConfigurations
((Maybe [SecurityConfiguration]
-> Const
(First [SecurityConfiguration]) (Maybe [SecurityConfiguration]))
-> GetSecurityConfigurationsResponse
-> Const
(First [SecurityConfiguration]) GetSecurityConfigurationsResponse)
-> (([SecurityConfiguration]
-> Const (First [SecurityConfiguration]) [SecurityConfiguration])
-> Maybe [SecurityConfiguration]
-> Const
(First [SecurityConfiguration]) (Maybe [SecurityConfiguration]))
-> Getting
(First [SecurityConfiguration])
GetSecurityConfigurationsResponse
[SecurityConfiguration]
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. ([SecurityConfiguration]
-> Const (First [SecurityConfiguration]) [SecurityConfiguration])
-> Maybe [SecurityConfiguration]
-> Const
(First [SecurityConfiguration]) (Maybe [SecurityConfiguration])
forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
Maybe GetSecurityConfigurations
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
GetSecurityConfigurations -> Maybe GetSecurityConfigurations
forall a. a -> Maybe a
Prelude.Just (GetSecurityConfigurations -> Maybe GetSecurityConfigurations)
-> GetSecurityConfigurations -> Maybe GetSecurityConfigurations
forall a b. (a -> b) -> a -> b
Prelude.$
GetSecurityConfigurations
rq
GetSecurityConfigurations
-> (GetSecurityConfigurations -> GetSecurityConfigurations)
-> GetSecurityConfigurations
forall a b. a -> (a -> b) -> b
Prelude.& (Maybe Text -> Identity (Maybe Text))
-> GetSecurityConfigurations -> Identity GetSecurityConfigurations
Lens
GetSecurityConfigurations
GetSecurityConfigurations
(Maybe Text)
(Maybe Text)
getSecurityConfigurations_nextToken
((Maybe Text -> Identity (Maybe Text))
-> GetSecurityConfigurations -> Identity GetSecurityConfigurations)
-> Maybe Text
-> GetSecurityConfigurations
-> GetSecurityConfigurations
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse GetSecurityConfigurations
GetSecurityConfigurationsResponse
rs
GetSecurityConfigurationsResponse
-> Getting (First Text) GetSecurityConfigurationsResponse Text
-> Maybe Text
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? (Maybe Text -> Const (First Text) (Maybe Text))
-> GetSecurityConfigurationsResponse
-> Const (First Text) GetSecurityConfigurationsResponse
Lens' GetSecurityConfigurationsResponse (Maybe Text)
getSecurityConfigurationsResponse_nextToken
((Maybe Text -> Const (First Text) (Maybe Text))
-> GetSecurityConfigurationsResponse
-> Const (First Text) GetSecurityConfigurationsResponse)
-> ((Text -> Const (First Text) Text)
-> Maybe Text -> Const (First Text) (Maybe Text))
-> Getting (First Text) GetSecurityConfigurationsResponse Text
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. (Text -> Const (First Text) Text)
-> Maybe Text -> Const (First Text) (Maybe Text)
forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest GetSecurityConfigurations where
type
AWSResponse GetSecurityConfigurations =
GetSecurityConfigurationsResponse
request :: GetSecurityConfigurations -> Request GetSecurityConfigurations
request = Service
-> GetSecurityConfigurations -> Request GetSecurityConfigurations
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
response :: Logger
-> Service
-> Proxy GetSecurityConfigurations
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetSecurityConfigurations)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse GetSecurityConfigurations))
-> Logger
-> Service
-> Proxy GetSecurityConfigurations
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetSecurityConfigurations)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe [SecurityConfiguration]
-> Maybe Text -> Int -> GetSecurityConfigurationsResponse
GetSecurityConfigurationsResponse'
(Maybe [SecurityConfiguration]
-> Maybe Text -> Int -> GetSecurityConfigurationsResponse)
-> Either String (Maybe [SecurityConfiguration])
-> Either
String (Maybe Text -> Int -> GetSecurityConfigurationsResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( Object
x Object
-> Text -> Either String (Maybe (Maybe [SecurityConfiguration]))
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"SecurityConfigurations"
Either String (Maybe (Maybe [SecurityConfiguration]))
-> Maybe [SecurityConfiguration]
-> Either String (Maybe [SecurityConfiguration])
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe [SecurityConfiguration]
forall a. Monoid a => a
Prelude.mempty
)
Either
String (Maybe Text -> Int -> GetSecurityConfigurationsResponse)
-> Either String (Maybe Text)
-> Either String (Int -> GetSecurityConfigurationsResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"NextToken")
Either String (Int -> GetSecurityConfigurationsResponse)
-> Either String Int
-> Either String GetSecurityConfigurationsResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable GetSecurityConfigurations
instance Prelude.NFData GetSecurityConfigurations
instance Core.ToHeaders GetSecurityConfigurations where
toHeaders :: GetSecurityConfigurations -> ResponseHeaders
toHeaders =
ResponseHeaders -> GetSecurityConfigurations -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"AWSGlue.GetSecurityConfigurations" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Core.ToJSON GetSecurityConfigurations where
toJSON :: GetSecurityConfigurations -> Value
toJSON GetSecurityConfigurations' {Maybe Natural
Maybe Text
maxResults :: Maybe Natural
nextToken :: Maybe Text
$sel:maxResults:GetSecurityConfigurations' :: GetSecurityConfigurations -> Maybe Natural
$sel:nextToken:GetSecurityConfigurations' :: GetSecurityConfigurations -> Maybe Text
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"NextToken" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
nextToken,
(Text
"MaxResults" Text -> Natural -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Natural -> Pair) -> Maybe Natural -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
maxResults
]
)
instance Core.ToPath GetSecurityConfigurations where
toPath :: GetSecurityConfigurations -> ByteString
toPath = ByteString -> GetSecurityConfigurations -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Core.ToQuery GetSecurityConfigurations where
toQuery :: GetSecurityConfigurations -> QueryString
toQuery = QueryString -> GetSecurityConfigurations -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data GetSecurityConfigurationsResponse = GetSecurityConfigurationsResponse'
{
GetSecurityConfigurationsResponse -> Maybe [SecurityConfiguration]
securityConfigurations :: Prelude.Maybe [SecurityConfiguration],
GetSecurityConfigurationsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetSecurityConfigurationsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool
(GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool)
-> (GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool)
-> Eq GetSecurityConfigurationsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool
$c/= :: GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool
== :: GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool
$c== :: GetSecurityConfigurationsResponse
-> GetSecurityConfigurationsResponse -> Bool
Prelude.Eq, ReadPrec [GetSecurityConfigurationsResponse]
ReadPrec GetSecurityConfigurationsResponse
Int -> ReadS GetSecurityConfigurationsResponse
ReadS [GetSecurityConfigurationsResponse]
(Int -> ReadS GetSecurityConfigurationsResponse)
-> ReadS [GetSecurityConfigurationsResponse]
-> ReadPrec GetSecurityConfigurationsResponse
-> ReadPrec [GetSecurityConfigurationsResponse]
-> Read GetSecurityConfigurationsResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetSecurityConfigurationsResponse]
$creadListPrec :: ReadPrec [GetSecurityConfigurationsResponse]
readPrec :: ReadPrec GetSecurityConfigurationsResponse
$creadPrec :: ReadPrec GetSecurityConfigurationsResponse
readList :: ReadS [GetSecurityConfigurationsResponse]
$creadList :: ReadS [GetSecurityConfigurationsResponse]
readsPrec :: Int -> ReadS GetSecurityConfigurationsResponse
$creadsPrec :: Int -> ReadS GetSecurityConfigurationsResponse
Prelude.Read, Int -> GetSecurityConfigurationsResponse -> ShowS
[GetSecurityConfigurationsResponse] -> ShowS
GetSecurityConfigurationsResponse -> String
(Int -> GetSecurityConfigurationsResponse -> ShowS)
-> (GetSecurityConfigurationsResponse -> String)
-> ([GetSecurityConfigurationsResponse] -> ShowS)
-> Show GetSecurityConfigurationsResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSecurityConfigurationsResponse] -> ShowS
$cshowList :: [GetSecurityConfigurationsResponse] -> ShowS
show :: GetSecurityConfigurationsResponse -> String
$cshow :: GetSecurityConfigurationsResponse -> String
showsPrec :: Int -> GetSecurityConfigurationsResponse -> ShowS
$cshowsPrec :: Int -> GetSecurityConfigurationsResponse -> ShowS
Prelude.Show, (forall x.
GetSecurityConfigurationsResponse
-> Rep GetSecurityConfigurationsResponse x)
-> (forall x.
Rep GetSecurityConfigurationsResponse x
-> GetSecurityConfigurationsResponse)
-> Generic GetSecurityConfigurationsResponse
forall x.
Rep GetSecurityConfigurationsResponse x
-> GetSecurityConfigurationsResponse
forall x.
GetSecurityConfigurationsResponse
-> Rep GetSecurityConfigurationsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetSecurityConfigurationsResponse x
-> GetSecurityConfigurationsResponse
$cfrom :: forall x.
GetSecurityConfigurationsResponse
-> Rep GetSecurityConfigurationsResponse x
Prelude.Generic)
newGetSecurityConfigurationsResponse ::
Prelude.Int ->
GetSecurityConfigurationsResponse
newGetSecurityConfigurationsResponse :: Int -> GetSecurityConfigurationsResponse
newGetSecurityConfigurationsResponse Int
pHttpStatus_ =
GetSecurityConfigurationsResponse' :: Maybe [SecurityConfiguration]
-> Maybe Text -> Int -> GetSecurityConfigurationsResponse
GetSecurityConfigurationsResponse'
{ $sel:securityConfigurations:GetSecurityConfigurationsResponse' :: Maybe [SecurityConfiguration]
securityConfigurations =
Maybe [SecurityConfiguration]
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetSecurityConfigurationsResponse' :: Maybe Text
nextToken = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetSecurityConfigurationsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getSecurityConfigurationsResponse_securityConfigurations :: Lens.Lens' GetSecurityConfigurationsResponse (Prelude.Maybe [SecurityConfiguration])
getSecurityConfigurationsResponse_securityConfigurations :: (Maybe [SecurityConfiguration]
-> f (Maybe [SecurityConfiguration]))
-> GetSecurityConfigurationsResponse
-> f GetSecurityConfigurationsResponse
getSecurityConfigurationsResponse_securityConfigurations = (GetSecurityConfigurationsResponse
-> Maybe [SecurityConfiguration])
-> (GetSecurityConfigurationsResponse
-> Maybe [SecurityConfiguration]
-> GetSecurityConfigurationsResponse)
-> Lens'
GetSecurityConfigurationsResponse (Maybe [SecurityConfiguration])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetSecurityConfigurationsResponse' {Maybe [SecurityConfiguration]
securityConfigurations :: Maybe [SecurityConfiguration]
$sel:securityConfigurations:GetSecurityConfigurationsResponse' :: GetSecurityConfigurationsResponse -> Maybe [SecurityConfiguration]
securityConfigurations} -> Maybe [SecurityConfiguration]
securityConfigurations) (\s :: GetSecurityConfigurationsResponse
s@GetSecurityConfigurationsResponse' {} Maybe [SecurityConfiguration]
a -> GetSecurityConfigurationsResponse
s {$sel:securityConfigurations:GetSecurityConfigurationsResponse' :: Maybe [SecurityConfiguration]
securityConfigurations = Maybe [SecurityConfiguration]
a} :: GetSecurityConfigurationsResponse) ((Maybe [SecurityConfiguration]
-> f (Maybe [SecurityConfiguration]))
-> GetSecurityConfigurationsResponse
-> f GetSecurityConfigurationsResponse)
-> ((Maybe [SecurityConfiguration]
-> f (Maybe [SecurityConfiguration]))
-> Maybe [SecurityConfiguration]
-> f (Maybe [SecurityConfiguration]))
-> (Maybe [SecurityConfiguration]
-> f (Maybe [SecurityConfiguration]))
-> GetSecurityConfigurationsResponse
-> f GetSecurityConfigurationsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[SecurityConfiguration]
[SecurityConfiguration]
[SecurityConfiguration]
[SecurityConfiguration]
-> Iso
(Maybe [SecurityConfiguration])
(Maybe [SecurityConfiguration])
(Maybe [SecurityConfiguration])
(Maybe [SecurityConfiguration])
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 AnIso
[SecurityConfiguration]
[SecurityConfiguration]
[SecurityConfiguration]
[SecurityConfiguration]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
getSecurityConfigurationsResponse_nextToken :: Lens.Lens' GetSecurityConfigurationsResponse (Prelude.Maybe Prelude.Text)
getSecurityConfigurationsResponse_nextToken :: (Maybe Text -> f (Maybe Text))
-> GetSecurityConfigurationsResponse
-> f GetSecurityConfigurationsResponse
getSecurityConfigurationsResponse_nextToken = (GetSecurityConfigurationsResponse -> Maybe Text)
-> (GetSecurityConfigurationsResponse
-> Maybe Text -> GetSecurityConfigurationsResponse)
-> Lens' GetSecurityConfigurationsResponse (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetSecurityConfigurationsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetSecurityConfigurationsResponse' :: GetSecurityConfigurationsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetSecurityConfigurationsResponse
s@GetSecurityConfigurationsResponse' {} Maybe Text
a -> GetSecurityConfigurationsResponse
s {$sel:nextToken:GetSecurityConfigurationsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetSecurityConfigurationsResponse)
getSecurityConfigurationsResponse_httpStatus :: Lens.Lens' GetSecurityConfigurationsResponse Prelude.Int
getSecurityConfigurationsResponse_httpStatus :: (Int -> f Int)
-> GetSecurityConfigurationsResponse
-> f GetSecurityConfigurationsResponse
getSecurityConfigurationsResponse_httpStatus = (GetSecurityConfigurationsResponse -> Int)
-> (GetSecurityConfigurationsResponse
-> Int -> GetSecurityConfigurationsResponse)
-> Lens
GetSecurityConfigurationsResponse
GetSecurityConfigurationsResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetSecurityConfigurationsResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetSecurityConfigurationsResponse' :: GetSecurityConfigurationsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetSecurityConfigurationsResponse
s@GetSecurityConfigurationsResponse' {} Int
a -> GetSecurityConfigurationsResponse
s {$sel:httpStatus:GetSecurityConfigurationsResponse' :: Int
httpStatus = Int
a} :: GetSecurityConfigurationsResponse)
instance
Prelude.NFData
GetSecurityConfigurationsResponse