stratosphere 0.37.0 → 0.38.0

raw patch · 67 files changed

+2944/−28 lines, 67 files

Files

• CHANGELOG.md +4/−0
• library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiAdditionalAuthenticationProvider.hs +56/−0
• library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiCognitoUserPoolConfig.hs +53/−0
• library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectSourceVersion.hs +46/−0
• library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryCode.hs +39/−0
• library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryS3.hs +54/−0
• library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPasswordPolicy.hs +7/−0
• library-gen/Stratosphere/ResourceProperties/EC2CapacityReservationTagSpecification.hs +46/−0
• library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateNetworkInterface.hs +7/−0
• library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs +22/−0
• library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDependency.hs +47/−0
• library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionProxyConfiguration.hs +53/−0
• library-gen/Stratosphere/ResourceProperties/GlueClassifierCsvClassifier.hs +80/−0
• library-gen/Stratosphere/ResourceProperties/GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption.hs +48/−0
• library-gen/Stratosphere/ResourceProperties/GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings.hs +49/−0
• library-gen/Stratosphere/ResourceProperties/GlueDataCatalogEncryptionSettingsEncryptionAtRest.hs +47/−0
• library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationCloudWatchEncryption.hs +47/−0
• library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationEncryptionConfiguration.hs +48/−0
• library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationJobBookmarksEncryption.hs +47/−0
• library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationS3Encryption.hs +46/−0
• library-gen/Stratosphere/ResourceProperties/GlueTriggerAction.hs +7/−0
• library-gen/Stratosphere/ResourceProperties/MediaStoreContainerCorsRule.hs +66/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetDeliveryOptions.hs +40/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationCloudWatchDestination.hs +41/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationDimensionConfiguration.hs +58/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationEventDestination.hs +80/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination.hs +51/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationPinpointDestination.hs +41/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationSnsDestination.hs +42/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetReputationOptions.hs +40/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetSendingOptions.hs +40/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetTags.hs +45/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetTrackingOptions.hs +40/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailDedicatedIpPoolTags.hs +45/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailIdentityMailFromAttributes.hs +46/−0
• library-gen/Stratosphere/ResourceProperties/PinpointEmailIdentityTags.hs +45/−0
• library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProductProvisioningArtifactProperties.hs +7/−0
• library-gen/Stratosphere/ResourceProperties/TransferServerEndpointDetails.hs +39/−0
• library-gen/Stratosphere/ResourceProperties/TransferServerIdentityProviderDetails.hs +48/−0
• library-gen/Stratosphere/ResourceProperties/WAFRegionalGeoMatchSetGeoMatchConstraint.hs +48/−0
• library-gen/Stratosphere/ResourceProperties/WAFRegionalRateBasedRulePredicate.hs +55/−0
• library-gen/Stratosphere/Resources.hs +49/−0
• library-gen/Stratosphere/Resources/AppSyncFunctionConfiguration.hs +16/−13
• library-gen/Stratosphere/Resources/CodeBuildProject.hs +15/−0
• library-gen/Stratosphere/Resources/CodeCommitRepository.hs +11/−3
• library-gen/Stratosphere/Resources/EC2CapacityReservation.hs +115/−0
• library-gen/Stratosphere/Resources/ECSTaskDefinition.hs +8/−0
• library-gen/Stratosphere/Resources/GlueClassifier.hs +11/−3
• library-gen/Stratosphere/Resources/GlueCrawler.hs +14/−0
• library-gen/Stratosphere/Resources/GlueDataCatalogEncryptionSettings.hs +50/−0
• library-gen/Stratosphere/Resources/GlueDevEndpoint.hs +20/−7
• library-gen/Stratosphere/Resources/GlueJob.hs +14/−0
• library-gen/Stratosphere/Resources/GlueSecurityConfiguration.hs +50/−0
• library-gen/Stratosphere/Resources/GlueTrigger.hs +7/−0
• library-gen/Stratosphere/Resources/MediaStoreContainer.hs +70/−0
• library-gen/Stratosphere/Resources/PinpointEmailConfigurationSet.hs +81/−0
• library-gen/Stratosphere/Resources/PinpointEmailConfigurationSetEventDestination.hs +59/−0
• library-gen/Stratosphere/Resources/PinpointEmailDedicatedIpPool.hs +48/−0
• library-gen/Stratosphere/Resources/PinpointEmailIdentity.hs +71/−0
• library-gen/Stratosphere/Resources/SSMParameter.hs +14/−0
• library-gen/Stratosphere/Resources/ServiceCatalogResourceUpdateConstraint.hs +73/−0
• library-gen/Stratosphere/Resources/TransferServer.hs +77/−0
• library-gen/Stratosphere/Resources/TransferUser.hs +78/−0
• library-gen/Stratosphere/Resources/WAFRegionalGeoMatchSet.hs +49/−0
• library-gen/Stratosphere/Resources/WAFRegionalRateBasedRule.hs +73/−0
• library-gen/Stratosphere/Resources/WAFRegionalRegexPatternSet.hs +50/−0
• stratosphere.cabal +51/−2

@@ -1,5 +1,9 @@ # Change Log +## 0.38.0++* Update resource specification document to version 3.3.0+ ## 0.37.0  * Update resource specification document to version 3.0.0

@@ -0,0 +1,56 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-additionalauthenticationprovider.html++module Stratosphere.ResourceProperties.AppSyncGraphQLApiAdditionalAuthenticationProvider where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.AppSyncGraphQLApiOpenIDConnectConfig+import Stratosphere.ResourceProperties.AppSyncGraphQLApiCognitoUserPoolConfig++-- | Full data type definition for+-- AppSyncGraphQLApiAdditionalAuthenticationProvider. See+-- 'appSyncGraphQLApiAdditionalAuthenticationProvider' for a more convenient+-- constructor.+data AppSyncGraphQLApiAdditionalAuthenticationProvider =+  AppSyncGraphQLApiAdditionalAuthenticationProvider+  { _appSyncGraphQLApiAdditionalAuthenticationProviderAuthenticationType :: Val Text+  , _appSyncGraphQLApiAdditionalAuthenticationProviderOpenIDConnectConfig :: Maybe AppSyncGraphQLApiOpenIDConnectConfig+  , _appSyncGraphQLApiAdditionalAuthenticationProviderUserPoolConfig :: Maybe AppSyncGraphQLApiCognitoUserPoolConfig+  } deriving (Show, Eq)++instance ToJSON AppSyncGraphQLApiAdditionalAuthenticationProvider where+  toJSON AppSyncGraphQLApiAdditionalAuthenticationProvider{..} =+    object $+    catMaybes+    [ (Just . ("AuthenticationType",) . toJSON) _appSyncGraphQLApiAdditionalAuthenticationProviderAuthenticationType+    , fmap (("OpenIDConnectConfig",) . toJSON) _appSyncGraphQLApiAdditionalAuthenticationProviderOpenIDConnectConfig+    , fmap (("UserPoolConfig",) . toJSON) _appSyncGraphQLApiAdditionalAuthenticationProviderUserPoolConfig+    ]++-- | Constructor for 'AppSyncGraphQLApiAdditionalAuthenticationProvider'+-- containing required fields as arguments.+appSyncGraphQLApiAdditionalAuthenticationProvider+  :: Val Text -- ^ 'asgqlaaapAuthenticationType'+  -> AppSyncGraphQLApiAdditionalAuthenticationProvider+appSyncGraphQLApiAdditionalAuthenticationProvider authenticationTypearg =+  AppSyncGraphQLApiAdditionalAuthenticationProvider+  { _appSyncGraphQLApiAdditionalAuthenticationProviderAuthenticationType = authenticationTypearg+  , _appSyncGraphQLApiAdditionalAuthenticationProviderOpenIDConnectConfig = Nothing+  , _appSyncGraphQLApiAdditionalAuthenticationProviderUserPoolConfig = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-additionalauthenticationprovider.html#cfn-appsync-graphqlapi-additionalauthenticationprovider-authenticationtype+asgqlaaapAuthenticationType :: Lens' AppSyncGraphQLApiAdditionalAuthenticationProvider (Val Text)+asgqlaaapAuthenticationType = lens _appSyncGraphQLApiAdditionalAuthenticationProviderAuthenticationType (\s a -> s { _appSyncGraphQLApiAdditionalAuthenticationProviderAuthenticationType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-additionalauthenticationprovider.html#cfn-appsync-graphqlapi-additionalauthenticationprovider-openidconnectconfig+asgqlaaapOpenIDConnectConfig :: Lens' AppSyncGraphQLApiAdditionalAuthenticationProvider (Maybe AppSyncGraphQLApiOpenIDConnectConfig)+asgqlaaapOpenIDConnectConfig = lens _appSyncGraphQLApiAdditionalAuthenticationProviderOpenIDConnectConfig (\s a -> s { _appSyncGraphQLApiAdditionalAuthenticationProviderOpenIDConnectConfig = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-additionalauthenticationprovider.html#cfn-appsync-graphqlapi-additionalauthenticationprovider-userpoolconfig+asgqlaaapUserPoolConfig :: Lens' AppSyncGraphQLApiAdditionalAuthenticationProvider (Maybe AppSyncGraphQLApiCognitoUserPoolConfig)+asgqlaaapUserPoolConfig = lens _appSyncGraphQLApiAdditionalAuthenticationProviderUserPoolConfig (\s a -> s { _appSyncGraphQLApiAdditionalAuthenticationProviderUserPoolConfig = a })

@@ -0,0 +1,53 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-cognitouserpoolconfig.html++module Stratosphere.ResourceProperties.AppSyncGraphQLApiCognitoUserPoolConfig where++import Stratosphere.ResourceImports+++-- | Full data type definition for AppSyncGraphQLApiCognitoUserPoolConfig. See+-- 'appSyncGraphQLApiCognitoUserPoolConfig' for a more convenient+-- constructor.+data AppSyncGraphQLApiCognitoUserPoolConfig =+  AppSyncGraphQLApiCognitoUserPoolConfig+  { _appSyncGraphQLApiCognitoUserPoolConfigAppIdClientRegex :: Maybe (Val Text)+  , _appSyncGraphQLApiCognitoUserPoolConfigAwsRegion :: Maybe (Val Text)+  , _appSyncGraphQLApiCognitoUserPoolConfigUserPoolId :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON AppSyncGraphQLApiCognitoUserPoolConfig where+  toJSON AppSyncGraphQLApiCognitoUserPoolConfig{..} =+    object $+    catMaybes+    [ fmap (("AppIdClientRegex",) . toJSON) _appSyncGraphQLApiCognitoUserPoolConfigAppIdClientRegex+    , fmap (("AwsRegion",) . toJSON) _appSyncGraphQLApiCognitoUserPoolConfigAwsRegion+    , fmap (("UserPoolId",) . toJSON) _appSyncGraphQLApiCognitoUserPoolConfigUserPoolId+    ]++-- | Constructor for 'AppSyncGraphQLApiCognitoUserPoolConfig' containing+-- required fields as arguments.+appSyncGraphQLApiCognitoUserPoolConfig+  :: AppSyncGraphQLApiCognitoUserPoolConfig+appSyncGraphQLApiCognitoUserPoolConfig  =+  AppSyncGraphQLApiCognitoUserPoolConfig+  { _appSyncGraphQLApiCognitoUserPoolConfigAppIdClientRegex = Nothing+  , _appSyncGraphQLApiCognitoUserPoolConfigAwsRegion = Nothing+  , _appSyncGraphQLApiCognitoUserPoolConfigUserPoolId = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-cognitouserpoolconfig.html#cfn-appsync-graphqlapi-cognitouserpoolconfig-appidclientregex+asgqlacupcAppIdClientRegex :: Lens' AppSyncGraphQLApiCognitoUserPoolConfig (Maybe (Val Text))+asgqlacupcAppIdClientRegex = lens _appSyncGraphQLApiCognitoUserPoolConfigAppIdClientRegex (\s a -> s { _appSyncGraphQLApiCognitoUserPoolConfigAppIdClientRegex = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-cognitouserpoolconfig.html#cfn-appsync-graphqlapi-cognitouserpoolconfig-awsregion+asgqlacupcAwsRegion :: Lens' AppSyncGraphQLApiCognitoUserPoolConfig (Maybe (Val Text))+asgqlacupcAwsRegion = lens _appSyncGraphQLApiCognitoUserPoolConfigAwsRegion (\s a -> s { _appSyncGraphQLApiCognitoUserPoolConfigAwsRegion = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-cognitouserpoolconfig.html#cfn-appsync-graphqlapi-cognitouserpoolconfig-userpoolid+asgqlacupcUserPoolId :: Lens' AppSyncGraphQLApiCognitoUserPoolConfig (Maybe (Val Text))+asgqlacupcUserPoolId = lens _appSyncGraphQLApiCognitoUserPoolConfigUserPoolId (\s a -> s { _appSyncGraphQLApiCognitoUserPoolConfigUserPoolId = a })

@@ -0,0 +1,46 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectsourceversion.html++module Stratosphere.ResourceProperties.CodeBuildProjectProjectSourceVersion where++import Stratosphere.ResourceImports+++-- | Full data type definition for CodeBuildProjectProjectSourceVersion. See+-- 'codeBuildProjectProjectSourceVersion' for a more convenient constructor.+data CodeBuildProjectProjectSourceVersion =+  CodeBuildProjectProjectSourceVersion+  { _codeBuildProjectProjectSourceVersionSourceIdentifier :: Val Text+  , _codeBuildProjectProjectSourceVersionSourceVersion :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON CodeBuildProjectProjectSourceVersion where+  toJSON CodeBuildProjectProjectSourceVersion{..} =+    object $+    catMaybes+    [ (Just . ("SourceIdentifier",) . toJSON) _codeBuildProjectProjectSourceVersionSourceIdentifier+    , fmap (("SourceVersion",) . toJSON) _codeBuildProjectProjectSourceVersionSourceVersion+    ]++-- | Constructor for 'CodeBuildProjectProjectSourceVersion' containing+-- required fields as arguments.+codeBuildProjectProjectSourceVersion+  :: Val Text -- ^ 'cbppsvSourceIdentifier'+  -> CodeBuildProjectProjectSourceVersion+codeBuildProjectProjectSourceVersion sourceIdentifierarg =+  CodeBuildProjectProjectSourceVersion+  { _codeBuildProjectProjectSourceVersionSourceIdentifier = sourceIdentifierarg+  , _codeBuildProjectProjectSourceVersionSourceVersion = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectsourceversion.html#cfn-codebuild-project-projectsourceversion-sourceidentifier+cbppsvSourceIdentifier :: Lens' CodeBuildProjectProjectSourceVersion (Val Text)+cbppsvSourceIdentifier = lens _codeBuildProjectProjectSourceVersionSourceIdentifier (\s a -> s { _codeBuildProjectProjectSourceVersionSourceIdentifier = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectsourceversion.html#cfn-codebuild-project-projectsourceversion-sourceversion+cbppsvSourceVersion :: Lens' CodeBuildProjectProjectSourceVersion (Maybe (Val Text))+cbppsvSourceVersion = lens _codeBuildProjectProjectSourceVersionSourceVersion (\s a -> s { _codeBuildProjectProjectSourceVersionSourceVersion = a })

@@ -0,0 +1,39 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-code.html++module Stratosphere.ResourceProperties.CodeCommitRepositoryCode where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.CodeCommitRepositoryS3++-- | Full data type definition for CodeCommitRepositoryCode. See+-- 'codeCommitRepositoryCode' for a more convenient constructor.+data CodeCommitRepositoryCode =+  CodeCommitRepositoryCode+  { _codeCommitRepositoryCodeS3 :: CodeCommitRepositoryS3+  } deriving (Show, Eq)++instance ToJSON CodeCommitRepositoryCode where+  toJSON CodeCommitRepositoryCode{..} =+    object $+    catMaybes+    [ (Just . ("S3",) . toJSON) _codeCommitRepositoryCodeS3+    ]++-- | Constructor for 'CodeCommitRepositoryCode' containing required fields as+-- arguments.+codeCommitRepositoryCode+  :: CodeCommitRepositoryS3 -- ^ 'ccrcS3'+  -> CodeCommitRepositoryCode+codeCommitRepositoryCode s3arg =+  CodeCommitRepositoryCode+  { _codeCommitRepositoryCodeS3 = s3arg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-code.html#cfn-codecommit-repository-code-s3+ccrcS3 :: Lens' CodeCommitRepositoryCode CodeCommitRepositoryS3+ccrcS3 = lens _codeCommitRepositoryCodeS3 (\s a -> s { _codeCommitRepositoryCodeS3 = a })

@@ -0,0 +1,54 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-s3.html++module Stratosphere.ResourceProperties.CodeCommitRepositoryS3 where++import Stratosphere.ResourceImports+++-- | Full data type definition for CodeCommitRepositoryS3. See+-- 'codeCommitRepositoryS3' for a more convenient constructor.+data CodeCommitRepositoryS3 =+  CodeCommitRepositoryS3+  { _codeCommitRepositoryS3Bucket :: Val Text+  , _codeCommitRepositoryS3Key :: Val Text+  , _codeCommitRepositoryS3ObjectVersion :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON CodeCommitRepositoryS3 where+  toJSON CodeCommitRepositoryS3{..} =+    object $+    catMaybes+    [ (Just . ("Bucket",) . toJSON) _codeCommitRepositoryS3Bucket+    , (Just . ("Key",) . toJSON) _codeCommitRepositoryS3Key+    , fmap (("ObjectVersion",) . toJSON) _codeCommitRepositoryS3ObjectVersion+    ]++-- | Constructor for 'CodeCommitRepositoryS3' containing required fields as+-- arguments.+codeCommitRepositoryS3+  :: Val Text -- ^ 'ccrsBucket'+  -> Val Text -- ^ 'ccrsKey'+  -> CodeCommitRepositoryS3+codeCommitRepositoryS3 bucketarg keyarg =+  CodeCommitRepositoryS3+  { _codeCommitRepositoryS3Bucket = bucketarg+  , _codeCommitRepositoryS3Key = keyarg+  , _codeCommitRepositoryS3ObjectVersion = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-s3.html#cfn-codecommit-repository-s3-bucket+ccrsBucket :: Lens' CodeCommitRepositoryS3 (Val Text)+ccrsBucket = lens _codeCommitRepositoryS3Bucket (\s a -> s { _codeCommitRepositoryS3Bucket = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-s3.html#cfn-codecommit-repository-s3-key+ccrsKey :: Lens' CodeCommitRepositoryS3 (Val Text)+ccrsKey = lens _codeCommitRepositoryS3Key (\s a -> s { _codeCommitRepositoryS3Key = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-s3.html#cfn-codecommit-repository-s3-objectversion+ccrsObjectVersion :: Lens' CodeCommitRepositoryS3 (Maybe (Val Text))+ccrsObjectVersion = lens _codeCommitRepositoryS3ObjectVersion (\s a -> s { _codeCommitRepositoryS3ObjectVersion = a })

@@ -19,6 +19,7 @@   , _cognitoUserPoolPasswordPolicyRequireNumbers :: Maybe (Val Bool)   , _cognitoUserPoolPasswordPolicyRequireSymbols :: Maybe (Val Bool)   , _cognitoUserPoolPasswordPolicyRequireUppercase :: Maybe (Val Bool)+  , _cognitoUserPoolPasswordPolicyTemporaryPasswordValidityDays :: Maybe (Val Double)   } deriving (Show, Eq)  instance ToJSON CognitoUserPoolPasswordPolicy where@@ -30,6 +31,7 @@     , fmap (("RequireNumbers",) . toJSON) _cognitoUserPoolPasswordPolicyRequireNumbers     , fmap (("RequireSymbols",) . toJSON) _cognitoUserPoolPasswordPolicyRequireSymbols     , fmap (("RequireUppercase",) . toJSON) _cognitoUserPoolPasswordPolicyRequireUppercase+    , fmap (("TemporaryPasswordValidityDays",) . toJSON) _cognitoUserPoolPasswordPolicyTemporaryPasswordValidityDays     ]  -- | Constructor for 'CognitoUserPoolPasswordPolicy' containing required@@ -43,6 +45,7 @@   , _cognitoUserPoolPasswordPolicyRequireNumbers = Nothing   , _cognitoUserPoolPasswordPolicyRequireSymbols = Nothing   , _cognitoUserPoolPasswordPolicyRequireUppercase = Nothing+  , _cognitoUserPoolPasswordPolicyTemporaryPasswordValidityDays = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-passwordpolicy.html#cfn-cognito-userpool-passwordpolicy-minimumlength@@ -64,3 +67,7 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-passwordpolicy.html#cfn-cognito-userpool-passwordpolicy-requireuppercase cupppRequireUppercase :: Lens' CognitoUserPoolPasswordPolicy (Maybe (Val Bool)) cupppRequireUppercase = lens _cognitoUserPoolPasswordPolicyRequireUppercase (\s a -> s { _cognitoUserPoolPasswordPolicyRequireUppercase = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-passwordpolicy.html#cfn-cognito-userpool-passwordpolicy-temporarypasswordvaliditydays+cupppTemporaryPasswordValidityDays :: Lens' CognitoUserPoolPasswordPolicy (Maybe (Val Double))+cupppTemporaryPasswordValidityDays = lens _cognitoUserPoolPasswordPolicyTemporaryPasswordValidityDays (\s a -> s { _cognitoUserPoolPasswordPolicyTemporaryPasswordValidityDays = a })

@@ -0,0 +1,46 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-capacityreservation-tagspecification.html++module Stratosphere.ResourceProperties.EC2CapacityReservationTagSpecification where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.Tag++-- | Full data type definition for EC2CapacityReservationTagSpecification. See+-- 'ec2CapacityReservationTagSpecification' for a more convenient+-- constructor.+data EC2CapacityReservationTagSpecification =+  EC2CapacityReservationTagSpecification+  { _eC2CapacityReservationTagSpecificationResourceType :: Maybe (Val Text)+  , _eC2CapacityReservationTagSpecificationTags :: Maybe [Tag]+  } deriving (Show, Eq)++instance ToJSON EC2CapacityReservationTagSpecification where+  toJSON EC2CapacityReservationTagSpecification{..} =+    object $+    catMaybes+    [ fmap (("ResourceType",) . toJSON) _eC2CapacityReservationTagSpecificationResourceType+    , fmap (("Tags",) . toJSON) _eC2CapacityReservationTagSpecificationTags+    ]++-- | Constructor for 'EC2CapacityReservationTagSpecification' containing+-- required fields as arguments.+ec2CapacityReservationTagSpecification+  :: EC2CapacityReservationTagSpecification+ec2CapacityReservationTagSpecification  =+  EC2CapacityReservationTagSpecification+  { _eC2CapacityReservationTagSpecificationResourceType = Nothing+  , _eC2CapacityReservationTagSpecificationTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-capacityreservation-tagspecification.html#cfn-ec2-capacityreservation-tagspecification-resourcetype+eccrtsResourceType :: Lens' EC2CapacityReservationTagSpecification (Maybe (Val Text))+eccrtsResourceType = lens _eC2CapacityReservationTagSpecificationResourceType (\s a -> s { _eC2CapacityReservationTagSpecificationResourceType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-capacityreservation-tagspecification.html#cfn-ec2-capacityreservation-tagspecification-tags+eccrtsTags :: Lens' EC2CapacityReservationTagSpecification (Maybe [Tag])+eccrtsTags = lens _eC2CapacityReservationTagSpecificationTags (\s a -> s { _eC2CapacityReservationTagSpecificationTags = a })

@@ -20,6 +20,7 @@   , _eC2LaunchTemplateNetworkInterfaceDescription :: Maybe (Val Text)   , _eC2LaunchTemplateNetworkInterfaceDeviceIndex :: Maybe (Val Integer)   , _eC2LaunchTemplateNetworkInterfaceGroups :: Maybe (ValList Text)+  , _eC2LaunchTemplateNetworkInterfaceInterfaceType :: Maybe (Val Text)   , _eC2LaunchTemplateNetworkInterfaceIpv6AddressCount :: Maybe (Val Integer)   , _eC2LaunchTemplateNetworkInterfaceIpv6Addresses :: Maybe [EC2LaunchTemplateIpv6Add]   , _eC2LaunchTemplateNetworkInterfaceNetworkInterfaceId :: Maybe (Val Text)@@ -38,6 +39,7 @@     , fmap (("Description",) . toJSON) _eC2LaunchTemplateNetworkInterfaceDescription     , fmap (("DeviceIndex",) . toJSON) _eC2LaunchTemplateNetworkInterfaceDeviceIndex     , fmap (("Groups",) . toJSON) _eC2LaunchTemplateNetworkInterfaceGroups+    , fmap (("InterfaceType",) . toJSON) _eC2LaunchTemplateNetworkInterfaceInterfaceType     , fmap (("Ipv6AddressCount",) . toJSON) _eC2LaunchTemplateNetworkInterfaceIpv6AddressCount     , fmap (("Ipv6Addresses",) . toJSON) _eC2LaunchTemplateNetworkInterfaceIpv6Addresses     , fmap (("NetworkInterfaceId",) . toJSON) _eC2LaunchTemplateNetworkInterfaceNetworkInterfaceId@@ -58,6 +60,7 @@   , _eC2LaunchTemplateNetworkInterfaceDescription = Nothing   , _eC2LaunchTemplateNetworkInterfaceDeviceIndex = Nothing   , _eC2LaunchTemplateNetworkInterfaceGroups = Nothing+  , _eC2LaunchTemplateNetworkInterfaceInterfaceType = Nothing   , _eC2LaunchTemplateNetworkInterfaceIpv6AddressCount = Nothing   , _eC2LaunchTemplateNetworkInterfaceIpv6Addresses = Nothing   , _eC2LaunchTemplateNetworkInterfaceNetworkInterfaceId = Nothing@@ -86,6 +89,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-launchtemplate-networkinterface.html#cfn-ec2-launchtemplate-networkinterface-groups ecltniGroups :: Lens' EC2LaunchTemplateNetworkInterface (Maybe (ValList Text)) ecltniGroups = lens _eC2LaunchTemplateNetworkInterfaceGroups (\s a -> s { _eC2LaunchTemplateNetworkInterfaceGroups = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-launchtemplate-networkinterface.html#cfn-ec2-launchtemplate-networkinterface-interfacetype+ecltniInterfaceType :: Lens' EC2LaunchTemplateNetworkInterface (Maybe (Val Text))+ecltniInterfaceType = lens _eC2LaunchTemplateNetworkInterfaceInterfaceType (\s a -> s { _eC2LaunchTemplateNetworkInterfaceInterfaceType = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-launchtemplate-networkinterface.html#cfn-ec2-launchtemplate-networkinterface-ipv6addresscount ecltniIpv6AddressCount :: Lens' EC2LaunchTemplateNetworkInterface (Maybe (Val Integer))

@@ -8,6 +8,7 @@ module Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDefinition where  import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency import Stratosphere.ResourceProperties.ECSTaskDefinitionKeyValuePair import Stratosphere.ResourceProperties.ECSTaskDefinitionHostEntry import Stratosphere.ResourceProperties.ECSTaskDefinitionHealthCheck@@ -25,6 +26,7 @@   ECSTaskDefinitionContainerDefinition   { _eCSTaskDefinitionContainerDefinitionCommand :: Maybe (ValList Text)   , _eCSTaskDefinitionContainerDefinitionCpu :: Maybe (Val Integer)+  , _eCSTaskDefinitionContainerDefinitionDependsOn :: Maybe [ECSTaskDefinitionContainerDependency]   , _eCSTaskDefinitionContainerDefinitionDisableNetworking :: Maybe (Val Bool)   , _eCSTaskDefinitionContainerDefinitionDnsSearchDomains :: Maybe (ValList Text)   , _eCSTaskDefinitionContainerDefinitionDnsServers :: Maybe (ValList Text)@@ -48,6 +50,8 @@   , _eCSTaskDefinitionContainerDefinitionPrivileged :: Maybe (Val Bool)   , _eCSTaskDefinitionContainerDefinitionReadonlyRootFilesystem :: Maybe (Val Bool)   , _eCSTaskDefinitionContainerDefinitionRepositoryCredentials :: Maybe ECSTaskDefinitionRepositoryCredentials+  , _eCSTaskDefinitionContainerDefinitionStartTimeout :: Maybe (Val Integer)+  , _eCSTaskDefinitionContainerDefinitionStopTimeout :: Maybe (Val Integer)   , _eCSTaskDefinitionContainerDefinitionUlimits :: Maybe [ECSTaskDefinitionUlimit]   , _eCSTaskDefinitionContainerDefinitionUser :: Maybe (Val Text)   , _eCSTaskDefinitionContainerDefinitionVolumesFrom :: Maybe [ECSTaskDefinitionVolumeFrom]@@ -60,6 +64,7 @@     catMaybes     [ fmap (("Command",) . toJSON) _eCSTaskDefinitionContainerDefinitionCommand     , fmap (("Cpu",) . toJSON) _eCSTaskDefinitionContainerDefinitionCpu+    , fmap (("DependsOn",) . toJSON) _eCSTaskDefinitionContainerDefinitionDependsOn     , fmap (("DisableNetworking",) . toJSON) _eCSTaskDefinitionContainerDefinitionDisableNetworking     , fmap (("DnsSearchDomains",) . toJSON) _eCSTaskDefinitionContainerDefinitionDnsSearchDomains     , fmap (("DnsServers",) . toJSON) _eCSTaskDefinitionContainerDefinitionDnsServers@@ -83,6 +88,8 @@     , fmap (("Privileged",) . toJSON) _eCSTaskDefinitionContainerDefinitionPrivileged     , fmap (("ReadonlyRootFilesystem",) . toJSON) _eCSTaskDefinitionContainerDefinitionReadonlyRootFilesystem     , fmap (("RepositoryCredentials",) . toJSON) _eCSTaskDefinitionContainerDefinitionRepositoryCredentials+    , fmap (("StartTimeout",) . toJSON) _eCSTaskDefinitionContainerDefinitionStartTimeout+    , fmap (("StopTimeout",) . toJSON) _eCSTaskDefinitionContainerDefinitionStopTimeout     , fmap (("Ulimits",) . toJSON) _eCSTaskDefinitionContainerDefinitionUlimits     , fmap (("User",) . toJSON) _eCSTaskDefinitionContainerDefinitionUser     , fmap (("VolumesFrom",) . toJSON) _eCSTaskDefinitionContainerDefinitionVolumesFrom@@ -99,6 +106,7 @@   ECSTaskDefinitionContainerDefinition   { _eCSTaskDefinitionContainerDefinitionCommand = Nothing   , _eCSTaskDefinitionContainerDefinitionCpu = Nothing+  , _eCSTaskDefinitionContainerDefinitionDependsOn = Nothing   , _eCSTaskDefinitionContainerDefinitionDisableNetworking = Nothing   , _eCSTaskDefinitionContainerDefinitionDnsSearchDomains = Nothing   , _eCSTaskDefinitionContainerDefinitionDnsServers = Nothing@@ -122,6 +130,8 @@   , _eCSTaskDefinitionContainerDefinitionPrivileged = Nothing   , _eCSTaskDefinitionContainerDefinitionReadonlyRootFilesystem = Nothing   , _eCSTaskDefinitionContainerDefinitionRepositoryCredentials = Nothing+  , _eCSTaskDefinitionContainerDefinitionStartTimeout = Nothing+  , _eCSTaskDefinitionContainerDefinitionStopTimeout = Nothing   , _eCSTaskDefinitionContainerDefinitionUlimits = Nothing   , _eCSTaskDefinitionContainerDefinitionUser = Nothing   , _eCSTaskDefinitionContainerDefinitionVolumesFrom = Nothing@@ -136,6 +146,10 @@ ecstdcdCpu :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Integer)) ecstdcdCpu = lens _eCSTaskDefinitionContainerDefinitionCpu (\s a -> s { _eCSTaskDefinitionContainerDefinitionCpu = a }) +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-dependson+ecstdcdDependsOn :: Lens' ECSTaskDefinitionContainerDefinition (Maybe [ECSTaskDefinitionContainerDependency])+ecstdcdDependsOn = lens _eCSTaskDefinitionContainerDefinitionDependsOn (\s a -> s { _eCSTaskDefinitionContainerDefinitionDependsOn = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-disablenetworking ecstdcdDisableNetworking :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Bool)) ecstdcdDisableNetworking = lens _eCSTaskDefinitionContainerDefinitionDisableNetworking (\s a -> s { _eCSTaskDefinitionContainerDefinitionDisableNetworking = a })@@ -227,6 +241,14 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-repositorycredentials ecstdcdRepositoryCredentials :: Lens' ECSTaskDefinitionContainerDefinition (Maybe ECSTaskDefinitionRepositoryCredentials) ecstdcdRepositoryCredentials = lens _eCSTaskDefinitionContainerDefinitionRepositoryCredentials (\s a -> s { _eCSTaskDefinitionContainerDefinitionRepositoryCredentials = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-starttimeout+ecstdcdStartTimeout :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Integer))+ecstdcdStartTimeout = lens _eCSTaskDefinitionContainerDefinitionStartTimeout (\s a -> s { _eCSTaskDefinitionContainerDefinitionStartTimeout = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-stoptimeout+ecstdcdStopTimeout :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Integer))+ecstdcdStopTimeout = lens _eCSTaskDefinitionContainerDefinitionStopTimeout (\s a -> s { _eCSTaskDefinitionContainerDefinitionStopTimeout = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-ulimits ecstdcdUlimits :: Lens' ECSTaskDefinitionContainerDefinition (Maybe [ECSTaskDefinitionUlimit])

@@ -0,0 +1,47 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdependency.html++module Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency where++import Stratosphere.ResourceImports+++-- | Full data type definition for ECSTaskDefinitionContainerDependency. See+-- 'ecsTaskDefinitionContainerDependency' for a more convenient constructor.+data ECSTaskDefinitionContainerDependency =+  ECSTaskDefinitionContainerDependency+  { _eCSTaskDefinitionContainerDependencyCondition :: Val Text+  , _eCSTaskDefinitionContainerDependencyContainerName :: Val Text+  } deriving (Show, Eq)++instance ToJSON ECSTaskDefinitionContainerDependency where+  toJSON ECSTaskDefinitionContainerDependency{..} =+    object $+    catMaybes+    [ (Just . ("Condition",) . toJSON) _eCSTaskDefinitionContainerDependencyCondition+    , (Just . ("ContainerName",) . toJSON) _eCSTaskDefinitionContainerDependencyContainerName+    ]++-- | Constructor for 'ECSTaskDefinitionContainerDependency' containing+-- required fields as arguments.+ecsTaskDefinitionContainerDependency+  :: Val Text -- ^ 'ecstdcdCondition'+  -> Val Text -- ^ 'ecstdcdContainerName'+  -> ECSTaskDefinitionContainerDependency+ecsTaskDefinitionContainerDependency conditionarg containerNamearg =+  ECSTaskDefinitionContainerDependency+  { _eCSTaskDefinitionContainerDependencyCondition = conditionarg+  , _eCSTaskDefinitionContainerDependencyContainerName = containerNamearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdependency.html#cfn-ecs-taskdefinition-containerdependency-condition+ecstdcdCondition :: Lens' ECSTaskDefinitionContainerDependency (Val Text)+ecstdcdCondition = lens _eCSTaskDefinitionContainerDependencyCondition (\s a -> s { _eCSTaskDefinitionContainerDependencyCondition = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdependency.html#cfn-ecs-taskdefinition-containerdependency-containername+ecstdcdContainerName :: Lens' ECSTaskDefinitionContainerDependency (Val Text)+ecstdcdContainerName = lens _eCSTaskDefinitionContainerDependencyContainerName (\s a -> s { _eCSTaskDefinitionContainerDependencyContainerName = a })

@@ -0,0 +1,53 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-proxyconfiguration.html++module Stratosphere.ResourceProperties.ECSTaskDefinitionProxyConfiguration where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ECSTaskDefinitionKeyValuePair++-- | Full data type definition for ECSTaskDefinitionProxyConfiguration. See+-- 'ecsTaskDefinitionProxyConfiguration' for a more convenient constructor.+data ECSTaskDefinitionProxyConfiguration =+  ECSTaskDefinitionProxyConfiguration+  { _eCSTaskDefinitionProxyConfigurationContainerName :: Val Text+  , _eCSTaskDefinitionProxyConfigurationProxyConfigurationProperties :: Maybe [ECSTaskDefinitionKeyValuePair]+  , _eCSTaskDefinitionProxyConfigurationType :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ECSTaskDefinitionProxyConfiguration where+  toJSON ECSTaskDefinitionProxyConfiguration{..} =+    object $+    catMaybes+    [ (Just . ("ContainerName",) . toJSON) _eCSTaskDefinitionProxyConfigurationContainerName+    , fmap (("ProxyConfigurationProperties",) . toJSON) _eCSTaskDefinitionProxyConfigurationProxyConfigurationProperties+    , fmap (("Type",) . toJSON) _eCSTaskDefinitionProxyConfigurationType+    ]++-- | Constructor for 'ECSTaskDefinitionProxyConfiguration' containing required+-- fields as arguments.+ecsTaskDefinitionProxyConfiguration+  :: Val Text -- ^ 'ecstdpcContainerName'+  -> ECSTaskDefinitionProxyConfiguration+ecsTaskDefinitionProxyConfiguration containerNamearg =+  ECSTaskDefinitionProxyConfiguration+  { _eCSTaskDefinitionProxyConfigurationContainerName = containerNamearg+  , _eCSTaskDefinitionProxyConfigurationProxyConfigurationProperties = Nothing+  , _eCSTaskDefinitionProxyConfigurationType = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-proxyconfiguration.html#cfn-ecs-taskdefinition-proxyconfiguration-containername+ecstdpcContainerName :: Lens' ECSTaskDefinitionProxyConfiguration (Val Text)+ecstdpcContainerName = lens _eCSTaskDefinitionProxyConfigurationContainerName (\s a -> s { _eCSTaskDefinitionProxyConfigurationContainerName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-proxyconfiguration.html#cfn-ecs-taskdefinition-proxyconfiguration-proxyconfigurationproperties+ecstdpcProxyConfigurationProperties :: Lens' ECSTaskDefinitionProxyConfiguration (Maybe [ECSTaskDefinitionKeyValuePair])+ecstdpcProxyConfigurationProperties = lens _eCSTaskDefinitionProxyConfigurationProxyConfigurationProperties (\s a -> s { _eCSTaskDefinitionProxyConfigurationProxyConfigurationProperties = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-proxyconfiguration.html#cfn-ecs-taskdefinition-proxyconfiguration-type+ecstdpcType :: Lens' ECSTaskDefinitionProxyConfiguration (Maybe (Val Text))+ecstdpcType = lens _eCSTaskDefinitionProxyConfigurationType (\s a -> s { _eCSTaskDefinitionProxyConfigurationType = a })

@@ -0,0 +1,80 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html++module Stratosphere.ResourceProperties.GlueClassifierCsvClassifier where++import Stratosphere.ResourceImports+++-- | Full data type definition for GlueClassifierCsvClassifier. See+-- 'glueClassifierCsvClassifier' for a more convenient constructor.+data GlueClassifierCsvClassifier =+  GlueClassifierCsvClassifier+  { _glueClassifierCsvClassifierAllowSingleColumn :: Maybe (Val Bool)+  , _glueClassifierCsvClassifierContainsHeader :: Maybe (Val Text)+  , _glueClassifierCsvClassifierDelimiter :: Maybe (Val Text)+  , _glueClassifierCsvClassifierDisableValueTrimming :: Maybe (Val Bool)+  , _glueClassifierCsvClassifierHeader :: Maybe (ValList Text)+  , _glueClassifierCsvClassifierName :: Maybe (Val Text)+  , _glueClassifierCsvClassifierQuoteSymbol :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON GlueClassifierCsvClassifier where+  toJSON GlueClassifierCsvClassifier{..} =+    object $+    catMaybes+    [ fmap (("AllowSingleColumn",) . toJSON) _glueClassifierCsvClassifierAllowSingleColumn+    , fmap (("ContainsHeader",) . toJSON) _glueClassifierCsvClassifierContainsHeader+    , fmap (("Delimiter",) . toJSON) _glueClassifierCsvClassifierDelimiter+    , fmap (("DisableValueTrimming",) . toJSON) _glueClassifierCsvClassifierDisableValueTrimming+    , fmap (("Header",) . toJSON) _glueClassifierCsvClassifierHeader+    , fmap (("Name",) . toJSON) _glueClassifierCsvClassifierName+    , fmap (("QuoteSymbol",) . toJSON) _glueClassifierCsvClassifierQuoteSymbol+    ]++-- | Constructor for 'GlueClassifierCsvClassifier' containing required fields+-- as arguments.+glueClassifierCsvClassifier+  :: GlueClassifierCsvClassifier+glueClassifierCsvClassifier  =+  GlueClassifierCsvClassifier+  { _glueClassifierCsvClassifierAllowSingleColumn = Nothing+  , _glueClassifierCsvClassifierContainsHeader = Nothing+  , _glueClassifierCsvClassifierDelimiter = Nothing+  , _glueClassifierCsvClassifierDisableValueTrimming = Nothing+  , _glueClassifierCsvClassifierHeader = Nothing+  , _glueClassifierCsvClassifierName = Nothing+  , _glueClassifierCsvClassifierQuoteSymbol = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-allowsinglecolumn+gcccAllowSingleColumn :: Lens' GlueClassifierCsvClassifier (Maybe (Val Bool))+gcccAllowSingleColumn = lens _glueClassifierCsvClassifierAllowSingleColumn (\s a -> s { _glueClassifierCsvClassifierAllowSingleColumn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-containsheader+gcccContainsHeader :: Lens' GlueClassifierCsvClassifier (Maybe (Val Text))+gcccContainsHeader = lens _glueClassifierCsvClassifierContainsHeader (\s a -> s { _glueClassifierCsvClassifierContainsHeader = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-delimiter+gcccDelimiter :: Lens' GlueClassifierCsvClassifier (Maybe (Val Text))+gcccDelimiter = lens _glueClassifierCsvClassifierDelimiter (\s a -> s { _glueClassifierCsvClassifierDelimiter = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-disablevaluetrimming+gcccDisableValueTrimming :: Lens' GlueClassifierCsvClassifier (Maybe (Val Bool))+gcccDisableValueTrimming = lens _glueClassifierCsvClassifierDisableValueTrimming (\s a -> s { _glueClassifierCsvClassifierDisableValueTrimming = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-header+gcccHeader :: Lens' GlueClassifierCsvClassifier (Maybe (ValList Text))+gcccHeader = lens _glueClassifierCsvClassifierHeader (\s a -> s { _glueClassifierCsvClassifierHeader = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-name+gcccName :: Lens' GlueClassifierCsvClassifier (Maybe (Val Text))+gcccName = lens _glueClassifierCsvClassifierName (\s a -> s { _glueClassifierCsvClassifierName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-classifier-csvclassifier.html#cfn-glue-classifier-csvclassifier-quotesymbol+gcccQuoteSymbol :: Lens' GlueClassifierCsvClassifier (Maybe (Val Text))+gcccQuoteSymbol = lens _glueClassifierCsvClassifierQuoteSymbol (\s a -> s { _glueClassifierCsvClassifierQuoteSymbol = a })

@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-connectionpasswordencryption.html++module Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption. See+-- 'glueDataCatalogEncryptionSettingsConnectionPasswordEncryption' for a+-- more convenient constructor.+data GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption =+  GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption+  { _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionKmsKeyId :: Maybe (Val Text)+  , _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionReturnConnectionPasswordEncrypted :: Maybe (Val Bool)+  } deriving (Show, Eq)++instance ToJSON GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption where+  toJSON GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption{..} =+    object $+    catMaybes+    [ fmap (("KmsKeyId",) . toJSON) _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionKmsKeyId+    , fmap (("ReturnConnectionPasswordEncrypted",) . toJSON) _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionReturnConnectionPasswordEncrypted+    ]++-- | Constructor for+-- 'GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption'+-- containing required fields as arguments.+glueDataCatalogEncryptionSettingsConnectionPasswordEncryption+  :: GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption+glueDataCatalogEncryptionSettingsConnectionPasswordEncryption  =+  GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption+  { _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionKmsKeyId = Nothing+  , _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionReturnConnectionPasswordEncrypted = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-connectionpasswordencryption.html#cfn-glue-datacatalogencryptionsettings-connectionpasswordencryption-kmskeyid+gdcescpeKmsKeyId :: Lens' GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption (Maybe (Val Text))+gdcescpeKmsKeyId = lens _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionKmsKeyId (\s a -> s { _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionKmsKeyId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-connectionpasswordencryption.html#cfn-glue-datacatalogencryptionsettings-connectionpasswordencryption-returnconnectionpasswordencrypted+gdcescpeReturnConnectionPasswordEncrypted :: Lens' GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption (Maybe (Val Bool))+gdcescpeReturnConnectionPasswordEncrypted = lens _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionReturnConnectionPasswordEncrypted (\s a -> s { _glueDataCatalogEncryptionSettingsConnectionPasswordEncryptionReturnConnectionPasswordEncrypted = a })

@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-datacatalogencryptionsettings.html++module Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption+import Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsEncryptionAtRest++-- | Full data type definition for+-- GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings. See+-- 'glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings' for a+-- more convenient constructor.+data GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings =+  GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+  { _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsConnectionPasswordEncryption :: Maybe GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption+  , _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsEncryptionAtRest :: Maybe GlueDataCatalogEncryptionSettingsEncryptionAtRest+  } deriving (Show, Eq)++instance ToJSON GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings where+  toJSON GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings{..} =+    object $+    catMaybes+    [ fmap (("ConnectionPasswordEncryption",) . toJSON) _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsConnectionPasswordEncryption+    , fmap (("EncryptionAtRest",) . toJSON) _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsEncryptionAtRest+    ]++-- | Constructor for+-- 'GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings'+-- containing required fields as arguments.+glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+  :: GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings  =+  GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+  { _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsConnectionPasswordEncryption = Nothing+  , _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsEncryptionAtRest = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-datacatalogencryptionsettings.html#cfn-glue-datacatalogencryptionsettings-datacatalogencryptionsettings-connectionpasswordencryption+gdcesdcesConnectionPasswordEncryption :: Lens' GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings (Maybe GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption)+gdcesdcesConnectionPasswordEncryption = lens _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsConnectionPasswordEncryption (\s a -> s { _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsConnectionPasswordEncryption = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-datacatalogencryptionsettings.html#cfn-glue-datacatalogencryptionsettings-datacatalogencryptionsettings-encryptionatrest+gdcesdcesEncryptionAtRest :: Lens' GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings (Maybe GlueDataCatalogEncryptionSettingsEncryptionAtRest)+gdcesdcesEncryptionAtRest = lens _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsEncryptionAtRest (\s a -> s { _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettingsEncryptionAtRest = a })

@@ -0,0 +1,47 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-encryptionatrest.html++module Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsEncryptionAtRest where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- GlueDataCatalogEncryptionSettingsEncryptionAtRest. See+-- 'glueDataCatalogEncryptionSettingsEncryptionAtRest' for a more convenient+-- constructor.+data GlueDataCatalogEncryptionSettingsEncryptionAtRest =+  GlueDataCatalogEncryptionSettingsEncryptionAtRest+  { _glueDataCatalogEncryptionSettingsEncryptionAtRestCatalogEncryptionMode :: Maybe (Val Text)+  , _glueDataCatalogEncryptionSettingsEncryptionAtRestSseAwsKmsKeyId :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON GlueDataCatalogEncryptionSettingsEncryptionAtRest where+  toJSON GlueDataCatalogEncryptionSettingsEncryptionAtRest{..} =+    object $+    catMaybes+    [ fmap (("CatalogEncryptionMode",) . toJSON) _glueDataCatalogEncryptionSettingsEncryptionAtRestCatalogEncryptionMode+    , fmap (("SseAwsKmsKeyId",) . toJSON) _glueDataCatalogEncryptionSettingsEncryptionAtRestSseAwsKmsKeyId+    ]++-- | Constructor for 'GlueDataCatalogEncryptionSettingsEncryptionAtRest'+-- containing required fields as arguments.+glueDataCatalogEncryptionSettingsEncryptionAtRest+  :: GlueDataCatalogEncryptionSettingsEncryptionAtRest+glueDataCatalogEncryptionSettingsEncryptionAtRest  =+  GlueDataCatalogEncryptionSettingsEncryptionAtRest+  { _glueDataCatalogEncryptionSettingsEncryptionAtRestCatalogEncryptionMode = Nothing+  , _glueDataCatalogEncryptionSettingsEncryptionAtRestSseAwsKmsKeyId = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-encryptionatrest.html#cfn-glue-datacatalogencryptionsettings-encryptionatrest-catalogencryptionmode+gdcesearCatalogEncryptionMode :: Lens' GlueDataCatalogEncryptionSettingsEncryptionAtRest (Maybe (Val Text))+gdcesearCatalogEncryptionMode = lens _glueDataCatalogEncryptionSettingsEncryptionAtRestCatalogEncryptionMode (\s a -> s { _glueDataCatalogEncryptionSettingsEncryptionAtRestCatalogEncryptionMode = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-datacatalogencryptionsettings-encryptionatrest.html#cfn-glue-datacatalogencryptionsettings-encryptionatrest-sseawskmskeyid+gdcesearSseAwsKmsKeyId :: Lens' GlueDataCatalogEncryptionSettingsEncryptionAtRest (Maybe (Val Text))+gdcesearSseAwsKmsKeyId = lens _glueDataCatalogEncryptionSettingsEncryptionAtRestSseAwsKmsKeyId (\s a -> s { _glueDataCatalogEncryptionSettingsEncryptionAtRestSseAwsKmsKeyId = a })

@@ -0,0 +1,47 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-cloudwatchencryption.html++module Stratosphere.ResourceProperties.GlueSecurityConfigurationCloudWatchEncryption where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- GlueSecurityConfigurationCloudWatchEncryption. See+-- 'glueSecurityConfigurationCloudWatchEncryption' for a more convenient+-- constructor.+data GlueSecurityConfigurationCloudWatchEncryption =+  GlueSecurityConfigurationCloudWatchEncryption+  { _glueSecurityConfigurationCloudWatchEncryptionCloudWatchEncryptionMode :: Maybe (Val Text)+  , _glueSecurityConfigurationCloudWatchEncryptionKmsKeyArn :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON GlueSecurityConfigurationCloudWatchEncryption where+  toJSON GlueSecurityConfigurationCloudWatchEncryption{..} =+    object $+    catMaybes+    [ fmap (("CloudWatchEncryptionMode",) . toJSON) _glueSecurityConfigurationCloudWatchEncryptionCloudWatchEncryptionMode+    , fmap (("KmsKeyArn",) . toJSON) _glueSecurityConfigurationCloudWatchEncryptionKmsKeyArn+    ]++-- | Constructor for 'GlueSecurityConfigurationCloudWatchEncryption'+-- containing required fields as arguments.+glueSecurityConfigurationCloudWatchEncryption+  :: GlueSecurityConfigurationCloudWatchEncryption+glueSecurityConfigurationCloudWatchEncryption  =+  GlueSecurityConfigurationCloudWatchEncryption+  { _glueSecurityConfigurationCloudWatchEncryptionCloudWatchEncryptionMode = Nothing+  , _glueSecurityConfigurationCloudWatchEncryptionKmsKeyArn = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-cloudwatchencryption.html#cfn-glue-securityconfiguration-cloudwatchencryption-cloudwatchencryptionmode+gsccweCloudWatchEncryptionMode :: Lens' GlueSecurityConfigurationCloudWatchEncryption (Maybe (Val Text))+gsccweCloudWatchEncryptionMode = lens _glueSecurityConfigurationCloudWatchEncryptionCloudWatchEncryptionMode (\s a -> s { _glueSecurityConfigurationCloudWatchEncryptionCloudWatchEncryptionMode = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-cloudwatchencryption.html#cfn-glue-securityconfiguration-cloudwatchencryption-kmskeyarn+gsccweKmsKeyArn :: Lens' GlueSecurityConfigurationCloudWatchEncryption (Maybe (Val Text))+gsccweKmsKeyArn = lens _glueSecurityConfigurationCloudWatchEncryptionKmsKeyArn (\s a -> s { _glueSecurityConfigurationCloudWatchEncryptionKmsKeyArn = a })

@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-encryptionconfiguration.html++module Stratosphere.ResourceProperties.GlueSecurityConfigurationEncryptionConfiguration where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.GlueSecurityConfigurationCloudWatchEncryption+import Stratosphere.ResourceProperties.GlueSecurityConfigurationJobBookmarksEncryption++-- | Full data type definition for+-- GlueSecurityConfigurationEncryptionConfiguration. See+-- 'glueSecurityConfigurationEncryptionConfiguration' for a more convenient+-- constructor.+data GlueSecurityConfigurationEncryptionConfiguration =+  GlueSecurityConfigurationEncryptionConfiguration+  { _glueSecurityConfigurationEncryptionConfigurationCloudWatchEncryption :: Maybe GlueSecurityConfigurationCloudWatchEncryption+  , _glueSecurityConfigurationEncryptionConfigurationJobBookmarksEncryption :: Maybe GlueSecurityConfigurationJobBookmarksEncryption+  } deriving (Show, Eq)++instance ToJSON GlueSecurityConfigurationEncryptionConfiguration where+  toJSON GlueSecurityConfigurationEncryptionConfiguration{..} =+    object $+    catMaybes+    [ fmap (("CloudWatchEncryption",) . toJSON) _glueSecurityConfigurationEncryptionConfigurationCloudWatchEncryption+    , fmap (("JobBookmarksEncryption",) . toJSON) _glueSecurityConfigurationEncryptionConfigurationJobBookmarksEncryption+    ]++-- | Constructor for 'GlueSecurityConfigurationEncryptionConfiguration'+-- containing required fields as arguments.+glueSecurityConfigurationEncryptionConfiguration+  :: GlueSecurityConfigurationEncryptionConfiguration+glueSecurityConfigurationEncryptionConfiguration  =+  GlueSecurityConfigurationEncryptionConfiguration+  { _glueSecurityConfigurationEncryptionConfigurationCloudWatchEncryption = Nothing+  , _glueSecurityConfigurationEncryptionConfigurationJobBookmarksEncryption = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-encryptionconfiguration.html#cfn-glue-securityconfiguration-encryptionconfiguration-cloudwatchencryption+gscecCloudWatchEncryption :: Lens' GlueSecurityConfigurationEncryptionConfiguration (Maybe GlueSecurityConfigurationCloudWatchEncryption)+gscecCloudWatchEncryption = lens _glueSecurityConfigurationEncryptionConfigurationCloudWatchEncryption (\s a -> s { _glueSecurityConfigurationEncryptionConfigurationCloudWatchEncryption = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-encryptionconfiguration.html#cfn-glue-securityconfiguration-encryptionconfiguration-jobbookmarksencryption+gscecJobBookmarksEncryption :: Lens' GlueSecurityConfigurationEncryptionConfiguration (Maybe GlueSecurityConfigurationJobBookmarksEncryption)+gscecJobBookmarksEncryption = lens _glueSecurityConfigurationEncryptionConfigurationJobBookmarksEncryption (\s a -> s { _glueSecurityConfigurationEncryptionConfigurationJobBookmarksEncryption = a })

@@ -0,0 +1,47 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-jobbookmarksencryption.html++module Stratosphere.ResourceProperties.GlueSecurityConfigurationJobBookmarksEncryption where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- GlueSecurityConfigurationJobBookmarksEncryption. See+-- 'glueSecurityConfigurationJobBookmarksEncryption' for a more convenient+-- constructor.+data GlueSecurityConfigurationJobBookmarksEncryption =+  GlueSecurityConfigurationJobBookmarksEncryption+  { _glueSecurityConfigurationJobBookmarksEncryptionJobBookmarksEncryptionMode :: Maybe (Val Text)+  , _glueSecurityConfigurationJobBookmarksEncryptionKmsKeyArn :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON GlueSecurityConfigurationJobBookmarksEncryption where+  toJSON GlueSecurityConfigurationJobBookmarksEncryption{..} =+    object $+    catMaybes+    [ fmap (("JobBookmarksEncryptionMode",) . toJSON) _glueSecurityConfigurationJobBookmarksEncryptionJobBookmarksEncryptionMode+    , fmap (("KmsKeyArn",) . toJSON) _glueSecurityConfigurationJobBookmarksEncryptionKmsKeyArn+    ]++-- | Constructor for 'GlueSecurityConfigurationJobBookmarksEncryption'+-- containing required fields as arguments.+glueSecurityConfigurationJobBookmarksEncryption+  :: GlueSecurityConfigurationJobBookmarksEncryption+glueSecurityConfigurationJobBookmarksEncryption  =+  GlueSecurityConfigurationJobBookmarksEncryption+  { _glueSecurityConfigurationJobBookmarksEncryptionJobBookmarksEncryptionMode = Nothing+  , _glueSecurityConfigurationJobBookmarksEncryptionKmsKeyArn = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-jobbookmarksencryption.html#cfn-glue-securityconfiguration-jobbookmarksencryption-jobbookmarksencryptionmode+gscjbeJobBookmarksEncryptionMode :: Lens' GlueSecurityConfigurationJobBookmarksEncryption (Maybe (Val Text))+gscjbeJobBookmarksEncryptionMode = lens _glueSecurityConfigurationJobBookmarksEncryptionJobBookmarksEncryptionMode (\s a -> s { _glueSecurityConfigurationJobBookmarksEncryptionJobBookmarksEncryptionMode = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-jobbookmarksencryption.html#cfn-glue-securityconfiguration-jobbookmarksencryption-kmskeyarn+gscjbeKmsKeyArn :: Lens' GlueSecurityConfigurationJobBookmarksEncryption (Maybe (Val Text))+gscjbeKmsKeyArn = lens _glueSecurityConfigurationJobBookmarksEncryptionKmsKeyArn (\s a -> s { _glueSecurityConfigurationJobBookmarksEncryptionKmsKeyArn = a })

@@ -0,0 +1,46 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-s3encryption.html++module Stratosphere.ResourceProperties.GlueSecurityConfigurationS3Encryption where++import Stratosphere.ResourceImports+++-- | Full data type definition for GlueSecurityConfigurationS3Encryption. See+-- 'glueSecurityConfigurationS3Encryption' for a more convenient+-- constructor.+data GlueSecurityConfigurationS3Encryption =+  GlueSecurityConfigurationS3Encryption+  { _glueSecurityConfigurationS3EncryptionKmsKeyArn :: Maybe (Val Text)+  , _glueSecurityConfigurationS3EncryptionS3EncryptionMode :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON GlueSecurityConfigurationS3Encryption where+  toJSON GlueSecurityConfigurationS3Encryption{..} =+    object $+    catMaybes+    [ fmap (("KmsKeyArn",) . toJSON) _glueSecurityConfigurationS3EncryptionKmsKeyArn+    , fmap (("S3EncryptionMode",) . toJSON) _glueSecurityConfigurationS3EncryptionS3EncryptionMode+    ]++-- | Constructor for 'GlueSecurityConfigurationS3Encryption' containing+-- required fields as arguments.+glueSecurityConfigurationS3Encryption+  :: GlueSecurityConfigurationS3Encryption+glueSecurityConfigurationS3Encryption  =+  GlueSecurityConfigurationS3Encryption+  { _glueSecurityConfigurationS3EncryptionKmsKeyArn = Nothing+  , _glueSecurityConfigurationS3EncryptionS3EncryptionMode = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-s3encryption.html#cfn-glue-securityconfiguration-s3encryption-kmskeyarn+gscseKmsKeyArn :: Lens' GlueSecurityConfigurationS3Encryption (Maybe (Val Text))+gscseKmsKeyArn = lens _glueSecurityConfigurationS3EncryptionKmsKeyArn (\s a -> s { _glueSecurityConfigurationS3EncryptionKmsKeyArn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-securityconfiguration-s3encryption.html#cfn-glue-securityconfiguration-s3encryption-s3encryptionmode+gscseS3EncryptionMode :: Lens' GlueSecurityConfigurationS3Encryption (Maybe (Val Text))+gscseS3EncryptionMode = lens _glueSecurityConfigurationS3EncryptionS3EncryptionMode (\s a -> s { _glueSecurityConfigurationS3EncryptionS3EncryptionMode = a })

@@ -16,6 +16,7 @@   GlueTriggerAction   { _glueTriggerActionArguments :: Maybe Object   , _glueTriggerActionJobName :: Maybe (Val Text)+  , _glueTriggerActionSecurityConfiguration :: Maybe (Val Text)   } deriving (Show, Eq)  instance ToJSON GlueTriggerAction where@@ -24,6 +25,7 @@     catMaybes     [ fmap (("Arguments",) . toJSON) _glueTriggerActionArguments     , fmap (("JobName",) . toJSON) _glueTriggerActionJobName+    , fmap (("SecurityConfiguration",) . toJSON) _glueTriggerActionSecurityConfiguration     ]  -- | Constructor for 'GlueTriggerAction' containing required fields as@@ -34,6 +36,7 @@   GlueTriggerAction   { _glueTriggerActionArguments = Nothing   , _glueTriggerActionJobName = Nothing+  , _glueTriggerActionSecurityConfiguration = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-trigger-action.html#cfn-glue-trigger-action-arguments@@ -43,3 +46,7 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-trigger-action.html#cfn-glue-trigger-action-jobname gtaJobName :: Lens' GlueTriggerAction (Maybe (Val Text)) gtaJobName = lens _glueTriggerActionJobName (\s a -> s { _glueTriggerActionJobName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-glue-trigger-action.html#cfn-glue-trigger-action-securityconfiguration+gtaSecurityConfiguration :: Lens' GlueTriggerAction (Maybe (Val Text))+gtaSecurityConfiguration = lens _glueTriggerActionSecurityConfiguration (\s a -> s { _glueTriggerActionSecurityConfiguration = a })

@@ -0,0 +1,66 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html++module Stratosphere.ResourceProperties.MediaStoreContainerCorsRule where++import Stratosphere.ResourceImports+++-- | Full data type definition for MediaStoreContainerCorsRule. See+-- 'mediaStoreContainerCorsRule' for a more convenient constructor.+data MediaStoreContainerCorsRule =+  MediaStoreContainerCorsRule+  { _mediaStoreContainerCorsRuleAllowedHeaders :: Maybe (ValList Text)+  , _mediaStoreContainerCorsRuleAllowedMethods :: Maybe (ValList Text)+  , _mediaStoreContainerCorsRuleAllowedOrigins :: Maybe (ValList Text)+  , _mediaStoreContainerCorsRuleExposeHeaders :: Maybe (ValList Text)+  , _mediaStoreContainerCorsRuleMaxAgeSeconds :: Maybe (Val Integer)+  } deriving (Show, Eq)++instance ToJSON MediaStoreContainerCorsRule where+  toJSON MediaStoreContainerCorsRule{..} =+    object $+    catMaybes+    [ fmap (("AllowedHeaders",) . toJSON) _mediaStoreContainerCorsRuleAllowedHeaders+    , fmap (("AllowedMethods",) . toJSON) _mediaStoreContainerCorsRuleAllowedMethods+    , fmap (("AllowedOrigins",) . toJSON) _mediaStoreContainerCorsRuleAllowedOrigins+    , fmap (("ExposeHeaders",) . toJSON) _mediaStoreContainerCorsRuleExposeHeaders+    , fmap (("MaxAgeSeconds",) . toJSON) _mediaStoreContainerCorsRuleMaxAgeSeconds+    ]++-- | Constructor for 'MediaStoreContainerCorsRule' containing required fields+-- as arguments.+mediaStoreContainerCorsRule+  :: MediaStoreContainerCorsRule+mediaStoreContainerCorsRule  =+  MediaStoreContainerCorsRule+  { _mediaStoreContainerCorsRuleAllowedHeaders = Nothing+  , _mediaStoreContainerCorsRuleAllowedMethods = Nothing+  , _mediaStoreContainerCorsRuleAllowedOrigins = Nothing+  , _mediaStoreContainerCorsRuleExposeHeaders = Nothing+  , _mediaStoreContainerCorsRuleMaxAgeSeconds = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html#cfn-mediastore-container-corsrule-allowedheaders+msccrAllowedHeaders :: Lens' MediaStoreContainerCorsRule (Maybe (ValList Text))+msccrAllowedHeaders = lens _mediaStoreContainerCorsRuleAllowedHeaders (\s a -> s { _mediaStoreContainerCorsRuleAllowedHeaders = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html#cfn-mediastore-container-corsrule-allowedmethods+msccrAllowedMethods :: Lens' MediaStoreContainerCorsRule (Maybe (ValList Text))+msccrAllowedMethods = lens _mediaStoreContainerCorsRuleAllowedMethods (\s a -> s { _mediaStoreContainerCorsRuleAllowedMethods = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html#cfn-mediastore-container-corsrule-allowedorigins+msccrAllowedOrigins :: Lens' MediaStoreContainerCorsRule (Maybe (ValList Text))+msccrAllowedOrigins = lens _mediaStoreContainerCorsRuleAllowedOrigins (\s a -> s { _mediaStoreContainerCorsRuleAllowedOrigins = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html#cfn-mediastore-container-corsrule-exposeheaders+msccrExposeHeaders :: Lens' MediaStoreContainerCorsRule (Maybe (ValList Text))+msccrExposeHeaders = lens _mediaStoreContainerCorsRuleExposeHeaders (\s a -> s { _mediaStoreContainerCorsRuleExposeHeaders = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html#cfn-mediastore-container-corsrule-maxageseconds+msccrMaxAgeSeconds :: Lens' MediaStoreContainerCorsRule (Maybe (Val Integer))+msccrMaxAgeSeconds = lens _mediaStoreContainerCorsRuleMaxAgeSeconds (\s a -> s { _mediaStoreContainerCorsRuleMaxAgeSeconds = a })

@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-deliveryoptions.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetDeliveryOptions where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetDeliveryOptions. See+-- 'pinpointEmailConfigurationSetDeliveryOptions' for a more convenient+-- constructor.+data PinpointEmailConfigurationSetDeliveryOptions =+  PinpointEmailConfigurationSetDeliveryOptions+  { _pinpointEmailConfigurationSetDeliveryOptionsSendingPoolName :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetDeliveryOptions where+  toJSON PinpointEmailConfigurationSetDeliveryOptions{..} =+    object $+    catMaybes+    [ fmap (("SendingPoolName",) . toJSON) _pinpointEmailConfigurationSetDeliveryOptionsSendingPoolName+    ]++-- | Constructor for 'PinpointEmailConfigurationSetDeliveryOptions' containing+-- required fields as arguments.+pinpointEmailConfigurationSetDeliveryOptions+  :: PinpointEmailConfigurationSetDeliveryOptions+pinpointEmailConfigurationSetDeliveryOptions  =+  PinpointEmailConfigurationSetDeliveryOptions+  { _pinpointEmailConfigurationSetDeliveryOptionsSendingPoolName = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-deliveryoptions.html#cfn-pinpointemail-configurationset-deliveryoptions-sendingpoolname+pecsdoSendingPoolName :: Lens' PinpointEmailConfigurationSetDeliveryOptions (Maybe (Val Text))+pecsdoSendingPoolName = lens _pinpointEmailConfigurationSetDeliveryOptionsSendingPoolName (\s a -> s { _pinpointEmailConfigurationSetDeliveryOptionsSendingPoolName = a })

@@ -0,0 +1,41 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-cloudwatchdestination.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationCloudWatchDestination where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationDimensionConfiguration++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestinationCloudWatchDestination. See+-- 'pinpointEmailConfigurationSetEventDestinationCloudWatchDestination' for+-- a more convenient constructor.+data PinpointEmailConfigurationSetEventDestinationCloudWatchDestination =+  PinpointEmailConfigurationSetEventDestinationCloudWatchDestination+  { _pinpointEmailConfigurationSetEventDestinationCloudWatchDestinationDimensionConfigurations :: Maybe [PinpointEmailConfigurationSetEventDestinationDimensionConfiguration]+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetEventDestinationCloudWatchDestination where+  toJSON PinpointEmailConfigurationSetEventDestinationCloudWatchDestination{..} =+    object $+    catMaybes+    [ fmap (("DimensionConfigurations",) . toJSON) _pinpointEmailConfigurationSetEventDestinationCloudWatchDestinationDimensionConfigurations+    ]++-- | Constructor for+-- 'PinpointEmailConfigurationSetEventDestinationCloudWatchDestination'+-- containing required fields as arguments.+pinpointEmailConfigurationSetEventDestinationCloudWatchDestination+  :: PinpointEmailConfigurationSetEventDestinationCloudWatchDestination+pinpointEmailConfigurationSetEventDestinationCloudWatchDestination  =+  PinpointEmailConfigurationSetEventDestinationCloudWatchDestination+  { _pinpointEmailConfigurationSetEventDestinationCloudWatchDestinationDimensionConfigurations = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-cloudwatchdestination.html#cfn-pinpointemail-configurationseteventdestination-cloudwatchdestination-dimensionconfigurations+pecsedcwdDimensionConfigurations :: Lens' PinpointEmailConfigurationSetEventDestinationCloudWatchDestination (Maybe [PinpointEmailConfigurationSetEventDestinationDimensionConfiguration])+pecsedcwdDimensionConfigurations = lens _pinpointEmailConfigurationSetEventDestinationCloudWatchDestinationDimensionConfigurations (\s a -> s { _pinpointEmailConfigurationSetEventDestinationCloudWatchDestinationDimensionConfigurations = a })

@@ -0,0 +1,58 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-dimensionconfiguration.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationDimensionConfiguration where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestinationDimensionConfiguration. See+-- 'pinpointEmailConfigurationSetEventDestinationDimensionConfiguration' for+-- a more convenient constructor.+data PinpointEmailConfigurationSetEventDestinationDimensionConfiguration =+  PinpointEmailConfigurationSetEventDestinationDimensionConfiguration+  { _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDefaultDimensionValue :: Val Text+  , _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionName :: Val Text+  , _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionValueSource :: Val Text+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetEventDestinationDimensionConfiguration where+  toJSON PinpointEmailConfigurationSetEventDestinationDimensionConfiguration{..} =+    object $+    catMaybes+    [ (Just . ("DefaultDimensionValue",) . toJSON) _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDefaultDimensionValue+    , (Just . ("DimensionName",) . toJSON) _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionName+    , (Just . ("DimensionValueSource",) . toJSON) _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionValueSource+    ]++-- | Constructor for+-- 'PinpointEmailConfigurationSetEventDestinationDimensionConfiguration'+-- containing required fields as arguments.+pinpointEmailConfigurationSetEventDestinationDimensionConfiguration+  :: Val Text -- ^ 'pecseddcDefaultDimensionValue'+  -> Val Text -- ^ 'pecseddcDimensionName'+  -> Val Text -- ^ 'pecseddcDimensionValueSource'+  -> PinpointEmailConfigurationSetEventDestinationDimensionConfiguration+pinpointEmailConfigurationSetEventDestinationDimensionConfiguration defaultDimensionValuearg dimensionNamearg dimensionValueSourcearg =+  PinpointEmailConfigurationSetEventDestinationDimensionConfiguration+  { _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDefaultDimensionValue = defaultDimensionValuearg+  , _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionName = dimensionNamearg+  , _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionValueSource = dimensionValueSourcearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-dimensionconfiguration.html#cfn-pinpointemail-configurationseteventdestination-dimensionconfiguration-defaultdimensionvalue+pecseddcDefaultDimensionValue :: Lens' PinpointEmailConfigurationSetEventDestinationDimensionConfiguration (Val Text)+pecseddcDefaultDimensionValue = lens _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDefaultDimensionValue (\s a -> s { _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDefaultDimensionValue = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-dimensionconfiguration.html#cfn-pinpointemail-configurationseteventdestination-dimensionconfiguration-dimensionname+pecseddcDimensionName :: Lens' PinpointEmailConfigurationSetEventDestinationDimensionConfiguration (Val Text)+pecseddcDimensionName = lens _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionName (\s a -> s { _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-dimensionconfiguration.html#cfn-pinpointemail-configurationseteventdestination-dimensionconfiguration-dimensionvaluesource+pecseddcDimensionValueSource :: Lens' PinpointEmailConfigurationSetEventDestinationDimensionConfiguration (Val Text)+pecseddcDimensionValueSource = lens _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionValueSource (\s a -> s { _pinpointEmailConfigurationSetEventDestinationDimensionConfigurationDimensionValueSource = a })

@@ -0,0 +1,80 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationEventDestination where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationCloudWatchDestination+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationPinpointDestination+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationSnsDestination++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestinationEventDestination. See+-- 'pinpointEmailConfigurationSetEventDestinationEventDestination' for a+-- more convenient constructor.+data PinpointEmailConfigurationSetEventDestinationEventDestination =+  PinpointEmailConfigurationSetEventDestinationEventDestination+  { _pinpointEmailConfigurationSetEventDestinationEventDestinationCloudWatchDestination :: Maybe PinpointEmailConfigurationSetEventDestinationCloudWatchDestination+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationEnabled :: Maybe (Val Bool)+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationKinesisFirehoseDestination :: Maybe PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationMatchingEventTypes :: ValList Text+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationPinpointDestination :: Maybe PinpointEmailConfigurationSetEventDestinationPinpointDestination+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationSnsDestination :: Maybe PinpointEmailConfigurationSetEventDestinationSnsDestination+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetEventDestinationEventDestination where+  toJSON PinpointEmailConfigurationSetEventDestinationEventDestination{..} =+    object $+    catMaybes+    [ fmap (("CloudWatchDestination",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationCloudWatchDestination+    , fmap (("Enabled",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationEnabled+    , fmap (("KinesisFirehoseDestination",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationKinesisFirehoseDestination+    , (Just . ("MatchingEventTypes",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationMatchingEventTypes+    , fmap (("PinpointDestination",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationPinpointDestination+    , fmap (("SnsDestination",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationSnsDestination+    ]++-- | Constructor for+-- 'PinpointEmailConfigurationSetEventDestinationEventDestination'+-- containing required fields as arguments.+pinpointEmailConfigurationSetEventDestinationEventDestination+  :: ValList Text -- ^ 'pecsededMatchingEventTypes'+  -> PinpointEmailConfigurationSetEventDestinationEventDestination+pinpointEmailConfigurationSetEventDestinationEventDestination matchingEventTypesarg =+  PinpointEmailConfigurationSetEventDestinationEventDestination+  { _pinpointEmailConfigurationSetEventDestinationEventDestinationCloudWatchDestination = Nothing+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationEnabled = Nothing+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationKinesisFirehoseDestination = Nothing+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationMatchingEventTypes = matchingEventTypesarg+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationPinpointDestination = Nothing+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationSnsDestination = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination-cloudwatchdestination+pecsededCloudWatchDestination :: Lens' PinpointEmailConfigurationSetEventDestinationEventDestination (Maybe PinpointEmailConfigurationSetEventDestinationCloudWatchDestination)+pecsededCloudWatchDestination = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationCloudWatchDestination (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationCloudWatchDestination = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination-enabled+pecsededEnabled :: Lens' PinpointEmailConfigurationSetEventDestinationEventDestination (Maybe (Val Bool))+pecsededEnabled = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationEnabled (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination-kinesisfirehosedestination+pecsededKinesisFirehoseDestination :: Lens' PinpointEmailConfigurationSetEventDestinationEventDestination (Maybe PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination)+pecsededKinesisFirehoseDestination = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationKinesisFirehoseDestination (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationKinesisFirehoseDestination = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination-matchingeventtypes+pecsededMatchingEventTypes :: Lens' PinpointEmailConfigurationSetEventDestinationEventDestination (ValList Text)+pecsededMatchingEventTypes = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationMatchingEventTypes (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationMatchingEventTypes = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination-pinpointdestination+pecsededPinpointDestination :: Lens' PinpointEmailConfigurationSetEventDestinationEventDestination (Maybe PinpointEmailConfigurationSetEventDestinationPinpointDestination)+pecsededPinpointDestination = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationPinpointDestination (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationPinpointDestination = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-eventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination-snsdestination+pecsededSnsDestination :: Lens' PinpointEmailConfigurationSetEventDestinationEventDestination (Maybe PinpointEmailConfigurationSetEventDestinationSnsDestination)+pecsededSnsDestination = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationSnsDestination (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationSnsDestination = a })

@@ -0,0 +1,51 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-kinesisfirehosedestination.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination.+-- See+-- 'pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination'+-- for a more convenient constructor.+data PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination =+  PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+  { _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationDeliveryStreamArn :: Val Text+  , _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationIamRoleArn :: Val Text+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination where+  toJSON PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination{..} =+    object $+    catMaybes+    [ (Just . ("DeliveryStreamArn",) . toJSON) _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationDeliveryStreamArn+    , (Just . ("IamRoleArn",) . toJSON) _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationIamRoleArn+    ]++-- | Constructor for+-- 'PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination'+-- containing required fields as arguments.+pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+  :: Val Text -- ^ 'pecsedkfdDeliveryStreamArn'+  -> Val Text -- ^ 'pecsedkfdIamRoleArn'+  -> PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination deliveryStreamArnarg iamRoleArnarg =+  PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+  { _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationDeliveryStreamArn = deliveryStreamArnarg+  , _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationIamRoleArn = iamRoleArnarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-kinesisfirehosedestination.html#cfn-pinpointemail-configurationseteventdestination-kinesisfirehosedestination-deliverystreamarn+pecsedkfdDeliveryStreamArn :: Lens' PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination (Val Text)+pecsedkfdDeliveryStreamArn = lens _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationDeliveryStreamArn (\s a -> s { _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationDeliveryStreamArn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-kinesisfirehosedestination.html#cfn-pinpointemail-configurationseteventdestination-kinesisfirehosedestination-iamrolearn+pecsedkfdIamRoleArn :: Lens' PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination (Val Text)+pecsedkfdIamRoleArn = lens _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationIamRoleArn (\s a -> s { _pinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestinationIamRoleArn = a })

@@ -0,0 +1,41 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-pinpointdestination.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationPinpointDestination where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestinationPinpointDestination. See+-- 'pinpointEmailConfigurationSetEventDestinationPinpointDestination' for a+-- more convenient constructor.+data PinpointEmailConfigurationSetEventDestinationPinpointDestination =+  PinpointEmailConfigurationSetEventDestinationPinpointDestination+  { _pinpointEmailConfigurationSetEventDestinationPinpointDestinationApplicationArn :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetEventDestinationPinpointDestination where+  toJSON PinpointEmailConfigurationSetEventDestinationPinpointDestination{..} =+    object $+    catMaybes+    [ fmap (("ApplicationArn",) . toJSON) _pinpointEmailConfigurationSetEventDestinationPinpointDestinationApplicationArn+    ]++-- | Constructor for+-- 'PinpointEmailConfigurationSetEventDestinationPinpointDestination'+-- containing required fields as arguments.+pinpointEmailConfigurationSetEventDestinationPinpointDestination+  :: PinpointEmailConfigurationSetEventDestinationPinpointDestination+pinpointEmailConfigurationSetEventDestinationPinpointDestination  =+  PinpointEmailConfigurationSetEventDestinationPinpointDestination+  { _pinpointEmailConfigurationSetEventDestinationPinpointDestinationApplicationArn = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-pinpointdestination.html#cfn-pinpointemail-configurationseteventdestination-pinpointdestination-applicationarn+pecsedpdApplicationArn :: Lens' PinpointEmailConfigurationSetEventDestinationPinpointDestination (Maybe (Val Text))+pecsedpdApplicationArn = lens _pinpointEmailConfigurationSetEventDestinationPinpointDestinationApplicationArn (\s a -> s { _pinpointEmailConfigurationSetEventDestinationPinpointDestinationApplicationArn = a })

@@ -0,0 +1,42 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-snsdestination.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationSnsDestination where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestinationSnsDestination. See+-- 'pinpointEmailConfigurationSetEventDestinationSnsDestination' for a more+-- convenient constructor.+data PinpointEmailConfigurationSetEventDestinationSnsDestination =+  PinpointEmailConfigurationSetEventDestinationSnsDestination+  { _pinpointEmailConfigurationSetEventDestinationSnsDestinationTopicArn :: Val Text+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetEventDestinationSnsDestination where+  toJSON PinpointEmailConfigurationSetEventDestinationSnsDestination{..} =+    object $+    catMaybes+    [ (Just . ("TopicArn",) . toJSON) _pinpointEmailConfigurationSetEventDestinationSnsDestinationTopicArn+    ]++-- | Constructor for+-- 'PinpointEmailConfigurationSetEventDestinationSnsDestination' containing+-- required fields as arguments.+pinpointEmailConfigurationSetEventDestinationSnsDestination+  :: Val Text -- ^ 'pecsedsdTopicArn'+  -> PinpointEmailConfigurationSetEventDestinationSnsDestination+pinpointEmailConfigurationSetEventDestinationSnsDestination topicArnarg =+  PinpointEmailConfigurationSetEventDestinationSnsDestination+  { _pinpointEmailConfigurationSetEventDestinationSnsDestinationTopicArn = topicArnarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationseteventdestination-snsdestination.html#cfn-pinpointemail-configurationseteventdestination-snsdestination-topicarn+pecsedsdTopicArn :: Lens' PinpointEmailConfigurationSetEventDestinationSnsDestination (Val Text)+pecsedsdTopicArn = lens _pinpointEmailConfigurationSetEventDestinationSnsDestinationTopicArn (\s a -> s { _pinpointEmailConfigurationSetEventDestinationSnsDestinationTopicArn = a })

@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-reputationoptions.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetReputationOptions where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetReputationOptions. See+-- 'pinpointEmailConfigurationSetReputationOptions' for a more convenient+-- constructor.+data PinpointEmailConfigurationSetReputationOptions =+  PinpointEmailConfigurationSetReputationOptions+  { _pinpointEmailConfigurationSetReputationOptionsReputationMetricsEnabled :: Maybe (Val Bool)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetReputationOptions where+  toJSON PinpointEmailConfigurationSetReputationOptions{..} =+    object $+    catMaybes+    [ fmap (("ReputationMetricsEnabled",) . toJSON) _pinpointEmailConfigurationSetReputationOptionsReputationMetricsEnabled+    ]++-- | Constructor for 'PinpointEmailConfigurationSetReputationOptions'+-- containing required fields as arguments.+pinpointEmailConfigurationSetReputationOptions+  :: PinpointEmailConfigurationSetReputationOptions+pinpointEmailConfigurationSetReputationOptions  =+  PinpointEmailConfigurationSetReputationOptions+  { _pinpointEmailConfigurationSetReputationOptionsReputationMetricsEnabled = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-reputationoptions.html#cfn-pinpointemail-configurationset-reputationoptions-reputationmetricsenabled+pecsroReputationMetricsEnabled :: Lens' PinpointEmailConfigurationSetReputationOptions (Maybe (Val Bool))+pecsroReputationMetricsEnabled = lens _pinpointEmailConfigurationSetReputationOptionsReputationMetricsEnabled (\s a -> s { _pinpointEmailConfigurationSetReputationOptionsReputationMetricsEnabled = a })

@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-sendingoptions.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetSendingOptions where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetSendingOptions. See+-- 'pinpointEmailConfigurationSetSendingOptions' for a more convenient+-- constructor.+data PinpointEmailConfigurationSetSendingOptions =+  PinpointEmailConfigurationSetSendingOptions+  { _pinpointEmailConfigurationSetSendingOptionsSendingEnabled :: Maybe (Val Bool)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetSendingOptions where+  toJSON PinpointEmailConfigurationSetSendingOptions{..} =+    object $+    catMaybes+    [ fmap (("SendingEnabled",) . toJSON) _pinpointEmailConfigurationSetSendingOptionsSendingEnabled+    ]++-- | Constructor for 'PinpointEmailConfigurationSetSendingOptions' containing+-- required fields as arguments.+pinpointEmailConfigurationSetSendingOptions+  :: PinpointEmailConfigurationSetSendingOptions+pinpointEmailConfigurationSetSendingOptions  =+  PinpointEmailConfigurationSetSendingOptions+  { _pinpointEmailConfigurationSetSendingOptionsSendingEnabled = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-sendingoptions.html#cfn-pinpointemail-configurationset-sendingoptions-sendingenabled+pecssoSendingEnabled :: Lens' PinpointEmailConfigurationSetSendingOptions (Maybe (Val Bool))+pecssoSendingEnabled = lens _pinpointEmailConfigurationSetSendingOptionsSendingEnabled (\s a -> s { _pinpointEmailConfigurationSetSendingOptionsSendingEnabled = a })

@@ -0,0 +1,45 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-tags.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTags where++import Stratosphere.ResourceImports+++-- | Full data type definition for PinpointEmailConfigurationSetTags. See+-- 'pinpointEmailConfigurationSetTags' for a more convenient constructor.+data PinpointEmailConfigurationSetTags =+  PinpointEmailConfigurationSetTags+  { _pinpointEmailConfigurationSetTagsKey :: Maybe (Val Text)+  , _pinpointEmailConfigurationSetTagsValue :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetTags where+  toJSON PinpointEmailConfigurationSetTags{..} =+    object $+    catMaybes+    [ fmap (("Key",) . toJSON) _pinpointEmailConfigurationSetTagsKey+    , fmap (("Value",) . toJSON) _pinpointEmailConfigurationSetTagsValue+    ]++-- | Constructor for 'PinpointEmailConfigurationSetTags' containing required+-- fields as arguments.+pinpointEmailConfigurationSetTags+  :: PinpointEmailConfigurationSetTags+pinpointEmailConfigurationSetTags  =+  PinpointEmailConfigurationSetTags+  { _pinpointEmailConfigurationSetTagsKey = Nothing+  , _pinpointEmailConfigurationSetTagsValue = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-tags.html#cfn-pinpointemail-configurationset-tags-key+pecstKey :: Lens' PinpointEmailConfigurationSetTags (Maybe (Val Text))+pecstKey = lens _pinpointEmailConfigurationSetTagsKey (\s a -> s { _pinpointEmailConfigurationSetTagsKey = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-tags.html#cfn-pinpointemail-configurationset-tags-value+pecstValue :: Lens' PinpointEmailConfigurationSetTags (Maybe (Val Text))+pecstValue = lens _pinpointEmailConfigurationSetTagsValue (\s a -> s { _pinpointEmailConfigurationSetTagsValue = a })

@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-trackingoptions.html++module Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTrackingOptions where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- PinpointEmailConfigurationSetTrackingOptions. See+-- 'pinpointEmailConfigurationSetTrackingOptions' for a more convenient+-- constructor.+data PinpointEmailConfigurationSetTrackingOptions =+  PinpointEmailConfigurationSetTrackingOptions+  { _pinpointEmailConfigurationSetTrackingOptionsCustomRedirectDomain :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailConfigurationSetTrackingOptions where+  toJSON PinpointEmailConfigurationSetTrackingOptions{..} =+    object $+    catMaybes+    [ fmap (("CustomRedirectDomain",) . toJSON) _pinpointEmailConfigurationSetTrackingOptionsCustomRedirectDomain+    ]++-- | Constructor for 'PinpointEmailConfigurationSetTrackingOptions' containing+-- required fields as arguments.+pinpointEmailConfigurationSetTrackingOptions+  :: PinpointEmailConfigurationSetTrackingOptions+pinpointEmailConfigurationSetTrackingOptions  =+  PinpointEmailConfigurationSetTrackingOptions+  { _pinpointEmailConfigurationSetTrackingOptionsCustomRedirectDomain = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-configurationset-trackingoptions.html#cfn-pinpointemail-configurationset-trackingoptions-customredirectdomain+pecstoCustomRedirectDomain :: Lens' PinpointEmailConfigurationSetTrackingOptions (Maybe (Val Text))+pecstoCustomRedirectDomain = lens _pinpointEmailConfigurationSetTrackingOptionsCustomRedirectDomain (\s a -> s { _pinpointEmailConfigurationSetTrackingOptionsCustomRedirectDomain = a })

@@ -0,0 +1,45 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-dedicatedippool-tags.html++module Stratosphere.ResourceProperties.PinpointEmailDedicatedIpPoolTags where++import Stratosphere.ResourceImports+++-- | Full data type definition for PinpointEmailDedicatedIpPoolTags. See+-- 'pinpointEmailDedicatedIpPoolTags' for a more convenient constructor.+data PinpointEmailDedicatedIpPoolTags =+  PinpointEmailDedicatedIpPoolTags+  { _pinpointEmailDedicatedIpPoolTagsKey :: Maybe (Val Text)+  , _pinpointEmailDedicatedIpPoolTagsValue :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailDedicatedIpPoolTags where+  toJSON PinpointEmailDedicatedIpPoolTags{..} =+    object $+    catMaybes+    [ fmap (("Key",) . toJSON) _pinpointEmailDedicatedIpPoolTagsKey+    , fmap (("Value",) . toJSON) _pinpointEmailDedicatedIpPoolTagsValue+    ]++-- | Constructor for 'PinpointEmailDedicatedIpPoolTags' containing required+-- fields as arguments.+pinpointEmailDedicatedIpPoolTags+  :: PinpointEmailDedicatedIpPoolTags+pinpointEmailDedicatedIpPoolTags  =+  PinpointEmailDedicatedIpPoolTags+  { _pinpointEmailDedicatedIpPoolTagsKey = Nothing+  , _pinpointEmailDedicatedIpPoolTagsValue = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-dedicatedippool-tags.html#cfn-pinpointemail-dedicatedippool-tags-key+pediptKey :: Lens' PinpointEmailDedicatedIpPoolTags (Maybe (Val Text))+pediptKey = lens _pinpointEmailDedicatedIpPoolTagsKey (\s a -> s { _pinpointEmailDedicatedIpPoolTagsKey = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-dedicatedippool-tags.html#cfn-pinpointemail-dedicatedippool-tags-value+pediptValue :: Lens' PinpointEmailDedicatedIpPoolTags (Maybe (Val Text))+pediptValue = lens _pinpointEmailDedicatedIpPoolTagsValue (\s a -> s { _pinpointEmailDedicatedIpPoolTagsValue = a })

@@ -0,0 +1,46 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-identity-mailfromattributes.html++module Stratosphere.ResourceProperties.PinpointEmailIdentityMailFromAttributes where++import Stratosphere.ResourceImports+++-- | Full data type definition for PinpointEmailIdentityMailFromAttributes.+-- See 'pinpointEmailIdentityMailFromAttributes' for a more convenient+-- constructor.+data PinpointEmailIdentityMailFromAttributes =+  PinpointEmailIdentityMailFromAttributes+  { _pinpointEmailIdentityMailFromAttributesBehaviorOnMxFailure :: Maybe (Val Text)+  , _pinpointEmailIdentityMailFromAttributesMailFromDomain :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailIdentityMailFromAttributes where+  toJSON PinpointEmailIdentityMailFromAttributes{..} =+    object $+    catMaybes+    [ fmap (("BehaviorOnMxFailure",) . toJSON) _pinpointEmailIdentityMailFromAttributesBehaviorOnMxFailure+    , fmap (("MailFromDomain",) . toJSON) _pinpointEmailIdentityMailFromAttributesMailFromDomain+    ]++-- | Constructor for 'PinpointEmailIdentityMailFromAttributes' containing+-- required fields as arguments.+pinpointEmailIdentityMailFromAttributes+  :: PinpointEmailIdentityMailFromAttributes+pinpointEmailIdentityMailFromAttributes  =+  PinpointEmailIdentityMailFromAttributes+  { _pinpointEmailIdentityMailFromAttributesBehaviorOnMxFailure = Nothing+  , _pinpointEmailIdentityMailFromAttributesMailFromDomain = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-identity-mailfromattributes.html#cfn-pinpointemail-identity-mailfromattributes-behavioronmxfailure+peimfaBehaviorOnMxFailure :: Lens' PinpointEmailIdentityMailFromAttributes (Maybe (Val Text))+peimfaBehaviorOnMxFailure = lens _pinpointEmailIdentityMailFromAttributesBehaviorOnMxFailure (\s a -> s { _pinpointEmailIdentityMailFromAttributesBehaviorOnMxFailure = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-identity-mailfromattributes.html#cfn-pinpointemail-identity-mailfromattributes-mailfromdomain+peimfaMailFromDomain :: Lens' PinpointEmailIdentityMailFromAttributes (Maybe (Val Text))+peimfaMailFromDomain = lens _pinpointEmailIdentityMailFromAttributesMailFromDomain (\s a -> s { _pinpointEmailIdentityMailFromAttributesMailFromDomain = a })

@@ -0,0 +1,45 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-identity-tags.html++module Stratosphere.ResourceProperties.PinpointEmailIdentityTags where++import Stratosphere.ResourceImports+++-- | Full data type definition for PinpointEmailIdentityTags. See+-- 'pinpointEmailIdentityTags' for a more convenient constructor.+data PinpointEmailIdentityTags =+  PinpointEmailIdentityTags+  { _pinpointEmailIdentityTagsKey :: Maybe (Val Text)+  , _pinpointEmailIdentityTagsValue :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON PinpointEmailIdentityTags where+  toJSON PinpointEmailIdentityTags{..} =+    object $+    catMaybes+    [ fmap (("Key",) . toJSON) _pinpointEmailIdentityTagsKey+    , fmap (("Value",) . toJSON) _pinpointEmailIdentityTagsValue+    ]++-- | Constructor for 'PinpointEmailIdentityTags' containing required fields as+-- arguments.+pinpointEmailIdentityTags+  :: PinpointEmailIdentityTags+pinpointEmailIdentityTags  =+  PinpointEmailIdentityTags+  { _pinpointEmailIdentityTagsKey = Nothing+  , _pinpointEmailIdentityTagsValue = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-identity-tags.html#cfn-pinpointemail-identity-tags-key+peitKey :: Lens' PinpointEmailIdentityTags (Maybe (Val Text))+peitKey = lens _pinpointEmailIdentityTagsKey (\s a -> s { _pinpointEmailIdentityTagsKey = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpointemail-identity-tags.html#cfn-pinpointemail-identity-tags-value+peitValue :: Lens' PinpointEmailIdentityTags (Maybe (Val Text))+peitValue = lens _pinpointEmailIdentityTagsValue (\s a -> s { _pinpointEmailIdentityTagsValue = a })

@@ -17,6 +17,7 @@ data ServiceCatalogCloudFormationProductProvisioningArtifactProperties =   ServiceCatalogCloudFormationProductProvisioningArtifactProperties   { _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDescription :: Maybe (Val Text)+  , _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDisableTemplateValidation :: Maybe (Val Bool)   , _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesInfo :: Object   , _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesName :: Maybe (Val Text)   } deriving (Show, Eq)@@ -26,6 +27,7 @@     object $     catMaybes     [ fmap (("Description",) . toJSON) _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDescription+    , fmap (("DisableTemplateValidation",) . toJSON) _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDisableTemplateValidation     , (Just . ("Info",) . toJSON) _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesInfo     , fmap (("Name",) . toJSON) _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesName     ]@@ -39,6 +41,7 @@ serviceCatalogCloudFormationProductProvisioningArtifactProperties infoarg =   ServiceCatalogCloudFormationProductProvisioningArtifactProperties   { _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDescription = Nothing+  , _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDisableTemplateValidation = Nothing   , _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesInfo = infoarg   , _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesName = Nothing   }@@ -46,6 +49,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-servicecatalog-cloudformationproduct-provisioningartifactproperties.html#cfn-servicecatalog-cloudformationproduct-provisioningartifactproperties-description sccfppapDescription :: Lens' ServiceCatalogCloudFormationProductProvisioningArtifactProperties (Maybe (Val Text)) sccfppapDescription = lens _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDescription (\s a -> s { _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDescription = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-servicecatalog-cloudformationproduct-provisioningartifactproperties.html#cfn-servicecatalog-cloudformationproduct-provisioningartifactproperties-disabletemplatevalidation+sccfppapDisableTemplateValidation :: Lens' ServiceCatalogCloudFormationProductProvisioningArtifactProperties (Maybe (Val Bool))+sccfppapDisableTemplateValidation = lens _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDisableTemplateValidation (\s a -> s { _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesDisableTemplateValidation = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-servicecatalog-cloudformationproduct-provisioningartifactproperties.html#cfn-servicecatalog-cloudformationproduct-provisioningartifactproperties-info sccfppapInfo :: Lens' ServiceCatalogCloudFormationProductProvisioningArtifactProperties Object

@@ -0,0 +1,39 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-transfer-server-endpointdetails.html++module Stratosphere.ResourceProperties.TransferServerEndpointDetails where++import Stratosphere.ResourceImports+++-- | Full data type definition for TransferServerEndpointDetails. See+-- 'transferServerEndpointDetails' for a more convenient constructor.+data TransferServerEndpointDetails =+  TransferServerEndpointDetails+  { _transferServerEndpointDetailsVpcEndpointId :: Val Text+  } deriving (Show, Eq)++instance ToJSON TransferServerEndpointDetails where+  toJSON TransferServerEndpointDetails{..} =+    object $+    catMaybes+    [ (Just . ("VpcEndpointId",) . toJSON) _transferServerEndpointDetailsVpcEndpointId+    ]++-- | Constructor for 'TransferServerEndpointDetails' containing required+-- fields as arguments.+transferServerEndpointDetails+  :: Val Text -- ^ 'tsedVpcEndpointId'+  -> TransferServerEndpointDetails+transferServerEndpointDetails vpcEndpointIdarg =+  TransferServerEndpointDetails+  { _transferServerEndpointDetailsVpcEndpointId = vpcEndpointIdarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-transfer-server-endpointdetails.html#cfn-transfer-server-endpointdetails-vpcendpointid+tsedVpcEndpointId :: Lens' TransferServerEndpointDetails (Val Text)+tsedVpcEndpointId = lens _transferServerEndpointDetailsVpcEndpointId (\s a -> s { _transferServerEndpointDetailsVpcEndpointId = a })

@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-transfer-server-identityproviderdetails.html++module Stratosphere.ResourceProperties.TransferServerIdentityProviderDetails where++import Stratosphere.ResourceImports+++-- | Full data type definition for TransferServerIdentityProviderDetails. See+-- 'transferServerIdentityProviderDetails' for a more convenient+-- constructor.+data TransferServerIdentityProviderDetails =+  TransferServerIdentityProviderDetails+  { _transferServerIdentityProviderDetailsInvocationRole :: Val Text+  , _transferServerIdentityProviderDetailsUrl :: Val Text+  } deriving (Show, Eq)++instance ToJSON TransferServerIdentityProviderDetails where+  toJSON TransferServerIdentityProviderDetails{..} =+    object $+    catMaybes+    [ (Just . ("InvocationRole",) . toJSON) _transferServerIdentityProviderDetailsInvocationRole+    , (Just . ("Url",) . toJSON) _transferServerIdentityProviderDetailsUrl+    ]++-- | Constructor for 'TransferServerIdentityProviderDetails' containing+-- required fields as arguments.+transferServerIdentityProviderDetails+  :: Val Text -- ^ 'tsipdInvocationRole'+  -> Val Text -- ^ 'tsipdUrl'+  -> TransferServerIdentityProviderDetails+transferServerIdentityProviderDetails invocationRolearg urlarg =+  TransferServerIdentityProviderDetails+  { _transferServerIdentityProviderDetailsInvocationRole = invocationRolearg+  , _transferServerIdentityProviderDetailsUrl = urlarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-transfer-server-identityproviderdetails.html#cfn-transfer-server-identityproviderdetails-invocationrole+tsipdInvocationRole :: Lens' TransferServerIdentityProviderDetails (Val Text)+tsipdInvocationRole = lens _transferServerIdentityProviderDetailsInvocationRole (\s a -> s { _transferServerIdentityProviderDetailsInvocationRole = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-transfer-server-identityproviderdetails.html#cfn-transfer-server-identityproviderdetails-url+tsipdUrl :: Lens' TransferServerIdentityProviderDetails (Val Text)+tsipdUrl = lens _transferServerIdentityProviderDetailsUrl (\s a -> s { _transferServerIdentityProviderDetailsUrl = a })

@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-geomatchset-geomatchconstraint.html++module Stratosphere.ResourceProperties.WAFRegionalGeoMatchSetGeoMatchConstraint where++import Stratosphere.ResourceImports+++-- | Full data type definition for WAFRegionalGeoMatchSetGeoMatchConstraint.+-- See 'wafRegionalGeoMatchSetGeoMatchConstraint' for a more convenient+-- constructor.+data WAFRegionalGeoMatchSetGeoMatchConstraint =+  WAFRegionalGeoMatchSetGeoMatchConstraint+  { _wAFRegionalGeoMatchSetGeoMatchConstraintType :: Val Text+  , _wAFRegionalGeoMatchSetGeoMatchConstraintValue :: Val Text+  } deriving (Show, Eq)++instance ToJSON WAFRegionalGeoMatchSetGeoMatchConstraint where+  toJSON WAFRegionalGeoMatchSetGeoMatchConstraint{..} =+    object $+    catMaybes+    [ (Just . ("Type",) . toJSON) _wAFRegionalGeoMatchSetGeoMatchConstraintType+    , (Just . ("Value",) . toJSON) _wAFRegionalGeoMatchSetGeoMatchConstraintValue+    ]++-- | Constructor for 'WAFRegionalGeoMatchSetGeoMatchConstraint' containing+-- required fields as arguments.+wafRegionalGeoMatchSetGeoMatchConstraint+  :: Val Text -- ^ 'wafrgmsgmcType'+  -> Val Text -- ^ 'wafrgmsgmcValue'+  -> WAFRegionalGeoMatchSetGeoMatchConstraint+wafRegionalGeoMatchSetGeoMatchConstraint typearg valuearg =+  WAFRegionalGeoMatchSetGeoMatchConstraint+  { _wAFRegionalGeoMatchSetGeoMatchConstraintType = typearg+  , _wAFRegionalGeoMatchSetGeoMatchConstraintValue = valuearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-geomatchset-geomatchconstraint.html#cfn-wafregional-geomatchset-geomatchconstraint-type+wafrgmsgmcType :: Lens' WAFRegionalGeoMatchSetGeoMatchConstraint (Val Text)+wafrgmsgmcType = lens _wAFRegionalGeoMatchSetGeoMatchConstraintType (\s a -> s { _wAFRegionalGeoMatchSetGeoMatchConstraintType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-geomatchset-geomatchconstraint.html#cfn-wafregional-geomatchset-geomatchconstraint-value+wafrgmsgmcValue :: Lens' WAFRegionalGeoMatchSetGeoMatchConstraint (Val Text)+wafrgmsgmcValue = lens _wAFRegionalGeoMatchSetGeoMatchConstraintValue (\s a -> s { _wAFRegionalGeoMatchSetGeoMatchConstraintValue = a })

@@ -0,0 +1,55 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-ratebasedrule-predicate.html++module Stratosphere.ResourceProperties.WAFRegionalRateBasedRulePredicate where++import Stratosphere.ResourceImports+++-- | Full data type definition for WAFRegionalRateBasedRulePredicate. See+-- 'wafRegionalRateBasedRulePredicate' for a more convenient constructor.+data WAFRegionalRateBasedRulePredicate =+  WAFRegionalRateBasedRulePredicate+  { _wAFRegionalRateBasedRulePredicateDataId :: Val Text+  , _wAFRegionalRateBasedRulePredicateNegated :: Val Bool+  , _wAFRegionalRateBasedRulePredicateType :: Val Text+  } deriving (Show, Eq)++instance ToJSON WAFRegionalRateBasedRulePredicate where+  toJSON WAFRegionalRateBasedRulePredicate{..} =+    object $+    catMaybes+    [ (Just . ("DataId",) . toJSON) _wAFRegionalRateBasedRulePredicateDataId+    , (Just . ("Negated",) . toJSON) _wAFRegionalRateBasedRulePredicateNegated+    , (Just . ("Type",) . toJSON) _wAFRegionalRateBasedRulePredicateType+    ]++-- | Constructor for 'WAFRegionalRateBasedRulePredicate' containing required+-- fields as arguments.+wafRegionalRateBasedRulePredicate+  :: Val Text -- ^ 'wafrrbrpDataId'+  -> Val Bool -- ^ 'wafrrbrpNegated'+  -> Val Text -- ^ 'wafrrbrpType'+  -> WAFRegionalRateBasedRulePredicate+wafRegionalRateBasedRulePredicate dataIdarg negatedarg typearg =+  WAFRegionalRateBasedRulePredicate+  { _wAFRegionalRateBasedRulePredicateDataId = dataIdarg+  , _wAFRegionalRateBasedRulePredicateNegated = negatedarg+  , _wAFRegionalRateBasedRulePredicateType = typearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-ratebasedrule-predicate.html#cfn-wafregional-ratebasedrule-predicate-dataid+wafrrbrpDataId :: Lens' WAFRegionalRateBasedRulePredicate (Val Text)+wafrrbrpDataId = lens _wAFRegionalRateBasedRulePredicateDataId (\s a -> s { _wAFRegionalRateBasedRulePredicateDataId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-ratebasedrule-predicate.html#cfn-wafregional-ratebasedrule-predicate-negated+wafrrbrpNegated :: Lens' WAFRegionalRateBasedRulePredicate (Val Bool)+wafrrbrpNegated = lens _wAFRegionalRateBasedRulePredicateNegated (\s a -> s { _wAFRegionalRateBasedRulePredicateNegated = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafregional-ratebasedrule-predicate.html#cfn-wafregional-ratebasedrule-predicate-type+wafrrbrpType :: Lens' WAFRegionalRateBasedRulePredicate (Val Text)+wafrrbrpType = lens _wAFRegionalRateBasedRulePredicateType (\s a -> s { _wAFRegionalRateBasedRulePredicateType = a })

@@ -159,6 +159,7 @@ import Stratosphere.Resources.DocDBDBInstance as X import Stratosphere.Resources.DocDBDBSubnetGroup as X import Stratosphere.Resources.DynamoDBTable as X+import Stratosphere.Resources.EC2CapacityReservation as X import Stratosphere.Resources.EC2CustomerGateway as X import Stratosphere.Resources.EC2DHCPOptions as X import Stratosphere.Resources.EC2EC2Fleet as X@@ -245,10 +246,12 @@ import Stratosphere.Resources.GlueClassifier as X import Stratosphere.Resources.GlueConnection as X import Stratosphere.Resources.GlueCrawler as X+import Stratosphere.Resources.GlueDataCatalogEncryptionSettings as X import Stratosphere.Resources.GlueDatabase as X import Stratosphere.Resources.GlueDevEndpoint as X import Stratosphere.Resources.GlueJob as X import Stratosphere.Resources.GluePartition as X+import Stratosphere.Resources.GlueSecurityConfiguration as X import Stratosphere.Resources.GlueTable as X import Stratosphere.Resources.GlueTrigger as X import Stratosphere.Resources.GreengrassConnectorDefinition as X@@ -322,6 +325,7 @@ import Stratosphere.Resources.LogsLogStream as X import Stratosphere.Resources.LogsMetricFilter as X import Stratosphere.Resources.LogsSubscriptionFilter as X+import Stratosphere.Resources.MediaStoreContainer as X import Stratosphere.Resources.NeptuneDBCluster as X import Stratosphere.Resources.NeptuneDBClusterParameterGroup as X import Stratosphere.Resources.NeptuneDBInstance as X@@ -335,6 +339,10 @@ import Stratosphere.Resources.OpsWorksUserProfile as X import Stratosphere.Resources.OpsWorksVolume as X import Stratosphere.Resources.OpsWorksCMServer as X+import Stratosphere.Resources.PinpointEmailConfigurationSet as X+import Stratosphere.Resources.PinpointEmailConfigurationSetEventDestination as X+import Stratosphere.Resources.PinpointEmailDedicatedIpPool as X+import Stratosphere.Resources.PinpointEmailIdentity as X import Stratosphere.Resources.RAMResourceShare as X import Stratosphere.Resources.RDSDBCluster as X import Stratosphere.Resources.RDSDBClusterParameterGroup as X@@ -403,6 +411,7 @@ import Stratosphere.Resources.ServiceCatalogPortfolioPrincipalAssociation as X import Stratosphere.Resources.ServiceCatalogPortfolioProductAssociation as X import Stratosphere.Resources.ServiceCatalogPortfolioShare as X+import Stratosphere.Resources.ServiceCatalogResourceUpdateConstraint as X import Stratosphere.Resources.ServiceCatalogTagOption as X import Stratosphere.Resources.ServiceCatalogTagOptionAssociation as X import Stratosphere.Resources.ServiceDiscoveryHttpNamespace as X@@ -412,6 +421,8 @@ import Stratosphere.Resources.ServiceDiscoveryService as X import Stratosphere.Resources.StepFunctionsActivity as X import Stratosphere.Resources.StepFunctionsStateMachine as X+import Stratosphere.Resources.TransferServer as X+import Stratosphere.Resources.TransferUser as X import Stratosphere.Resources.WAFByteMatchSet as X import Stratosphere.Resources.WAFIPSet as X import Stratosphere.Resources.WAFRule as X@@ -420,7 +431,10 @@ import Stratosphere.Resources.WAFWebACL as X import Stratosphere.Resources.WAFXssMatchSet as X import Stratosphere.Resources.WAFRegionalByteMatchSet as X+import Stratosphere.Resources.WAFRegionalGeoMatchSet as X import Stratosphere.Resources.WAFRegionalIPSet as X+import Stratosphere.Resources.WAFRegionalRateBasedRule as X+import Stratosphere.Resources.WAFRegionalRegexPatternSet as X import Stratosphere.Resources.WAFRegionalRule as X import Stratosphere.Resources.WAFRegionalSizeConstraintSet as X import Stratosphere.Resources.WAFRegionalSqlInjectionMatchSet as X@@ -509,6 +523,8 @@ import Stratosphere.ResourceProperties.AppSyncDataSourceLambdaConfig as X import Stratosphere.ResourceProperties.AppSyncDataSourceRdsHttpEndpointConfig as X import Stratosphere.ResourceProperties.AppSyncDataSourceRelationalDatabaseConfig as X+import Stratosphere.ResourceProperties.AppSyncGraphQLApiAdditionalAuthenticationProvider as X+import Stratosphere.ResourceProperties.AppSyncGraphQLApiCognitoUserPoolConfig as X import Stratosphere.ResourceProperties.AppSyncGraphQLApiLogConfig as X import Stratosphere.ResourceProperties.AppSyncGraphQLApiOpenIDConnectConfig as X import Stratosphere.ResourceProperties.AppSyncGraphQLApiUserPoolConfig as X@@ -602,6 +618,7 @@ import Stratosphere.ResourceProperties.CodeBuildProjectGitSubmodulesConfig as X import Stratosphere.ResourceProperties.CodeBuildProjectLogsConfig as X import Stratosphere.ResourceProperties.CodeBuildProjectProjectCache as X+import Stratosphere.ResourceProperties.CodeBuildProjectProjectSourceVersion as X import Stratosphere.ResourceProperties.CodeBuildProjectProjectTriggers as X import Stratosphere.ResourceProperties.CodeBuildProjectRegistryCredential as X import Stratosphere.ResourceProperties.CodeBuildProjectS3LogsConfig as X@@ -609,7 +626,9 @@ import Stratosphere.ResourceProperties.CodeBuildProjectSourceAuth as X import Stratosphere.ResourceProperties.CodeBuildProjectVpcConfig as X import Stratosphere.ResourceProperties.CodeBuildProjectWebhookFilter as X+import Stratosphere.ResourceProperties.CodeCommitRepositoryCode as X import Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger as X+import Stratosphere.ResourceProperties.CodeCommitRepositoryS3 as X import Stratosphere.ResourceProperties.CodeDeployDeploymentConfigMinimumHealthyHosts as X import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarm as X import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarmConfiguration as X@@ -697,6 +716,7 @@ import Stratosphere.ResourceProperties.DynamoDBTableSSESpecification as X import Stratosphere.ResourceProperties.DynamoDBTableStreamSpecification as X import Stratosphere.ResourceProperties.DynamoDBTableTimeToLiveSpecification as X+import Stratosphere.ResourceProperties.EC2CapacityReservationTagSpecification as X import Stratosphere.ResourceProperties.EC2EC2FleetFleetLaunchTemplateConfigRequest as X import Stratosphere.ResourceProperties.EC2EC2FleetFleetLaunchTemplateOverridesRequest as X import Stratosphere.ResourceProperties.EC2EC2FleetFleetLaunchTemplateSpecificationRequest as X@@ -775,6 +795,7 @@ import Stratosphere.ResourceProperties.ECSServicePlacementStrategy as X import Stratosphere.ResourceProperties.ECSServiceServiceRegistry as X import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDefinition as X+import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency as X import Stratosphere.ResourceProperties.ECSTaskDefinitionDevice as X import Stratosphere.ResourceProperties.ECSTaskDefinitionDockerVolumeConfiguration as X import Stratosphere.ResourceProperties.ECSTaskDefinitionHealthCheck as X@@ -786,6 +807,7 @@ import Stratosphere.ResourceProperties.ECSTaskDefinitionLogConfiguration as X import Stratosphere.ResourceProperties.ECSTaskDefinitionMountPoint as X import Stratosphere.ResourceProperties.ECSTaskDefinitionPortMapping as X+import Stratosphere.ResourceProperties.ECSTaskDefinitionProxyConfiguration as X import Stratosphere.ResourceProperties.ECSTaskDefinitionRepositoryCredentials as X import Stratosphere.ResourceProperties.ECSTaskDefinitionTaskDefinitionPlacementConstraint as X import Stratosphere.ResourceProperties.ECSTaskDefinitionTmpfs as X@@ -896,6 +918,7 @@ import Stratosphere.ResourceProperties.GameLiftAliasRoutingStrategy as X import Stratosphere.ResourceProperties.GameLiftBuildS3Location as X import Stratosphere.ResourceProperties.GameLiftFleetIpPermission as X+import Stratosphere.ResourceProperties.GlueClassifierCsvClassifier as X import Stratosphere.ResourceProperties.GlueClassifierGrokClassifier as X import Stratosphere.ResourceProperties.GlueClassifierJsonClassifier as X import Stratosphere.ResourceProperties.GlueClassifierXMLClassifier as X@@ -906,6 +929,9 @@ import Stratosphere.ResourceProperties.GlueCrawlerSchedule as X import Stratosphere.ResourceProperties.GlueCrawlerSchemaChangePolicy as X import Stratosphere.ResourceProperties.GlueCrawlerTargets as X+import Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption as X+import Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings as X+import Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsEncryptionAtRest as X import Stratosphere.ResourceProperties.GlueDatabaseDatabaseInput as X import Stratosphere.ResourceProperties.GlueJobConnectionsList as X import Stratosphere.ResourceProperties.GlueJobExecutionProperty as X@@ -916,6 +942,10 @@ import Stratosphere.ResourceProperties.GluePartitionSerdeInfo as X import Stratosphere.ResourceProperties.GluePartitionSkewedInfo as X import Stratosphere.ResourceProperties.GluePartitionStorageDescriptor as X+import Stratosphere.ResourceProperties.GlueSecurityConfigurationCloudWatchEncryption as X+import Stratosphere.ResourceProperties.GlueSecurityConfigurationEncryptionConfiguration as X+import Stratosphere.ResourceProperties.GlueSecurityConfigurationJobBookmarksEncryption as X+import Stratosphere.ResourceProperties.GlueSecurityConfigurationS3Encryption as X import Stratosphere.ResourceProperties.GlueTableColumn as X import Stratosphere.ResourceProperties.GlueTableOrder as X import Stratosphere.ResourceProperties.GlueTableSerdeInfo as X@@ -1115,6 +1145,7 @@ import Stratosphere.ResourceProperties.LambdaFunctionVpcConfig as X import Stratosphere.ResourceProperties.LambdaLayerVersionContent as X import Stratosphere.ResourceProperties.LogsMetricFilterMetricTransformation as X+import Stratosphere.ResourceProperties.MediaStoreContainerCorsRule as X import Stratosphere.ResourceProperties.OpsWorksAppDataSource as X import Stratosphere.ResourceProperties.OpsWorksAppEnvironmentVariable as X import Stratosphere.ResourceProperties.OpsWorksAppSource as X@@ -1134,6 +1165,20 @@ import Stratosphere.ResourceProperties.OpsWorksStackSource as X import Stratosphere.ResourceProperties.OpsWorksStackStackConfigurationManager as X import Stratosphere.ResourceProperties.OpsWorksCMServerEngineAttribute as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetDeliveryOptions as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetReputationOptions as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetSendingOptions as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTags as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTrackingOptions as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationCloudWatchDestination as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationDimensionConfiguration as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationEventDestination as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationPinpointDestination as X+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationSnsDestination as X+import Stratosphere.ResourceProperties.PinpointEmailDedicatedIpPoolTags as X+import Stratosphere.ResourceProperties.PinpointEmailIdentityMailFromAttributes as X+import Stratosphere.ResourceProperties.PinpointEmailIdentityTags as X import Stratosphere.ResourceProperties.RDSDBClusterScalingConfiguration as X import Stratosphere.ResourceProperties.RDSDBInstanceProcessorFeature as X import Stratosphere.ResourceProperties.RDSDBSecurityGroupIngressProperty as X@@ -1249,6 +1294,8 @@ import Stratosphere.ResourceProperties.ServiceDiscoveryServiceHealthCheckCustomConfig as X import Stratosphere.ResourceProperties.StepFunctionsActivityTagsEntry as X import Stratosphere.ResourceProperties.StepFunctionsStateMachineTagsEntry as X+import Stratosphere.ResourceProperties.TransferServerEndpointDetails as X+import Stratosphere.ResourceProperties.TransferServerIdentityProviderDetails as X import Stratosphere.ResourceProperties.WAFByteMatchSetByteMatchTuple as X import Stratosphere.ResourceProperties.WAFByteMatchSetFieldToMatch as X import Stratosphere.ResourceProperties.WAFIPSetIPSetDescriptor as X@@ -1263,7 +1310,9 @@ import Stratosphere.ResourceProperties.WAFXssMatchSetXssMatchTuple as X import Stratosphere.ResourceProperties.WAFRegionalByteMatchSetByteMatchTuple as X import Stratosphere.ResourceProperties.WAFRegionalByteMatchSetFieldToMatch as X+import Stratosphere.ResourceProperties.WAFRegionalGeoMatchSetGeoMatchConstraint as X import Stratosphere.ResourceProperties.WAFRegionalIPSetIPSetDescriptor as X+import Stratosphere.ResourceProperties.WAFRegionalRateBasedRulePredicate as X import Stratosphere.ResourceProperties.WAFRegionalRulePredicate as X import Stratosphere.ResourceProperties.WAFRegionalSizeConstraintSetFieldToMatch as X import Stratosphere.ResourceProperties.WAFRegionalSizeConstraintSetSizeConstraint as X

@@ -15,10 +15,10 @@ data AppSyncFunctionConfiguration =   AppSyncFunctionConfiguration   { _appSyncFunctionConfigurationApiId :: Val Text-  , _appSyncFunctionConfigurationDataSourceName :: Maybe (Val Text)+  , _appSyncFunctionConfigurationDataSourceName :: Val Text   , _appSyncFunctionConfigurationDescription :: Maybe (Val Text)-  , _appSyncFunctionConfigurationFunctionVersion :: Maybe (Val Text)-  , _appSyncFunctionConfigurationName :: Maybe (Val Text)+  , _appSyncFunctionConfigurationFunctionVersion :: Val Text+  , _appSyncFunctionConfigurationName :: Val Text   , _appSyncFunctionConfigurationRequestMappingTemplate :: Maybe (Val Text)   , _appSyncFunctionConfigurationRequestMappingTemplateS3Location :: Maybe (Val Text)   , _appSyncFunctionConfigurationResponseMappingTemplate :: Maybe (Val Text)@@ -32,10 +32,10 @@     , resourcePropertiesProperties =         hashMapFromList $ catMaybes         [ (Just . ("ApiId",) . toJSON) _appSyncFunctionConfigurationApiId-        , fmap (("DataSourceName",) . toJSON) _appSyncFunctionConfigurationDataSourceName+        , (Just . ("DataSourceName",) . toJSON) _appSyncFunctionConfigurationDataSourceName         , fmap (("Description",) . toJSON) _appSyncFunctionConfigurationDescription-        , fmap (("FunctionVersion",) . toJSON) _appSyncFunctionConfigurationFunctionVersion-        , fmap (("Name",) . toJSON) _appSyncFunctionConfigurationName+        , (Just . ("FunctionVersion",) . toJSON) _appSyncFunctionConfigurationFunctionVersion+        , (Just . ("Name",) . toJSON) _appSyncFunctionConfigurationName         , fmap (("RequestMappingTemplate",) . toJSON) _appSyncFunctionConfigurationRequestMappingTemplate         , fmap (("RequestMappingTemplateS3Location",) . toJSON) _appSyncFunctionConfigurationRequestMappingTemplateS3Location         , fmap (("ResponseMappingTemplate",) . toJSON) _appSyncFunctionConfigurationResponseMappingTemplate@@ -47,14 +47,17 @@ -- as arguments. appSyncFunctionConfiguration   :: Val Text -- ^ 'asfcApiId'+  -> Val Text -- ^ 'asfcDataSourceName'+  -> Val Text -- ^ 'asfcFunctionVersion'+  -> Val Text -- ^ 'asfcName'   -> AppSyncFunctionConfiguration-appSyncFunctionConfiguration apiIdarg =+appSyncFunctionConfiguration apiIdarg dataSourceNamearg functionVersionarg namearg =   AppSyncFunctionConfiguration   { _appSyncFunctionConfigurationApiId = apiIdarg-  , _appSyncFunctionConfigurationDataSourceName = Nothing+  , _appSyncFunctionConfigurationDataSourceName = dataSourceNamearg   , _appSyncFunctionConfigurationDescription = Nothing-  , _appSyncFunctionConfigurationFunctionVersion = Nothing-  , _appSyncFunctionConfigurationName = Nothing+  , _appSyncFunctionConfigurationFunctionVersion = functionVersionarg+  , _appSyncFunctionConfigurationName = namearg   , _appSyncFunctionConfigurationRequestMappingTemplate = Nothing   , _appSyncFunctionConfigurationRequestMappingTemplateS3Location = Nothing   , _appSyncFunctionConfigurationResponseMappingTemplate = Nothing@@ -66,7 +69,7 @@ asfcApiId = lens _appSyncFunctionConfigurationApiId (\s a -> s { _appSyncFunctionConfigurationApiId = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appsync-functionconfiguration.html#cfn-appsync-functionconfiguration-datasourcename-asfcDataSourceName :: Lens' AppSyncFunctionConfiguration (Maybe (Val Text))+asfcDataSourceName :: Lens' AppSyncFunctionConfiguration (Val Text) asfcDataSourceName = lens _appSyncFunctionConfigurationDataSourceName (\s a -> s { _appSyncFunctionConfigurationDataSourceName = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appsync-functionconfiguration.html#cfn-appsync-functionconfiguration-description@@ -74,11 +77,11 @@ asfcDescription = lens _appSyncFunctionConfigurationDescription (\s a -> s { _appSyncFunctionConfigurationDescription = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appsync-functionconfiguration.html#cfn-appsync-functionconfiguration-functionversion-asfcFunctionVersion :: Lens' AppSyncFunctionConfiguration (Maybe (Val Text))+asfcFunctionVersion :: Lens' AppSyncFunctionConfiguration (Val Text) asfcFunctionVersion = lens _appSyncFunctionConfigurationFunctionVersion (\s a -> s { _appSyncFunctionConfigurationFunctionVersion = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appsync-functionconfiguration.html#cfn-appsync-functionconfiguration-name-asfcName :: Lens' AppSyncFunctionConfiguration (Maybe (Val Text))+asfcName :: Lens' AppSyncFunctionConfiguration (Val Text) asfcName = lens _appSyncFunctionConfigurationName (\s a -> s { _appSyncFunctionConfigurationName = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appsync-functionconfiguration.html#cfn-appsync-functionconfiguration-requestmappingtemplate

@@ -12,6 +12,7 @@ import Stratosphere.ResourceProperties.CodeBuildProjectProjectCache import Stratosphere.ResourceProperties.CodeBuildProjectEnvironment import Stratosphere.ResourceProperties.CodeBuildProjectLogsConfig+import Stratosphere.ResourceProperties.CodeBuildProjectProjectSourceVersion import Stratosphere.ResourceProperties.CodeBuildProjectSource import Stratosphere.ResourceProperties.Tag import Stratosphere.ResourceProperties.CodeBuildProjectProjectTriggers@@ -31,9 +32,11 @@   , _codeBuildProjectName :: Maybe (Val Text)   , _codeBuildProjectQueuedTimeoutInMinutes :: Maybe (Val Integer)   , _codeBuildProjectSecondaryArtifacts :: Maybe [CodeBuildProjectArtifacts]+  , _codeBuildProjectSecondarySourceVersions :: Maybe [CodeBuildProjectProjectSourceVersion]   , _codeBuildProjectSecondarySources :: Maybe [CodeBuildProjectSource]   , _codeBuildProjectServiceRole :: Val Text   , _codeBuildProjectSource :: CodeBuildProjectSource+  , _codeBuildProjectSourceVersion :: Maybe (Val Text)   , _codeBuildProjectTags :: Maybe [Tag]   , _codeBuildProjectTimeoutInMinutes :: Maybe (Val Integer)   , _codeBuildProjectTriggers :: Maybe CodeBuildProjectProjectTriggers@@ -56,9 +59,11 @@         , fmap (("Name",) . toJSON) _codeBuildProjectName         , fmap (("QueuedTimeoutInMinutes",) . toJSON) _codeBuildProjectQueuedTimeoutInMinutes         , fmap (("SecondaryArtifacts",) . toJSON) _codeBuildProjectSecondaryArtifacts+        , fmap (("SecondarySourceVersions",) . toJSON) _codeBuildProjectSecondarySourceVersions         , fmap (("SecondarySources",) . toJSON) _codeBuildProjectSecondarySources         , (Just . ("ServiceRole",) . toJSON) _codeBuildProjectServiceRole         , (Just . ("Source",) . toJSON) _codeBuildProjectSource+        , fmap (("SourceVersion",) . toJSON) _codeBuildProjectSourceVersion         , fmap (("Tags",) . toJSON) _codeBuildProjectTags         , fmap (("TimeoutInMinutes",) . toJSON) _codeBuildProjectTimeoutInMinutes         , fmap (("Triggers",) . toJSON) _codeBuildProjectTriggers@@ -86,9 +91,11 @@   , _codeBuildProjectName = Nothing   , _codeBuildProjectQueuedTimeoutInMinutes = Nothing   , _codeBuildProjectSecondaryArtifacts = Nothing+  , _codeBuildProjectSecondarySourceVersions = Nothing   , _codeBuildProjectSecondarySources = Nothing   , _codeBuildProjectServiceRole = serviceRolearg   , _codeBuildProjectSource = sourcearg+  , _codeBuildProjectSourceVersion = Nothing   , _codeBuildProjectTags = Nothing   , _codeBuildProjectTimeoutInMinutes = Nothing   , _codeBuildProjectTriggers = Nothing@@ -135,6 +142,10 @@ cbpSecondaryArtifacts :: Lens' CodeBuildProject (Maybe [CodeBuildProjectArtifacts]) cbpSecondaryArtifacts = lens _codeBuildProjectSecondaryArtifacts (\s a -> s { _codeBuildProjectSecondaryArtifacts = a }) +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codebuild-project.html#cfn-codebuild-project-secondarysourceversions+cbpSecondarySourceVersions :: Lens' CodeBuildProject (Maybe [CodeBuildProjectProjectSourceVersion])+cbpSecondarySourceVersions = lens _codeBuildProjectSecondarySourceVersions (\s a -> s { _codeBuildProjectSecondarySourceVersions = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codebuild-project.html#cfn-codebuild-project-secondarysources cbpSecondarySources :: Lens' CodeBuildProject (Maybe [CodeBuildProjectSource]) cbpSecondarySources = lens _codeBuildProjectSecondarySources (\s a -> s { _codeBuildProjectSecondarySources = a })@@ -146,6 +157,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codebuild-project.html#cfn-codebuild-project-source cbpSource :: Lens' CodeBuildProject CodeBuildProjectSource cbpSource = lens _codeBuildProjectSource (\s a -> s { _codeBuildProjectSource = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codebuild-project.html#cfn-codebuild-project-sourceversion+cbpSourceVersion :: Lens' CodeBuildProject (Maybe (Val Text))+cbpSourceVersion = lens _codeBuildProjectSourceVersion (\s a -> s { _codeBuildProjectSourceVersion = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codebuild-project.html#cfn-codebuild-project-tags cbpTags :: Lens' CodeBuildProject (Maybe [Tag])

@@ -8,13 +8,15 @@ module Stratosphere.Resources.CodeCommitRepository where  import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.CodeCommitRepositoryCode import Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger  -- | Full data type definition for CodeCommitRepository. See -- 'codeCommitRepository' for a more convenient constructor. data CodeCommitRepository =   CodeCommitRepository-  { _codeCommitRepositoryRepositoryDescription :: Maybe (Val Text)+  { _codeCommitRepositoryCode :: Maybe CodeCommitRepositoryCode+  , _codeCommitRepositoryRepositoryDescription :: Maybe (Val Text)   , _codeCommitRepositoryRepositoryName :: Val Text   , _codeCommitRepositoryTriggers :: Maybe [CodeCommitRepositoryRepositoryTrigger]   } deriving (Show, Eq)@@ -25,7 +27,8 @@     { resourcePropertiesType = "AWS::CodeCommit::Repository"     , resourcePropertiesProperties =         hashMapFromList $ catMaybes-        [ fmap (("RepositoryDescription",) . toJSON) _codeCommitRepositoryRepositoryDescription+        [ fmap (("Code",) . toJSON) _codeCommitRepositoryCode+        , fmap (("RepositoryDescription",) . toJSON) _codeCommitRepositoryRepositoryDescription         , (Just . ("RepositoryName",) . toJSON) _codeCommitRepositoryRepositoryName         , fmap (("Triggers",) . toJSON) _codeCommitRepositoryTriggers         ]@@ -38,10 +41,15 @@   -> CodeCommitRepository codeCommitRepository repositoryNamearg =   CodeCommitRepository-  { _codeCommitRepositoryRepositoryDescription = Nothing+  { _codeCommitRepositoryCode = Nothing+  , _codeCommitRepositoryRepositoryDescription = Nothing   , _codeCommitRepositoryRepositoryName = repositoryNamearg   , _codeCommitRepositoryTriggers = Nothing   }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codecommit-repository.html#cfn-codecommit-repository-code+ccrCode :: Lens' CodeCommitRepository (Maybe CodeCommitRepositoryCode)+ccrCode = lens _codeCommitRepositoryCode (\s a -> s { _codeCommitRepositoryCode = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codecommit-repository.html#cfn-codecommit-repository-repositorydescription ccrRepositoryDescription :: Lens' CodeCommitRepository (Maybe (Val Text))

@@ -0,0 +1,115 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html++module Stratosphere.Resources.EC2CapacityReservation where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.EC2CapacityReservationTagSpecification++-- | Full data type definition for EC2CapacityReservation. See+-- 'ec2CapacityReservation' for a more convenient constructor.+data EC2CapacityReservation =+  EC2CapacityReservation+  { _eC2CapacityReservationAvailabilityZone :: Val Text+  , _eC2CapacityReservationEbsOptimized :: Maybe (Val Bool)+  , _eC2CapacityReservationEndDate :: Maybe (Val Text)+  , _eC2CapacityReservationEndDateType :: Maybe (Val Text)+  , _eC2CapacityReservationEphemeralStorage :: Maybe (Val Bool)+  , _eC2CapacityReservationInstanceCount :: Val Integer+  , _eC2CapacityReservationInstanceMatchCriteria :: Maybe (Val Text)+  , _eC2CapacityReservationInstancePlatform :: Val Text+  , _eC2CapacityReservationInstanceType :: Val Text+  , _eC2CapacityReservationTagSpecifications :: Maybe [EC2CapacityReservationTagSpecification]+  , _eC2CapacityReservationTenancy :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToResourceProperties EC2CapacityReservation where+  toResourceProperties EC2CapacityReservation{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::EC2::CapacityReservation"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ (Just . ("AvailabilityZone",) . toJSON) _eC2CapacityReservationAvailabilityZone+        , fmap (("EbsOptimized",) . toJSON) _eC2CapacityReservationEbsOptimized+        , fmap (("EndDate",) . toJSON) _eC2CapacityReservationEndDate+        , fmap (("EndDateType",) . toJSON) _eC2CapacityReservationEndDateType+        , fmap (("EphemeralStorage",) . toJSON) _eC2CapacityReservationEphemeralStorage+        , (Just . ("InstanceCount",) . toJSON) _eC2CapacityReservationInstanceCount+        , fmap (("InstanceMatchCriteria",) . toJSON) _eC2CapacityReservationInstanceMatchCriteria+        , (Just . ("InstancePlatform",) . toJSON) _eC2CapacityReservationInstancePlatform+        , (Just . ("InstanceType",) . toJSON) _eC2CapacityReservationInstanceType+        , fmap (("TagSpecifications",) . toJSON) _eC2CapacityReservationTagSpecifications+        , fmap (("Tenancy",) . toJSON) _eC2CapacityReservationTenancy+        ]+    }++-- | Constructor for 'EC2CapacityReservation' containing required fields as+-- arguments.+ec2CapacityReservation+  :: Val Text -- ^ 'eccrAvailabilityZone'+  -> Val Integer -- ^ 'eccrInstanceCount'+  -> Val Text -- ^ 'eccrInstancePlatform'+  -> Val Text -- ^ 'eccrInstanceType'+  -> EC2CapacityReservation+ec2CapacityReservation availabilityZonearg instanceCountarg instancePlatformarg instanceTypearg =+  EC2CapacityReservation+  { _eC2CapacityReservationAvailabilityZone = availabilityZonearg+  , _eC2CapacityReservationEbsOptimized = Nothing+  , _eC2CapacityReservationEndDate = Nothing+  , _eC2CapacityReservationEndDateType = Nothing+  , _eC2CapacityReservationEphemeralStorage = Nothing+  , _eC2CapacityReservationInstanceCount = instanceCountarg+  , _eC2CapacityReservationInstanceMatchCriteria = Nothing+  , _eC2CapacityReservationInstancePlatform = instancePlatformarg+  , _eC2CapacityReservationInstanceType = instanceTypearg+  , _eC2CapacityReservationTagSpecifications = Nothing+  , _eC2CapacityReservationTenancy = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-availabilityzone+eccrAvailabilityZone :: Lens' EC2CapacityReservation (Val Text)+eccrAvailabilityZone = lens _eC2CapacityReservationAvailabilityZone (\s a -> s { _eC2CapacityReservationAvailabilityZone = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-ebsoptimized+eccrEbsOptimized :: Lens' EC2CapacityReservation (Maybe (Val Bool))+eccrEbsOptimized = lens _eC2CapacityReservationEbsOptimized (\s a -> s { _eC2CapacityReservationEbsOptimized = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-enddate+eccrEndDate :: Lens' EC2CapacityReservation (Maybe (Val Text))+eccrEndDate = lens _eC2CapacityReservationEndDate (\s a -> s { _eC2CapacityReservationEndDate = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-enddatetype+eccrEndDateType :: Lens' EC2CapacityReservation (Maybe (Val Text))+eccrEndDateType = lens _eC2CapacityReservationEndDateType (\s a -> s { _eC2CapacityReservationEndDateType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-ephemeralstorage+eccrEphemeralStorage :: Lens' EC2CapacityReservation (Maybe (Val Bool))+eccrEphemeralStorage = lens _eC2CapacityReservationEphemeralStorage (\s a -> s { _eC2CapacityReservationEphemeralStorage = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-instancecount+eccrInstanceCount :: Lens' EC2CapacityReservation (Val Integer)+eccrInstanceCount = lens _eC2CapacityReservationInstanceCount (\s a -> s { _eC2CapacityReservationInstanceCount = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-instancematchcriteria+eccrInstanceMatchCriteria :: Lens' EC2CapacityReservation (Maybe (Val Text))+eccrInstanceMatchCriteria = lens _eC2CapacityReservationInstanceMatchCriteria (\s a -> s { _eC2CapacityReservationInstanceMatchCriteria = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-instanceplatform+eccrInstancePlatform :: Lens' EC2CapacityReservation (Val Text)+eccrInstancePlatform = lens _eC2CapacityReservationInstancePlatform (\s a -> s { _eC2CapacityReservationInstancePlatform = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-instancetype+eccrInstanceType :: Lens' EC2CapacityReservation (Val Text)+eccrInstanceType = lens _eC2CapacityReservationInstanceType (\s a -> s { _eC2CapacityReservationInstanceType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-tagspecifications+eccrTagSpecifications :: Lens' EC2CapacityReservation (Maybe [EC2CapacityReservationTagSpecification])+eccrTagSpecifications = lens _eC2CapacityReservationTagSpecifications (\s a -> s { _eC2CapacityReservationTagSpecifications = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-capacityreservation.html#cfn-ec2-capacityreservation-tenancy+eccrTenancy :: Lens' EC2CapacityReservation (Maybe (Val Text))+eccrTenancy = lens _eC2CapacityReservationTenancy (\s a -> s { _eC2CapacityReservationTenancy = a })

@@ -10,6 +10,7 @@ import Stratosphere.ResourceImports import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDefinition import Stratosphere.ResourceProperties.ECSTaskDefinitionTaskDefinitionPlacementConstraint+import Stratosphere.ResourceProperties.ECSTaskDefinitionProxyConfiguration import Stratosphere.ResourceProperties.ECSTaskDefinitionVolume  -- | Full data type definition for ECSTaskDefinition. See 'ecsTaskDefinition'@@ -23,6 +24,7 @@   , _eCSTaskDefinitionMemory :: Maybe (Val Text)   , _eCSTaskDefinitionNetworkMode :: Maybe (Val Text)   , _eCSTaskDefinitionPlacementConstraints :: Maybe [ECSTaskDefinitionTaskDefinitionPlacementConstraint]+  , _eCSTaskDefinitionProxyConfiguration :: Maybe ECSTaskDefinitionProxyConfiguration   , _eCSTaskDefinitionRequiresCompatibilities :: Maybe (ValList Text)   , _eCSTaskDefinitionTaskRoleArn :: Maybe (Val Text)   , _eCSTaskDefinitionVolumes :: Maybe [ECSTaskDefinitionVolume]@@ -41,6 +43,7 @@         , fmap (("Memory",) . toJSON) _eCSTaskDefinitionMemory         , fmap (("NetworkMode",) . toJSON) _eCSTaskDefinitionNetworkMode         , fmap (("PlacementConstraints",) . toJSON) _eCSTaskDefinitionPlacementConstraints+        , fmap (("ProxyConfiguration",) . toJSON) _eCSTaskDefinitionProxyConfiguration         , fmap (("RequiresCompatibilities",) . toJSON) _eCSTaskDefinitionRequiresCompatibilities         , fmap (("TaskRoleArn",) . toJSON) _eCSTaskDefinitionTaskRoleArn         , fmap (("Volumes",) . toJSON) _eCSTaskDefinitionVolumes@@ -60,6 +63,7 @@   , _eCSTaskDefinitionMemory = Nothing   , _eCSTaskDefinitionNetworkMode = Nothing   , _eCSTaskDefinitionPlacementConstraints = Nothing+  , _eCSTaskDefinitionProxyConfiguration = Nothing   , _eCSTaskDefinitionRequiresCompatibilities = Nothing   , _eCSTaskDefinitionTaskRoleArn = Nothing   , _eCSTaskDefinitionVolumes = Nothing@@ -92,6 +96,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecs-taskdefinition.html#cfn-ecs-taskdefinition-placementconstraints ecstdPlacementConstraints :: Lens' ECSTaskDefinition (Maybe [ECSTaskDefinitionTaskDefinitionPlacementConstraint]) ecstdPlacementConstraints = lens _eCSTaskDefinitionPlacementConstraints (\s a -> s { _eCSTaskDefinitionPlacementConstraints = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecs-taskdefinition.html#cfn-ecs-taskdefinition-proxyconfiguration+ecstdProxyConfiguration :: Lens' ECSTaskDefinition (Maybe ECSTaskDefinitionProxyConfiguration)+ecstdProxyConfiguration = lens _eCSTaskDefinitionProxyConfiguration (\s a -> s { _eCSTaskDefinitionProxyConfiguration = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecs-taskdefinition.html#cfn-ecs-taskdefinition-requirescompatibilities ecstdRequiresCompatibilities :: Lens' ECSTaskDefinition (Maybe (ValList Text))

@@ -8,6 +8,7 @@ module Stratosphere.Resources.GlueClassifier where  import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.GlueClassifierCsvClassifier import Stratosphere.ResourceProperties.GlueClassifierGrokClassifier import Stratosphere.ResourceProperties.GlueClassifierJsonClassifier import Stratosphere.ResourceProperties.GlueClassifierXMLClassifier@@ -16,7 +17,8 @@ -- more convenient constructor. data GlueClassifier =   GlueClassifier-  { _glueClassifierGrokClassifier :: Maybe GlueClassifierGrokClassifier+  { _glueClassifierCsvClassifier :: Maybe GlueClassifierCsvClassifier+  , _glueClassifierGrokClassifier :: Maybe GlueClassifierGrokClassifier   , _glueClassifierJsonClassifier :: Maybe GlueClassifierJsonClassifier   , _glueClassifierXMLClassifier :: Maybe GlueClassifierXMLClassifier   } deriving (Show, Eq)@@ -27,7 +29,8 @@     { resourcePropertiesType = "AWS::Glue::Classifier"     , resourcePropertiesProperties =         hashMapFromList $ catMaybes-        [ fmap (("GrokClassifier",) . toJSON) _glueClassifierGrokClassifier+        [ fmap (("CsvClassifier",) . toJSON) _glueClassifierCsvClassifier+        , fmap (("GrokClassifier",) . toJSON) _glueClassifierGrokClassifier         , fmap (("JsonClassifier",) . toJSON) _glueClassifierJsonClassifier         , fmap (("XMLClassifier",) . toJSON) _glueClassifierXMLClassifier         ]@@ -38,10 +41,15 @@   :: GlueClassifier glueClassifier  =   GlueClassifier-  { _glueClassifierGrokClassifier = Nothing+  { _glueClassifierCsvClassifier = Nothing+  , _glueClassifierGrokClassifier = Nothing   , _glueClassifierJsonClassifier = Nothing   , _glueClassifierXMLClassifier = Nothing   }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-classifier.html#cfn-glue-classifier-csvclassifier+gcCsvClassifier :: Lens' GlueClassifier (Maybe GlueClassifierCsvClassifier)+gcCsvClassifier = lens _glueClassifierCsvClassifier (\s a -> s { _glueClassifierCsvClassifier = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-classifier.html#cfn-glue-classifier-grokclassifier gcGrokClassifier :: Lens' GlueClassifier (Maybe GlueClassifierGrokClassifier)

@@ -18,6 +18,7 @@   GlueCrawler   { _glueCrawlerClassifiers :: Maybe (ValList Text)   , _glueCrawlerConfiguration :: Maybe (Val Text)+  , _glueCrawlerCrawlerSecurityConfiguration :: Maybe (Val Text)   , _glueCrawlerDatabaseName :: Val Text   , _glueCrawlerDescription :: Maybe (Val Text)   , _glueCrawlerName :: Maybe (Val Text)@@ -25,6 +26,7 @@   , _glueCrawlerSchedule :: Maybe GlueCrawlerSchedule   , _glueCrawlerSchemaChangePolicy :: Maybe GlueCrawlerSchemaChangePolicy   , _glueCrawlerTablePrefix :: Maybe (Val Text)+  , _glueCrawlerTags :: Maybe Object   , _glueCrawlerTargets :: GlueCrawlerTargets   } deriving (Show, Eq) @@ -36,6 +38,7 @@         hashMapFromList $ catMaybes         [ fmap (("Classifiers",) . toJSON) _glueCrawlerClassifiers         , fmap (("Configuration",) . toJSON) _glueCrawlerConfiguration+        , fmap (("CrawlerSecurityConfiguration",) . toJSON) _glueCrawlerCrawlerSecurityConfiguration         , (Just . ("DatabaseName",) . toJSON) _glueCrawlerDatabaseName         , fmap (("Description",) . toJSON) _glueCrawlerDescription         , fmap (("Name",) . toJSON) _glueCrawlerName@@ -43,6 +46,7 @@         , fmap (("Schedule",) . toJSON) _glueCrawlerSchedule         , fmap (("SchemaChangePolicy",) . toJSON) _glueCrawlerSchemaChangePolicy         , fmap (("TablePrefix",) . toJSON) _glueCrawlerTablePrefix+        , fmap (("Tags",) . toJSON) _glueCrawlerTags         , (Just . ("Targets",) . toJSON) _glueCrawlerTargets         ]     }@@ -57,6 +61,7 @@   GlueCrawler   { _glueCrawlerClassifiers = Nothing   , _glueCrawlerConfiguration = Nothing+  , _glueCrawlerCrawlerSecurityConfiguration = Nothing   , _glueCrawlerDatabaseName = databaseNamearg   , _glueCrawlerDescription = Nothing   , _glueCrawlerName = Nothing@@ -64,6 +69,7 @@   , _glueCrawlerSchedule = Nothing   , _glueCrawlerSchemaChangePolicy = Nothing   , _glueCrawlerTablePrefix = Nothing+  , _glueCrawlerTags = Nothing   , _glueCrawlerTargets = targetsarg   } @@ -75,6 +81,10 @@ gcConfiguration :: Lens' GlueCrawler (Maybe (Val Text)) gcConfiguration = lens _glueCrawlerConfiguration (\s a -> s { _glueCrawlerConfiguration = a }) +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-crawler.html#cfn-glue-crawler-crawlersecurityconfiguration+gcCrawlerSecurityConfiguration :: Lens' GlueCrawler (Maybe (Val Text))+gcCrawlerSecurityConfiguration = lens _glueCrawlerCrawlerSecurityConfiguration (\s a -> s { _glueCrawlerCrawlerSecurityConfiguration = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-crawler.html#cfn-glue-crawler-databasename gcDatabaseName :: Lens' GlueCrawler (Val Text) gcDatabaseName = lens _glueCrawlerDatabaseName (\s a -> s { _glueCrawlerDatabaseName = a })@@ -102,6 +112,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-crawler.html#cfn-glue-crawler-tableprefix gcTablePrefix :: Lens' GlueCrawler (Maybe (Val Text)) gcTablePrefix = lens _glueCrawlerTablePrefix (\s a -> s { _glueCrawlerTablePrefix = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-crawler.html#cfn-glue-crawler-tags+gcTags :: Lens' GlueCrawler (Maybe Object)+gcTags = lens _glueCrawlerTags (\s a -> s { _glueCrawlerTags = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-crawler.html#cfn-glue-crawler-targets gcTargets :: Lens' GlueCrawler GlueCrawlerTargets

@@ -0,0 +1,50 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-datacatalogencryptionsettings.html++module Stratosphere.Resources.GlueDataCatalogEncryptionSettings where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings++-- | Full data type definition for GlueDataCatalogEncryptionSettings. See+-- 'glueDataCatalogEncryptionSettings' for a more convenient constructor.+data GlueDataCatalogEncryptionSettings =+  GlueDataCatalogEncryptionSettings+  { _glueDataCatalogEncryptionSettingsCatalogId :: Val Text+  , _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings :: GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+  } deriving (Show, Eq)++instance ToResourceProperties GlueDataCatalogEncryptionSettings where+  toResourceProperties GlueDataCatalogEncryptionSettings{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::Glue::DataCatalogEncryptionSettings"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ (Just . ("CatalogId",) . toJSON) _glueDataCatalogEncryptionSettingsCatalogId+        , (Just . ("DataCatalogEncryptionSettings",) . toJSON) _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+        ]+    }++-- | Constructor for 'GlueDataCatalogEncryptionSettings' containing required+-- fields as arguments.+glueDataCatalogEncryptionSettings+  :: Val Text -- ^ 'gdcesCatalogId'+  -> GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings -- ^ 'gdcesDataCatalogEncryptionSettings'+  -> GlueDataCatalogEncryptionSettings+glueDataCatalogEncryptionSettings catalogIdarg dataCatalogEncryptionSettingsarg =+  GlueDataCatalogEncryptionSettings+  { _glueDataCatalogEncryptionSettingsCatalogId = catalogIdarg+  , _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings = dataCatalogEncryptionSettingsarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-datacatalogencryptionsettings.html#cfn-glue-datacatalogencryptionsettings-catalogid+gdcesCatalogId :: Lens' GlueDataCatalogEncryptionSettings (Val Text)+gdcesCatalogId = lens _glueDataCatalogEncryptionSettingsCatalogId (\s a -> s { _glueDataCatalogEncryptionSettingsCatalogId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-datacatalogencryptionsettings.html#cfn-glue-datacatalogencryptionsettings-datacatalogencryptionsettings+gdcesDataCatalogEncryptionSettings :: Lens' GlueDataCatalogEncryptionSettings GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+gdcesDataCatalogEncryptionSettings = lens _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings (\s a -> s { _glueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings = a })

@@ -18,10 +18,12 @@   , _glueDevEndpointExtraJarsS3Path :: Maybe (Val Text)   , _glueDevEndpointExtraPythonLibsS3Path :: Maybe (Val Text)   , _glueDevEndpointNumberOfNodes :: Maybe (Val Integer)-  , _glueDevEndpointPublicKey :: Val Text+  , _glueDevEndpointPublicKey :: Maybe (Val Text)   , _glueDevEndpointRoleArn :: Val Text+  , _glueDevEndpointSecurityConfiguration :: Maybe (Val Text)   , _glueDevEndpointSecurityGroupIds :: Maybe (ValList Text)   , _glueDevEndpointSubnetId :: Maybe (Val Text)+  , _glueDevEndpointTags :: Maybe Object   } deriving (Show, Eq)  instance ToResourceProperties GlueDevEndpoint where@@ -34,29 +36,32 @@         , fmap (("ExtraJarsS3Path",) . toJSON) _glueDevEndpointExtraJarsS3Path         , fmap (("ExtraPythonLibsS3Path",) . toJSON) _glueDevEndpointExtraPythonLibsS3Path         , fmap (("NumberOfNodes",) . toJSON) _glueDevEndpointNumberOfNodes-        , (Just . ("PublicKey",) . toJSON) _glueDevEndpointPublicKey+        , fmap (("PublicKey",) . toJSON) _glueDevEndpointPublicKey         , (Just . ("RoleArn",) . toJSON) _glueDevEndpointRoleArn+        , fmap (("SecurityConfiguration",) . toJSON) _glueDevEndpointSecurityConfiguration         , fmap (("SecurityGroupIds",) . toJSON) _glueDevEndpointSecurityGroupIds         , fmap (("SubnetId",) . toJSON) _glueDevEndpointSubnetId+        , fmap (("Tags",) . toJSON) _glueDevEndpointTags         ]     }  -- | Constructor for 'GlueDevEndpoint' containing required fields as -- arguments. glueDevEndpoint-  :: Val Text -- ^ 'gdePublicKey'-  -> Val Text -- ^ 'gdeRoleArn'+  :: Val Text -- ^ 'gdeRoleArn'   -> GlueDevEndpoint-glueDevEndpoint publicKeyarg roleArnarg =+glueDevEndpoint roleArnarg =   GlueDevEndpoint   { _glueDevEndpointEndpointName = Nothing   , _glueDevEndpointExtraJarsS3Path = Nothing   , _glueDevEndpointExtraPythonLibsS3Path = Nothing   , _glueDevEndpointNumberOfNodes = Nothing-  , _glueDevEndpointPublicKey = publicKeyarg+  , _glueDevEndpointPublicKey = Nothing   , _glueDevEndpointRoleArn = roleArnarg+  , _glueDevEndpointSecurityConfiguration = Nothing   , _glueDevEndpointSecurityGroupIds = Nothing   , _glueDevEndpointSubnetId = Nothing+  , _glueDevEndpointTags = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-endpointname@@ -76,13 +81,17 @@ gdeNumberOfNodes = lens _glueDevEndpointNumberOfNodes (\s a -> s { _glueDevEndpointNumberOfNodes = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-publickey-gdePublicKey :: Lens' GlueDevEndpoint (Val Text)+gdePublicKey :: Lens' GlueDevEndpoint (Maybe (Val Text)) gdePublicKey = lens _glueDevEndpointPublicKey (\s a -> s { _glueDevEndpointPublicKey = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-rolearn gdeRoleArn :: Lens' GlueDevEndpoint (Val Text) gdeRoleArn = lens _glueDevEndpointRoleArn (\s a -> s { _glueDevEndpointRoleArn = a }) +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-securityconfiguration+gdeSecurityConfiguration :: Lens' GlueDevEndpoint (Maybe (Val Text))+gdeSecurityConfiguration = lens _glueDevEndpointSecurityConfiguration (\s a -> s { _glueDevEndpointSecurityConfiguration = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-securitygroupids gdeSecurityGroupIds :: Lens' GlueDevEndpoint (Maybe (ValList Text)) gdeSecurityGroupIds = lens _glueDevEndpointSecurityGroupIds (\s a -> s { _glueDevEndpointSecurityGroupIds = a })@@ -90,3 +99,7 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-subnetid gdeSubnetId :: Lens' GlueDevEndpoint (Maybe (Val Text)) gdeSubnetId = lens _glueDevEndpointSubnetId (\s a -> s { _glueDevEndpointSubnetId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-devendpoint.html#cfn-glue-devendpoint-tags+gdeTags :: Lens' GlueDevEndpoint (Maybe Object)+gdeTags = lens _glueDevEndpointTags (\s a -> s { _glueDevEndpointTags = a })

@@ -26,6 +26,8 @@   , _glueJobMaxRetries :: Maybe (Val Double)   , _glueJobName :: Maybe (Val Text)   , _glueJobRole :: Val Text+  , _glueJobSecurityConfiguration :: Maybe (Val Text)+  , _glueJobTags :: Maybe Object   } deriving (Show, Eq)  instance ToResourceProperties GlueJob where@@ -44,6 +46,8 @@         , fmap (("MaxRetries",) . toJSON) _glueJobMaxRetries         , fmap (("Name",) . toJSON) _glueJobName         , (Just . ("Role",) . toJSON) _glueJobRole+        , fmap (("SecurityConfiguration",) . toJSON) _glueJobSecurityConfiguration+        , fmap (("Tags",) . toJSON) _glueJobTags         ]     } @@ -64,6 +68,8 @@   , _glueJobMaxRetries = Nothing   , _glueJobName = Nothing   , _glueJobRole = rolearg+  , _glueJobSecurityConfiguration = Nothing+  , _glueJobTags = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-job.html#cfn-glue-job-allocatedcapacity@@ -105,3 +111,11 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-job.html#cfn-glue-job-role gjRole :: Lens' GlueJob (Val Text) gjRole = lens _glueJobRole (\s a -> s { _glueJobRole = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-job.html#cfn-glue-job-securityconfiguration+gjSecurityConfiguration :: Lens' GlueJob (Maybe (Val Text))+gjSecurityConfiguration = lens _glueJobSecurityConfiguration (\s a -> s { _glueJobSecurityConfiguration = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-job.html#cfn-glue-job-tags+gjTags :: Lens' GlueJob (Maybe Object)+gjTags = lens _glueJobTags (\s a -> s { _glueJobTags = a })

@@ -0,0 +1,50 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-securityconfiguration.html++module Stratosphere.Resources.GlueSecurityConfiguration where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.GlueSecurityConfigurationEncryptionConfiguration++-- | Full data type definition for GlueSecurityConfiguration. See+-- 'glueSecurityConfiguration' for a more convenient constructor.+data GlueSecurityConfiguration =+  GlueSecurityConfiguration+  { _glueSecurityConfigurationEncryptionConfiguration :: GlueSecurityConfigurationEncryptionConfiguration+  , _glueSecurityConfigurationName :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties GlueSecurityConfiguration where+  toResourceProperties GlueSecurityConfiguration{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::Glue::SecurityConfiguration"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ (Just . ("EncryptionConfiguration",) . toJSON) _glueSecurityConfigurationEncryptionConfiguration+        , (Just . ("Name",) . toJSON) _glueSecurityConfigurationName+        ]+    }++-- | Constructor for 'GlueSecurityConfiguration' containing required fields as+-- arguments.+glueSecurityConfiguration+  :: GlueSecurityConfigurationEncryptionConfiguration -- ^ 'gscEncryptionConfiguration'+  -> Val Text -- ^ 'gscName'+  -> GlueSecurityConfiguration+glueSecurityConfiguration encryptionConfigurationarg namearg =+  GlueSecurityConfiguration+  { _glueSecurityConfigurationEncryptionConfiguration = encryptionConfigurationarg+  , _glueSecurityConfigurationName = namearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-securityconfiguration.html#cfn-glue-securityconfiguration-encryptionconfiguration+gscEncryptionConfiguration :: Lens' GlueSecurityConfiguration GlueSecurityConfigurationEncryptionConfiguration+gscEncryptionConfiguration = lens _glueSecurityConfigurationEncryptionConfiguration (\s a -> s { _glueSecurityConfigurationEncryptionConfiguration = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-securityconfiguration.html#cfn-glue-securityconfiguration-name+gscName :: Lens' GlueSecurityConfiguration (Val Text)+gscName = lens _glueSecurityConfigurationName (\s a -> s { _glueSecurityConfigurationName = a })

@@ -20,6 +20,7 @@   , _glueTriggerName :: Maybe (Val Text)   , _glueTriggerPredicate :: Maybe GlueTriggerPredicate   , _glueTriggerSchedule :: Maybe (Val Text)+  , _glueTriggerTags :: Maybe Object   , _glueTriggerType :: Val Text   } deriving (Show, Eq) @@ -34,6 +35,7 @@         , fmap (("Name",) . toJSON) _glueTriggerName         , fmap (("Predicate",) . toJSON) _glueTriggerPredicate         , fmap (("Schedule",) . toJSON) _glueTriggerSchedule+        , fmap (("Tags",) . toJSON) _glueTriggerTags         , (Just . ("Type",) . toJSON) _glueTriggerType         ]     }@@ -50,6 +52,7 @@   , _glueTriggerName = Nothing   , _glueTriggerPredicate = Nothing   , _glueTriggerSchedule = Nothing+  , _glueTriggerTags = Nothing   , _glueTriggerType = typearg   } @@ -72,6 +75,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-trigger.html#cfn-glue-trigger-schedule gtSchedule :: Lens' GlueTrigger (Maybe (Val Text)) gtSchedule = lens _glueTriggerSchedule (\s a -> s { _glueTriggerSchedule = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-trigger.html#cfn-glue-trigger-tags+gtTags :: Lens' GlueTrigger (Maybe Object)+gtTags = lens _glueTriggerTags (\s a -> s { _glueTriggerTags = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-glue-trigger.html#cfn-glue-trigger-type gtType :: Lens' GlueTrigger (Val Text)

@@ -0,0 +1,70 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html++module Stratosphere.Resources.MediaStoreContainer where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.MediaStoreContainerCorsRule++-- | Full data type definition for MediaStoreContainer. See+-- 'mediaStoreContainer' for a more convenient constructor.+data MediaStoreContainer =+  MediaStoreContainer+  { _mediaStoreContainerAccessLoggingEnabled :: Maybe (Val Bool)+  , _mediaStoreContainerContainerName :: Val Text+  , _mediaStoreContainerCorsPolicy :: Maybe [MediaStoreContainerCorsRule]+  , _mediaStoreContainerLifecyclePolicy :: Maybe (Val Text)+  , _mediaStoreContainerPolicy :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToResourceProperties MediaStoreContainer where+  toResourceProperties MediaStoreContainer{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::MediaStore::Container"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("AccessLoggingEnabled",) . toJSON) _mediaStoreContainerAccessLoggingEnabled+        , (Just . ("ContainerName",) . toJSON) _mediaStoreContainerContainerName+        , fmap (("CorsPolicy",) . toJSON) _mediaStoreContainerCorsPolicy+        , fmap (("LifecyclePolicy",) . toJSON) _mediaStoreContainerLifecyclePolicy+        , fmap (("Policy",) . toJSON) _mediaStoreContainerPolicy+        ]+    }++-- | Constructor for 'MediaStoreContainer' containing required fields as+-- arguments.+mediaStoreContainer+  :: Val Text -- ^ 'mscContainerName'+  -> MediaStoreContainer+mediaStoreContainer containerNamearg =+  MediaStoreContainer+  { _mediaStoreContainerAccessLoggingEnabled = Nothing+  , _mediaStoreContainerContainerName = containerNamearg+  , _mediaStoreContainerCorsPolicy = Nothing+  , _mediaStoreContainerLifecyclePolicy = Nothing+  , _mediaStoreContainerPolicy = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html#cfn-mediastore-container-accessloggingenabled+mscAccessLoggingEnabled :: Lens' MediaStoreContainer (Maybe (Val Bool))+mscAccessLoggingEnabled = lens _mediaStoreContainerAccessLoggingEnabled (\s a -> s { _mediaStoreContainerAccessLoggingEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html#cfn-mediastore-container-containername+mscContainerName :: Lens' MediaStoreContainer (Val Text)+mscContainerName = lens _mediaStoreContainerContainerName (\s a -> s { _mediaStoreContainerContainerName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html#cfn-mediastore-container-corspolicy+mscCorsPolicy :: Lens' MediaStoreContainer (Maybe [MediaStoreContainerCorsRule])+mscCorsPolicy = lens _mediaStoreContainerCorsPolicy (\s a -> s { _mediaStoreContainerCorsPolicy = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html#cfn-mediastore-container-lifecyclepolicy+mscLifecyclePolicy :: Lens' MediaStoreContainer (Maybe (Val Text))+mscLifecyclePolicy = lens _mediaStoreContainerLifecyclePolicy (\s a -> s { _mediaStoreContainerLifecyclePolicy = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html#cfn-mediastore-container-policy+mscPolicy :: Lens' MediaStoreContainer (Maybe (Val Text))+mscPolicy = lens _mediaStoreContainerPolicy (\s a -> s { _mediaStoreContainerPolicy = a })

@@ -0,0 +1,81 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html++module Stratosphere.Resources.PinpointEmailConfigurationSet where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetDeliveryOptions+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetReputationOptions+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetSendingOptions+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTags+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTrackingOptions++-- | Full data type definition for PinpointEmailConfigurationSet. See+-- 'pinpointEmailConfigurationSet' for a more convenient constructor.+data PinpointEmailConfigurationSet =+  PinpointEmailConfigurationSet+  { _pinpointEmailConfigurationSetDeliveryOptions :: Maybe PinpointEmailConfigurationSetDeliveryOptions+  , _pinpointEmailConfigurationSetName :: Val Text+  , _pinpointEmailConfigurationSetReputationOptions :: Maybe PinpointEmailConfigurationSetReputationOptions+  , _pinpointEmailConfigurationSetSendingOptions :: Maybe PinpointEmailConfigurationSetSendingOptions+  , _pinpointEmailConfigurationSetTags :: Maybe [PinpointEmailConfigurationSetTags]+  , _pinpointEmailConfigurationSetTrackingOptions :: Maybe PinpointEmailConfigurationSetTrackingOptions+  } deriving (Show, Eq)++instance ToResourceProperties PinpointEmailConfigurationSet where+  toResourceProperties PinpointEmailConfigurationSet{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::PinpointEmail::ConfigurationSet"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("DeliveryOptions",) . toJSON) _pinpointEmailConfigurationSetDeliveryOptions+        , (Just . ("Name",) . toJSON) _pinpointEmailConfigurationSetName+        , fmap (("ReputationOptions",) . toJSON) _pinpointEmailConfigurationSetReputationOptions+        , fmap (("SendingOptions",) . toJSON) _pinpointEmailConfigurationSetSendingOptions+        , fmap (("Tags",) . toJSON) _pinpointEmailConfigurationSetTags+        , fmap (("TrackingOptions",) . toJSON) _pinpointEmailConfigurationSetTrackingOptions+        ]+    }++-- | Constructor for 'PinpointEmailConfigurationSet' containing required+-- fields as arguments.+pinpointEmailConfigurationSet+  :: Val Text -- ^ 'pecsName'+  -> PinpointEmailConfigurationSet+pinpointEmailConfigurationSet namearg =+  PinpointEmailConfigurationSet+  { _pinpointEmailConfigurationSetDeliveryOptions = Nothing+  , _pinpointEmailConfigurationSetName = namearg+  , _pinpointEmailConfigurationSetReputationOptions = Nothing+  , _pinpointEmailConfigurationSetSendingOptions = Nothing+  , _pinpointEmailConfigurationSetTags = Nothing+  , _pinpointEmailConfigurationSetTrackingOptions = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html#cfn-pinpointemail-configurationset-deliveryoptions+pecsDeliveryOptions :: Lens' PinpointEmailConfigurationSet (Maybe PinpointEmailConfigurationSetDeliveryOptions)+pecsDeliveryOptions = lens _pinpointEmailConfigurationSetDeliveryOptions (\s a -> s { _pinpointEmailConfigurationSetDeliveryOptions = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html#cfn-pinpointemail-configurationset-name+pecsName :: Lens' PinpointEmailConfigurationSet (Val Text)+pecsName = lens _pinpointEmailConfigurationSetName (\s a -> s { _pinpointEmailConfigurationSetName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html#cfn-pinpointemail-configurationset-reputationoptions+pecsReputationOptions :: Lens' PinpointEmailConfigurationSet (Maybe PinpointEmailConfigurationSetReputationOptions)+pecsReputationOptions = lens _pinpointEmailConfigurationSetReputationOptions (\s a -> s { _pinpointEmailConfigurationSetReputationOptions = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html#cfn-pinpointemail-configurationset-sendingoptions+pecsSendingOptions :: Lens' PinpointEmailConfigurationSet (Maybe PinpointEmailConfigurationSetSendingOptions)+pecsSendingOptions = lens _pinpointEmailConfigurationSetSendingOptions (\s a -> s { _pinpointEmailConfigurationSetSendingOptions = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html#cfn-pinpointemail-configurationset-tags+pecsTags :: Lens' PinpointEmailConfigurationSet (Maybe [PinpointEmailConfigurationSetTags])+pecsTags = lens _pinpointEmailConfigurationSetTags (\s a -> s { _pinpointEmailConfigurationSetTags = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationset.html#cfn-pinpointemail-configurationset-trackingoptions+pecsTrackingOptions :: Lens' PinpointEmailConfigurationSet (Maybe PinpointEmailConfigurationSetTrackingOptions)+pecsTrackingOptions = lens _pinpointEmailConfigurationSetTrackingOptions (\s a -> s { _pinpointEmailConfigurationSetTrackingOptions = a })

@@ -0,0 +1,59 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationseteventdestination.html++module Stratosphere.Resources.PinpointEmailConfigurationSetEventDestination where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationEventDestination++-- | Full data type definition for+-- PinpointEmailConfigurationSetEventDestination. See+-- 'pinpointEmailConfigurationSetEventDestination' for a more convenient+-- constructor.+data PinpointEmailConfigurationSetEventDestination =+  PinpointEmailConfigurationSetEventDestination+  { _pinpointEmailConfigurationSetEventDestinationConfigurationSetName :: Val Text+  , _pinpointEmailConfigurationSetEventDestinationEventDestination :: Maybe PinpointEmailConfigurationSetEventDestinationEventDestination+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationName :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties PinpointEmailConfigurationSetEventDestination where+  toResourceProperties PinpointEmailConfigurationSetEventDestination{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::PinpointEmail::ConfigurationSetEventDestination"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ (Just . ("ConfigurationSetName",) . toJSON) _pinpointEmailConfigurationSetEventDestinationConfigurationSetName+        , fmap (("EventDestination",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestination+        , (Just . ("EventDestinationName",) . toJSON) _pinpointEmailConfigurationSetEventDestinationEventDestinationName+        ]+    }++-- | Constructor for 'PinpointEmailConfigurationSetEventDestination'+-- containing required fields as arguments.+pinpointEmailConfigurationSetEventDestination+  :: Val Text -- ^ 'pecsedConfigurationSetName'+  -> Val Text -- ^ 'pecsedEventDestinationName'+  -> PinpointEmailConfigurationSetEventDestination+pinpointEmailConfigurationSetEventDestination configurationSetNamearg eventDestinationNamearg =+  PinpointEmailConfigurationSetEventDestination+  { _pinpointEmailConfigurationSetEventDestinationConfigurationSetName = configurationSetNamearg+  , _pinpointEmailConfigurationSetEventDestinationEventDestination = Nothing+  , _pinpointEmailConfigurationSetEventDestinationEventDestinationName = eventDestinationNamearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationseteventdestination.html#cfn-pinpointemail-configurationseteventdestination-configurationsetname+pecsedConfigurationSetName :: Lens' PinpointEmailConfigurationSetEventDestination (Val Text)+pecsedConfigurationSetName = lens _pinpointEmailConfigurationSetEventDestinationConfigurationSetName (\s a -> s { _pinpointEmailConfigurationSetEventDestinationConfigurationSetName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationseteventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestination+pecsedEventDestination :: Lens' PinpointEmailConfigurationSetEventDestination (Maybe PinpointEmailConfigurationSetEventDestinationEventDestination)+pecsedEventDestination = lens _pinpointEmailConfigurationSetEventDestinationEventDestination (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestination = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-configurationseteventdestination.html#cfn-pinpointemail-configurationseteventdestination-eventdestinationname+pecsedEventDestinationName :: Lens' PinpointEmailConfigurationSetEventDestination (Val Text)+pecsedEventDestinationName = lens _pinpointEmailConfigurationSetEventDestinationEventDestinationName (\s a -> s { _pinpointEmailConfigurationSetEventDestinationEventDestinationName = a })

@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-dedicatedippool.html++module Stratosphere.Resources.PinpointEmailDedicatedIpPool where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.PinpointEmailDedicatedIpPoolTags++-- | Full data type definition for PinpointEmailDedicatedIpPool. See+-- 'pinpointEmailDedicatedIpPool' for a more convenient constructor.+data PinpointEmailDedicatedIpPool =+  PinpointEmailDedicatedIpPool+  { _pinpointEmailDedicatedIpPoolPoolName :: Maybe (Val Text)+  , _pinpointEmailDedicatedIpPoolTags :: Maybe [PinpointEmailDedicatedIpPoolTags]+  } deriving (Show, Eq)++instance ToResourceProperties PinpointEmailDedicatedIpPool where+  toResourceProperties PinpointEmailDedicatedIpPool{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::PinpointEmail::DedicatedIpPool"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("PoolName",) . toJSON) _pinpointEmailDedicatedIpPoolPoolName+        , fmap (("Tags",) . toJSON) _pinpointEmailDedicatedIpPoolTags+        ]+    }++-- | Constructor for 'PinpointEmailDedicatedIpPool' containing required fields+-- as arguments.+pinpointEmailDedicatedIpPool+  :: PinpointEmailDedicatedIpPool+pinpointEmailDedicatedIpPool  =+  PinpointEmailDedicatedIpPool+  { _pinpointEmailDedicatedIpPoolPoolName = Nothing+  , _pinpointEmailDedicatedIpPoolTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-dedicatedippool.html#cfn-pinpointemail-dedicatedippool-poolname+pedipPoolName :: Lens' PinpointEmailDedicatedIpPool (Maybe (Val Text))+pedipPoolName = lens _pinpointEmailDedicatedIpPoolPoolName (\s a -> s { _pinpointEmailDedicatedIpPoolPoolName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-dedicatedippool.html#cfn-pinpointemail-dedicatedippool-tags+pedipTags :: Lens' PinpointEmailDedicatedIpPool (Maybe [PinpointEmailDedicatedIpPoolTags])+pedipTags = lens _pinpointEmailDedicatedIpPoolTags (\s a -> s { _pinpointEmailDedicatedIpPoolTags = a })

@@ -0,0 +1,71 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-identity.html++module Stratosphere.Resources.PinpointEmailIdentity where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.PinpointEmailIdentityMailFromAttributes+import Stratosphere.ResourceProperties.PinpointEmailIdentityTags++-- | Full data type definition for PinpointEmailIdentity. See+-- 'pinpointEmailIdentity' for a more convenient constructor.+data PinpointEmailIdentity =+  PinpointEmailIdentity+  { _pinpointEmailIdentityDkimSigningEnabled :: Maybe (Val Bool)+  , _pinpointEmailIdentityFeedbackForwardingEnabled :: Maybe (Val Bool)+  , _pinpointEmailIdentityMailFromAttributes :: Maybe PinpointEmailIdentityMailFromAttributes+  , _pinpointEmailIdentityName :: Val Text+  , _pinpointEmailIdentityTags :: Maybe [PinpointEmailIdentityTags]+  } deriving (Show, Eq)++instance ToResourceProperties PinpointEmailIdentity where+  toResourceProperties PinpointEmailIdentity{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::PinpointEmail::Identity"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("DkimSigningEnabled",) . toJSON) _pinpointEmailIdentityDkimSigningEnabled+        , fmap (("FeedbackForwardingEnabled",) . toJSON) _pinpointEmailIdentityFeedbackForwardingEnabled+        , fmap (("MailFromAttributes",) . toJSON) _pinpointEmailIdentityMailFromAttributes+        , (Just . ("Name",) . toJSON) _pinpointEmailIdentityName+        , fmap (("Tags",) . toJSON) _pinpointEmailIdentityTags+        ]+    }++-- | Constructor for 'PinpointEmailIdentity' containing required fields as+-- arguments.+pinpointEmailIdentity+  :: Val Text -- ^ 'peiName'+  -> PinpointEmailIdentity+pinpointEmailIdentity namearg =+  PinpointEmailIdentity+  { _pinpointEmailIdentityDkimSigningEnabled = Nothing+  , _pinpointEmailIdentityFeedbackForwardingEnabled = Nothing+  , _pinpointEmailIdentityMailFromAttributes = Nothing+  , _pinpointEmailIdentityName = namearg+  , _pinpointEmailIdentityTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-identity.html#cfn-pinpointemail-identity-dkimsigningenabled+peiDkimSigningEnabled :: Lens' PinpointEmailIdentity (Maybe (Val Bool))+peiDkimSigningEnabled = lens _pinpointEmailIdentityDkimSigningEnabled (\s a -> s { _pinpointEmailIdentityDkimSigningEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-identity.html#cfn-pinpointemail-identity-feedbackforwardingenabled+peiFeedbackForwardingEnabled :: Lens' PinpointEmailIdentity (Maybe (Val Bool))+peiFeedbackForwardingEnabled = lens _pinpointEmailIdentityFeedbackForwardingEnabled (\s a -> s { _pinpointEmailIdentityFeedbackForwardingEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-identity.html#cfn-pinpointemail-identity-mailfromattributes+peiMailFromAttributes :: Lens' PinpointEmailIdentity (Maybe PinpointEmailIdentityMailFromAttributes)+peiMailFromAttributes = lens _pinpointEmailIdentityMailFromAttributes (\s a -> s { _pinpointEmailIdentityMailFromAttributes = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-identity.html#cfn-pinpointemail-identity-name+peiName :: Lens' PinpointEmailIdentity (Val Text)+peiName = lens _pinpointEmailIdentityName (\s a -> s { _pinpointEmailIdentityName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-pinpointemail-identity.html#cfn-pinpointemail-identity-tags+peiTags :: Lens' PinpointEmailIdentity (Maybe [PinpointEmailIdentityTags])+peiTags = lens _pinpointEmailIdentityTags (\s a -> s { _pinpointEmailIdentityTags = a })

@@ -17,7 +17,9 @@   { _sSMParameterAllowedPattern :: Maybe (Val Text)   , _sSMParameterDescription :: Maybe (Val Text)   , _sSMParameterName :: Maybe (Val Text)+  , _sSMParameterPolicies :: Maybe (Val Text)   , _sSMParameterTags :: Maybe Object+  , _sSMParameterTier :: Maybe (Val Text)   , _sSMParameterType :: Val Text   , _sSMParameterValue :: Val Text   } deriving (Show, Eq)@@ -31,7 +33,9 @@         [ fmap (("AllowedPattern",) . toJSON) _sSMParameterAllowedPattern         , fmap (("Description",) . toJSON) _sSMParameterDescription         , fmap (("Name",) . toJSON) _sSMParameterName+        , fmap (("Policies",) . toJSON) _sSMParameterPolicies         , fmap (("Tags",) . toJSON) _sSMParameterTags+        , fmap (("Tier",) . toJSON) _sSMParameterTier         , (Just . ("Type",) . toJSON) _sSMParameterType         , (Just . ("Value",) . toJSON) _sSMParameterValue         ]@@ -47,7 +51,9 @@   { _sSMParameterAllowedPattern = Nothing   , _sSMParameterDescription = Nothing   , _sSMParameterName = Nothing+  , _sSMParameterPolicies = Nothing   , _sSMParameterTags = Nothing+  , _sSMParameterTier = Nothing   , _sSMParameterType = typearg   , _sSMParameterValue = valuearg   }@@ -64,9 +70,17 @@ ssmpName :: Lens' SSMParameter (Maybe (Val Text)) ssmpName = lens _sSMParameterName (\s a -> s { _sSMParameterName = a }) +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssm-parameter.html#cfn-ssm-parameter-policies+ssmpPolicies :: Lens' SSMParameter (Maybe (Val Text))+ssmpPolicies = lens _sSMParameterPolicies (\s a -> s { _sSMParameterPolicies = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssm-parameter.html#cfn-ssm-parameter-tags ssmpTags :: Lens' SSMParameter (Maybe Object) ssmpTags = lens _sSMParameterTags (\s a -> s { _sSMParameterTags = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssm-parameter.html#cfn-ssm-parameter-tier+ssmpTier :: Lens' SSMParameter (Maybe (Val Text))+ssmpTier = lens _sSMParameterTier (\s a -> s { _sSMParameterTier = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssm-parameter.html#cfn-ssm-parameter-type ssmpType :: Lens' SSMParameter (Val Text)

@@ -0,0 +1,73 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-servicecatalog-resourceupdateconstraint.html++module Stratosphere.Resources.ServiceCatalogResourceUpdateConstraint where++import Stratosphere.ResourceImports+++-- | Full data type definition for ServiceCatalogResourceUpdateConstraint. See+-- 'serviceCatalogResourceUpdateConstraint' for a more convenient+-- constructor.+data ServiceCatalogResourceUpdateConstraint =+  ServiceCatalogResourceUpdateConstraint+  { _serviceCatalogResourceUpdateConstraintAcceptLanguage :: Maybe (Val Text)+  , _serviceCatalogResourceUpdateConstraintDescription :: Maybe (Val Text)+  , _serviceCatalogResourceUpdateConstraintPortfolioId :: Val Text+  , _serviceCatalogResourceUpdateConstraintProductId :: Val Text+  , _serviceCatalogResourceUpdateConstraintTagUpdateOnProvisionedProduct :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties ServiceCatalogResourceUpdateConstraint where+  toResourceProperties ServiceCatalogResourceUpdateConstraint{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::ServiceCatalog::ResourceUpdateConstraint"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("AcceptLanguage",) . toJSON) _serviceCatalogResourceUpdateConstraintAcceptLanguage+        , fmap (("Description",) . toJSON) _serviceCatalogResourceUpdateConstraintDescription+        , (Just . ("PortfolioId",) . toJSON) _serviceCatalogResourceUpdateConstraintPortfolioId+        , (Just . ("ProductId",) . toJSON) _serviceCatalogResourceUpdateConstraintProductId+        , (Just . ("TagUpdateOnProvisionedProduct",) . toJSON) _serviceCatalogResourceUpdateConstraintTagUpdateOnProvisionedProduct+        ]+    }++-- | Constructor for 'ServiceCatalogResourceUpdateConstraint' containing+-- required fields as arguments.+serviceCatalogResourceUpdateConstraint+  :: Val Text -- ^ 'scrucPortfolioId'+  -> Val Text -- ^ 'scrucProductId'+  -> Val Text -- ^ 'scrucTagUpdateOnProvisionedProduct'+  -> ServiceCatalogResourceUpdateConstraint+serviceCatalogResourceUpdateConstraint portfolioIdarg productIdarg tagUpdateOnProvisionedProductarg =+  ServiceCatalogResourceUpdateConstraint+  { _serviceCatalogResourceUpdateConstraintAcceptLanguage = Nothing+  , _serviceCatalogResourceUpdateConstraintDescription = Nothing+  , _serviceCatalogResourceUpdateConstraintPortfolioId = portfolioIdarg+  , _serviceCatalogResourceUpdateConstraintProductId = productIdarg+  , _serviceCatalogResourceUpdateConstraintTagUpdateOnProvisionedProduct = tagUpdateOnProvisionedProductarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-servicecatalog-resourceupdateconstraint.html#cfn-servicecatalog-resourceupdateconstraint-acceptlanguage+scrucAcceptLanguage :: Lens' ServiceCatalogResourceUpdateConstraint (Maybe (Val Text))+scrucAcceptLanguage = lens _serviceCatalogResourceUpdateConstraintAcceptLanguage (\s a -> s { _serviceCatalogResourceUpdateConstraintAcceptLanguage = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-servicecatalog-resourceupdateconstraint.html#cfn-servicecatalog-resourceupdateconstraint-description+scrucDescription :: Lens' ServiceCatalogResourceUpdateConstraint (Maybe (Val Text))+scrucDescription = lens _serviceCatalogResourceUpdateConstraintDescription (\s a -> s { _serviceCatalogResourceUpdateConstraintDescription = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-servicecatalog-resourceupdateconstraint.html#cfn-servicecatalog-resourceupdateconstraint-portfolioid+scrucPortfolioId :: Lens' ServiceCatalogResourceUpdateConstraint (Val Text)+scrucPortfolioId = lens _serviceCatalogResourceUpdateConstraintPortfolioId (\s a -> s { _serviceCatalogResourceUpdateConstraintPortfolioId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-servicecatalog-resourceupdateconstraint.html#cfn-servicecatalog-resourceupdateconstraint-productid+scrucProductId :: Lens' ServiceCatalogResourceUpdateConstraint (Val Text)+scrucProductId = lens _serviceCatalogResourceUpdateConstraintProductId (\s a -> s { _serviceCatalogResourceUpdateConstraintProductId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-servicecatalog-resourceupdateconstraint.html#cfn-servicecatalog-resourceupdateconstraint-tagupdateonprovisionedproduct+scrucTagUpdateOnProvisionedProduct :: Lens' ServiceCatalogResourceUpdateConstraint (Val Text)+scrucTagUpdateOnProvisionedProduct = lens _serviceCatalogResourceUpdateConstraintTagUpdateOnProvisionedProduct (\s a -> s { _serviceCatalogResourceUpdateConstraintTagUpdateOnProvisionedProduct = a })

@@ -0,0 +1,77 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html++module Stratosphere.Resources.TransferServer where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.TransferServerEndpointDetails+import Stratosphere.ResourceProperties.TransferServerIdentityProviderDetails+import Stratosphere.ResourceProperties.Tag++-- | Full data type definition for TransferServer. See 'transferServer' for a+-- more convenient constructor.+data TransferServer =+  TransferServer+  { _transferServerEndpointDetails :: Maybe TransferServerEndpointDetails+  , _transferServerEndpointType :: Maybe (Val Text)+  , _transferServerIdentityProviderDetails :: Maybe TransferServerIdentityProviderDetails+  , _transferServerIdentityProviderType :: Maybe (Val Text)+  , _transferServerLoggingRole :: Maybe (Val Text)+  , _transferServerTags :: Maybe [Tag]+  } deriving (Show, Eq)++instance ToResourceProperties TransferServer where+  toResourceProperties TransferServer{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::Transfer::Server"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("EndpointDetails",) . toJSON) _transferServerEndpointDetails+        , fmap (("EndpointType",) . toJSON) _transferServerEndpointType+        , fmap (("IdentityProviderDetails",) . toJSON) _transferServerIdentityProviderDetails+        , fmap (("IdentityProviderType",) . toJSON) _transferServerIdentityProviderType+        , fmap (("LoggingRole",) . toJSON) _transferServerLoggingRole+        , fmap (("Tags",) . toJSON) _transferServerTags+        ]+    }++-- | Constructor for 'TransferServer' containing required fields as arguments.+transferServer+  :: TransferServer+transferServer  =+  TransferServer+  { _transferServerEndpointDetails = Nothing+  , _transferServerEndpointType = Nothing+  , _transferServerIdentityProviderDetails = Nothing+  , _transferServerIdentityProviderType = Nothing+  , _transferServerLoggingRole = Nothing+  , _transferServerTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-endpointdetails+tsEndpointDetails :: Lens' TransferServer (Maybe TransferServerEndpointDetails)+tsEndpointDetails = lens _transferServerEndpointDetails (\s a -> s { _transferServerEndpointDetails = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-endpointtype+tsEndpointType :: Lens' TransferServer (Maybe (Val Text))+tsEndpointType = lens _transferServerEndpointType (\s a -> s { _transferServerEndpointType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-identityproviderdetails+tsIdentityProviderDetails :: Lens' TransferServer (Maybe TransferServerIdentityProviderDetails)+tsIdentityProviderDetails = lens _transferServerIdentityProviderDetails (\s a -> s { _transferServerIdentityProviderDetails = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-identityprovidertype+tsIdentityProviderType :: Lens' TransferServer (Maybe (Val Text))+tsIdentityProviderType = lens _transferServerIdentityProviderType (\s a -> s { _transferServerIdentityProviderType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-loggingrole+tsLoggingRole :: Lens' TransferServer (Maybe (Val Text))+tsLoggingRole = lens _transferServerLoggingRole (\s a -> s { _transferServerLoggingRole = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-tags+tsTags :: Lens' TransferServer (Maybe [Tag])+tsTags = lens _transferServerTags (\s a -> s { _transferServerTags = a })

@@ -0,0 +1,78 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html++module Stratosphere.Resources.TransferUser where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.Tag++-- | Full data type definition for TransferUser. See 'transferUser' for a more+-- convenient constructor.+data TransferUser =+  TransferUser+  { _transferUserHomeDirectory :: Maybe (Val Text)+  , _transferUserPolicy :: Maybe (Val Text)+  , _transferUserRole :: Val Text+  , _transferUserServerId :: Val Text+  , _transferUserTags :: Maybe [Tag]+  , _transferUserUserName :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties TransferUser where+  toResourceProperties TransferUser{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::Transfer::User"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("HomeDirectory",) . toJSON) _transferUserHomeDirectory+        , fmap (("Policy",) . toJSON) _transferUserPolicy+        , (Just . ("Role",) . toJSON) _transferUserRole+        , (Just . ("ServerId",) . toJSON) _transferUserServerId+        , fmap (("Tags",) . toJSON) _transferUserTags+        , (Just . ("UserName",) . toJSON) _transferUserUserName+        ]+    }++-- | Constructor for 'TransferUser' containing required fields as arguments.+transferUser+  :: Val Text -- ^ 'tuRole'+  -> Val Text -- ^ 'tuServerId'+  -> Val Text -- ^ 'tuUserName'+  -> TransferUser+transferUser rolearg serverIdarg userNamearg =+  TransferUser+  { _transferUserHomeDirectory = Nothing+  , _transferUserPolicy = Nothing+  , _transferUserRole = rolearg+  , _transferUserServerId = serverIdarg+  , _transferUserTags = Nothing+  , _transferUserUserName = userNamearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html#cfn-transfer-user-homedirectory+tuHomeDirectory :: Lens' TransferUser (Maybe (Val Text))+tuHomeDirectory = lens _transferUserHomeDirectory (\s a -> s { _transferUserHomeDirectory = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html#cfn-transfer-user-policy+tuPolicy :: Lens' TransferUser (Maybe (Val Text))+tuPolicy = lens _transferUserPolicy (\s a -> s { _transferUserPolicy = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html#cfn-transfer-user-role+tuRole :: Lens' TransferUser (Val Text)+tuRole = lens _transferUserRole (\s a -> s { _transferUserRole = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html#cfn-transfer-user-serverid+tuServerId :: Lens' TransferUser (Val Text)+tuServerId = lens _transferUserServerId (\s a -> s { _transferUserServerId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html#cfn-transfer-user-tags+tuTags :: Lens' TransferUser (Maybe [Tag])+tuTags = lens _transferUserTags (\s a -> s { _transferUserTags = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-user.html#cfn-transfer-user-username+tuUserName :: Lens' TransferUser (Val Text)+tuUserName = lens _transferUserUserName (\s a -> s { _transferUserUserName = a })

@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-geomatchset.html++module Stratosphere.Resources.WAFRegionalGeoMatchSet where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.WAFRegionalGeoMatchSetGeoMatchConstraint++-- | Full data type definition for WAFRegionalGeoMatchSet. See+-- 'wafRegionalGeoMatchSet' for a more convenient constructor.+data WAFRegionalGeoMatchSet =+  WAFRegionalGeoMatchSet+  { _wAFRegionalGeoMatchSetGeoMatchConstraints :: Maybe [WAFRegionalGeoMatchSetGeoMatchConstraint]+  , _wAFRegionalGeoMatchSetName :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties WAFRegionalGeoMatchSet where+  toResourceProperties WAFRegionalGeoMatchSet{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::WAFRegional::GeoMatchSet"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("GeoMatchConstraints",) . toJSON) _wAFRegionalGeoMatchSetGeoMatchConstraints+        , (Just . ("Name",) . toJSON) _wAFRegionalGeoMatchSetName+        ]+    }++-- | Constructor for 'WAFRegionalGeoMatchSet' containing required fields as+-- arguments.+wafRegionalGeoMatchSet+  :: Val Text -- ^ 'wafrgmsName'+  -> WAFRegionalGeoMatchSet+wafRegionalGeoMatchSet namearg =+  WAFRegionalGeoMatchSet+  { _wAFRegionalGeoMatchSetGeoMatchConstraints = Nothing+  , _wAFRegionalGeoMatchSetName = namearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-geomatchset.html#cfn-wafregional-geomatchset-geomatchconstraints+wafrgmsGeoMatchConstraints :: Lens' WAFRegionalGeoMatchSet (Maybe [WAFRegionalGeoMatchSetGeoMatchConstraint])+wafrgmsGeoMatchConstraints = lens _wAFRegionalGeoMatchSetGeoMatchConstraints (\s a -> s { _wAFRegionalGeoMatchSetGeoMatchConstraints = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-geomatchset.html#cfn-wafregional-geomatchset-name+wafrgmsName :: Lens' WAFRegionalGeoMatchSet (Val Text)+wafrgmsName = lens _wAFRegionalGeoMatchSetName (\s a -> s { _wAFRegionalGeoMatchSetName = a })

@@ -0,0 +1,73 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-ratebasedrule.html++module Stratosphere.Resources.WAFRegionalRateBasedRule where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.WAFRegionalRateBasedRulePredicate++-- | Full data type definition for WAFRegionalRateBasedRule. See+-- 'wafRegionalRateBasedRule' for a more convenient constructor.+data WAFRegionalRateBasedRule =+  WAFRegionalRateBasedRule+  { _wAFRegionalRateBasedRuleMatchPredicates :: Maybe [WAFRegionalRateBasedRulePredicate]+  , _wAFRegionalRateBasedRuleMetricName :: Val Text+  , _wAFRegionalRateBasedRuleName :: Val Text+  , _wAFRegionalRateBasedRuleRateKey :: Val Text+  , _wAFRegionalRateBasedRuleRateLimit :: Val Integer+  } deriving (Show, Eq)++instance ToResourceProperties WAFRegionalRateBasedRule where+  toResourceProperties WAFRegionalRateBasedRule{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::WAFRegional::RateBasedRule"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("MatchPredicates",) . toJSON) _wAFRegionalRateBasedRuleMatchPredicates+        , (Just . ("MetricName",) . toJSON) _wAFRegionalRateBasedRuleMetricName+        , (Just . ("Name",) . toJSON) _wAFRegionalRateBasedRuleName+        , (Just . ("RateKey",) . toJSON) _wAFRegionalRateBasedRuleRateKey+        , (Just . ("RateLimit",) . toJSON) _wAFRegionalRateBasedRuleRateLimit+        ]+    }++-- | Constructor for 'WAFRegionalRateBasedRule' containing required fields as+-- arguments.+wafRegionalRateBasedRule+  :: Val Text -- ^ 'wafrrbrMetricName'+  -> Val Text -- ^ 'wafrrbrName'+  -> Val Text -- ^ 'wafrrbrRateKey'+  -> Val Integer -- ^ 'wafrrbrRateLimit'+  -> WAFRegionalRateBasedRule+wafRegionalRateBasedRule metricNamearg namearg rateKeyarg rateLimitarg =+  WAFRegionalRateBasedRule+  { _wAFRegionalRateBasedRuleMatchPredicates = Nothing+  , _wAFRegionalRateBasedRuleMetricName = metricNamearg+  , _wAFRegionalRateBasedRuleName = namearg+  , _wAFRegionalRateBasedRuleRateKey = rateKeyarg+  , _wAFRegionalRateBasedRuleRateLimit = rateLimitarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-ratebasedrule.html#cfn-wafregional-ratebasedrule-matchpredicates+wafrrbrMatchPredicates :: Lens' WAFRegionalRateBasedRule (Maybe [WAFRegionalRateBasedRulePredicate])+wafrrbrMatchPredicates = lens _wAFRegionalRateBasedRuleMatchPredicates (\s a -> s { _wAFRegionalRateBasedRuleMatchPredicates = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-ratebasedrule.html#cfn-wafregional-ratebasedrule-metricname+wafrrbrMetricName :: Lens' WAFRegionalRateBasedRule (Val Text)+wafrrbrMetricName = lens _wAFRegionalRateBasedRuleMetricName (\s a -> s { _wAFRegionalRateBasedRuleMetricName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-ratebasedrule.html#cfn-wafregional-ratebasedrule-name+wafrrbrName :: Lens' WAFRegionalRateBasedRule (Val Text)+wafrrbrName = lens _wAFRegionalRateBasedRuleName (\s a -> s { _wAFRegionalRateBasedRuleName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-ratebasedrule.html#cfn-wafregional-ratebasedrule-ratekey+wafrrbrRateKey :: Lens' WAFRegionalRateBasedRule (Val Text)+wafrrbrRateKey = lens _wAFRegionalRateBasedRuleRateKey (\s a -> s { _wAFRegionalRateBasedRuleRateKey = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-ratebasedrule.html#cfn-wafregional-ratebasedrule-ratelimit+wafrrbrRateLimit :: Lens' WAFRegionalRateBasedRule (Val Integer)+wafrrbrRateLimit = lens _wAFRegionalRateBasedRuleRateLimit (\s a -> s { _wAFRegionalRateBasedRuleRateLimit = a })

@@ -0,0 +1,50 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-regexpatternset.html++module Stratosphere.Resources.WAFRegionalRegexPatternSet where++import Stratosphere.ResourceImports+++-- | Full data type definition for WAFRegionalRegexPatternSet. See+-- 'wafRegionalRegexPatternSet' for a more convenient constructor.+data WAFRegionalRegexPatternSet =+  WAFRegionalRegexPatternSet+  { _wAFRegionalRegexPatternSetName :: Val Text+  , _wAFRegionalRegexPatternSetRegexPatternStrings :: ValList Text+  } deriving (Show, Eq)++instance ToResourceProperties WAFRegionalRegexPatternSet where+  toResourceProperties WAFRegionalRegexPatternSet{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::WAFRegional::RegexPatternSet"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ (Just . ("Name",) . toJSON) _wAFRegionalRegexPatternSetName+        , (Just . ("RegexPatternStrings",) . toJSON) _wAFRegionalRegexPatternSetRegexPatternStrings+        ]+    }++-- | Constructor for 'WAFRegionalRegexPatternSet' containing required fields+-- as arguments.+wafRegionalRegexPatternSet+  :: Val Text -- ^ 'wafrrpsName'+  -> ValList Text -- ^ 'wafrrpsRegexPatternStrings'+  -> WAFRegionalRegexPatternSet+wafRegionalRegexPatternSet namearg regexPatternStringsarg =+  WAFRegionalRegexPatternSet+  { _wAFRegionalRegexPatternSetName = namearg+  , _wAFRegionalRegexPatternSetRegexPatternStrings = regexPatternStringsarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-regexpatternset.html#cfn-wafregional-regexpatternset-name+wafrrpsName :: Lens' WAFRegionalRegexPatternSet (Val Text)+wafrrpsName = lens _wAFRegionalRegexPatternSetName (\s a -> s { _wAFRegionalRegexPatternSetName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-wafregional-regexpatternset.html#cfn-wafregional-regexpatternset-regexpatternstrings+wafrrpsRegexPatternStrings :: Lens' WAFRegionalRegexPatternSet (ValList Text)+wafrrpsRegexPatternStrings = lens _wAFRegionalRegexPatternSetRegexPatternStrings (\s a -> s { _wAFRegionalRegexPatternSetRegexPatternStrings = a })

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: f0835a7de25f869d86ff57e164902e61d6a729a6306f6c1b10c577e05936b42c+-- hash: 866acc984fe2a54845e7421026b6720e78e88e473125a00dd5be0a4e07c9cdef  name:           stratosphere-version:        0.37.0+version:        0.38.0 synopsis:       EDSL for AWS CloudFormation description:    EDSL for AWS CloudFormation category:       AWS, Cloud@@ -137,6 +137,8 @@       Stratosphere.ResourceProperties.AppSyncDataSourceLambdaConfig       Stratosphere.ResourceProperties.AppSyncDataSourceRdsHttpEndpointConfig       Stratosphere.ResourceProperties.AppSyncDataSourceRelationalDatabaseConfig+      Stratosphere.ResourceProperties.AppSyncGraphQLApiAdditionalAuthenticationProvider+      Stratosphere.ResourceProperties.AppSyncGraphQLApiCognitoUserPoolConfig       Stratosphere.ResourceProperties.AppSyncGraphQLApiLogConfig       Stratosphere.ResourceProperties.AppSyncGraphQLApiOpenIDConnectConfig       Stratosphere.ResourceProperties.AppSyncGraphQLApiUserPoolConfig@@ -225,6 +227,7 @@       Stratosphere.ResourceProperties.CodeBuildProjectGitSubmodulesConfig       Stratosphere.ResourceProperties.CodeBuildProjectLogsConfig       Stratosphere.ResourceProperties.CodeBuildProjectProjectCache+      Stratosphere.ResourceProperties.CodeBuildProjectProjectSourceVersion       Stratosphere.ResourceProperties.CodeBuildProjectProjectTriggers       Stratosphere.ResourceProperties.CodeBuildProjectRegistryCredential       Stratosphere.ResourceProperties.CodeBuildProjectS3LogsConfig@@ -232,7 +235,9 @@       Stratosphere.ResourceProperties.CodeBuildProjectSourceAuth       Stratosphere.ResourceProperties.CodeBuildProjectVpcConfig       Stratosphere.ResourceProperties.CodeBuildProjectWebhookFilter+      Stratosphere.ResourceProperties.CodeCommitRepositoryCode       Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger+      Stratosphere.ResourceProperties.CodeCommitRepositoryS3       Stratosphere.ResourceProperties.CodeDeployDeploymentConfigMinimumHealthyHosts       Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarm       Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarmConfiguration@@ -320,6 +325,7 @@       Stratosphere.ResourceProperties.DynamoDBTableSSESpecification       Stratosphere.ResourceProperties.DynamoDBTableStreamSpecification       Stratosphere.ResourceProperties.DynamoDBTableTimeToLiveSpecification+      Stratosphere.ResourceProperties.EC2CapacityReservationTagSpecification       Stratosphere.ResourceProperties.EC2EC2FleetFleetLaunchTemplateConfigRequest       Stratosphere.ResourceProperties.EC2EC2FleetFleetLaunchTemplateOverridesRequest       Stratosphere.ResourceProperties.EC2EC2FleetFleetLaunchTemplateSpecificationRequest@@ -398,6 +404,7 @@       Stratosphere.ResourceProperties.ECSServicePlacementStrategy       Stratosphere.ResourceProperties.ECSServiceServiceRegistry       Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDefinition+      Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency       Stratosphere.ResourceProperties.ECSTaskDefinitionDevice       Stratosphere.ResourceProperties.ECSTaskDefinitionDockerVolumeConfiguration       Stratosphere.ResourceProperties.ECSTaskDefinitionHealthCheck@@ -409,6 +416,7 @@       Stratosphere.ResourceProperties.ECSTaskDefinitionLogConfiguration       Stratosphere.ResourceProperties.ECSTaskDefinitionMountPoint       Stratosphere.ResourceProperties.ECSTaskDefinitionPortMapping+      Stratosphere.ResourceProperties.ECSTaskDefinitionProxyConfiguration       Stratosphere.ResourceProperties.ECSTaskDefinitionRepositoryCredentials       Stratosphere.ResourceProperties.ECSTaskDefinitionTaskDefinitionPlacementConstraint       Stratosphere.ResourceProperties.ECSTaskDefinitionTmpfs@@ -519,6 +527,7 @@       Stratosphere.ResourceProperties.GameLiftAliasRoutingStrategy       Stratosphere.ResourceProperties.GameLiftBuildS3Location       Stratosphere.ResourceProperties.GameLiftFleetIpPermission+      Stratosphere.ResourceProperties.GlueClassifierCsvClassifier       Stratosphere.ResourceProperties.GlueClassifierGrokClassifier       Stratosphere.ResourceProperties.GlueClassifierJsonClassifier       Stratosphere.ResourceProperties.GlueClassifierXMLClassifier@@ -530,6 +539,9 @@       Stratosphere.ResourceProperties.GlueCrawlerSchemaChangePolicy       Stratosphere.ResourceProperties.GlueCrawlerTargets       Stratosphere.ResourceProperties.GlueDatabaseDatabaseInput+      Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption+      Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings+      Stratosphere.ResourceProperties.GlueDataCatalogEncryptionSettingsEncryptionAtRest       Stratosphere.ResourceProperties.GlueJobConnectionsList       Stratosphere.ResourceProperties.GlueJobExecutionProperty       Stratosphere.ResourceProperties.GlueJobJobCommand@@ -539,6 +551,10 @@       Stratosphere.ResourceProperties.GluePartitionSerdeInfo       Stratosphere.ResourceProperties.GluePartitionSkewedInfo       Stratosphere.ResourceProperties.GluePartitionStorageDescriptor+      Stratosphere.ResourceProperties.GlueSecurityConfigurationCloudWatchEncryption+      Stratosphere.ResourceProperties.GlueSecurityConfigurationEncryptionConfiguration+      Stratosphere.ResourceProperties.GlueSecurityConfigurationJobBookmarksEncryption+      Stratosphere.ResourceProperties.GlueSecurityConfigurationS3Encryption       Stratosphere.ResourceProperties.GlueTableColumn       Stratosphere.ResourceProperties.GlueTableOrder       Stratosphere.ResourceProperties.GlueTableSerdeInfo@@ -738,6 +754,7 @@       Stratosphere.ResourceProperties.LambdaFunctionVpcConfig       Stratosphere.ResourceProperties.LambdaLayerVersionContent       Stratosphere.ResourceProperties.LogsMetricFilterMetricTransformation+      Stratosphere.ResourceProperties.MediaStoreContainerCorsRule       Stratosphere.ResourceProperties.OpsWorksAppDataSource       Stratosphere.ResourceProperties.OpsWorksAppEnvironmentVariable       Stratosphere.ResourceProperties.OpsWorksAppSource@@ -757,6 +774,20 @@       Stratosphere.ResourceProperties.OpsWorksStackRdsDbInstance       Stratosphere.ResourceProperties.OpsWorksStackSource       Stratosphere.ResourceProperties.OpsWorksStackStackConfigurationManager+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetDeliveryOptions+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationCloudWatchDestination+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationDimensionConfiguration+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationEventDestination+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationPinpointDestination+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetEventDestinationSnsDestination+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetReputationOptions+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetSendingOptions+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTags+      Stratosphere.ResourceProperties.PinpointEmailConfigurationSetTrackingOptions+      Stratosphere.ResourceProperties.PinpointEmailDedicatedIpPoolTags+      Stratosphere.ResourceProperties.PinpointEmailIdentityMailFromAttributes+      Stratosphere.ResourceProperties.PinpointEmailIdentityTags       Stratosphere.ResourceProperties.RDSDBClusterScalingConfiguration       Stratosphere.ResourceProperties.RDSDBInstanceProcessorFeature       Stratosphere.ResourceProperties.RDSDBSecurityGroupIngressProperty@@ -873,12 +904,16 @@       Stratosphere.ResourceProperties.StepFunctionsActivityTagsEntry       Stratosphere.ResourceProperties.StepFunctionsStateMachineTagsEntry       Stratosphere.ResourceProperties.Tag+      Stratosphere.ResourceProperties.TransferServerEndpointDetails+      Stratosphere.ResourceProperties.TransferServerIdentityProviderDetails       Stratosphere.ResourceProperties.WAFByteMatchSetByteMatchTuple       Stratosphere.ResourceProperties.WAFByteMatchSetFieldToMatch       Stratosphere.ResourceProperties.WAFIPSetIPSetDescriptor       Stratosphere.ResourceProperties.WAFRegionalByteMatchSetByteMatchTuple       Stratosphere.ResourceProperties.WAFRegionalByteMatchSetFieldToMatch+      Stratosphere.ResourceProperties.WAFRegionalGeoMatchSetGeoMatchConstraint       Stratosphere.ResourceProperties.WAFRegionalIPSetIPSetDescriptor+      Stratosphere.ResourceProperties.WAFRegionalRateBasedRulePredicate       Stratosphere.ResourceProperties.WAFRegionalRulePredicate       Stratosphere.ResourceProperties.WAFRegionalSizeConstraintSetFieldToMatch       Stratosphere.ResourceProperties.WAFRegionalSizeConstraintSetSizeConstraint@@ -1015,6 +1050,7 @@       Stratosphere.Resources.DocDBDBInstance       Stratosphere.Resources.DocDBDBSubnetGroup       Stratosphere.Resources.DynamoDBTable+      Stratosphere.Resources.EC2CapacityReservation       Stratosphere.Resources.EC2CustomerGateway       Stratosphere.Resources.EC2DHCPOptions       Stratosphere.Resources.EC2EC2Fleet@@ -1102,9 +1138,11 @@       Stratosphere.Resources.GlueConnection       Stratosphere.Resources.GlueCrawler       Stratosphere.Resources.GlueDatabase+      Stratosphere.Resources.GlueDataCatalogEncryptionSettings       Stratosphere.Resources.GlueDevEndpoint       Stratosphere.Resources.GlueJob       Stratosphere.Resources.GluePartition+      Stratosphere.Resources.GlueSecurityConfiguration       Stratosphere.Resources.GlueTable       Stratosphere.Resources.GlueTrigger       Stratosphere.Resources.GreengrassConnectorDefinition@@ -1178,6 +1216,7 @@       Stratosphere.Resources.LogsLogStream       Stratosphere.Resources.LogsMetricFilter       Stratosphere.Resources.LogsSubscriptionFilter+      Stratosphere.Resources.MediaStoreContainer       Stratosphere.Resources.NeptuneDBCluster       Stratosphere.Resources.NeptuneDBClusterParameterGroup       Stratosphere.Resources.NeptuneDBInstance@@ -1191,6 +1230,10 @@       Stratosphere.Resources.OpsWorksStack       Stratosphere.Resources.OpsWorksUserProfile       Stratosphere.Resources.OpsWorksVolume+      Stratosphere.Resources.PinpointEmailConfigurationSet+      Stratosphere.Resources.PinpointEmailConfigurationSetEventDestination+      Stratosphere.Resources.PinpointEmailDedicatedIpPool+      Stratosphere.Resources.PinpointEmailIdentity       Stratosphere.Resources.RAMResourceShare       Stratosphere.Resources.RDSDBCluster       Stratosphere.Resources.RDSDBClusterParameterGroup@@ -1241,6 +1284,7 @@       Stratosphere.Resources.ServiceCatalogPortfolioPrincipalAssociation       Stratosphere.Resources.ServiceCatalogPortfolioProductAssociation       Stratosphere.Resources.ServiceCatalogPortfolioShare+      Stratosphere.Resources.ServiceCatalogResourceUpdateConstraint       Stratosphere.Resources.ServiceCatalogTagOption       Stratosphere.Resources.ServiceCatalogTagOptionAssociation       Stratosphere.Resources.ServiceDiscoveryHttpNamespace@@ -1268,10 +1312,15 @@       Stratosphere.Resources.SSMResourceDataSync       Stratosphere.Resources.StepFunctionsActivity       Stratosphere.Resources.StepFunctionsStateMachine+      Stratosphere.Resources.TransferServer+      Stratosphere.Resources.TransferUser       Stratosphere.Resources.WAFByteMatchSet       Stratosphere.Resources.WAFIPSet       Stratosphere.Resources.WAFRegionalByteMatchSet+      Stratosphere.Resources.WAFRegionalGeoMatchSet       Stratosphere.Resources.WAFRegionalIPSet+      Stratosphere.Resources.WAFRegionalRateBasedRule+      Stratosphere.Resources.WAFRegionalRegexPatternSet       Stratosphere.Resources.WAFRegionalRule       Stratosphere.Resources.WAFRegionalSizeConstraintSet       Stratosphere.Resources.WAFRegionalSqlInjectionMatchSet