{-# 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.KafkaConnect.DescribeConnector
(
DescribeConnector (..),
newDescribeConnector,
describeConnector_connectorArn,
DescribeConnectorResponse (..),
newDescribeConnectorResponse,
describeConnectorResponse_capacity,
describeConnectorResponse_connectorArn,
describeConnectorResponse_connectorConfiguration,
describeConnectorResponse_connectorDescription,
describeConnectorResponse_connectorName,
describeConnectorResponse_connectorState,
describeConnectorResponse_creationTime,
describeConnectorResponse_currentVersion,
describeConnectorResponse_kafkaCluster,
describeConnectorResponse_kafkaClusterClientAuthentication,
describeConnectorResponse_kafkaClusterEncryptionInTransit,
describeConnectorResponse_kafkaConnectVersion,
describeConnectorResponse_logDelivery,
describeConnectorResponse_plugins,
describeConnectorResponse_serviceExecutionRoleArn,
describeConnectorResponse_stateDescription,
describeConnectorResponse_workerConfiguration,
describeConnectorResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.KafkaConnect.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeConnector = DescribeConnector'
{
DescribeConnector -> Text
connectorArn :: Prelude.Text
}
deriving (DescribeConnector -> DescribeConnector -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeConnector -> DescribeConnector -> Bool
$c/= :: DescribeConnector -> DescribeConnector -> Bool
== :: DescribeConnector -> DescribeConnector -> Bool
$c== :: DescribeConnector -> DescribeConnector -> Bool
Prelude.Eq, ReadPrec [DescribeConnector]
ReadPrec DescribeConnector
Int -> ReadS DescribeConnector
ReadS [DescribeConnector]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeConnector]
$creadListPrec :: ReadPrec [DescribeConnector]
readPrec :: ReadPrec DescribeConnector
$creadPrec :: ReadPrec DescribeConnector
readList :: ReadS [DescribeConnector]
$creadList :: ReadS [DescribeConnector]
readsPrec :: Int -> ReadS DescribeConnector
$creadsPrec :: Int -> ReadS DescribeConnector
Prelude.Read, Int -> DescribeConnector -> ShowS
[DescribeConnector] -> ShowS
DescribeConnector -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeConnector] -> ShowS
$cshowList :: [DescribeConnector] -> ShowS
show :: DescribeConnector -> String
$cshow :: DescribeConnector -> String
showsPrec :: Int -> DescribeConnector -> ShowS
$cshowsPrec :: Int -> DescribeConnector -> ShowS
Prelude.Show, forall x. Rep DescribeConnector x -> DescribeConnector
forall x. DescribeConnector -> Rep DescribeConnector x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeConnector x -> DescribeConnector
$cfrom :: forall x. DescribeConnector -> Rep DescribeConnector x
Prelude.Generic)
newDescribeConnector ::
Prelude.Text ->
DescribeConnector
newDescribeConnector :: Text -> DescribeConnector
newDescribeConnector Text
pConnectorArn_ =
DescribeConnector' {$sel:connectorArn:DescribeConnector' :: Text
connectorArn = Text
pConnectorArn_}
describeConnector_connectorArn :: Lens.Lens' DescribeConnector Prelude.Text
describeConnector_connectorArn :: Lens' DescribeConnector Text
describeConnector_connectorArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnector' {Text
connectorArn :: Text
$sel:connectorArn:DescribeConnector' :: DescribeConnector -> Text
connectorArn} -> Text
connectorArn) (\s :: DescribeConnector
s@DescribeConnector' {} Text
a -> DescribeConnector
s {$sel:connectorArn:DescribeConnector' :: Text
connectorArn = Text
a} :: DescribeConnector)
instance Core.AWSRequest DescribeConnector where
type
AWSResponse DescribeConnector =
DescribeConnectorResponse
request :: (Service -> Service)
-> DescribeConnector -> Request DescribeConnector
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DescribeConnector
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeConnector)))
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 CapacityDescription
-> Maybe Text
-> Maybe (Sensitive (HashMap Text Text))
-> Maybe Text
-> Maybe Text
-> Maybe ConnectorState
-> Maybe ISO8601
-> Maybe Text
-> Maybe KafkaClusterDescription
-> Maybe KafkaClusterClientAuthenticationDescription
-> Maybe KafkaClusterEncryptionInTransitDescription
-> Maybe Text
-> Maybe LogDeliveryDescription
-> Maybe [PluginDescription]
-> Maybe Text
-> Maybe StateDescription
-> Maybe WorkerConfigurationDescription
-> Int
-> DescribeConnectorResponse
DescribeConnectorResponse'
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
"capacity")
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
"connectorArn")
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
"connectorConfiguration"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"connectorDescription")
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
"connectorName")
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
"connectorState")
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
"creationTime")
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
"currentVersion")
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
"kafkaCluster")
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
"kafkaClusterClientAuthentication")
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
"kafkaClusterEncryptionInTransit")
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
"kafkaConnectVersion")
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
"logDelivery")
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
"plugins" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"serviceExecutionRoleArn")
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
"stateDescription")
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
"workerConfiguration")
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 DescribeConnector where
hashWithSalt :: Int -> DescribeConnector -> Int
hashWithSalt Int
_salt DescribeConnector' {Text
connectorArn :: Text
$sel:connectorArn:DescribeConnector' :: DescribeConnector -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
connectorArn
instance Prelude.NFData DescribeConnector where
rnf :: DescribeConnector -> ()
rnf DescribeConnector' {Text
connectorArn :: Text
$sel:connectorArn:DescribeConnector' :: DescribeConnector -> Text
..} = forall a. NFData a => a -> ()
Prelude.rnf Text
connectorArn
instance Data.ToHeaders DescribeConnector where
toHeaders :: DescribeConnector -> 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.ToPath DescribeConnector where
toPath :: DescribeConnector -> ByteString
toPath DescribeConnector' {Text
connectorArn :: Text
$sel:connectorArn:DescribeConnector' :: DescribeConnector -> Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/v1/connectors/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
connectorArn]
instance Data.ToQuery DescribeConnector where
toQuery :: DescribeConnector -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeConnectorResponse = DescribeConnectorResponse'
{
DescribeConnectorResponse -> Maybe CapacityDescription
capacity :: Prelude.Maybe CapacityDescription,
DescribeConnectorResponse -> Maybe Text
connectorArn :: Prelude.Maybe Prelude.Text,
DescribeConnectorResponse -> Maybe (Sensitive (HashMap Text Text))
connectorConfiguration :: Prelude.Maybe (Data.Sensitive (Prelude.HashMap Prelude.Text Prelude.Text)),
DescribeConnectorResponse -> Maybe Text
connectorDescription :: Prelude.Maybe Prelude.Text,
DescribeConnectorResponse -> Maybe Text
connectorName :: Prelude.Maybe Prelude.Text,
DescribeConnectorResponse -> Maybe ConnectorState
connectorState :: Prelude.Maybe ConnectorState,
DescribeConnectorResponse -> Maybe ISO8601
creationTime :: Prelude.Maybe Data.ISO8601,
DescribeConnectorResponse -> Maybe Text
currentVersion :: Prelude.Maybe Prelude.Text,
DescribeConnectorResponse -> Maybe KafkaClusterDescription
kafkaCluster :: Prelude.Maybe KafkaClusterDescription,
DescribeConnectorResponse
-> Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication :: Prelude.Maybe KafkaClusterClientAuthenticationDescription,
DescribeConnectorResponse
-> Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit :: Prelude.Maybe KafkaClusterEncryptionInTransitDescription,
DescribeConnectorResponse -> Maybe Text
kafkaConnectVersion :: Prelude.Maybe Prelude.Text,
DescribeConnectorResponse -> Maybe LogDeliveryDescription
logDelivery :: Prelude.Maybe LogDeliveryDescription,
DescribeConnectorResponse -> Maybe [PluginDescription]
plugins :: Prelude.Maybe [PluginDescription],
DescribeConnectorResponse -> Maybe Text
serviceExecutionRoleArn :: Prelude.Maybe Prelude.Text,
DescribeConnectorResponse -> Maybe StateDescription
stateDescription :: Prelude.Maybe StateDescription,
DescribeConnectorResponse -> Maybe WorkerConfigurationDescription
workerConfiguration :: Prelude.Maybe WorkerConfigurationDescription,
DescribeConnectorResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeConnectorResponse -> DescribeConnectorResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeConnectorResponse -> DescribeConnectorResponse -> Bool
$c/= :: DescribeConnectorResponse -> DescribeConnectorResponse -> Bool
== :: DescribeConnectorResponse -> DescribeConnectorResponse -> Bool
$c== :: DescribeConnectorResponse -> DescribeConnectorResponse -> Bool
Prelude.Eq, Int -> DescribeConnectorResponse -> ShowS
[DescribeConnectorResponse] -> ShowS
DescribeConnectorResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeConnectorResponse] -> ShowS
$cshowList :: [DescribeConnectorResponse] -> ShowS
show :: DescribeConnectorResponse -> String
$cshow :: DescribeConnectorResponse -> String
showsPrec :: Int -> DescribeConnectorResponse -> ShowS
$cshowsPrec :: Int -> DescribeConnectorResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeConnectorResponse x -> DescribeConnectorResponse
forall x.
DescribeConnectorResponse -> Rep DescribeConnectorResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeConnectorResponse x -> DescribeConnectorResponse
$cfrom :: forall x.
DescribeConnectorResponse -> Rep DescribeConnectorResponse x
Prelude.Generic)
newDescribeConnectorResponse ::
Prelude.Int ->
DescribeConnectorResponse
newDescribeConnectorResponse :: Int -> DescribeConnectorResponse
newDescribeConnectorResponse Int
pHttpStatus_ =
DescribeConnectorResponse'
{ $sel:capacity:DescribeConnectorResponse' :: Maybe CapacityDescription
capacity =
forall a. Maybe a
Prelude.Nothing,
$sel:connectorArn:DescribeConnectorResponse' :: Maybe Text
connectorArn = forall a. Maybe a
Prelude.Nothing,
$sel:connectorConfiguration:DescribeConnectorResponse' :: Maybe (Sensitive (HashMap Text Text))
connectorConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:connectorDescription:DescribeConnectorResponse' :: Maybe Text
connectorDescription = forall a. Maybe a
Prelude.Nothing,
$sel:connectorName:DescribeConnectorResponse' :: Maybe Text
connectorName = forall a. Maybe a
Prelude.Nothing,
$sel:connectorState:DescribeConnectorResponse' :: Maybe ConnectorState
connectorState = forall a. Maybe a
Prelude.Nothing,
$sel:creationTime:DescribeConnectorResponse' :: Maybe ISO8601
creationTime = forall a. Maybe a
Prelude.Nothing,
$sel:currentVersion:DescribeConnectorResponse' :: Maybe Text
currentVersion = forall a. Maybe a
Prelude.Nothing,
$sel:kafkaCluster:DescribeConnectorResponse' :: Maybe KafkaClusterDescription
kafkaCluster = forall a. Maybe a
Prelude.Nothing,
$sel:kafkaClusterClientAuthentication:DescribeConnectorResponse' :: Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication =
forall a. Maybe a
Prelude.Nothing,
$sel:kafkaClusterEncryptionInTransit:DescribeConnectorResponse' :: Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit =
forall a. Maybe a
Prelude.Nothing,
$sel:kafkaConnectVersion:DescribeConnectorResponse' :: Maybe Text
kafkaConnectVersion = forall a. Maybe a
Prelude.Nothing,
$sel:logDelivery:DescribeConnectorResponse' :: Maybe LogDeliveryDescription
logDelivery = forall a. Maybe a
Prelude.Nothing,
$sel:plugins:DescribeConnectorResponse' :: Maybe [PluginDescription]
plugins = forall a. Maybe a
Prelude.Nothing,
$sel:serviceExecutionRoleArn:DescribeConnectorResponse' :: Maybe Text
serviceExecutionRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:stateDescription:DescribeConnectorResponse' :: Maybe StateDescription
stateDescription = forall a. Maybe a
Prelude.Nothing,
$sel:workerConfiguration:DescribeConnectorResponse' :: Maybe WorkerConfigurationDescription
workerConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeConnectorResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeConnectorResponse_capacity :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe CapacityDescription)
describeConnectorResponse_capacity :: Lens' DescribeConnectorResponse (Maybe CapacityDescription)
describeConnectorResponse_capacity = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe CapacityDescription
capacity :: Maybe CapacityDescription
$sel:capacity:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe CapacityDescription
capacity} -> Maybe CapacityDescription
capacity) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe CapacityDescription
a -> DescribeConnectorResponse
s {$sel:capacity:DescribeConnectorResponse' :: Maybe CapacityDescription
capacity = Maybe CapacityDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_connectorArn :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.Text)
describeConnectorResponse_connectorArn :: Lens' DescribeConnectorResponse (Maybe Text)
describeConnectorResponse_connectorArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe Text
connectorArn :: Maybe Text
$sel:connectorArn:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
connectorArn} -> Maybe Text
connectorArn) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe Text
a -> DescribeConnectorResponse
s {$sel:connectorArn:DescribeConnectorResponse' :: Maybe Text
connectorArn = Maybe Text
a} :: DescribeConnectorResponse)
describeConnectorResponse_connectorConfiguration :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
describeConnectorResponse_connectorConfiguration :: Lens' DescribeConnectorResponse (Maybe (HashMap Text Text))
describeConnectorResponse_connectorConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe (Sensitive (HashMap Text Text))
connectorConfiguration :: Maybe (Sensitive (HashMap Text Text))
$sel:connectorConfiguration:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe (Sensitive (HashMap Text Text))
connectorConfiguration} -> Maybe (Sensitive (HashMap Text Text))
connectorConfiguration) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe (Sensitive (HashMap Text Text))
a -> DescribeConnectorResponse
s {$sel:connectorConfiguration:DescribeConnectorResponse' :: Maybe (Sensitive (HashMap Text Text))
connectorConfiguration = Maybe (Sensitive (HashMap Text Text))
a} :: DescribeConnectorResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping (forall a. Iso' (Sensitive a) a
Data._Sensitive 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)
describeConnectorResponse_connectorDescription :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.Text)
describeConnectorResponse_connectorDescription :: Lens' DescribeConnectorResponse (Maybe Text)
describeConnectorResponse_connectorDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe Text
connectorDescription :: Maybe Text
$sel:connectorDescription:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
connectorDescription} -> Maybe Text
connectorDescription) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe Text
a -> DescribeConnectorResponse
s {$sel:connectorDescription:DescribeConnectorResponse' :: Maybe Text
connectorDescription = Maybe Text
a} :: DescribeConnectorResponse)
describeConnectorResponse_connectorName :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.Text)
describeConnectorResponse_connectorName :: Lens' DescribeConnectorResponse (Maybe Text)
describeConnectorResponse_connectorName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe Text
connectorName :: Maybe Text
$sel:connectorName:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
connectorName} -> Maybe Text
connectorName) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe Text
a -> DescribeConnectorResponse
s {$sel:connectorName:DescribeConnectorResponse' :: Maybe Text
connectorName = Maybe Text
a} :: DescribeConnectorResponse)
describeConnectorResponse_connectorState :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe ConnectorState)
describeConnectorResponse_connectorState :: Lens' DescribeConnectorResponse (Maybe ConnectorState)
describeConnectorResponse_connectorState = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe ConnectorState
connectorState :: Maybe ConnectorState
$sel:connectorState:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe ConnectorState
connectorState} -> Maybe ConnectorState
connectorState) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe ConnectorState
a -> DescribeConnectorResponse
s {$sel:connectorState:DescribeConnectorResponse' :: Maybe ConnectorState
connectorState = Maybe ConnectorState
a} :: DescribeConnectorResponse)
describeConnectorResponse_creationTime :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.UTCTime)
describeConnectorResponse_creationTime :: Lens' DescribeConnectorResponse (Maybe UTCTime)
describeConnectorResponse_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe ISO8601
creationTime :: Maybe ISO8601
$sel:creationTime:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe ISO8601
creationTime} -> Maybe ISO8601
creationTime) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe ISO8601
a -> DescribeConnectorResponse
s {$sel:creationTime:DescribeConnectorResponse' :: Maybe ISO8601
creationTime = Maybe ISO8601
a} :: DescribeConnectorResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
describeConnectorResponse_currentVersion :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.Text)
describeConnectorResponse_currentVersion :: Lens' DescribeConnectorResponse (Maybe Text)
describeConnectorResponse_currentVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe Text
currentVersion :: Maybe Text
$sel:currentVersion:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
currentVersion} -> Maybe Text
currentVersion) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe Text
a -> DescribeConnectorResponse
s {$sel:currentVersion:DescribeConnectorResponse' :: Maybe Text
currentVersion = Maybe Text
a} :: DescribeConnectorResponse)
describeConnectorResponse_kafkaCluster :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe KafkaClusterDescription)
describeConnectorResponse_kafkaCluster :: Lens' DescribeConnectorResponse (Maybe KafkaClusterDescription)
describeConnectorResponse_kafkaCluster = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe KafkaClusterDescription
kafkaCluster :: Maybe KafkaClusterDescription
$sel:kafkaCluster:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe KafkaClusterDescription
kafkaCluster} -> Maybe KafkaClusterDescription
kafkaCluster) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe KafkaClusterDescription
a -> DescribeConnectorResponse
s {$sel:kafkaCluster:DescribeConnectorResponse' :: Maybe KafkaClusterDescription
kafkaCluster = Maybe KafkaClusterDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_kafkaClusterClientAuthentication :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe KafkaClusterClientAuthenticationDescription)
describeConnectorResponse_kafkaClusterClientAuthentication :: Lens'
DescribeConnectorResponse
(Maybe KafkaClusterClientAuthenticationDescription)
describeConnectorResponse_kafkaClusterClientAuthentication = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication :: Maybe KafkaClusterClientAuthenticationDescription
$sel:kafkaClusterClientAuthentication:DescribeConnectorResponse' :: DescribeConnectorResponse
-> Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication} -> Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe KafkaClusterClientAuthenticationDescription
a -> DescribeConnectorResponse
s {$sel:kafkaClusterClientAuthentication:DescribeConnectorResponse' :: Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication = Maybe KafkaClusterClientAuthenticationDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_kafkaClusterEncryptionInTransit :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe KafkaClusterEncryptionInTransitDescription)
describeConnectorResponse_kafkaClusterEncryptionInTransit :: Lens'
DescribeConnectorResponse
(Maybe KafkaClusterEncryptionInTransitDescription)
describeConnectorResponse_kafkaClusterEncryptionInTransit = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit :: Maybe KafkaClusterEncryptionInTransitDescription
$sel:kafkaClusterEncryptionInTransit:DescribeConnectorResponse' :: DescribeConnectorResponse
-> Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit} -> Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe KafkaClusterEncryptionInTransitDescription
a -> DescribeConnectorResponse
s {$sel:kafkaClusterEncryptionInTransit:DescribeConnectorResponse' :: Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit = Maybe KafkaClusterEncryptionInTransitDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_kafkaConnectVersion :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.Text)
describeConnectorResponse_kafkaConnectVersion :: Lens' DescribeConnectorResponse (Maybe Text)
describeConnectorResponse_kafkaConnectVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe Text
kafkaConnectVersion :: Maybe Text
$sel:kafkaConnectVersion:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
kafkaConnectVersion} -> Maybe Text
kafkaConnectVersion) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe Text
a -> DescribeConnectorResponse
s {$sel:kafkaConnectVersion:DescribeConnectorResponse' :: Maybe Text
kafkaConnectVersion = Maybe Text
a} :: DescribeConnectorResponse)
describeConnectorResponse_logDelivery :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe LogDeliveryDescription)
describeConnectorResponse_logDelivery :: Lens' DescribeConnectorResponse (Maybe LogDeliveryDescription)
describeConnectorResponse_logDelivery = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe LogDeliveryDescription
logDelivery :: Maybe LogDeliveryDescription
$sel:logDelivery:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe LogDeliveryDescription
logDelivery} -> Maybe LogDeliveryDescription
logDelivery) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe LogDeliveryDescription
a -> DescribeConnectorResponse
s {$sel:logDelivery:DescribeConnectorResponse' :: Maybe LogDeliveryDescription
logDelivery = Maybe LogDeliveryDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_plugins :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe [PluginDescription])
describeConnectorResponse_plugins :: Lens' DescribeConnectorResponse (Maybe [PluginDescription])
describeConnectorResponse_plugins = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe [PluginDescription]
plugins :: Maybe [PluginDescription]
$sel:plugins:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe [PluginDescription]
plugins} -> Maybe [PluginDescription]
plugins) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe [PluginDescription]
a -> DescribeConnectorResponse
s {$sel:plugins:DescribeConnectorResponse' :: Maybe [PluginDescription]
plugins = Maybe [PluginDescription]
a} :: DescribeConnectorResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeConnectorResponse_serviceExecutionRoleArn :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe Prelude.Text)
describeConnectorResponse_serviceExecutionRoleArn :: Lens' DescribeConnectorResponse (Maybe Text)
describeConnectorResponse_serviceExecutionRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe Text
serviceExecutionRoleArn :: Maybe Text
$sel:serviceExecutionRoleArn:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
serviceExecutionRoleArn} -> Maybe Text
serviceExecutionRoleArn) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe Text
a -> DescribeConnectorResponse
s {$sel:serviceExecutionRoleArn:DescribeConnectorResponse' :: Maybe Text
serviceExecutionRoleArn = Maybe Text
a} :: DescribeConnectorResponse)
describeConnectorResponse_stateDescription :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe StateDescription)
describeConnectorResponse_stateDescription :: Lens' DescribeConnectorResponse (Maybe StateDescription)
describeConnectorResponse_stateDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe StateDescription
stateDescription :: Maybe StateDescription
$sel:stateDescription:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe StateDescription
stateDescription} -> Maybe StateDescription
stateDescription) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe StateDescription
a -> DescribeConnectorResponse
s {$sel:stateDescription:DescribeConnectorResponse' :: Maybe StateDescription
stateDescription = Maybe StateDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_workerConfiguration :: Lens.Lens' DescribeConnectorResponse (Prelude.Maybe WorkerConfigurationDescription)
describeConnectorResponse_workerConfiguration :: Lens'
DescribeConnectorResponse (Maybe WorkerConfigurationDescription)
describeConnectorResponse_workerConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Maybe WorkerConfigurationDescription
workerConfiguration :: Maybe WorkerConfigurationDescription
$sel:workerConfiguration:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe WorkerConfigurationDescription
workerConfiguration} -> Maybe WorkerConfigurationDescription
workerConfiguration) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Maybe WorkerConfigurationDescription
a -> DescribeConnectorResponse
s {$sel:workerConfiguration:DescribeConnectorResponse' :: Maybe WorkerConfigurationDescription
workerConfiguration = Maybe WorkerConfigurationDescription
a} :: DescribeConnectorResponse)
describeConnectorResponse_httpStatus :: Lens.Lens' DescribeConnectorResponse Prelude.Int
describeConnectorResponse_httpStatus :: Lens' DescribeConnectorResponse Int
describeConnectorResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeConnectorResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeConnectorResponse' :: DescribeConnectorResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeConnectorResponse
s@DescribeConnectorResponse' {} Int
a -> DescribeConnectorResponse
s {$sel:httpStatus:DescribeConnectorResponse' :: Int
httpStatus = Int
a} :: DescribeConnectorResponse)
instance Prelude.NFData DescribeConnectorResponse where
rnf :: DescribeConnectorResponse -> ()
rnf DescribeConnectorResponse' {Int
Maybe [PluginDescription]
Maybe Text
Maybe (Sensitive (HashMap Text Text))
Maybe ISO8601
Maybe ConnectorState
Maybe KafkaClusterClientAuthenticationDescription
Maybe KafkaClusterEncryptionInTransitDescription
Maybe CapacityDescription
Maybe StateDescription
Maybe KafkaClusterDescription
Maybe WorkerConfigurationDescription
Maybe LogDeliveryDescription
httpStatus :: Int
workerConfiguration :: Maybe WorkerConfigurationDescription
stateDescription :: Maybe StateDescription
serviceExecutionRoleArn :: Maybe Text
plugins :: Maybe [PluginDescription]
logDelivery :: Maybe LogDeliveryDescription
kafkaConnectVersion :: Maybe Text
kafkaClusterEncryptionInTransit :: Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterClientAuthentication :: Maybe KafkaClusterClientAuthenticationDescription
kafkaCluster :: Maybe KafkaClusterDescription
currentVersion :: Maybe Text
creationTime :: Maybe ISO8601
connectorState :: Maybe ConnectorState
connectorName :: Maybe Text
connectorDescription :: Maybe Text
connectorConfiguration :: Maybe (Sensitive (HashMap Text Text))
connectorArn :: Maybe Text
capacity :: Maybe CapacityDescription
$sel:httpStatus:DescribeConnectorResponse' :: DescribeConnectorResponse -> Int
$sel:workerConfiguration:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe WorkerConfigurationDescription
$sel:stateDescription:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe StateDescription
$sel:serviceExecutionRoleArn:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
$sel:plugins:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe [PluginDescription]
$sel:logDelivery:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe LogDeliveryDescription
$sel:kafkaConnectVersion:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
$sel:kafkaClusterEncryptionInTransit:DescribeConnectorResponse' :: DescribeConnectorResponse
-> Maybe KafkaClusterEncryptionInTransitDescription
$sel:kafkaClusterClientAuthentication:DescribeConnectorResponse' :: DescribeConnectorResponse
-> Maybe KafkaClusterClientAuthenticationDescription
$sel:kafkaCluster:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe KafkaClusterDescription
$sel:currentVersion:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
$sel:creationTime:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe ISO8601
$sel:connectorState:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe ConnectorState
$sel:connectorName:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
$sel:connectorDescription:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
$sel:connectorConfiguration:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe (Sensitive (HashMap Text Text))
$sel:connectorArn:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe Text
$sel:capacity:DescribeConnectorResponse' :: DescribeConnectorResponse -> Maybe CapacityDescription
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe CapacityDescription
capacity
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
connectorArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive (HashMap Text Text))
connectorConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
connectorDescription
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
connectorName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ConnectorState
connectorState
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
creationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
currentVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe KafkaClusterDescription
kafkaCluster
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe KafkaClusterClientAuthenticationDescription
kafkaClusterClientAuthentication
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe KafkaClusterEncryptionInTransitDescription
kafkaClusterEncryptionInTransit
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
kafkaConnectVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LogDeliveryDescription
logDelivery
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [PluginDescription]
plugins
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
serviceExecutionRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe StateDescription
stateDescription
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe WorkerConfigurationDescription
workerConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus