{-# 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.IoT.Types.ThingIndexingConfiguration where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoT.Types.DeviceDefenderIndexingMode
import Amazonka.IoT.Types.Field
import Amazonka.IoT.Types.IndexingFilter
import Amazonka.IoT.Types.NamedShadowIndexingMode
import Amazonka.IoT.Types.ThingConnectivityIndexingMode
import Amazonka.IoT.Types.ThingIndexingMode
import qualified Amazonka.Prelude as Prelude
data ThingIndexingConfiguration = ThingIndexingConfiguration'
{
ThingIndexingConfiguration -> Maybe [Field]
customFields :: Prelude.Maybe [Field],
ThingIndexingConfiguration -> Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode :: Prelude.Maybe DeviceDefenderIndexingMode,
ThingIndexingConfiguration -> Maybe IndexingFilter
filter' :: Prelude.Maybe IndexingFilter,
ThingIndexingConfiguration -> Maybe [Field]
managedFields :: Prelude.Maybe [Field],
ThingIndexingConfiguration -> Maybe NamedShadowIndexingMode
namedShadowIndexingMode :: Prelude.Maybe NamedShadowIndexingMode,
ThingIndexingConfiguration -> Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode :: Prelude.Maybe ThingConnectivityIndexingMode,
ThingIndexingConfiguration -> ThingIndexingMode
thingIndexingMode :: ThingIndexingMode
}
deriving (ThingIndexingConfiguration -> ThingIndexingConfiguration -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ThingIndexingConfiguration -> ThingIndexingConfiguration -> Bool
$c/= :: ThingIndexingConfiguration -> ThingIndexingConfiguration -> Bool
== :: ThingIndexingConfiguration -> ThingIndexingConfiguration -> Bool
$c== :: ThingIndexingConfiguration -> ThingIndexingConfiguration -> Bool
Prelude.Eq, ReadPrec [ThingIndexingConfiguration]
ReadPrec ThingIndexingConfiguration
Int -> ReadS ThingIndexingConfiguration
ReadS [ThingIndexingConfiguration]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ThingIndexingConfiguration]
$creadListPrec :: ReadPrec [ThingIndexingConfiguration]
readPrec :: ReadPrec ThingIndexingConfiguration
$creadPrec :: ReadPrec ThingIndexingConfiguration
readList :: ReadS [ThingIndexingConfiguration]
$creadList :: ReadS [ThingIndexingConfiguration]
readsPrec :: Int -> ReadS ThingIndexingConfiguration
$creadsPrec :: Int -> ReadS ThingIndexingConfiguration
Prelude.Read, Int -> ThingIndexingConfiguration -> ShowS
[ThingIndexingConfiguration] -> ShowS
ThingIndexingConfiguration -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ThingIndexingConfiguration] -> ShowS
$cshowList :: [ThingIndexingConfiguration] -> ShowS
show :: ThingIndexingConfiguration -> String
$cshow :: ThingIndexingConfiguration -> String
showsPrec :: Int -> ThingIndexingConfiguration -> ShowS
$cshowsPrec :: Int -> ThingIndexingConfiguration -> ShowS
Prelude.Show, forall x.
Rep ThingIndexingConfiguration x -> ThingIndexingConfiguration
forall x.
ThingIndexingConfiguration -> Rep ThingIndexingConfiguration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ThingIndexingConfiguration x -> ThingIndexingConfiguration
$cfrom :: forall x.
ThingIndexingConfiguration -> Rep ThingIndexingConfiguration x
Prelude.Generic)
newThingIndexingConfiguration ::
ThingIndexingMode ->
ThingIndexingConfiguration
newThingIndexingConfiguration :: ThingIndexingMode -> ThingIndexingConfiguration
newThingIndexingConfiguration ThingIndexingMode
pThingIndexingMode_ =
ThingIndexingConfiguration'
{ $sel:customFields:ThingIndexingConfiguration' :: Maybe [Field]
customFields =
forall a. Maybe a
Prelude.Nothing,
$sel:deviceDefenderIndexingMode:ThingIndexingConfiguration' :: Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode = forall a. Maybe a
Prelude.Nothing,
$sel:filter':ThingIndexingConfiguration' :: Maybe IndexingFilter
filter' = forall a. Maybe a
Prelude.Nothing,
$sel:managedFields:ThingIndexingConfiguration' :: Maybe [Field]
managedFields = forall a. Maybe a
Prelude.Nothing,
$sel:namedShadowIndexingMode:ThingIndexingConfiguration' :: Maybe NamedShadowIndexingMode
namedShadowIndexingMode = forall a. Maybe a
Prelude.Nothing,
$sel:thingConnectivityIndexingMode:ThingIndexingConfiguration' :: Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode = forall a. Maybe a
Prelude.Nothing,
$sel:thingIndexingMode:ThingIndexingConfiguration' :: ThingIndexingMode
thingIndexingMode = ThingIndexingMode
pThingIndexingMode_
}
thingIndexingConfiguration_customFields :: Lens.Lens' ThingIndexingConfiguration (Prelude.Maybe [Field])
thingIndexingConfiguration_customFields :: Lens' ThingIndexingConfiguration (Maybe [Field])
thingIndexingConfiguration_customFields = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {Maybe [Field]
customFields :: Maybe [Field]
$sel:customFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
customFields} -> Maybe [Field]
customFields) (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} Maybe [Field]
a -> ThingIndexingConfiguration
s {$sel:customFields:ThingIndexingConfiguration' :: Maybe [Field]
customFields = Maybe [Field]
a} :: ThingIndexingConfiguration) 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
thingIndexingConfiguration_deviceDefenderIndexingMode :: Lens.Lens' ThingIndexingConfiguration (Prelude.Maybe DeviceDefenderIndexingMode)
thingIndexingConfiguration_deviceDefenderIndexingMode :: Lens' ThingIndexingConfiguration (Maybe DeviceDefenderIndexingMode)
thingIndexingConfiguration_deviceDefenderIndexingMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode :: Maybe DeviceDefenderIndexingMode
$sel:deviceDefenderIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode} -> Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode) (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} Maybe DeviceDefenderIndexingMode
a -> ThingIndexingConfiguration
s {$sel:deviceDefenderIndexingMode:ThingIndexingConfiguration' :: Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode = Maybe DeviceDefenderIndexingMode
a} :: ThingIndexingConfiguration)
thingIndexingConfiguration_filter :: Lens.Lens' ThingIndexingConfiguration (Prelude.Maybe IndexingFilter)
thingIndexingConfiguration_filter :: Lens' ThingIndexingConfiguration (Maybe IndexingFilter)
thingIndexingConfiguration_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {Maybe IndexingFilter
filter' :: Maybe IndexingFilter
$sel:filter':ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe IndexingFilter
filter'} -> Maybe IndexingFilter
filter') (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} Maybe IndexingFilter
a -> ThingIndexingConfiguration
s {$sel:filter':ThingIndexingConfiguration' :: Maybe IndexingFilter
filter' = Maybe IndexingFilter
a} :: ThingIndexingConfiguration)
thingIndexingConfiguration_managedFields :: Lens.Lens' ThingIndexingConfiguration (Prelude.Maybe [Field])
thingIndexingConfiguration_managedFields :: Lens' ThingIndexingConfiguration (Maybe [Field])
thingIndexingConfiguration_managedFields = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {Maybe [Field]
managedFields :: Maybe [Field]
$sel:managedFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
managedFields} -> Maybe [Field]
managedFields) (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} Maybe [Field]
a -> ThingIndexingConfiguration
s {$sel:managedFields:ThingIndexingConfiguration' :: Maybe [Field]
managedFields = Maybe [Field]
a} :: ThingIndexingConfiguration) 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
thingIndexingConfiguration_namedShadowIndexingMode :: Lens.Lens' ThingIndexingConfiguration (Prelude.Maybe NamedShadowIndexingMode)
thingIndexingConfiguration_namedShadowIndexingMode :: Lens' ThingIndexingConfiguration (Maybe NamedShadowIndexingMode)
thingIndexingConfiguration_namedShadowIndexingMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {Maybe NamedShadowIndexingMode
namedShadowIndexingMode :: Maybe NamedShadowIndexingMode
$sel:namedShadowIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe NamedShadowIndexingMode
namedShadowIndexingMode} -> Maybe NamedShadowIndexingMode
namedShadowIndexingMode) (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} Maybe NamedShadowIndexingMode
a -> ThingIndexingConfiguration
s {$sel:namedShadowIndexingMode:ThingIndexingConfiguration' :: Maybe NamedShadowIndexingMode
namedShadowIndexingMode = Maybe NamedShadowIndexingMode
a} :: ThingIndexingConfiguration)
thingIndexingConfiguration_thingConnectivityIndexingMode :: Lens.Lens' ThingIndexingConfiguration (Prelude.Maybe ThingConnectivityIndexingMode)
thingIndexingConfiguration_thingConnectivityIndexingMode :: Lens'
ThingIndexingConfiguration (Maybe ThingConnectivityIndexingMode)
thingIndexingConfiguration_thingConnectivityIndexingMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode :: Maybe ThingConnectivityIndexingMode
$sel:thingConnectivityIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode} -> Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode) (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} Maybe ThingConnectivityIndexingMode
a -> ThingIndexingConfiguration
s {$sel:thingConnectivityIndexingMode:ThingIndexingConfiguration' :: Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode = Maybe ThingConnectivityIndexingMode
a} :: ThingIndexingConfiguration)
thingIndexingConfiguration_thingIndexingMode :: Lens.Lens' ThingIndexingConfiguration ThingIndexingMode
thingIndexingConfiguration_thingIndexingMode :: Lens' ThingIndexingConfiguration ThingIndexingMode
thingIndexingConfiguration_thingIndexingMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ThingIndexingConfiguration' {ThingIndexingMode
thingIndexingMode :: ThingIndexingMode
$sel:thingIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> ThingIndexingMode
thingIndexingMode} -> ThingIndexingMode
thingIndexingMode) (\s :: ThingIndexingConfiguration
s@ThingIndexingConfiguration' {} ThingIndexingMode
a -> ThingIndexingConfiguration
s {$sel:thingIndexingMode:ThingIndexingConfiguration' :: ThingIndexingMode
thingIndexingMode = ThingIndexingMode
a} :: ThingIndexingConfiguration)
instance Data.FromJSON ThingIndexingConfiguration where
parseJSON :: Value -> Parser ThingIndexingConfiguration
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"ThingIndexingConfiguration"
( \Object
x ->
Maybe [Field]
-> Maybe DeviceDefenderIndexingMode
-> Maybe IndexingFilter
-> Maybe [Field]
-> Maybe NamedShadowIndexingMode
-> Maybe ThingConnectivityIndexingMode
-> ThingIndexingMode
-> ThingIndexingConfiguration
ThingIndexingConfiguration'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"customFields" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= 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 -> Parser (Maybe a)
Data..:? Key
"deviceDefenderIndexingMode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"filter")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"managedFields" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= 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 -> Parser (Maybe a)
Data..:? Key
"namedShadowIndexingMode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"thingConnectivityIndexingMode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"thingIndexingMode")
)
instance Prelude.Hashable ThingIndexingConfiguration where
hashWithSalt :: Int -> ThingIndexingConfiguration -> Int
hashWithSalt Int
_salt ThingIndexingConfiguration' {Maybe [Field]
Maybe DeviceDefenderIndexingMode
Maybe IndexingFilter
Maybe NamedShadowIndexingMode
Maybe ThingConnectivityIndexingMode
ThingIndexingMode
thingIndexingMode :: ThingIndexingMode
thingConnectivityIndexingMode :: Maybe ThingConnectivityIndexingMode
namedShadowIndexingMode :: Maybe NamedShadowIndexingMode
managedFields :: Maybe [Field]
filter' :: Maybe IndexingFilter
deviceDefenderIndexingMode :: Maybe DeviceDefenderIndexingMode
customFields :: Maybe [Field]
$sel:thingIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> ThingIndexingMode
$sel:thingConnectivityIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe ThingConnectivityIndexingMode
$sel:namedShadowIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe NamedShadowIndexingMode
$sel:managedFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
$sel:filter':ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe IndexingFilter
$sel:deviceDefenderIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe DeviceDefenderIndexingMode
$sel:customFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Field]
customFields
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe IndexingFilter
filter'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Field]
managedFields
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe NamedShadowIndexingMode
namedShadowIndexingMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ThingIndexingMode
thingIndexingMode
instance Prelude.NFData ThingIndexingConfiguration where
rnf :: ThingIndexingConfiguration -> ()
rnf ThingIndexingConfiguration' {Maybe [Field]
Maybe DeviceDefenderIndexingMode
Maybe IndexingFilter
Maybe NamedShadowIndexingMode
Maybe ThingConnectivityIndexingMode
ThingIndexingMode
thingIndexingMode :: ThingIndexingMode
thingConnectivityIndexingMode :: Maybe ThingConnectivityIndexingMode
namedShadowIndexingMode :: Maybe NamedShadowIndexingMode
managedFields :: Maybe [Field]
filter' :: Maybe IndexingFilter
deviceDefenderIndexingMode :: Maybe DeviceDefenderIndexingMode
customFields :: Maybe [Field]
$sel:thingIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> ThingIndexingMode
$sel:thingConnectivityIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe ThingConnectivityIndexingMode
$sel:namedShadowIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe NamedShadowIndexingMode
$sel:managedFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
$sel:filter':ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe IndexingFilter
$sel:deviceDefenderIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe DeviceDefenderIndexingMode
$sel:customFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [Field]
customFields
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DeviceDefenderIndexingMode
deviceDefenderIndexingMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe IndexingFilter
filter'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Field]
managedFields
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe NamedShadowIndexingMode
namedShadowIndexingMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ThingConnectivityIndexingMode
thingConnectivityIndexingMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ThingIndexingMode
thingIndexingMode
instance Data.ToJSON ThingIndexingConfiguration where
toJSON :: ThingIndexingConfiguration -> Value
toJSON ThingIndexingConfiguration' {Maybe [Field]
Maybe DeviceDefenderIndexingMode
Maybe IndexingFilter
Maybe NamedShadowIndexingMode
Maybe ThingConnectivityIndexingMode
ThingIndexingMode
thingIndexingMode :: ThingIndexingMode
thingConnectivityIndexingMode :: Maybe ThingConnectivityIndexingMode
namedShadowIndexingMode :: Maybe NamedShadowIndexingMode
managedFields :: Maybe [Field]
filter' :: Maybe IndexingFilter
deviceDefenderIndexingMode :: Maybe DeviceDefenderIndexingMode
customFields :: Maybe [Field]
$sel:thingIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> ThingIndexingMode
$sel:thingConnectivityIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe ThingConnectivityIndexingMode
$sel:namedShadowIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe NamedShadowIndexingMode
$sel:managedFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
$sel:filter':ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe IndexingFilter
$sel:deviceDefenderIndexingMode:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe DeviceDefenderIndexingMode
$sel:customFields:ThingIndexingConfiguration' :: ThingIndexingConfiguration -> Maybe [Field]
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"customFields" 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 [Field]
customFields,
(Key
"deviceDefenderIndexingMode" 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 DeviceDefenderIndexingMode
deviceDefenderIndexingMode,
(Key
"filter" 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 IndexingFilter
filter',
(Key
"managedFields" 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 [Field]
managedFields,
(Key
"namedShadowIndexingMode" 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 NamedShadowIndexingMode
namedShadowIndexingMode,
(Key
"thingConnectivityIndexingMode" 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 ThingConnectivityIndexingMode
thingConnectivityIndexingMode,
forall a. a -> Maybe a
Prelude.Just
(Key
"thingIndexingMode" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= ThingIndexingMode
thingIndexingMode)
]
)