packages feed

stratosphere-cassandra (empty) → 1.0.0

raw patch · 31 files changed

+1188/−0 lines, 31 filesdep +aesondep +basedep +stratosphere

Dependencies added: aeson, base, stratosphere

Files

+ LICENSE.md view
@@ -0,0 +1,20 @@+Copyright (c) 2016 David Reaver+Copyright (c) 2022 Markus Schirp++Permission is hereby granted, free of charge, to any person obtaining a copy of+this software and associated documentation files (the "Software"), to deal in+the Software without restriction, including without limitation the rights to+use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies+of the Software, and to permit persons to whom the Software is furnished to do+so, subject to the following conditions:++The above copyright notice and this permission notice shall be included in all+copies or substantial portions of the Software.++THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE+SOFTWARE.
+ gen/Stratosphere/Cassandra/Keyspace.hs view
@@ -0,0 +1,69 @@+module Stratosphere.Cassandra.Keyspace (+        module Exports, Keyspace(..), mkKeyspace+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Keyspace.ReplicationSpecificationProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Tag+import Stratosphere.Value+data Keyspace+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-keyspace.html>+    Keyspace {haddock_workaround_ :: (),+              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-keyspace.html#cfn-cassandra-keyspace-clientsidetimestampsenabled>+              clientSideTimestampsEnabled :: (Prelude.Maybe (Value Prelude.Bool)),+              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-keyspace.html#cfn-cassandra-keyspace-keyspacename>+              keyspaceName :: (Prelude.Maybe (Value Prelude.Text)),+              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-keyspace.html#cfn-cassandra-keyspace-replicationspecification>+              replicationSpecification :: (Prelude.Maybe ReplicationSpecificationProperty),+              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-keyspace.html#cfn-cassandra-keyspace-tags>+              tags :: (Prelude.Maybe [Tag])}+  deriving stock (Prelude.Eq, Prelude.Show)+mkKeyspace :: Keyspace+mkKeyspace+  = Keyspace+      {haddock_workaround_ = (),+       clientSideTimestampsEnabled = Prelude.Nothing,+       keyspaceName = Prelude.Nothing,+       replicationSpecification = Prelude.Nothing, tags = Prelude.Nothing}+instance ToResourceProperties Keyspace where+  toResourceProperties Keyspace {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Keyspace", supportsTags = Prelude.True,+         properties = Prelude.fromList+                        (Prelude.catMaybes+                           [(JSON..=) "ClientSideTimestampsEnabled"+                              Prelude.<$> clientSideTimestampsEnabled,+                            (JSON..=) "KeyspaceName" Prelude.<$> keyspaceName,+                            (JSON..=) "ReplicationSpecification"+                              Prelude.<$> replicationSpecification,+                            (JSON..=) "Tags" Prelude.<$> tags])}+instance JSON.ToJSON Keyspace where+  toJSON Keyspace {..}+    = JSON.object+        (Prelude.fromList+           (Prelude.catMaybes+              [(JSON..=) "ClientSideTimestampsEnabled"+                 Prelude.<$> clientSideTimestampsEnabled,+               (JSON..=) "KeyspaceName" Prelude.<$> keyspaceName,+               (JSON..=) "ReplicationSpecification"+                 Prelude.<$> replicationSpecification,+               (JSON..=) "Tags" Prelude.<$> tags]))+instance Property "ClientSideTimestampsEnabled" Keyspace where+  type PropertyType "ClientSideTimestampsEnabled" Keyspace = Value Prelude.Bool+  set newValue Keyspace {..}+    = Keyspace+        {clientSideTimestampsEnabled = Prelude.pure newValue, ..}+instance Property "KeyspaceName" Keyspace where+  type PropertyType "KeyspaceName" Keyspace = Value Prelude.Text+  set newValue Keyspace {..}+    = Keyspace {keyspaceName = Prelude.pure newValue, ..}+instance Property "ReplicationSpecification" Keyspace where+  type PropertyType "ReplicationSpecification" Keyspace = ReplicationSpecificationProperty+  set newValue Keyspace {..}+    = Keyspace {replicationSpecification = Prelude.pure newValue, ..}+instance Property "Tags" Keyspace where+  type PropertyType "Tags" Keyspace = [Tag]+  set newValue Keyspace {..}+    = Keyspace {tags = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Keyspace/ReplicationSpecificationProperty.hs view
@@ -0,0 +1,49 @@+module Stratosphere.Cassandra.Keyspace.ReplicationSpecificationProperty (+        ReplicationSpecificationProperty(..),+        mkReplicationSpecificationProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data ReplicationSpecificationProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-keyspace-replicationspecification.html>+    ReplicationSpecificationProperty {haddock_workaround_ :: (),+                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-keyspace-replicationspecification.html#cfn-cassandra-keyspace-replicationspecification-regionlist>+                                      regionList :: (Prelude.Maybe (ValueList Prelude.Text)),+                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-keyspace-replicationspecification.html#cfn-cassandra-keyspace-replicationspecification-replicationstrategy>+                                      replicationStrategy :: (Prelude.Maybe (Value Prelude.Text))}+  deriving stock (Prelude.Eq, Prelude.Show)+mkReplicationSpecificationProperty ::+  ReplicationSpecificationProperty+mkReplicationSpecificationProperty+  = ReplicationSpecificationProperty+      {haddock_workaround_ = (), regionList = Prelude.Nothing,+       replicationStrategy = Prelude.Nothing}+instance ToResourceProperties ReplicationSpecificationProperty where+  toResourceProperties ReplicationSpecificationProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Keyspace.ReplicationSpecification",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        (Prelude.catMaybes+                           [(JSON..=) "RegionList" Prelude.<$> regionList,+                            (JSON..=) "ReplicationStrategy" Prelude.<$> replicationStrategy])}+instance JSON.ToJSON ReplicationSpecificationProperty where+  toJSON ReplicationSpecificationProperty {..}+    = JSON.object+        (Prelude.fromList+           (Prelude.catMaybes+              [(JSON..=) "RegionList" Prelude.<$> regionList,+               (JSON..=) "ReplicationStrategy" Prelude.<$> replicationStrategy]))+instance Property "RegionList" ReplicationSpecificationProperty where+  type PropertyType "RegionList" ReplicationSpecificationProperty = ValueList Prelude.Text+  set newValue ReplicationSpecificationProperty {..}+    = ReplicationSpecificationProperty+        {regionList = Prelude.pure newValue, ..}+instance Property "ReplicationStrategy" ReplicationSpecificationProperty where+  type PropertyType "ReplicationStrategy" ReplicationSpecificationProperty = Value Prelude.Text+  set newValue ReplicationSpecificationProperty {..}+    = ReplicationSpecificationProperty+        {replicationStrategy = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Keyspace/ReplicationSpecificationProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Keyspace.ReplicationSpecificationProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data ReplicationSpecificationProperty :: Prelude.Type+instance ToResourceProperties ReplicationSpecificationProperty+instance Prelude.Eq ReplicationSpecificationProperty+instance Prelude.Show ReplicationSpecificationProperty+instance JSON.ToJSON ReplicationSpecificationProperty
+ gen/Stratosphere/Cassandra/Table.hs view
@@ -0,0 +1,168 @@+module Stratosphere.Cassandra.Table (+        module Exports, Table(..), mkTable+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.AutoScalingSpecificationProperty as Exports+import {-# SOURCE #-} Stratosphere.Cassandra.Table.BillingModeProperty as Exports+import {-# SOURCE #-} Stratosphere.Cassandra.Table.CdcSpecificationProperty as Exports+import {-# SOURCE #-} Stratosphere.Cassandra.Table.ClusteringKeyColumnProperty as Exports+import {-# SOURCE #-} Stratosphere.Cassandra.Table.ColumnProperty as Exports+import {-# SOURCE #-} Stratosphere.Cassandra.Table.EncryptionSpecificationProperty as Exports+import {-# SOURCE #-} Stratosphere.Cassandra.Table.ReplicaSpecificationProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Tag+import Stratosphere.Value+data Table+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html>+    Table {haddock_workaround_ :: (),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-autoscalingspecifications>+           autoScalingSpecifications :: (Prelude.Maybe AutoScalingSpecificationProperty),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-billingmode>+           billingMode :: (Prelude.Maybe BillingModeProperty),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-cdcspecification>+           cdcSpecification :: (Prelude.Maybe CdcSpecificationProperty),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-clientsidetimestampsenabled>+           clientSideTimestampsEnabled :: (Prelude.Maybe (Value Prelude.Bool)),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-clusteringkeycolumns>+           clusteringKeyColumns :: (Prelude.Maybe [ClusteringKeyColumnProperty]),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-defaulttimetolive>+           defaultTimeToLive :: (Prelude.Maybe (Value Prelude.Integer)),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-encryptionspecification>+           encryptionSpecification :: (Prelude.Maybe EncryptionSpecificationProperty),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-keyspacename>+           keyspaceName :: (Value Prelude.Text),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-partitionkeycolumns>+           partitionKeyColumns :: [ColumnProperty],+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-pointintimerecoveryenabled>+           pointInTimeRecoveryEnabled :: (Prelude.Maybe (Value Prelude.Bool)),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-regularcolumns>+           regularColumns :: (Prelude.Maybe [ColumnProperty]),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-replicaspecifications>+           replicaSpecifications :: (Prelude.Maybe [ReplicaSpecificationProperty]),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-tablename>+           tableName :: (Prelude.Maybe (Value Prelude.Text)),+           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-table.html#cfn-cassandra-table-tags>+           tags :: (Prelude.Maybe [Tag])}+  deriving stock (Prelude.Eq, Prelude.Show)+mkTable :: Value Prelude.Text -> [ColumnProperty] -> Table+mkTable keyspaceName partitionKeyColumns+  = Table+      {haddock_workaround_ = (), keyspaceName = keyspaceName,+       partitionKeyColumns = partitionKeyColumns,+       autoScalingSpecifications = Prelude.Nothing,+       billingMode = Prelude.Nothing, cdcSpecification = Prelude.Nothing,+       clientSideTimestampsEnabled = Prelude.Nothing,+       clusteringKeyColumns = Prelude.Nothing,+       defaultTimeToLive = Prelude.Nothing,+       encryptionSpecification = Prelude.Nothing,+       pointInTimeRecoveryEnabled = Prelude.Nothing,+       regularColumns = Prelude.Nothing,+       replicaSpecifications = Prelude.Nothing,+       tableName = Prelude.Nothing, tags = Prelude.Nothing}+instance ToResourceProperties Table where+  toResourceProperties Table {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table", supportsTags = Prelude.True,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["KeyspaceName" JSON..= keyspaceName,+                            "PartitionKeyColumns" JSON..= partitionKeyColumns]+                           (Prelude.catMaybes+                              [(JSON..=) "AutoScalingSpecifications"+                                 Prelude.<$> autoScalingSpecifications,+                               (JSON..=) "BillingMode" Prelude.<$> billingMode,+                               (JSON..=) "CdcSpecification" Prelude.<$> cdcSpecification,+                               (JSON..=) "ClientSideTimestampsEnabled"+                                 Prelude.<$> clientSideTimestampsEnabled,+                               (JSON..=) "ClusteringKeyColumns" Prelude.<$> clusteringKeyColumns,+                               (JSON..=) "DefaultTimeToLive" Prelude.<$> defaultTimeToLive,+                               (JSON..=) "EncryptionSpecification"+                                 Prelude.<$> encryptionSpecification,+                               (JSON..=) "PointInTimeRecoveryEnabled"+                                 Prelude.<$> pointInTimeRecoveryEnabled,+                               (JSON..=) "RegularColumns" Prelude.<$> regularColumns,+                               (JSON..=) "ReplicaSpecifications"+                                 Prelude.<$> replicaSpecifications,+                               (JSON..=) "TableName" Prelude.<$> tableName,+                               (JSON..=) "Tags" Prelude.<$> tags]))}+instance JSON.ToJSON Table where+  toJSON Table {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["KeyspaceName" JSON..= keyspaceName,+               "PartitionKeyColumns" JSON..= partitionKeyColumns]+              (Prelude.catMaybes+                 [(JSON..=) "AutoScalingSpecifications"+                    Prelude.<$> autoScalingSpecifications,+                  (JSON..=) "BillingMode" Prelude.<$> billingMode,+                  (JSON..=) "CdcSpecification" Prelude.<$> cdcSpecification,+                  (JSON..=) "ClientSideTimestampsEnabled"+                    Prelude.<$> clientSideTimestampsEnabled,+                  (JSON..=) "ClusteringKeyColumns" Prelude.<$> clusteringKeyColumns,+                  (JSON..=) "DefaultTimeToLive" Prelude.<$> defaultTimeToLive,+                  (JSON..=) "EncryptionSpecification"+                    Prelude.<$> encryptionSpecification,+                  (JSON..=) "PointInTimeRecoveryEnabled"+                    Prelude.<$> pointInTimeRecoveryEnabled,+                  (JSON..=) "RegularColumns" Prelude.<$> regularColumns,+                  (JSON..=) "ReplicaSpecifications"+                    Prelude.<$> replicaSpecifications,+                  (JSON..=) "TableName" Prelude.<$> tableName,+                  (JSON..=) "Tags" Prelude.<$> tags])))+instance Property "AutoScalingSpecifications" Table where+  type PropertyType "AutoScalingSpecifications" Table = AutoScalingSpecificationProperty+  set newValue Table {..}+    = Table {autoScalingSpecifications = Prelude.pure newValue, ..}+instance Property "BillingMode" Table where+  type PropertyType "BillingMode" Table = BillingModeProperty+  set newValue Table {..}+    = Table {billingMode = Prelude.pure newValue, ..}+instance Property "CdcSpecification" Table where+  type PropertyType "CdcSpecification" Table = CdcSpecificationProperty+  set newValue Table {..}+    = Table {cdcSpecification = Prelude.pure newValue, ..}+instance Property "ClientSideTimestampsEnabled" Table where+  type PropertyType "ClientSideTimestampsEnabled" Table = Value Prelude.Bool+  set newValue Table {..}+    = Table {clientSideTimestampsEnabled = Prelude.pure newValue, ..}+instance Property "ClusteringKeyColumns" Table where+  type PropertyType "ClusteringKeyColumns" Table = [ClusteringKeyColumnProperty]+  set newValue Table {..}+    = Table {clusteringKeyColumns = Prelude.pure newValue, ..}+instance Property "DefaultTimeToLive" Table where+  type PropertyType "DefaultTimeToLive" Table = Value Prelude.Integer+  set newValue Table {..}+    = Table {defaultTimeToLive = Prelude.pure newValue, ..}+instance Property "EncryptionSpecification" Table where+  type PropertyType "EncryptionSpecification" Table = EncryptionSpecificationProperty+  set newValue Table {..}+    = Table {encryptionSpecification = Prelude.pure newValue, ..}+instance Property "KeyspaceName" Table where+  type PropertyType "KeyspaceName" Table = Value Prelude.Text+  set newValue Table {..} = Table {keyspaceName = newValue, ..}+instance Property "PartitionKeyColumns" Table where+  type PropertyType "PartitionKeyColumns" Table = [ColumnProperty]+  set newValue Table {..}+    = Table {partitionKeyColumns = newValue, ..}+instance Property "PointInTimeRecoveryEnabled" Table where+  type PropertyType "PointInTimeRecoveryEnabled" Table = Value Prelude.Bool+  set newValue Table {..}+    = Table {pointInTimeRecoveryEnabled = Prelude.pure newValue, ..}+instance Property "RegularColumns" Table where+  type PropertyType "RegularColumns" Table = [ColumnProperty]+  set newValue Table {..}+    = Table {regularColumns = Prelude.pure newValue, ..}+instance Property "ReplicaSpecifications" Table where+  type PropertyType "ReplicaSpecifications" Table = [ReplicaSpecificationProperty]+  set newValue Table {..}+    = Table {replicaSpecifications = Prelude.pure newValue, ..}+instance Property "TableName" Table where+  type PropertyType "TableName" Table = Value Prelude.Text+  set newValue Table {..}+    = Table {tableName = Prelude.pure newValue, ..}+instance Property "Tags" Table where+  type PropertyType "Tags" Table = [Tag]+  set newValue Table {..} = Table {tags = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/AutoScalingSettingProperty.hs view
@@ -0,0 +1,68 @@+module Stratosphere.Cassandra.Table.AutoScalingSettingProperty (+        module Exports, AutoScalingSettingProperty(..),+        mkAutoScalingSettingProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.ScalingPolicyProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Value+data AutoScalingSettingProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingsetting.html>+    AutoScalingSettingProperty {haddock_workaround_ :: (),+                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingsetting.html#cfn-cassandra-table-autoscalingsetting-autoscalingdisabled>+                                autoScalingDisabled :: (Prelude.Maybe (Value Prelude.Bool)),+                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingsetting.html#cfn-cassandra-table-autoscalingsetting-maximumunits>+                                maximumUnits :: (Prelude.Maybe (Value Prelude.Integer)),+                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingsetting.html#cfn-cassandra-table-autoscalingsetting-minimumunits>+                                minimumUnits :: (Prelude.Maybe (Value Prelude.Integer)),+                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingsetting.html#cfn-cassandra-table-autoscalingsetting-scalingpolicy>+                                scalingPolicy :: (Prelude.Maybe ScalingPolicyProperty)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkAutoScalingSettingProperty :: AutoScalingSettingProperty+mkAutoScalingSettingProperty+  = AutoScalingSettingProperty+      {haddock_workaround_ = (), autoScalingDisabled = Prelude.Nothing,+       maximumUnits = Prelude.Nothing, minimumUnits = Prelude.Nothing,+       scalingPolicy = Prelude.Nothing}+instance ToResourceProperties AutoScalingSettingProperty where+  toResourceProperties AutoScalingSettingProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.AutoScalingSetting",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        (Prelude.catMaybes+                           [(JSON..=) "AutoScalingDisabled" Prelude.<$> autoScalingDisabled,+                            (JSON..=) "MaximumUnits" Prelude.<$> maximumUnits,+                            (JSON..=) "MinimumUnits" Prelude.<$> minimumUnits,+                            (JSON..=) "ScalingPolicy" Prelude.<$> scalingPolicy])}+instance JSON.ToJSON AutoScalingSettingProperty where+  toJSON AutoScalingSettingProperty {..}+    = JSON.object+        (Prelude.fromList+           (Prelude.catMaybes+              [(JSON..=) "AutoScalingDisabled" Prelude.<$> autoScalingDisabled,+               (JSON..=) "MaximumUnits" Prelude.<$> maximumUnits,+               (JSON..=) "MinimumUnits" Prelude.<$> minimumUnits,+               (JSON..=) "ScalingPolicy" Prelude.<$> scalingPolicy]))+instance Property "AutoScalingDisabled" AutoScalingSettingProperty where+  type PropertyType "AutoScalingDisabled" AutoScalingSettingProperty = Value Prelude.Bool+  set newValue AutoScalingSettingProperty {..}+    = AutoScalingSettingProperty+        {autoScalingDisabled = Prelude.pure newValue, ..}+instance Property "MaximumUnits" AutoScalingSettingProperty where+  type PropertyType "MaximumUnits" AutoScalingSettingProperty = Value Prelude.Integer+  set newValue AutoScalingSettingProperty {..}+    = AutoScalingSettingProperty+        {maximumUnits = Prelude.pure newValue, ..}+instance Property "MinimumUnits" AutoScalingSettingProperty where+  type PropertyType "MinimumUnits" AutoScalingSettingProperty = Value Prelude.Integer+  set newValue AutoScalingSettingProperty {..}+    = AutoScalingSettingProperty+        {minimumUnits = Prelude.pure newValue, ..}+instance Property "ScalingPolicy" AutoScalingSettingProperty where+  type PropertyType "ScalingPolicy" AutoScalingSettingProperty = ScalingPolicyProperty+  set newValue AutoScalingSettingProperty {..}+    = AutoScalingSettingProperty+        {scalingPolicy = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/AutoScalingSettingProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.AutoScalingSettingProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data AutoScalingSettingProperty :: Prelude.Type+instance ToResourceProperties AutoScalingSettingProperty+instance Prelude.Eq AutoScalingSettingProperty+instance Prelude.Show AutoScalingSettingProperty+instance JSON.ToJSON AutoScalingSettingProperty
+ gen/Stratosphere/Cassandra/Table/AutoScalingSpecificationProperty.hs view
@@ -0,0 +1,54 @@+module Stratosphere.Cassandra.Table.AutoScalingSpecificationProperty (+        module Exports, AutoScalingSpecificationProperty(..),+        mkAutoScalingSpecificationProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.AutoScalingSettingProperty as Exports+import Stratosphere.ResourceProperties+data AutoScalingSpecificationProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingspecification.html>+    AutoScalingSpecificationProperty {haddock_workaround_ :: (),+                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingspecification.html#cfn-cassandra-table-autoscalingspecification-readcapacityautoscaling>+                                      readCapacityAutoScaling :: (Prelude.Maybe AutoScalingSettingProperty),+                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-autoscalingspecification.html#cfn-cassandra-table-autoscalingspecification-writecapacityautoscaling>+                                      writeCapacityAutoScaling :: (Prelude.Maybe AutoScalingSettingProperty)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkAutoScalingSpecificationProperty ::+  AutoScalingSpecificationProperty+mkAutoScalingSpecificationProperty+  = AutoScalingSpecificationProperty+      {haddock_workaround_ = (),+       readCapacityAutoScaling = Prelude.Nothing,+       writeCapacityAutoScaling = Prelude.Nothing}+instance ToResourceProperties AutoScalingSpecificationProperty where+  toResourceProperties AutoScalingSpecificationProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.AutoScalingSpecification",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        (Prelude.catMaybes+                           [(JSON..=) "ReadCapacityAutoScaling"+                              Prelude.<$> readCapacityAutoScaling,+                            (JSON..=) "WriteCapacityAutoScaling"+                              Prelude.<$> writeCapacityAutoScaling])}+instance JSON.ToJSON AutoScalingSpecificationProperty where+  toJSON AutoScalingSpecificationProperty {..}+    = JSON.object+        (Prelude.fromList+           (Prelude.catMaybes+              [(JSON..=) "ReadCapacityAutoScaling"+                 Prelude.<$> readCapacityAutoScaling,+               (JSON..=) "WriteCapacityAutoScaling"+                 Prelude.<$> writeCapacityAutoScaling]))+instance Property "ReadCapacityAutoScaling" AutoScalingSpecificationProperty where+  type PropertyType "ReadCapacityAutoScaling" AutoScalingSpecificationProperty = AutoScalingSettingProperty+  set newValue AutoScalingSpecificationProperty {..}+    = AutoScalingSpecificationProperty+        {readCapacityAutoScaling = Prelude.pure newValue, ..}+instance Property "WriteCapacityAutoScaling" AutoScalingSpecificationProperty where+  type PropertyType "WriteCapacityAutoScaling" AutoScalingSpecificationProperty = AutoScalingSettingProperty+  set newValue AutoScalingSpecificationProperty {..}+    = AutoScalingSpecificationProperty+        {writeCapacityAutoScaling = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/AutoScalingSpecificationProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.AutoScalingSpecificationProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data AutoScalingSpecificationProperty :: Prelude.Type+instance ToResourceProperties AutoScalingSpecificationProperty+instance Prelude.Eq AutoScalingSpecificationProperty+instance Prelude.Show AutoScalingSpecificationProperty+instance JSON.ToJSON AutoScalingSpecificationProperty
+ gen/Stratosphere/Cassandra/Table/BillingModeProperty.hs view
@@ -0,0 +1,51 @@+module Stratosphere.Cassandra.Table.BillingModeProperty (+        module Exports, BillingModeProperty(..), mkBillingModeProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.ProvisionedThroughputProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Value+data BillingModeProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-billingmode.html>+    BillingModeProperty {haddock_workaround_ :: (),+                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-billingmode.html#cfn-cassandra-table-billingmode-mode>+                         mode :: (Value Prelude.Text),+                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-billingmode.html#cfn-cassandra-table-billingmode-provisionedthroughput>+                         provisionedThroughput :: (Prelude.Maybe ProvisionedThroughputProperty)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkBillingModeProperty :: Value Prelude.Text -> BillingModeProperty+mkBillingModeProperty mode+  = BillingModeProperty+      {haddock_workaround_ = (), mode = mode,+       provisionedThroughput = Prelude.Nothing}+instance ToResourceProperties BillingModeProperty where+  toResourceProperties BillingModeProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.BillingMode",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["Mode" JSON..= mode]+                           (Prelude.catMaybes+                              [(JSON..=) "ProvisionedThroughput"+                                 Prelude.<$> provisionedThroughput]))}+instance JSON.ToJSON BillingModeProperty where+  toJSON BillingModeProperty {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["Mode" JSON..= mode]+              (Prelude.catMaybes+                 [(JSON..=) "ProvisionedThroughput"+                    Prelude.<$> provisionedThroughput])))+instance Property "Mode" BillingModeProperty where+  type PropertyType "Mode" BillingModeProperty = Value Prelude.Text+  set newValue BillingModeProperty {..}+    = BillingModeProperty {mode = newValue, ..}+instance Property "ProvisionedThroughput" BillingModeProperty where+  type PropertyType "ProvisionedThroughput" BillingModeProperty = ProvisionedThroughputProperty+  set newValue BillingModeProperty {..}+    = BillingModeProperty+        {provisionedThroughput = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/BillingModeProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.BillingModeProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data BillingModeProperty :: Prelude.Type+instance ToResourceProperties BillingModeProperty+instance Prelude.Eq BillingModeProperty+instance Prelude.Show BillingModeProperty+instance JSON.ToJSON BillingModeProperty
+ gen/Stratosphere/Cassandra/Table/CdcSpecificationProperty.hs view
@@ -0,0 +1,57 @@+module Stratosphere.Cassandra.Table.CdcSpecificationProperty (+        CdcSpecificationProperty(..), mkCdcSpecificationProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Tag+import Stratosphere.Value+data CdcSpecificationProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-cdcspecification.html>+    CdcSpecificationProperty {haddock_workaround_ :: (),+                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-cdcspecification.html#cfn-cassandra-table-cdcspecification-status>+                              status :: (Value Prelude.Text),+                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-cdcspecification.html#cfn-cassandra-table-cdcspecification-tags>+                              tags :: (Prelude.Maybe [Tag]),+                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-cdcspecification.html#cfn-cassandra-table-cdcspecification-viewtype>+                              viewType :: (Prelude.Maybe (Value Prelude.Text))}+  deriving stock (Prelude.Eq, Prelude.Show)+mkCdcSpecificationProperty ::+  Value Prelude.Text -> CdcSpecificationProperty+mkCdcSpecificationProperty status+  = CdcSpecificationProperty+      {haddock_workaround_ = (), status = status, tags = Prelude.Nothing,+       viewType = Prelude.Nothing}+instance ToResourceProperties CdcSpecificationProperty where+  toResourceProperties CdcSpecificationProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.CdcSpecification",+         supportsTags = Prelude.True,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["Status" JSON..= status]+                           (Prelude.catMaybes+                              [(JSON..=) "Tags" Prelude.<$> tags,+                               (JSON..=) "ViewType" Prelude.<$> viewType]))}+instance JSON.ToJSON CdcSpecificationProperty where+  toJSON CdcSpecificationProperty {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["Status" JSON..= status]+              (Prelude.catMaybes+                 [(JSON..=) "Tags" Prelude.<$> tags,+                  (JSON..=) "ViewType" Prelude.<$> viewType])))+instance Property "Status" CdcSpecificationProperty where+  type PropertyType "Status" CdcSpecificationProperty = Value Prelude.Text+  set newValue CdcSpecificationProperty {..}+    = CdcSpecificationProperty {status = newValue, ..}+instance Property "Tags" CdcSpecificationProperty where+  type PropertyType "Tags" CdcSpecificationProperty = [Tag]+  set newValue CdcSpecificationProperty {..}+    = CdcSpecificationProperty {tags = Prelude.pure newValue, ..}+instance Property "ViewType" CdcSpecificationProperty where+  type PropertyType "ViewType" CdcSpecificationProperty = Value Prelude.Text+  set newValue CdcSpecificationProperty {..}+    = CdcSpecificationProperty {viewType = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/CdcSpecificationProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.CdcSpecificationProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data CdcSpecificationProperty :: Prelude.Type+instance ToResourceProperties CdcSpecificationProperty+instance Prelude.Eq CdcSpecificationProperty+instance Prelude.Show CdcSpecificationProperty+instance JSON.ToJSON CdcSpecificationProperty
+ gen/Stratosphere/Cassandra/Table/ClusteringKeyColumnProperty.hs view
@@ -0,0 +1,48 @@+module Stratosphere.Cassandra.Table.ClusteringKeyColumnProperty (+        module Exports, ClusteringKeyColumnProperty(..),+        mkClusteringKeyColumnProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.ColumnProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Value+data ClusteringKeyColumnProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-clusteringkeycolumn.html>+    ClusteringKeyColumnProperty {haddock_workaround_ :: (),+                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-clusteringkeycolumn.html#cfn-cassandra-table-clusteringkeycolumn-column>+                                 column :: ColumnProperty,+                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-clusteringkeycolumn.html#cfn-cassandra-table-clusteringkeycolumn-orderby>+                                 orderBy :: (Prelude.Maybe (Value Prelude.Text))}+  deriving stock (Prelude.Eq, Prelude.Show)+mkClusteringKeyColumnProperty ::+  ColumnProperty -> ClusteringKeyColumnProperty+mkClusteringKeyColumnProperty column+  = ClusteringKeyColumnProperty+      {haddock_workaround_ = (), column = column,+       orderBy = Prelude.Nothing}+instance ToResourceProperties ClusteringKeyColumnProperty where+  toResourceProperties ClusteringKeyColumnProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.ClusteringKeyColumn",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["Column" JSON..= column]+                           (Prelude.catMaybes [(JSON..=) "OrderBy" Prelude.<$> orderBy]))}+instance JSON.ToJSON ClusteringKeyColumnProperty where+  toJSON ClusteringKeyColumnProperty {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["Column" JSON..= column]+              (Prelude.catMaybes [(JSON..=) "OrderBy" Prelude.<$> orderBy])))+instance Property "Column" ClusteringKeyColumnProperty where+  type PropertyType "Column" ClusteringKeyColumnProperty = ColumnProperty+  set newValue ClusteringKeyColumnProperty {..}+    = ClusteringKeyColumnProperty {column = newValue, ..}+instance Property "OrderBy" ClusteringKeyColumnProperty where+  type PropertyType "OrderBy" ClusteringKeyColumnProperty = Value Prelude.Text+  set newValue ClusteringKeyColumnProperty {..}+    = ClusteringKeyColumnProperty {orderBy = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/ClusteringKeyColumnProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.ClusteringKeyColumnProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data ClusteringKeyColumnProperty :: Prelude.Type+instance ToResourceProperties ClusteringKeyColumnProperty+instance Prelude.Eq ClusteringKeyColumnProperty+instance Prelude.Show ClusteringKeyColumnProperty+instance JSON.ToJSON ClusteringKeyColumnProperty
+ gen/Stratosphere/Cassandra/Table/ColumnProperty.hs view
@@ -0,0 +1,41 @@+module Stratosphere.Cassandra.Table.ColumnProperty (+        ColumnProperty(..), mkColumnProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data ColumnProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-column.html>+    ColumnProperty {haddock_workaround_ :: (),+                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-column.html#cfn-cassandra-table-column-columnname>+                    columnName :: (Value Prelude.Text),+                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-column.html#cfn-cassandra-table-column-columntype>+                    columnType :: (Value Prelude.Text)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkColumnProperty ::+  Value Prelude.Text -> Value Prelude.Text -> ColumnProperty+mkColumnProperty columnName columnType+  = ColumnProperty+      {haddock_workaround_ = (), columnName = columnName,+       columnType = columnType}+instance ToResourceProperties ColumnProperty where+  toResourceProperties ColumnProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.Column",+         supportsTags = Prelude.False,+         properties = ["ColumnName" JSON..= columnName,+                       "ColumnType" JSON..= columnType]}+instance JSON.ToJSON ColumnProperty where+  toJSON ColumnProperty {..}+    = JSON.object+        ["ColumnName" JSON..= columnName, "ColumnType" JSON..= columnType]+instance Property "ColumnName" ColumnProperty where+  type PropertyType "ColumnName" ColumnProperty = Value Prelude.Text+  set newValue ColumnProperty {..}+    = ColumnProperty {columnName = newValue, ..}+instance Property "ColumnType" ColumnProperty where+  type PropertyType "ColumnType" ColumnProperty = Value Prelude.Text+  set newValue ColumnProperty {..}+    = ColumnProperty {columnType = newValue, ..}
+ gen/Stratosphere/Cassandra/Table/ColumnProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.ColumnProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data ColumnProperty :: Prelude.Type+instance ToResourceProperties ColumnProperty+instance Prelude.Eq ColumnProperty+instance Prelude.Show ColumnProperty+instance JSON.ToJSON ColumnProperty
+ gen/Stratosphere/Cassandra/Table/EncryptionSpecificationProperty.hs view
@@ -0,0 +1,50 @@+module Stratosphere.Cassandra.Table.EncryptionSpecificationProperty (+        EncryptionSpecificationProperty(..),+        mkEncryptionSpecificationProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data EncryptionSpecificationProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-encryptionspecification.html>+    EncryptionSpecificationProperty {haddock_workaround_ :: (),+                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-encryptionspecification.html#cfn-cassandra-table-encryptionspecification-encryptiontype>+                                     encryptionType :: (Value Prelude.Text),+                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-encryptionspecification.html#cfn-cassandra-table-encryptionspecification-kmskeyidentifier>+                                     kmsKeyIdentifier :: (Prelude.Maybe (Value Prelude.Text))}+  deriving stock (Prelude.Eq, Prelude.Show)+mkEncryptionSpecificationProperty ::+  Value Prelude.Text -> EncryptionSpecificationProperty+mkEncryptionSpecificationProperty encryptionType+  = EncryptionSpecificationProperty+      {haddock_workaround_ = (), encryptionType = encryptionType,+       kmsKeyIdentifier = Prelude.Nothing}+instance ToResourceProperties EncryptionSpecificationProperty where+  toResourceProperties EncryptionSpecificationProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.EncryptionSpecification",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["EncryptionType" JSON..= encryptionType]+                           (Prelude.catMaybes+                              [(JSON..=) "KmsKeyIdentifier" Prelude.<$> kmsKeyIdentifier]))}+instance JSON.ToJSON EncryptionSpecificationProperty where+  toJSON EncryptionSpecificationProperty {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["EncryptionType" JSON..= encryptionType]+              (Prelude.catMaybes+                 [(JSON..=) "KmsKeyIdentifier" Prelude.<$> kmsKeyIdentifier])))+instance Property "EncryptionType" EncryptionSpecificationProperty where+  type PropertyType "EncryptionType" EncryptionSpecificationProperty = Value Prelude.Text+  set newValue EncryptionSpecificationProperty {..}+    = EncryptionSpecificationProperty {encryptionType = newValue, ..}+instance Property "KmsKeyIdentifier" EncryptionSpecificationProperty where+  type PropertyType "KmsKeyIdentifier" EncryptionSpecificationProperty = Value Prelude.Text+  set newValue EncryptionSpecificationProperty {..}+    = EncryptionSpecificationProperty+        {kmsKeyIdentifier = Prelude.pure newValue, ..}
+ gen/Stratosphere/Cassandra/Table/EncryptionSpecificationProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.EncryptionSpecificationProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data EncryptionSpecificationProperty :: Prelude.Type+instance ToResourceProperties EncryptionSpecificationProperty+instance Prelude.Eq EncryptionSpecificationProperty+instance Prelude.Show EncryptionSpecificationProperty+instance JSON.ToJSON EncryptionSpecificationProperty
+ gen/Stratosphere/Cassandra/Table/ProvisionedThroughputProperty.hs view
@@ -0,0 +1,45 @@+module Stratosphere.Cassandra.Table.ProvisionedThroughputProperty (+        ProvisionedThroughputProperty(..), mkProvisionedThroughputProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data ProvisionedThroughputProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-provisionedthroughput.html>+    ProvisionedThroughputProperty {haddock_workaround_ :: (),+                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-provisionedthroughput.html#cfn-cassandra-table-provisionedthroughput-readcapacityunits>+                                   readCapacityUnits :: (Value Prelude.Integer),+                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-provisionedthroughput.html#cfn-cassandra-table-provisionedthroughput-writecapacityunits>+                                   writeCapacityUnits :: (Value Prelude.Integer)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkProvisionedThroughputProperty ::+  Value Prelude.Integer+  -> Value Prelude.Integer -> ProvisionedThroughputProperty+mkProvisionedThroughputProperty+  readCapacityUnits+  writeCapacityUnits+  = ProvisionedThroughputProperty+      {haddock_workaround_ = (), readCapacityUnits = readCapacityUnits,+       writeCapacityUnits = writeCapacityUnits}+instance ToResourceProperties ProvisionedThroughputProperty where+  toResourceProperties ProvisionedThroughputProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.ProvisionedThroughput",+         supportsTags = Prelude.False,+         properties = ["ReadCapacityUnits" JSON..= readCapacityUnits,+                       "WriteCapacityUnits" JSON..= writeCapacityUnits]}+instance JSON.ToJSON ProvisionedThroughputProperty where+  toJSON ProvisionedThroughputProperty {..}+    = JSON.object+        ["ReadCapacityUnits" JSON..= readCapacityUnits,+         "WriteCapacityUnits" JSON..= writeCapacityUnits]+instance Property "ReadCapacityUnits" ProvisionedThroughputProperty where+  type PropertyType "ReadCapacityUnits" ProvisionedThroughputProperty = Value Prelude.Integer+  set newValue ProvisionedThroughputProperty {..}+    = ProvisionedThroughputProperty {readCapacityUnits = newValue, ..}+instance Property "WriteCapacityUnits" ProvisionedThroughputProperty where+  type PropertyType "WriteCapacityUnits" ProvisionedThroughputProperty = Value Prelude.Integer+  set newValue ProvisionedThroughputProperty {..}+    = ProvisionedThroughputProperty {writeCapacityUnits = newValue, ..}
+ gen/Stratosphere/Cassandra/Table/ProvisionedThroughputProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.ProvisionedThroughputProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data ProvisionedThroughputProperty :: Prelude.Type+instance ToResourceProperties ProvisionedThroughputProperty+instance Prelude.Eq ProvisionedThroughputProperty+instance Prelude.Show ProvisionedThroughputProperty+instance JSON.ToJSON ProvisionedThroughputProperty
+ gen/Stratosphere/Cassandra/Table/ReplicaSpecificationProperty.hs view
@@ -0,0 +1,63 @@+module Stratosphere.Cassandra.Table.ReplicaSpecificationProperty (+        module Exports, ReplicaSpecificationProperty(..),+        mkReplicaSpecificationProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.AutoScalingSettingProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Value+data ReplicaSpecificationProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-replicaspecification.html>+    ReplicaSpecificationProperty {haddock_workaround_ :: (),+                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-replicaspecification.html#cfn-cassandra-table-replicaspecification-readcapacityautoscaling>+                                  readCapacityAutoScaling :: (Prelude.Maybe AutoScalingSettingProperty),+                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-replicaspecification.html#cfn-cassandra-table-replicaspecification-readcapacityunits>+                                  readCapacityUnits :: (Prelude.Maybe (Value Prelude.Integer)),+                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-replicaspecification.html#cfn-cassandra-table-replicaspecification-region>+                                  region :: (Value Prelude.Text)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkReplicaSpecificationProperty ::+  Value Prelude.Text -> ReplicaSpecificationProperty+mkReplicaSpecificationProperty region+  = ReplicaSpecificationProperty+      {haddock_workaround_ = (), region = region,+       readCapacityAutoScaling = Prelude.Nothing,+       readCapacityUnits = Prelude.Nothing}+instance ToResourceProperties ReplicaSpecificationProperty where+  toResourceProperties ReplicaSpecificationProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.ReplicaSpecification",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["Region" JSON..= region]+                           (Prelude.catMaybes+                              [(JSON..=) "ReadCapacityAutoScaling"+                                 Prelude.<$> readCapacityAutoScaling,+                               (JSON..=) "ReadCapacityUnits" Prelude.<$> readCapacityUnits]))}+instance JSON.ToJSON ReplicaSpecificationProperty where+  toJSON ReplicaSpecificationProperty {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["Region" JSON..= region]+              (Prelude.catMaybes+                 [(JSON..=) "ReadCapacityAutoScaling"+                    Prelude.<$> readCapacityAutoScaling,+                  (JSON..=) "ReadCapacityUnits" Prelude.<$> readCapacityUnits])))+instance Property "ReadCapacityAutoScaling" ReplicaSpecificationProperty where+  type PropertyType "ReadCapacityAutoScaling" ReplicaSpecificationProperty = AutoScalingSettingProperty+  set newValue ReplicaSpecificationProperty {..}+    = ReplicaSpecificationProperty+        {readCapacityAutoScaling = Prelude.pure newValue, ..}+instance Property "ReadCapacityUnits" ReplicaSpecificationProperty where+  type PropertyType "ReadCapacityUnits" ReplicaSpecificationProperty = Value Prelude.Integer+  set newValue ReplicaSpecificationProperty {..}+    = ReplicaSpecificationProperty+        {readCapacityUnits = Prelude.pure newValue, ..}+instance Property "Region" ReplicaSpecificationProperty where+  type PropertyType "Region" ReplicaSpecificationProperty = Value Prelude.Text+  set newValue ReplicaSpecificationProperty {..}+    = ReplicaSpecificationProperty {region = newValue, ..}
+ gen/Stratosphere/Cassandra/Table/ReplicaSpecificationProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.ReplicaSpecificationProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data ReplicaSpecificationProperty :: Prelude.Type+instance ToResourceProperties ReplicaSpecificationProperty+instance Prelude.Eq ReplicaSpecificationProperty+instance Prelude.Show ReplicaSpecificationProperty+instance JSON.ToJSON ReplicaSpecificationProperty
+ gen/Stratosphere/Cassandra/Table/ScalingPolicyProperty.hs view
@@ -0,0 +1,41 @@+module Stratosphere.Cassandra.Table.ScalingPolicyProperty (+        module Exports, ScalingPolicyProperty(..), mkScalingPolicyProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Table.TargetTrackingScalingPolicyConfigurationProperty as Exports+import Stratosphere.ResourceProperties+data ScalingPolicyProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-scalingpolicy.html>+    ScalingPolicyProperty {haddock_workaround_ :: (),+                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-scalingpolicy.html#cfn-cassandra-table-scalingpolicy-targettrackingscalingpolicyconfiguration>+                           targetTrackingScalingPolicyConfiguration :: (Prelude.Maybe TargetTrackingScalingPolicyConfigurationProperty)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkScalingPolicyProperty :: ScalingPolicyProperty+mkScalingPolicyProperty+  = ScalingPolicyProperty+      {haddock_workaround_ = (),+       targetTrackingScalingPolicyConfiguration = Prelude.Nothing}+instance ToResourceProperties ScalingPolicyProperty where+  toResourceProperties ScalingPolicyProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.ScalingPolicy",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        (Prelude.catMaybes+                           [(JSON..=) "TargetTrackingScalingPolicyConfiguration"+                              Prelude.<$> targetTrackingScalingPolicyConfiguration])}+instance JSON.ToJSON ScalingPolicyProperty where+  toJSON ScalingPolicyProperty {..}+    = JSON.object+        (Prelude.fromList+           (Prelude.catMaybes+              [(JSON..=) "TargetTrackingScalingPolicyConfiguration"+                 Prelude.<$> targetTrackingScalingPolicyConfiguration]))+instance Property "TargetTrackingScalingPolicyConfiguration" ScalingPolicyProperty where+  type PropertyType "TargetTrackingScalingPolicyConfiguration" ScalingPolicyProperty = TargetTrackingScalingPolicyConfigurationProperty+  set newValue ScalingPolicyProperty {..}+    = ScalingPolicyProperty+        {targetTrackingScalingPolicyConfiguration = Prelude.pure newValue,+         ..}
+ gen/Stratosphere/Cassandra/Table/ScalingPolicyProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.ScalingPolicyProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data ScalingPolicyProperty :: Prelude.Type+instance ToResourceProperties ScalingPolicyProperty+instance Prelude.Eq ScalingPolicyProperty+instance Prelude.Show ScalingPolicyProperty+instance JSON.ToJSON ScalingPolicyProperty
+ gen/Stratosphere/Cassandra/Table/TargetTrackingScalingPolicyConfigurationProperty.hs view
@@ -0,0 +1,73 @@+module Stratosphere.Cassandra.Table.TargetTrackingScalingPolicyConfigurationProperty (+        TargetTrackingScalingPolicyConfigurationProperty(..),+        mkTargetTrackingScalingPolicyConfigurationProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data TargetTrackingScalingPolicyConfigurationProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-targettrackingscalingpolicyconfiguration.html>+    TargetTrackingScalingPolicyConfigurationProperty {haddock_workaround_ :: (),+                                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-targettrackingscalingpolicyconfiguration.html#cfn-cassandra-table-targettrackingscalingpolicyconfiguration-disablescalein>+                                                      disableScaleIn :: (Prelude.Maybe (Value Prelude.Bool)),+                                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-targettrackingscalingpolicyconfiguration.html#cfn-cassandra-table-targettrackingscalingpolicyconfiguration-scaleincooldown>+                                                      scaleInCooldown :: (Prelude.Maybe (Value Prelude.Integer)),+                                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-targettrackingscalingpolicyconfiguration.html#cfn-cassandra-table-targettrackingscalingpolicyconfiguration-scaleoutcooldown>+                                                      scaleOutCooldown :: (Prelude.Maybe (Value Prelude.Integer)),+                                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-targettrackingscalingpolicyconfiguration.html#cfn-cassandra-table-targettrackingscalingpolicyconfiguration-targetvalue>+                                                      targetValue :: (Value Prelude.Integer)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkTargetTrackingScalingPolicyConfigurationProperty ::+  Value Prelude.Integer+  -> TargetTrackingScalingPolicyConfigurationProperty+mkTargetTrackingScalingPolicyConfigurationProperty targetValue+  = TargetTrackingScalingPolicyConfigurationProperty+      {haddock_workaround_ = (), targetValue = targetValue,+       disableScaleIn = Prelude.Nothing,+       scaleInCooldown = Prelude.Nothing,+       scaleOutCooldown = Prelude.Nothing}+instance ToResourceProperties TargetTrackingScalingPolicyConfigurationProperty where+  toResourceProperties+    TargetTrackingScalingPolicyConfigurationProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Table.TargetTrackingScalingPolicyConfiguration",+         supportsTags = Prelude.False,+         properties = Prelude.fromList+                        ((Prelude.<>)+                           ["TargetValue" JSON..= targetValue]+                           (Prelude.catMaybes+                              [(JSON..=) "DisableScaleIn" Prelude.<$> disableScaleIn,+                               (JSON..=) "ScaleInCooldown" Prelude.<$> scaleInCooldown,+                               (JSON..=) "ScaleOutCooldown" Prelude.<$> scaleOutCooldown]))}+instance JSON.ToJSON TargetTrackingScalingPolicyConfigurationProperty where+  toJSON TargetTrackingScalingPolicyConfigurationProperty {..}+    = JSON.object+        (Prelude.fromList+           ((Prelude.<>)+              ["TargetValue" JSON..= targetValue]+              (Prelude.catMaybes+                 [(JSON..=) "DisableScaleIn" Prelude.<$> disableScaleIn,+                  (JSON..=) "ScaleInCooldown" Prelude.<$> scaleInCooldown,+                  (JSON..=) "ScaleOutCooldown" Prelude.<$> scaleOutCooldown])))+instance Property "DisableScaleIn" TargetTrackingScalingPolicyConfigurationProperty where+  type PropertyType "DisableScaleIn" TargetTrackingScalingPolicyConfigurationProperty = Value Prelude.Bool+  set newValue TargetTrackingScalingPolicyConfigurationProperty {..}+    = TargetTrackingScalingPolicyConfigurationProperty+        {disableScaleIn = Prelude.pure newValue, ..}+instance Property "ScaleInCooldown" TargetTrackingScalingPolicyConfigurationProperty where+  type PropertyType "ScaleInCooldown" TargetTrackingScalingPolicyConfigurationProperty = Value Prelude.Integer+  set newValue TargetTrackingScalingPolicyConfigurationProperty {..}+    = TargetTrackingScalingPolicyConfigurationProperty+        {scaleInCooldown = Prelude.pure newValue, ..}+instance Property "ScaleOutCooldown" TargetTrackingScalingPolicyConfigurationProperty where+  type PropertyType "ScaleOutCooldown" TargetTrackingScalingPolicyConfigurationProperty = Value Prelude.Integer+  set newValue TargetTrackingScalingPolicyConfigurationProperty {..}+    = TargetTrackingScalingPolicyConfigurationProperty+        {scaleOutCooldown = Prelude.pure newValue, ..}+instance Property "TargetValue" TargetTrackingScalingPolicyConfigurationProperty where+  type PropertyType "TargetValue" TargetTrackingScalingPolicyConfigurationProperty = Value Prelude.Integer+  set newValue TargetTrackingScalingPolicyConfigurationProperty {..}+    = TargetTrackingScalingPolicyConfigurationProperty+        {targetValue = newValue, ..}
+ gen/Stratosphere/Cassandra/Table/TargetTrackingScalingPolicyConfigurationProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Table.TargetTrackingScalingPolicyConfigurationProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data TargetTrackingScalingPolicyConfigurationProperty :: Prelude.Type+instance ToResourceProperties TargetTrackingScalingPolicyConfigurationProperty+instance Prelude.Eq TargetTrackingScalingPolicyConfigurationProperty+instance Prelude.Show TargetTrackingScalingPolicyConfigurationProperty+instance JSON.ToJSON TargetTrackingScalingPolicyConfigurationProperty
+ gen/Stratosphere/Cassandra/Type.hs view
@@ -0,0 +1,45 @@+module Stratosphere.Cassandra.Type (+        module Exports, Type(..), mkType+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import {-# SOURCE #-} Stratosphere.Cassandra.Type.FieldProperty as Exports+import Stratosphere.ResourceProperties+import Stratosphere.Value+data Type+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-type.html>+    Type {haddock_workaround_ :: (),+          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-type.html#cfn-cassandra-type-fields>+          fields :: [FieldProperty],+          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-type.html#cfn-cassandra-type-keyspacename>+          keyspaceName :: (Value Prelude.Text),+          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cassandra-type.html#cfn-cassandra-type-typename>+          typeName :: (Value Prelude.Text)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkType ::+  [FieldProperty] -> Value Prelude.Text -> Value Prelude.Text -> Type+mkType fields keyspaceName typeName+  = Type+      {haddock_workaround_ = (), fields = fields,+       keyspaceName = keyspaceName, typeName = typeName}+instance ToResourceProperties Type where+  toResourceProperties Type {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Type", supportsTags = Prelude.False,+         properties = ["Fields" JSON..= fields,+                       "KeyspaceName" JSON..= keyspaceName, "TypeName" JSON..= typeName]}+instance JSON.ToJSON Type where+  toJSON Type {..}+    = JSON.object+        ["Fields" JSON..= fields, "KeyspaceName" JSON..= keyspaceName,+         "TypeName" JSON..= typeName]+instance Property "Fields" Type where+  type PropertyType "Fields" Type = [FieldProperty]+  set newValue Type {..} = Type {fields = newValue, ..}+instance Property "KeyspaceName" Type where+  type PropertyType "KeyspaceName" Type = Value Prelude.Text+  set newValue Type {..} = Type {keyspaceName = newValue, ..}+instance Property "TypeName" Type where+  type PropertyType "TypeName" Type = Value Prelude.Text+  set newValue Type {..} = Type {typeName = newValue, ..}
+ gen/Stratosphere/Cassandra/Type/FieldProperty.hs view
@@ -0,0 +1,41 @@+module Stratosphere.Cassandra.Type.FieldProperty (+        FieldProperty(..), mkFieldProperty+    ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data FieldProperty+  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-type-field.html>+    FieldProperty {haddock_workaround_ :: (),+                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-type-field.html#cfn-cassandra-type-field-fieldname>+                   fieldName :: (Value Prelude.Text),+                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-type-field.html#cfn-cassandra-type-field-fieldtype>+                   fieldType :: (Value Prelude.Text)}+  deriving stock (Prelude.Eq, Prelude.Show)+mkFieldProperty ::+  Value Prelude.Text -> Value Prelude.Text -> FieldProperty+mkFieldProperty fieldName fieldType+  = FieldProperty+      {haddock_workaround_ = (), fieldName = fieldName,+       fieldType = fieldType}+instance ToResourceProperties FieldProperty where+  toResourceProperties FieldProperty {..}+    = ResourceProperties+        {awsType = "AWS::Cassandra::Type.Field",+         supportsTags = Prelude.False,+         properties = ["FieldName" JSON..= fieldName,+                       "FieldType" JSON..= fieldType]}+instance JSON.ToJSON FieldProperty where+  toJSON FieldProperty {..}+    = JSON.object+        ["FieldName" JSON..= fieldName, "FieldType" JSON..= fieldType]+instance Property "FieldName" FieldProperty where+  type PropertyType "FieldName" FieldProperty = Value Prelude.Text+  set newValue FieldProperty {..}+    = FieldProperty {fieldName = newValue, ..}+instance Property "FieldType" FieldProperty where+  type PropertyType "FieldType" FieldProperty = Value Prelude.Text+  set newValue FieldProperty {..}+    = FieldProperty {fieldType = newValue, ..}
+ gen/Stratosphere/Cassandra/Type/FieldProperty.hs-boot view
@@ -0,0 +1,9 @@+module Stratosphere.Cassandra.Type.FieldProperty where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data FieldProperty :: Prelude.Type+instance ToResourceProperties FieldProperty+instance Prelude.Eq FieldProperty+instance Prelude.Show FieldProperty+instance JSON.ToJSON FieldProperty
+ stratosphere-cassandra.cabal view
@@ -0,0 +1,88 @@+cabal-version: 1.12++-- This file has been generated from package.yaml by hpack version 0.38.2.+--+-- see: https://github.com/sol/hpack++name:           stratosphere-cassandra+version:        1.0.0+synopsis:       Stratosphere integration for AWS Cassandra.+description:    Integration into stratosphere to generate resources and properties for AWS Cassandra+category:       AWS, Cloud, Cassandra+stability:      experimental+homepage:       https://github.com/mbj/stratosphere#readme+bug-reports:    https://github.com/mbj/stratosphere/issues+maintainer:     Markus Schirp+license:        MIT+license-file:   LICENSE.md+build-type:     Simple++source-repository head+  type: git+  location: https://github.com/mbj/stratosphere++flag development+  description: Run GHC with development flags+  manual: True+  default: False++library+  exposed-modules:+      Stratosphere.Cassandra.Keyspace+      Stratosphere.Cassandra.Keyspace.ReplicationSpecificationProperty+      Stratosphere.Cassandra.Table+      Stratosphere.Cassandra.Table.AutoScalingSettingProperty+      Stratosphere.Cassandra.Table.AutoScalingSpecificationProperty+      Stratosphere.Cassandra.Table.BillingModeProperty+      Stratosphere.Cassandra.Table.CdcSpecificationProperty+      Stratosphere.Cassandra.Table.ClusteringKeyColumnProperty+      Stratosphere.Cassandra.Table.ColumnProperty+      Stratosphere.Cassandra.Table.EncryptionSpecificationProperty+      Stratosphere.Cassandra.Table.ProvisionedThroughputProperty+      Stratosphere.Cassandra.Table.ReplicaSpecificationProperty+      Stratosphere.Cassandra.Table.ScalingPolicyProperty+      Stratosphere.Cassandra.Table.TargetTrackingScalingPolicyConfigurationProperty+      Stratosphere.Cassandra.Type+      Stratosphere.Cassandra.Type.FieldProperty+  other-modules:+      Paths_stratosphere_cassandra+  hs-source-dirs:+      gen+  default-extensions:+      DataKinds+      DeriveGeneric+      DerivingStrategies+      DerivingVia+      DuplicateRecordFields+      FlexibleContexts+      FlexibleInstances+      GADTs+      GeneralizedNewtypeDeriving+      InstanceSigs+      LambdaCase+      MultiParamTypeClasses+      NoFieldSelectors+      NoImplicitPrelude+      NumericUnderscores+      OverloadedLists+      OverloadedRecordDot+      OverloadedStrings+      PolyKinds+      RecordWildCards+      ScopedTypeVariables+      StandaloneDeriving+      Strict+      TemplateHaskell+      TupleSections+      TypeApplications+      TypeFamilies+  ghc-options: -Wall -Wcompat -Widentities -Wimplicit-prelude -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-local-signatures -Wmissing-signatures -Wmonomorphism-restriction -Wredundant-constraints -fhide-source-paths -funbox-strict-fields -optP-Wno-nonportable-include-path -Wno-unused-imports+  build-depends:+      aeson ==2.*+    , base >=4.8 && <4.22+    , stratosphere ==1.0.0+  default-language: Haskell2010+  if flag(development)+    ghc-options: -Werror+  else+    ghc-options: -Wwarn