module Stratosphere.DirectoryService.MicrosoftAD.VpcSettingsProperty (
        VpcSettingsProperty(..), mkVpcSettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data VpcSettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-directoryservice-microsoftad-vpcsettings.html>
    VpcSettingsProperty {VpcSettingsProperty -> ()
haddock_workaround_ :: (),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-directoryservice-microsoftad-vpcsettings.html#cfn-directoryservice-microsoftad-vpcsettings-subnetids>
                         VpcSettingsProperty -> ValueList Text
subnetIds :: (ValueList Prelude.Text),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-directoryservice-microsoftad-vpcsettings.html#cfn-directoryservice-microsoftad-vpcsettings-vpcid>
                         VpcSettingsProperty -> Value Text
vpcId :: (Value Prelude.Text)}
  deriving stock (VpcSettingsProperty -> VpcSettingsProperty -> Bool
(VpcSettingsProperty -> VpcSettingsProperty -> Bool)
-> (VpcSettingsProperty -> VpcSettingsProperty -> Bool)
-> Eq VpcSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VpcSettingsProperty -> VpcSettingsProperty -> Bool
== :: VpcSettingsProperty -> VpcSettingsProperty -> Bool
$c/= :: VpcSettingsProperty -> VpcSettingsProperty -> Bool
/= :: VpcSettingsProperty -> VpcSettingsProperty -> Bool
Prelude.Eq, Int -> VpcSettingsProperty -> ShowS
[VpcSettingsProperty] -> ShowS
VpcSettingsProperty -> String
(Int -> VpcSettingsProperty -> ShowS)
-> (VpcSettingsProperty -> String)
-> ([VpcSettingsProperty] -> ShowS)
-> Show VpcSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> VpcSettingsProperty -> ShowS
showsPrec :: Int -> VpcSettingsProperty -> ShowS
$cshow :: VpcSettingsProperty -> String
show :: VpcSettingsProperty -> String
$cshowList :: [VpcSettingsProperty] -> ShowS
showList :: [VpcSettingsProperty] -> ShowS
Prelude.Show)
mkVpcSettingsProperty ::
  ValueList Prelude.Text -> Value Prelude.Text -> VpcSettingsProperty
mkVpcSettingsProperty :: ValueList Text -> Value Text -> VpcSettingsProperty
mkVpcSettingsProperty ValueList Text
subnetIds Value Text
vpcId
  = VpcSettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), subnetIds :: ValueList Text
subnetIds = ValueList Text
subnetIds, vpcId :: Value Text
vpcId = Value Text
vpcId}
instance ToResourceProperties VpcSettingsProperty where
  toResourceProperties :: VpcSettingsProperty -> ResourceProperties
toResourceProperties VpcSettingsProperty {()
ValueList Text
Value Text
haddock_workaround_ :: VpcSettingsProperty -> ()
subnetIds :: VpcSettingsProperty -> ValueList Text
vpcId :: VpcSettingsProperty -> Value Text
haddock_workaround_ :: ()
subnetIds :: ValueList Text
vpcId :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::DirectoryService::MicrosoftAD.VpcSettings",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"SubnetIds" Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ValueList Text
subnetIds,
                       Key
"VpcId" 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
vpcId]}
instance JSON.ToJSON VpcSettingsProperty where
  toJSON :: VpcSettingsProperty -> Value
toJSON VpcSettingsProperty {()
ValueList Text
Value Text
haddock_workaround_ :: VpcSettingsProperty -> ()
subnetIds :: VpcSettingsProperty -> ValueList Text
vpcId :: VpcSettingsProperty -> Value Text
haddock_workaround_ :: ()
subnetIds :: ValueList Text
vpcId :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"SubnetIds" Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ValueList Text
subnetIds, Key
"VpcId" 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
vpcId]
instance Property "SubnetIds" VpcSettingsProperty where
  type PropertyType "SubnetIds" VpcSettingsProperty = ValueList Prelude.Text
  set :: PropertyType "SubnetIds" VpcSettingsProperty
-> VpcSettingsProperty -> VpcSettingsProperty
set PropertyType "SubnetIds" VpcSettingsProperty
newValue VpcSettingsProperty {()
ValueList Text
Value Text
haddock_workaround_ :: VpcSettingsProperty -> ()
subnetIds :: VpcSettingsProperty -> ValueList Text
vpcId :: VpcSettingsProperty -> Value Text
haddock_workaround_ :: ()
subnetIds :: ValueList Text
vpcId :: Value Text
..}
    = VpcSettingsProperty {subnetIds :: ValueList Text
subnetIds = PropertyType "SubnetIds" VpcSettingsProperty
ValueList Text
newValue, ()
Value Text
haddock_workaround_ :: ()
vpcId :: Value Text
haddock_workaround_ :: ()
vpcId :: Value Text
..}
instance Property "VpcId" VpcSettingsProperty where
  type PropertyType "VpcId" VpcSettingsProperty = Value Prelude.Text
  set :: PropertyType "VpcId" VpcSettingsProperty
-> VpcSettingsProperty -> VpcSettingsProperty
set PropertyType "VpcId" VpcSettingsProperty
newValue VpcSettingsProperty {()
ValueList Text
Value Text
haddock_workaround_ :: VpcSettingsProperty -> ()
subnetIds :: VpcSettingsProperty -> ValueList Text
vpcId :: VpcSettingsProperty -> Value Text
haddock_workaround_ :: ()
subnetIds :: ValueList Text
vpcId :: Value Text
..}
    = VpcSettingsProperty {vpcId :: Value Text
vpcId = PropertyType "VpcId" VpcSettingsProperty
Value Text
newValue, ()
ValueList Text
haddock_workaround_ :: ()
subnetIds :: ValueList Text
haddock_workaround_ :: ()
subnetIds :: ValueList Text
..}