VerifiedAccessLogsProperty.hs

module Stratosphere.EC2.VerifiedAccessInstance.VerifiedAccessLogsProperty (
        module Exports, VerifiedAccessLogsProperty(..),
        mkVerifiedAccessLogsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.EC2.VerifiedAccessInstance.CloudWatchLogsProperty as Exports
import {-# SOURCE #-} Stratosphere.EC2.VerifiedAccessInstance.KinesisDataFirehoseProperty as Exports
import {-# SOURCE #-} Stratosphere.EC2.VerifiedAccessInstance.S3Property as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data VerifiedAccessLogsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-verifiedaccessinstance-verifiedaccesslogs.html>
    VerifiedAccessLogsProperty {haddock_workaround_ :: (),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-verifiedaccessinstance-verifiedaccesslogs.html#cfn-ec2-verifiedaccessinstance-verifiedaccesslogs-cloudwatchlogs>
                                cloudWatchLogs :: (Prelude.Maybe CloudWatchLogsProperty),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-verifiedaccessinstance-verifiedaccesslogs.html#cfn-ec2-verifiedaccessinstance-verifiedaccesslogs-includetrustcontext>
                                includeTrustContext :: (Prelude.Maybe (Value Prelude.Bool)),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-verifiedaccessinstance-verifiedaccesslogs.html#cfn-ec2-verifiedaccessinstance-verifiedaccesslogs-kinesisdatafirehose>
                                kinesisDataFirehose :: (Prelude.Maybe KinesisDataFirehoseProperty),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-verifiedaccessinstance-verifiedaccesslogs.html#cfn-ec2-verifiedaccessinstance-verifiedaccesslogs-logversion>
                                logVersion :: (Prelude.Maybe (Value Prelude.Text)),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-verifiedaccessinstance-verifiedaccesslogs.html#cfn-ec2-verifiedaccessinstance-verifiedaccesslogs-s3>
                                s3 :: (Prelude.Maybe S3Property)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkVerifiedAccessLogsProperty :: VerifiedAccessLogsProperty
mkVerifiedAccessLogsProperty
  = VerifiedAccessLogsProperty
      {haddock_workaround_ = (), cloudWatchLogs = Prelude.Nothing,
       includeTrustContext = Prelude.Nothing,
       kinesisDataFirehose = Prelude.Nothing,
       logVersion = Prelude.Nothing, s3 = Prelude.Nothing}
instance ToResourceProperties VerifiedAccessLogsProperty where
  toResourceProperties VerifiedAccessLogsProperty {..}
    = ResourceProperties
        {awsType = "AWS::EC2::VerifiedAccessInstance.VerifiedAccessLogs",
         supportsTags = Prelude.False,
         properties = Prelude.fromList
                        (Prelude.catMaybes
                           [(JSON..=) "CloudWatchLogs" Prelude.<$> cloudWatchLogs,
                            (JSON..=) "IncludeTrustContext" Prelude.<$> includeTrustContext,
                            (JSON..=) "KinesisDataFirehose" Prelude.<$> kinesisDataFirehose,
                            (JSON..=) "LogVersion" Prelude.<$> logVersion,
                            (JSON..=) "S3" Prelude.<$> s3])}
instance JSON.ToJSON VerifiedAccessLogsProperty where
  toJSON VerifiedAccessLogsProperty {..}
    = JSON.object
        (Prelude.fromList
           (Prelude.catMaybes
              [(JSON..=) "CloudWatchLogs" Prelude.<$> cloudWatchLogs,
               (JSON..=) "IncludeTrustContext" Prelude.<$> includeTrustContext,
               (JSON..=) "KinesisDataFirehose" Prelude.<$> kinesisDataFirehose,
               (JSON..=) "LogVersion" Prelude.<$> logVersion,
               (JSON..=) "S3" Prelude.<$> s3]))
instance Property "CloudWatchLogs" VerifiedAccessLogsProperty where
  type PropertyType "CloudWatchLogs" VerifiedAccessLogsProperty = CloudWatchLogsProperty
  set newValue VerifiedAccessLogsProperty {..}
    = VerifiedAccessLogsProperty
        {cloudWatchLogs = Prelude.pure newValue, ..}
instance Property "IncludeTrustContext" VerifiedAccessLogsProperty where
  type PropertyType "IncludeTrustContext" VerifiedAccessLogsProperty = Value Prelude.Bool
  set newValue VerifiedAccessLogsProperty {..}
    = VerifiedAccessLogsProperty
        {includeTrustContext = Prelude.pure newValue, ..}
instance Property "KinesisDataFirehose" VerifiedAccessLogsProperty where
  type PropertyType "KinesisDataFirehose" VerifiedAccessLogsProperty = KinesisDataFirehoseProperty
  set newValue VerifiedAccessLogsProperty {..}
    = VerifiedAccessLogsProperty
        {kinesisDataFirehose = Prelude.pure newValue, ..}
instance Property "LogVersion" VerifiedAccessLogsProperty where
  type PropertyType "LogVersion" VerifiedAccessLogsProperty = Value Prelude.Text
  set newValue VerifiedAccessLogsProperty {..}
    = VerifiedAccessLogsProperty
        {logVersion = Prelude.pure newValue, ..}
instance Property "S3" VerifiedAccessLogsProperty where
  type PropertyType "S3" VerifiedAccessLogsProperty = S3Property
  set newValue VerifiedAccessLogsProperty {..}
    = VerifiedAccessLogsProperty {s3 = Prelude.pure newValue, ..}