packages feed

stratosphere 0.43.0 → 0.44.0

raw patch · 13 files changed

+229/−72 lines, 13 files

Files

CHANGELOG.md view
@@ -1,5 +1,10 @@ # Change Log +## 0.44.0++* Update resource specification document to version 7.1.0+* Added NodeJS10x Lambda runtime (@Gosha)+ ## 0.43.0  * Update resource specification document to version 6.3.0
library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentComputeResources.hs view
@@ -15,7 +15,8 @@ -- constructor. data BatchComputeEnvironmentComputeResources =   BatchComputeEnvironmentComputeResources-  { _batchComputeEnvironmentComputeResourcesBidPercentage :: Maybe (Val Integer)+  { _batchComputeEnvironmentComputeResourcesAllocationStrategy :: Maybe (Val Text)+  , _batchComputeEnvironmentComputeResourcesBidPercentage :: Maybe (Val Integer)   , _batchComputeEnvironmentComputeResourcesDesiredvCpus :: Maybe (Val Integer)   , _batchComputeEnvironmentComputeResourcesEc2KeyPair :: Maybe (Val Text)   , _batchComputeEnvironmentComputeResourcesImageId :: Maybe (Val Text)@@ -36,7 +37,8 @@   toJSON BatchComputeEnvironmentComputeResources{..} =     object $     catMaybes-    [ fmap (("BidPercentage",) . toJSON) _batchComputeEnvironmentComputeResourcesBidPercentage+    [ fmap (("AllocationStrategy",) . toJSON) _batchComputeEnvironmentComputeResourcesAllocationStrategy+    , fmap (("BidPercentage",) . toJSON) _batchComputeEnvironmentComputeResourcesBidPercentage     , fmap (("DesiredvCpus",) . toJSON) _batchComputeEnvironmentComputeResourcesDesiredvCpus     , fmap (("Ec2KeyPair",) . toJSON) _batchComputeEnvironmentComputeResourcesEc2KeyPair     , fmap (("ImageId",) . toJSON) _batchComputeEnvironmentComputeResourcesImageId@@ -65,7 +67,8 @@   -> BatchComputeEnvironmentComputeResources batchComputeEnvironmentComputeResources instanceRolearg instanceTypesarg maxvCpusarg minvCpusarg subnetsarg typearg =   BatchComputeEnvironmentComputeResources-  { _batchComputeEnvironmentComputeResourcesBidPercentage = Nothing+  { _batchComputeEnvironmentComputeResourcesAllocationStrategy = Nothing+  , _batchComputeEnvironmentComputeResourcesBidPercentage = Nothing   , _batchComputeEnvironmentComputeResourcesDesiredvCpus = Nothing   , _batchComputeEnvironmentComputeResourcesEc2KeyPair = Nothing   , _batchComputeEnvironmentComputeResourcesImageId = Nothing@@ -81,6 +84,10 @@   , _batchComputeEnvironmentComputeResourcesTags = Nothing   , _batchComputeEnvironmentComputeResourcesType = typearg   }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-allocationstrategy+bcecrAllocationStrategy :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Text))+bcecrAllocationStrategy = lens _batchComputeEnvironmentComputeResourcesAllocationStrategy (\s a -> s { _batchComputeEnvironmentComputeResourcesAllocationStrategy = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-bidpercentage bcecrBidPercentage :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Integer))
library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRoleMapping.hs view
@@ -17,6 +17,7 @@ data CognitoIdentityPoolRoleAttachmentRoleMapping =   CognitoIdentityPoolRoleAttachmentRoleMapping   { _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution :: Maybe (Val Text)+  , _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider :: Maybe (Val Text)   , _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration :: Maybe CognitoIdentityPoolRoleAttachmentRulesConfigurationType   , _cognitoIdentityPoolRoleAttachmentRoleMappingType :: Val Text   } deriving (Show, Eq)@@ -26,6 +27,7 @@     object $     catMaybes     [ fmap (("AmbiguousRoleResolution",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution+    , fmap (("IdentityProvider",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider     , fmap (("RulesConfiguration",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration     , (Just . ("Type",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingType     ]@@ -38,6 +40,7 @@ cognitoIdentityPoolRoleAttachmentRoleMapping typearg =   CognitoIdentityPoolRoleAttachmentRoleMapping   { _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution = Nothing+  , _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider = Nothing   , _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration = Nothing   , _cognitoIdentityPoolRoleAttachmentRoleMappingType = typearg   }@@ -45,6 +48,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-ambiguousroleresolution ciprarmAmbiguousRoleResolution :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Maybe (Val Text)) ciprarmAmbiguousRoleResolution = lens _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution (\s a -> s { _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-identityprovider+ciprarmIdentityProvider :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Maybe (Val Text))+ciprarmIdentityProvider = lens _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider (\s a -> s { _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-rulesconfiguration ciprarmRulesConfiguration :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Maybe CognitoIdentityPoolRoleAttachmentRulesConfigurationType)
+ library-gen/Stratosphere/ResourceProperties/EC2TrafficMirrorFilterRuleTrafficMirrorPortRange.hs view
@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-trafficmirrorfilterrule-trafficmirrorportrange.html++module Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRange where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- EC2TrafficMirrorFilterRuleTrafficMirrorPortRange. See+-- 'ec2TrafficMirrorFilterRuleTrafficMirrorPortRange' for a more convenient+-- constructor.+data EC2TrafficMirrorFilterRuleTrafficMirrorPortRange =+  EC2TrafficMirrorFilterRuleTrafficMirrorPortRange+  { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeFromPort :: Val Integer+  , _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeToPort :: Val Integer+  } deriving (Show, Eq)++instance ToJSON EC2TrafficMirrorFilterRuleTrafficMirrorPortRange where+  toJSON EC2TrafficMirrorFilterRuleTrafficMirrorPortRange{..} =+    object $+    catMaybes+    [ (Just . ("FromPort",) . toJSON) _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeFromPort+    , (Just . ("ToPort",) . toJSON) _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeToPort+    ]++-- | Constructor for 'EC2TrafficMirrorFilterRuleTrafficMirrorPortRange'+-- containing required fields as arguments.+ec2TrafficMirrorFilterRuleTrafficMirrorPortRange+  :: Val Integer -- ^ 'ectmfrtmprFromPort'+  -> Val Integer -- ^ 'ectmfrtmprToPort'+  -> EC2TrafficMirrorFilterRuleTrafficMirrorPortRange+ec2TrafficMirrorFilterRuleTrafficMirrorPortRange fromPortarg toPortarg =+  EC2TrafficMirrorFilterRuleTrafficMirrorPortRange+  { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeFromPort = fromPortarg+  , _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeToPort = toPortarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-trafficmirrorfilterrule-trafficmirrorportrange.html#cfn-ec2-trafficmirrorfilterrule-trafficmirrorportrange-fromport+ectmfrtmprFromPort :: Lens' EC2TrafficMirrorFilterRuleTrafficMirrorPortRange (Val Integer)+ectmfrtmprFromPort = lens _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeFromPort (\s a -> s { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeFromPort = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-trafficmirrorfilterrule-trafficmirrorportrange.html#cfn-ec2-trafficmirrorfilterrule-trafficmirrorportrange-toport+ectmfrtmprToPort :: Lens' EC2TrafficMirrorFilterRuleTrafficMirrorPortRange (Val Integer)+ectmfrtmprToPort = lens _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeToPort (\s a -> s { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeToPort = a })
− library-gen/Stratosphere/ResourceProperties/EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest.hs 
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-trafficmirrorfilterrule-trafficmirrorportrangerequest.html--module Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest where--import Stratosphere.ResourceImports----- | Full data type definition for--- EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest. See--- 'ec2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest' for a more--- convenient constructor.-data EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest =-  EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest-  { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestFromPort :: Val Integer-  , _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestToPort :: Val Integer-  } deriving (Show, Eq)--instance ToJSON EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest where-  toJSON EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest{..} =-    object $-    catMaybes-    [ (Just . ("FromPort",) . toJSON) _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestFromPort-    , (Just . ("ToPort",) . toJSON) _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestToPort-    ]---- | Constructor for 'EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest'--- containing required fields as arguments.-ec2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest-  :: Val Integer -- ^ 'ectmfrtmprrFromPort'-  -> Val Integer -- ^ 'ectmfrtmprrToPort'-  -> EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest-ec2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest fromPortarg toPortarg =-  EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest-  { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestFromPort = fromPortarg-  , _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestToPort = toPortarg-  }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-trafficmirrorfilterrule-trafficmirrorportrangerequest.html#cfn-ec2-trafficmirrorfilterrule-trafficmirrorportrangerequest-fromport-ectmfrtmprrFromPort :: Lens' EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest (Val Integer)-ectmfrtmprrFromPort = lens _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestFromPort (\s a -> s { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestFromPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-trafficmirrorfilterrule-trafficmirrorportrangerequest.html#cfn-ec2-trafficmirrorfilterrule-trafficmirrorportrangerequest-toport-ectmfrtmprrToPort :: Lens' EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest (Val Integer)-ectmfrtmprrToPort = lens _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestToPort (\s a -> s { _eC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequestToPort = a })
+ library-gen/Stratosphere/ResourceProperties/FSxFileSystemSelfManagedActiveDirectoryConfiguration.hs view
@@ -0,0 +1,75 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html++module Stratosphere.ResourceProperties.FSxFileSystemSelfManagedActiveDirectoryConfiguration where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- FSxFileSystemSelfManagedActiveDirectoryConfiguration. See+-- 'fSxFileSystemSelfManagedActiveDirectoryConfiguration' for a more+-- convenient constructor.+data FSxFileSystemSelfManagedActiveDirectoryConfiguration =+  FSxFileSystemSelfManagedActiveDirectoryConfiguration+  { _fSxFileSystemSelfManagedActiveDirectoryConfigurationDnsIps :: Maybe (ValList Text)+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationDomainName :: Maybe (Val Text)+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationFileSystemAdministratorsGroup :: Maybe (Val Text)+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationOrganizationalUnitDistinguishedName :: Maybe (Val Text)+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationPassword :: Maybe (Val Text)+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationUserName :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON FSxFileSystemSelfManagedActiveDirectoryConfiguration where+  toJSON FSxFileSystemSelfManagedActiveDirectoryConfiguration{..} =+    object $+    catMaybes+    [ fmap (("DnsIps",) . toJSON) _fSxFileSystemSelfManagedActiveDirectoryConfigurationDnsIps+    , fmap (("DomainName",) . toJSON) _fSxFileSystemSelfManagedActiveDirectoryConfigurationDomainName+    , fmap (("FileSystemAdministratorsGroup",) . toJSON) _fSxFileSystemSelfManagedActiveDirectoryConfigurationFileSystemAdministratorsGroup+    , fmap (("OrganizationalUnitDistinguishedName",) . toJSON) _fSxFileSystemSelfManagedActiveDirectoryConfigurationOrganizationalUnitDistinguishedName+    , fmap (("Password",) . toJSON) _fSxFileSystemSelfManagedActiveDirectoryConfigurationPassword+    , fmap (("UserName",) . toJSON) _fSxFileSystemSelfManagedActiveDirectoryConfigurationUserName+    ]++-- | Constructor for 'FSxFileSystemSelfManagedActiveDirectoryConfiguration'+-- containing required fields as arguments.+fSxFileSystemSelfManagedActiveDirectoryConfiguration+  :: FSxFileSystemSelfManagedActiveDirectoryConfiguration+fSxFileSystemSelfManagedActiveDirectoryConfiguration  =+  FSxFileSystemSelfManagedActiveDirectoryConfiguration+  { _fSxFileSystemSelfManagedActiveDirectoryConfigurationDnsIps = Nothing+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationDomainName = Nothing+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationFileSystemAdministratorsGroup = Nothing+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationOrganizationalUnitDistinguishedName = Nothing+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationPassword = Nothing+  , _fSxFileSystemSelfManagedActiveDirectoryConfigurationUserName = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration-dnsips+fsfssmadcDnsIps :: Lens' FSxFileSystemSelfManagedActiveDirectoryConfiguration (Maybe (ValList Text))+fsfssmadcDnsIps = lens _fSxFileSystemSelfManagedActiveDirectoryConfigurationDnsIps (\s a -> s { _fSxFileSystemSelfManagedActiveDirectoryConfigurationDnsIps = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration-domainname+fsfssmadcDomainName :: Lens' FSxFileSystemSelfManagedActiveDirectoryConfiguration (Maybe (Val Text))+fsfssmadcDomainName = lens _fSxFileSystemSelfManagedActiveDirectoryConfigurationDomainName (\s a -> s { _fSxFileSystemSelfManagedActiveDirectoryConfigurationDomainName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration-filesystemadministratorsgroup+fsfssmadcFileSystemAdministratorsGroup :: Lens' FSxFileSystemSelfManagedActiveDirectoryConfiguration (Maybe (Val Text))+fsfssmadcFileSystemAdministratorsGroup = lens _fSxFileSystemSelfManagedActiveDirectoryConfigurationFileSystemAdministratorsGroup (\s a -> s { _fSxFileSystemSelfManagedActiveDirectoryConfigurationFileSystemAdministratorsGroup = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration-organizationalunitdistinguishedname+fsfssmadcOrganizationalUnitDistinguishedName :: Lens' FSxFileSystemSelfManagedActiveDirectoryConfiguration (Maybe (Val Text))+fsfssmadcOrganizationalUnitDistinguishedName = lens _fSxFileSystemSelfManagedActiveDirectoryConfigurationOrganizationalUnitDistinguishedName (\s a -> s { _fSxFileSystemSelfManagedActiveDirectoryConfigurationOrganizationalUnitDistinguishedName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration-password+fsfssmadcPassword :: Lens' FSxFileSystemSelfManagedActiveDirectoryConfiguration (Maybe (Val Text))+fsfssmadcPassword = lens _fSxFileSystemSelfManagedActiveDirectoryConfigurationPassword (\s a -> s { _fSxFileSystemSelfManagedActiveDirectoryConfigurationPassword = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration-username+fsfssmadcUserName :: Lens' FSxFileSystemSelfManagedActiveDirectoryConfiguration (Maybe (Val Text))+fsfssmadcUserName = lens _fSxFileSystemSelfManagedActiveDirectoryConfigurationUserName (\s a -> s { _fSxFileSystemSelfManagedActiveDirectoryConfigurationUserName = a })
library-gen/Stratosphere/ResourceProperties/FSxFileSystemWindowsConfiguration.hs view
@@ -8,7 +8,7 @@ module Stratosphere.ResourceProperties.FSxFileSystemWindowsConfiguration where  import Stratosphere.ResourceImports-+import Stratosphere.ResourceProperties.FSxFileSystemSelfManagedActiveDirectoryConfiguration  -- | Full data type definition for FSxFileSystemWindowsConfiguration. See -- 'fSxFileSystemWindowsConfiguration' for a more convenient constructor.@@ -18,6 +18,7 @@   , _fSxFileSystemWindowsConfigurationAutomaticBackupRetentionDays :: Maybe (Val Integer)   , _fSxFileSystemWindowsConfigurationCopyTagsToBackups :: Maybe (Val Bool)   , _fSxFileSystemWindowsConfigurationDailyAutomaticBackupStartTime :: Maybe (Val Text)+  , _fSxFileSystemWindowsConfigurationSelfManagedActiveDirectoryConfiguration :: Maybe FSxFileSystemSelfManagedActiveDirectoryConfiguration   , _fSxFileSystemWindowsConfigurationThroughputCapacity :: Maybe (Val Integer)   , _fSxFileSystemWindowsConfigurationWeeklyMaintenanceStartTime :: Maybe (Val Text)   } deriving (Show, Eq)@@ -30,6 +31,7 @@     , fmap (("AutomaticBackupRetentionDays",) . toJSON) _fSxFileSystemWindowsConfigurationAutomaticBackupRetentionDays     , fmap (("CopyTagsToBackups",) . toJSON) _fSxFileSystemWindowsConfigurationCopyTagsToBackups     , fmap (("DailyAutomaticBackupStartTime",) . toJSON) _fSxFileSystemWindowsConfigurationDailyAutomaticBackupStartTime+    , fmap (("SelfManagedActiveDirectoryConfiguration",) . toJSON) _fSxFileSystemWindowsConfigurationSelfManagedActiveDirectoryConfiguration     , fmap (("ThroughputCapacity",) . toJSON) _fSxFileSystemWindowsConfigurationThroughputCapacity     , fmap (("WeeklyMaintenanceStartTime",) . toJSON) _fSxFileSystemWindowsConfigurationWeeklyMaintenanceStartTime     ]@@ -44,6 +46,7 @@   , _fSxFileSystemWindowsConfigurationAutomaticBackupRetentionDays = Nothing   , _fSxFileSystemWindowsConfigurationCopyTagsToBackups = Nothing   , _fSxFileSystemWindowsConfigurationDailyAutomaticBackupStartTime = Nothing+  , _fSxFileSystemWindowsConfigurationSelfManagedActiveDirectoryConfiguration = Nothing   , _fSxFileSystemWindowsConfigurationThroughputCapacity = Nothing   , _fSxFileSystemWindowsConfigurationWeeklyMaintenanceStartTime = Nothing   }@@ -63,6 +66,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-dailyautomaticbackupstarttime fsfswcDailyAutomaticBackupStartTime :: Lens' FSxFileSystemWindowsConfiguration (Maybe (Val Text)) fsfswcDailyAutomaticBackupStartTime = lens _fSxFileSystemWindowsConfigurationDailyAutomaticBackupStartTime (\s a -> s { _fSxFileSystemWindowsConfigurationDailyAutomaticBackupStartTime = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-selfmanagedactivedirectoryconfiguration+fsfswcSelfManagedActiveDirectoryConfiguration :: Lens' FSxFileSystemWindowsConfiguration (Maybe FSxFileSystemSelfManagedActiveDirectoryConfiguration)+fsfswcSelfManagedActiveDirectoryConfiguration = lens _fSxFileSystemWindowsConfigurationSelfManagedActiveDirectoryConfiguration (\s a -> s { _fSxFileSystemWindowsConfigurationSelfManagedActiveDirectoryConfiguration = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-windowsconfiguration.html#cfn-fsx-filesystem-windowsconfiguration-throughputcapacity fsfswcThroughputCapacity :: Lens' FSxFileSystemWindowsConfiguration (Maybe (Val Integer))
library-gen/Stratosphere/Resources.hs view
@@ -262,6 +262,7 @@ import Stratosphere.Resources.ElasticLoadBalancingV2LoadBalancer as X import Stratosphere.Resources.ElasticLoadBalancingV2TargetGroup as X import Stratosphere.Resources.ElasticsearchDomain as X+import Stratosphere.Resources.EventsEventBus as X import Stratosphere.Resources.EventsEventBusPolicy as X import Stratosphere.Resources.EventsRule as X import Stratosphere.Resources.FSxFileSystem as X@@ -896,7 +897,7 @@ import Stratosphere.ResourceProperties.EC2SpotFleetSpotPlacement as X import Stratosphere.ResourceProperties.EC2SpotFleetTargetGroup as X import Stratosphere.ResourceProperties.EC2SpotFleetTargetGroupsConfig as X-import Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest as X+import Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRange as X import Stratosphere.ResourceProperties.EC2VPNConnectionVpnTunnelOptionsSpecification as X import Stratosphere.ResourceProperties.ECRRepositoryLifecyclePolicy as X import Stratosphere.ResourceProperties.ECSServiceAwsVpcConfiguration as X@@ -1040,6 +1041,7 @@ import Stratosphere.ResourceProperties.EventsRuleSqsParameters as X import Stratosphere.ResourceProperties.EventsRuleTarget as X import Stratosphere.ResourceProperties.FSxFileSystemLustreConfiguration as X+import Stratosphere.ResourceProperties.FSxFileSystemSelfManagedActiveDirectoryConfiguration as X import Stratosphere.ResourceProperties.FSxFileSystemWindowsConfiguration as X import Stratosphere.ResourceProperties.GameLiftAliasRoutingStrategy as X import Stratosphere.ResourceProperties.GameLiftBuildS3Location as X
library-gen/Stratosphere/Resources/EC2TrafficMirrorFilterRule.hs view
@@ -8,7 +8,7 @@ module Stratosphere.Resources.EC2TrafficMirrorFilterRule where  import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest+import Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRange  -- | Full data type definition for EC2TrafficMirrorFilterRule. See -- 'ec2TrafficMirrorFilterRule' for a more convenient constructor.@@ -16,12 +16,12 @@   EC2TrafficMirrorFilterRule   { _eC2TrafficMirrorFilterRuleDescription :: Maybe (Val Text)   , _eC2TrafficMirrorFilterRuleDestinationCidrBlock :: Val Text-  , _eC2TrafficMirrorFilterRuleDestinationPortRange :: Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest+  , _eC2TrafficMirrorFilterRuleDestinationPortRange :: Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRange   , _eC2TrafficMirrorFilterRuleProtocol :: Maybe (Val Integer)   , _eC2TrafficMirrorFilterRuleRuleAction :: Val Text   , _eC2TrafficMirrorFilterRuleRuleNumber :: Val Integer   , _eC2TrafficMirrorFilterRuleSourceCidrBlock :: Val Text-  , _eC2TrafficMirrorFilterRuleSourcePortRange :: Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest+  , _eC2TrafficMirrorFilterRuleSourcePortRange :: Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRange   , _eC2TrafficMirrorFilterRuleTrafficDirection :: Val Text   , _eC2TrafficMirrorFilterRuleTrafficMirrorFilterId :: Val Text   } deriving (Show, Eq)@@ -78,7 +78,7 @@ ectmfrDestinationCidrBlock = lens _eC2TrafficMirrorFilterRuleDestinationCidrBlock (\s a -> s { _eC2TrafficMirrorFilterRuleDestinationCidrBlock = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-trafficmirrorfilterrule.html#cfn-ec2-trafficmirrorfilterrule-destinationportrange-ectmfrDestinationPortRange :: Lens' EC2TrafficMirrorFilterRule (Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest)+ectmfrDestinationPortRange :: Lens' EC2TrafficMirrorFilterRule (Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRange) ectmfrDestinationPortRange = lens _eC2TrafficMirrorFilterRuleDestinationPortRange (\s a -> s { _eC2TrafficMirrorFilterRuleDestinationPortRange = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-trafficmirrorfilterrule.html#cfn-ec2-trafficmirrorfilterrule-protocol@@ -98,7 +98,7 @@ ectmfrSourceCidrBlock = lens _eC2TrafficMirrorFilterRuleSourceCidrBlock (\s a -> s { _eC2TrafficMirrorFilterRuleSourceCidrBlock = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-trafficmirrorfilterrule.html#cfn-ec2-trafficmirrorfilterrule-sourceportrange-ectmfrSourcePortRange :: Lens' EC2TrafficMirrorFilterRule (Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest)+ectmfrSourcePortRange :: Lens' EC2TrafficMirrorFilterRule (Maybe EC2TrafficMirrorFilterRuleTrafficMirrorPortRange) ectmfrSourcePortRange = lens _eC2TrafficMirrorFilterRuleSourcePortRange (\s a -> s { _eC2TrafficMirrorFilterRuleSourcePortRange = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-trafficmirrorfilterrule.html#cfn-ec2-trafficmirrorfilterrule-trafficdirection
+ library-gen/Stratosphere/Resources/EventsEventBus.hs view
@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-events-eventbus.html++module Stratosphere.Resources.EventsEventBus where++import Stratosphere.ResourceImports+++-- | Full data type definition for EventsEventBus. See 'eventsEventBus' for a+-- more convenient constructor.+data EventsEventBus =+  EventsEventBus+  { _eventsEventBusEventSourceName :: Maybe (Val Text)+  , _eventsEventBusName :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties EventsEventBus where+  toResourceProperties EventsEventBus{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::Events::EventBus"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("EventSourceName",) . toJSON) _eventsEventBusEventSourceName+        , (Just . ("Name",) . toJSON) _eventsEventBusName+        ]+    }++-- | Constructor for 'EventsEventBus' containing required fields as arguments.+eventsEventBus+  :: Val Text -- ^ 'eebName'+  -> EventsEventBus+eventsEventBus namearg =+  EventsEventBus+  { _eventsEventBusEventSourceName = Nothing+  , _eventsEventBusName = namearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-events-eventbus.html#cfn-events-eventbus-eventsourcename+eebEventSourceName :: Lens' EventsEventBus (Maybe (Val Text))+eebEventSourceName = lens _eventsEventBusEventSourceName (\s a -> s { _eventsEventBusEventSourceName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-events-eventbus.html#cfn-events-eventbus-name+eebName :: Lens' EventsEventBus (Val Text)+eebName = lens _eventsEventBusName (\s a -> s { _eventsEventBusName = a })
library-gen/Stratosphere/Resources/FSxFileSystem.hs view
@@ -17,12 +17,12 @@ data FSxFileSystem =   FSxFileSystem   { _fSxFileSystemBackupId :: Maybe (Val Text)-  , _fSxFileSystemFileSystemType :: Maybe (Val Text)+  , _fSxFileSystemFileSystemType :: Val Text   , _fSxFileSystemKmsKeyId :: Maybe (Val Text)   , _fSxFileSystemLustreConfiguration :: Maybe FSxFileSystemLustreConfiguration   , _fSxFileSystemSecurityGroupIds :: Maybe (ValList Text)   , _fSxFileSystemStorageCapacity :: Maybe (Val Integer)-  , _fSxFileSystemSubnetIds :: Maybe (ValList Text)+  , _fSxFileSystemSubnetIds :: ValList Text   , _fSxFileSystemTags :: Maybe [Tag]   , _fSxFileSystemWindowsConfiguration :: Maybe FSxFileSystemWindowsConfiguration   } deriving (Show, Eq)@@ -34,12 +34,12 @@     , resourcePropertiesProperties =         hashMapFromList $ catMaybes         [ fmap (("BackupId",) . toJSON) _fSxFileSystemBackupId-        , fmap (("FileSystemType",) . toJSON) _fSxFileSystemFileSystemType+        , (Just . ("FileSystemType",) . toJSON) _fSxFileSystemFileSystemType         , fmap (("KmsKeyId",) . toJSON) _fSxFileSystemKmsKeyId         , fmap (("LustreConfiguration",) . toJSON) _fSxFileSystemLustreConfiguration         , fmap (("SecurityGroupIds",) . toJSON) _fSxFileSystemSecurityGroupIds         , fmap (("StorageCapacity",) . toJSON) _fSxFileSystemStorageCapacity-        , fmap (("SubnetIds",) . toJSON) _fSxFileSystemSubnetIds+        , (Just . ("SubnetIds",) . toJSON) _fSxFileSystemSubnetIds         , fmap (("Tags",) . toJSON) _fSxFileSystemTags         , fmap (("WindowsConfiguration",) . toJSON) _fSxFileSystemWindowsConfiguration         ]@@ -47,16 +47,18 @@  -- | Constructor for 'FSxFileSystem' containing required fields as arguments. fSxFileSystem-  :: FSxFileSystem-fSxFileSystem  =+  :: Val Text -- ^ 'fsfsFileSystemType'+  -> ValList Text -- ^ 'fsfsSubnetIds'+  -> FSxFileSystem+fSxFileSystem fileSystemTypearg subnetIdsarg =   FSxFileSystem   { _fSxFileSystemBackupId = Nothing-  , _fSxFileSystemFileSystemType = Nothing+  , _fSxFileSystemFileSystemType = fileSystemTypearg   , _fSxFileSystemKmsKeyId = Nothing   , _fSxFileSystemLustreConfiguration = Nothing   , _fSxFileSystemSecurityGroupIds = Nothing   , _fSxFileSystemStorageCapacity = Nothing-  , _fSxFileSystemSubnetIds = Nothing+  , _fSxFileSystemSubnetIds = subnetIdsarg   , _fSxFileSystemTags = Nothing   , _fSxFileSystemWindowsConfiguration = Nothing   }@@ -66,7 +68,7 @@ fsfsBackupId = lens _fSxFileSystemBackupId (\s a -> s { _fSxFileSystemBackupId = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-fsx-filesystem.html#cfn-fsx-filesystem-filesystemtype-fsfsFileSystemType :: Lens' FSxFileSystem (Maybe (Val Text))+fsfsFileSystemType :: Lens' FSxFileSystem (Val Text) fsfsFileSystemType = lens _fSxFileSystemFileSystemType (\s a -> s { _fSxFileSystemFileSystemType = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-fsx-filesystem.html#cfn-fsx-filesystem-kmskeyid@@ -86,7 +88,7 @@ fsfsStorageCapacity = lens _fSxFileSystemStorageCapacity (\s a -> s { _fSxFileSystemStorageCapacity = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-fsx-filesystem.html#cfn-fsx-filesystem-subnetids-fsfsSubnetIds :: Lens' FSxFileSystem (Maybe (ValList Text))+fsfsSubnetIds :: Lens' FSxFileSystem (ValList Text) fsfsSubnetIds = lens _fSxFileSystemSubnetIds (\s a -> s { _fSxFileSystemSubnetIds = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-fsx-filesystem.html#cfn-fsx-filesystem-tags
library/Stratosphere/Types.hs view
@@ -144,6 +144,7 @@   | NodeJS43Edge   | NodeJS610   | NodeJS810+  | NodeJS10x   | Java8   | Python27   | Python36@@ -159,6 +160,7 @@   toJSON NodeJS43Edge = String "nodejs4.3-edge"   toJSON NodeJS610 = String "nodejs6.10"   toJSON NodeJS810 = String "nodejs8.10"+  toJSON NodeJS10x = String "nodejs10.x"   toJSON Java8 = String "java8"   toJSON Python27 = String "python2.7"   toJSON Python36 = String "python3.6"
stratosphere.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: b89ba1d51ed9f3bef39bacb071f3e73413e48cc04ed8cd8017fee32b674908c1+-- hash: 38ba0b8f294290b97fac749326f1ba964dbe97a49e594189f836e38fe99baec4  name:           stratosphere-version:        0.43.0+version:        0.44.0 synopsis:       EDSL for AWS CloudFormation description:    EDSL for AWS CloudFormation category:       AWS, Cloud@@ -445,7 +445,7 @@       Stratosphere.ResourceProperties.EC2SpotFleetSpotPlacement       Stratosphere.ResourceProperties.EC2SpotFleetTargetGroup       Stratosphere.ResourceProperties.EC2SpotFleetTargetGroupsConfig-      Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRangeRequest+      Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRange       Stratosphere.ResourceProperties.EC2VPNConnectionVpnTunnelOptionsSpecification       Stratosphere.ResourceProperties.ECRRepositoryLifecyclePolicy       Stratosphere.ResourceProperties.ECSServiceAwsVpcConfiguration@@ -589,6 +589,7 @@       Stratosphere.ResourceProperties.EventsRuleSqsParameters       Stratosphere.ResourceProperties.EventsRuleTarget       Stratosphere.ResourceProperties.FSxFileSystemLustreConfiguration+      Stratosphere.ResourceProperties.FSxFileSystemSelfManagedActiveDirectoryConfiguration       Stratosphere.ResourceProperties.FSxFileSystemWindowsConfiguration       Stratosphere.ResourceProperties.GameLiftAliasRoutingStrategy       Stratosphere.ResourceProperties.GameLiftBuildS3Location@@ -1360,6 +1361,7 @@       Stratosphere.Resources.EMRInstanceGroupConfig       Stratosphere.Resources.EMRSecurityConfiguration       Stratosphere.Resources.EMRStep+      Stratosphere.Resources.EventsEventBus       Stratosphere.Resources.EventsEventBusPolicy       Stratosphere.Resources.EventsRule       Stratosphere.Resources.FSxFileSystem