module Stratosphere.OpenSearchService.Domain.SoftwareUpdateOptionsProperty (
        SoftwareUpdateOptionsProperty(..), mkSoftwareUpdateOptionsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data SoftwareUpdateOptionsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opensearchservice-domain-softwareupdateoptions.html>
    SoftwareUpdateOptionsProperty {SoftwareUpdateOptionsProperty -> ()
haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-opensearchservice-domain-softwareupdateoptions.html#cfn-opensearchservice-domain-softwareupdateoptions-autosoftwareupdateenabled>
                                   SoftwareUpdateOptionsProperty -> Maybe (Value Bool)
autoSoftwareUpdateEnabled :: (Prelude.Maybe (Value Prelude.Bool))}
  deriving stock (SoftwareUpdateOptionsProperty
-> SoftwareUpdateOptionsProperty -> Bool
(SoftwareUpdateOptionsProperty
 -> SoftwareUpdateOptionsProperty -> Bool)
-> (SoftwareUpdateOptionsProperty
    -> SoftwareUpdateOptionsProperty -> Bool)
-> Eq SoftwareUpdateOptionsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SoftwareUpdateOptionsProperty
-> SoftwareUpdateOptionsProperty -> Bool
== :: SoftwareUpdateOptionsProperty
-> SoftwareUpdateOptionsProperty -> Bool
$c/= :: SoftwareUpdateOptionsProperty
-> SoftwareUpdateOptionsProperty -> Bool
/= :: SoftwareUpdateOptionsProperty
-> SoftwareUpdateOptionsProperty -> Bool
Prelude.Eq, Int -> SoftwareUpdateOptionsProperty -> ShowS
[SoftwareUpdateOptionsProperty] -> ShowS
SoftwareUpdateOptionsProperty -> String
(Int -> SoftwareUpdateOptionsProperty -> ShowS)
-> (SoftwareUpdateOptionsProperty -> String)
-> ([SoftwareUpdateOptionsProperty] -> ShowS)
-> Show SoftwareUpdateOptionsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SoftwareUpdateOptionsProperty -> ShowS
showsPrec :: Int -> SoftwareUpdateOptionsProperty -> ShowS
$cshow :: SoftwareUpdateOptionsProperty -> String
show :: SoftwareUpdateOptionsProperty -> String
$cshowList :: [SoftwareUpdateOptionsProperty] -> ShowS
showList :: [SoftwareUpdateOptionsProperty] -> ShowS
Prelude.Show)
mkSoftwareUpdateOptionsProperty :: SoftwareUpdateOptionsProperty
mkSoftwareUpdateOptionsProperty :: SoftwareUpdateOptionsProperty
mkSoftwareUpdateOptionsProperty
  = SoftwareUpdateOptionsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       autoSoftwareUpdateEnabled :: Maybe (Value Bool)
autoSoftwareUpdateEnabled = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SoftwareUpdateOptionsProperty where
  toResourceProperties :: SoftwareUpdateOptionsProperty -> ResourceProperties
toResourceProperties SoftwareUpdateOptionsProperty {Maybe (Value Bool)
()
haddock_workaround_ :: SoftwareUpdateOptionsProperty -> ()
autoSoftwareUpdateEnabled :: SoftwareUpdateOptionsProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
autoSoftwareUpdateEnabled :: Maybe (Value Bool)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::OpenSearchService::Domain.SoftwareUpdateOptions",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoSoftwareUpdateEnabled"
                              (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
autoSoftwareUpdateEnabled])}
instance JSON.ToJSON SoftwareUpdateOptionsProperty where
  toJSON :: SoftwareUpdateOptionsProperty -> Value
toJSON SoftwareUpdateOptionsProperty {Maybe (Value Bool)
()
haddock_workaround_ :: SoftwareUpdateOptionsProperty -> ()
autoSoftwareUpdateEnabled :: SoftwareUpdateOptionsProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
autoSoftwareUpdateEnabled :: Maybe (Value Bool)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoSoftwareUpdateEnabled"
                 (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
autoSoftwareUpdateEnabled]))
instance Property "AutoSoftwareUpdateEnabled" SoftwareUpdateOptionsProperty where
  type PropertyType "AutoSoftwareUpdateEnabled" SoftwareUpdateOptionsProperty = Value Prelude.Bool
  set :: PropertyType
  "AutoSoftwareUpdateEnabled" SoftwareUpdateOptionsProperty
-> SoftwareUpdateOptionsProperty -> SoftwareUpdateOptionsProperty
set PropertyType
  "AutoSoftwareUpdateEnabled" SoftwareUpdateOptionsProperty
newValue SoftwareUpdateOptionsProperty {Maybe (Value Bool)
()
haddock_workaround_ :: SoftwareUpdateOptionsProperty -> ()
autoSoftwareUpdateEnabled :: SoftwareUpdateOptionsProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
autoSoftwareUpdateEnabled :: Maybe (Value Bool)
..}
    = SoftwareUpdateOptionsProperty
        {autoSoftwareUpdateEnabled :: Maybe (Value Bool)
autoSoftwareUpdateEnabled = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "AutoSoftwareUpdateEnabled" SoftwareUpdateOptionsProperty
Value Bool
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}