stratosphere-backup-1.0.0: gen/Stratosphere/Backup/ReportPlan/ReportDeliveryChannelProperty.hs

module Stratosphere.Backup.ReportPlan.ReportDeliveryChannelProperty (
        ReportDeliveryChannelProperty(..), mkReportDeliveryChannelProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ReportDeliveryChannelProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-reportplan-reportdeliverychannel.html>
    ReportDeliveryChannelProperty {haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-reportplan-reportdeliverychannel.html#cfn-backup-reportplan-reportdeliverychannel-formats>
                                   formats :: (Prelude.Maybe (ValueList Prelude.Text)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-reportplan-reportdeliverychannel.html#cfn-backup-reportplan-reportdeliverychannel-s3bucketname>
                                   s3BucketName :: (Value Prelude.Text),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-reportplan-reportdeliverychannel.html#cfn-backup-reportplan-reportdeliverychannel-s3keyprefix>
                                   s3KeyPrefix :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (Prelude.Eq, Prelude.Show)
mkReportDeliveryChannelProperty ::
  Value Prelude.Text -> ReportDeliveryChannelProperty
mkReportDeliveryChannelProperty s3BucketName
  = ReportDeliveryChannelProperty
      {haddock_workaround_ = (), s3BucketName = s3BucketName,
       formats = Prelude.Nothing, s3KeyPrefix = Prelude.Nothing}
instance ToResourceProperties ReportDeliveryChannelProperty where
  toResourceProperties ReportDeliveryChannelProperty {..}
    = ResourceProperties
        {awsType = "AWS::Backup::ReportPlan.ReportDeliveryChannel",
         supportsTags = Prelude.False,
         properties = Prelude.fromList
                        ((Prelude.<>)
                           ["S3BucketName" JSON..= s3BucketName]
                           (Prelude.catMaybes
                              [(JSON..=) "Formats" Prelude.<$> formats,
                               (JSON..=) "S3KeyPrefix" Prelude.<$> s3KeyPrefix]))}
instance JSON.ToJSON ReportDeliveryChannelProperty where
  toJSON ReportDeliveryChannelProperty {..}
    = JSON.object
        (Prelude.fromList
           ((Prelude.<>)
              ["S3BucketName" JSON..= s3BucketName]
              (Prelude.catMaybes
                 [(JSON..=) "Formats" Prelude.<$> formats,
                  (JSON..=) "S3KeyPrefix" Prelude.<$> s3KeyPrefix])))
instance Property "Formats" ReportDeliveryChannelProperty where
  type PropertyType "Formats" ReportDeliveryChannelProperty = ValueList Prelude.Text
  set newValue ReportDeliveryChannelProperty {..}
    = ReportDeliveryChannelProperty
        {formats = Prelude.pure newValue, ..}
instance Property "S3BucketName" ReportDeliveryChannelProperty where
  type PropertyType "S3BucketName" ReportDeliveryChannelProperty = Value Prelude.Text
  set newValue ReportDeliveryChannelProperty {..}
    = ReportDeliveryChannelProperty {s3BucketName = newValue, ..}
instance Property "S3KeyPrefix" ReportDeliveryChannelProperty where
  type PropertyType "S3KeyPrefix" ReportDeliveryChannelProperty = Value Prelude.Text
  set newValue ReportDeliveryChannelProperty {..}
    = ReportDeliveryChannelProperty
        {s3KeyPrefix = Prelude.pure newValue, ..}