{-# 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.AppFlow.ListConnectorEntities
(
ListConnectorEntities (..),
newListConnectorEntities,
listConnectorEntities_apiVersion,
listConnectorEntities_connectorProfileName,
listConnectorEntities_connectorType,
listConnectorEntities_entitiesPath,
listConnectorEntities_maxResults,
listConnectorEntities_nextToken,
ListConnectorEntitiesResponse (..),
newListConnectorEntitiesResponse,
listConnectorEntitiesResponse_nextToken,
listConnectorEntitiesResponse_httpStatus,
listConnectorEntitiesResponse_connectorEntityMap,
)
where
import Amazonka.AppFlow.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 ListConnectorEntities = ListConnectorEntities'
{
ListConnectorEntities -> Maybe Text
apiVersion :: Prelude.Maybe Prelude.Text,
ListConnectorEntities -> Maybe Text
connectorProfileName :: Prelude.Maybe Prelude.Text,
ListConnectorEntities -> Maybe ConnectorType
connectorType :: Prelude.Maybe ConnectorType,
ListConnectorEntities -> Maybe Text
entitiesPath :: Prelude.Maybe Prelude.Text,
ListConnectorEntities -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListConnectorEntities -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
}
deriving (ListConnectorEntities -> ListConnectorEntities -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListConnectorEntities -> ListConnectorEntities -> Bool
$c/= :: ListConnectorEntities -> ListConnectorEntities -> Bool
== :: ListConnectorEntities -> ListConnectorEntities -> Bool
$c== :: ListConnectorEntities -> ListConnectorEntities -> Bool
Prelude.Eq, ReadPrec [ListConnectorEntities]
ReadPrec ListConnectorEntities
Int -> ReadS ListConnectorEntities
ReadS [ListConnectorEntities]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListConnectorEntities]
$creadListPrec :: ReadPrec [ListConnectorEntities]
readPrec :: ReadPrec ListConnectorEntities
$creadPrec :: ReadPrec ListConnectorEntities
readList :: ReadS [ListConnectorEntities]
$creadList :: ReadS [ListConnectorEntities]
readsPrec :: Int -> ReadS ListConnectorEntities
$creadsPrec :: Int -> ReadS ListConnectorEntities
Prelude.Read, Int -> ListConnectorEntities -> ShowS
[ListConnectorEntities] -> ShowS
ListConnectorEntities -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListConnectorEntities] -> ShowS
$cshowList :: [ListConnectorEntities] -> ShowS
show :: ListConnectorEntities -> String
$cshow :: ListConnectorEntities -> String
showsPrec :: Int -> ListConnectorEntities -> ShowS
$cshowsPrec :: Int -> ListConnectorEntities -> ShowS
Prelude.Show, forall x. Rep ListConnectorEntities x -> ListConnectorEntities
forall x. ListConnectorEntities -> Rep ListConnectorEntities x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListConnectorEntities x -> ListConnectorEntities
$cfrom :: forall x. ListConnectorEntities -> Rep ListConnectorEntities x
Prelude.Generic)
newListConnectorEntities ::
ListConnectorEntities
newListConnectorEntities :: ListConnectorEntities
newListConnectorEntities =
ListConnectorEntities'
{ $sel:apiVersion:ListConnectorEntities' :: Maybe Text
apiVersion =
forall a. Maybe a
Prelude.Nothing,
$sel:connectorProfileName:ListConnectorEntities' :: Maybe Text
connectorProfileName = forall a. Maybe a
Prelude.Nothing,
$sel:connectorType:ListConnectorEntities' :: Maybe ConnectorType
connectorType = forall a. Maybe a
Prelude.Nothing,
$sel:entitiesPath:ListConnectorEntities' :: Maybe Text
entitiesPath = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListConnectorEntities' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListConnectorEntities' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
}
listConnectorEntities_apiVersion :: Lens.Lens' ListConnectorEntities (Prelude.Maybe Prelude.Text)
listConnectorEntities_apiVersion :: Lens' ListConnectorEntities (Maybe Text)
listConnectorEntities_apiVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntities' {Maybe Text
apiVersion :: Maybe Text
$sel:apiVersion:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
apiVersion} -> Maybe Text
apiVersion) (\s :: ListConnectorEntities
s@ListConnectorEntities' {} Maybe Text
a -> ListConnectorEntities
s {$sel:apiVersion:ListConnectorEntities' :: Maybe Text
apiVersion = Maybe Text
a} :: ListConnectorEntities)
listConnectorEntities_connectorProfileName :: Lens.Lens' ListConnectorEntities (Prelude.Maybe Prelude.Text)
listConnectorEntities_connectorProfileName :: Lens' ListConnectorEntities (Maybe Text)
listConnectorEntities_connectorProfileName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntities' {Maybe Text
connectorProfileName :: Maybe Text
$sel:connectorProfileName:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
connectorProfileName} -> Maybe Text
connectorProfileName) (\s :: ListConnectorEntities
s@ListConnectorEntities' {} Maybe Text
a -> ListConnectorEntities
s {$sel:connectorProfileName:ListConnectorEntities' :: Maybe Text
connectorProfileName = Maybe Text
a} :: ListConnectorEntities)
listConnectorEntities_connectorType :: Lens.Lens' ListConnectorEntities (Prelude.Maybe ConnectorType)
listConnectorEntities_connectorType :: Lens' ListConnectorEntities (Maybe ConnectorType)
listConnectorEntities_connectorType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntities' {Maybe ConnectorType
connectorType :: Maybe ConnectorType
$sel:connectorType:ListConnectorEntities' :: ListConnectorEntities -> Maybe ConnectorType
connectorType} -> Maybe ConnectorType
connectorType) (\s :: ListConnectorEntities
s@ListConnectorEntities' {} Maybe ConnectorType
a -> ListConnectorEntities
s {$sel:connectorType:ListConnectorEntities' :: Maybe ConnectorType
connectorType = Maybe ConnectorType
a} :: ListConnectorEntities)
listConnectorEntities_entitiesPath :: Lens.Lens' ListConnectorEntities (Prelude.Maybe Prelude.Text)
listConnectorEntities_entitiesPath :: Lens' ListConnectorEntities (Maybe Text)
listConnectorEntities_entitiesPath = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntities' {Maybe Text
entitiesPath :: Maybe Text
$sel:entitiesPath:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
entitiesPath} -> Maybe Text
entitiesPath) (\s :: ListConnectorEntities
s@ListConnectorEntities' {} Maybe Text
a -> ListConnectorEntities
s {$sel:entitiesPath:ListConnectorEntities' :: Maybe Text
entitiesPath = Maybe Text
a} :: ListConnectorEntities)
listConnectorEntities_maxResults :: Lens.Lens' ListConnectorEntities (Prelude.Maybe Prelude.Natural)
listConnectorEntities_maxResults :: Lens' ListConnectorEntities (Maybe Natural)
listConnectorEntities_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntities' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListConnectorEntities' :: ListConnectorEntities -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListConnectorEntities
s@ListConnectorEntities' {} Maybe Natural
a -> ListConnectorEntities
s {$sel:maxResults:ListConnectorEntities' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListConnectorEntities)
listConnectorEntities_nextToken :: Lens.Lens' ListConnectorEntities (Prelude.Maybe Prelude.Text)
listConnectorEntities_nextToken :: Lens' ListConnectorEntities (Maybe Text)
listConnectorEntities_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntities' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListConnectorEntities
s@ListConnectorEntities' {} Maybe Text
a -> ListConnectorEntities
s {$sel:nextToken:ListConnectorEntities' :: Maybe Text
nextToken = Maybe Text
a} :: ListConnectorEntities)
instance Core.AWSRequest ListConnectorEntities where
type
AWSResponse ListConnectorEntities =
ListConnectorEntitiesResponse
request :: (Service -> Service)
-> ListConnectorEntities -> Request ListConnectorEntities
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 ListConnectorEntities
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListConnectorEntities)))
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
-> Int
-> HashMap Text [ConnectorEntity]
-> ListConnectorEntitiesResponse
ListConnectorEntitiesResponse'
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
"nextToken")
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))
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
"connectorEntityMap"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
)
instance Prelude.Hashable ListConnectorEntities where
hashWithSalt :: Int -> ListConnectorEntities -> Int
hashWithSalt Int
_salt ListConnectorEntities' {Maybe Natural
Maybe Text
Maybe ConnectorType
nextToken :: Maybe Text
maxResults :: Maybe Natural
entitiesPath :: Maybe Text
connectorType :: Maybe ConnectorType
connectorProfileName :: Maybe Text
apiVersion :: Maybe Text
$sel:nextToken:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:maxResults:ListConnectorEntities' :: ListConnectorEntities -> Maybe Natural
$sel:entitiesPath:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:connectorType:ListConnectorEntities' :: ListConnectorEntities -> Maybe ConnectorType
$sel:connectorProfileName:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:apiVersion:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
apiVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
connectorProfileName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ConnectorType
connectorType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
entitiesPath
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
instance Prelude.NFData ListConnectorEntities where
rnf :: ListConnectorEntities -> ()
rnf ListConnectorEntities' {Maybe Natural
Maybe Text
Maybe ConnectorType
nextToken :: Maybe Text
maxResults :: Maybe Natural
entitiesPath :: Maybe Text
connectorType :: Maybe ConnectorType
connectorProfileName :: Maybe Text
apiVersion :: Maybe Text
$sel:nextToken:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:maxResults:ListConnectorEntities' :: ListConnectorEntities -> Maybe Natural
$sel:entitiesPath:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:connectorType:ListConnectorEntities' :: ListConnectorEntities -> Maybe ConnectorType
$sel:connectorProfileName:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:apiVersion:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
apiVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
connectorProfileName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ConnectorType
connectorType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
entitiesPath
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
instance Data.ToHeaders ListConnectorEntities where
toHeaders :: ListConnectorEntities -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON ListConnectorEntities where
toJSON :: ListConnectorEntities -> Value
toJSON ListConnectorEntities' {Maybe Natural
Maybe Text
Maybe ConnectorType
nextToken :: Maybe Text
maxResults :: Maybe Natural
entitiesPath :: Maybe Text
connectorType :: Maybe ConnectorType
connectorProfileName :: Maybe Text
apiVersion :: Maybe Text
$sel:nextToken:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:maxResults:ListConnectorEntities' :: ListConnectorEntities -> Maybe Natural
$sel:entitiesPath:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:connectorType:ListConnectorEntities' :: ListConnectorEntities -> Maybe ConnectorType
$sel:connectorProfileName:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
$sel:apiVersion:ListConnectorEntities' :: ListConnectorEntities -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"apiVersion" 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
apiVersion,
(Key
"connectorProfileName" 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
connectorProfileName,
(Key
"connectorType" 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 ConnectorType
connectorType,
(Key
"entitiesPath" 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
entitiesPath,
(Key
"maxResults" 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 Natural
maxResults,
(Key
"nextToken" 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
nextToken
]
)
instance Data.ToPath ListConnectorEntities where
toPath :: ListConnectorEntities -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/list-connector-entities"
instance Data.ToQuery ListConnectorEntities where
toQuery :: ListConnectorEntities -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListConnectorEntitiesResponse = ListConnectorEntitiesResponse'
{
ListConnectorEntitiesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListConnectorEntitiesResponse -> Int
httpStatus :: Prelude.Int,
ListConnectorEntitiesResponse -> HashMap Text [ConnectorEntity]
connectorEntityMap :: Prelude.HashMap Prelude.Text [ConnectorEntity]
}
deriving (ListConnectorEntitiesResponse
-> ListConnectorEntitiesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListConnectorEntitiesResponse
-> ListConnectorEntitiesResponse -> Bool
$c/= :: ListConnectorEntitiesResponse
-> ListConnectorEntitiesResponse -> Bool
== :: ListConnectorEntitiesResponse
-> ListConnectorEntitiesResponse -> Bool
$c== :: ListConnectorEntitiesResponse
-> ListConnectorEntitiesResponse -> Bool
Prelude.Eq, ReadPrec [ListConnectorEntitiesResponse]
ReadPrec ListConnectorEntitiesResponse
Int -> ReadS ListConnectorEntitiesResponse
ReadS [ListConnectorEntitiesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListConnectorEntitiesResponse]
$creadListPrec :: ReadPrec [ListConnectorEntitiesResponse]
readPrec :: ReadPrec ListConnectorEntitiesResponse
$creadPrec :: ReadPrec ListConnectorEntitiesResponse
readList :: ReadS [ListConnectorEntitiesResponse]
$creadList :: ReadS [ListConnectorEntitiesResponse]
readsPrec :: Int -> ReadS ListConnectorEntitiesResponse
$creadsPrec :: Int -> ReadS ListConnectorEntitiesResponse
Prelude.Read, Int -> ListConnectorEntitiesResponse -> ShowS
[ListConnectorEntitiesResponse] -> ShowS
ListConnectorEntitiesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListConnectorEntitiesResponse] -> ShowS
$cshowList :: [ListConnectorEntitiesResponse] -> ShowS
show :: ListConnectorEntitiesResponse -> String
$cshow :: ListConnectorEntitiesResponse -> String
showsPrec :: Int -> ListConnectorEntitiesResponse -> ShowS
$cshowsPrec :: Int -> ListConnectorEntitiesResponse -> ShowS
Prelude.Show, forall x.
Rep ListConnectorEntitiesResponse x
-> ListConnectorEntitiesResponse
forall x.
ListConnectorEntitiesResponse
-> Rep ListConnectorEntitiesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListConnectorEntitiesResponse x
-> ListConnectorEntitiesResponse
$cfrom :: forall x.
ListConnectorEntitiesResponse
-> Rep ListConnectorEntitiesResponse x
Prelude.Generic)
newListConnectorEntitiesResponse ::
Prelude.Int ->
ListConnectorEntitiesResponse
newListConnectorEntitiesResponse :: Int -> ListConnectorEntitiesResponse
newListConnectorEntitiesResponse Int
pHttpStatus_ =
ListConnectorEntitiesResponse'
{ $sel:nextToken:ListConnectorEntitiesResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListConnectorEntitiesResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:connectorEntityMap:ListConnectorEntitiesResponse' :: HashMap Text [ConnectorEntity]
connectorEntityMap = forall a. Monoid a => a
Prelude.mempty
}
listConnectorEntitiesResponse_nextToken :: Lens.Lens' ListConnectorEntitiesResponse (Prelude.Maybe Prelude.Text)
listConnectorEntitiesResponse_nextToken :: Lens' ListConnectorEntitiesResponse (Maybe Text)
listConnectorEntitiesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntitiesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListConnectorEntitiesResponse' :: ListConnectorEntitiesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListConnectorEntitiesResponse
s@ListConnectorEntitiesResponse' {} Maybe Text
a -> ListConnectorEntitiesResponse
s {$sel:nextToken:ListConnectorEntitiesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListConnectorEntitiesResponse)
listConnectorEntitiesResponse_httpStatus :: Lens.Lens' ListConnectorEntitiesResponse Prelude.Int
listConnectorEntitiesResponse_httpStatus :: Lens' ListConnectorEntitiesResponse Int
listConnectorEntitiesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntitiesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListConnectorEntitiesResponse' :: ListConnectorEntitiesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListConnectorEntitiesResponse
s@ListConnectorEntitiesResponse' {} Int
a -> ListConnectorEntitiesResponse
s {$sel:httpStatus:ListConnectorEntitiesResponse' :: Int
httpStatus = Int
a} :: ListConnectorEntitiesResponse)
listConnectorEntitiesResponse_connectorEntityMap :: Lens.Lens' ListConnectorEntitiesResponse (Prelude.HashMap Prelude.Text [ConnectorEntity])
listConnectorEntitiesResponse_connectorEntityMap :: Lens'
ListConnectorEntitiesResponse (HashMap Text [ConnectorEntity])
listConnectorEntitiesResponse_connectorEntityMap = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListConnectorEntitiesResponse' {HashMap Text [ConnectorEntity]
connectorEntityMap :: HashMap Text [ConnectorEntity]
$sel:connectorEntityMap:ListConnectorEntitiesResponse' :: ListConnectorEntitiesResponse -> HashMap Text [ConnectorEntity]
connectorEntityMap} -> HashMap Text [ConnectorEntity]
connectorEntityMap) (\s :: ListConnectorEntitiesResponse
s@ListConnectorEntitiesResponse' {} HashMap Text [ConnectorEntity]
a -> ListConnectorEntitiesResponse
s {$sel:connectorEntityMap:ListConnectorEntitiesResponse' :: HashMap Text [ConnectorEntity]
connectorEntityMap = HashMap Text [ConnectorEntity]
a} :: ListConnectorEntitiesResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
instance Prelude.NFData ListConnectorEntitiesResponse where
rnf :: ListConnectorEntitiesResponse -> ()
rnf ListConnectorEntitiesResponse' {Int
Maybe Text
HashMap Text [ConnectorEntity]
connectorEntityMap :: HashMap Text [ConnectorEntity]
httpStatus :: Int
nextToken :: Maybe Text
$sel:connectorEntityMap:ListConnectorEntitiesResponse' :: ListConnectorEntitiesResponse -> HashMap Text [ConnectorEntity]
$sel:httpStatus:ListConnectorEntitiesResponse' :: ListConnectorEntitiesResponse -> Int
$sel:nextToken:ListConnectorEntitiesResponse' :: ListConnectorEntitiesResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` 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 HashMap Text [ConnectorEntity]
connectorEntityMap