module Stratosphere.CodeBuild.Project.VpcConfigProperty ( VpcConfigProperty(..), mkVpcConfigProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data VpcConfigProperty = -- | See: VpcConfigProperty {haddock_workaround_ :: (), -- | See: securityGroupIds :: (Prelude.Maybe (ValueList Prelude.Text)), -- | See: subnets :: (Prelude.Maybe (ValueList Prelude.Text)), -- | See: vpcId :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkVpcConfigProperty :: VpcConfigProperty mkVpcConfigProperty = VpcConfigProperty {haddock_workaround_ = (), securityGroupIds = Prelude.Nothing, subnets = Prelude.Nothing, vpcId = Prelude.Nothing} instance ToResourceProperties VpcConfigProperty where toResourceProperties VpcConfigProperty {..} = ResourceProperties {awsType = "AWS::CodeBuild::Project.VpcConfig", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "SecurityGroupIds" Prelude.<$> securityGroupIds, (JSON..=) "Subnets" Prelude.<$> subnets, (JSON..=) "VpcId" Prelude.<$> vpcId])} instance JSON.ToJSON VpcConfigProperty where toJSON VpcConfigProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "SecurityGroupIds" Prelude.<$> securityGroupIds, (JSON..=) "Subnets" Prelude.<$> subnets, (JSON..=) "VpcId" Prelude.<$> vpcId])) instance Property "SecurityGroupIds" VpcConfigProperty where type PropertyType "SecurityGroupIds" VpcConfigProperty = ValueList Prelude.Text set newValue VpcConfigProperty {..} = VpcConfigProperty {securityGroupIds = Prelude.pure newValue, ..} instance Property "Subnets" VpcConfigProperty where type PropertyType "Subnets" VpcConfigProperty = ValueList Prelude.Text set newValue VpcConfigProperty {..} = VpcConfigProperty {subnets = Prelude.pure newValue, ..} instance Property "VpcId" VpcConfigProperty where type PropertyType "VpcId" VpcConfigProperty = Value Prelude.Text set newValue VpcConfigProperty {..} = VpcConfigProperty {vpcId = Prelude.pure newValue, ..}