module Stratosphere.OSIS.Pipeline ( module Exports, Pipeline(..), mkPipeline ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import {-# SOURCE #-} Stratosphere.OSIS.Pipeline.BufferOptionsProperty as Exports import {-# SOURCE #-} Stratosphere.OSIS.Pipeline.EncryptionAtRestOptionsProperty as Exports import {-# SOURCE #-} Stratosphere.OSIS.Pipeline.LogPublishingOptionsProperty as Exports import {-# SOURCE #-} Stratosphere.OSIS.Pipeline.ResourcePolicyProperty as Exports import {-# SOURCE #-} Stratosphere.OSIS.Pipeline.VpcOptionsProperty as Exports import Stratosphere.ResourceProperties import Stratosphere.Tag import Stratosphere.Value data Pipeline = -- | See: Pipeline {haddock_workaround_ :: (), -- | See: bufferOptions :: (Prelude.Maybe BufferOptionsProperty), -- | See: encryptionAtRestOptions :: (Prelude.Maybe EncryptionAtRestOptionsProperty), -- | See: logPublishingOptions :: (Prelude.Maybe LogPublishingOptionsProperty), -- | See: maxUnits :: (Value Prelude.Integer), -- | See: minUnits :: (Value Prelude.Integer), -- | See: pipelineConfigurationBody :: (Value Prelude.Text), -- | See: pipelineName :: (Value Prelude.Text), -- | See: pipelineRoleArn :: (Prelude.Maybe (Value Prelude.Text)), -- | See: resourcePolicy :: (Prelude.Maybe ResourcePolicyProperty), -- | See: tags :: (Prelude.Maybe [Tag]), -- | See: vpcOptions :: (Prelude.Maybe VpcOptionsProperty)} deriving stock (Prelude.Eq, Prelude.Show) mkPipeline :: Value Prelude.Integer -> Value Prelude.Integer -> Value Prelude.Text -> Value Prelude.Text -> Pipeline mkPipeline maxUnits minUnits pipelineConfigurationBody pipelineName = Pipeline {haddock_workaround_ = (), maxUnits = maxUnits, minUnits = minUnits, pipelineConfigurationBody = pipelineConfigurationBody, pipelineName = pipelineName, bufferOptions = Prelude.Nothing, encryptionAtRestOptions = Prelude.Nothing, logPublishingOptions = Prelude.Nothing, pipelineRoleArn = Prelude.Nothing, resourcePolicy = Prelude.Nothing, tags = Prelude.Nothing, vpcOptions = Prelude.Nothing} instance ToResourceProperties Pipeline where toResourceProperties Pipeline {..} = ResourceProperties {awsType = "AWS::OSIS::Pipeline", supportsTags = Prelude.True, properties = Prelude.fromList ((Prelude.<>) ["MaxUnits" JSON..= maxUnits, "MinUnits" JSON..= minUnits, "PipelineConfigurationBody" JSON..= pipelineConfigurationBody, "PipelineName" JSON..= pipelineName] (Prelude.catMaybes [(JSON..=) "BufferOptions" Prelude.<$> bufferOptions, (JSON..=) "EncryptionAtRestOptions" Prelude.<$> encryptionAtRestOptions, (JSON..=) "LogPublishingOptions" Prelude.<$> logPublishingOptions, (JSON..=) "PipelineRoleArn" Prelude.<$> pipelineRoleArn, (JSON..=) "ResourcePolicy" Prelude.<$> resourcePolicy, (JSON..=) "Tags" Prelude.<$> tags, (JSON..=) "VpcOptions" Prelude.<$> vpcOptions]))} instance JSON.ToJSON Pipeline where toJSON Pipeline {..} = JSON.object (Prelude.fromList ((Prelude.<>) ["MaxUnits" JSON..= maxUnits, "MinUnits" JSON..= minUnits, "PipelineConfigurationBody" JSON..= pipelineConfigurationBody, "PipelineName" JSON..= pipelineName] (Prelude.catMaybes [(JSON..=) "BufferOptions" Prelude.<$> bufferOptions, (JSON..=) "EncryptionAtRestOptions" Prelude.<$> encryptionAtRestOptions, (JSON..=) "LogPublishingOptions" Prelude.<$> logPublishingOptions, (JSON..=) "PipelineRoleArn" Prelude.<$> pipelineRoleArn, (JSON..=) "ResourcePolicy" Prelude.<$> resourcePolicy, (JSON..=) "Tags" Prelude.<$> tags, (JSON..=) "VpcOptions" Prelude.<$> vpcOptions]))) instance Property "BufferOptions" Pipeline where type PropertyType "BufferOptions" Pipeline = BufferOptionsProperty set newValue Pipeline {..} = Pipeline {bufferOptions = Prelude.pure newValue, ..} instance Property "EncryptionAtRestOptions" Pipeline where type PropertyType "EncryptionAtRestOptions" Pipeline = EncryptionAtRestOptionsProperty set newValue Pipeline {..} = Pipeline {encryptionAtRestOptions = Prelude.pure newValue, ..} instance Property "LogPublishingOptions" Pipeline where type PropertyType "LogPublishingOptions" Pipeline = LogPublishingOptionsProperty set newValue Pipeline {..} = Pipeline {logPublishingOptions = Prelude.pure newValue, ..} instance Property "MaxUnits" Pipeline where type PropertyType "MaxUnits" Pipeline = Value Prelude.Integer set newValue Pipeline {..} = Pipeline {maxUnits = newValue, ..} instance Property "MinUnits" Pipeline where type PropertyType "MinUnits" Pipeline = Value Prelude.Integer set newValue Pipeline {..} = Pipeline {minUnits = newValue, ..} instance Property "PipelineConfigurationBody" Pipeline where type PropertyType "PipelineConfigurationBody" Pipeline = Value Prelude.Text set newValue Pipeline {..} = Pipeline {pipelineConfigurationBody = newValue, ..} instance Property "PipelineName" Pipeline where type PropertyType "PipelineName" Pipeline = Value Prelude.Text set newValue Pipeline {..} = Pipeline {pipelineName = newValue, ..} instance Property "PipelineRoleArn" Pipeline where type PropertyType "PipelineRoleArn" Pipeline = Value Prelude.Text set newValue Pipeline {..} = Pipeline {pipelineRoleArn = Prelude.pure newValue, ..} instance Property "ResourcePolicy" Pipeline where type PropertyType "ResourcePolicy" Pipeline = ResourcePolicyProperty set newValue Pipeline {..} = Pipeline {resourcePolicy = Prelude.pure newValue, ..} instance Property "Tags" Pipeline where type PropertyType "Tags" Pipeline = [Tag] set newValue Pipeline {..} = Pipeline {tags = Prelude.pure newValue, ..} instance Property "VpcOptions" Pipeline where type PropertyType "VpcOptions" Pipeline = VpcOptionsProperty set newValue Pipeline {..} = Pipeline {vpcOptions = Prelude.pure newValue, ..}