{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.CustomerProfiles.Types.ConnectorOperator where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.CustomerProfiles.Types.MarketoConnectorOperator
import Amazonka.CustomerProfiles.Types.S3ConnectorOperator
import Amazonka.CustomerProfiles.Types.SalesforceConnectorOperator
import Amazonka.CustomerProfiles.Types.ServiceNowConnectorOperator
import Amazonka.CustomerProfiles.Types.ZendeskConnectorOperator
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
data ConnectorOperator = ConnectorOperator'
{
ConnectorOperator -> Maybe MarketoConnectorOperator
marketo :: Prelude.Maybe MarketoConnectorOperator,
ConnectorOperator -> Maybe S3ConnectorOperator
s3 :: Prelude.Maybe S3ConnectorOperator,
ConnectorOperator -> Maybe SalesforceConnectorOperator
salesforce :: Prelude.Maybe SalesforceConnectorOperator,
ConnectorOperator -> Maybe ServiceNowConnectorOperator
serviceNow :: Prelude.Maybe ServiceNowConnectorOperator,
ConnectorOperator -> Maybe ZendeskConnectorOperator
zendesk :: Prelude.Maybe ZendeskConnectorOperator
}
deriving (ConnectorOperator -> ConnectorOperator -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConnectorOperator -> ConnectorOperator -> Bool
$c/= :: ConnectorOperator -> ConnectorOperator -> Bool
== :: ConnectorOperator -> ConnectorOperator -> Bool
$c== :: ConnectorOperator -> ConnectorOperator -> Bool
Prelude.Eq, ReadPrec [ConnectorOperator]
ReadPrec ConnectorOperator
Int -> ReadS ConnectorOperator
ReadS [ConnectorOperator]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ConnectorOperator]
$creadListPrec :: ReadPrec [ConnectorOperator]
readPrec :: ReadPrec ConnectorOperator
$creadPrec :: ReadPrec ConnectorOperator
readList :: ReadS [ConnectorOperator]
$creadList :: ReadS [ConnectorOperator]
readsPrec :: Int -> ReadS ConnectorOperator
$creadsPrec :: Int -> ReadS ConnectorOperator
Prelude.Read, Int -> ConnectorOperator -> ShowS
[ConnectorOperator] -> ShowS
ConnectorOperator -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ConnectorOperator] -> ShowS
$cshowList :: [ConnectorOperator] -> ShowS
show :: ConnectorOperator -> String
$cshow :: ConnectorOperator -> String
showsPrec :: Int -> ConnectorOperator -> ShowS
$cshowsPrec :: Int -> ConnectorOperator -> ShowS
Prelude.Show, forall x. Rep ConnectorOperator x -> ConnectorOperator
forall x. ConnectorOperator -> Rep ConnectorOperator x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ConnectorOperator x -> ConnectorOperator
$cfrom :: forall x. ConnectorOperator -> Rep ConnectorOperator x
Prelude.Generic)
newConnectorOperator ::
ConnectorOperator
newConnectorOperator :: ConnectorOperator
newConnectorOperator =
ConnectorOperator'
{ $sel:marketo:ConnectorOperator' :: Maybe MarketoConnectorOperator
marketo = forall a. Maybe a
Prelude.Nothing,
$sel:s3:ConnectorOperator' :: Maybe S3ConnectorOperator
s3 = forall a. Maybe a
Prelude.Nothing,
$sel:salesforce:ConnectorOperator' :: Maybe SalesforceConnectorOperator
salesforce = forall a. Maybe a
Prelude.Nothing,
$sel:serviceNow:ConnectorOperator' :: Maybe ServiceNowConnectorOperator
serviceNow = forall a. Maybe a
Prelude.Nothing,
$sel:zendesk:ConnectorOperator' :: Maybe ZendeskConnectorOperator
zendesk = forall a. Maybe a
Prelude.Nothing
}
connectorOperator_marketo :: Lens.Lens' ConnectorOperator (Prelude.Maybe MarketoConnectorOperator)
connectorOperator_marketo :: Lens' ConnectorOperator (Maybe MarketoConnectorOperator)
connectorOperator_marketo = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ConnectorOperator' {Maybe MarketoConnectorOperator
marketo :: Maybe MarketoConnectorOperator
$sel:marketo:ConnectorOperator' :: ConnectorOperator -> Maybe MarketoConnectorOperator
marketo} -> Maybe MarketoConnectorOperator
marketo) (\s :: ConnectorOperator
s@ConnectorOperator' {} Maybe MarketoConnectorOperator
a -> ConnectorOperator
s {$sel:marketo:ConnectorOperator' :: Maybe MarketoConnectorOperator
marketo = Maybe MarketoConnectorOperator
a} :: ConnectorOperator)
connectorOperator_s3 :: Lens.Lens' ConnectorOperator (Prelude.Maybe S3ConnectorOperator)
connectorOperator_s3 :: Lens' ConnectorOperator (Maybe S3ConnectorOperator)
connectorOperator_s3 = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ConnectorOperator' {Maybe S3ConnectorOperator
s3 :: Maybe S3ConnectorOperator
$sel:s3:ConnectorOperator' :: ConnectorOperator -> Maybe S3ConnectorOperator
s3} -> Maybe S3ConnectorOperator
s3) (\s :: ConnectorOperator
s@ConnectorOperator' {} Maybe S3ConnectorOperator
a -> ConnectorOperator
s {$sel:s3:ConnectorOperator' :: Maybe S3ConnectorOperator
s3 = Maybe S3ConnectorOperator
a} :: ConnectorOperator)
connectorOperator_salesforce :: Lens.Lens' ConnectorOperator (Prelude.Maybe SalesforceConnectorOperator)
connectorOperator_salesforce :: Lens' ConnectorOperator (Maybe SalesforceConnectorOperator)
connectorOperator_salesforce = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ConnectorOperator' {Maybe SalesforceConnectorOperator
salesforce :: Maybe SalesforceConnectorOperator
$sel:salesforce:ConnectorOperator' :: ConnectorOperator -> Maybe SalesforceConnectorOperator
salesforce} -> Maybe SalesforceConnectorOperator
salesforce) (\s :: ConnectorOperator
s@ConnectorOperator' {} Maybe SalesforceConnectorOperator
a -> ConnectorOperator
s {$sel:salesforce:ConnectorOperator' :: Maybe SalesforceConnectorOperator
salesforce = Maybe SalesforceConnectorOperator
a} :: ConnectorOperator)
connectorOperator_serviceNow :: Lens.Lens' ConnectorOperator (Prelude.Maybe ServiceNowConnectorOperator)
connectorOperator_serviceNow :: Lens' ConnectorOperator (Maybe ServiceNowConnectorOperator)
connectorOperator_serviceNow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ConnectorOperator' {Maybe ServiceNowConnectorOperator
serviceNow :: Maybe ServiceNowConnectorOperator
$sel:serviceNow:ConnectorOperator' :: ConnectorOperator -> Maybe ServiceNowConnectorOperator
serviceNow} -> Maybe ServiceNowConnectorOperator
serviceNow) (\s :: ConnectorOperator
s@ConnectorOperator' {} Maybe ServiceNowConnectorOperator
a -> ConnectorOperator
s {$sel:serviceNow:ConnectorOperator' :: Maybe ServiceNowConnectorOperator
serviceNow = Maybe ServiceNowConnectorOperator
a} :: ConnectorOperator)
connectorOperator_zendesk :: Lens.Lens' ConnectorOperator (Prelude.Maybe ZendeskConnectorOperator)
connectorOperator_zendesk :: Lens' ConnectorOperator (Maybe ZendeskConnectorOperator)
connectorOperator_zendesk = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ConnectorOperator' {Maybe ZendeskConnectorOperator
zendesk :: Maybe ZendeskConnectorOperator
$sel:zendesk:ConnectorOperator' :: ConnectorOperator -> Maybe ZendeskConnectorOperator
zendesk} -> Maybe ZendeskConnectorOperator
zendesk) (\s :: ConnectorOperator
s@ConnectorOperator' {} Maybe ZendeskConnectorOperator
a -> ConnectorOperator
s {$sel:zendesk:ConnectorOperator' :: Maybe ZendeskConnectorOperator
zendesk = Maybe ZendeskConnectorOperator
a} :: ConnectorOperator)
instance Prelude.Hashable ConnectorOperator where
hashWithSalt :: Int -> ConnectorOperator -> Int
hashWithSalt Int
_salt ConnectorOperator' {Maybe MarketoConnectorOperator
Maybe S3ConnectorOperator
Maybe SalesforceConnectorOperator
Maybe ServiceNowConnectorOperator
Maybe ZendeskConnectorOperator
zendesk :: Maybe ZendeskConnectorOperator
serviceNow :: Maybe ServiceNowConnectorOperator
salesforce :: Maybe SalesforceConnectorOperator
s3 :: Maybe S3ConnectorOperator
marketo :: Maybe MarketoConnectorOperator
$sel:zendesk:ConnectorOperator' :: ConnectorOperator -> Maybe ZendeskConnectorOperator
$sel:serviceNow:ConnectorOperator' :: ConnectorOperator -> Maybe ServiceNowConnectorOperator
$sel:salesforce:ConnectorOperator' :: ConnectorOperator -> Maybe SalesforceConnectorOperator
$sel:s3:ConnectorOperator' :: ConnectorOperator -> Maybe S3ConnectorOperator
$sel:marketo:ConnectorOperator' :: ConnectorOperator -> Maybe MarketoConnectorOperator
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe MarketoConnectorOperator
marketo
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe S3ConnectorOperator
s3
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SalesforceConnectorOperator
salesforce
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ServiceNowConnectorOperator
serviceNow
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ZendeskConnectorOperator
zendesk
instance Prelude.NFData ConnectorOperator where
rnf :: ConnectorOperator -> ()
rnf ConnectorOperator' {Maybe MarketoConnectorOperator
Maybe S3ConnectorOperator
Maybe SalesforceConnectorOperator
Maybe ServiceNowConnectorOperator
Maybe ZendeskConnectorOperator
zendesk :: Maybe ZendeskConnectorOperator
serviceNow :: Maybe ServiceNowConnectorOperator
salesforce :: Maybe SalesforceConnectorOperator
s3 :: Maybe S3ConnectorOperator
marketo :: Maybe MarketoConnectorOperator
$sel:zendesk:ConnectorOperator' :: ConnectorOperator -> Maybe ZendeskConnectorOperator
$sel:serviceNow:ConnectorOperator' :: ConnectorOperator -> Maybe ServiceNowConnectorOperator
$sel:salesforce:ConnectorOperator' :: ConnectorOperator -> Maybe SalesforceConnectorOperator
$sel:s3:ConnectorOperator' :: ConnectorOperator -> Maybe S3ConnectorOperator
$sel:marketo:ConnectorOperator' :: ConnectorOperator -> Maybe MarketoConnectorOperator
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe MarketoConnectorOperator
marketo
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe S3ConnectorOperator
s3
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SalesforceConnectorOperator
salesforce
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ServiceNowConnectorOperator
serviceNow
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ZendeskConnectorOperator
zendesk
instance Data.ToJSON ConnectorOperator where
toJSON :: ConnectorOperator -> Value
toJSON ConnectorOperator' {Maybe MarketoConnectorOperator
Maybe S3ConnectorOperator
Maybe SalesforceConnectorOperator
Maybe ServiceNowConnectorOperator
Maybe ZendeskConnectorOperator
zendesk :: Maybe ZendeskConnectorOperator
serviceNow :: Maybe ServiceNowConnectorOperator
salesforce :: Maybe SalesforceConnectorOperator
s3 :: Maybe S3ConnectorOperator
marketo :: Maybe MarketoConnectorOperator
$sel:zendesk:ConnectorOperator' :: ConnectorOperator -> Maybe ZendeskConnectorOperator
$sel:serviceNow:ConnectorOperator' :: ConnectorOperator -> Maybe ServiceNowConnectorOperator
$sel:salesforce:ConnectorOperator' :: ConnectorOperator -> Maybe SalesforceConnectorOperator
$sel:s3:ConnectorOperator' :: ConnectorOperator -> Maybe S3ConnectorOperator
$sel:marketo:ConnectorOperator' :: ConnectorOperator -> Maybe MarketoConnectorOperator
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"Marketo" 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 MarketoConnectorOperator
marketo,
(Key
"S3" 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 S3ConnectorOperator
s3,
(Key
"Salesforce" 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 SalesforceConnectorOperator
salesforce,
(Key
"ServiceNow" 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 ServiceNowConnectorOperator
serviceNow,
(Key
"Zendesk" 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 ZendeskConnectorOperator
zendesk
]
)