module Stratosphere.InspectorV2.CisScanConfiguration.TimeProperty (
TimeProperty(..), mkTimeProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data TimeProperty
=
TimeProperty {TimeProperty -> ()
haddock_workaround_ :: (),
TimeProperty -> Value Text
timeOfDay :: (Value Prelude.Text),
TimeProperty -> Value Text
timeZone :: (Value Prelude.Text)}
deriving stock (TimeProperty -> TimeProperty -> Bool
(TimeProperty -> TimeProperty -> Bool)
-> (TimeProperty -> TimeProperty -> Bool) -> Eq TimeProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimeProperty -> TimeProperty -> Bool
== :: TimeProperty -> TimeProperty -> Bool
$c/= :: TimeProperty -> TimeProperty -> Bool
/= :: TimeProperty -> TimeProperty -> Bool
Prelude.Eq, Int -> TimeProperty -> ShowS
[TimeProperty] -> ShowS
TimeProperty -> String
(Int -> TimeProperty -> ShowS)
-> (TimeProperty -> String)
-> ([TimeProperty] -> ShowS)
-> Show TimeProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TimeProperty -> ShowS
showsPrec :: Int -> TimeProperty -> ShowS
$cshow :: TimeProperty -> String
show :: TimeProperty -> String
$cshowList :: [TimeProperty] -> ShowS
showList :: [TimeProperty] -> ShowS
Prelude.Show)
mkTimeProperty ::
Value Prelude.Text -> Value Prelude.Text -> TimeProperty
mkTimeProperty :: Value Text -> Value Text -> TimeProperty
mkTimeProperty Value Text
timeOfDay Value Text
timeZone
= TimeProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), timeOfDay :: Value Text
timeOfDay = Value Text
timeOfDay,
timeZone :: Value Text
timeZone = Value Text
timeZone}
instance ToResourceProperties TimeProperty where
toResourceProperties :: TimeProperty -> ResourceProperties
toResourceProperties TimeProperty {()
Value Text
haddock_workaround_ :: TimeProperty -> ()
timeOfDay :: TimeProperty -> Value Text
timeZone :: TimeProperty -> Value Text
haddock_workaround_ :: ()
timeOfDay :: Value Text
timeZone :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::InspectorV2::CisScanConfiguration.Time",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"TimeOfDay" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
timeOfDay,
Key
"TimeZone" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
timeZone]}
instance JSON.ToJSON TimeProperty where
toJSON :: TimeProperty -> Value
toJSON TimeProperty {()
Value Text
haddock_workaround_ :: TimeProperty -> ()
timeOfDay :: TimeProperty -> Value Text
timeZone :: TimeProperty -> Value Text
haddock_workaround_ :: ()
timeOfDay :: Value Text
timeZone :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"TimeOfDay" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
timeOfDay, Key
"TimeZone" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
timeZone]
instance Property "TimeOfDay" TimeProperty where
type PropertyType "TimeOfDay" TimeProperty = Value Prelude.Text
set :: PropertyType "TimeOfDay" TimeProperty
-> TimeProperty -> TimeProperty
set PropertyType "TimeOfDay" TimeProperty
newValue TimeProperty {()
Value Text
haddock_workaround_ :: TimeProperty -> ()
timeOfDay :: TimeProperty -> Value Text
timeZone :: TimeProperty -> Value Text
haddock_workaround_ :: ()
timeOfDay :: Value Text
timeZone :: Value Text
..}
= TimeProperty {timeOfDay :: Value Text
timeOfDay = PropertyType "TimeOfDay" TimeProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
timeZone :: Value Text
haddock_workaround_ :: ()
timeZone :: Value Text
..}
instance Property "TimeZone" TimeProperty where
type PropertyType "TimeZone" TimeProperty = Value Prelude.Text
set :: PropertyType "TimeZone" TimeProperty
-> TimeProperty -> TimeProperty
set PropertyType "TimeZone" TimeProperty
newValue TimeProperty {()
Value Text
haddock_workaround_ :: TimeProperty -> ()
timeOfDay :: TimeProperty -> Value Text
timeZone :: TimeProperty -> Value Text
haddock_workaround_ :: ()
timeOfDay :: Value Text
timeZone :: Value Text
..}
= TimeProperty {timeZone :: Value Text
timeZone = PropertyType "TimeZone" TimeProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
timeOfDay :: Value Text
haddock_workaround_ :: ()
timeOfDay :: Value Text
..}