stratosphere 0.60.0 → 1.0.0
raw patch · 2095 files changed
+1546/−131285 lines, 2095 filesdep +mono-traversabledep +sydtestdep +sydtest-discoverdep −hashabledep −hspecdep −hspec-discoverdep ~aesondep ~aeson-prettydep ~base
Dependencies added: mono-traversable, sydtest, sydtest-discover
Dependencies removed: hashable, hspec, hspec-discover, lens, template-haskell, unordered-containers
Dependency ranges changed: aeson, aeson-pretty, base, bytestring, containers, text
This diff is very large; some files are shown as “too large to diff”. Download the raw patch for the complete diff.
Files
- CHANGELOG.md +38/−0
- README.md +69/−64
- examples/auto-scaling-group.hs +0/−72
- examples/rds-master-replica.hs +0/−87
- examples/s3-copy.hs +0/−137
- examples/simple-lambda.hs +0/−91
- gen/Stratosphere/Tag.hs +33/−0
- gen/Stratosphere/Tag.hs-boot +9/−0
- library-gen/Stratosphere/ResourceProperties/ACMPCACertificateAuthorityCrlConfiguration.hs +0/−60
- library-gen/Stratosphere/ResourceProperties/ACMPCACertificateAuthorityRevocationConfiguration.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/ACMPCACertificateAuthoritySubject.hs +0/−129
- library-gen/Stratosphere/ResourceProperties/ACMPCACertificateValidity.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/ASKSkillAuthenticationConfiguration.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/ASKSkillOverrides.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/ASKSkillSkillPackage.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/AccessAnalyzerAnalyzerArchiveRule.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AccessAnalyzerAnalyzerFilter.hs +0/−67
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerConfigurationId.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerEncryptionOptions.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerInterBrokerCred.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLdapMetadata.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLdapServerMetadata.hs +0/−115
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLogList.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerMaintenanceWindow.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerServerMetadata.hs +0/−115
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerTagsEntry.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerUser.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationAssociationConfigurationId.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationTagsEntry.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmplifyAppAutoBranchCreationConfig.hs +0/−95
- library-gen/Stratosphere/ResourceProperties/AmplifyAppBasicAuthConfig.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/AmplifyAppCustomRule.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/AmplifyAppEnvironmentVariable.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmplifyBranchBasicAuthConfig.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/AmplifyBranchEnvironmentVariable.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AmplifyDomainSubDomainSetting.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentAccessLogSetting.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentCanarySetting.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentDeploymentCanarySettings.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs +0/−101
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs +0/−168
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDocumentationPartLocation.hs +0/−66
- library-gen/Stratosphere/ResourceProperties/ApiGatewayDomainNameEndpointConfiguration.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs +0/−130
- library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs +0/−67
- library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiEndpointConfiguration.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs +0/−59
- library-gen/Stratosphere/ResourceProperties/ApiGatewayStageAccessLogSetting.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/ApiGatewayStageCanarySetting.hs +0/−59
- library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs +0/−101
- library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiBodyS3Location.hs +0/−59
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiCors.hs +0/−73
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides.hs +0/−62
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiGatewayManagedOverridesRouteSettings.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2ApiGatewayManagedOverridesStageOverrides.hs +0/−76
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2AuthorizerJWTConfiguration.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2DomainNameDomainNameConfiguration.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2IntegrationTlsConfig.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteParameterConstraints.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteResponseParameterConstraints.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageAccessLogSettings.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageRouteSettings.hs +0/−66
- library-gen/Stratosphere/ResourceProperties/AppConfigApplicationTags.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppConfigConfigurationProfileTags.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppConfigConfigurationProfileValidators.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AppConfigDeploymentStrategyTags.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppConfigDeploymentTags.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppConfigEnvironmentMonitors.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppConfigEnvironmentTags.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteGatewayRouteSpec.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteGatewayRouteTarget.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteGatewayRouteVirtualService.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteGrpcGatewayRoute.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteGrpcGatewayRouteAction.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteGrpcGatewayRouteMatch.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteHttpGatewayRoute.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteHttpGatewayRouteAction.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshGatewayRouteHttpGatewayRouteMatch.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshMeshEgressFilter.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshMeshMeshSpec.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteDuration.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcRetryPolicy.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcRoute.hs +0/−64
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcRouteAction.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcRouteMatch.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcRouteMetadata.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcRouteMetadataMatchMethod.hs +0/−67
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteGrpcTimeout.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHeaderMatchMethod.hs +0/−66
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHttpRetryPolicy.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHttpRoute.hs +0/−64
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHttpRouteAction.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHttpRouteHeader.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHttpRouteMatch.hs +0/−60
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteHttpTimeout.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteMatchRange.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteRouteSpec.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteTcpRoute.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteTcpRouteAction.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteTcpTimeout.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshRouteWeightedTarget.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayAccessLog.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayBackendDefaults.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayClientPolicy.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayClientPolicyTls.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayFileAccessLog.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy.hs +0/−87
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayListener.hs +0/−57
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayListenerTls.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate.hs +0/−42
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate.hs +0/−50
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayLogging.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayPortMapping.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewaySpec.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayTlsValidationContext.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust.hs +0/−42
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust.hs +0/−42
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeAccessLog.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeAwsCloudMapInstanceAttribute.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeAwsCloudMapServiceDiscovery.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeBackend.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeBackendDefaults.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeClientPolicy.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeClientPolicyTls.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeDnsServiceDiscovery.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeDuration.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeFileAccessLog.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeGrpcTimeout.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeHealthCheck.hs +0/−85
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeHttpTimeout.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeListener.hs +0/−63
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeListenerTimeout.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeListenerTls.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeListenerTlsAcmCertificate.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeListenerTlsCertificate.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeListenerTlsFileCertificate.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeLogging.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodePortMapping.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeServiceDiscovery.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeTcpTimeout.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeTlsValidationContext.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeTlsValidationContextAcmTrust.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeTlsValidationContextFileTrust.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeTlsValidationContextTrust.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeVirtualNodeSpec.hs +0/−70
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualNodeVirtualServiceBackend.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualRouterPortMapping.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualRouterVirtualRouterListener.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualRouterVirtualRouterSpec.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualServiceVirtualNodeServiceProvider.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualServiceVirtualRouterServiceProvider.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualServiceVirtualServiceProvider.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AppMeshVirtualServiceVirtualServiceSpec.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppStreamDirectoryConfigServiceAccountCredentials.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AppStreamFleetComputeCapacity.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppStreamFleetDomainJoinInfo.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppStreamFleetVpcConfig.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderAccessEndpoint.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderDomainJoinInfo.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderVpcConfig.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppStreamStackAccessEndpoint.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppStreamStackApplicationSettings.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AppStreamStackStorageConnector.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/AppStreamStackUserSetting.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAuthorizationConfig.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAwsIamConfig.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceDeltaSyncConfig.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceDynamoDBConfig.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceElasticsearchConfig.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceHttpConfig.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceLambdaConfig.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRdsHttpEndpointConfig.hs +0/−70
- library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRelationalDatabaseConfig.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiAdditionalAuthenticationProvider.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiCognitoUserPoolConfig.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiLogConfig.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiOpenIDConnectConfig.hs +0/−59
- library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiUserPoolConfig.hs +0/−59
- library-gen/Stratosphere/ResourceProperties/AppSyncResolverCachingConfig.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AppSyncResolverLambdaConflictHandlerConfig.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/AppSyncResolverPipelineConfig.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AppSyncResolverSyncConfig.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScalableTargetAction.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScheduledAction.hs +0/−70
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetSuspendedState.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification.hs +0/−72
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyMetricDimension.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs +0/−69
- library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration.hs +0/−79
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationAlarm.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationAlarmMetric.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationComponentConfiguration.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationComponentMonitoringSetting.hs +0/−76
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationConfigurationDetails.hs +0/−64
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationCustomComponent.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationLog.hs +0/−67
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationLogPattern.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationLogPatternSet.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationSubComponentConfigurationDetails.hs +0/−57
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationSubComponentTypeConfiguration.hs +0/−50
- library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationWindowsEvent.hs +0/−63
- library-gen/Stratosphere/ResourceProperties/AthenaDataCatalogTags.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AthenaWorkGroupEncryptionConfiguration.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AthenaWorkGroupResultConfiguration.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/AthenaWorkGroupResultConfigurationUpdates.hs +0/−60
- library-gen/Stratosphere/ResourceProperties/AthenaWorkGroupTags.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/AthenaWorkGroupWorkGroupConfiguration.hs +0/−67
- library-gen/Stratosphere/ResourceProperties/AthenaWorkGroupWorkGroupConfigurationUpdates.hs +0/−75
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupInstancesDistribution.hs +0/−75
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplate.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateOverrides.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateSpecification.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLifecycleHookSpecification.hs +0/−84
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMixedInstancesPolicy.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfiguration.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs +0/−74
- library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs +0/−62
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanApplicationSource.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification.hs +0/−72
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification.hs +0/−72
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanMetricDimension.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanScalingInstruction.hs +0/−139
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTagFilter.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTargetTrackingConfiguration.hs +0/−84
- library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyCustomizedMetricSpecification.hs +0/−71
- library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyMetricDimension.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyPredefinedMetricSpecification.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyTargetTrackingConfiguration.hs +0/−63
- library-gen/Stratosphere/ResourceProperties/BackupBackupPlanBackupPlanResourceType.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/BackupBackupPlanBackupRuleResourceType.hs +0/−91
- library-gen/Stratosphere/ResourceProperties/BackupBackupPlanCopyActionResourceType.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/BackupBackupPlanLifecycleResourceType.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/BackupBackupSelectionBackupSelectionResourceType.hs +0/−63
- library-gen/Stratosphere/ResourceProperties/BackupBackupSelectionConditionResourceType.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/BackupBackupVaultNotificationObjectType.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentComputeResources.hs +0/−150
- library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentLaunchTemplateSpecification.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionContainerProperties.hs +0/−143
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionDevice.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionEnvironment.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionLinuxParameters.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionMountPoints.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeProperties.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeRangeProperty.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionResourceRequirement.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionRetryStrategy.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionTimeout.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionUlimit.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumes.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumesHost.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/BatchJobQueueComputeEnvironmentOrder.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetBudgetData.hs +0/−91
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetCostTypes.hs +0/−108
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotification.hs +0/−62
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotificationWithSubscribers.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSpend.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSubscriber.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/BudgetsBudgetTimePeriod.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/CassandraTableBillingMode.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CassandraTableClusteringKeyColumn.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CassandraTableColumn.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CassandraTableProvisionedThroughput.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/Cloud9EnvironmentEC2Repository.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudFrontCachePolicyCachePolicyConfig.hs +0/−76
- library-gen/Stratosphere/ResourceProperties/CloudFrontCachePolicyCookiesConfig.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudFrontCachePolicyHeadersConfig.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/CloudFrontCachePolicyQueryStringsConfig.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig.hs +0/−43
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs +0/−154
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs +0/−75
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs +0/−147
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs +0/−152
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLambdaFunctionAssociation.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs +0/−91
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginGroup.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginGroupFailoverCriteria.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginGroupMember.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginGroupMembers.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginGroups.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionStatusCodes.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs +0/−67
- library-gen/Stratosphere/ResourceProperties/CloudFrontOriginRequestPolicyCookiesConfig.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudFrontOriginRequestPolicyHeadersConfig.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudFrontOriginRequestPolicyOriginRequestPolicyConfig.hs +0/−74
- library-gen/Stratosphere/ResourceProperties/CloudFrontOriginRequestPolicyQueryStringsConfig.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CloudFrontRealtimeLogConfigEndPoint.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudFrontRealtimeLogConfigKinesisStreamConfig.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionLogging.hs +0/−56
- library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionS3Origin.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionStreamingDistributionConfig.hs +0/−89
- library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionTrustedSigners.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CloudTrailTrailDataResource.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudTrailTrailEventSelector.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetric.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricDataQuery.hs +0/−74
- library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricStat.hs +0/−62
- library-gen/Stratosphere/ResourceProperties/CloudWatchAnomalyDetectorConfiguration.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CloudWatchAnomalyDetectorDimension.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CloudWatchAnomalyDetectorRange.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs +0/−95
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectBatchRestrictions.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectBuildStatusConfig.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectCloudWatchLogsConfig.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs +0/−91
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectGitSubmodulesConfig.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectLogsConfig.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectBuildBatchConfig.hs +0/−60
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectCache.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectFileSystemLocation.hs +0/−71
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectSourceVersion.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectTriggers.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectRegistryCredential.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectS3LogsConfig.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs +0/−104
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectVpcConfig.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/CodeBuildProjectWebhookFilter.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodeBuildReportGroupReportExportConfig.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodeBuildReportGroupS3ReportExportConfig.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryCode.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs +0/−70
- library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryS3.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarm.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarmConfiguration.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAutoRollbackConfiguration.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeploymentStyle.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSet.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSetListObject.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupELBInfo.hs +0/−38
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupLoadBalancerInfo.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSet.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSetListObject.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs +0/−68
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTargetGroupInfo.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTriggerConfig.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CodeGuruProfilerProfilingGroupChannel.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs +0/−49
- library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs +0/−86
- library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs +0/−59
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs +0/−99
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs +0/−63
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStoreMap.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs +0/−48
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs +0/−55
- library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookAuthConfiguration.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookFilterRule.hs +0/−46
- library-gen/Stratosphere/ResourceProperties/CodeStarGitHubRepositoryCode.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CodeStarGitHubRepositoryS3.hs +0/−54
- library-gen/Stratosphere/ResourceProperties/CodeStarNotificationsNotificationRuleTarget.hs +0/−47
- library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoIdentityProvider.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoStreams.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolPushSync.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentMappingRule.hs +0/−65
- library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRoleMapping.hs +0/−62
- library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRulesConfigurationType.hs +0/−41
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolAccountRecoverySetting.hs +0/−39
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolAdminCreateUserConfig.hs +0/−52
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolClientAnalyticsConfiguration.hs +0/−61
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolClientTokenValidityUnits.hs +0/−53
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolDeviceConfiguration.hs +0/−45
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolDomainCustomDomainConfigType.hs +0/−40
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolEmailConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolInviteMessageTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolLambdaConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolNumberAttributeConstraints.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPasswordPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPolicies.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRecoveryOption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolResourceServerResourceServerScopeType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentAccountTakeoverActionType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentAccountTakeoverActionsType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentAccountTakeoverRiskConfigurationType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentCompromisedCredentialsActionsType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentCompromisedCredentialsRiskConfigurationType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentNotifyConfigurationType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentNotifyEmailType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolRiskConfigurationAttachmentRiskExceptionConfigurationType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSchemaAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSmsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolStringAttributeConstraints.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUserAttributeType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUserPoolAddOns.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUsernameConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/CognitoUserPoolVerificationMessageTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorAccountAggregationSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorOrganizationAggregationSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigConformancePackConformancePackInputParameter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigOrganizationConfigRuleOrganizationCustomRuleMetadata.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigOrganizationConfigRuleOrganizationManagedRuleMetadata.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigOrganizationConformancePackConformancePackInputParameter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigRemediationConfigurationExecutionControls.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigRemediationConfigurationRemediationParameterValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigRemediationConfigurationResourceValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigRemediationConfigurationSsmControls.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ConfigRemediationConfigurationStaticValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DAXClusterSSESpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCreateRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCrossRegionCopyRetainRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCrossRegionCopyRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyFastRestoreRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyPolicyDetails.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyRetainRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicySchedule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointDynamoDbSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointElasticsearchSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointKafkaSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointKinesisSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointMongoDbSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointNeptuneSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DMSEndpointS3Settings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTablePointInTimeRecoverySpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableSSESpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/DynamoDBTableTimeToLiveSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2CapacityReservationTagSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2CarrierGatewayTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2ClientVpnEndpointCertificateAuthenticationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2ClientVpnEndpointClientAuthenticationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2ClientVpnEndpointConnectionLogOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2ClientVpnEndpointDirectoryServiceAuthenticationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2ClientVpnEndpointFederatedAuthenticationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2ClientVpnEndpointTagSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetCapacityReservationOptionsRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateConfigRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateOverridesRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateSpecificationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetOnDemandOptionsRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetPlacement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetSpotOptionsRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTargetCapacitySpecificationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceCpuOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceCreditSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticGpuSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticInferenceAccelerator.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceHibernationOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceLaunchTemplateSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceLicenseSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateBlockDeviceMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCpuOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCreditSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateEbs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateElasticGpuSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateHibernationOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIamInstanceProfile.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateInstanceMarketOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIpv6Add.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLicenseSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateMetadataOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateMonitoring.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateNetworkInterface.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePlacement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePrivateIpAdd.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateSpotOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateTagSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2LocalGatewayRouteTableVPCAssociationTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2PrefixListEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupEgressProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupIngressProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancersConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbsBlockDevice.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetFleetLaunchTemplateSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetGroupIdentifier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfileSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceNetworkInterfaceSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateOverrides.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLoadBalancersConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddressSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetLaunchSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetMonitoring.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetTagSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotPlacement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroup.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroupsConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2TrafficMirrorFilterRuleTrafficMirrorPortRange.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EC2VPNConnectionVpnTunnelOptionsSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECRRepositoryLifecyclePolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSCapacityProviderAutoScalingGroupProvider.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSCapacityProviderManagedScaling.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSClusterCapacityProviderStrategyItem.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSClusterClusterSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServiceAwsVpcConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentController.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServiceNetworkConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServicePlacementConstraint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServicePlacementStrategy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSServiceServiceRegistry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionAuthorizationConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDependency.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDevice.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDockerVolumeConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionEFSVolumeConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionEnvironmentFile.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionFirelensConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHealthCheck.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionInferenceAccelerator.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKernelCapabilities.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLinuxParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionProxyConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionRepositoryCredentials.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionResourceRequirement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionSecret.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionSystemControl.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTaskDefinitionPlacementConstraint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTmpfs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskSetAwsVpcConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskSetLoadBalancer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskSetNetworkConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskSetScale.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ECSTaskSetServiceRegistry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSAccessPointAccessPointTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSAccessPointCreationInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSAccessPointPosixUser.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSAccessPointRootDirectory.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSFileSystemBackupPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EFSFileSystemLifecyclePolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSClusterEncryptionConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSClusterProvider.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSClusterResourcesVpcConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSFargateProfileLabel.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSFargateProfileSelector.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSNodegroupLaunchTemplateSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSNodegroupRemoteAccess.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EKSNodegroupScalingConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterAutoScalingPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterCloudWatchAlarmDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterHadoopJarStepConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetProvisioningSpecifications.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceTypeConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterKerberosAttributes.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterKeyValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterMetricDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterScalingAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterScalingConstraints.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterScalingRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterScalingTrigger.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterSimpleScalingPolicyConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterSpotProvisioningSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterStepConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsBlockDeviceConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceTypeConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigSpotProvisioningSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigVolumeSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigAutoScalingPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigCloudWatchAlarmDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigMetricDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingConstraints.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingTrigger.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigSimpleScalingPolicyConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationResourceLifecycleConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationVersionLifecycleConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxAgeRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxCountRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateOidcConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificateCertificate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerFixedResponseConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerForwardConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRedirectConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleFixedResponseConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleForwardConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleHostHeaderConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleHttpHeaderConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleHttpRequestMethodConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRulePathPatternConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleQueryStringConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleQueryStringKeyValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRedirectConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleSourceIpConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleTargetGroupStickinessConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleTargetGroupTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerTargetGroupStickinessConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerTargetGroupTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerSubnetMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainAdvancedSecurityOptionsInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainCognitoOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainDomainEndpointOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEncryptionAtRestOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainLogPublishingOption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainMasterUserOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainNodeToNodeEncryptionOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainVPCOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainZoneAwarenessConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventSchemasDiscovererTagsEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventSchemasRegistryTagsEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventSchemasSchemaTagsEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsEventBusPolicyCondition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleAwsVpcConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleBatchArrayProperties.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleBatchParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleBatchRetryStrategy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleEcsParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleHttpParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleInputTransformer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleKinesisParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleNetworkConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleSqsParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/FMSPolicyIEMap.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/FMSPolicyPolicyTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/FMSPolicyResourceTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/FSxFileSystemLustreConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/FSxFileSystemSelfManagedActiveDirectoryConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/FSxFileSystemWindowsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftFleetCertificateConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftFleetResourceCreationLimitPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftFleetRuntimeConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftFleetServerProcess.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupAutoScalingPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupInstanceDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupInstanceDefinitions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupLaunchTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupTargetTrackingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameServerGroupVpcSubnets.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameSessionQueueDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftGameSessionQueuePlayerLatencyPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftMatchmakingConfigurationGameProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GameLiftScriptS3Location.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlobalAcceleratorEndpointGroupEndpointConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlobalAcceleratorListenerPortRange.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueClassifierCsvClassifier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueClassifierGrokClassifier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueClassifierJsonClassifier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueClassifierXMLClassifier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueConnectionConnectionInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueConnectionPhysicalConnectionRequirements.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerCatalogTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerDynamoDBTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerJdbcTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerS3Target.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchedule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchemaChangePolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueCrawlerTargets.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueDataCatalogEncryptionSettingsConnectionPasswordEncryption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueDataCatalogEncryptionSettingsDataCatalogEncryptionSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueDataCatalogEncryptionSettingsEncryptionAtRest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueDatabaseDatabaseInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueJobConnectionsList.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueJobExecutionProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueJobJobCommand.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueJobNotificationProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueMLTransformFindMatchesParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueMLTransformGlueTables.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueMLTransformInputRecordTables.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueMLTransformTransformParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GluePartitionColumn.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GluePartitionOrder.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GluePartitionPartitionInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GluePartitionSerdeInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GluePartitionSkewedInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GluePartitionStorageDescriptor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationCloudWatchEncryption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationEncryptionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationJobBookmarksEncryption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueSecurityConfigurationS3Encryption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTableColumn.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTableOrder.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTableSerdeInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTableSkewedInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTableStorageDescriptor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTableTableInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTriggerAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTriggerCondition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTriggerNotificationProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GlueTriggerPredicate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassConnectorDefinitionConnector.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassConnectorDefinitionConnectorDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassConnectorDefinitionVersionConnector.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassCoreDefinitionCore.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassCoreDefinitionCoreDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassCoreDefinitionVersionCore.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassDeviceDefinitionDevice.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassDeviceDefinitionDeviceDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassDeviceDefinitionVersionDevice.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionDefaultConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionEnvironment.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionExecution.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionFunction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionFunctionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionFunctionDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionResourceAccessPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionRunAs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionDefaultConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionEnvironment.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionExecution.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionFunction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionFunctionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionResourceAccessPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassFunctionDefinitionVersionRunAs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassGroupGroupVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassLoggerDefinitionLogger.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassLoggerDefinitionLoggerDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassLoggerDefinitionVersionLogger.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionGroupOwnerSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionLocalDeviceResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionLocalVolumeResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionResourceDataContainer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionResourceDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionResourceDownloadOwnerSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionResourceInstance.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionS3MachineLearningModelResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionSageMakerMachineLearningModelResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionSecretsManagerSecretResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionGroupOwnerSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionLocalDeviceResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionLocalVolumeResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionResourceDataContainer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionResourceDownloadOwnerSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionResourceInstance.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionS3MachineLearningModelResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionSageMakerMachineLearningModelResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassResourceDefinitionVersionSecretsManagerSecretResourceData.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassSubscriptionDefinitionSubscription.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassSubscriptionDefinitionSubscriptionDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GreengrassSubscriptionDefinitionVersionSubscription.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GuardDutyDetectorCFNDataSourceConfigurations.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GuardDutyDetectorCFNS3LogsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GuardDutyFilterCondition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/GuardDutyFilterFindingCriteria.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderDistributionConfigurationDistribution.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderImageImageTestsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderImagePipelineImageTestsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderImagePipelineSchedule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderImageRecipeComponentConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderImageRecipeEbsInstanceBlockDeviceSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderImageRecipeInstanceBlockDeviceMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderInfrastructureConfigurationLogging.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ImageBuilderInfrastructureConfigurationS3Logs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectDeviceTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectPlacementTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelChannelStorage.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelCustomerManagedS3.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelRetentionPeriod.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelServiceManagedS3.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetContainerAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentDeliveryRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentDeliveryRuleDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentVersionValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDeltaTime.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetGlueConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetIotEventsDestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetOutputFileUriValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetQueryAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetResourceConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetRetentionPeriod.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetS3DestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetSchedule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTrigger.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTriggeringDataset.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetVariable.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetVersioningConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreCustomerManagedS3.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreDatastoreStorage.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreRetentionPeriod.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreServiceManagedS3.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineActivity.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineAddAttributes.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineChannel.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDatastore.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceRegistryEnrich.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceShadowEnrich.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineLambda.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineMath.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineRemoveAttributes.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineSelectAttributes.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelAssetPropertyTimestamp.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelAssetPropertyValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelAssetPropertyVariant.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelClearTimer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelDetectorModelDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelDynamoDB.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelDynamoDBv2.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelEvent.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelFirehose.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelIotEvents.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelIotSiteWise.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelIotTopicPublish.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelLambda.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelOnEnter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelOnExit.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelOnInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelPayload.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelResetTimer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelSetTimer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelSetVariable.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelSns.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelSqs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelState.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsDetectorModelTransitionEvent.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsInputAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTEventsInputInputDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTProvisioningTemplateProvisioningHook.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTProvisioningTemplateTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTThingsGraphFlowTemplateDefinitionDocument.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAssetPropertyTimestamp.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAssetPropertyValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAssetPropertyVariant.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBV2Action.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleHttpAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleHttpActionHeader.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleHttpAuthorization.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotAnalyticsAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotEventsAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotSiteWiseAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRulePutAssetPropertyValueEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRulePutItemInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSigV4Authorization.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleStepFunctionsAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationCSVMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputLambdaProcessor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputParallelism.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputProcessingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputSchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationJSONMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisFirehoseInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisStreamsInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputDestinationSchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisFirehoseOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisStreamsOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputLambdaOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordColumn.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordColumn.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationCodeConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCSVMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCheckpointConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCodeContent.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationEnvironmentProperties.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputLambdaProcessor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputParallelism.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputProcessingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputSchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationJSONMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisFirehoseInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisStreamsInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMonitoringConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputDestinationSchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputLambdaOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationParallelismConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationPropertyGroup.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordColumn.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationS3ContentLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationSqlApplicationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamDataFormatConversionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamDeserializer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamHiveJsonSerDe.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamHttpEndpointCommonAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamHttpEndpointConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamHttpEndpointDestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamHttpEndpointRequestConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamInputFormatConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamOpenXJsonSerDe.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamOrcSerDe.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamOutputFormatConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamParquetSerDe.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessorParameter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftRetryOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRetryOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSchemaConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSerializer.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkRetryOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamVpcConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/KinesisStreamStreamEncryption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationDataLakeSettingsDataLakePrincipal.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsColumnWildcard.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsDataLakePrincipal.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsDataLocationResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsDatabaseResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsTableResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LakeFormationPermissionsTableWithColumnsResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaAliasAliasRoutingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaAliasProvisionedConcurrencyConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaAliasVersionWeight.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaEventInvokeConfigDestinationConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaEventInvokeConfigOnFailure.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaEventInvokeConfigOnSuccess.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaEventSourceMappingDestinationConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaEventSourceMappingOnFailure.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaFunctionFileSystemConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaFunctionTracingConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaLayerVersionContent.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LambdaVersionProvisionedConcurrencyConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterBrokerLogs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterBrokerNodeGroupInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterClientAuthentication.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterCloudWatchLogs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterConfigurationInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterEBSStorageInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterEncryptionAtRest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterEncryptionInTransit.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterEncryptionInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterFirehose.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterJmxExporter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterLoggingInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterNodeExporter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterOpenMonitoring.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterPrometheus.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterS3.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterStorageInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MSKClusterTls.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MacieFindingsFilterFindingsFilterListItem.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberApprovalThresholdPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberMemberConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberMemberFabricConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberMemberFrameworkConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberNetworkConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberNetworkFabricConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberNetworkFrameworkConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainMemberVotingPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ManagedBlockchainNodeNodeConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaConvertJobTemplateAccelerationSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaConvertJobTemplateHopDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelAribSourceSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelAudioLanguageSelection.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelAudioPidSelection.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelAudioSelector.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelAudioSelectorSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelCaptionSelector.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelCaptionSelectorSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelDvbSubSourceSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelEmbeddedSourceSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelHlsInputSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelInputAttachment.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelInputSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelInputSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelMediaPackageOutputDestinationSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelMultiplexProgramChannelDestinationSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelNetworkInputSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelOutputDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelOutputDestinationSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelScte20SourceSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelScte27SourceSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelTeletextSourceSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelVideoSelector.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelVideoSelectorPid.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelVideoSelectorProgramId.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveChannelVideoSelectorSettings.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveInputInputDestinationRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveInputInputSourceRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveInputInputVpcRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveInputMediaConnectFlowRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaLiveInputSecurityGroupInputWhitelistRuleCidr.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaStoreContainerCorsRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaStoreContainerMetricPolicy.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/MediaStoreContainerMetricPolicyRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/NeptuneDBClusterDBClusterRole.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/NetworkManagerDeviceLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/NetworkManagerLinkBandwidth.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/NetworkManagerSiteLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksCMServerEngineAttribute.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointApplicationSettingsCampaignHook.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointApplicationSettingsLimits.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointApplicationSettingsQuietTime.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignAttributeDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignCampaignEmailMessage.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignCampaignEventFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignCampaignHook.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignCampaignSmsMessage.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignEventDimensions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignLimits.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignMessage.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignMessageConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignMetricDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignQuietTime.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignSchedule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignSetDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointCampaignWriteTreatmentResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetDeliveryOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationCloudWatchDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationDimensionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationEventDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationKinesisFirehoseDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationPinpointDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetEventDestinationSnsDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetReputationOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetSendingOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailConfigurationSetTrackingOptions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailDedicatedIpPoolTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailIdentityMailFromAttributes.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointEmailIdentityTags.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointPushTemplateAPNSPushNotificationTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointPushTemplateAndroidPushNotificationTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointPushTemplateDefaultPushNotificationTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentAttributeDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentBehavior.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentCoordinates.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentDemographic.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentGPSPoint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentGroups.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentRecency.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentSegmentDimensions.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentSegmentGroups.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentSetDimension.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/PinpointSegmentSourceSegments.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/QLDBStreamKinesisConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBClusterDBClusterRole.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBClusterScalingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBInstanceDBInstanceRole.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBInstanceProcessorFeature.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBProxyAuthFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBProxyTagFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBProxyTargetGroupConnectionPoolConfigurationInfoFormat.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RedshiftClusterLoggingProperties.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ResourceGroupsGroupQuery.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ResourceGroupsGroupResourceQuery.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ResourceGroupsGroupTagFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationRobotSoftwareSuite.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationSourceConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRenderingEngine.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRobotSoftwareSuite.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSimulationSoftwareSuite.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSourceConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HostedZoneQueryLoggingConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverEndpointIpAddressRequest.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverRuleTargetAddress.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3AccessPointPublicAccessBlockConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3AccessPointVpcConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketAbortIncompleteMultipartUpload.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketAccelerateConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketAccessControlTranslation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketAnalyticsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketBucketEncryption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketDataExport.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketDefaultRetention.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketDeleteMarkerReplication.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketEncryptionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketInventoryConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketMetrics.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketMetricsConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketObjectLockConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketObjectLockRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketPublicAccessBlockConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRuleAndOperator.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRuleFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationTime.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketReplicationTimeValue.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionByDefault.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketSourceSelectionCriteria.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketSseKmsEncryptedObjects.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketStorageClassAnalysis.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketTagFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationCloudWatchDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationDimensionConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationEventDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationKinesisFirehoseDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptFilterFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptFilterIpFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAddHeaderAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleBounceAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleLambdaAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleS3Action.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleSNSAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleStopAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESReceiptRuleWorkmailAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SESTemplateTemplate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMAssociationInstanceAssociationOutputLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMAssociationS3OutputLocation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTargetTargets.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskLoggingInfo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskNotificationConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTarget.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTaskInvocationParameters.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilterGroup.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRuleGroup.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMResourceDataSyncAwsOrganizationsSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMResourceDataSyncS3Destination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SSMResourceDataSyncSyncSource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerCodeRepositoryGitConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigCaptureContentTypeHeader.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigCaptureOption.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigDataCaptureConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigProductionVariant.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerEndpointVariantProperty.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerModelContainerDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerModelVpcConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleBaselineConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleClusterConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleConstraintsResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleEndpointInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringAppSpecification.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringExecutionSummary.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringInput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringInputs.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringJobDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringOutput.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringOutputConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringResources.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringScheduleConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleNetworkConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleS3Output.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleScheduleConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleStatisticsResource.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleStoppingCondition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleVpcConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerWorkteamCognitoMemberDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerWorkteamMemberDefinition.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SageMakerWorkteamNotificationConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SecretsManagerRotationScheduleHostedRotationLambda.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SecretsManagerRotationScheduleRotationRules.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SecretsManagerSecretGenerateSecretString.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProductProvisioningArtifactProperties.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProvisionedProductProvisioningParameter.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProvisionedProductProvisioningPreferences.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsRecord.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckCustomConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsActivityTagsEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineCloudWatchLogsLogGroup.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineLogDestination.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineLoggingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineS3Location.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineTagsEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineTracingConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SyntheticsCanaryCode.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SyntheticsCanaryRunConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SyntheticsCanarySchedule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/SyntheticsCanaryVPCConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/Tag.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/TransferServerEndpointDetails.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/TransferServerIdentityProviderDetails.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/TransferUserHomeDirectoryMapEntry.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetByteMatchTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalGeoMatchSetGeoMatchConstraint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalIPSetIPSetDescriptor.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalRateBasedRulePredicate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalRulePredicate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetSizeConstraint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetXssMatchTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupAndStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupAndStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupByteMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupForwardedIPConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupGeoMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupIPSetForwardedIPConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupIPSetReferenceStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupNotStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupNotStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupOrStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupOrStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupRateBasedStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupRateBasedStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupRegexPatternSetReferenceStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupRuleAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupSizeConstraintStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupSqliMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupStatementThree.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupTextTransformation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupVisibilityConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2RuleGroupXssMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLAndStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLAndStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLByteMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLDefaultAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLExcludedRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLFieldToMatch.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLForwardedIPConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLGeoMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLIPSetForwardedIPConfiguration.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLIPSetReferenceStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLManagedRuleGroupStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLNotStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLNotStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLOrStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLOrStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLOverrideAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLRateBasedStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLRateBasedStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLRegexPatternSetReferenceStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLRule.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLRuleAction.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLRuleGroupReferenceStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLSizeConstraintStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLSqliMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLStatementOne.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLStatementThree.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLStatementTwo.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLTextTransformation.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLVisibilityConfig.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WAFv2WebACLXssMatchStatement.hs too large to diff
- library-gen/Stratosphere/ResourceProperties/WorkSpacesWorkspaceWorkspaceProperties.hs too large to diff
- library-gen/Stratosphere/Resources.hs too large to diff
- library-gen/Stratosphere/Resources/ACMPCACertificate.hs too large to diff
- library-gen/Stratosphere/Resources/ACMPCACertificateAuthority.hs too large to diff
- library-gen/Stratosphere/Resources/ACMPCACertificateAuthorityActivation.hs too large to diff
- library-gen/Stratosphere/Resources/ASKSkill.hs too large to diff
- library-gen/Stratosphere/Resources/AccessAnalyzerAnalyzer.hs too large to diff
- library-gen/Stratosphere/Resources/AmazonMQBroker.hs too large to diff
- library-gen/Stratosphere/Resources/AmazonMQConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/AmazonMQConfigurationAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/AmplifyApp.hs too large to diff
- library-gen/Stratosphere/Resources/AmplifyBranch.hs too large to diff
- library-gen/Stratosphere/Resources/AmplifyDomain.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayAccount.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayDocumentationPart.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayDocumentationVersion.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayDomainName.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayGatewayResponse.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayMethod.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayModel.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayRequestValidator.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayResource.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayStage.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayUsagePlanKey.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Api.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2ApiGatewayManagedOverrides.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2ApiMapping.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Authorizer.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Deployment.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2DomainName.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Integration.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2IntegrationResponse.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Model.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Route.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2RouteResponse.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2Stage.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayV2VpcLink.hs too large to diff
- library-gen/Stratosphere/Resources/ApiGatewayVpcLink.hs too large to diff
- library-gen/Stratosphere/Resources/AppConfigApplication.hs too large to diff
- library-gen/Stratosphere/Resources/AppConfigConfigurationProfile.hs too large to diff
- library-gen/Stratosphere/Resources/AppConfigDeployment.hs too large to diff
- library-gen/Stratosphere/Resources/AppConfigDeploymentStrategy.hs too large to diff
- library-gen/Stratosphere/Resources/AppConfigEnvironment.hs too large to diff
- library-gen/Stratosphere/Resources/AppConfigHostedConfigurationVersion.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshGatewayRoute.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshMesh.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshRoute.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshVirtualGateway.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshVirtualNode.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshVirtualRouter.hs too large to diff
- library-gen/Stratosphere/Resources/AppMeshVirtualService.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamDirectoryConfig.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamFleet.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamImageBuilder.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamStack.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamStackFleetAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamStackUserAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/AppStreamUser.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncApiCache.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncApiKey.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncDataSource.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncFunctionConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncGraphQLApi.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncGraphQLSchema.hs too large to diff
- library-gen/Stratosphere/Resources/AppSyncResolver.hs too large to diff
- library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs too large to diff
- library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/ApplicationInsightsApplication.hs too large to diff
- library-gen/Stratosphere/Resources/AthenaDataCatalog.hs too large to diff
- library-gen/Stratosphere/Resources/AthenaNamedQuery.hs too large to diff
- library-gen/Stratosphere/Resources/AthenaWorkGroup.hs too large to diff
- library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs too large to diff
- library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs too large to diff
- library-gen/Stratosphere/Resources/AutoScalingPlansScalingPlan.hs too large to diff
- library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs too large to diff
- library-gen/Stratosphere/Resources/BackupBackupPlan.hs too large to diff
- library-gen/Stratosphere/Resources/BackupBackupSelection.hs too large to diff
- library-gen/Stratosphere/Resources/BackupBackupVault.hs too large to diff
- library-gen/Stratosphere/Resources/BatchComputeEnvironment.hs too large to diff
- library-gen/Stratosphere/Resources/BatchJobDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/BatchJobQueue.hs too large to diff
- library-gen/Stratosphere/Resources/BudgetsBudget.hs too large to diff
- library-gen/Stratosphere/Resources/CECostCategory.hs too large to diff
- library-gen/Stratosphere/Resources/CassandraKeyspace.hs too large to diff
- library-gen/Stratosphere/Resources/CassandraTable.hs too large to diff
- library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs too large to diff
- library-gen/Stratosphere/Resources/ChatbotSlackChannelConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/Cloud9EnvironmentEC2.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFormationMacro.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFormationStack.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFrontCachePolicy.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFrontCloudFrontOriginAccessIdentity.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFrontDistribution.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFrontOriginRequestPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFrontRealtimeLogConfig.hs too large to diff
- library-gen/Stratosphere/Resources/CloudFrontStreamingDistribution.hs too large to diff
- library-gen/Stratosphere/Resources/CloudTrailTrail.hs too large to diff
- library-gen/Stratosphere/Resources/CloudWatchAlarm.hs too large to diff
- library-gen/Stratosphere/Resources/CloudWatchAnomalyDetector.hs too large to diff
- library-gen/Stratosphere/Resources/CloudWatchCompositeAlarm.hs too large to diff
- library-gen/Stratosphere/Resources/CloudWatchDashboard.hs too large to diff
- library-gen/Stratosphere/Resources/CloudWatchInsightRule.hs too large to diff
- library-gen/Stratosphere/Resources/CodeBuildProject.hs too large to diff
- library-gen/Stratosphere/Resources/CodeBuildReportGroup.hs too large to diff
- library-gen/Stratosphere/Resources/CodeBuildSourceCredential.hs too large to diff
- library-gen/Stratosphere/Resources/CodeCommitRepository.hs too large to diff
- library-gen/Stratosphere/Resources/CodeDeployApplication.hs too large to diff
- library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs too large to diff
- library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs too large to diff
- library-gen/Stratosphere/Resources/CodeGuruProfilerProfilingGroup.hs too large to diff
- library-gen/Stratosphere/Resources/CodeGuruReviewerRepositoryAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs too large to diff
- library-gen/Stratosphere/Resources/CodePipelinePipeline.hs too large to diff
- library-gen/Stratosphere/Resources/CodePipelineWebhook.hs too large to diff
- library-gen/Stratosphere/Resources/CodeStarConnectionsConnection.hs too large to diff
- library-gen/Stratosphere/Resources/CodeStarGitHubRepository.hs too large to diff
- library-gen/Stratosphere/Resources/CodeStarNotificationsNotificationRule.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoIdentityPool.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoIdentityPoolRoleAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPool.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolClient.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolDomain.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolGroup.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolIdentityProvider.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolResourceServer.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolRiskConfigurationAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolUICustomizationAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolUser.hs too large to diff
- library-gen/Stratosphere/Resources/CognitoUserPoolUserToGroupAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigAggregationAuthorization.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigConfigRule.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigConfigurationAggregator.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigConformancePack.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigOrganizationConfigRule.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigOrganizationConformancePack.hs too large to diff
- library-gen/Stratosphere/Resources/ConfigRemediationConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/DAXCluster.hs too large to diff
- library-gen/Stratosphere/Resources/DAXParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/DAXSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/DLMLifecyclePolicy.hs too large to diff
- library-gen/Stratosphere/Resources/DMSCertificate.hs too large to diff
- library-gen/Stratosphere/Resources/DMSEndpoint.hs too large to diff
- library-gen/Stratosphere/Resources/DMSEventSubscription.hs too large to diff
- library-gen/Stratosphere/Resources/DMSReplicationInstance.hs too large to diff
- library-gen/Stratosphere/Resources/DMSReplicationSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/DMSReplicationTask.hs too large to diff
- library-gen/Stratosphere/Resources/DataPipelinePipeline.hs too large to diff
- library-gen/Stratosphere/Resources/DetectiveGraph.hs too large to diff
- library-gen/Stratosphere/Resources/DetectiveMemberInvitation.hs too large to diff
- library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs too large to diff
- library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs too large to diff
- library-gen/Stratosphere/Resources/DocDBDBCluster.hs too large to diff
- library-gen/Stratosphere/Resources/DocDBDBClusterParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/DocDBDBInstance.hs too large to diff
- library-gen/Stratosphere/Resources/DocDBDBSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/DynamoDBTable.hs too large to diff
- library-gen/Stratosphere/Resources/EC2CapacityReservation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2CarrierGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2ClientVpnAuthorizationRule.hs too large to diff
- library-gen/Stratosphere/Resources/EC2ClientVpnEndpoint.hs too large to diff
- library-gen/Stratosphere/Resources/EC2ClientVpnRoute.hs too large to diff
- library-gen/Stratosphere/Resources/EC2ClientVpnTargetNetworkAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2CustomerGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2DHCPOptions.hs too large to diff
- library-gen/Stratosphere/Resources/EC2EC2Fleet.hs too large to diff
- library-gen/Stratosphere/Resources/EC2EIP.hs too large to diff
- library-gen/Stratosphere/Resources/EC2EIPAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2EgressOnlyInternetGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2FlowLog.hs too large to diff
- library-gen/Stratosphere/Resources/EC2GatewayRouteTableAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2Host.hs too large to diff
- library-gen/Stratosphere/Resources/EC2Instance.hs too large to diff
- library-gen/Stratosphere/Resources/EC2InternetGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2LaunchTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/EC2LocalGatewayRoute.hs too large to diff
- library-gen/Stratosphere/Resources/EC2LocalGatewayRouteTableVPCAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2NatGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2NetworkAcl.hs too large to diff
- library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs too large to diff
- library-gen/Stratosphere/Resources/EC2NetworkInterface.hs too large to diff
- library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/EC2NetworkInterfacePermission.hs too large to diff
- library-gen/Stratosphere/Resources/EC2PlacementGroup.hs too large to diff
- library-gen/Stratosphere/Resources/EC2PrefixList.hs too large to diff
- library-gen/Stratosphere/Resources/EC2Route.hs too large to diff
- library-gen/Stratosphere/Resources/EC2RouteTable.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SecurityGroup.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SpotFleet.hs too large to diff
- library-gen/Stratosphere/Resources/EC2Subnet.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TrafficMirrorFilter.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TrafficMirrorFilterRule.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TrafficMirrorSession.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TrafficMirrorTarget.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TransitGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TransitGatewayAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TransitGatewayRoute.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTable.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTableAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTablePropagation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPC.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCEndpointConnectionNotification.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCEndpointService.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCEndpointServicePermissions.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPNConnection.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPNGateway.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs too large to diff
- library-gen/Stratosphere/Resources/EC2Volume.hs too large to diff
- library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/ECRRepository.hs too large to diff
- library-gen/Stratosphere/Resources/ECSCapacityProvider.hs too large to diff
- library-gen/Stratosphere/Resources/ECSCluster.hs too large to diff
- library-gen/Stratosphere/Resources/ECSPrimaryTaskSet.hs too large to diff
- library-gen/Stratosphere/Resources/ECSService.hs too large to diff
- library-gen/Stratosphere/Resources/ECSTaskDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/ECSTaskSet.hs too large to diff
- library-gen/Stratosphere/Resources/EFSAccessPoint.hs too large to diff
- library-gen/Stratosphere/Resources/EFSFileSystem.hs too large to diff
- library-gen/Stratosphere/Resources/EFSMountTarget.hs too large to diff
- library-gen/Stratosphere/Resources/EKSCluster.hs too large to diff
- library-gen/Stratosphere/Resources/EKSFargateProfile.hs too large to diff
- library-gen/Stratosphere/Resources/EKSNodegroup.hs too large to diff
- library-gen/Stratosphere/Resources/EMRCluster.hs too large to diff
- library-gen/Stratosphere/Resources/EMRInstanceFleetConfig.hs too large to diff
- library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs too large to diff
- library-gen/Stratosphere/Resources/EMRSecurityConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/EMRStep.hs too large to diff
- library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs too large to diff
- library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs too large to diff
- library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs too large to diff
- library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs too large to diff
- library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerCertificateResource.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/ElasticsearchDomain.hs too large to diff
- library-gen/Stratosphere/Resources/EventSchemasDiscoverer.hs too large to diff
- library-gen/Stratosphere/Resources/EventSchemasRegistry.hs too large to diff
- library-gen/Stratosphere/Resources/EventSchemasRegistryPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/EventSchemasSchema.hs too large to diff
- library-gen/Stratosphere/Resources/EventsEventBus.hs too large to diff
- library-gen/Stratosphere/Resources/EventsEventBusPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/EventsRule.hs too large to diff
- library-gen/Stratosphere/Resources/FMSNotificationChannel.hs too large to diff
- library-gen/Stratosphere/Resources/FMSPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/FSxFileSystem.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftAlias.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftBuild.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftFleet.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftGameServerGroup.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftGameSessionQueue.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftMatchmakingConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftMatchmakingRuleSet.hs too large to diff
- library-gen/Stratosphere/Resources/GameLiftScript.hs too large to diff
- library-gen/Stratosphere/Resources/GlobalAcceleratorAccelerator.hs too large to diff
- library-gen/Stratosphere/Resources/GlobalAcceleratorEndpointGroup.hs too large to diff
- library-gen/Stratosphere/Resources/GlobalAcceleratorListener.hs too large to diff
- library-gen/Stratosphere/Resources/GlueClassifier.hs too large to diff
- library-gen/Stratosphere/Resources/GlueConnection.hs too large to diff
- library-gen/Stratosphere/Resources/GlueCrawler.hs too large to diff
- library-gen/Stratosphere/Resources/GlueDataCatalogEncryptionSettings.hs too large to diff
- library-gen/Stratosphere/Resources/GlueDatabase.hs too large to diff
- library-gen/Stratosphere/Resources/GlueDevEndpoint.hs too large to diff
- library-gen/Stratosphere/Resources/GlueJob.hs too large to diff
- library-gen/Stratosphere/Resources/GlueMLTransform.hs too large to diff
- library-gen/Stratosphere/Resources/GluePartition.hs too large to diff
- library-gen/Stratosphere/Resources/GlueSecurityConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/GlueTable.hs too large to diff
- library-gen/Stratosphere/Resources/GlueTrigger.hs too large to diff
- library-gen/Stratosphere/Resources/GlueWorkflow.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassConnectorDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassConnectorDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassCoreDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassCoreDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassDeviceDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassDeviceDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassFunctionDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassFunctionDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassGroup.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassGroupVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassLoggerDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassLoggerDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassResourceDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassResourceDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassSubscriptionDefinition.hs too large to diff
- library-gen/Stratosphere/Resources/GreengrassSubscriptionDefinitionVersion.hs too large to diff
- library-gen/Stratosphere/Resources/GuardDutyDetector.hs too large to diff
- library-gen/Stratosphere/Resources/GuardDutyFilter.hs too large to diff
- library-gen/Stratosphere/Resources/GuardDutyIPSet.hs too large to diff
- library-gen/Stratosphere/Resources/GuardDutyMaster.hs too large to diff
- library-gen/Stratosphere/Resources/GuardDutyMember.hs too large to diff
- library-gen/Stratosphere/Resources/GuardDutyThreatIntelSet.hs too large to diff
- library-gen/Stratosphere/Resources/IAMAccessKey.hs too large to diff
- library-gen/Stratosphere/Resources/IAMGroup.hs too large to diff
- library-gen/Stratosphere/Resources/IAMInstanceProfile.hs too large to diff
- library-gen/Stratosphere/Resources/IAMManagedPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/IAMPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/IAMRole.hs too large to diff
- library-gen/Stratosphere/Resources/IAMServiceLinkedRole.hs too large to diff
- library-gen/Stratosphere/Resources/IAMUser.hs too large to diff
- library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs too large to diff
- library-gen/Stratosphere/Resources/ImageBuilderComponent.hs too large to diff
- library-gen/Stratosphere/Resources/ImageBuilderDistributionConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/ImageBuilderImage.hs too large to diff
- library-gen/Stratosphere/Resources/ImageBuilderImagePipeline.hs too large to diff
- library-gen/Stratosphere/Resources/ImageBuilderImageRecipe.hs too large to diff
- library-gen/Stratosphere/Resources/ImageBuilderInfrastructureConfiguration.hs too large to diff
- library-gen/Stratosphere/Resources/InspectorAssessmentTarget.hs too large to diff
- library-gen/Stratosphere/Resources/InspectorAssessmentTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/InspectorResourceGroup.hs too large to diff
- library-gen/Stratosphere/Resources/IoT1ClickDevice.hs too large to diff
- library-gen/Stratosphere/Resources/IoT1ClickPlacement.hs too large to diff
- library-gen/Stratosphere/Resources/IoT1ClickProject.hs too large to diff
- library-gen/Stratosphere/Resources/IoTAnalyticsChannel.hs too large to diff
- library-gen/Stratosphere/Resources/IoTAnalyticsDataset.hs too large to diff
- library-gen/Stratosphere/Resources/IoTAnalyticsDatastore.hs too large to diff
- library-gen/Stratosphere/Resources/IoTAnalyticsPipeline.hs too large to diff
- library-gen/Stratosphere/Resources/IoTCertificate.hs too large to diff
- library-gen/Stratosphere/Resources/IoTEventsDetectorModel.hs too large to diff
- library-gen/Stratosphere/Resources/IoTEventsInput.hs too large to diff
- library-gen/Stratosphere/Resources/IoTPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/IoTProvisioningTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/IoTThing.hs too large to diff
- library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/IoTThingsGraphFlowTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/IoTTopicRule.hs too large to diff
- library-gen/Stratosphere/Resources/KMSAlias.hs too large to diff
- library-gen/Stratosphere/Resources/KMSKey.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsApplication.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationOutput.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationReferenceDataSource.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsV2Application.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationCloudWatchLoggingOption.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationOutput.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationReferenceDataSource.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisStream.hs too large to diff
- library-gen/Stratosphere/Resources/KinesisStreamConsumer.hs too large to diff
- library-gen/Stratosphere/Resources/LakeFormationDataLakeSettings.hs too large to diff
- library-gen/Stratosphere/Resources/LakeFormationPermissions.hs too large to diff
- library-gen/Stratosphere/Resources/LakeFormationResource.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaAlias.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaEventInvokeConfig.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaFunction.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaLayerVersion.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaLayerVersionPermission.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaPermission.hs too large to diff
- library-gen/Stratosphere/Resources/LambdaVersion.hs too large to diff
- library-gen/Stratosphere/Resources/LogsDestination.hs too large to diff
- library-gen/Stratosphere/Resources/LogsLogGroup.hs too large to diff
- library-gen/Stratosphere/Resources/LogsLogStream.hs too large to diff
- library-gen/Stratosphere/Resources/LogsMetricFilter.hs too large to diff
- library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs too large to diff
- library-gen/Stratosphere/Resources/MSKCluster.hs too large to diff
- library-gen/Stratosphere/Resources/MacieCustomDataIdentifier.hs too large to diff
- library-gen/Stratosphere/Resources/MacieFindingsFilter.hs too large to diff
- library-gen/Stratosphere/Resources/MacieSession.hs too large to diff
- library-gen/Stratosphere/Resources/ManagedBlockchainMember.hs too large to diff
- library-gen/Stratosphere/Resources/ManagedBlockchainNode.hs too large to diff
- library-gen/Stratosphere/Resources/MediaConvertJobTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/MediaConvertPreset.hs too large to diff
- library-gen/Stratosphere/Resources/MediaConvertQueue.hs too large to diff
- library-gen/Stratosphere/Resources/MediaLiveChannel.hs too large to diff
- library-gen/Stratosphere/Resources/MediaLiveInput.hs too large to diff
- library-gen/Stratosphere/Resources/MediaLiveInputSecurityGroup.hs too large to diff
- library-gen/Stratosphere/Resources/MediaStoreContainer.hs too large to diff
- library-gen/Stratosphere/Resources/NeptuneDBCluster.hs too large to diff
- library-gen/Stratosphere/Resources/NeptuneDBClusterParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/NeptuneDBInstance.hs too large to diff
- library-gen/Stratosphere/Resources/NeptuneDBParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/NeptuneDBSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerCustomerGatewayAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerDevice.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerGlobalNetwork.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerLink.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerLinkAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerSite.hs too large to diff
- library-gen/Stratosphere/Resources/NetworkManagerTransitGatewayRegistration.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksApp.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksCMServer.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksInstance.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksLayer.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksStack.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs too large to diff
- library-gen/Stratosphere/Resources/OpsWorksVolume.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointADMChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointAPNSChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointAPNSSandboxChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointAPNSVoipChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointAPNSVoipSandboxChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointApp.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointApplicationSettings.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointBaiduChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointCampaign.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEmailChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEmailConfigurationSet.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEmailConfigurationSetEventDestination.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEmailDedicatedIpPool.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEmailIdentity.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEmailTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointEventStream.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointGCMChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointPushTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointSMSChannel.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointSegment.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointSmsTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/PinpointVoiceChannel.hs too large to diff
- library-gen/Stratosphere/Resources/QLDBLedger.hs too large to diff
- library-gen/Stratosphere/Resources/QLDBStream.hs too large to diff
- library-gen/Stratosphere/Resources/RAMResourceShare.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBCluster.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBInstance.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBProxy.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBProxyTargetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs too large to diff
- library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RDSEventSubscription.hs too large to diff
- library-gen/Stratosphere/Resources/RDSOptionGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RedshiftCluster.hs too large to diff
- library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs too large to diff
- library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/ResourceGroupsGroup.hs too large to diff
- library-gen/Stratosphere/Resources/RoboMakerFleet.hs too large to diff
- library-gen/Stratosphere/Resources/RoboMakerRobot.hs too large to diff
- library-gen/Stratosphere/Resources/RoboMakerRobotApplication.hs too large to diff
- library-gen/Stratosphere/Resources/RoboMakerRobotApplicationVersion.hs too large to diff
- library-gen/Stratosphere/Resources/RoboMakerSimulationApplication.hs too large to diff
- library-gen/Stratosphere/Resources/RoboMakerSimulationApplicationVersion.hs too large to diff
- library-gen/Stratosphere/Resources/Route53HealthCheck.hs too large to diff
- library-gen/Stratosphere/Resources/Route53HostedZone.hs too large to diff
- library-gen/Stratosphere/Resources/Route53RecordSet.hs too large to diff
- library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs too large to diff
- library-gen/Stratosphere/Resources/Route53ResolverResolverEndpoint.hs too large to diff
- library-gen/Stratosphere/Resources/Route53ResolverResolverQueryLoggingConfig.hs too large to diff
- library-gen/Stratosphere/Resources/Route53ResolverResolverQueryLoggingConfigAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/Route53ResolverResolverRule.hs too large to diff
- library-gen/Stratosphere/Resources/Route53ResolverResolverRuleAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/S3AccessPoint.hs too large to diff
- library-gen/Stratosphere/Resources/S3Bucket.hs too large to diff
- library-gen/Stratosphere/Resources/S3BucketPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/SDBDomain.hs too large to diff
- library-gen/Stratosphere/Resources/SESConfigurationSet.hs too large to diff
- library-gen/Stratosphere/Resources/SESConfigurationSetEventDestination.hs too large to diff
- library-gen/Stratosphere/Resources/SESReceiptFilter.hs too large to diff
- library-gen/Stratosphere/Resources/SESReceiptRule.hs too large to diff
- library-gen/Stratosphere/Resources/SESReceiptRuleSet.hs too large to diff
- library-gen/Stratosphere/Resources/SESTemplate.hs too large to diff
- library-gen/Stratosphere/Resources/SNSSubscription.hs too large to diff
- library-gen/Stratosphere/Resources/SNSTopic.hs too large to diff
- library-gen/Stratosphere/Resources/SNSTopicPolicy.hs too large to diff
- library-gen/Stratosphere/Resources/SQSQueue.hs too large to diff
- library-gen/Stratosphere/Resources/SQSQueuePolicy.hs too large to diff
- library-gen/Stratosphere/Resources/SSMAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/SSMDocument.hs too large to diff
- library-gen/Stratosphere/Resources/SSMMaintenanceWindow.hs too large to diff
- library-gen/Stratosphere/Resources/SSMMaintenanceWindowTarget.hs too large to diff
- library-gen/Stratosphere/Resources/SSMMaintenanceWindowTask.hs too large to diff
- library-gen/Stratosphere/Resources/SSMParameter.hs too large to diff
- library-gen/Stratosphere/Resources/SSMPatchBaseline.hs too large to diff
- library-gen/Stratosphere/Resources/SSMResourceDataSync.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerCodeRepository.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerEndpoint.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerEndpointConfig.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerModel.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerMonitoringSchedule.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerNotebookInstance.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerNotebookInstanceLifecycleConfig.hs too large to diff
- library-gen/Stratosphere/Resources/SageMakerWorkteam.hs too large to diff
- library-gen/Stratosphere/Resources/SecretsManagerResourcePolicy.hs too large to diff
- library-gen/Stratosphere/Resources/SecretsManagerRotationSchedule.hs too large to diff
- library-gen/Stratosphere/Resources/SecretsManagerSecret.hs too large to diff
- library-gen/Stratosphere/Resources/SecretsManagerSecretTargetAttachment.hs too large to diff
- library-gen/Stratosphere/Resources/SecurityHubHub.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogAcceptedPortfolioShare.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProduct.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProvisionedProduct.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogLaunchNotificationConstraint.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogLaunchRoleConstraint.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogLaunchTemplateConstraint.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogPortfolio.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogPortfolioPrincipalAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogPortfolioProductAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogPortfolioShare.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogResourceUpdateConstraint.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogStackSetConstraint.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogTagOption.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceCatalogTagOptionAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceDiscoveryHttpNamespace.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceDiscoveryInstance.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceDiscoveryPrivateDnsNamespace.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceDiscoveryPublicDnsNamespace.hs too large to diff
- library-gen/Stratosphere/Resources/ServiceDiscoveryService.hs too large to diff
- library-gen/Stratosphere/Resources/StepFunctionsActivity.hs too large to diff
- library-gen/Stratosphere/Resources/StepFunctionsStateMachine.hs too large to diff
- library-gen/Stratosphere/Resources/SyntheticsCanary.hs too large to diff
- library-gen/Stratosphere/Resources/TransferServer.hs too large to diff
- library-gen/Stratosphere/Resources/TransferUser.hs too large to diff
- library-gen/Stratosphere/Resources/WAFByteMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFIPSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalByteMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalGeoMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalIPSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalRateBasedRule.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalRegexPatternSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalRule.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalSizeConstraintSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalSqlInjectionMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalWebACL.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalWebACLAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRegionalXssMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFRule.hs too large to diff
- library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFWebACL.hs too large to diff
- library-gen/Stratosphere/Resources/WAFXssMatchSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFv2IPSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFv2RegexPatternSet.hs too large to diff
- library-gen/Stratosphere/Resources/WAFv2RuleGroup.hs too large to diff
- library-gen/Stratosphere/Resources/WAFv2WebACL.hs too large to diff
- library-gen/Stratosphere/Resources/WAFv2WebACLAssociation.hs too large to diff
- library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs too large to diff
- library/Stratosphere.hs too large to diff
- library/Stratosphere/Check.hs too large to diff
- library/Stratosphere/Helpers.hs too large to diff
- library/Stratosphere/Outputs.hs too large to diff
- library/Stratosphere/Parameters.hs too large to diff
- library/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs too large to diff
- library/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs too large to diff
- library/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs too large to diff
- library/Stratosphere/ResourceAttributes/CreationPolicy.hs too large to diff
- library/Stratosphere/ResourceAttributes/ResourceSignal.hs too large to diff
- library/Stratosphere/ResourceAttributes/UpdatePolicy.hs too large to diff
- library/Stratosphere/ResourceImports.hs too large to diff
- library/Stratosphere/ResourceProperties.hs too large to diff
- library/Stratosphere/Template.hs too large to diff
- library/Stratosphere/Types.hs too large to diff
- library/Stratosphere/Values.hs too large to diff
- src/Stratosphere.hs too large to diff
- src/Stratosphere/Check.hs too large to diff
- src/Stratosphere/NamedItem.hs too large to diff
- src/Stratosphere/Output.hs too large to diff
- src/Stratosphere/Parameter.hs too large to diff
- src/Stratosphere/Prelude.hs too large to diff
- src/Stratosphere/Property.hs too large to diff
- src/Stratosphere/Resource.hs too large to diff
- src/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs too large to diff
- src/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs too large to diff
- src/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs too large to diff
- src/Stratosphere/ResourceAttributes/CreationPolicy.hs too large to diff
- src/Stratosphere/ResourceAttributes/ResourceSignal.hs too large to diff
- src/Stratosphere/ResourceAttributes/UpdatePolicy.hs too large to diff
- src/Stratosphere/ResourceProperties.hs too large to diff
- src/Stratosphere/Template.hs too large to diff
- src/Stratosphere/Value.hs too large to diff
- stratosphere.cabal too large to diff
- test/Spec.hs too large to diff
- test/Stratosphere/ValuesSpec.hs too large to diff
- tests/Spec.hs too large to diff
- tests/Stratosphere/ValuesSpec.hs too large to diff
@@ -1,5 +1,43 @@ # Change Log +## 1.0 2025-11-07++TLDR: Loads of breaking changes, with good reasons.++Overall this release is meant to serve the future, not the past. So this release has many+"bunched up" breaking changes which should reduce the need for breakng changes in the+future, and improve maintainability and thus release frequency dramatically.++* Drop generated field prefixes, making usage of the library way more natural. Especially its+ now possible to use this library just from the AWS provided cloudformation documentation+ without having to lookup the field prefixes in a second tab.++* Drop support for GHC < 9.2. This simplifies the generator significantly. If you need older+ GHCs use the old versions of stratosphere. Dependency of dropping field prefixes. This library+ relies now on `NoFieldSelectors` internally.++* Fully re-written generator, which works directly on the raw, un-preprocessed AWS+ specification, this should increase maintainabiltiy and release frequency.++* Re-aligned generated module / builder function structure, removing all manual+ overwrites for dismabiguation.++* Drop of the lens dependency, replaced with the `set @"PropertyName" value` idiom.++* Split to one package per AWS service. This induces a small overhead on the user to+ select the packages the user needs, but reduces compilation time significantly.+ Also this works around limitations on OSX linker issues on many modules.+ Fixes: [#111](https://github.com/mbj/stratosphere/issues/184) [#102](https://github.com/mbj/stratosphere/issues/102)++* Change `Val` to `Value`, its recommended to include stratosphere qualified where it clashes with+ `aeson` imports.++* Remove support for custom enum types stratosphere used to tag+ on to the raw spec. Fixes: [#195](https://github.com/mbj/stratosphere/pull/195)++* Update resource specification document to version 112.0.0 and re-generate all services.+ Fixes: [#140](https://github.com/mbj/stratosphere/issues/140)+ ## 0.60.0 * Add and require aeson-2 support
@@ -1,63 +1,69 @@ # Stratosphere: AWS CloudFormation in Haskell [](https://github.com/mbj/stratosphere/actions/workflows/ci.yaml)+[](https://github.com/sponsors/mbj)+[](https://hackage.haskell.org/package/stratosphere) AWS CloudFormation is a system that provisions and updates Amazon Web Services (AWS) resources based on declarative templates. Common criticisms of CloudFormation include the use of JSON as the template language and limited error-checking, often only available in the form of run-time errors and stack-rollbacks. By wrapping templates in Haskell, we are able to easily construct+rollbacks. By wrapping templates in Haskell, it is possible to easily construct them and help ensure correctness. The goals of stratosphere are to:+ * Build a Haskell EDSL to specify CloudFormation templates. Since it is embedded in Haskell, it is type-checked and generally much easier to work- with than raw JSON.+ with than raw JSON/YAML. * Have a simple checking/linting system outside of the types that can find common errors in templates.-* Be able to also read valid CloudFormation JSON templates so they can be- type-checked. This also gives us free integration tests by using the huge- amount of example templates available in the AWS docs. +## Funding / Sponsoring++This library is maintained by [mbj](https://github.com/sponsors/mbj) and any pledge is greatly apprechiated.+ ## Example +**THIS SHOWS UNRELEASED API, to use it use a git source while 1.0 is under development** [old readme](https://github.com/mbj/stratosphere/tree/v0.60.0#readme).+ Here is an example of a `Template` that creates an EC2 instance, along with the JSON output: ```haskell-{-# LANGUAGE OverloadedLists #-}-{-# LANGUAGE OverloadedStrings #-}- module Main where -import qualified Data.ByteString.Lazy.Char8 as B import Stratosphere +import qualified Data.ByteString.Lazy.Char8 as B+ main :: IO ()-main = B.putStrLn $ encodeTemplate instanceTemplate+main = B.putStrLn $ encodeTemplate template -instanceTemplate :: Template-instanceTemplate =- template- [ resource "EC2Instance" (- EC2InstanceProperties $- ec2Instance- & eciImageId ?~ "ami-22111148"- & eciKeyName ?~ (Ref "KeyName")- )- & resourceDeletionPolicy ?~ Retain- ]- & templateDescription ?~ "Sample template"- & templateParameters ?~- [ parameter "KeyName" "AWS::EC2::KeyPair::KeyName"- & parameterDescription ?~ "Name of an existing EC2 KeyPair to enable SSH access to the instance"- & parameterConstraintDescription ?~ "Must be the name of an existing EC2 KeyPair."- ]+template :: Template+template+ = mkTemplate [ec2Instance]+ & set @"Description" "EC2 Example template"+ & set @"Parameters" [keyName]++keyName :: Parameter+keyName+ = mkParameter "KeyName" "AWS::EC2::KeyPair::KeyName"+ & set @"Description" "Name of an existing EC2 KeyPair to enable SSH access to the instance"+ & set @"ConstraintDescription" "Must be the name of an existing EC2 KeyPair."++ec2Instance :: Resource+ec2Instance+ = set @"DeletionPolicy" Retain+ . resource "EC2Instance"+ $ EC2.mkInstance+ & set @"ImageId" "ami-22111148"+ & set @"KeyName" (toRef keyName) ``` ```json {- "Description": "Sample template",+ "Description": "EC2 Example template", "Parameters": { "KeyName": { "Description": "Name of an existing EC2 KeyPair to enable SSH access to the instance",@@ -68,80 +74,79 @@ "Resources": { "EC2Instance": { "DeletionPolicy": "Retain",- "Type": "AWS::EC2::Instance", "Properties": {+ "ImageId": "ami-22111148", "KeyName": { "Ref": "KeyName"- },- "ImageId": "ami-22111148"- }+ }+ },+ "Type": "AWS::EC2::Instance" } } } ``` -Please see the [examples](examples/) directory for more in-depth examples.+Please see the [examples](examples/Stratosphere/Examples) directory for more in-depth+examples (including this one). The `stratosphere-example` package produces a same named+binary with a minimal CLI for exploration. +Its encouraged to use it as a playground while exploring this library.++```+STACK_YAML=stack-9.2.yaml stack build --copy-bins --test stratosphere-examples+```+ ## Value Types CloudFormation resource parameters can be literals (strings, integers, etc), references to another resource or a Parameter, or the result of some function-call. We encapsulate all of these possibilities in the `Val a` type.+call. We encapsulate all of these possibilities in the `Value a` type. -We recommend using the `OverloadedStrings` extension to reduce the number of-`Literal`s you have to use.+It is recommend using the `OverloadedStrings` and `OverloadedLists` extensions to reduce+the number of `Literal`s that have to be written. -## Lenses+## Optional and required properties Almost every CloudFormation resource has a handful of required arguments, and many more optional arguments. Each resource is represented as a record type with optional arguments wrapped in `Maybe`. Each resource also comes with a-constructor that accepts required resource parameters as arguments. This allows-the user to succinctly specify the resource parameters they actually use+builder that accepts required resource properties as arguments. This allows+the user to succinctly specify the resource properties they actually use without adding too much noise to their code. -To specify optional arguments, we recommend using the lens operators `&` and-`?~`. In the example above, the optional EC2 key name is specified using the-`&` and `?~` lens operators.--This approach is very similar to the approach taken by the `amazonka` library.-See this-[blog post](http://brendanhay.nz/amazonka-comprehensive-haskell-aws-client#smart-constructors)-for an explanation.+To specify optional arguments, stratosphere exposes the `set` function that takes+the type level symbol of the property to set and the value as argument. Its recommended to use the+`&` function to chain these updates. See examples. ## Auto-generation All of the resources and resource properties are auto-generated from a [JSON schema file](http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-resource-specification.html) and-are placed in `library-gen/`. The `gen/` directory contains the auto-generator-code and the JSON model file. We include the `library-gen/` directory in git so-the build process is simplified. To build `library-gen` from scratch and then-build all of `stratosphere`, just run the very short `build.sh` script. You can-pass stack args to the script too, so run `./build.sh --fast` to build the-library without optimization. This is useful for development.--In the future, it would be great to not have to include the auto-generated code-in git.+are placed in `services/`. The `generator/` directory contains the auto-generator package `stratosphere-generator`+code and the JSON model file. The `services/` directory is included in git so+the build process is simplified. To build `stratosphere-generator` from scratch and+then build all of `stratosphere`, build the `stratosphere-generator` package via `stack` and execute the `stratosphere-generator` binary from the project root. ## Contributing -Feel free to raise any issues, or even just make suggestions, by filing a-Github issue.+Feel free to raise any issues, or even just make suggestions, by filing a Github issue. ## Future Work * Implement basic checker for things like undefined Refs and duplicate field names. This stuff would be too unwieldy to do in types, and performing a checking pass over a template should be pretty straightforward.-* Use a custom JSON encoder so the templates look a little more idiomatic. We- also create a lot of empty whitespace and newlines using aeson-pretty. There- are limits on the size of CloudFormation templates, and we want readable- output without hitting the limits. Also, we have some newtypes that just- exist to override aeson instances, and we could get rid of those. ## Development Build ```-STACK_YAML=stack-9.0.yaml stack build --test --flag stratosphere:-library-only+# Warning this takes a while ;)++# Compile all packages+STACK_YAML=stack-9.12.yaml stack test++# Run the generator+STACK_YAML=stack-9.12.yaml stack build stratosphere-manager+STACK_YAML=stack-9.12.yaml stack exec stratosphere-manager -- generate ```
@@ -1,72 +0,0 @@-{-# LANGUAGE OverloadedLists #-}-{-# LANGUAGE OverloadedStrings #-}--module Main where---- | Example inspired from the CreationPolicy docs:--- http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-attribute-creationpolicy.html--import Control.Lens-import qualified Data.ByteString.Lazy.Char8 as B--import Stratosphere--main :: IO ()-main = B.putStrLn $ encodeTemplate myTemplate--myTemplate :: Template-myTemplate =- template- [ asgResource- & resourceCreationPolicy ?~ asgCreationPolicy- & resourceUpdatePolicy ?~ asgUpdatePolicy- , launchConfigResource- ]- & templateParameters ?~- [ parameter "AvailabilityZones" "List<AWS::EC2::AvailabilityZone::Name>"- ]- & templateDescription ?~ "Auto scaling group example"- & templateFormatVersion ?~ "2010-09-09"--asgResource :: Resource-asgResource =- resource "AutoScalingGroup" $- autoScalingAutoScalingGroup- "1"- "4"- & asasgDesiredCapacity ?~ "3"- & asasgLaunchConfigurationName ?~ Ref "LaunchConfig"- & asasgAvailabilityZones ?~ RefList "AvailabilityZones"- & asasgTerminationPolicies ?~- [ "OldestLaunchConfiguration"- , "ClosestToNextInstanceHour"- ]--asgCreationPolicy :: CreationPolicy-asgCreationPolicy =- creationPolicy $- resourceSignal- & rsCount ?~ Literal 3- & rsTimeout ?~ "PT15M"--asgUpdatePolicy :: UpdatePolicy-asgUpdatePolicy =- updatePolicy- & upAutoScalingScheduledAction ?~ (- autoScalingScheduledActionPolicy- & assapIgnoreUnmodifiedGroupSizeProperties ?~ Literal True- )- & upAutoScalingRollingUpdate ?~ (- autoScalingRollingUpdatePolicy- & asrupMinInstancesInService ?~ Literal 1- & asrupMaxBatchSize ?~ Literal 2- & asrupPauseTime ?~ "PT15M"- & asrupWaitOnResourceSignals ?~ Literal True- )--launchConfigResource :: Resource-launchConfigResource =- resource "LaunchConfig" $- autoScalingLaunchConfiguration- "ami-16d18a7e"- "t2.micro"
@@ -1,87 +0,0 @@-{-# LANGUAGE OverloadedLists #-}-{-# LANGUAGE OverloadedStrings #-}---- | This example creates a Postgres RDS master and slave with a parameter--- group. Also note the DeletionPolicy of Retain, which will keep the resource--- alive if you delete the stack.--module Main where--import Control.Lens-import qualified Data.ByteString.Lazy.Char8 as B--import Stratosphere--main :: IO ()-main = B.putStrLn $ encodeTemplate dbTemplate--dbTemplate :: Template-dbTemplate =- template- [ rdsParamGroup & resourceDeletionPolicy ?~ Retain- , rdsMaster & resourceDeletionPolicy ?~ Retain- , rdsReplica & resourceDeletionPolicy ?~ Retain- ]- & templateDescription ?~ "Stack for and RDS master and replica"- & templateParameters ?~- [ parameter "RdsMasterPassword" "String"- , parameter "RdsSubnetGroup" "String"- , parameter "VpcId" "String"- ]--rdsMaster :: Resource-rdsMaster =- resource "RDSMaster" $- rdsdbInstance- "db.t2.micro"- -- DBInstanceIdentifier is not present in the new schema for some reason- -- & rdsdbiDBInstanceIdentifier ?~ Literal "db-master"- & rdsdbiStorageType ?~ "gp2"- & rdsdbiAllocatedStorage ?~ "20"- & rdsdbiDBParameterGroupName ?~ toRef rdsParamGroup- & rdsdbiEngine ?~ "postgres"- & rdsdbiEngineVersion ?~ "9.3.10"- & rdsdbiMasterUsername ?~ "postgres"- & rdsdbiMasterUserPassword ?~ Ref "RdsMasterPassword"- & rdsdbiDBName ?~ "the_database"- & rdsdbiPreferredMaintenanceWindow ?~ "Sun:01:00-Sun:02:00"- & rdsdbiBackupRetentionPeriod ?~ Literal 30- & rdsdbiPreferredBackupWindow ?~ "08:00-09:00"- & rdsdbiPort ?~ "5432"- & rdsdbiTags ?~- [ tag "Role" "rds-master"- ]--rdsReplica :: Resource-rdsReplica =- resource "RDSReplica" $- rdsdbInstance- "db.t2.micro"- -- DBInstanceIdentifier is not present in the new schema for some reason- -- & dbiDBInstanceIdentifier ?~ Literal "db-standby"- & rdsdbiSourceDBInstanceIdentifier ?~ toRef rdsMaster- & rdsdbiStorageType ?~ "gp2"- & rdsdbiTags ?~- [ tag "Role" "rds-standby"- ]--rdsParamGroup :: Resource-rdsParamGroup =- resource "RDSParamGroup" $- rdsdbParameterGroup- "Parameter group for RDS instances"- "postgres9.3"- & rdsdbpgParameters ?~- [ ("checkpoint_segments", "32")- , ("effective_cache_size", "5584716")- , ("hot_standby_feedback", "1")- , ("log_connections", "1")- , ("log_disconnections", "1")- , ("log_min_duration_statement", "0")- , ("maintenance_work_mem", "2000000")- , ("max_connections", "100")- , ("max_standby_archive_delay", "3600000")- , ("max_standby_streaming_delay", "3600000")- , ("wal_buffers", "2000")- , ("work_mem", "400000")- ]
@@ -1,137 +0,0 @@-{-# LANGUAGE OverloadedLists #-}-{-# LANGUAGE OverloadedStrings #-}--module Main where--import Control.Lens-import Data.Aeson (Value (Array), object)-import qualified Data.ByteString.Lazy.Char8 as B-import Data.Text (Text)-import Stratosphere--main :: IO ()-main = B.putStrLn $ encodeTemplate myTemplate--myTemplate :: Template-myTemplate =- template- [ role'- , lambda- , permission- , incomingS3Bucket- , outgoingS3Bucket- ]- & templateDescription ?~ "Simple event triggered S3 bucket to bucket copy example"- & templateFormatVersion ?~ "2010-09-09"--lambda :: Resource-lambda = (- resource "CopyS3ObjectLambda" $- lambdaFunction- lambdaCode- "index.handler"- (GetAtt "IAMRole" "Arn")- (Literal NodeJS12x)- & lfFunctionName ?~ "copyS3Object"- )- & resourceDependsOn ?~ [ role' ^. resourceName ]-- where- lambdaCode :: LambdaFunctionCode- lambdaCode = lambdaFunctionCode- & lfcZipFile ?~ code-- code :: Val Text- code = "\- \ var AWS = require('aws-sdk'); \- \ var s3 = new AWS.S3({apiVersion: '2006-03-01'}); \- \ exports.handler = function(event, context, callback) { \- \ console.log(JSON.stringify(event)); \- \ var rec = event.Records[0]; \- \ var bucket = rec.s3.bucket.name; \- \ var key = rec.s3.object.key; \- \ s3.copyObject({Bucket: \"stratosphere-s3-copy-outgoing\", Key: key, CopySource: \"stratosphere-s3-copy-incoming/\"+key}, function(err){ \- \ callback(null, \"copied s3 object\"); \- \ }); \- \ } \- \ "--role' :: Resource-role' =- resource "IAMRole" $- iamRole- rolePolicyDocumentObject- & iamrPolicies ?~ [ executePolicy ]- & iamrRoleName ?~ "MyLambdaBasicExecutionRole"- & iamrPath ?~ "/"-- where- executePolicy =- iamRolePolicy- [ ("Version", "2012-10-17")- , ("Statement", statement)- ]- "MyLambdaExecutionPolicy"-- where- statement = object- [ ("Effect", "Allow")- , ("Action", actions)- , ("Resource", "*")- ]-- actions = Array- [ "logs:CreateLogGroup"- , "logs:CreateLogStream"- , "logs:PutLogEvents"-- , "s3:PutObject"- , "s3:GetObject"- ]-- rolePolicyDocumentObject =- [ ("Version", "2012-10-17")- , ("Statement", statement)- ]-- where- statement = object- [ ("Effect", "Allow")- , ("Principal", principal)- , ("Action", "sts:AssumeRole")- ]-- principal = object- [ ("Service", "lambda.amazonaws.com") ]--incomingS3Bucket :: Resource-incomingS3Bucket = (- resource "IncomingBucket" $- s3Bucket- & sbBucketName ?~ "stratosphere-s3-copy-incoming"- & sbNotificationConfiguration ?~ config- )- & resourceDependsOn ?~ [ lambda ^. resourceName ]-- where- config =- s3BucketNotificationConfiguration- & sbncLambdaConfigurations ?~ [lambdaConfig]-- lambdaConfig =- s3BucketLambdaConfiguration- "s3:ObjectCreated:*"- (GetAtt "CopyS3ObjectLambda" "Arn")--outgoingS3Bucket :: Resource-outgoingS3Bucket =- resource "OutgoingBucket" $- s3Bucket- & sbBucketName ?~ "stratosphere-s3-copy-outgoing"--permission :: Resource-permission = resource "LambdaPermission" $- lambdaPermission- "lambda:*"- (GetAtt "CopyS3ObjectLambda" "Arn")- "s3.amazonaws.com"
@@ -1,91 +0,0 @@-{-# LANGUAGE OverloadedLists #-}-{-# LANGUAGE OverloadedStrings #-}--module Main where--import Control.Lens-import Data.Aeson (Value (Array), object)-import qualified Data.ByteString.Lazy.Char8 as B-import Data.Text (Text)-import Stratosphere--main :: IO ()-main = B.putStrLn $ encodeTemplate myTemplate--myTemplate :: Template-myTemplate =- template- [ role', lambda ]- & templateDescription ?~ "Lambda example"- & templateFormatVersion ?~ "2010-09-09"--lambda :: Resource-lambda = (- resource "LambdaFunction" $- lambdaFunction- lambdaCode- "index.handler"- (GetAtt "IAMRole" "Arn")- (Literal NodeJS12x)- )- & resourceDependsOn ?~ [ role' ^. resourceName ]--lambdaCode :: LambdaFunctionCode-lambdaCode = lambdaFunctionCode- & lfcZipFile ?~ code--code :: Val Text-code = "\-\ exports.handler = function(event, context, callback) { \-\ console.log(\"value1 = \" + event.key1); \-\ console.log(\"value2 = \" + event.key2); \-\ callback(null, \"some success message\"); \-\ } \-\ "---role' :: Resource-role' =- resource "IAMRole" $- iamRole- rolePolicyDocumentObject- & iamrPolicies ?~ [ executePolicy ]- & iamrRoleName ?~ "MyLambdaBasicExecutionRole"- & iamrPath ?~ "/"-- where- executePolicy =- iamRolePolicy- [ ("Version", "2012-10-17")- , ("Statement", statement)- ]- "MyLambdaExecutionPolicy"-- where- statement = object- [ ("Effect", "Allow")- , ("Action", actions)- , ("Resource", "*")- ]-- actions = Array- [ "logs:CreateLogGroup"- , "logs:CreateLogStream"- , "logs:PutLogEvents"- ]--- rolePolicyDocumentObject =- [ ("Version", "2012-10-17")- , ("Statement", statement)- ]-- where- statement = object- [ ("Effect", "Allow")- , ("Principal", principal)- , ("Action", "sts:AssumeRole")- ]-- principal = object- [ ("Service", "lambda.amazonaws.com") ]
@@ -0,0 +1,33 @@+module Stratosphere.Tag (+ Tag(..), mkTag+ ) where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.Property+import Stratosphere.ResourceProperties+import Stratosphere.Value+data Tag+ = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html>+ Tag {haddock_workaround_ :: (),+ -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html#cfn-resource-tags-key>+ key :: (Value Prelude.Text),+ -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html#cfn-resource-tags-value>+ value :: (Value Prelude.Text)}+ deriving stock (Prelude.Eq, Prelude.Show)+mkTag :: Value Prelude.Text -> Value Prelude.Text -> Tag+mkTag key value+ = Tag {haddock_workaround_ = (), key = key, value = value}+instance ToResourceProperties Tag where+ toResourceProperties Tag {..}+ = ResourceProperties+ {awsType = "Tag", supportsTags = Prelude.False,+ properties = ["Key" JSON..= key, "Value" JSON..= value]}+instance JSON.ToJSON Tag where+ toJSON Tag {..}+ = JSON.object ["Key" JSON..= key, "Value" JSON..= value]+instance Property "Key" Tag where+ type PropertyType "Key" Tag = Value Prelude.Text+ set newValue Tag {..} = Tag {key = newValue, ..}+instance Property "Value" Tag where+ type PropertyType "Value" Tag = Value Prelude.Text+ set newValue Tag {..} = Tag {value = newValue, ..}
@@ -0,0 +1,9 @@+module Stratosphere.Tag where+import qualified Data.Aeson as JSON+import qualified Stratosphere.Prelude as Prelude+import Stratosphere.ResourceProperties+data Tag :: Prelude.Type+instance ToResourceProperties Tag+instance Prelude.Eq Tag+instance Prelude.Show Tag+instance JSON.ToJSON Tag
@@ -1,60 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-crlconfiguration.html--module Stratosphere.ResourceProperties.ACMPCACertificateAuthorityCrlConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for ACMPCACertificateAuthorityCrlConfiguration.--- See 'acmpcaCertificateAuthorityCrlConfiguration' for a more convenient--- constructor.-data ACMPCACertificateAuthorityCrlConfiguration =- ACMPCACertificateAuthorityCrlConfiguration- { _aCMPCACertificateAuthorityCrlConfigurationCustomCname :: Maybe (Val Text)- , _aCMPCACertificateAuthorityCrlConfigurationEnabled :: Maybe (Val Bool)- , _aCMPCACertificateAuthorityCrlConfigurationExpirationInDays :: Maybe (Val Integer)- , _aCMPCACertificateAuthorityCrlConfigurationS3BucketName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ACMPCACertificateAuthorityCrlConfiguration where- toJSON ACMPCACertificateAuthorityCrlConfiguration{..} =- object $- catMaybes- [ fmap (("CustomCname",) . toJSON) _aCMPCACertificateAuthorityCrlConfigurationCustomCname- , fmap (("Enabled",) . toJSON) _aCMPCACertificateAuthorityCrlConfigurationEnabled- , fmap (("ExpirationInDays",) . toJSON) _aCMPCACertificateAuthorityCrlConfigurationExpirationInDays- , fmap (("S3BucketName",) . toJSON) _aCMPCACertificateAuthorityCrlConfigurationS3BucketName- ]---- | Constructor for 'ACMPCACertificateAuthorityCrlConfiguration' containing--- required fields as arguments.-acmpcaCertificateAuthorityCrlConfiguration- :: ACMPCACertificateAuthorityCrlConfiguration-acmpcaCertificateAuthorityCrlConfiguration =- ACMPCACertificateAuthorityCrlConfiguration- { _aCMPCACertificateAuthorityCrlConfigurationCustomCname = Nothing- , _aCMPCACertificateAuthorityCrlConfigurationEnabled = Nothing- , _aCMPCACertificateAuthorityCrlConfigurationExpirationInDays = Nothing- , _aCMPCACertificateAuthorityCrlConfigurationS3BucketName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-crlconfiguration.html#cfn-acmpca-certificateauthority-crlconfiguration-customcname-acmpcacaccCustomCname :: Lens' ACMPCACertificateAuthorityCrlConfiguration (Maybe (Val Text))-acmpcacaccCustomCname = lens _aCMPCACertificateAuthorityCrlConfigurationCustomCname (\s a -> s { _aCMPCACertificateAuthorityCrlConfigurationCustomCname = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-crlconfiguration.html#cfn-acmpca-certificateauthority-crlconfiguration-enabled-acmpcacaccEnabled :: Lens' ACMPCACertificateAuthorityCrlConfiguration (Maybe (Val Bool))-acmpcacaccEnabled = lens _aCMPCACertificateAuthorityCrlConfigurationEnabled (\s a -> s { _aCMPCACertificateAuthorityCrlConfigurationEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-crlconfiguration.html#cfn-acmpca-certificateauthority-crlconfiguration-expirationindays-acmpcacaccExpirationInDays :: Lens' ACMPCACertificateAuthorityCrlConfiguration (Maybe (Val Integer))-acmpcacaccExpirationInDays = lens _aCMPCACertificateAuthorityCrlConfigurationExpirationInDays (\s a -> s { _aCMPCACertificateAuthorityCrlConfigurationExpirationInDays = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-crlconfiguration.html#cfn-acmpca-certificateauthority-crlconfiguration-s3bucketname-acmpcacaccS3BucketName :: Lens' ACMPCACertificateAuthorityCrlConfiguration (Maybe (Val Text))-acmpcacaccS3BucketName = lens _aCMPCACertificateAuthorityCrlConfigurationS3BucketName (\s a -> s { _aCMPCACertificateAuthorityCrlConfigurationS3BucketName = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-revocationconfiguration.html--module Stratosphere.ResourceProperties.ACMPCACertificateAuthorityRevocationConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ACMPCACertificateAuthorityCrlConfiguration---- | Full data type definition for--- ACMPCACertificateAuthorityRevocationConfiguration. See--- 'acmpcaCertificateAuthorityRevocationConfiguration' for a more convenient--- constructor.-data ACMPCACertificateAuthorityRevocationConfiguration =- ACMPCACertificateAuthorityRevocationConfiguration- { _aCMPCACertificateAuthorityRevocationConfigurationCrlConfiguration :: Maybe ACMPCACertificateAuthorityCrlConfiguration- } deriving (Show, Eq)--instance ToJSON ACMPCACertificateAuthorityRevocationConfiguration where- toJSON ACMPCACertificateAuthorityRevocationConfiguration{..} =- object $- catMaybes- [ fmap (("CrlConfiguration",) . toJSON) _aCMPCACertificateAuthorityRevocationConfigurationCrlConfiguration- ]---- | Constructor for 'ACMPCACertificateAuthorityRevocationConfiguration'--- containing required fields as arguments.-acmpcaCertificateAuthorityRevocationConfiguration- :: ACMPCACertificateAuthorityRevocationConfiguration-acmpcaCertificateAuthorityRevocationConfiguration =- ACMPCACertificateAuthorityRevocationConfiguration- { _aCMPCACertificateAuthorityRevocationConfigurationCrlConfiguration = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-revocationconfiguration.html#cfn-acmpca-certificateauthority-revocationconfiguration-crlconfiguration-acmpcacarcCrlConfiguration :: Lens' ACMPCACertificateAuthorityRevocationConfiguration (Maybe ACMPCACertificateAuthorityCrlConfiguration)-acmpcacarcCrlConfiguration = lens _aCMPCACertificateAuthorityRevocationConfigurationCrlConfiguration (\s a -> s { _aCMPCACertificateAuthorityRevocationConfigurationCrlConfiguration = a })
@@ -1,129 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html--module Stratosphere.ResourceProperties.ACMPCACertificateAuthoritySubject where--import Stratosphere.ResourceImports----- | Full data type definition for ACMPCACertificateAuthoritySubject. See--- 'acmpcaCertificateAuthoritySubject' for a more convenient constructor.-data ACMPCACertificateAuthoritySubject =- ACMPCACertificateAuthoritySubject- { _aCMPCACertificateAuthoritySubjectCommonName :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectCountry :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectDistinguishedNameQualifier :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectGenerationQualifier :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectGivenName :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectInitials :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectLocality :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectOrganization :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectOrganizationalUnit :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectPseudonym :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectSerialNumber :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectState :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectSurname :: Maybe (Val Text)- , _aCMPCACertificateAuthoritySubjectTitle :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ACMPCACertificateAuthoritySubject where- toJSON ACMPCACertificateAuthoritySubject{..} =- object $- catMaybes- [ fmap (("CommonName",) . toJSON) _aCMPCACertificateAuthoritySubjectCommonName- , fmap (("Country",) . toJSON) _aCMPCACertificateAuthoritySubjectCountry- , fmap (("DistinguishedNameQualifier",) . toJSON) _aCMPCACertificateAuthoritySubjectDistinguishedNameQualifier- , fmap (("GenerationQualifier",) . toJSON) _aCMPCACertificateAuthoritySubjectGenerationQualifier- , fmap (("GivenName",) . toJSON) _aCMPCACertificateAuthoritySubjectGivenName- , fmap (("Initials",) . toJSON) _aCMPCACertificateAuthoritySubjectInitials- , fmap (("Locality",) . toJSON) _aCMPCACertificateAuthoritySubjectLocality- , fmap (("Organization",) . toJSON) _aCMPCACertificateAuthoritySubjectOrganization- , fmap (("OrganizationalUnit",) . toJSON) _aCMPCACertificateAuthoritySubjectOrganizationalUnit- , fmap (("Pseudonym",) . toJSON) _aCMPCACertificateAuthoritySubjectPseudonym- , fmap (("SerialNumber",) . toJSON) _aCMPCACertificateAuthoritySubjectSerialNumber- , fmap (("State",) . toJSON) _aCMPCACertificateAuthoritySubjectState- , fmap (("Surname",) . toJSON) _aCMPCACertificateAuthoritySubjectSurname- , fmap (("Title",) . toJSON) _aCMPCACertificateAuthoritySubjectTitle- ]---- | Constructor for 'ACMPCACertificateAuthoritySubject' containing required--- fields as arguments.-acmpcaCertificateAuthoritySubject- :: ACMPCACertificateAuthoritySubject-acmpcaCertificateAuthoritySubject =- ACMPCACertificateAuthoritySubject- { _aCMPCACertificateAuthoritySubjectCommonName = Nothing- , _aCMPCACertificateAuthoritySubjectCountry = Nothing- , _aCMPCACertificateAuthoritySubjectDistinguishedNameQualifier = Nothing- , _aCMPCACertificateAuthoritySubjectGenerationQualifier = Nothing- , _aCMPCACertificateAuthoritySubjectGivenName = Nothing- , _aCMPCACertificateAuthoritySubjectInitials = Nothing- , _aCMPCACertificateAuthoritySubjectLocality = Nothing- , _aCMPCACertificateAuthoritySubjectOrganization = Nothing- , _aCMPCACertificateAuthoritySubjectOrganizationalUnit = Nothing- , _aCMPCACertificateAuthoritySubjectPseudonym = Nothing- , _aCMPCACertificateAuthoritySubjectSerialNumber = Nothing- , _aCMPCACertificateAuthoritySubjectState = Nothing- , _aCMPCACertificateAuthoritySubjectSurname = Nothing- , _aCMPCACertificateAuthoritySubjectTitle = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-commonname-acmpcacasCommonName :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasCommonName = lens _aCMPCACertificateAuthoritySubjectCommonName (\s a -> s { _aCMPCACertificateAuthoritySubjectCommonName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-country-acmpcacasCountry :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasCountry = lens _aCMPCACertificateAuthoritySubjectCountry (\s a -> s { _aCMPCACertificateAuthoritySubjectCountry = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-distinguishednamequalifier-acmpcacasDistinguishedNameQualifier :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasDistinguishedNameQualifier = lens _aCMPCACertificateAuthoritySubjectDistinguishedNameQualifier (\s a -> s { _aCMPCACertificateAuthoritySubjectDistinguishedNameQualifier = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-generationqualifier-acmpcacasGenerationQualifier :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasGenerationQualifier = lens _aCMPCACertificateAuthoritySubjectGenerationQualifier (\s a -> s { _aCMPCACertificateAuthoritySubjectGenerationQualifier = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-givenname-acmpcacasGivenName :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasGivenName = lens _aCMPCACertificateAuthoritySubjectGivenName (\s a -> s { _aCMPCACertificateAuthoritySubjectGivenName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-initials-acmpcacasInitials :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasInitials = lens _aCMPCACertificateAuthoritySubjectInitials (\s a -> s { _aCMPCACertificateAuthoritySubjectInitials = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-locality-acmpcacasLocality :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasLocality = lens _aCMPCACertificateAuthoritySubjectLocality (\s a -> s { _aCMPCACertificateAuthoritySubjectLocality = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-organization-acmpcacasOrganization :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasOrganization = lens _aCMPCACertificateAuthoritySubjectOrganization (\s a -> s { _aCMPCACertificateAuthoritySubjectOrganization = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-organizationalunit-acmpcacasOrganizationalUnit :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasOrganizationalUnit = lens _aCMPCACertificateAuthoritySubjectOrganizationalUnit (\s a -> s { _aCMPCACertificateAuthoritySubjectOrganizationalUnit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-pseudonym-acmpcacasPseudonym :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasPseudonym = lens _aCMPCACertificateAuthoritySubjectPseudonym (\s a -> s { _aCMPCACertificateAuthoritySubjectPseudonym = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-serialnumber-acmpcacasSerialNumber :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasSerialNumber = lens _aCMPCACertificateAuthoritySubjectSerialNumber (\s a -> s { _aCMPCACertificateAuthoritySubjectSerialNumber = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-state-acmpcacasState :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasState = lens _aCMPCACertificateAuthoritySubjectState (\s a -> s { _aCMPCACertificateAuthoritySubjectState = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-surname-acmpcacasSurname :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasSurname = lens _aCMPCACertificateAuthoritySubjectSurname (\s a -> s { _aCMPCACertificateAuthoritySubjectSurname = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificateauthority-subject.html#cfn-acmpca-certificateauthority-subject-title-acmpcacasTitle :: Lens' ACMPCACertificateAuthoritySubject (Maybe (Val Text))-acmpcacasTitle = lens _aCMPCACertificateAuthoritySubjectTitle (\s a -> s { _aCMPCACertificateAuthoritySubjectTitle = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificate-validity.html--module Stratosphere.ResourceProperties.ACMPCACertificateValidity where--import Stratosphere.ResourceImports----- | Full data type definition for ACMPCACertificateValidity. See--- 'acmpcaCertificateValidity' for a more convenient constructor.-data ACMPCACertificateValidity =- ACMPCACertificateValidity- { _aCMPCACertificateValidityType :: Val Text- , _aCMPCACertificateValidityValue :: Val Integer- } deriving (Show, Eq)--instance ToJSON ACMPCACertificateValidity where- toJSON ACMPCACertificateValidity{..} =- object $- catMaybes- [ (Just . ("Type",) . toJSON) _aCMPCACertificateValidityType- , (Just . ("Value",) . toJSON) _aCMPCACertificateValidityValue- ]---- | Constructor for 'ACMPCACertificateValidity' containing required fields as--- arguments.-acmpcaCertificateValidity- :: Val Text -- ^ 'acmpcacvType'- -> Val Integer -- ^ 'acmpcacvValue'- -> ACMPCACertificateValidity-acmpcaCertificateValidity typearg valuearg =- ACMPCACertificateValidity- { _aCMPCACertificateValidityType = typearg- , _aCMPCACertificateValidityValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificate-validity.html#cfn-acmpca-certificate-validity-type-acmpcacvType :: Lens' ACMPCACertificateValidity (Val Text)-acmpcacvType = lens _aCMPCACertificateValidityType (\s a -> s { _aCMPCACertificateValidityType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-acmpca-certificate-validity.html#cfn-acmpca-certificate-validity-value-acmpcacvValue :: Lens' ACMPCACertificateValidity (Val Integer)-acmpcacvValue = lens _aCMPCACertificateValidityValue (\s a -> s { _aCMPCACertificateValidityValue = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-authenticationconfiguration.html--module Stratosphere.ResourceProperties.ASKSkillAuthenticationConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for ASKSkillAuthenticationConfiguration. See--- 'askSkillAuthenticationConfiguration' for a more convenient constructor.-data ASKSkillAuthenticationConfiguration =- ASKSkillAuthenticationConfiguration- { _aSKSkillAuthenticationConfigurationClientId :: Val Text- , _aSKSkillAuthenticationConfigurationClientSecret :: Val Text- , _aSKSkillAuthenticationConfigurationRefreshToken :: Val Text- } deriving (Show, Eq)--instance ToJSON ASKSkillAuthenticationConfiguration where- toJSON ASKSkillAuthenticationConfiguration{..} =- object $- catMaybes- [ (Just . ("ClientId",) . toJSON) _aSKSkillAuthenticationConfigurationClientId- , (Just . ("ClientSecret",) . toJSON) _aSKSkillAuthenticationConfigurationClientSecret- , (Just . ("RefreshToken",) . toJSON) _aSKSkillAuthenticationConfigurationRefreshToken- ]---- | Constructor for 'ASKSkillAuthenticationConfiguration' containing required--- fields as arguments.-askSkillAuthenticationConfiguration- :: Val Text -- ^ 'asksacClientId'- -> Val Text -- ^ 'asksacClientSecret'- -> Val Text -- ^ 'asksacRefreshToken'- -> ASKSkillAuthenticationConfiguration-askSkillAuthenticationConfiguration clientIdarg clientSecretarg refreshTokenarg =- ASKSkillAuthenticationConfiguration- { _aSKSkillAuthenticationConfigurationClientId = clientIdarg- , _aSKSkillAuthenticationConfigurationClientSecret = clientSecretarg- , _aSKSkillAuthenticationConfigurationRefreshToken = refreshTokenarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-authenticationconfiguration.html#cfn-ask-skill-authenticationconfiguration-clientid-asksacClientId :: Lens' ASKSkillAuthenticationConfiguration (Val Text)-asksacClientId = lens _aSKSkillAuthenticationConfigurationClientId (\s a -> s { _aSKSkillAuthenticationConfigurationClientId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-authenticationconfiguration.html#cfn-ask-skill-authenticationconfiguration-clientsecret-asksacClientSecret :: Lens' ASKSkillAuthenticationConfiguration (Val Text)-asksacClientSecret = lens _aSKSkillAuthenticationConfigurationClientSecret (\s a -> s { _aSKSkillAuthenticationConfigurationClientSecret = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-authenticationconfiguration.html#cfn-ask-skill-authenticationconfiguration-refreshtoken-asksacRefreshToken :: Lens' ASKSkillAuthenticationConfiguration (Val Text)-asksacRefreshToken = lens _aSKSkillAuthenticationConfigurationRefreshToken (\s a -> s { _aSKSkillAuthenticationConfigurationRefreshToken = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-overrides.html--module Stratosphere.ResourceProperties.ASKSkillOverrides where--import Stratosphere.ResourceImports----- | Full data type definition for ASKSkillOverrides. See 'askSkillOverrides'--- for a more convenient constructor.-data ASKSkillOverrides =- ASKSkillOverrides- { _aSKSkillOverridesManifest :: Maybe Object- } deriving (Show, Eq)--instance ToJSON ASKSkillOverrides where- toJSON ASKSkillOverrides{..} =- object $- catMaybes- [ fmap (("Manifest",) . toJSON) _aSKSkillOverridesManifest- ]---- | Constructor for 'ASKSkillOverrides' containing required fields as--- arguments.-askSkillOverrides- :: ASKSkillOverrides-askSkillOverrides =- ASKSkillOverrides- { _aSKSkillOverridesManifest = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-overrides.html#cfn-ask-skill-overrides-manifest-asksoManifest :: Lens' ASKSkillOverrides (Maybe Object)-asksoManifest = lens _aSKSkillOverridesManifest (\s a -> s { _aSKSkillOverridesManifest = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-skillpackage.html--module Stratosphere.ResourceProperties.ASKSkillSkillPackage where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ASKSkillOverrides---- | Full data type definition for ASKSkillSkillPackage. See--- 'askSkillSkillPackage' for a more convenient constructor.-data ASKSkillSkillPackage =- ASKSkillSkillPackage- { _aSKSkillSkillPackageOverrides :: Maybe ASKSkillOverrides- , _aSKSkillSkillPackageS3Bucket :: Val Text- , _aSKSkillSkillPackageS3BucketRole :: Maybe (Val Text)- , _aSKSkillSkillPackageS3Key :: Val Text- , _aSKSkillSkillPackageS3ObjectVersion :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ASKSkillSkillPackage where- toJSON ASKSkillSkillPackage{..} =- object $- catMaybes- [ fmap (("Overrides",) . toJSON) _aSKSkillSkillPackageOverrides- , (Just . ("S3Bucket",) . toJSON) _aSKSkillSkillPackageS3Bucket- , fmap (("S3BucketRole",) . toJSON) _aSKSkillSkillPackageS3BucketRole- , (Just . ("S3Key",) . toJSON) _aSKSkillSkillPackageS3Key- , fmap (("S3ObjectVersion",) . toJSON) _aSKSkillSkillPackageS3ObjectVersion- ]---- | Constructor for 'ASKSkillSkillPackage' containing required fields as--- arguments.-askSkillSkillPackage- :: Val Text -- ^ 'asksspS3Bucket'- -> Val Text -- ^ 'asksspS3Key'- -> ASKSkillSkillPackage-askSkillSkillPackage s3Bucketarg s3Keyarg =- ASKSkillSkillPackage- { _aSKSkillSkillPackageOverrides = Nothing- , _aSKSkillSkillPackageS3Bucket = s3Bucketarg- , _aSKSkillSkillPackageS3BucketRole = Nothing- , _aSKSkillSkillPackageS3Key = s3Keyarg- , _aSKSkillSkillPackageS3ObjectVersion = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-skillpackage.html#cfn-ask-skill-skillpackage-overrides-asksspOverrides :: Lens' ASKSkillSkillPackage (Maybe ASKSkillOverrides)-asksspOverrides = lens _aSKSkillSkillPackageOverrides (\s a -> s { _aSKSkillSkillPackageOverrides = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-skillpackage.html#cfn-ask-skill-skillpackage-s3bucket-asksspS3Bucket :: Lens' ASKSkillSkillPackage (Val Text)-asksspS3Bucket = lens _aSKSkillSkillPackageS3Bucket (\s a -> s { _aSKSkillSkillPackageS3Bucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-skillpackage.html#cfn-ask-skill-skillpackage-s3bucketrole-asksspS3BucketRole :: Lens' ASKSkillSkillPackage (Maybe (Val Text))-asksspS3BucketRole = lens _aSKSkillSkillPackageS3BucketRole (\s a -> s { _aSKSkillSkillPackageS3BucketRole = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-skillpackage.html#cfn-ask-skill-skillpackage-s3key-asksspS3Key :: Lens' ASKSkillSkillPackage (Val Text)-asksspS3Key = lens _aSKSkillSkillPackageS3Key (\s a -> s { _aSKSkillSkillPackageS3Key = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ask-skill-skillpackage.html#cfn-ask-skill-skillpackage-s3objectversion-asksspS3ObjectVersion :: Lens' ASKSkillSkillPackage (Maybe (Val Text))-asksspS3ObjectVersion = lens _aSKSkillSkillPackageS3ObjectVersion (\s a -> s { _aSKSkillSkillPackageS3ObjectVersion = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-archiverule.html--module Stratosphere.ResourceProperties.AccessAnalyzerAnalyzerArchiveRule where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AccessAnalyzerAnalyzerFilter---- | Full data type definition for AccessAnalyzerAnalyzerArchiveRule. See--- 'accessAnalyzerAnalyzerArchiveRule' for a more convenient constructor.-data AccessAnalyzerAnalyzerArchiveRule =- AccessAnalyzerAnalyzerArchiveRule- { _accessAnalyzerAnalyzerArchiveRuleFilter :: [AccessAnalyzerAnalyzerFilter]- , _accessAnalyzerAnalyzerArchiveRuleRuleName :: Val Text- } deriving (Show, Eq)--instance ToJSON AccessAnalyzerAnalyzerArchiveRule where- toJSON AccessAnalyzerAnalyzerArchiveRule{..} =- object $- catMaybes- [ (Just . ("Filter",) . toJSON) _accessAnalyzerAnalyzerArchiveRuleFilter- , (Just . ("RuleName",) . toJSON) _accessAnalyzerAnalyzerArchiveRuleRuleName- ]---- | Constructor for 'AccessAnalyzerAnalyzerArchiveRule' containing required--- fields as arguments.-accessAnalyzerAnalyzerArchiveRule- :: [AccessAnalyzerAnalyzerFilter] -- ^ 'aaaarFilter'- -> Val Text -- ^ 'aaaarRuleName'- -> AccessAnalyzerAnalyzerArchiveRule-accessAnalyzerAnalyzerArchiveRule filterarg ruleNamearg =- AccessAnalyzerAnalyzerArchiveRule- { _accessAnalyzerAnalyzerArchiveRuleFilter = filterarg- , _accessAnalyzerAnalyzerArchiveRuleRuleName = ruleNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-archiverule.html#cfn-accessanalyzer-analyzer-archiverule-filter-aaaarFilter :: Lens' AccessAnalyzerAnalyzerArchiveRule [AccessAnalyzerAnalyzerFilter]-aaaarFilter = lens _accessAnalyzerAnalyzerArchiveRuleFilter (\s a -> s { _accessAnalyzerAnalyzerArchiveRuleFilter = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-archiverule.html#cfn-accessanalyzer-analyzer-archiverule-rulename-aaaarRuleName :: Lens' AccessAnalyzerAnalyzerArchiveRule (Val Text)-aaaarRuleName = lens _accessAnalyzerAnalyzerArchiveRuleRuleName (\s a -> s { _accessAnalyzerAnalyzerArchiveRuleRuleName = a })
@@ -1,67 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-filter.html--module Stratosphere.ResourceProperties.AccessAnalyzerAnalyzerFilter where--import Stratosphere.ResourceImports----- | Full data type definition for AccessAnalyzerAnalyzerFilter. See--- 'accessAnalyzerAnalyzerFilter' for a more convenient constructor.-data AccessAnalyzerAnalyzerFilter =- AccessAnalyzerAnalyzerFilter- { _accessAnalyzerAnalyzerFilterContains :: Maybe (ValList Text)- , _accessAnalyzerAnalyzerFilterEq :: Maybe (ValList Text)- , _accessAnalyzerAnalyzerFilterExists :: Maybe (Val Bool)- , _accessAnalyzerAnalyzerFilterNeq :: Maybe (ValList Text)- , _accessAnalyzerAnalyzerFilterProperty :: Val Text- } deriving (Show, Eq)--instance ToJSON AccessAnalyzerAnalyzerFilter where- toJSON AccessAnalyzerAnalyzerFilter{..} =- object $- catMaybes- [ fmap (("Contains",) . toJSON) _accessAnalyzerAnalyzerFilterContains- , fmap (("Eq",) . toJSON) _accessAnalyzerAnalyzerFilterEq- , fmap (("Exists",) . toJSON) _accessAnalyzerAnalyzerFilterExists- , fmap (("Neq",) . toJSON) _accessAnalyzerAnalyzerFilterNeq- , (Just . ("Property",) . toJSON) _accessAnalyzerAnalyzerFilterProperty- ]---- | Constructor for 'AccessAnalyzerAnalyzerFilter' containing required fields--- as arguments.-accessAnalyzerAnalyzerFilter- :: Val Text -- ^ 'aaafProperty'- -> AccessAnalyzerAnalyzerFilter-accessAnalyzerAnalyzerFilter propertyarg =- AccessAnalyzerAnalyzerFilter- { _accessAnalyzerAnalyzerFilterContains = Nothing- , _accessAnalyzerAnalyzerFilterEq = Nothing- , _accessAnalyzerAnalyzerFilterExists = Nothing- , _accessAnalyzerAnalyzerFilterNeq = Nothing- , _accessAnalyzerAnalyzerFilterProperty = propertyarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-filter.html#cfn-accessanalyzer-analyzer-filter-contains-aaafContains :: Lens' AccessAnalyzerAnalyzerFilter (Maybe (ValList Text))-aaafContains = lens _accessAnalyzerAnalyzerFilterContains (\s a -> s { _accessAnalyzerAnalyzerFilterContains = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-filter.html#cfn-accessanalyzer-analyzer-filter-eq-aaafEq :: Lens' AccessAnalyzerAnalyzerFilter (Maybe (ValList Text))-aaafEq = lens _accessAnalyzerAnalyzerFilterEq (\s a -> s { _accessAnalyzerAnalyzerFilterEq = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-filter.html#cfn-accessanalyzer-analyzer-filter-exists-aaafExists :: Lens' AccessAnalyzerAnalyzerFilter (Maybe (Val Bool))-aaafExists = lens _accessAnalyzerAnalyzerFilterExists (\s a -> s { _accessAnalyzerAnalyzerFilterExists = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-filter.html#cfn-accessanalyzer-analyzer-filter-neq-aaafNeq :: Lens' AccessAnalyzerAnalyzerFilter (Maybe (ValList Text))-aaafNeq = lens _accessAnalyzerAnalyzerFilterNeq (\s a -> s { _accessAnalyzerAnalyzerFilterNeq = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-accessanalyzer-analyzer-filter.html#cfn-accessanalyzer-analyzer-filter-property-aaafProperty :: Lens' AccessAnalyzerAnalyzerFilter (Val Text)-aaafProperty = lens _accessAnalyzerAnalyzerFilterProperty (\s a -> s { _accessAnalyzerAnalyzerFilterProperty = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-configurationid.html--module Stratosphere.ResourceProperties.AmazonMQBrokerConfigurationId where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerConfigurationId. See--- 'amazonMQBrokerConfigurationId' for a more convenient constructor.-data AmazonMQBrokerConfigurationId =- AmazonMQBrokerConfigurationId- { _amazonMQBrokerConfigurationIdId :: Val Text- , _amazonMQBrokerConfigurationIdRevision :: Val Integer- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerConfigurationId where- toJSON AmazonMQBrokerConfigurationId{..} =- object $- catMaybes- [ (Just . ("Id",) . toJSON) _amazonMQBrokerConfigurationIdId- , (Just . ("Revision",) . toJSON) _amazonMQBrokerConfigurationIdRevision- ]---- | Constructor for 'AmazonMQBrokerConfigurationId' containing required--- fields as arguments.-amazonMQBrokerConfigurationId- :: Val Text -- ^ 'amqbciId'- -> Val Integer -- ^ 'amqbciRevision'- -> AmazonMQBrokerConfigurationId-amazonMQBrokerConfigurationId idarg revisionarg =- AmazonMQBrokerConfigurationId- { _amazonMQBrokerConfigurationIdId = idarg- , _amazonMQBrokerConfigurationIdRevision = revisionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-configurationid.html#cfn-amazonmq-broker-configurationid-id-amqbciId :: Lens' AmazonMQBrokerConfigurationId (Val Text)-amqbciId = lens _amazonMQBrokerConfigurationIdId (\s a -> s { _amazonMQBrokerConfigurationIdId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-configurationid.html#cfn-amazonmq-broker-configurationid-revision-amqbciRevision :: Lens' AmazonMQBrokerConfigurationId (Val Integer)-amqbciRevision = lens _amazonMQBrokerConfigurationIdRevision (\s a -> s { _amazonMQBrokerConfigurationIdRevision = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-encryptionoptions.html--module Stratosphere.ResourceProperties.AmazonMQBrokerEncryptionOptions where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerEncryptionOptions. See--- 'amazonMQBrokerEncryptionOptions' for a more convenient constructor.-data AmazonMQBrokerEncryptionOptions =- AmazonMQBrokerEncryptionOptions- { _amazonMQBrokerEncryptionOptionsKmsKeyId :: Maybe (Val Text)- , _amazonMQBrokerEncryptionOptionsUseAwsOwnedKey :: Val Bool- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerEncryptionOptions where- toJSON AmazonMQBrokerEncryptionOptions{..} =- object $- catMaybes- [ fmap (("KmsKeyId",) . toJSON) _amazonMQBrokerEncryptionOptionsKmsKeyId- , (Just . ("UseAwsOwnedKey",) . toJSON) _amazonMQBrokerEncryptionOptionsUseAwsOwnedKey- ]---- | Constructor for 'AmazonMQBrokerEncryptionOptions' containing required--- fields as arguments.-amazonMQBrokerEncryptionOptions- :: Val Bool -- ^ 'amqbeoUseAwsOwnedKey'- -> AmazonMQBrokerEncryptionOptions-amazonMQBrokerEncryptionOptions useAwsOwnedKeyarg =- AmazonMQBrokerEncryptionOptions- { _amazonMQBrokerEncryptionOptionsKmsKeyId = Nothing- , _amazonMQBrokerEncryptionOptionsUseAwsOwnedKey = useAwsOwnedKeyarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-encryptionoptions.html#cfn-amazonmq-broker-encryptionoptions-kmskeyid-amqbeoKmsKeyId :: Lens' AmazonMQBrokerEncryptionOptions (Maybe (Val Text))-amqbeoKmsKeyId = lens _amazonMQBrokerEncryptionOptionsKmsKeyId (\s a -> s { _amazonMQBrokerEncryptionOptionsKmsKeyId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-encryptionoptions.html#cfn-amazonmq-broker-encryptionoptions-useawsownedkey-amqbeoUseAwsOwnedKey :: Lens' AmazonMQBrokerEncryptionOptions (Val Bool)-amqbeoUseAwsOwnedKey = lens _amazonMQBrokerEncryptionOptionsUseAwsOwnedKey (\s a -> s { _amazonMQBrokerEncryptionOptionsUseAwsOwnedKey = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-interbrokercred.html--module Stratosphere.ResourceProperties.AmazonMQBrokerInterBrokerCred where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerInterBrokerCred. See--- 'amazonMQBrokerInterBrokerCred' for a more convenient constructor.-data AmazonMQBrokerInterBrokerCred =- AmazonMQBrokerInterBrokerCred- { _amazonMQBrokerInterBrokerCredPassword :: Val Text- , _amazonMQBrokerInterBrokerCredUsername :: Val Text- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerInterBrokerCred where- toJSON AmazonMQBrokerInterBrokerCred{..} =- object $- catMaybes- [ (Just . ("Password",) . toJSON) _amazonMQBrokerInterBrokerCredPassword- , (Just . ("Username",) . toJSON) _amazonMQBrokerInterBrokerCredUsername- ]---- | Constructor for 'AmazonMQBrokerInterBrokerCred' containing required--- fields as arguments.-amazonMQBrokerInterBrokerCred- :: Val Text -- ^ 'amqbibcPassword'- -> Val Text -- ^ 'amqbibcUsername'- -> AmazonMQBrokerInterBrokerCred-amazonMQBrokerInterBrokerCred passwordarg usernamearg =- AmazonMQBrokerInterBrokerCred- { _amazonMQBrokerInterBrokerCredPassword = passwordarg- , _amazonMQBrokerInterBrokerCredUsername = usernamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-interbrokercred.html#cfn-amazonmq-broker-interbrokercred-password-amqbibcPassword :: Lens' AmazonMQBrokerInterBrokerCred (Val Text)-amqbibcPassword = lens _amazonMQBrokerInterBrokerCredPassword (\s a -> s { _amazonMQBrokerInterBrokerCredPassword = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-interbrokercred.html#cfn-amazonmq-broker-interbrokercred-username-amqbibcUsername :: Lens' AmazonMQBrokerInterBrokerCred (Val Text)-amqbibcUsername = lens _amazonMQBrokerInterBrokerCredUsername (\s a -> s { _amazonMQBrokerInterBrokerCredUsername = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapmetadata.html--module Stratosphere.ResourceProperties.AmazonMQBrokerLdapMetadata where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AmazonMQBrokerInterBrokerCred-import Stratosphere.ResourceProperties.AmazonMQBrokerServerMetadata---- | Full data type definition for AmazonMQBrokerLdapMetadata. See--- 'amazonMQBrokerLdapMetadata' for a more convenient constructor.-data AmazonMQBrokerLdapMetadata =- AmazonMQBrokerLdapMetadata- { _amazonMQBrokerLdapMetadataInterBrokerCreds :: Maybe [AmazonMQBrokerInterBrokerCred]- , _amazonMQBrokerLdapMetadataServerMetadata :: AmazonMQBrokerServerMetadata- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerLdapMetadata where- toJSON AmazonMQBrokerLdapMetadata{..} =- object $- catMaybes- [ fmap (("InterBrokerCreds",) . toJSON) _amazonMQBrokerLdapMetadataInterBrokerCreds- , (Just . ("ServerMetadata",) . toJSON) _amazonMQBrokerLdapMetadataServerMetadata- ]---- | Constructor for 'AmazonMQBrokerLdapMetadata' containing required fields--- as arguments.-amazonMQBrokerLdapMetadata- :: AmazonMQBrokerServerMetadata -- ^ 'amqblmServerMetadata'- -> AmazonMQBrokerLdapMetadata-amazonMQBrokerLdapMetadata serverMetadataarg =- AmazonMQBrokerLdapMetadata- { _amazonMQBrokerLdapMetadataInterBrokerCreds = Nothing- , _amazonMQBrokerLdapMetadataServerMetadata = serverMetadataarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapmetadata.html#cfn-amazonmq-broker-ldapmetadata-interbrokercreds-amqblmInterBrokerCreds :: Lens' AmazonMQBrokerLdapMetadata (Maybe [AmazonMQBrokerInterBrokerCred])-amqblmInterBrokerCreds = lens _amazonMQBrokerLdapMetadataInterBrokerCreds (\s a -> s { _amazonMQBrokerLdapMetadataInterBrokerCreds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapmetadata.html#cfn-amazonmq-broker-ldapmetadata-servermetadata-amqblmServerMetadata :: Lens' AmazonMQBrokerLdapMetadata AmazonMQBrokerServerMetadata-amqblmServerMetadata = lens _amazonMQBrokerLdapMetadataServerMetadata (\s a -> s { _amazonMQBrokerLdapMetadataServerMetadata = a })
@@ -1,115 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html--module Stratosphere.ResourceProperties.AmazonMQBrokerLdapServerMetadata where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerLdapServerMetadata. See--- 'amazonMQBrokerLdapServerMetadata' for a more convenient constructor.-data AmazonMQBrokerLdapServerMetadata =- AmazonMQBrokerLdapServerMetadata- { _amazonMQBrokerLdapServerMetadataHosts :: ValList Text- , _amazonMQBrokerLdapServerMetadataRoleBase :: Val Text- , _amazonMQBrokerLdapServerMetadataRoleName :: Maybe (Val Text)- , _amazonMQBrokerLdapServerMetadataRoleSearchMatching :: Val Text- , _amazonMQBrokerLdapServerMetadataRoleSearchSubtree :: Maybe (Val Bool)- , _amazonMQBrokerLdapServerMetadataServiceAccountPassword :: Val Text- , _amazonMQBrokerLdapServerMetadataServiceAccountUsername :: Val Text- , _amazonMQBrokerLdapServerMetadataUserBase :: Val Text- , _amazonMQBrokerLdapServerMetadataUserRoleName :: Maybe (Val Text)- , _amazonMQBrokerLdapServerMetadataUserSearchMatching :: Val Text- , _amazonMQBrokerLdapServerMetadataUserSearchSubtree :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerLdapServerMetadata where- toJSON AmazonMQBrokerLdapServerMetadata{..} =- object $- catMaybes- [ (Just . ("Hosts",) . toJSON) _amazonMQBrokerLdapServerMetadataHosts- , (Just . ("RoleBase",) . toJSON) _amazonMQBrokerLdapServerMetadataRoleBase- , fmap (("RoleName",) . toJSON) _amazonMQBrokerLdapServerMetadataRoleName- , (Just . ("RoleSearchMatching",) . toJSON) _amazonMQBrokerLdapServerMetadataRoleSearchMatching- , fmap (("RoleSearchSubtree",) . toJSON) _amazonMQBrokerLdapServerMetadataRoleSearchSubtree- , (Just . ("ServiceAccountPassword",) . toJSON) _amazonMQBrokerLdapServerMetadataServiceAccountPassword- , (Just . ("ServiceAccountUsername",) . toJSON) _amazonMQBrokerLdapServerMetadataServiceAccountUsername- , (Just . ("UserBase",) . toJSON) _amazonMQBrokerLdapServerMetadataUserBase- , fmap (("UserRoleName",) . toJSON) _amazonMQBrokerLdapServerMetadataUserRoleName- , (Just . ("UserSearchMatching",) . toJSON) _amazonMQBrokerLdapServerMetadataUserSearchMatching- , fmap (("UserSearchSubtree",) . toJSON) _amazonMQBrokerLdapServerMetadataUserSearchSubtree- ]---- | Constructor for 'AmazonMQBrokerLdapServerMetadata' containing required--- fields as arguments.-amazonMQBrokerLdapServerMetadata- :: ValList Text -- ^ 'amqblsmHosts'- -> Val Text -- ^ 'amqblsmRoleBase'- -> Val Text -- ^ 'amqblsmRoleSearchMatching'- -> Val Text -- ^ 'amqblsmServiceAccountPassword'- -> Val Text -- ^ 'amqblsmServiceAccountUsername'- -> Val Text -- ^ 'amqblsmUserBase'- -> Val Text -- ^ 'amqblsmUserSearchMatching'- -> AmazonMQBrokerLdapServerMetadata-amazonMQBrokerLdapServerMetadata hostsarg roleBasearg roleSearchMatchingarg serviceAccountPasswordarg serviceAccountUsernamearg userBasearg userSearchMatchingarg =- AmazonMQBrokerLdapServerMetadata- { _amazonMQBrokerLdapServerMetadataHosts = hostsarg- , _amazonMQBrokerLdapServerMetadataRoleBase = roleBasearg- , _amazonMQBrokerLdapServerMetadataRoleName = Nothing- , _amazonMQBrokerLdapServerMetadataRoleSearchMatching = roleSearchMatchingarg- , _amazonMQBrokerLdapServerMetadataRoleSearchSubtree = Nothing- , _amazonMQBrokerLdapServerMetadataServiceAccountPassword = serviceAccountPasswordarg- , _amazonMQBrokerLdapServerMetadataServiceAccountUsername = serviceAccountUsernamearg- , _amazonMQBrokerLdapServerMetadataUserBase = userBasearg- , _amazonMQBrokerLdapServerMetadataUserRoleName = Nothing- , _amazonMQBrokerLdapServerMetadataUserSearchMatching = userSearchMatchingarg- , _amazonMQBrokerLdapServerMetadataUserSearchSubtree = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-hosts-amqblsmHosts :: Lens' AmazonMQBrokerLdapServerMetadata (ValList Text)-amqblsmHosts = lens _amazonMQBrokerLdapServerMetadataHosts (\s a -> s { _amazonMQBrokerLdapServerMetadataHosts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-rolebase-amqblsmRoleBase :: Lens' AmazonMQBrokerLdapServerMetadata (Val Text)-amqblsmRoleBase = lens _amazonMQBrokerLdapServerMetadataRoleBase (\s a -> s { _amazonMQBrokerLdapServerMetadataRoleBase = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-rolename-amqblsmRoleName :: Lens' AmazonMQBrokerLdapServerMetadata (Maybe (Val Text))-amqblsmRoleName = lens _amazonMQBrokerLdapServerMetadataRoleName (\s a -> s { _amazonMQBrokerLdapServerMetadataRoleName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-rolesearchmatching-amqblsmRoleSearchMatching :: Lens' AmazonMQBrokerLdapServerMetadata (Val Text)-amqblsmRoleSearchMatching = lens _amazonMQBrokerLdapServerMetadataRoleSearchMatching (\s a -> s { _amazonMQBrokerLdapServerMetadataRoleSearchMatching = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-rolesearchsubtree-amqblsmRoleSearchSubtree :: Lens' AmazonMQBrokerLdapServerMetadata (Maybe (Val Bool))-amqblsmRoleSearchSubtree = lens _amazonMQBrokerLdapServerMetadataRoleSearchSubtree (\s a -> s { _amazonMQBrokerLdapServerMetadataRoleSearchSubtree = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-serviceaccountpassword-amqblsmServiceAccountPassword :: Lens' AmazonMQBrokerLdapServerMetadata (Val Text)-amqblsmServiceAccountPassword = lens _amazonMQBrokerLdapServerMetadataServiceAccountPassword (\s a -> s { _amazonMQBrokerLdapServerMetadataServiceAccountPassword = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-serviceaccountusername-amqblsmServiceAccountUsername :: Lens' AmazonMQBrokerLdapServerMetadata (Val Text)-amqblsmServiceAccountUsername = lens _amazonMQBrokerLdapServerMetadataServiceAccountUsername (\s a -> s { _amazonMQBrokerLdapServerMetadataServiceAccountUsername = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-userbase-amqblsmUserBase :: Lens' AmazonMQBrokerLdapServerMetadata (Val Text)-amqblsmUserBase = lens _amazonMQBrokerLdapServerMetadataUserBase (\s a -> s { _amazonMQBrokerLdapServerMetadataUserBase = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-userrolename-amqblsmUserRoleName :: Lens' AmazonMQBrokerLdapServerMetadata (Maybe (Val Text))-amqblsmUserRoleName = lens _amazonMQBrokerLdapServerMetadataUserRoleName (\s a -> s { _amazonMQBrokerLdapServerMetadataUserRoleName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-usersearchmatching-amqblsmUserSearchMatching :: Lens' AmazonMQBrokerLdapServerMetadata (Val Text)-amqblsmUserSearchMatching = lens _amazonMQBrokerLdapServerMetadataUserSearchMatching (\s a -> s { _amazonMQBrokerLdapServerMetadataUserSearchMatching = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-ldapservermetadata.html#cfn-amazonmq-broker-ldapservermetadata-usersearchsubtree-amqblsmUserSearchSubtree :: Lens' AmazonMQBrokerLdapServerMetadata (Maybe (Val Bool))-amqblsmUserSearchSubtree = lens _amazonMQBrokerLdapServerMetadataUserSearchSubtree (\s a -> s { _amazonMQBrokerLdapServerMetadataUserSearchSubtree = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-loglist.html--module Stratosphere.ResourceProperties.AmazonMQBrokerLogList where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerLogList. See--- 'amazonMQBrokerLogList' for a more convenient constructor.-data AmazonMQBrokerLogList =- AmazonMQBrokerLogList- { _amazonMQBrokerLogListAudit :: Maybe (Val Bool)- , _amazonMQBrokerLogListGeneral :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerLogList where- toJSON AmazonMQBrokerLogList{..} =- object $- catMaybes- [ fmap (("Audit",) . toJSON) _amazonMQBrokerLogListAudit- , fmap (("General",) . toJSON) _amazonMQBrokerLogListGeneral- ]---- | Constructor for 'AmazonMQBrokerLogList' containing required fields as--- arguments.-amazonMQBrokerLogList- :: AmazonMQBrokerLogList-amazonMQBrokerLogList =- AmazonMQBrokerLogList- { _amazonMQBrokerLogListAudit = Nothing- , _amazonMQBrokerLogListGeneral = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-loglist.html#cfn-amazonmq-broker-loglist-audit-amqbllAudit :: Lens' AmazonMQBrokerLogList (Maybe (Val Bool))-amqbllAudit = lens _amazonMQBrokerLogListAudit (\s a -> s { _amazonMQBrokerLogListAudit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-loglist.html#cfn-amazonmq-broker-loglist-general-amqbllGeneral :: Lens' AmazonMQBrokerLogList (Maybe (Val Bool))-amqbllGeneral = lens _amazonMQBrokerLogListGeneral (\s a -> s { _amazonMQBrokerLogListGeneral = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-maintenancewindow.html--module Stratosphere.ResourceProperties.AmazonMQBrokerMaintenanceWindow where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerMaintenanceWindow. See--- 'amazonMQBrokerMaintenanceWindow' for a more convenient constructor.-data AmazonMQBrokerMaintenanceWindow =- AmazonMQBrokerMaintenanceWindow- { _amazonMQBrokerMaintenanceWindowDayOfWeek :: Val Text- , _amazonMQBrokerMaintenanceWindowTimeOfDay :: Val Text- , _amazonMQBrokerMaintenanceWindowTimeZone :: Val Text- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerMaintenanceWindow where- toJSON AmazonMQBrokerMaintenanceWindow{..} =- object $- catMaybes- [ (Just . ("DayOfWeek",) . toJSON) _amazonMQBrokerMaintenanceWindowDayOfWeek- , (Just . ("TimeOfDay",) . toJSON) _amazonMQBrokerMaintenanceWindowTimeOfDay- , (Just . ("TimeZone",) . toJSON) _amazonMQBrokerMaintenanceWindowTimeZone- ]---- | Constructor for 'AmazonMQBrokerMaintenanceWindow' containing required--- fields as arguments.-amazonMQBrokerMaintenanceWindow- :: Val Text -- ^ 'amqbmwDayOfWeek'- -> Val Text -- ^ 'amqbmwTimeOfDay'- -> Val Text -- ^ 'amqbmwTimeZone'- -> AmazonMQBrokerMaintenanceWindow-amazonMQBrokerMaintenanceWindow dayOfWeekarg timeOfDayarg timeZonearg =- AmazonMQBrokerMaintenanceWindow- { _amazonMQBrokerMaintenanceWindowDayOfWeek = dayOfWeekarg- , _amazonMQBrokerMaintenanceWindowTimeOfDay = timeOfDayarg- , _amazonMQBrokerMaintenanceWindowTimeZone = timeZonearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-maintenancewindow.html#cfn-amazonmq-broker-maintenancewindow-dayofweek-amqbmwDayOfWeek :: Lens' AmazonMQBrokerMaintenanceWindow (Val Text)-amqbmwDayOfWeek = lens _amazonMQBrokerMaintenanceWindowDayOfWeek (\s a -> s { _amazonMQBrokerMaintenanceWindowDayOfWeek = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-maintenancewindow.html#cfn-amazonmq-broker-maintenancewindow-timeofday-amqbmwTimeOfDay :: Lens' AmazonMQBrokerMaintenanceWindow (Val Text)-amqbmwTimeOfDay = lens _amazonMQBrokerMaintenanceWindowTimeOfDay (\s a -> s { _amazonMQBrokerMaintenanceWindowTimeOfDay = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-maintenancewindow.html#cfn-amazonmq-broker-maintenancewindow-timezone-amqbmwTimeZone :: Lens' AmazonMQBrokerMaintenanceWindow (Val Text)-amqbmwTimeZone = lens _amazonMQBrokerMaintenanceWindowTimeZone (\s a -> s { _amazonMQBrokerMaintenanceWindowTimeZone = a })
@@ -1,115 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html--module Stratosphere.ResourceProperties.AmazonMQBrokerServerMetadata where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerServerMetadata. See--- 'amazonMQBrokerServerMetadata' for a more convenient constructor.-data AmazonMQBrokerServerMetadata =- AmazonMQBrokerServerMetadata- { _amazonMQBrokerServerMetadataHosts :: ValList Text- , _amazonMQBrokerServerMetadataRoleBase :: Val Text- , _amazonMQBrokerServerMetadataRoleName :: Maybe (Val Text)- , _amazonMQBrokerServerMetadataRoleSearchMatching :: Val Text- , _amazonMQBrokerServerMetadataRoleSearchSubtree :: Maybe (Val Bool)- , _amazonMQBrokerServerMetadataServiceAccountPassword :: Val Text- , _amazonMQBrokerServerMetadataServiceAccountUsername :: Val Text- , _amazonMQBrokerServerMetadataUserBase :: Val Text- , _amazonMQBrokerServerMetadataUserRoleName :: Maybe (Val Text)- , _amazonMQBrokerServerMetadataUserSearchMatching :: Val Text- , _amazonMQBrokerServerMetadataUserSearchSubtree :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerServerMetadata where- toJSON AmazonMQBrokerServerMetadata{..} =- object $- catMaybes- [ (Just . ("Hosts",) . toJSON) _amazonMQBrokerServerMetadataHosts- , (Just . ("RoleBase",) . toJSON) _amazonMQBrokerServerMetadataRoleBase- , fmap (("RoleName",) . toJSON) _amazonMQBrokerServerMetadataRoleName- , (Just . ("RoleSearchMatching",) . toJSON) _amazonMQBrokerServerMetadataRoleSearchMatching- , fmap (("RoleSearchSubtree",) . toJSON) _amazonMQBrokerServerMetadataRoleSearchSubtree- , (Just . ("ServiceAccountPassword",) . toJSON) _amazonMQBrokerServerMetadataServiceAccountPassword- , (Just . ("ServiceAccountUsername",) . toJSON) _amazonMQBrokerServerMetadataServiceAccountUsername- , (Just . ("UserBase",) . toJSON) _amazonMQBrokerServerMetadataUserBase- , fmap (("UserRoleName",) . toJSON) _amazonMQBrokerServerMetadataUserRoleName- , (Just . ("UserSearchMatching",) . toJSON) _amazonMQBrokerServerMetadataUserSearchMatching- , fmap (("UserSearchSubtree",) . toJSON) _amazonMQBrokerServerMetadataUserSearchSubtree- ]---- | Constructor for 'AmazonMQBrokerServerMetadata' containing required fields--- as arguments.-amazonMQBrokerServerMetadata- :: ValList Text -- ^ 'amqbsmHosts'- -> Val Text -- ^ 'amqbsmRoleBase'- -> Val Text -- ^ 'amqbsmRoleSearchMatching'- -> Val Text -- ^ 'amqbsmServiceAccountPassword'- -> Val Text -- ^ 'amqbsmServiceAccountUsername'- -> Val Text -- ^ 'amqbsmUserBase'- -> Val Text -- ^ 'amqbsmUserSearchMatching'- -> AmazonMQBrokerServerMetadata-amazonMQBrokerServerMetadata hostsarg roleBasearg roleSearchMatchingarg serviceAccountPasswordarg serviceAccountUsernamearg userBasearg userSearchMatchingarg =- AmazonMQBrokerServerMetadata- { _amazonMQBrokerServerMetadataHosts = hostsarg- , _amazonMQBrokerServerMetadataRoleBase = roleBasearg- , _amazonMQBrokerServerMetadataRoleName = Nothing- , _amazonMQBrokerServerMetadataRoleSearchMatching = roleSearchMatchingarg- , _amazonMQBrokerServerMetadataRoleSearchSubtree = Nothing- , _amazonMQBrokerServerMetadataServiceAccountPassword = serviceAccountPasswordarg- , _amazonMQBrokerServerMetadataServiceAccountUsername = serviceAccountUsernamearg- , _amazonMQBrokerServerMetadataUserBase = userBasearg- , _amazonMQBrokerServerMetadataUserRoleName = Nothing- , _amazonMQBrokerServerMetadataUserSearchMatching = userSearchMatchingarg- , _amazonMQBrokerServerMetadataUserSearchSubtree = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-hosts-amqbsmHosts :: Lens' AmazonMQBrokerServerMetadata (ValList Text)-amqbsmHosts = lens _amazonMQBrokerServerMetadataHosts (\s a -> s { _amazonMQBrokerServerMetadataHosts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-rolebase-amqbsmRoleBase :: Lens' AmazonMQBrokerServerMetadata (Val Text)-amqbsmRoleBase = lens _amazonMQBrokerServerMetadataRoleBase (\s a -> s { _amazonMQBrokerServerMetadataRoleBase = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-rolename-amqbsmRoleName :: Lens' AmazonMQBrokerServerMetadata (Maybe (Val Text))-amqbsmRoleName = lens _amazonMQBrokerServerMetadataRoleName (\s a -> s { _amazonMQBrokerServerMetadataRoleName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-rolesearchmatching-amqbsmRoleSearchMatching :: Lens' AmazonMQBrokerServerMetadata (Val Text)-amqbsmRoleSearchMatching = lens _amazonMQBrokerServerMetadataRoleSearchMatching (\s a -> s { _amazonMQBrokerServerMetadataRoleSearchMatching = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-rolesearchsubtree-amqbsmRoleSearchSubtree :: Lens' AmazonMQBrokerServerMetadata (Maybe (Val Bool))-amqbsmRoleSearchSubtree = lens _amazonMQBrokerServerMetadataRoleSearchSubtree (\s a -> s { _amazonMQBrokerServerMetadataRoleSearchSubtree = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-serviceaccountpassword-amqbsmServiceAccountPassword :: Lens' AmazonMQBrokerServerMetadata (Val Text)-amqbsmServiceAccountPassword = lens _amazonMQBrokerServerMetadataServiceAccountPassword (\s a -> s { _amazonMQBrokerServerMetadataServiceAccountPassword = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-serviceaccountusername-amqbsmServiceAccountUsername :: Lens' AmazonMQBrokerServerMetadata (Val Text)-amqbsmServiceAccountUsername = lens _amazonMQBrokerServerMetadataServiceAccountUsername (\s a -> s { _amazonMQBrokerServerMetadataServiceAccountUsername = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-userbase-amqbsmUserBase :: Lens' AmazonMQBrokerServerMetadata (Val Text)-amqbsmUserBase = lens _amazonMQBrokerServerMetadataUserBase (\s a -> s { _amazonMQBrokerServerMetadataUserBase = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-userrolename-amqbsmUserRoleName :: Lens' AmazonMQBrokerServerMetadata (Maybe (Val Text))-amqbsmUserRoleName = lens _amazonMQBrokerServerMetadataUserRoleName (\s a -> s { _amazonMQBrokerServerMetadataUserRoleName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-usersearchmatching-amqbsmUserSearchMatching :: Lens' AmazonMQBrokerServerMetadata (Val Text)-amqbsmUserSearchMatching = lens _amazonMQBrokerServerMetadataUserSearchMatching (\s a -> s { _amazonMQBrokerServerMetadataUserSearchMatching = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-servermetadata.html#cfn-amazonmq-broker-servermetadata-usersearchsubtree-amqbsmUserSearchSubtree :: Lens' AmazonMQBrokerServerMetadata (Maybe (Val Bool))-amqbsmUserSearchSubtree = lens _amazonMQBrokerServerMetadataUserSearchSubtree (\s a -> s { _amazonMQBrokerServerMetadataUserSearchSubtree = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-tagsentry.html--module Stratosphere.ResourceProperties.AmazonMQBrokerTagsEntry where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerTagsEntry. See--- 'amazonMQBrokerTagsEntry' for a more convenient constructor.-data AmazonMQBrokerTagsEntry =- AmazonMQBrokerTagsEntry- { _amazonMQBrokerTagsEntryKey :: Val Text- , _amazonMQBrokerTagsEntryValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerTagsEntry where- toJSON AmazonMQBrokerTagsEntry{..} =- object $- catMaybes- [ (Just . ("Key",) . toJSON) _amazonMQBrokerTagsEntryKey- , (Just . ("Value",) . toJSON) _amazonMQBrokerTagsEntryValue- ]---- | Constructor for 'AmazonMQBrokerTagsEntry' containing required fields as--- arguments.-amazonMQBrokerTagsEntry- :: Val Text -- ^ 'amqbteKey'- -> Val Text -- ^ 'amqbteValue'- -> AmazonMQBrokerTagsEntry-amazonMQBrokerTagsEntry keyarg valuearg =- AmazonMQBrokerTagsEntry- { _amazonMQBrokerTagsEntryKey = keyarg- , _amazonMQBrokerTagsEntryValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-tagsentry.html#cfn-amazonmq-broker-tagsentry-key-amqbteKey :: Lens' AmazonMQBrokerTagsEntry (Val Text)-amqbteKey = lens _amazonMQBrokerTagsEntryKey (\s a -> s { _amazonMQBrokerTagsEntryKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-tagsentry.html#cfn-amazonmq-broker-tagsentry-value-amqbteValue :: Lens' AmazonMQBrokerTagsEntry (Val Text)-amqbteValue = lens _amazonMQBrokerTagsEntryValue (\s a -> s { _amazonMQBrokerTagsEntryValue = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-user.html--module Stratosphere.ResourceProperties.AmazonMQBrokerUser where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQBrokerUser. See--- 'amazonMQBrokerUser' for a more convenient constructor.-data AmazonMQBrokerUser =- AmazonMQBrokerUser- { _amazonMQBrokerUserConsoleAccess :: Maybe (Val Bool)- , _amazonMQBrokerUserGroups :: Maybe (ValList Text)- , _amazonMQBrokerUserPassword :: Val Text- , _amazonMQBrokerUserUsername :: Val Text- } deriving (Show, Eq)--instance ToJSON AmazonMQBrokerUser where- toJSON AmazonMQBrokerUser{..} =- object $- catMaybes- [ fmap (("ConsoleAccess",) . toJSON) _amazonMQBrokerUserConsoleAccess- , fmap (("Groups",) . toJSON) _amazonMQBrokerUserGroups- , (Just . ("Password",) . toJSON) _amazonMQBrokerUserPassword- , (Just . ("Username",) . toJSON) _amazonMQBrokerUserUsername- ]---- | Constructor for 'AmazonMQBrokerUser' containing required fields as--- arguments.-amazonMQBrokerUser- :: Val Text -- ^ 'amqbuPassword'- -> Val Text -- ^ 'amqbuUsername'- -> AmazonMQBrokerUser-amazonMQBrokerUser passwordarg usernamearg =- AmazonMQBrokerUser- { _amazonMQBrokerUserConsoleAccess = Nothing- , _amazonMQBrokerUserGroups = Nothing- , _amazonMQBrokerUserPassword = passwordarg- , _amazonMQBrokerUserUsername = usernamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-user.html#cfn-amazonmq-broker-user-consoleaccess-amqbuConsoleAccess :: Lens' AmazonMQBrokerUser (Maybe (Val Bool))-amqbuConsoleAccess = lens _amazonMQBrokerUserConsoleAccess (\s a -> s { _amazonMQBrokerUserConsoleAccess = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-user.html#cfn-amazonmq-broker-user-groups-amqbuGroups :: Lens' AmazonMQBrokerUser (Maybe (ValList Text))-amqbuGroups = lens _amazonMQBrokerUserGroups (\s a -> s { _amazonMQBrokerUserGroups = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-user.html#cfn-amazonmq-broker-user-password-amqbuPassword :: Lens' AmazonMQBrokerUser (Val Text)-amqbuPassword = lens _amazonMQBrokerUserPassword (\s a -> s { _amazonMQBrokerUserPassword = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-broker-user.html#cfn-amazonmq-broker-user-username-amqbuUsername :: Lens' AmazonMQBrokerUser (Val Text)-amqbuUsername = lens _amazonMQBrokerUserUsername (\s a -> s { _amazonMQBrokerUserUsername = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-configurationassociation-configurationid.html--module Stratosphere.ResourceProperties.AmazonMQConfigurationAssociationConfigurationId where--import Stratosphere.ResourceImports----- | Full data type definition for--- AmazonMQConfigurationAssociationConfigurationId. See--- 'amazonMQConfigurationAssociationConfigurationId' for a more convenient--- constructor.-data AmazonMQConfigurationAssociationConfigurationId =- AmazonMQConfigurationAssociationConfigurationId- { _amazonMQConfigurationAssociationConfigurationIdId :: Val Text- , _amazonMQConfigurationAssociationConfigurationIdRevision :: Val Integer- } deriving (Show, Eq)--instance ToJSON AmazonMQConfigurationAssociationConfigurationId where- toJSON AmazonMQConfigurationAssociationConfigurationId{..} =- object $- catMaybes- [ (Just . ("Id",) . toJSON) _amazonMQConfigurationAssociationConfigurationIdId- , (Just . ("Revision",) . toJSON) _amazonMQConfigurationAssociationConfigurationIdRevision- ]---- | Constructor for 'AmazonMQConfigurationAssociationConfigurationId'--- containing required fields as arguments.-amazonMQConfigurationAssociationConfigurationId- :: Val Text -- ^ 'amqcaciId'- -> Val Integer -- ^ 'amqcaciRevision'- -> AmazonMQConfigurationAssociationConfigurationId-amazonMQConfigurationAssociationConfigurationId idarg revisionarg =- AmazonMQConfigurationAssociationConfigurationId- { _amazonMQConfigurationAssociationConfigurationIdId = idarg- , _amazonMQConfigurationAssociationConfigurationIdRevision = revisionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-configurationassociation-configurationid.html#cfn-amazonmq-configurationassociation-configurationid-id-amqcaciId :: Lens' AmazonMQConfigurationAssociationConfigurationId (Val Text)-amqcaciId = lens _amazonMQConfigurationAssociationConfigurationIdId (\s a -> s { _amazonMQConfigurationAssociationConfigurationIdId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-configurationassociation-configurationid.html#cfn-amazonmq-configurationassociation-configurationid-revision-amqcaciRevision :: Lens' AmazonMQConfigurationAssociationConfigurationId (Val Integer)-amqcaciRevision = lens _amazonMQConfigurationAssociationConfigurationIdRevision (\s a -> s { _amazonMQConfigurationAssociationConfigurationIdRevision = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-configuration-tagsentry.html--module Stratosphere.ResourceProperties.AmazonMQConfigurationTagsEntry where--import Stratosphere.ResourceImports----- | Full data type definition for AmazonMQConfigurationTagsEntry. See--- 'amazonMQConfigurationTagsEntry' for a more convenient constructor.-data AmazonMQConfigurationTagsEntry =- AmazonMQConfigurationTagsEntry- { _amazonMQConfigurationTagsEntryKey :: Val Text- , _amazonMQConfigurationTagsEntryValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AmazonMQConfigurationTagsEntry where- toJSON AmazonMQConfigurationTagsEntry{..} =- object $- catMaybes- [ (Just . ("Key",) . toJSON) _amazonMQConfigurationTagsEntryKey- , (Just . ("Value",) . toJSON) _amazonMQConfigurationTagsEntryValue- ]---- | Constructor for 'AmazonMQConfigurationTagsEntry' containing required--- fields as arguments.-amazonMQConfigurationTagsEntry- :: Val Text -- ^ 'amqcteKey'- -> Val Text -- ^ 'amqcteValue'- -> AmazonMQConfigurationTagsEntry-amazonMQConfigurationTagsEntry keyarg valuearg =- AmazonMQConfigurationTagsEntry- { _amazonMQConfigurationTagsEntryKey = keyarg- , _amazonMQConfigurationTagsEntryValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-configuration-tagsentry.html#cfn-amazonmq-configuration-tagsentry-key-amqcteKey :: Lens' AmazonMQConfigurationTagsEntry (Val Text)-amqcteKey = lens _amazonMQConfigurationTagsEntryKey (\s a -> s { _amazonMQConfigurationTagsEntryKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amazonmq-configuration-tagsentry.html#cfn-amazonmq-configuration-tagsentry-value-amqcteValue :: Lens' AmazonMQConfigurationTagsEntry (Val Text)-amqcteValue = lens _amazonMQConfigurationTagsEntryValue (\s a -> s { _amazonMQConfigurationTagsEntryValue = a })
@@ -1,95 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html--module Stratosphere.ResourceProperties.AmplifyAppAutoBranchCreationConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AmplifyAppBasicAuthConfig-import Stratosphere.ResourceProperties.AmplifyAppEnvironmentVariable---- | Full data type definition for AmplifyAppAutoBranchCreationConfig. See--- 'amplifyAppAutoBranchCreationConfig' for a more convenient constructor.-data AmplifyAppAutoBranchCreationConfig =- AmplifyAppAutoBranchCreationConfig- { _amplifyAppAutoBranchCreationConfigAutoBranchCreationPatterns :: Maybe (ValList Text)- , _amplifyAppAutoBranchCreationConfigBasicAuthConfig :: Maybe AmplifyAppBasicAuthConfig- , _amplifyAppAutoBranchCreationConfigBuildSpec :: Maybe (Val Text)- , _amplifyAppAutoBranchCreationConfigEnableAutoBranchCreation :: Maybe (Val Bool)- , _amplifyAppAutoBranchCreationConfigEnableAutoBuild :: Maybe (Val Bool)- , _amplifyAppAutoBranchCreationConfigEnablePullRequestPreview :: Maybe (Val Bool)- , _amplifyAppAutoBranchCreationConfigEnvironmentVariables :: Maybe [AmplifyAppEnvironmentVariable]- , _amplifyAppAutoBranchCreationConfigPullRequestEnvironmentName :: Maybe (Val Text)- , _amplifyAppAutoBranchCreationConfigStage :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AmplifyAppAutoBranchCreationConfig where- toJSON AmplifyAppAutoBranchCreationConfig{..} =- object $- catMaybes- [ fmap (("AutoBranchCreationPatterns",) . toJSON) _amplifyAppAutoBranchCreationConfigAutoBranchCreationPatterns- , fmap (("BasicAuthConfig",) . toJSON) _amplifyAppAutoBranchCreationConfigBasicAuthConfig- , fmap (("BuildSpec",) . toJSON) _amplifyAppAutoBranchCreationConfigBuildSpec- , fmap (("EnableAutoBranchCreation",) . toJSON) _amplifyAppAutoBranchCreationConfigEnableAutoBranchCreation- , fmap (("EnableAutoBuild",) . toJSON) _amplifyAppAutoBranchCreationConfigEnableAutoBuild- , fmap (("EnablePullRequestPreview",) . toJSON) _amplifyAppAutoBranchCreationConfigEnablePullRequestPreview- , fmap (("EnvironmentVariables",) . toJSON) _amplifyAppAutoBranchCreationConfigEnvironmentVariables- , fmap (("PullRequestEnvironmentName",) . toJSON) _amplifyAppAutoBranchCreationConfigPullRequestEnvironmentName- , fmap (("Stage",) . toJSON) _amplifyAppAutoBranchCreationConfigStage- ]---- | Constructor for 'AmplifyAppAutoBranchCreationConfig' containing required--- fields as arguments.-amplifyAppAutoBranchCreationConfig- :: AmplifyAppAutoBranchCreationConfig-amplifyAppAutoBranchCreationConfig =- AmplifyAppAutoBranchCreationConfig- { _amplifyAppAutoBranchCreationConfigAutoBranchCreationPatterns = Nothing- , _amplifyAppAutoBranchCreationConfigBasicAuthConfig = Nothing- , _amplifyAppAutoBranchCreationConfigBuildSpec = Nothing- , _amplifyAppAutoBranchCreationConfigEnableAutoBranchCreation = Nothing- , _amplifyAppAutoBranchCreationConfigEnableAutoBuild = Nothing- , _amplifyAppAutoBranchCreationConfigEnablePullRequestPreview = Nothing- , _amplifyAppAutoBranchCreationConfigEnvironmentVariables = Nothing- , _amplifyAppAutoBranchCreationConfigPullRequestEnvironmentName = Nothing- , _amplifyAppAutoBranchCreationConfigStage = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-autobranchcreationpatterns-aaabccAutoBranchCreationPatterns :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (ValList Text))-aaabccAutoBranchCreationPatterns = lens _amplifyAppAutoBranchCreationConfigAutoBranchCreationPatterns (\s a -> s { _amplifyAppAutoBranchCreationConfigAutoBranchCreationPatterns = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-basicauthconfig-aaabccBasicAuthConfig :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe AmplifyAppBasicAuthConfig)-aaabccBasicAuthConfig = lens _amplifyAppAutoBranchCreationConfigBasicAuthConfig (\s a -> s { _amplifyAppAutoBranchCreationConfigBasicAuthConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-buildspec-aaabccBuildSpec :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (Val Text))-aaabccBuildSpec = lens _amplifyAppAutoBranchCreationConfigBuildSpec (\s a -> s { _amplifyAppAutoBranchCreationConfigBuildSpec = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-enableautobranchcreation-aaabccEnableAutoBranchCreation :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (Val Bool))-aaabccEnableAutoBranchCreation = lens _amplifyAppAutoBranchCreationConfigEnableAutoBranchCreation (\s a -> s { _amplifyAppAutoBranchCreationConfigEnableAutoBranchCreation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-enableautobuild-aaabccEnableAutoBuild :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (Val Bool))-aaabccEnableAutoBuild = lens _amplifyAppAutoBranchCreationConfigEnableAutoBuild (\s a -> s { _amplifyAppAutoBranchCreationConfigEnableAutoBuild = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-enablepullrequestpreview-aaabccEnablePullRequestPreview :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (Val Bool))-aaabccEnablePullRequestPreview = lens _amplifyAppAutoBranchCreationConfigEnablePullRequestPreview (\s a -> s { _amplifyAppAutoBranchCreationConfigEnablePullRequestPreview = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-environmentvariables-aaabccEnvironmentVariables :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe [AmplifyAppEnvironmentVariable])-aaabccEnvironmentVariables = lens _amplifyAppAutoBranchCreationConfigEnvironmentVariables (\s a -> s { _amplifyAppAutoBranchCreationConfigEnvironmentVariables = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-pullrequestenvironmentname-aaabccPullRequestEnvironmentName :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (Val Text))-aaabccPullRequestEnvironmentName = lens _amplifyAppAutoBranchCreationConfigPullRequestEnvironmentName (\s a -> s { _amplifyAppAutoBranchCreationConfigPullRequestEnvironmentName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-autobranchcreationconfig.html#cfn-amplify-app-autobranchcreationconfig-stage-aaabccStage :: Lens' AmplifyAppAutoBranchCreationConfig (Maybe (Val Text))-aaabccStage = lens _amplifyAppAutoBranchCreationConfigStage (\s a -> s { _amplifyAppAutoBranchCreationConfigStage = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-basicauthconfig.html--module Stratosphere.ResourceProperties.AmplifyAppBasicAuthConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AmplifyAppBasicAuthConfig. See--- 'amplifyAppBasicAuthConfig' for a more convenient constructor.-data AmplifyAppBasicAuthConfig =- AmplifyAppBasicAuthConfig- { _amplifyAppBasicAuthConfigEnableBasicAuth :: Maybe (Val Bool)- , _amplifyAppBasicAuthConfigPassword :: Maybe (Val Text)- , _amplifyAppBasicAuthConfigUsername :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AmplifyAppBasicAuthConfig where- toJSON AmplifyAppBasicAuthConfig{..} =- object $- catMaybes- [ fmap (("EnableBasicAuth",) . toJSON) _amplifyAppBasicAuthConfigEnableBasicAuth- , fmap (("Password",) . toJSON) _amplifyAppBasicAuthConfigPassword- , fmap (("Username",) . toJSON) _amplifyAppBasicAuthConfigUsername- ]---- | Constructor for 'AmplifyAppBasicAuthConfig' containing required fields as--- arguments.-amplifyAppBasicAuthConfig- :: AmplifyAppBasicAuthConfig-amplifyAppBasicAuthConfig =- AmplifyAppBasicAuthConfig- { _amplifyAppBasicAuthConfigEnableBasicAuth = Nothing- , _amplifyAppBasicAuthConfigPassword = Nothing- , _amplifyAppBasicAuthConfigUsername = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-basicauthconfig.html#cfn-amplify-app-basicauthconfig-enablebasicauth-aabacEnableBasicAuth :: Lens' AmplifyAppBasicAuthConfig (Maybe (Val Bool))-aabacEnableBasicAuth = lens _amplifyAppBasicAuthConfigEnableBasicAuth (\s a -> s { _amplifyAppBasicAuthConfigEnableBasicAuth = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-basicauthconfig.html#cfn-amplify-app-basicauthconfig-password-aabacPassword :: Lens' AmplifyAppBasicAuthConfig (Maybe (Val Text))-aabacPassword = lens _amplifyAppBasicAuthConfigPassword (\s a -> s { _amplifyAppBasicAuthConfigPassword = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-basicauthconfig.html#cfn-amplify-app-basicauthconfig-username-aabacUsername :: Lens' AmplifyAppBasicAuthConfig (Maybe (Val Text))-aabacUsername = lens _amplifyAppBasicAuthConfigUsername (\s a -> s { _amplifyAppBasicAuthConfigUsername = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-customrule.html--module Stratosphere.ResourceProperties.AmplifyAppCustomRule where--import Stratosphere.ResourceImports----- | Full data type definition for AmplifyAppCustomRule. See--- 'amplifyAppCustomRule' for a more convenient constructor.-data AmplifyAppCustomRule =- AmplifyAppCustomRule- { _amplifyAppCustomRuleCondition :: Maybe (Val Text)- , _amplifyAppCustomRuleSource :: Val Text- , _amplifyAppCustomRuleStatus :: Maybe (Val Text)- , _amplifyAppCustomRuleTarget :: Val Text- } deriving (Show, Eq)--instance ToJSON AmplifyAppCustomRule where- toJSON AmplifyAppCustomRule{..} =- object $- catMaybes- [ fmap (("Condition",) . toJSON) _amplifyAppCustomRuleCondition- , (Just . ("Source",) . toJSON) _amplifyAppCustomRuleSource- , fmap (("Status",) . toJSON) _amplifyAppCustomRuleStatus- , (Just . ("Target",) . toJSON) _amplifyAppCustomRuleTarget- ]---- | Constructor for 'AmplifyAppCustomRule' containing required fields as--- arguments.-amplifyAppCustomRule- :: Val Text -- ^ 'aacrSource'- -> Val Text -- ^ 'aacrTarget'- -> AmplifyAppCustomRule-amplifyAppCustomRule sourcearg targetarg =- AmplifyAppCustomRule- { _amplifyAppCustomRuleCondition = Nothing- , _amplifyAppCustomRuleSource = sourcearg- , _amplifyAppCustomRuleStatus = Nothing- , _amplifyAppCustomRuleTarget = targetarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-customrule.html#cfn-amplify-app-customrule-condition-aacrCondition :: Lens' AmplifyAppCustomRule (Maybe (Val Text))-aacrCondition = lens _amplifyAppCustomRuleCondition (\s a -> s { _amplifyAppCustomRuleCondition = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-customrule.html#cfn-amplify-app-customrule-source-aacrSource :: Lens' AmplifyAppCustomRule (Val Text)-aacrSource = lens _amplifyAppCustomRuleSource (\s a -> s { _amplifyAppCustomRuleSource = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-customrule.html#cfn-amplify-app-customrule-status-aacrStatus :: Lens' AmplifyAppCustomRule (Maybe (Val Text))-aacrStatus = lens _amplifyAppCustomRuleStatus (\s a -> s { _amplifyAppCustomRuleStatus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-customrule.html#cfn-amplify-app-customrule-target-aacrTarget :: Lens' AmplifyAppCustomRule (Val Text)-aacrTarget = lens _amplifyAppCustomRuleTarget (\s a -> s { _amplifyAppCustomRuleTarget = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-environmentvariable.html--module Stratosphere.ResourceProperties.AmplifyAppEnvironmentVariable where--import Stratosphere.ResourceImports----- | Full data type definition for AmplifyAppEnvironmentVariable. See--- 'amplifyAppEnvironmentVariable' for a more convenient constructor.-data AmplifyAppEnvironmentVariable =- AmplifyAppEnvironmentVariable- { _amplifyAppEnvironmentVariableName :: Val Text- , _amplifyAppEnvironmentVariableValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AmplifyAppEnvironmentVariable where- toJSON AmplifyAppEnvironmentVariable{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _amplifyAppEnvironmentVariableName- , (Just . ("Value",) . toJSON) _amplifyAppEnvironmentVariableValue- ]---- | Constructor for 'AmplifyAppEnvironmentVariable' containing required--- fields as arguments.-amplifyAppEnvironmentVariable- :: Val Text -- ^ 'aaevName'- -> Val Text -- ^ 'aaevValue'- -> AmplifyAppEnvironmentVariable-amplifyAppEnvironmentVariable namearg valuearg =- AmplifyAppEnvironmentVariable- { _amplifyAppEnvironmentVariableName = namearg- , _amplifyAppEnvironmentVariableValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-environmentvariable.html#cfn-amplify-app-environmentvariable-name-aaevName :: Lens' AmplifyAppEnvironmentVariable (Val Text)-aaevName = lens _amplifyAppEnvironmentVariableName (\s a -> s { _amplifyAppEnvironmentVariableName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-app-environmentvariable.html#cfn-amplify-app-environmentvariable-value-aaevValue :: Lens' AmplifyAppEnvironmentVariable (Val Text)-aaevValue = lens _amplifyAppEnvironmentVariableValue (\s a -> s { _amplifyAppEnvironmentVariableValue = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-basicauthconfig.html--module Stratosphere.ResourceProperties.AmplifyBranchBasicAuthConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AmplifyBranchBasicAuthConfig. See--- 'amplifyBranchBasicAuthConfig' for a more convenient constructor.-data AmplifyBranchBasicAuthConfig =- AmplifyBranchBasicAuthConfig- { _amplifyBranchBasicAuthConfigEnableBasicAuth :: Maybe (Val Bool)- , _amplifyBranchBasicAuthConfigPassword :: Val Text- , _amplifyBranchBasicAuthConfigUsername :: Val Text- } deriving (Show, Eq)--instance ToJSON AmplifyBranchBasicAuthConfig where- toJSON AmplifyBranchBasicAuthConfig{..} =- object $- catMaybes- [ fmap (("EnableBasicAuth",) . toJSON) _amplifyBranchBasicAuthConfigEnableBasicAuth- , (Just . ("Password",) . toJSON) _amplifyBranchBasicAuthConfigPassword- , (Just . ("Username",) . toJSON) _amplifyBranchBasicAuthConfigUsername- ]---- | Constructor for 'AmplifyBranchBasicAuthConfig' containing required fields--- as arguments.-amplifyBranchBasicAuthConfig- :: Val Text -- ^ 'abbacPassword'- -> Val Text -- ^ 'abbacUsername'- -> AmplifyBranchBasicAuthConfig-amplifyBranchBasicAuthConfig passwordarg usernamearg =- AmplifyBranchBasicAuthConfig- { _amplifyBranchBasicAuthConfigEnableBasicAuth = Nothing- , _amplifyBranchBasicAuthConfigPassword = passwordarg- , _amplifyBranchBasicAuthConfigUsername = usernamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-basicauthconfig.html#cfn-amplify-branch-basicauthconfig-enablebasicauth-abbacEnableBasicAuth :: Lens' AmplifyBranchBasicAuthConfig (Maybe (Val Bool))-abbacEnableBasicAuth = lens _amplifyBranchBasicAuthConfigEnableBasicAuth (\s a -> s { _amplifyBranchBasicAuthConfigEnableBasicAuth = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-basicauthconfig.html#cfn-amplify-branch-basicauthconfig-password-abbacPassword :: Lens' AmplifyBranchBasicAuthConfig (Val Text)-abbacPassword = lens _amplifyBranchBasicAuthConfigPassword (\s a -> s { _amplifyBranchBasicAuthConfigPassword = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-basicauthconfig.html#cfn-amplify-branch-basicauthconfig-username-abbacUsername :: Lens' AmplifyBranchBasicAuthConfig (Val Text)-abbacUsername = lens _amplifyBranchBasicAuthConfigUsername (\s a -> s { _amplifyBranchBasicAuthConfigUsername = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-environmentvariable.html--module Stratosphere.ResourceProperties.AmplifyBranchEnvironmentVariable where--import Stratosphere.ResourceImports----- | Full data type definition for AmplifyBranchEnvironmentVariable. See--- 'amplifyBranchEnvironmentVariable' for a more convenient constructor.-data AmplifyBranchEnvironmentVariable =- AmplifyBranchEnvironmentVariable- { _amplifyBranchEnvironmentVariableName :: Val Text- , _amplifyBranchEnvironmentVariableValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AmplifyBranchEnvironmentVariable where- toJSON AmplifyBranchEnvironmentVariable{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _amplifyBranchEnvironmentVariableName- , (Just . ("Value",) . toJSON) _amplifyBranchEnvironmentVariableValue- ]---- | Constructor for 'AmplifyBranchEnvironmentVariable' containing required--- fields as arguments.-amplifyBranchEnvironmentVariable- :: Val Text -- ^ 'abevName'- -> Val Text -- ^ 'abevValue'- -> AmplifyBranchEnvironmentVariable-amplifyBranchEnvironmentVariable namearg valuearg =- AmplifyBranchEnvironmentVariable- { _amplifyBranchEnvironmentVariableName = namearg- , _amplifyBranchEnvironmentVariableValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-environmentvariable.html#cfn-amplify-branch-environmentvariable-name-abevName :: Lens' AmplifyBranchEnvironmentVariable (Val Text)-abevName = lens _amplifyBranchEnvironmentVariableName (\s a -> s { _amplifyBranchEnvironmentVariableName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-branch-environmentvariable.html#cfn-amplify-branch-environmentvariable-value-abevValue :: Lens' AmplifyBranchEnvironmentVariable (Val Text)-abevValue = lens _amplifyBranchEnvironmentVariableValue (\s a -> s { _amplifyBranchEnvironmentVariableValue = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-domain-subdomainsetting.html--module Stratosphere.ResourceProperties.AmplifyDomainSubDomainSetting where--import Stratosphere.ResourceImports----- | Full data type definition for AmplifyDomainSubDomainSetting. See--- 'amplifyDomainSubDomainSetting' for a more convenient constructor.-data AmplifyDomainSubDomainSetting =- AmplifyDomainSubDomainSetting- { _amplifyDomainSubDomainSettingBranchName :: Val Text- , _amplifyDomainSubDomainSettingPrefix :: Val Text- } deriving (Show, Eq)--instance ToJSON AmplifyDomainSubDomainSetting where- toJSON AmplifyDomainSubDomainSetting{..} =- object $- catMaybes- [ (Just . ("BranchName",) . toJSON) _amplifyDomainSubDomainSettingBranchName- , (Just . ("Prefix",) . toJSON) _amplifyDomainSubDomainSettingPrefix- ]---- | Constructor for 'AmplifyDomainSubDomainSetting' containing required--- fields as arguments.-amplifyDomainSubDomainSetting- :: Val Text -- ^ 'adsdsBranchName'- -> Val Text -- ^ 'adsdsPrefix'- -> AmplifyDomainSubDomainSetting-amplifyDomainSubDomainSetting branchNamearg prefixarg =- AmplifyDomainSubDomainSetting- { _amplifyDomainSubDomainSettingBranchName = branchNamearg- , _amplifyDomainSubDomainSettingPrefix = prefixarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-domain-subdomainsetting.html#cfn-amplify-domain-subdomainsetting-branchname-adsdsBranchName :: Lens' AmplifyDomainSubDomainSetting (Val Text)-adsdsBranchName = lens _amplifyDomainSubDomainSettingBranchName (\s a -> s { _amplifyDomainSubDomainSettingBranchName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-amplify-domain-subdomainsetting.html#cfn-amplify-domain-subdomainsetting-prefix-adsdsPrefix :: Lens' AmplifyDomainSubDomainSetting (Val Text)-adsdsPrefix = lens _amplifyDomainSubDomainSettingPrefix (\s a -> s { _amplifyDomainSubDomainSettingPrefix = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-apikey-stagekey.html--module Stratosphere.ResourceProperties.ApiGatewayApiKeyStageKey where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayApiKeyStageKey. See--- 'apiGatewayApiKeyStageKey' for a more convenient constructor.-data ApiGatewayApiKeyStageKey =- ApiGatewayApiKeyStageKey- { _apiGatewayApiKeyStageKeyRestApiId :: Maybe (Val Text)- , _apiGatewayApiKeyStageKeyStageName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayApiKeyStageKey where- toJSON ApiGatewayApiKeyStageKey{..} =- object $- catMaybes- [ fmap (("RestApiId",) . toJSON) _apiGatewayApiKeyStageKeyRestApiId- , fmap (("StageName",) . toJSON) _apiGatewayApiKeyStageKeyStageName- ]---- | Constructor for 'ApiGatewayApiKeyStageKey' containing required fields as--- arguments.-apiGatewayApiKeyStageKey- :: ApiGatewayApiKeyStageKey-apiGatewayApiKeyStageKey =- ApiGatewayApiKeyStageKey- { _apiGatewayApiKeyStageKeyRestApiId = Nothing- , _apiGatewayApiKeyStageKeyStageName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-apikey-stagekey.html#cfn-apigateway-apikey-stagekey-restapiid-agakskRestApiId :: Lens' ApiGatewayApiKeyStageKey (Maybe (Val Text))-agakskRestApiId = lens _apiGatewayApiKeyStageKeyRestApiId (\s a -> s { _apiGatewayApiKeyStageKeyRestApiId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-apikey-stagekey.html#cfn-apigateway-apikey-stagekey-stagename-agakskStageName :: Lens' ApiGatewayApiKeyStageKey (Maybe (Val Text))-agakskStageName = lens _apiGatewayApiKeyStageKeyStageName (\s a -> s { _apiGatewayApiKeyStageKeyStageName = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-accesslogsetting.html--module Stratosphere.ResourceProperties.ApiGatewayDeploymentAccessLogSetting where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayDeploymentAccessLogSetting. See--- 'apiGatewayDeploymentAccessLogSetting' for a more convenient constructor.-data ApiGatewayDeploymentAccessLogSetting =- ApiGatewayDeploymentAccessLogSetting- { _apiGatewayDeploymentAccessLogSettingDestinationArn :: Maybe (Val Text)- , _apiGatewayDeploymentAccessLogSettingFormat :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayDeploymentAccessLogSetting where- toJSON ApiGatewayDeploymentAccessLogSetting{..} =- object $- catMaybes- [ fmap (("DestinationArn",) . toJSON) _apiGatewayDeploymentAccessLogSettingDestinationArn- , fmap (("Format",) . toJSON) _apiGatewayDeploymentAccessLogSettingFormat- ]---- | Constructor for 'ApiGatewayDeploymentAccessLogSetting' containing--- required fields as arguments.-apiGatewayDeploymentAccessLogSetting- :: ApiGatewayDeploymentAccessLogSetting-apiGatewayDeploymentAccessLogSetting =- ApiGatewayDeploymentAccessLogSetting- { _apiGatewayDeploymentAccessLogSettingDestinationArn = Nothing- , _apiGatewayDeploymentAccessLogSettingFormat = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-accesslogsetting.html#cfn-apigateway-deployment-accesslogsetting-destinationarn-agdalsDestinationArn :: Lens' ApiGatewayDeploymentAccessLogSetting (Maybe (Val Text))-agdalsDestinationArn = lens _apiGatewayDeploymentAccessLogSettingDestinationArn (\s a -> s { _apiGatewayDeploymentAccessLogSettingDestinationArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-accesslogsetting.html#cfn-apigateway-deployment-accesslogsetting-format-agdalsFormat :: Lens' ApiGatewayDeploymentAccessLogSetting (Maybe (Val Text))-agdalsFormat = lens _apiGatewayDeploymentAccessLogSettingFormat (\s a -> s { _apiGatewayDeploymentAccessLogSettingFormat = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-canarysetting.html--module Stratosphere.ResourceProperties.ApiGatewayDeploymentCanarySetting where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayDeploymentCanarySetting. See--- 'apiGatewayDeploymentCanarySetting' for a more convenient constructor.-data ApiGatewayDeploymentCanarySetting =- ApiGatewayDeploymentCanarySetting- { _apiGatewayDeploymentCanarySettingPercentTraffic :: Maybe (Val Double)- , _apiGatewayDeploymentCanarySettingStageVariableOverrides :: Maybe Object- , _apiGatewayDeploymentCanarySettingUseStageCache :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON ApiGatewayDeploymentCanarySetting where- toJSON ApiGatewayDeploymentCanarySetting{..} =- object $- catMaybes- [ fmap (("PercentTraffic",) . toJSON) _apiGatewayDeploymentCanarySettingPercentTraffic- , fmap (("StageVariableOverrides",) . toJSON) _apiGatewayDeploymentCanarySettingStageVariableOverrides- , fmap (("UseStageCache",) . toJSON) _apiGatewayDeploymentCanarySettingUseStageCache- ]---- | Constructor for 'ApiGatewayDeploymentCanarySetting' containing required--- fields as arguments.-apiGatewayDeploymentCanarySetting- :: ApiGatewayDeploymentCanarySetting-apiGatewayDeploymentCanarySetting =- ApiGatewayDeploymentCanarySetting- { _apiGatewayDeploymentCanarySettingPercentTraffic = Nothing- , _apiGatewayDeploymentCanarySettingStageVariableOverrides = Nothing- , _apiGatewayDeploymentCanarySettingUseStageCache = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-canarysetting.html#cfn-apigateway-deployment-canarysetting-percenttraffic-agdcsPercentTraffic :: Lens' ApiGatewayDeploymentCanarySetting (Maybe (Val Double))-agdcsPercentTraffic = lens _apiGatewayDeploymentCanarySettingPercentTraffic (\s a -> s { _apiGatewayDeploymentCanarySettingPercentTraffic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-canarysetting.html#cfn-apigateway-deployment-canarysetting-stagevariableoverrides-agdcsStageVariableOverrides :: Lens' ApiGatewayDeploymentCanarySetting (Maybe Object)-agdcsStageVariableOverrides = lens _apiGatewayDeploymentCanarySettingStageVariableOverrides (\s a -> s { _apiGatewayDeploymentCanarySettingStageVariableOverrides = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-canarysetting.html#cfn-apigateway-deployment-canarysetting-usestagecache-agdcsUseStageCache :: Lens' ApiGatewayDeploymentCanarySetting (Maybe (Val Bool))-agdcsUseStageCache = lens _apiGatewayDeploymentCanarySettingUseStageCache (\s a -> s { _apiGatewayDeploymentCanarySettingUseStageCache = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-deploymentcanarysettings.html--module Stratosphere.ResourceProperties.ApiGatewayDeploymentDeploymentCanarySettings where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApiGatewayDeploymentDeploymentCanarySettings. See--- 'apiGatewayDeploymentDeploymentCanarySettings' for a more convenient--- constructor.-data ApiGatewayDeploymentDeploymentCanarySettings =- ApiGatewayDeploymentDeploymentCanarySettings- { _apiGatewayDeploymentDeploymentCanarySettingsPercentTraffic :: Maybe (Val Double)- , _apiGatewayDeploymentDeploymentCanarySettingsStageVariableOverrides :: Maybe Object- , _apiGatewayDeploymentDeploymentCanarySettingsUseStageCache :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON ApiGatewayDeploymentDeploymentCanarySettings where- toJSON ApiGatewayDeploymentDeploymentCanarySettings{..} =- object $- catMaybes- [ fmap (("PercentTraffic",) . toJSON) _apiGatewayDeploymentDeploymentCanarySettingsPercentTraffic- , fmap (("StageVariableOverrides",) . toJSON) _apiGatewayDeploymentDeploymentCanarySettingsStageVariableOverrides- , fmap (("UseStageCache",) . toJSON) _apiGatewayDeploymentDeploymentCanarySettingsUseStageCache- ]---- | Constructor for 'ApiGatewayDeploymentDeploymentCanarySettings' containing--- required fields as arguments.-apiGatewayDeploymentDeploymentCanarySettings- :: ApiGatewayDeploymentDeploymentCanarySettings-apiGatewayDeploymentDeploymentCanarySettings =- ApiGatewayDeploymentDeploymentCanarySettings- { _apiGatewayDeploymentDeploymentCanarySettingsPercentTraffic = Nothing- , _apiGatewayDeploymentDeploymentCanarySettingsStageVariableOverrides = Nothing- , _apiGatewayDeploymentDeploymentCanarySettingsUseStageCache = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-deploymentcanarysettings.html#cfn-apigateway-deployment-deploymentcanarysettings-percenttraffic-agddcsPercentTraffic :: Lens' ApiGatewayDeploymentDeploymentCanarySettings (Maybe (Val Double))-agddcsPercentTraffic = lens _apiGatewayDeploymentDeploymentCanarySettingsPercentTraffic (\s a -> s { _apiGatewayDeploymentDeploymentCanarySettingsPercentTraffic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-deploymentcanarysettings.html#cfn-apigateway-deployment-deploymentcanarysettings-stagevariableoverrides-agddcsStageVariableOverrides :: Lens' ApiGatewayDeploymentDeploymentCanarySettings (Maybe Object)-agddcsStageVariableOverrides = lens _apiGatewayDeploymentDeploymentCanarySettingsStageVariableOverrides (\s a -> s { _apiGatewayDeploymentDeploymentCanarySettingsStageVariableOverrides = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-deploymentcanarysettings.html#cfn-apigateway-deployment-deploymentcanarysettings-usestagecache-agddcsUseStageCache :: Lens' ApiGatewayDeploymentDeploymentCanarySettings (Maybe (Val Bool))-agddcsUseStageCache = lens _apiGatewayDeploymentDeploymentCanarySettingsUseStageCache (\s a -> s { _apiGatewayDeploymentDeploymentCanarySettingsUseStageCache = a })
@@ -1,101 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html--module Stratosphere.ResourceProperties.ApiGatewayDeploymentMethodSetting where--import Stratosphere.ResourceImports-import Stratosphere.Types---- | Full data type definition for ApiGatewayDeploymentMethodSetting. See--- 'apiGatewayDeploymentMethodSetting' for a more convenient constructor.-data ApiGatewayDeploymentMethodSetting =- ApiGatewayDeploymentMethodSetting- { _apiGatewayDeploymentMethodSettingCacheDataEncrypted :: Maybe (Val Bool)- , _apiGatewayDeploymentMethodSettingCacheTtlInSeconds :: Maybe (Val Integer)- , _apiGatewayDeploymentMethodSettingCachingEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentMethodSettingDataTraceEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentMethodSettingHttpMethod :: Maybe (Val HttpMethod)- , _apiGatewayDeploymentMethodSettingLoggingLevel :: Maybe (Val LoggingLevel)- , _apiGatewayDeploymentMethodSettingMetricsEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentMethodSettingResourcePath :: Maybe (Val Text)- , _apiGatewayDeploymentMethodSettingThrottlingBurstLimit :: Maybe (Val Integer)- , _apiGatewayDeploymentMethodSettingThrottlingRateLimit :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON ApiGatewayDeploymentMethodSetting where- toJSON ApiGatewayDeploymentMethodSetting{..} =- object $- catMaybes- [ fmap (("CacheDataEncrypted",) . toJSON) _apiGatewayDeploymentMethodSettingCacheDataEncrypted- , fmap (("CacheTtlInSeconds",) . toJSON) _apiGatewayDeploymentMethodSettingCacheTtlInSeconds- , fmap (("CachingEnabled",) . toJSON) _apiGatewayDeploymentMethodSettingCachingEnabled- , fmap (("DataTraceEnabled",) . toJSON) _apiGatewayDeploymentMethodSettingDataTraceEnabled- , fmap (("HttpMethod",) . toJSON) _apiGatewayDeploymentMethodSettingHttpMethod- , fmap (("LoggingLevel",) . toJSON) _apiGatewayDeploymentMethodSettingLoggingLevel- , fmap (("MetricsEnabled",) . toJSON) _apiGatewayDeploymentMethodSettingMetricsEnabled- , fmap (("ResourcePath",) . toJSON) _apiGatewayDeploymentMethodSettingResourcePath- , fmap (("ThrottlingBurstLimit",) . toJSON) _apiGatewayDeploymentMethodSettingThrottlingBurstLimit- , fmap (("ThrottlingRateLimit",) . toJSON) _apiGatewayDeploymentMethodSettingThrottlingRateLimit- ]---- | Constructor for 'ApiGatewayDeploymentMethodSetting' containing required--- fields as arguments.-apiGatewayDeploymentMethodSetting- :: ApiGatewayDeploymentMethodSetting-apiGatewayDeploymentMethodSetting =- ApiGatewayDeploymentMethodSetting- { _apiGatewayDeploymentMethodSettingCacheDataEncrypted = Nothing- , _apiGatewayDeploymentMethodSettingCacheTtlInSeconds = Nothing- , _apiGatewayDeploymentMethodSettingCachingEnabled = Nothing- , _apiGatewayDeploymentMethodSettingDataTraceEnabled = Nothing- , _apiGatewayDeploymentMethodSettingHttpMethod = Nothing- , _apiGatewayDeploymentMethodSettingLoggingLevel = Nothing- , _apiGatewayDeploymentMethodSettingMetricsEnabled = Nothing- , _apiGatewayDeploymentMethodSettingResourcePath = Nothing- , _apiGatewayDeploymentMethodSettingThrottlingBurstLimit = Nothing- , _apiGatewayDeploymentMethodSettingThrottlingRateLimit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-cachedataencrypted-agdmsCacheDataEncrypted :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Bool))-agdmsCacheDataEncrypted = lens _apiGatewayDeploymentMethodSettingCacheDataEncrypted (\s a -> s { _apiGatewayDeploymentMethodSettingCacheDataEncrypted = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-cachettlinseconds-agdmsCacheTtlInSeconds :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Integer))-agdmsCacheTtlInSeconds = lens _apiGatewayDeploymentMethodSettingCacheTtlInSeconds (\s a -> s { _apiGatewayDeploymentMethodSettingCacheTtlInSeconds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-cachingenabled-agdmsCachingEnabled :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Bool))-agdmsCachingEnabled = lens _apiGatewayDeploymentMethodSettingCachingEnabled (\s a -> s { _apiGatewayDeploymentMethodSettingCachingEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-datatraceenabled-agdmsDataTraceEnabled :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Bool))-agdmsDataTraceEnabled = lens _apiGatewayDeploymentMethodSettingDataTraceEnabled (\s a -> s { _apiGatewayDeploymentMethodSettingDataTraceEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-httpmethod-agdmsHttpMethod :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val HttpMethod))-agdmsHttpMethod = lens _apiGatewayDeploymentMethodSettingHttpMethod (\s a -> s { _apiGatewayDeploymentMethodSettingHttpMethod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-logginglevel-agdmsLoggingLevel :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val LoggingLevel))-agdmsLoggingLevel = lens _apiGatewayDeploymentMethodSettingLoggingLevel (\s a -> s { _apiGatewayDeploymentMethodSettingLoggingLevel = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-metricsenabled-agdmsMetricsEnabled :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Bool))-agdmsMetricsEnabled = lens _apiGatewayDeploymentMethodSettingMetricsEnabled (\s a -> s { _apiGatewayDeploymentMethodSettingMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-resourcepath-agdmsResourcePath :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Text))-agdmsResourcePath = lens _apiGatewayDeploymentMethodSettingResourcePath (\s a -> s { _apiGatewayDeploymentMethodSettingResourcePath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-throttlingburstlimit-agdmsThrottlingBurstLimit :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Integer))-agdmsThrottlingBurstLimit = lens _apiGatewayDeploymentMethodSettingThrottlingBurstLimit (\s a -> s { _apiGatewayDeploymentMethodSettingThrottlingBurstLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription-methodsetting.html#cfn-apigateway-deployment-stagedescription-methodsetting-throttlingratelimit-agdmsThrottlingRateLimit :: Lens' ApiGatewayDeploymentMethodSetting (Maybe (Val Double))-agdmsThrottlingRateLimit = lens _apiGatewayDeploymentMethodSettingThrottlingRateLimit (\s a -> s { _apiGatewayDeploymentMethodSettingThrottlingRateLimit = a })
@@ -1,168 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html--module Stratosphere.ResourceProperties.ApiGatewayDeploymentStageDescription where--import Stratosphere.ResourceImports-import Stratosphere.Types-import Stratosphere.ResourceProperties.ApiGatewayDeploymentAccessLogSetting-import Stratosphere.ResourceProperties.ApiGatewayDeploymentCanarySetting-import Stratosphere.ResourceProperties.ApiGatewayDeploymentMethodSetting-import Stratosphere.ResourceProperties.Tag---- | Full data type definition for ApiGatewayDeploymentStageDescription. See--- 'apiGatewayDeploymentStageDescription' for a more convenient constructor.-data ApiGatewayDeploymentStageDescription =- ApiGatewayDeploymentStageDescription- { _apiGatewayDeploymentStageDescriptionAccessLogSetting :: Maybe ApiGatewayDeploymentAccessLogSetting- , _apiGatewayDeploymentStageDescriptionCacheClusterEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentStageDescriptionCacheClusterSize :: Maybe (Val Text)- , _apiGatewayDeploymentStageDescriptionCacheDataEncrypted :: Maybe (Val Bool)- , _apiGatewayDeploymentStageDescriptionCacheTtlInSeconds :: Maybe (Val Integer)- , _apiGatewayDeploymentStageDescriptionCachingEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentStageDescriptionCanarySetting :: Maybe ApiGatewayDeploymentCanarySetting- , _apiGatewayDeploymentStageDescriptionClientCertificateId :: Maybe (Val Text)- , _apiGatewayDeploymentStageDescriptionDataTraceEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentStageDescriptionDescription :: Maybe (Val Text)- , _apiGatewayDeploymentStageDescriptionDocumentationVersion :: Maybe (Val Text)- , _apiGatewayDeploymentStageDescriptionLoggingLevel :: Maybe (Val LoggingLevel)- , _apiGatewayDeploymentStageDescriptionMethodSettings :: Maybe [ApiGatewayDeploymentMethodSetting]- , _apiGatewayDeploymentStageDescriptionMetricsEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentStageDescriptionTags :: Maybe [Tag]- , _apiGatewayDeploymentStageDescriptionThrottlingBurstLimit :: Maybe (Val Integer)- , _apiGatewayDeploymentStageDescriptionThrottlingRateLimit :: Maybe (Val Double)- , _apiGatewayDeploymentStageDescriptionTracingEnabled :: Maybe (Val Bool)- , _apiGatewayDeploymentStageDescriptionVariables :: Maybe Object- } deriving (Show, Eq)--instance ToJSON ApiGatewayDeploymentStageDescription where- toJSON ApiGatewayDeploymentStageDescription{..} =- object $- catMaybes- [ fmap (("AccessLogSetting",) . toJSON) _apiGatewayDeploymentStageDescriptionAccessLogSetting- , fmap (("CacheClusterEnabled",) . toJSON) _apiGatewayDeploymentStageDescriptionCacheClusterEnabled- , fmap (("CacheClusterSize",) . toJSON) _apiGatewayDeploymentStageDescriptionCacheClusterSize- , fmap (("CacheDataEncrypted",) . toJSON) _apiGatewayDeploymentStageDescriptionCacheDataEncrypted- , fmap (("CacheTtlInSeconds",) . toJSON) _apiGatewayDeploymentStageDescriptionCacheTtlInSeconds- , fmap (("CachingEnabled",) . toJSON) _apiGatewayDeploymentStageDescriptionCachingEnabled- , fmap (("CanarySetting",) . toJSON) _apiGatewayDeploymentStageDescriptionCanarySetting- , fmap (("ClientCertificateId",) . toJSON) _apiGatewayDeploymentStageDescriptionClientCertificateId- , fmap (("DataTraceEnabled",) . toJSON) _apiGatewayDeploymentStageDescriptionDataTraceEnabled- , fmap (("Description",) . toJSON) _apiGatewayDeploymentStageDescriptionDescription- , fmap (("DocumentationVersion",) . toJSON) _apiGatewayDeploymentStageDescriptionDocumentationVersion- , fmap (("LoggingLevel",) . toJSON) _apiGatewayDeploymentStageDescriptionLoggingLevel- , fmap (("MethodSettings",) . toJSON) _apiGatewayDeploymentStageDescriptionMethodSettings- , fmap (("MetricsEnabled",) . toJSON) _apiGatewayDeploymentStageDescriptionMetricsEnabled- , fmap (("Tags",) . toJSON) _apiGatewayDeploymentStageDescriptionTags- , fmap (("ThrottlingBurstLimit",) . toJSON) _apiGatewayDeploymentStageDescriptionThrottlingBurstLimit- , fmap (("ThrottlingRateLimit",) . toJSON) _apiGatewayDeploymentStageDescriptionThrottlingRateLimit- , fmap (("TracingEnabled",) . toJSON) _apiGatewayDeploymentStageDescriptionTracingEnabled- , fmap (("Variables",) . toJSON) _apiGatewayDeploymentStageDescriptionVariables- ]---- | Constructor for 'ApiGatewayDeploymentStageDescription' containing--- required fields as arguments.-apiGatewayDeploymentStageDescription- :: ApiGatewayDeploymentStageDescription-apiGatewayDeploymentStageDescription =- ApiGatewayDeploymentStageDescription- { _apiGatewayDeploymentStageDescriptionAccessLogSetting = Nothing- , _apiGatewayDeploymentStageDescriptionCacheClusterEnabled = Nothing- , _apiGatewayDeploymentStageDescriptionCacheClusterSize = Nothing- , _apiGatewayDeploymentStageDescriptionCacheDataEncrypted = Nothing- , _apiGatewayDeploymentStageDescriptionCacheTtlInSeconds = Nothing- , _apiGatewayDeploymentStageDescriptionCachingEnabled = Nothing- , _apiGatewayDeploymentStageDescriptionCanarySetting = Nothing- , _apiGatewayDeploymentStageDescriptionClientCertificateId = Nothing- , _apiGatewayDeploymentStageDescriptionDataTraceEnabled = Nothing- , _apiGatewayDeploymentStageDescriptionDescription = Nothing- , _apiGatewayDeploymentStageDescriptionDocumentationVersion = Nothing- , _apiGatewayDeploymentStageDescriptionLoggingLevel = Nothing- , _apiGatewayDeploymentStageDescriptionMethodSettings = Nothing- , _apiGatewayDeploymentStageDescriptionMetricsEnabled = Nothing- , _apiGatewayDeploymentStageDescriptionTags = Nothing- , _apiGatewayDeploymentStageDescriptionThrottlingBurstLimit = Nothing- , _apiGatewayDeploymentStageDescriptionThrottlingRateLimit = Nothing- , _apiGatewayDeploymentStageDescriptionTracingEnabled = Nothing- , _apiGatewayDeploymentStageDescriptionVariables = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-accesslogsetting-agdsdAccessLogSetting :: Lens' ApiGatewayDeploymentStageDescription (Maybe ApiGatewayDeploymentAccessLogSetting)-agdsdAccessLogSetting = lens _apiGatewayDeploymentStageDescriptionAccessLogSetting (\s a -> s { _apiGatewayDeploymentStageDescriptionAccessLogSetting = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-cacheclusterenabled-agdsdCacheClusterEnabled :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Bool))-agdsdCacheClusterEnabled = lens _apiGatewayDeploymentStageDescriptionCacheClusterEnabled (\s a -> s { _apiGatewayDeploymentStageDescriptionCacheClusterEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-cacheclustersize-agdsdCacheClusterSize :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Text))-agdsdCacheClusterSize = lens _apiGatewayDeploymentStageDescriptionCacheClusterSize (\s a -> s { _apiGatewayDeploymentStageDescriptionCacheClusterSize = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-cachedataencrypted-agdsdCacheDataEncrypted :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Bool))-agdsdCacheDataEncrypted = lens _apiGatewayDeploymentStageDescriptionCacheDataEncrypted (\s a -> s { _apiGatewayDeploymentStageDescriptionCacheDataEncrypted = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-cachettlinseconds-agdsdCacheTtlInSeconds :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Integer))-agdsdCacheTtlInSeconds = lens _apiGatewayDeploymentStageDescriptionCacheTtlInSeconds (\s a -> s { _apiGatewayDeploymentStageDescriptionCacheTtlInSeconds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-cachingenabled-agdsdCachingEnabled :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Bool))-agdsdCachingEnabled = lens _apiGatewayDeploymentStageDescriptionCachingEnabled (\s a -> s { _apiGatewayDeploymentStageDescriptionCachingEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-canarysetting-agdsdCanarySetting :: Lens' ApiGatewayDeploymentStageDescription (Maybe ApiGatewayDeploymentCanarySetting)-agdsdCanarySetting = lens _apiGatewayDeploymentStageDescriptionCanarySetting (\s a -> s { _apiGatewayDeploymentStageDescriptionCanarySetting = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-clientcertificateid-agdsdClientCertificateId :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Text))-agdsdClientCertificateId = lens _apiGatewayDeploymentStageDescriptionClientCertificateId (\s a -> s { _apiGatewayDeploymentStageDescriptionClientCertificateId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-datatraceenabled-agdsdDataTraceEnabled :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Bool))-agdsdDataTraceEnabled = lens _apiGatewayDeploymentStageDescriptionDataTraceEnabled (\s a -> s { _apiGatewayDeploymentStageDescriptionDataTraceEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-description-agdsdDescription :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Text))-agdsdDescription = lens _apiGatewayDeploymentStageDescriptionDescription (\s a -> s { _apiGatewayDeploymentStageDescriptionDescription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-documentationversion-agdsdDocumentationVersion :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Text))-agdsdDocumentationVersion = lens _apiGatewayDeploymentStageDescriptionDocumentationVersion (\s a -> s { _apiGatewayDeploymentStageDescriptionDocumentationVersion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-logginglevel-agdsdLoggingLevel :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val LoggingLevel))-agdsdLoggingLevel = lens _apiGatewayDeploymentStageDescriptionLoggingLevel (\s a -> s { _apiGatewayDeploymentStageDescriptionLoggingLevel = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-methodsettings-agdsdMethodSettings :: Lens' ApiGatewayDeploymentStageDescription (Maybe [ApiGatewayDeploymentMethodSetting])-agdsdMethodSettings = lens _apiGatewayDeploymentStageDescriptionMethodSettings (\s a -> s { _apiGatewayDeploymentStageDescriptionMethodSettings = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-metricsenabled-agdsdMetricsEnabled :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Bool))-agdsdMetricsEnabled = lens _apiGatewayDeploymentStageDescriptionMetricsEnabled (\s a -> s { _apiGatewayDeploymentStageDescriptionMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-tags-agdsdTags :: Lens' ApiGatewayDeploymentStageDescription (Maybe [Tag])-agdsdTags = lens _apiGatewayDeploymentStageDescriptionTags (\s a -> s { _apiGatewayDeploymentStageDescriptionTags = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-throttlingburstlimit-agdsdThrottlingBurstLimit :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Integer))-agdsdThrottlingBurstLimit = lens _apiGatewayDeploymentStageDescriptionThrottlingBurstLimit (\s a -> s { _apiGatewayDeploymentStageDescriptionThrottlingBurstLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-throttlingratelimit-agdsdThrottlingRateLimit :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Double))-agdsdThrottlingRateLimit = lens _apiGatewayDeploymentStageDescriptionThrottlingRateLimit (\s a -> s { _apiGatewayDeploymentStageDescriptionThrottlingRateLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-tracingenabled-agdsdTracingEnabled :: Lens' ApiGatewayDeploymentStageDescription (Maybe (Val Bool))-agdsdTracingEnabled = lens _apiGatewayDeploymentStageDescriptionTracingEnabled (\s a -> s { _apiGatewayDeploymentStageDescriptionTracingEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-deployment-stagedescription.html#cfn-apigateway-deployment-stagedescription-variables-agdsdVariables :: Lens' ApiGatewayDeploymentStageDescription (Maybe Object)-agdsdVariables = lens _apiGatewayDeploymentStageDescriptionVariables (\s a -> s { _apiGatewayDeploymentStageDescriptionVariables = a })
@@ -1,66 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-documentationpart-location.html--module Stratosphere.ResourceProperties.ApiGatewayDocumentationPartLocation where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayDocumentationPartLocation. See--- 'apiGatewayDocumentationPartLocation' for a more convenient constructor.-data ApiGatewayDocumentationPartLocation =- ApiGatewayDocumentationPartLocation- { _apiGatewayDocumentationPartLocationMethod :: Maybe (Val Text)- , _apiGatewayDocumentationPartLocationName :: Maybe (Val Text)- , _apiGatewayDocumentationPartLocationPath :: Maybe (Val Text)- , _apiGatewayDocumentationPartLocationStatusCode :: Maybe (Val Text)- , _apiGatewayDocumentationPartLocationType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayDocumentationPartLocation where- toJSON ApiGatewayDocumentationPartLocation{..} =- object $- catMaybes- [ fmap (("Method",) . toJSON) _apiGatewayDocumentationPartLocationMethod- , fmap (("Name",) . toJSON) _apiGatewayDocumentationPartLocationName- , fmap (("Path",) . toJSON) _apiGatewayDocumentationPartLocationPath- , fmap (("StatusCode",) . toJSON) _apiGatewayDocumentationPartLocationStatusCode- , fmap (("Type",) . toJSON) _apiGatewayDocumentationPartLocationType- ]---- | Constructor for 'ApiGatewayDocumentationPartLocation' containing required--- fields as arguments.-apiGatewayDocumentationPartLocation- :: ApiGatewayDocumentationPartLocation-apiGatewayDocumentationPartLocation =- ApiGatewayDocumentationPartLocation- { _apiGatewayDocumentationPartLocationMethod = Nothing- , _apiGatewayDocumentationPartLocationName = Nothing- , _apiGatewayDocumentationPartLocationPath = Nothing- , _apiGatewayDocumentationPartLocationStatusCode = Nothing- , _apiGatewayDocumentationPartLocationType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-documentationpart-location.html#cfn-apigateway-documentationpart-location-method-agdplMethod :: Lens' ApiGatewayDocumentationPartLocation (Maybe (Val Text))-agdplMethod = lens _apiGatewayDocumentationPartLocationMethod (\s a -> s { _apiGatewayDocumentationPartLocationMethod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-documentationpart-location.html#cfn-apigateway-documentationpart-location-name-agdplName :: Lens' ApiGatewayDocumentationPartLocation (Maybe (Val Text))-agdplName = lens _apiGatewayDocumentationPartLocationName (\s a -> s { _apiGatewayDocumentationPartLocationName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-documentationpart-location.html#cfn-apigateway-documentationpart-location-path-agdplPath :: Lens' ApiGatewayDocumentationPartLocation (Maybe (Val Text))-agdplPath = lens _apiGatewayDocumentationPartLocationPath (\s a -> s { _apiGatewayDocumentationPartLocationPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-documentationpart-location.html#cfn-apigateway-documentationpart-location-statuscode-agdplStatusCode :: Lens' ApiGatewayDocumentationPartLocation (Maybe (Val Text))-agdplStatusCode = lens _apiGatewayDocumentationPartLocationStatusCode (\s a -> s { _apiGatewayDocumentationPartLocationStatusCode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-documentationpart-location.html#cfn-apigateway-documentationpart-location-type-agdplType :: Lens' ApiGatewayDocumentationPartLocation (Maybe (Val Text))-agdplType = lens _apiGatewayDocumentationPartLocationType (\s a -> s { _apiGatewayDocumentationPartLocationType = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-domainname-endpointconfiguration.html--module Stratosphere.ResourceProperties.ApiGatewayDomainNameEndpointConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayDomainNameEndpointConfiguration.--- See 'apiGatewayDomainNameEndpointConfiguration' for a more convenient--- constructor.-data ApiGatewayDomainNameEndpointConfiguration =- ApiGatewayDomainNameEndpointConfiguration- { _apiGatewayDomainNameEndpointConfigurationTypes :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayDomainNameEndpointConfiguration where- toJSON ApiGatewayDomainNameEndpointConfiguration{..} =- object $- catMaybes- [ fmap (("Types",) . toJSON) _apiGatewayDomainNameEndpointConfigurationTypes- ]---- | Constructor for 'ApiGatewayDomainNameEndpointConfiguration' containing--- required fields as arguments.-apiGatewayDomainNameEndpointConfiguration- :: ApiGatewayDomainNameEndpointConfiguration-apiGatewayDomainNameEndpointConfiguration =- ApiGatewayDomainNameEndpointConfiguration- { _apiGatewayDomainNameEndpointConfigurationTypes = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-domainname-endpointconfiguration.html#cfn-apigateway-domainname-endpointconfiguration-types-agdnecTypes :: Lens' ApiGatewayDomainNameEndpointConfiguration (Maybe (ValList Text))-agdnecTypes = lens _apiGatewayDomainNameEndpointConfigurationTypes (\s a -> s { _apiGatewayDomainNameEndpointConfigurationTypes = a })
@@ -1,130 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html--module Stratosphere.ResourceProperties.ApiGatewayMethodIntegration where--import Stratosphere.ResourceImports-import Stratosphere.Types-import Stratosphere.ResourceProperties.ApiGatewayMethodIntegrationResponse---- | Full data type definition for ApiGatewayMethodIntegration. See--- 'apiGatewayMethodIntegration' for a more convenient constructor.-data ApiGatewayMethodIntegration =- ApiGatewayMethodIntegration- { _apiGatewayMethodIntegrationCacheKeyParameters :: Maybe (ValList Text)- , _apiGatewayMethodIntegrationCacheNamespace :: Maybe (Val Text)- , _apiGatewayMethodIntegrationConnectionId :: Maybe (Val Text)- , _apiGatewayMethodIntegrationConnectionType :: Maybe (Val Text)- , _apiGatewayMethodIntegrationContentHandling :: Maybe (Val Text)- , _apiGatewayMethodIntegrationCredentials :: Maybe (Val Text)- , _apiGatewayMethodIntegrationIntegrationHttpMethod :: Maybe (Val HttpMethod)- , _apiGatewayMethodIntegrationIntegrationResponses :: Maybe [ApiGatewayMethodIntegrationResponse]- , _apiGatewayMethodIntegrationPassthroughBehavior :: Maybe (Val PassthroughBehavior)- , _apiGatewayMethodIntegrationRequestParameters :: Maybe Object- , _apiGatewayMethodIntegrationRequestTemplates :: Maybe Object- , _apiGatewayMethodIntegrationTimeoutInMillis :: Maybe (Val Integer)- , _apiGatewayMethodIntegrationType :: Maybe (Val ApiBackendType)- , _apiGatewayMethodIntegrationUri :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayMethodIntegration where- toJSON ApiGatewayMethodIntegration{..} =- object $- catMaybes- [ fmap (("CacheKeyParameters",) . toJSON) _apiGatewayMethodIntegrationCacheKeyParameters- , fmap (("CacheNamespace",) . toJSON) _apiGatewayMethodIntegrationCacheNamespace- , fmap (("ConnectionId",) . toJSON) _apiGatewayMethodIntegrationConnectionId- , fmap (("ConnectionType",) . toJSON) _apiGatewayMethodIntegrationConnectionType- , fmap (("ContentHandling",) . toJSON) _apiGatewayMethodIntegrationContentHandling- , fmap (("Credentials",) . toJSON) _apiGatewayMethodIntegrationCredentials- , fmap (("IntegrationHttpMethod",) . toJSON) _apiGatewayMethodIntegrationIntegrationHttpMethod- , fmap (("IntegrationResponses",) . toJSON) _apiGatewayMethodIntegrationIntegrationResponses- , fmap (("PassthroughBehavior",) . toJSON) _apiGatewayMethodIntegrationPassthroughBehavior- , fmap (("RequestParameters",) . toJSON) _apiGatewayMethodIntegrationRequestParameters- , fmap (("RequestTemplates",) . toJSON) _apiGatewayMethodIntegrationRequestTemplates- , fmap (("TimeoutInMillis",) . toJSON) _apiGatewayMethodIntegrationTimeoutInMillis- , fmap (("Type",) . toJSON) _apiGatewayMethodIntegrationType- , fmap (("Uri",) . toJSON) _apiGatewayMethodIntegrationUri- ]---- | Constructor for 'ApiGatewayMethodIntegration' containing required fields--- as arguments.-apiGatewayMethodIntegration- :: ApiGatewayMethodIntegration-apiGatewayMethodIntegration =- ApiGatewayMethodIntegration- { _apiGatewayMethodIntegrationCacheKeyParameters = Nothing- , _apiGatewayMethodIntegrationCacheNamespace = Nothing- , _apiGatewayMethodIntegrationConnectionId = Nothing- , _apiGatewayMethodIntegrationConnectionType = Nothing- , _apiGatewayMethodIntegrationContentHandling = Nothing- , _apiGatewayMethodIntegrationCredentials = Nothing- , _apiGatewayMethodIntegrationIntegrationHttpMethod = Nothing- , _apiGatewayMethodIntegrationIntegrationResponses = Nothing- , _apiGatewayMethodIntegrationPassthroughBehavior = Nothing- , _apiGatewayMethodIntegrationRequestParameters = Nothing- , _apiGatewayMethodIntegrationRequestTemplates = Nothing- , _apiGatewayMethodIntegrationTimeoutInMillis = Nothing- , _apiGatewayMethodIntegrationType = Nothing- , _apiGatewayMethodIntegrationUri = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-cachekeyparameters-agmiCacheKeyParameters :: Lens' ApiGatewayMethodIntegration (Maybe (ValList Text))-agmiCacheKeyParameters = lens _apiGatewayMethodIntegrationCacheKeyParameters (\s a -> s { _apiGatewayMethodIntegrationCacheKeyParameters = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-cachenamespace-agmiCacheNamespace :: Lens' ApiGatewayMethodIntegration (Maybe (Val Text))-agmiCacheNamespace = lens _apiGatewayMethodIntegrationCacheNamespace (\s a -> s { _apiGatewayMethodIntegrationCacheNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-connectionid-agmiConnectionId :: Lens' ApiGatewayMethodIntegration (Maybe (Val Text))-agmiConnectionId = lens _apiGatewayMethodIntegrationConnectionId (\s a -> s { _apiGatewayMethodIntegrationConnectionId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-connectiontype-agmiConnectionType :: Lens' ApiGatewayMethodIntegration (Maybe (Val Text))-agmiConnectionType = lens _apiGatewayMethodIntegrationConnectionType (\s a -> s { _apiGatewayMethodIntegrationConnectionType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-contenthandling-agmiContentHandling :: Lens' ApiGatewayMethodIntegration (Maybe (Val Text))-agmiContentHandling = lens _apiGatewayMethodIntegrationContentHandling (\s a -> s { _apiGatewayMethodIntegrationContentHandling = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-credentials-agmiCredentials :: Lens' ApiGatewayMethodIntegration (Maybe (Val Text))-agmiCredentials = lens _apiGatewayMethodIntegrationCredentials (\s a -> s { _apiGatewayMethodIntegrationCredentials = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-integrationhttpmethod-agmiIntegrationHttpMethod :: Lens' ApiGatewayMethodIntegration (Maybe (Val HttpMethod))-agmiIntegrationHttpMethod = lens _apiGatewayMethodIntegrationIntegrationHttpMethod (\s a -> s { _apiGatewayMethodIntegrationIntegrationHttpMethod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-integrationresponses-agmiIntegrationResponses :: Lens' ApiGatewayMethodIntegration (Maybe [ApiGatewayMethodIntegrationResponse])-agmiIntegrationResponses = lens _apiGatewayMethodIntegrationIntegrationResponses (\s a -> s { _apiGatewayMethodIntegrationIntegrationResponses = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-passthroughbehavior-agmiPassthroughBehavior :: Lens' ApiGatewayMethodIntegration (Maybe (Val PassthroughBehavior))-agmiPassthroughBehavior = lens _apiGatewayMethodIntegrationPassthroughBehavior (\s a -> s { _apiGatewayMethodIntegrationPassthroughBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-requestparameters-agmiRequestParameters :: Lens' ApiGatewayMethodIntegration (Maybe Object)-agmiRequestParameters = lens _apiGatewayMethodIntegrationRequestParameters (\s a -> s { _apiGatewayMethodIntegrationRequestParameters = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-requesttemplates-agmiRequestTemplates :: Lens' ApiGatewayMethodIntegration (Maybe Object)-agmiRequestTemplates = lens _apiGatewayMethodIntegrationRequestTemplates (\s a -> s { _apiGatewayMethodIntegrationRequestTemplates = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-timeoutinmillis-agmiTimeoutInMillis :: Lens' ApiGatewayMethodIntegration (Maybe (Val Integer))-agmiTimeoutInMillis = lens _apiGatewayMethodIntegrationTimeoutInMillis (\s a -> s { _apiGatewayMethodIntegrationTimeoutInMillis = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-type-agmiType :: Lens' ApiGatewayMethodIntegration (Maybe (Val ApiBackendType))-agmiType = lens _apiGatewayMethodIntegrationType (\s a -> s { _apiGatewayMethodIntegrationType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration.html#cfn-apigateway-method-integration-uri-agmiUri :: Lens' ApiGatewayMethodIntegration (Maybe (Val Text))-agmiUri = lens _apiGatewayMethodIntegrationUri (\s a -> s { _apiGatewayMethodIntegrationUri = a })
@@ -1,67 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration-integrationresponse.html--module Stratosphere.ResourceProperties.ApiGatewayMethodIntegrationResponse where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayMethodIntegrationResponse. See--- 'apiGatewayMethodIntegrationResponse' for a more convenient constructor.-data ApiGatewayMethodIntegrationResponse =- ApiGatewayMethodIntegrationResponse- { _apiGatewayMethodIntegrationResponseContentHandling :: Maybe (Val Text)- , _apiGatewayMethodIntegrationResponseResponseParameters :: Maybe Object- , _apiGatewayMethodIntegrationResponseResponseTemplates :: Maybe Object- , _apiGatewayMethodIntegrationResponseSelectionPattern :: Maybe (Val Text)- , _apiGatewayMethodIntegrationResponseStatusCode :: Val Text- } deriving (Show, Eq)--instance ToJSON ApiGatewayMethodIntegrationResponse where- toJSON ApiGatewayMethodIntegrationResponse{..} =- object $- catMaybes- [ fmap (("ContentHandling",) . toJSON) _apiGatewayMethodIntegrationResponseContentHandling- , fmap (("ResponseParameters",) . toJSON) _apiGatewayMethodIntegrationResponseResponseParameters- , fmap (("ResponseTemplates",) . toJSON) _apiGatewayMethodIntegrationResponseResponseTemplates- , fmap (("SelectionPattern",) . toJSON) _apiGatewayMethodIntegrationResponseSelectionPattern- , (Just . ("StatusCode",) . toJSON) _apiGatewayMethodIntegrationResponseStatusCode- ]---- | Constructor for 'ApiGatewayMethodIntegrationResponse' containing required--- fields as arguments.-apiGatewayMethodIntegrationResponse- :: Val Text -- ^ 'agmirStatusCode'- -> ApiGatewayMethodIntegrationResponse-apiGatewayMethodIntegrationResponse statusCodearg =- ApiGatewayMethodIntegrationResponse- { _apiGatewayMethodIntegrationResponseContentHandling = Nothing- , _apiGatewayMethodIntegrationResponseResponseParameters = Nothing- , _apiGatewayMethodIntegrationResponseResponseTemplates = Nothing- , _apiGatewayMethodIntegrationResponseSelectionPattern = Nothing- , _apiGatewayMethodIntegrationResponseStatusCode = statusCodearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration-integrationresponse.html#cfn-apigateway-method-integrationresponse-contenthandling-agmirContentHandling :: Lens' ApiGatewayMethodIntegrationResponse (Maybe (Val Text))-agmirContentHandling = lens _apiGatewayMethodIntegrationResponseContentHandling (\s a -> s { _apiGatewayMethodIntegrationResponseContentHandling = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration-integrationresponse.html#cfn-apigateway-method-integration-integrationresponse-responseparameters-agmirResponseParameters :: Lens' ApiGatewayMethodIntegrationResponse (Maybe Object)-agmirResponseParameters = lens _apiGatewayMethodIntegrationResponseResponseParameters (\s a -> s { _apiGatewayMethodIntegrationResponseResponseParameters = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration-integrationresponse.html#cfn-apigateway-method-integration-integrationresponse-responsetemplates-agmirResponseTemplates :: Lens' ApiGatewayMethodIntegrationResponse (Maybe Object)-agmirResponseTemplates = lens _apiGatewayMethodIntegrationResponseResponseTemplates (\s a -> s { _apiGatewayMethodIntegrationResponseResponseTemplates = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration-integrationresponse.html#cfn-apigateway-method-integration-integrationresponse-selectionpattern-agmirSelectionPattern :: Lens' ApiGatewayMethodIntegrationResponse (Maybe (Val Text))-agmirSelectionPattern = lens _apiGatewayMethodIntegrationResponseSelectionPattern (\s a -> s { _apiGatewayMethodIntegrationResponseSelectionPattern = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-integration-integrationresponse.html#cfn-apigateway-method-integration-integrationresponse-statuscode-agmirStatusCode :: Lens' ApiGatewayMethodIntegrationResponse (Val Text)-agmirStatusCode = lens _apiGatewayMethodIntegrationResponseStatusCode (\s a -> s { _apiGatewayMethodIntegrationResponseStatusCode = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-methodresponse.html--module Stratosphere.ResourceProperties.ApiGatewayMethodMethodResponse where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayMethodMethodResponse. See--- 'apiGatewayMethodMethodResponse' for a more convenient constructor.-data ApiGatewayMethodMethodResponse =- ApiGatewayMethodMethodResponse- { _apiGatewayMethodMethodResponseResponseModels :: Maybe Object- , _apiGatewayMethodMethodResponseResponseParameters :: Maybe Object- , _apiGatewayMethodMethodResponseStatusCode :: Val Text- } deriving (Show, Eq)--instance ToJSON ApiGatewayMethodMethodResponse where- toJSON ApiGatewayMethodMethodResponse{..} =- object $- catMaybes- [ fmap (("ResponseModels",) . toJSON) _apiGatewayMethodMethodResponseResponseModels- , fmap (("ResponseParameters",) . toJSON) _apiGatewayMethodMethodResponseResponseParameters- , (Just . ("StatusCode",) . toJSON) _apiGatewayMethodMethodResponseStatusCode- ]---- | Constructor for 'ApiGatewayMethodMethodResponse' containing required--- fields as arguments.-apiGatewayMethodMethodResponse- :: Val Text -- ^ 'agmmrStatusCode'- -> ApiGatewayMethodMethodResponse-apiGatewayMethodMethodResponse statusCodearg =- ApiGatewayMethodMethodResponse- { _apiGatewayMethodMethodResponseResponseModels = Nothing- , _apiGatewayMethodMethodResponseResponseParameters = Nothing- , _apiGatewayMethodMethodResponseStatusCode = statusCodearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-methodresponse.html#cfn-apigateway-method-methodresponse-responsemodels-agmmrResponseModels :: Lens' ApiGatewayMethodMethodResponse (Maybe Object)-agmmrResponseModels = lens _apiGatewayMethodMethodResponseResponseModels (\s a -> s { _apiGatewayMethodMethodResponseResponseModels = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-methodresponse.html#cfn-apigateway-method-methodresponse-responseparameters-agmmrResponseParameters :: Lens' ApiGatewayMethodMethodResponse (Maybe Object)-agmmrResponseParameters = lens _apiGatewayMethodMethodResponseResponseParameters (\s a -> s { _apiGatewayMethodMethodResponseResponseParameters = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-method-methodresponse.html#cfn-apigateway-method-methodresponse-statuscode-agmmrStatusCode :: Lens' ApiGatewayMethodMethodResponse (Val Text)-agmmrStatusCode = lens _apiGatewayMethodMethodResponseStatusCode (\s a -> s { _apiGatewayMethodMethodResponseStatusCode = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-endpointconfiguration.html--module Stratosphere.ResourceProperties.ApiGatewayRestApiEndpointConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayRestApiEndpointConfiguration. See--- 'apiGatewayRestApiEndpointConfiguration' for a more convenient--- constructor.-data ApiGatewayRestApiEndpointConfiguration =- ApiGatewayRestApiEndpointConfiguration- { _apiGatewayRestApiEndpointConfigurationTypes :: Maybe (ValList Text)- , _apiGatewayRestApiEndpointConfigurationVpcEndpointIds :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayRestApiEndpointConfiguration where- toJSON ApiGatewayRestApiEndpointConfiguration{..} =- object $- catMaybes- [ fmap (("Types",) . toJSON) _apiGatewayRestApiEndpointConfigurationTypes- , fmap (("VpcEndpointIds",) . toJSON) _apiGatewayRestApiEndpointConfigurationVpcEndpointIds- ]---- | Constructor for 'ApiGatewayRestApiEndpointConfiguration' containing--- required fields as arguments.-apiGatewayRestApiEndpointConfiguration- :: ApiGatewayRestApiEndpointConfiguration-apiGatewayRestApiEndpointConfiguration =- ApiGatewayRestApiEndpointConfiguration- { _apiGatewayRestApiEndpointConfigurationTypes = Nothing- , _apiGatewayRestApiEndpointConfigurationVpcEndpointIds = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-endpointconfiguration.html#cfn-apigateway-restapi-endpointconfiguration-types-agraecTypes :: Lens' ApiGatewayRestApiEndpointConfiguration (Maybe (ValList Text))-agraecTypes = lens _apiGatewayRestApiEndpointConfigurationTypes (\s a -> s { _apiGatewayRestApiEndpointConfigurationTypes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-endpointconfiguration.html#cfn-apigateway-restapi-endpointconfiguration-vpcendpointids-agraecVpcEndpointIds :: Lens' ApiGatewayRestApiEndpointConfiguration (Maybe (ValList Text))-agraecVpcEndpointIds = lens _apiGatewayRestApiEndpointConfigurationVpcEndpointIds (\s a -> s { _apiGatewayRestApiEndpointConfigurationVpcEndpointIds = a })
@@ -1,59 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-s3location.html--module Stratosphere.ResourceProperties.ApiGatewayRestApiS3Location where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayRestApiS3Location. See--- 'apiGatewayRestApiS3Location' for a more convenient constructor.-data ApiGatewayRestApiS3Location =- ApiGatewayRestApiS3Location- { _apiGatewayRestApiS3LocationBucket :: Maybe (Val Text)- , _apiGatewayRestApiS3LocationETag :: Maybe (Val Text)- , _apiGatewayRestApiS3LocationKey :: Maybe (Val Text)- , _apiGatewayRestApiS3LocationVersion :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayRestApiS3Location where- toJSON ApiGatewayRestApiS3Location{..} =- object $- catMaybes- [ fmap (("Bucket",) . toJSON) _apiGatewayRestApiS3LocationBucket- , fmap (("ETag",) . toJSON) _apiGatewayRestApiS3LocationETag- , fmap (("Key",) . toJSON) _apiGatewayRestApiS3LocationKey- , fmap (("Version",) . toJSON) _apiGatewayRestApiS3LocationVersion- ]---- | Constructor for 'ApiGatewayRestApiS3Location' containing required fields--- as arguments.-apiGatewayRestApiS3Location- :: ApiGatewayRestApiS3Location-apiGatewayRestApiS3Location =- ApiGatewayRestApiS3Location- { _apiGatewayRestApiS3LocationBucket = Nothing- , _apiGatewayRestApiS3LocationETag = Nothing- , _apiGatewayRestApiS3LocationKey = Nothing- , _apiGatewayRestApiS3LocationVersion = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-s3location.html#cfn-apigateway-restapi-s3location-bucket-agraslBucket :: Lens' ApiGatewayRestApiS3Location (Maybe (Val Text))-agraslBucket = lens _apiGatewayRestApiS3LocationBucket (\s a -> s { _apiGatewayRestApiS3LocationBucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-s3location.html#cfn-apigateway-restapi-s3location-etag-agraslETag :: Lens' ApiGatewayRestApiS3Location (Maybe (Val Text))-agraslETag = lens _apiGatewayRestApiS3LocationETag (\s a -> s { _apiGatewayRestApiS3LocationETag = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-s3location.html#cfn-apigateway-restapi-s3location-key-agraslKey :: Lens' ApiGatewayRestApiS3Location (Maybe (Val Text))-agraslKey = lens _apiGatewayRestApiS3LocationKey (\s a -> s { _apiGatewayRestApiS3LocationKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-restapi-s3location.html#cfn-apigateway-restapi-s3location-version-agraslVersion :: Lens' ApiGatewayRestApiS3Location (Maybe (Val Text))-agraslVersion = lens _apiGatewayRestApiS3LocationVersion (\s a -> s { _apiGatewayRestApiS3LocationVersion = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-accesslogsetting.html--module Stratosphere.ResourceProperties.ApiGatewayStageAccessLogSetting where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayStageAccessLogSetting. See--- 'apiGatewayStageAccessLogSetting' for a more convenient constructor.-data ApiGatewayStageAccessLogSetting =- ApiGatewayStageAccessLogSetting- { _apiGatewayStageAccessLogSettingDestinationArn :: Maybe (Val Text)- , _apiGatewayStageAccessLogSettingFormat :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayStageAccessLogSetting where- toJSON ApiGatewayStageAccessLogSetting{..} =- object $- catMaybes- [ fmap (("DestinationArn",) . toJSON) _apiGatewayStageAccessLogSettingDestinationArn- , fmap (("Format",) . toJSON) _apiGatewayStageAccessLogSettingFormat- ]---- | Constructor for 'ApiGatewayStageAccessLogSetting' containing required--- fields as arguments.-apiGatewayStageAccessLogSetting- :: ApiGatewayStageAccessLogSetting-apiGatewayStageAccessLogSetting =- ApiGatewayStageAccessLogSetting- { _apiGatewayStageAccessLogSettingDestinationArn = Nothing- , _apiGatewayStageAccessLogSettingFormat = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-accesslogsetting.html#cfn-apigateway-stage-accesslogsetting-destinationarn-agsalsDestinationArn :: Lens' ApiGatewayStageAccessLogSetting (Maybe (Val Text))-agsalsDestinationArn = lens _apiGatewayStageAccessLogSettingDestinationArn (\s a -> s { _apiGatewayStageAccessLogSettingDestinationArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-accesslogsetting.html#cfn-apigateway-stage-accesslogsetting-format-agsalsFormat :: Lens' ApiGatewayStageAccessLogSetting (Maybe (Val Text))-agsalsFormat = lens _apiGatewayStageAccessLogSettingFormat (\s a -> s { _apiGatewayStageAccessLogSettingFormat = a })
@@ -1,59 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-canarysetting.html--module Stratosphere.ResourceProperties.ApiGatewayStageCanarySetting where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayStageCanarySetting. See--- 'apiGatewayStageCanarySetting' for a more convenient constructor.-data ApiGatewayStageCanarySetting =- ApiGatewayStageCanarySetting- { _apiGatewayStageCanarySettingDeploymentId :: Maybe (Val Text)- , _apiGatewayStageCanarySettingPercentTraffic :: Maybe (Val Double)- , _apiGatewayStageCanarySettingStageVariableOverrides :: Maybe Object- , _apiGatewayStageCanarySettingUseStageCache :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON ApiGatewayStageCanarySetting where- toJSON ApiGatewayStageCanarySetting{..} =- object $- catMaybes- [ fmap (("DeploymentId",) . toJSON) _apiGatewayStageCanarySettingDeploymentId- , fmap (("PercentTraffic",) . toJSON) _apiGatewayStageCanarySettingPercentTraffic- , fmap (("StageVariableOverrides",) . toJSON) _apiGatewayStageCanarySettingStageVariableOverrides- , fmap (("UseStageCache",) . toJSON) _apiGatewayStageCanarySettingUseStageCache- ]---- | Constructor for 'ApiGatewayStageCanarySetting' containing required fields--- as arguments.-apiGatewayStageCanarySetting- :: ApiGatewayStageCanarySetting-apiGatewayStageCanarySetting =- ApiGatewayStageCanarySetting- { _apiGatewayStageCanarySettingDeploymentId = Nothing- , _apiGatewayStageCanarySettingPercentTraffic = Nothing- , _apiGatewayStageCanarySettingStageVariableOverrides = Nothing- , _apiGatewayStageCanarySettingUseStageCache = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-canarysetting.html#cfn-apigateway-stage-canarysetting-deploymentid-agscsDeploymentId :: Lens' ApiGatewayStageCanarySetting (Maybe (Val Text))-agscsDeploymentId = lens _apiGatewayStageCanarySettingDeploymentId (\s a -> s { _apiGatewayStageCanarySettingDeploymentId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-canarysetting.html#cfn-apigateway-stage-canarysetting-percenttraffic-agscsPercentTraffic :: Lens' ApiGatewayStageCanarySetting (Maybe (Val Double))-agscsPercentTraffic = lens _apiGatewayStageCanarySettingPercentTraffic (\s a -> s { _apiGatewayStageCanarySettingPercentTraffic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-canarysetting.html#cfn-apigateway-stage-canarysetting-stagevariableoverrides-agscsStageVariableOverrides :: Lens' ApiGatewayStageCanarySetting (Maybe Object)-agscsStageVariableOverrides = lens _apiGatewayStageCanarySettingStageVariableOverrides (\s a -> s { _apiGatewayStageCanarySettingStageVariableOverrides = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-stage-canarysetting.html#cfn-apigateway-stage-canarysetting-usestagecache-agscsUseStageCache :: Lens' ApiGatewayStageCanarySetting (Maybe (Val Bool))-agscsUseStageCache = lens _apiGatewayStageCanarySettingUseStageCache (\s a -> s { _apiGatewayStageCanarySettingUseStageCache = a })
@@ -1,101 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html--module Stratosphere.ResourceProperties.ApiGatewayStageMethodSetting where--import Stratosphere.ResourceImports-import Stratosphere.Types---- | Full data type definition for ApiGatewayStageMethodSetting. See--- 'apiGatewayStageMethodSetting' for a more convenient constructor.-data ApiGatewayStageMethodSetting =- ApiGatewayStageMethodSetting- { _apiGatewayStageMethodSettingCacheDataEncrypted :: Maybe (Val Bool)- , _apiGatewayStageMethodSettingCacheTtlInSeconds :: Maybe (Val Integer)- , _apiGatewayStageMethodSettingCachingEnabled :: Maybe (Val Bool)- , _apiGatewayStageMethodSettingDataTraceEnabled :: Maybe (Val Bool)- , _apiGatewayStageMethodSettingHttpMethod :: Maybe (Val HttpMethod)- , _apiGatewayStageMethodSettingLoggingLevel :: Maybe (Val LoggingLevel)- , _apiGatewayStageMethodSettingMetricsEnabled :: Maybe (Val Bool)- , _apiGatewayStageMethodSettingResourcePath :: Maybe (Val Text)- , _apiGatewayStageMethodSettingThrottlingBurstLimit :: Maybe (Val Integer)- , _apiGatewayStageMethodSettingThrottlingRateLimit :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON ApiGatewayStageMethodSetting where- toJSON ApiGatewayStageMethodSetting{..} =- object $- catMaybes- [ fmap (("CacheDataEncrypted",) . toJSON) _apiGatewayStageMethodSettingCacheDataEncrypted- , fmap (("CacheTtlInSeconds",) . toJSON) _apiGatewayStageMethodSettingCacheTtlInSeconds- , fmap (("CachingEnabled",) . toJSON) _apiGatewayStageMethodSettingCachingEnabled- , fmap (("DataTraceEnabled",) . toJSON) _apiGatewayStageMethodSettingDataTraceEnabled- , fmap (("HttpMethod",) . toJSON) _apiGatewayStageMethodSettingHttpMethod- , fmap (("LoggingLevel",) . toJSON) _apiGatewayStageMethodSettingLoggingLevel- , fmap (("MetricsEnabled",) . toJSON) _apiGatewayStageMethodSettingMetricsEnabled- , fmap (("ResourcePath",) . toJSON) _apiGatewayStageMethodSettingResourcePath- , fmap (("ThrottlingBurstLimit",) . toJSON) _apiGatewayStageMethodSettingThrottlingBurstLimit- , fmap (("ThrottlingRateLimit",) . toJSON) _apiGatewayStageMethodSettingThrottlingRateLimit- ]---- | Constructor for 'ApiGatewayStageMethodSetting' containing required fields--- as arguments.-apiGatewayStageMethodSetting- :: ApiGatewayStageMethodSetting-apiGatewayStageMethodSetting =- ApiGatewayStageMethodSetting- { _apiGatewayStageMethodSettingCacheDataEncrypted = Nothing- , _apiGatewayStageMethodSettingCacheTtlInSeconds = Nothing- , _apiGatewayStageMethodSettingCachingEnabled = Nothing- , _apiGatewayStageMethodSettingDataTraceEnabled = Nothing- , _apiGatewayStageMethodSettingHttpMethod = Nothing- , _apiGatewayStageMethodSettingLoggingLevel = Nothing- , _apiGatewayStageMethodSettingMetricsEnabled = Nothing- , _apiGatewayStageMethodSettingResourcePath = Nothing- , _apiGatewayStageMethodSettingThrottlingBurstLimit = Nothing- , _apiGatewayStageMethodSettingThrottlingRateLimit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-cachedataencrypted-agsmsCacheDataEncrypted :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Bool))-agsmsCacheDataEncrypted = lens _apiGatewayStageMethodSettingCacheDataEncrypted (\s a -> s { _apiGatewayStageMethodSettingCacheDataEncrypted = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-cachettlinseconds-agsmsCacheTtlInSeconds :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Integer))-agsmsCacheTtlInSeconds = lens _apiGatewayStageMethodSettingCacheTtlInSeconds (\s a -> s { _apiGatewayStageMethodSettingCacheTtlInSeconds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-cachingenabled-agsmsCachingEnabled :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Bool))-agsmsCachingEnabled = lens _apiGatewayStageMethodSettingCachingEnabled (\s a -> s { _apiGatewayStageMethodSettingCachingEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-datatraceenabled-agsmsDataTraceEnabled :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Bool))-agsmsDataTraceEnabled = lens _apiGatewayStageMethodSettingDataTraceEnabled (\s a -> s { _apiGatewayStageMethodSettingDataTraceEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-httpmethod-agsmsHttpMethod :: Lens' ApiGatewayStageMethodSetting (Maybe (Val HttpMethod))-agsmsHttpMethod = lens _apiGatewayStageMethodSettingHttpMethod (\s a -> s { _apiGatewayStageMethodSettingHttpMethod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-logginglevel-agsmsLoggingLevel :: Lens' ApiGatewayStageMethodSetting (Maybe (Val LoggingLevel))-agsmsLoggingLevel = lens _apiGatewayStageMethodSettingLoggingLevel (\s a -> s { _apiGatewayStageMethodSettingLoggingLevel = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-metricsenabled-agsmsMetricsEnabled :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Bool))-agsmsMetricsEnabled = lens _apiGatewayStageMethodSettingMetricsEnabled (\s a -> s { _apiGatewayStageMethodSettingMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-resourcepath-agsmsResourcePath :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Text))-agsmsResourcePath = lens _apiGatewayStageMethodSettingResourcePath (\s a -> s { _apiGatewayStageMethodSettingResourcePath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-throttlingburstlimit-agsmsThrottlingBurstLimit :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Integer))-agsmsThrottlingBurstLimit = lens _apiGatewayStageMethodSettingThrottlingBurstLimit (\s a -> s { _apiGatewayStageMethodSettingThrottlingBurstLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apitgateway-stage-methodsetting.html#cfn-apigateway-stage-methodsetting-throttlingratelimit-agsmsThrottlingRateLimit :: Lens' ApiGatewayStageMethodSetting (Maybe (Val Double))-agsmsThrottlingRateLimit = lens _apiGatewayStageMethodSettingThrottlingRateLimit (\s a -> s { _apiGatewayStageMethodSettingThrottlingRateLimit = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-apistage.html--module Stratosphere.ResourceProperties.ApiGatewayUsagePlanApiStage where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApiGatewayUsagePlanThrottleSettings---- | Full data type definition for ApiGatewayUsagePlanApiStage. See--- 'apiGatewayUsagePlanApiStage' for a more convenient constructor.-data ApiGatewayUsagePlanApiStage =- ApiGatewayUsagePlanApiStage- { _apiGatewayUsagePlanApiStageApiId :: Maybe (Val Text)- , _apiGatewayUsagePlanApiStageStage :: Maybe (Val Text)- , _apiGatewayUsagePlanApiStageThrottle :: Maybe (Map Text ApiGatewayUsagePlanThrottleSettings)- } deriving (Show, Eq)--instance ToJSON ApiGatewayUsagePlanApiStage where- toJSON ApiGatewayUsagePlanApiStage{..} =- object $- catMaybes- [ fmap (("ApiId",) . toJSON) _apiGatewayUsagePlanApiStageApiId- , fmap (("Stage",) . toJSON) _apiGatewayUsagePlanApiStageStage- , fmap (("Throttle",) . toJSON) _apiGatewayUsagePlanApiStageThrottle- ]---- | Constructor for 'ApiGatewayUsagePlanApiStage' containing required fields--- as arguments.-apiGatewayUsagePlanApiStage- :: ApiGatewayUsagePlanApiStage-apiGatewayUsagePlanApiStage =- ApiGatewayUsagePlanApiStage- { _apiGatewayUsagePlanApiStageApiId = Nothing- , _apiGatewayUsagePlanApiStageStage = Nothing- , _apiGatewayUsagePlanApiStageThrottle = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-apistage.html#cfn-apigateway-usageplan-apistage-apiid-agupasApiId :: Lens' ApiGatewayUsagePlanApiStage (Maybe (Val Text))-agupasApiId = lens _apiGatewayUsagePlanApiStageApiId (\s a -> s { _apiGatewayUsagePlanApiStageApiId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-apistage.html#cfn-apigateway-usageplan-apistage-stage-agupasStage :: Lens' ApiGatewayUsagePlanApiStage (Maybe (Val Text))-agupasStage = lens _apiGatewayUsagePlanApiStageStage (\s a -> s { _apiGatewayUsagePlanApiStageStage = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-apistage.html#cfn-apigateway-usageplan-apistage-throttle-agupasThrottle :: Lens' ApiGatewayUsagePlanApiStage (Maybe (Map Text ApiGatewayUsagePlanThrottleSettings))-agupasThrottle = lens _apiGatewayUsagePlanApiStageThrottle (\s a -> s { _apiGatewayUsagePlanApiStageThrottle = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-quotasettings.html--module Stratosphere.ResourceProperties.ApiGatewayUsagePlanQuotaSettings where--import Stratosphere.ResourceImports-import Stratosphere.Types---- | Full data type definition for ApiGatewayUsagePlanQuotaSettings. See--- 'apiGatewayUsagePlanQuotaSettings' for a more convenient constructor.-data ApiGatewayUsagePlanQuotaSettings =- ApiGatewayUsagePlanQuotaSettings- { _apiGatewayUsagePlanQuotaSettingsLimit :: Maybe (Val Integer)- , _apiGatewayUsagePlanQuotaSettingsOffset :: Maybe (Val Integer)- , _apiGatewayUsagePlanQuotaSettingsPeriod :: Maybe (Val Period)- } deriving (Show, Eq)--instance ToJSON ApiGatewayUsagePlanQuotaSettings where- toJSON ApiGatewayUsagePlanQuotaSettings{..} =- object $- catMaybes- [ fmap (("Limit",) . toJSON) _apiGatewayUsagePlanQuotaSettingsLimit- , fmap (("Offset",) . toJSON) _apiGatewayUsagePlanQuotaSettingsOffset- , fmap (("Period",) . toJSON) _apiGatewayUsagePlanQuotaSettingsPeriod- ]---- | Constructor for 'ApiGatewayUsagePlanQuotaSettings' containing required--- fields as arguments.-apiGatewayUsagePlanQuotaSettings- :: ApiGatewayUsagePlanQuotaSettings-apiGatewayUsagePlanQuotaSettings =- ApiGatewayUsagePlanQuotaSettings- { _apiGatewayUsagePlanQuotaSettingsLimit = Nothing- , _apiGatewayUsagePlanQuotaSettingsOffset = Nothing- , _apiGatewayUsagePlanQuotaSettingsPeriod = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-quotasettings.html#cfn-apigateway-usageplan-quotasettings-limit-agupqsLimit :: Lens' ApiGatewayUsagePlanQuotaSettings (Maybe (Val Integer))-agupqsLimit = lens _apiGatewayUsagePlanQuotaSettingsLimit (\s a -> s { _apiGatewayUsagePlanQuotaSettingsLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-quotasettings.html#cfn-apigateway-usageplan-quotasettings-offset-agupqsOffset :: Lens' ApiGatewayUsagePlanQuotaSettings (Maybe (Val Integer))-agupqsOffset = lens _apiGatewayUsagePlanQuotaSettingsOffset (\s a -> s { _apiGatewayUsagePlanQuotaSettingsOffset = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-quotasettings.html#cfn-apigateway-usageplan-quotasettings-period-agupqsPeriod :: Lens' ApiGatewayUsagePlanQuotaSettings (Maybe (Val Period))-agupqsPeriod = lens _apiGatewayUsagePlanQuotaSettingsPeriod (\s a -> s { _apiGatewayUsagePlanQuotaSettingsPeriod = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-throttlesettings.html--module Stratosphere.ResourceProperties.ApiGatewayUsagePlanThrottleSettings where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayUsagePlanThrottleSettings. See--- 'apiGatewayUsagePlanThrottleSettings' for a more convenient constructor.-data ApiGatewayUsagePlanThrottleSettings =- ApiGatewayUsagePlanThrottleSettings- { _apiGatewayUsagePlanThrottleSettingsBurstLimit :: Maybe (Val Integer)- , _apiGatewayUsagePlanThrottleSettingsRateLimit :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON ApiGatewayUsagePlanThrottleSettings where- toJSON ApiGatewayUsagePlanThrottleSettings{..} =- object $- catMaybes- [ fmap (("BurstLimit",) . toJSON) _apiGatewayUsagePlanThrottleSettingsBurstLimit- , fmap (("RateLimit",) . toJSON) _apiGatewayUsagePlanThrottleSettingsRateLimit- ]---- | Constructor for 'ApiGatewayUsagePlanThrottleSettings' containing required--- fields as arguments.-apiGatewayUsagePlanThrottleSettings- :: ApiGatewayUsagePlanThrottleSettings-apiGatewayUsagePlanThrottleSettings =- ApiGatewayUsagePlanThrottleSettings- { _apiGatewayUsagePlanThrottleSettingsBurstLimit = Nothing- , _apiGatewayUsagePlanThrottleSettingsRateLimit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-throttlesettings.html#cfn-apigateway-usageplan-throttlesettings-burstlimit-aguptsBurstLimit :: Lens' ApiGatewayUsagePlanThrottleSettings (Maybe (Val Integer))-aguptsBurstLimit = lens _apiGatewayUsagePlanThrottleSettingsBurstLimit (\s a -> s { _apiGatewayUsagePlanThrottleSettingsBurstLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigateway-usageplan-throttlesettings.html#cfn-apigateway-usageplan-throttlesettings-ratelimit-aguptsRateLimit :: Lens' ApiGatewayUsagePlanThrottleSettings (Maybe (Val Double))-aguptsRateLimit = lens _apiGatewayUsagePlanThrottleSettingsRateLimit (\s a -> s { _apiGatewayUsagePlanThrottleSettingsRateLimit = a })
@@ -1,59 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-bodys3location.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiBodyS3Location where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayV2ApiBodyS3Location. See--- 'apiGatewayV2ApiBodyS3Location' for a more convenient constructor.-data ApiGatewayV2ApiBodyS3Location =- ApiGatewayV2ApiBodyS3Location- { _apiGatewayV2ApiBodyS3LocationBucket :: Maybe (Val Text)- , _apiGatewayV2ApiBodyS3LocationEtag :: Maybe (Val Text)- , _apiGatewayV2ApiBodyS3LocationKey :: Maybe (Val Text)- , _apiGatewayV2ApiBodyS3LocationVersion :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiBodyS3Location where- toJSON ApiGatewayV2ApiBodyS3Location{..} =- object $- catMaybes- [ fmap (("Bucket",) . toJSON) _apiGatewayV2ApiBodyS3LocationBucket- , fmap (("Etag",) . toJSON) _apiGatewayV2ApiBodyS3LocationEtag- , fmap (("Key",) . toJSON) _apiGatewayV2ApiBodyS3LocationKey- , fmap (("Version",) . toJSON) _apiGatewayV2ApiBodyS3LocationVersion- ]---- | Constructor for 'ApiGatewayV2ApiBodyS3Location' containing required--- fields as arguments.-apiGatewayV2ApiBodyS3Location- :: ApiGatewayV2ApiBodyS3Location-apiGatewayV2ApiBodyS3Location =- ApiGatewayV2ApiBodyS3Location- { _apiGatewayV2ApiBodyS3LocationBucket = Nothing- , _apiGatewayV2ApiBodyS3LocationEtag = Nothing- , _apiGatewayV2ApiBodyS3LocationKey = Nothing- , _apiGatewayV2ApiBodyS3LocationVersion = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-bodys3location.html#cfn-apigatewayv2-api-bodys3location-bucket-agvabslBucket :: Lens' ApiGatewayV2ApiBodyS3Location (Maybe (Val Text))-agvabslBucket = lens _apiGatewayV2ApiBodyS3LocationBucket (\s a -> s { _apiGatewayV2ApiBodyS3LocationBucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-bodys3location.html#cfn-apigatewayv2-api-bodys3location-etag-agvabslEtag :: Lens' ApiGatewayV2ApiBodyS3Location (Maybe (Val Text))-agvabslEtag = lens _apiGatewayV2ApiBodyS3LocationEtag (\s a -> s { _apiGatewayV2ApiBodyS3LocationEtag = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-bodys3location.html#cfn-apigatewayv2-api-bodys3location-key-agvabslKey :: Lens' ApiGatewayV2ApiBodyS3Location (Maybe (Val Text))-agvabslKey = lens _apiGatewayV2ApiBodyS3LocationKey (\s a -> s { _apiGatewayV2ApiBodyS3LocationKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-bodys3location.html#cfn-apigatewayv2-api-bodys3location-version-agvabslVersion :: Lens' ApiGatewayV2ApiBodyS3Location (Maybe (Val Text))-agvabslVersion = lens _apiGatewayV2ApiBodyS3LocationVersion (\s a -> s { _apiGatewayV2ApiBodyS3LocationVersion = a })
@@ -1,73 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiCors where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayV2ApiCors. See--- 'apiGatewayV2ApiCors' for a more convenient constructor.-data ApiGatewayV2ApiCors =- ApiGatewayV2ApiCors- { _apiGatewayV2ApiCorsAllowCredentials :: Maybe (Val Bool)- , _apiGatewayV2ApiCorsAllowHeaders :: Maybe (ValList Text)- , _apiGatewayV2ApiCorsAllowMethods :: Maybe (ValList Text)- , _apiGatewayV2ApiCorsAllowOrigins :: Maybe (ValList Text)- , _apiGatewayV2ApiCorsExposeHeaders :: Maybe (ValList Text)- , _apiGatewayV2ApiCorsMaxAge :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiCors where- toJSON ApiGatewayV2ApiCors{..} =- object $- catMaybes- [ fmap (("AllowCredentials",) . toJSON) _apiGatewayV2ApiCorsAllowCredentials- , fmap (("AllowHeaders",) . toJSON) _apiGatewayV2ApiCorsAllowHeaders- , fmap (("AllowMethods",) . toJSON) _apiGatewayV2ApiCorsAllowMethods- , fmap (("AllowOrigins",) . toJSON) _apiGatewayV2ApiCorsAllowOrigins- , fmap (("ExposeHeaders",) . toJSON) _apiGatewayV2ApiCorsExposeHeaders- , fmap (("MaxAge",) . toJSON) _apiGatewayV2ApiCorsMaxAge- ]---- | Constructor for 'ApiGatewayV2ApiCors' containing required fields as--- arguments.-apiGatewayV2ApiCors- :: ApiGatewayV2ApiCors-apiGatewayV2ApiCors =- ApiGatewayV2ApiCors- { _apiGatewayV2ApiCorsAllowCredentials = Nothing- , _apiGatewayV2ApiCorsAllowHeaders = Nothing- , _apiGatewayV2ApiCorsAllowMethods = Nothing- , _apiGatewayV2ApiCorsAllowOrigins = Nothing- , _apiGatewayV2ApiCorsExposeHeaders = Nothing- , _apiGatewayV2ApiCorsMaxAge = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html#cfn-apigatewayv2-api-cors-allowcredentials-agvacAllowCredentials :: Lens' ApiGatewayV2ApiCors (Maybe (Val Bool))-agvacAllowCredentials = lens _apiGatewayV2ApiCorsAllowCredentials (\s a -> s { _apiGatewayV2ApiCorsAllowCredentials = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html#cfn-apigatewayv2-api-cors-allowheaders-agvacAllowHeaders :: Lens' ApiGatewayV2ApiCors (Maybe (ValList Text))-agvacAllowHeaders = lens _apiGatewayV2ApiCorsAllowHeaders (\s a -> s { _apiGatewayV2ApiCorsAllowHeaders = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html#cfn-apigatewayv2-api-cors-allowmethods-agvacAllowMethods :: Lens' ApiGatewayV2ApiCors (Maybe (ValList Text))-agvacAllowMethods = lens _apiGatewayV2ApiCorsAllowMethods (\s a -> s { _apiGatewayV2ApiCorsAllowMethods = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html#cfn-apigatewayv2-api-cors-alloworigins-agvacAllowOrigins :: Lens' ApiGatewayV2ApiCors (Maybe (ValList Text))-agvacAllowOrigins = lens _apiGatewayV2ApiCorsAllowOrigins (\s a -> s { _apiGatewayV2ApiCorsAllowOrigins = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html#cfn-apigatewayv2-api-cors-exposeheaders-agvacExposeHeaders :: Lens' ApiGatewayV2ApiCors (Maybe (ValList Text))-agvacExposeHeaders = lens _apiGatewayV2ApiCorsExposeHeaders (\s a -> s { _apiGatewayV2ApiCorsExposeHeaders = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-api-cors.html#cfn-apigatewayv2-api-cors-maxage-agvacMaxAge :: Lens' ApiGatewayV2ApiCors (Maybe (Val Integer))-agvacMaxAge = lens _apiGatewayV2ApiCorsMaxAge (\s a -> s { _apiGatewayV2ApiCorsMaxAge = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-accesslogsettings.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings. See--- 'apiGatewayV2ApiGatewayManagedOverridesAccessLogSettings' for a more--- convenient constructor.-data ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings =- ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings- { _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsDestinationArn :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsFormat :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings where- toJSON ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings{..} =- object $- catMaybes- [ fmap (("DestinationArn",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsDestinationArn- , fmap (("Format",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsFormat- ]---- | Constructor for 'ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings'--- containing required fields as arguments.-apiGatewayV2ApiGatewayManagedOverridesAccessLogSettings- :: ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings-apiGatewayV2ApiGatewayManagedOverridesAccessLogSettings =- ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings- { _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsDestinationArn = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsFormat = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-accesslogsettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-accesslogsettings-destinationarn-agvagmoalsDestinationArn :: Lens' ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings (Maybe (Val Text))-agvagmoalsDestinationArn = lens _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsDestinationArn (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsDestinationArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-accesslogsettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-accesslogsettings-format-agvagmoalsFormat :: Lens' ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings (Maybe (Val Text))-agvagmoalsFormat = lens _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsFormat (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesAccessLogSettingsFormat = a })
@@ -1,62 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides. See--- 'apiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides' for a more--- convenient constructor.-data ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides =- ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides- { _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesDescription :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesIntegrationMethod :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesPayloadFormatVersion :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesTimeoutInMillis :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides where- toJSON ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides{..} =- object $- catMaybes- [ fmap (("Description",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesDescription- , fmap (("IntegrationMethod",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesIntegrationMethod- , fmap (("PayloadFormatVersion",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesPayloadFormatVersion- , fmap (("TimeoutInMillis",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesTimeoutInMillis- ]---- | Constructor for--- 'ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides' containing--- required fields as arguments.-apiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides- :: ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides-apiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides =- ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides- { _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesDescription = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesIntegrationMethod = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesPayloadFormatVersion = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesTimeoutInMillis = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides-description-agvagmoioDescription :: Lens' ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides (Maybe (Val Text))-agvagmoioDescription = lens _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesDescription (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesDescription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides-integrationmethod-agvagmoioIntegrationMethod :: Lens' ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides (Maybe (Val Text))-agvagmoioIntegrationMethod = lens _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesIntegrationMethod (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesIntegrationMethod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides-payloadformatversion-agvagmoioPayloadFormatVersion :: Lens' ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides (Maybe (Val Text))-agvagmoioPayloadFormatVersion = lens _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesPayloadFormatVersion (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesPayloadFormatVersion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-integrationoverrides-timeoutinmillis-agvagmoioTimeoutInMillis :: Lens' ApiGatewayV2ApiGatewayManagedOverridesIntegrationOverrides (Maybe (Val Integer))-agvagmoioTimeoutInMillis = lens _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesTimeoutInMillis (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesIntegrationOverridesTimeoutInMillis = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routeoverrides.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides. See--- 'apiGatewayV2ApiGatewayManagedOverridesRouteOverrides' for a more--- convenient constructor.-data ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides =- ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides- { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationScopes :: Maybe (ValList Text)- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationType :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizerId :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesOperationName :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesTarget :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides where- toJSON ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides{..} =- object $- catMaybes- [ fmap (("AuthorizationScopes",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationScopes- , fmap (("AuthorizationType",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationType- , fmap (("AuthorizerId",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizerId- , fmap (("OperationName",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesOperationName- , fmap (("Target",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesTarget- ]---- | Constructor for 'ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides'--- containing required fields as arguments.-apiGatewayV2ApiGatewayManagedOverridesRouteOverrides- :: ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides-apiGatewayV2ApiGatewayManagedOverridesRouteOverrides =- ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides- { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationScopes = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationType = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizerId = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesOperationName = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesTarget = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routeoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routeoverrides-authorizationscopes-agvagmoroAuthorizationScopes :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides (Maybe (ValList Text))-agvagmoroAuthorizationScopes = lens _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationScopes (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationScopes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routeoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routeoverrides-authorizationtype-agvagmoroAuthorizationType :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides (Maybe (Val Text))-agvagmoroAuthorizationType = lens _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationType (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizationType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routeoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routeoverrides-authorizerid-agvagmoroAuthorizerId :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides (Maybe (Val Text))-agvagmoroAuthorizerId = lens _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizerId (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesAuthorizerId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routeoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routeoverrides-operationname-agvagmoroOperationName :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides (Maybe (Val Text))-agvagmoroOperationName = lens _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesOperationName (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesOperationName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routeoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routeoverrides-target-agvagmoroTarget :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteOverrides (Maybe (Val Text))-agvagmoroTarget = lens _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesTarget (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteOverridesTarget = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routesettings.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesRouteSettings where--import Stratosphere.ResourceImports-import Stratosphere.Types---- | Full data type definition for--- ApiGatewayV2ApiGatewayManagedOverridesRouteSettings. See--- 'apiGatewayV2ApiGatewayManagedOverridesRouteSettings' for a more--- convenient constructor.-data ApiGatewayV2ApiGatewayManagedOverridesRouteSettings =- ApiGatewayV2ApiGatewayManagedOverridesRouteSettings- { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDataTraceEnabled :: Maybe (Val Bool)- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDetailedMetricsEnabled :: Maybe (Val Bool)- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsLoggingLevel :: Maybe (Val LoggingLevel)- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingBurstLimit :: Maybe (Val Integer)- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingRateLimit :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiGatewayManagedOverridesRouteSettings where- toJSON ApiGatewayV2ApiGatewayManagedOverridesRouteSettings{..} =- object $- catMaybes- [ fmap (("DataTraceEnabled",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDataTraceEnabled- , fmap (("DetailedMetricsEnabled",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDetailedMetricsEnabled- , fmap (("LoggingLevel",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsLoggingLevel- , fmap (("ThrottlingBurstLimit",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingBurstLimit- , fmap (("ThrottlingRateLimit",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingRateLimit- ]---- | Constructor for 'ApiGatewayV2ApiGatewayManagedOverridesRouteSettings'--- containing required fields as arguments.-apiGatewayV2ApiGatewayManagedOverridesRouteSettings- :: ApiGatewayV2ApiGatewayManagedOverridesRouteSettings-apiGatewayV2ApiGatewayManagedOverridesRouteSettings =- ApiGatewayV2ApiGatewayManagedOverridesRouteSettings- { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDataTraceEnabled = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDetailedMetricsEnabled = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsLoggingLevel = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingBurstLimit = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingRateLimit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routesettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routesettings-datatraceenabled-agvagmorsDataTraceEnabled :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteSettings (Maybe (Val Bool))-agvagmorsDataTraceEnabled = lens _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDataTraceEnabled (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDataTraceEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routesettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routesettings-detailedmetricsenabled-agvagmorsDetailedMetricsEnabled :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteSettings (Maybe (Val Bool))-agvagmorsDetailedMetricsEnabled = lens _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDetailedMetricsEnabled (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsDetailedMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routesettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routesettings-logginglevel-agvagmorsLoggingLevel :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteSettings (Maybe (Val LoggingLevel))-agvagmorsLoggingLevel = lens _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsLoggingLevel (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsLoggingLevel = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routesettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routesettings-throttlingburstlimit-agvagmorsThrottlingBurstLimit :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteSettings (Maybe (Val Integer))-agvagmorsThrottlingBurstLimit = lens _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingBurstLimit (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingBurstLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-routesettings.html#cfn-apigatewayv2-apigatewaymanagedoverrides-routesettings-throttlingratelimit-agvagmorsThrottlingRateLimit :: Lens' ApiGatewayV2ApiGatewayManagedOverridesRouteSettings (Maybe (Val Double))-agvagmorsThrottlingRateLimit = lens _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingRateLimit (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesRouteSettingsThrottlingRateLimit = a })
@@ -1,76 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html--module Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesStageOverrides where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings-import Stratosphere.ResourceProperties.ApiGatewayV2ApiGatewayManagedOverridesRouteSettings---- | Full data type definition for--- ApiGatewayV2ApiGatewayManagedOverridesStageOverrides. See--- 'apiGatewayV2ApiGatewayManagedOverridesStageOverrides' for a more--- convenient constructor.-data ApiGatewayV2ApiGatewayManagedOverridesStageOverrides =- ApiGatewayV2ApiGatewayManagedOverridesStageOverrides- { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAccessLogSettings :: Maybe ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAutoDeploy :: Maybe (Val Bool)- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDefaultRouteSettings :: Maybe ApiGatewayV2ApiGatewayManagedOverridesRouteSettings- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDescription :: Maybe (Val Text)- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesRouteSettings :: Maybe Object- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesStageVariables :: Maybe Object- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2ApiGatewayManagedOverridesStageOverrides where- toJSON ApiGatewayV2ApiGatewayManagedOverridesStageOverrides{..} =- object $- catMaybes- [ fmap (("AccessLogSettings",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAccessLogSettings- , fmap (("AutoDeploy",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAutoDeploy- , fmap (("DefaultRouteSettings",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDefaultRouteSettings- , fmap (("Description",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDescription- , fmap (("RouteSettings",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesStageOverridesRouteSettings- , fmap (("StageVariables",) . toJSON) _apiGatewayV2ApiGatewayManagedOverridesStageOverridesStageVariables- ]---- | Constructor for 'ApiGatewayV2ApiGatewayManagedOverridesStageOverrides'--- containing required fields as arguments.-apiGatewayV2ApiGatewayManagedOverridesStageOverrides- :: ApiGatewayV2ApiGatewayManagedOverridesStageOverrides-apiGatewayV2ApiGatewayManagedOverridesStageOverrides =- ApiGatewayV2ApiGatewayManagedOverridesStageOverrides- { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAccessLogSettings = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAutoDeploy = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDefaultRouteSettings = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDescription = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesRouteSettings = Nothing- , _apiGatewayV2ApiGatewayManagedOverridesStageOverridesStageVariables = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-stageoverrides-accesslogsettings-agvagmosoAccessLogSettings :: Lens' ApiGatewayV2ApiGatewayManagedOverridesStageOverrides (Maybe ApiGatewayV2ApiGatewayManagedOverridesAccessLogSettings)-agvagmosoAccessLogSettings = lens _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAccessLogSettings (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAccessLogSettings = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-stageoverrides-autodeploy-agvagmosoAutoDeploy :: Lens' ApiGatewayV2ApiGatewayManagedOverridesStageOverrides (Maybe (Val Bool))-agvagmosoAutoDeploy = lens _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAutoDeploy (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesAutoDeploy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-stageoverrides-defaultroutesettings-agvagmosoDefaultRouteSettings :: Lens' ApiGatewayV2ApiGatewayManagedOverridesStageOverrides (Maybe ApiGatewayV2ApiGatewayManagedOverridesRouteSettings)-agvagmosoDefaultRouteSettings = lens _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDefaultRouteSettings (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDefaultRouteSettings = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-stageoverrides-description-agvagmosoDescription :: Lens' ApiGatewayV2ApiGatewayManagedOverridesStageOverrides (Maybe (Val Text))-agvagmosoDescription = lens _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDescription (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesDescription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-stageoverrides-routesettings-agvagmosoRouteSettings :: Lens' ApiGatewayV2ApiGatewayManagedOverridesStageOverrides (Maybe Object)-agvagmosoRouteSettings = lens _apiGatewayV2ApiGatewayManagedOverridesStageOverridesRouteSettings (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesRouteSettings = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-apigatewaymanagedoverrides-stageoverrides.html#cfn-apigatewayv2-apigatewaymanagedoverrides-stageoverrides-stagevariables-agvagmosoStageVariables :: Lens' ApiGatewayV2ApiGatewayManagedOverridesStageOverrides (Maybe Object)-agvagmosoStageVariables = lens _apiGatewayV2ApiGatewayManagedOverridesStageOverridesStageVariables (\s a -> s { _apiGatewayV2ApiGatewayManagedOverridesStageOverridesStageVariables = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-authorizer-jwtconfiguration.html--module Stratosphere.ResourceProperties.ApiGatewayV2AuthorizerJWTConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayV2AuthorizerJWTConfiguration. See--- 'apiGatewayV2AuthorizerJWTConfiguration' for a more convenient--- constructor.-data ApiGatewayV2AuthorizerJWTConfiguration =- ApiGatewayV2AuthorizerJWTConfiguration- { _apiGatewayV2AuthorizerJWTConfigurationAudience :: Maybe (ValList Text)- , _apiGatewayV2AuthorizerJWTConfigurationIssuer :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2AuthorizerJWTConfiguration where- toJSON ApiGatewayV2AuthorizerJWTConfiguration{..} =- object $- catMaybes- [ fmap (("Audience",) . toJSON) _apiGatewayV2AuthorizerJWTConfigurationAudience- , fmap (("Issuer",) . toJSON) _apiGatewayV2AuthorizerJWTConfigurationIssuer- ]---- | Constructor for 'ApiGatewayV2AuthorizerJWTConfiguration' containing--- required fields as arguments.-apiGatewayV2AuthorizerJWTConfiguration- :: ApiGatewayV2AuthorizerJWTConfiguration-apiGatewayV2AuthorizerJWTConfiguration =- ApiGatewayV2AuthorizerJWTConfiguration- { _apiGatewayV2AuthorizerJWTConfigurationAudience = Nothing- , _apiGatewayV2AuthorizerJWTConfigurationIssuer = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-authorizer-jwtconfiguration.html#cfn-apigatewayv2-authorizer-jwtconfiguration-audience-agvajwtcAudience :: Lens' ApiGatewayV2AuthorizerJWTConfiguration (Maybe (ValList Text))-agvajwtcAudience = lens _apiGatewayV2AuthorizerJWTConfigurationAudience (\s a -> s { _apiGatewayV2AuthorizerJWTConfigurationAudience = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-authorizer-jwtconfiguration.html#cfn-apigatewayv2-authorizer-jwtconfiguration-issuer-agvajwtcIssuer :: Lens' ApiGatewayV2AuthorizerJWTConfiguration (Maybe (Val Text))-agvajwtcIssuer = lens _apiGatewayV2AuthorizerJWTConfigurationIssuer (\s a -> s { _apiGatewayV2AuthorizerJWTConfigurationIssuer = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-domainname-domainnameconfiguration.html--module Stratosphere.ResourceProperties.ApiGatewayV2DomainNameDomainNameConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApiGatewayV2DomainNameDomainNameConfiguration. See--- 'apiGatewayV2DomainNameDomainNameConfiguration' for a more convenient--- constructor.-data ApiGatewayV2DomainNameDomainNameConfiguration =- ApiGatewayV2DomainNameDomainNameConfiguration- { _apiGatewayV2DomainNameDomainNameConfigurationCertificateArn :: Maybe (Val Text)- , _apiGatewayV2DomainNameDomainNameConfigurationCertificateName :: Maybe (Val Text)- , _apiGatewayV2DomainNameDomainNameConfigurationEndpointType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2DomainNameDomainNameConfiguration where- toJSON ApiGatewayV2DomainNameDomainNameConfiguration{..} =- object $- catMaybes- [ fmap (("CertificateArn",) . toJSON) _apiGatewayV2DomainNameDomainNameConfigurationCertificateArn- , fmap (("CertificateName",) . toJSON) _apiGatewayV2DomainNameDomainNameConfigurationCertificateName- , fmap (("EndpointType",) . toJSON) _apiGatewayV2DomainNameDomainNameConfigurationEndpointType- ]---- | Constructor for 'ApiGatewayV2DomainNameDomainNameConfiguration'--- containing required fields as arguments.-apiGatewayV2DomainNameDomainNameConfiguration- :: ApiGatewayV2DomainNameDomainNameConfiguration-apiGatewayV2DomainNameDomainNameConfiguration =- ApiGatewayV2DomainNameDomainNameConfiguration- { _apiGatewayV2DomainNameDomainNameConfigurationCertificateArn = Nothing- , _apiGatewayV2DomainNameDomainNameConfigurationCertificateName = Nothing- , _apiGatewayV2DomainNameDomainNameConfigurationEndpointType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-domainname-domainnameconfiguration.html#cfn-apigatewayv2-domainname-domainnameconfiguration-certificatearn-agvdndncCertificateArn :: Lens' ApiGatewayV2DomainNameDomainNameConfiguration (Maybe (Val Text))-agvdndncCertificateArn = lens _apiGatewayV2DomainNameDomainNameConfigurationCertificateArn (\s a -> s { _apiGatewayV2DomainNameDomainNameConfigurationCertificateArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-domainname-domainnameconfiguration.html#cfn-apigatewayv2-domainname-domainnameconfiguration-certificatename-agvdndncCertificateName :: Lens' ApiGatewayV2DomainNameDomainNameConfiguration (Maybe (Val Text))-agvdndncCertificateName = lens _apiGatewayV2DomainNameDomainNameConfigurationCertificateName (\s a -> s { _apiGatewayV2DomainNameDomainNameConfigurationCertificateName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-domainname-domainnameconfiguration.html#cfn-apigatewayv2-domainname-domainnameconfiguration-endpointtype-agvdndncEndpointType :: Lens' ApiGatewayV2DomainNameDomainNameConfiguration (Maybe (Val Text))-agvdndncEndpointType = lens _apiGatewayV2DomainNameDomainNameConfigurationEndpointType (\s a -> s { _apiGatewayV2DomainNameDomainNameConfigurationEndpointType = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-integration-tlsconfig.html--module Stratosphere.ResourceProperties.ApiGatewayV2IntegrationTlsConfig where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayV2IntegrationTlsConfig. See--- 'apiGatewayV2IntegrationTlsConfig' for a more convenient constructor.-data ApiGatewayV2IntegrationTlsConfig =- ApiGatewayV2IntegrationTlsConfig- { _apiGatewayV2IntegrationTlsConfigServerNameToVerify :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2IntegrationTlsConfig where- toJSON ApiGatewayV2IntegrationTlsConfig{..} =- object $- catMaybes- [ fmap (("ServerNameToVerify",) . toJSON) _apiGatewayV2IntegrationTlsConfigServerNameToVerify- ]---- | Constructor for 'ApiGatewayV2IntegrationTlsConfig' containing required--- fields as arguments.-apiGatewayV2IntegrationTlsConfig- :: ApiGatewayV2IntegrationTlsConfig-apiGatewayV2IntegrationTlsConfig =- ApiGatewayV2IntegrationTlsConfig- { _apiGatewayV2IntegrationTlsConfigServerNameToVerify = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-integration-tlsconfig.html#cfn-apigatewayv2-integration-tlsconfig-servernametoverify-agvitcServerNameToVerify :: Lens' ApiGatewayV2IntegrationTlsConfig (Maybe (Val Text))-agvitcServerNameToVerify = lens _apiGatewayV2IntegrationTlsConfigServerNameToVerify (\s a -> s { _apiGatewayV2IntegrationTlsConfigServerNameToVerify = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-route-parameterconstraints.html--module Stratosphere.ResourceProperties.ApiGatewayV2RouteParameterConstraints where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayV2RouteParameterConstraints. See--- 'apiGatewayV2RouteParameterConstraints' for a more convenient--- constructor.-data ApiGatewayV2RouteParameterConstraints =- ApiGatewayV2RouteParameterConstraints- { _apiGatewayV2RouteParameterConstraintsRequired :: Val Bool- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2RouteParameterConstraints where- toJSON ApiGatewayV2RouteParameterConstraints{..} =- object $- catMaybes- [ (Just . ("Required",) . toJSON) _apiGatewayV2RouteParameterConstraintsRequired- ]---- | Constructor for 'ApiGatewayV2RouteParameterConstraints' containing--- required fields as arguments.-apiGatewayV2RouteParameterConstraints- :: Val Bool -- ^ 'agvrpcRequired'- -> ApiGatewayV2RouteParameterConstraints-apiGatewayV2RouteParameterConstraints requiredarg =- ApiGatewayV2RouteParameterConstraints- { _apiGatewayV2RouteParameterConstraintsRequired = requiredarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-route-parameterconstraints.html#cfn-apigatewayv2-route-parameterconstraints-required-agvrpcRequired :: Lens' ApiGatewayV2RouteParameterConstraints (Val Bool)-agvrpcRequired = lens _apiGatewayV2RouteParameterConstraintsRequired (\s a -> s { _apiGatewayV2RouteParameterConstraintsRequired = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-routeresponse-parameterconstraints.html--module Stratosphere.ResourceProperties.ApiGatewayV2RouteResponseParameterConstraints where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApiGatewayV2RouteResponseParameterConstraints. See--- 'apiGatewayV2RouteResponseParameterConstraints' for a more convenient--- constructor.-data ApiGatewayV2RouteResponseParameterConstraints =- ApiGatewayV2RouteResponseParameterConstraints- { _apiGatewayV2RouteResponseParameterConstraintsRequired :: Val Bool- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2RouteResponseParameterConstraints where- toJSON ApiGatewayV2RouteResponseParameterConstraints{..} =- object $- catMaybes- [ (Just . ("Required",) . toJSON) _apiGatewayV2RouteResponseParameterConstraintsRequired- ]---- | Constructor for 'ApiGatewayV2RouteResponseParameterConstraints'--- containing required fields as arguments.-apiGatewayV2RouteResponseParameterConstraints- :: Val Bool -- ^ 'agvrrpcRequired'- -> ApiGatewayV2RouteResponseParameterConstraints-apiGatewayV2RouteResponseParameterConstraints requiredarg =- ApiGatewayV2RouteResponseParameterConstraints- { _apiGatewayV2RouteResponseParameterConstraintsRequired = requiredarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-routeresponse-parameterconstraints.html#cfn-apigatewayv2-routeresponse-parameterconstraints-required-agvrrpcRequired :: Lens' ApiGatewayV2RouteResponseParameterConstraints (Val Bool)-agvrrpcRequired = lens _apiGatewayV2RouteResponseParameterConstraintsRequired (\s a -> s { _apiGatewayV2RouteResponseParameterConstraintsRequired = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-accesslogsettings.html--module Stratosphere.ResourceProperties.ApiGatewayV2StageAccessLogSettings where--import Stratosphere.ResourceImports----- | Full data type definition for ApiGatewayV2StageAccessLogSettings. See--- 'apiGatewayV2StageAccessLogSettings' for a more convenient constructor.-data ApiGatewayV2StageAccessLogSettings =- ApiGatewayV2StageAccessLogSettings- { _apiGatewayV2StageAccessLogSettingsDestinationArn :: Maybe (Val Text)- , _apiGatewayV2StageAccessLogSettingsFormat :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2StageAccessLogSettings where- toJSON ApiGatewayV2StageAccessLogSettings{..} =- object $- catMaybes- [ fmap (("DestinationArn",) . toJSON) _apiGatewayV2StageAccessLogSettingsDestinationArn- , fmap (("Format",) . toJSON) _apiGatewayV2StageAccessLogSettingsFormat- ]---- | Constructor for 'ApiGatewayV2StageAccessLogSettings' containing required--- fields as arguments.-apiGatewayV2StageAccessLogSettings- :: ApiGatewayV2StageAccessLogSettings-apiGatewayV2StageAccessLogSettings =- ApiGatewayV2StageAccessLogSettings- { _apiGatewayV2StageAccessLogSettingsDestinationArn = Nothing- , _apiGatewayV2StageAccessLogSettingsFormat = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-accesslogsettings.html#cfn-apigatewayv2-stage-accesslogsettings-destinationarn-agvsalsDestinationArn :: Lens' ApiGatewayV2StageAccessLogSettings (Maybe (Val Text))-agvsalsDestinationArn = lens _apiGatewayV2StageAccessLogSettingsDestinationArn (\s a -> s { _apiGatewayV2StageAccessLogSettingsDestinationArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-accesslogsettings.html#cfn-apigatewayv2-stage-accesslogsettings-format-agvsalsFormat :: Lens' ApiGatewayV2StageAccessLogSettings (Maybe (Val Text))-agvsalsFormat = lens _apiGatewayV2StageAccessLogSettingsFormat (\s a -> s { _apiGatewayV2StageAccessLogSettingsFormat = a })
@@ -1,66 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-routesettings.html--module Stratosphere.ResourceProperties.ApiGatewayV2StageRouteSettings where--import Stratosphere.ResourceImports-import Stratosphere.Types---- | Full data type definition for ApiGatewayV2StageRouteSettings. See--- 'apiGatewayV2StageRouteSettings' for a more convenient constructor.-data ApiGatewayV2StageRouteSettings =- ApiGatewayV2StageRouteSettings- { _apiGatewayV2StageRouteSettingsDataTraceEnabled :: Maybe (Val Bool)- , _apiGatewayV2StageRouteSettingsDetailedMetricsEnabled :: Maybe (Val Bool)- , _apiGatewayV2StageRouteSettingsLoggingLevel :: Maybe (Val LoggingLevel)- , _apiGatewayV2StageRouteSettingsThrottlingBurstLimit :: Maybe (Val Integer)- , _apiGatewayV2StageRouteSettingsThrottlingRateLimit :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON ApiGatewayV2StageRouteSettings where- toJSON ApiGatewayV2StageRouteSettings{..} =- object $- catMaybes- [ fmap (("DataTraceEnabled",) . toJSON) _apiGatewayV2StageRouteSettingsDataTraceEnabled- , fmap (("DetailedMetricsEnabled",) . toJSON) _apiGatewayV2StageRouteSettingsDetailedMetricsEnabled- , fmap (("LoggingLevel",) . toJSON) _apiGatewayV2StageRouteSettingsLoggingLevel- , fmap (("ThrottlingBurstLimit",) . toJSON) _apiGatewayV2StageRouteSettingsThrottlingBurstLimit- , fmap (("ThrottlingRateLimit",) . toJSON) _apiGatewayV2StageRouteSettingsThrottlingRateLimit- ]---- | Constructor for 'ApiGatewayV2StageRouteSettings' containing required--- fields as arguments.-apiGatewayV2StageRouteSettings- :: ApiGatewayV2StageRouteSettings-apiGatewayV2StageRouteSettings =- ApiGatewayV2StageRouteSettings- { _apiGatewayV2StageRouteSettingsDataTraceEnabled = Nothing- , _apiGatewayV2StageRouteSettingsDetailedMetricsEnabled = Nothing- , _apiGatewayV2StageRouteSettingsLoggingLevel = Nothing- , _apiGatewayV2StageRouteSettingsThrottlingBurstLimit = Nothing- , _apiGatewayV2StageRouteSettingsThrottlingRateLimit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-routesettings.html#cfn-apigatewayv2-stage-routesettings-datatraceenabled-agvsrsDataTraceEnabled :: Lens' ApiGatewayV2StageRouteSettings (Maybe (Val Bool))-agvsrsDataTraceEnabled = lens _apiGatewayV2StageRouteSettingsDataTraceEnabled (\s a -> s { _apiGatewayV2StageRouteSettingsDataTraceEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-routesettings.html#cfn-apigatewayv2-stage-routesettings-detailedmetricsenabled-agvsrsDetailedMetricsEnabled :: Lens' ApiGatewayV2StageRouteSettings (Maybe (Val Bool))-agvsrsDetailedMetricsEnabled = lens _apiGatewayV2StageRouteSettingsDetailedMetricsEnabled (\s a -> s { _apiGatewayV2StageRouteSettingsDetailedMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-routesettings.html#cfn-apigatewayv2-stage-routesettings-logginglevel-agvsrsLoggingLevel :: Lens' ApiGatewayV2StageRouteSettings (Maybe (Val LoggingLevel))-agvsrsLoggingLevel = lens _apiGatewayV2StageRouteSettingsLoggingLevel (\s a -> s { _apiGatewayV2StageRouteSettingsLoggingLevel = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-routesettings.html#cfn-apigatewayv2-stage-routesettings-throttlingburstlimit-agvsrsThrottlingBurstLimit :: Lens' ApiGatewayV2StageRouteSettings (Maybe (Val Integer))-agvsrsThrottlingBurstLimit = lens _apiGatewayV2StageRouteSettingsThrottlingBurstLimit (\s a -> s { _apiGatewayV2StageRouteSettingsThrottlingBurstLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apigatewayv2-stage-routesettings.html#cfn-apigatewayv2-stage-routesettings-throttlingratelimit-agvsrsThrottlingRateLimit :: Lens' ApiGatewayV2StageRouteSettings (Maybe (Val Double))-agvsrsThrottlingRateLimit = lens _apiGatewayV2StageRouteSettingsThrottlingRateLimit (\s a -> s { _apiGatewayV2StageRouteSettingsThrottlingRateLimit = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-application-tags.html--module Stratosphere.ResourceProperties.AppConfigApplicationTags where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigApplicationTags. See--- 'appConfigApplicationTags' for a more convenient constructor.-data AppConfigApplicationTags =- AppConfigApplicationTags- { _appConfigApplicationTagsKey :: Maybe (Val Text)- , _appConfigApplicationTagsValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigApplicationTags where- toJSON AppConfigApplicationTags{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _appConfigApplicationTagsKey- , fmap (("Value",) . toJSON) _appConfigApplicationTagsValue- ]---- | Constructor for 'AppConfigApplicationTags' containing required fields as--- arguments.-appConfigApplicationTags- :: AppConfigApplicationTags-appConfigApplicationTags =- AppConfigApplicationTags- { _appConfigApplicationTagsKey = Nothing- , _appConfigApplicationTagsValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-application-tags.html#cfn-appconfig-application-tags-key-acatKey :: Lens' AppConfigApplicationTags (Maybe (Val Text))-acatKey = lens _appConfigApplicationTagsKey (\s a -> s { _appConfigApplicationTagsKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-application-tags.html#cfn-appconfig-application-tags-value-acatValue :: Lens' AppConfigApplicationTags (Maybe (Val Text))-acatValue = lens _appConfigApplicationTagsValue (\s a -> s { _appConfigApplicationTagsValue = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-configurationprofile-tags.html--module Stratosphere.ResourceProperties.AppConfigConfigurationProfileTags where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigConfigurationProfileTags. See--- 'appConfigConfigurationProfileTags' for a more convenient constructor.-data AppConfigConfigurationProfileTags =- AppConfigConfigurationProfileTags- { _appConfigConfigurationProfileTagsKey :: Maybe (Val Text)- , _appConfigConfigurationProfileTagsValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigConfigurationProfileTags where- toJSON AppConfigConfigurationProfileTags{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _appConfigConfigurationProfileTagsKey- , fmap (("Value",) . toJSON) _appConfigConfigurationProfileTagsValue- ]---- | Constructor for 'AppConfigConfigurationProfileTags' containing required--- fields as arguments.-appConfigConfigurationProfileTags- :: AppConfigConfigurationProfileTags-appConfigConfigurationProfileTags =- AppConfigConfigurationProfileTags- { _appConfigConfigurationProfileTagsKey = Nothing- , _appConfigConfigurationProfileTagsValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-configurationprofile-tags.html#cfn-appconfig-configurationprofile-tags-key-accptKey :: Lens' AppConfigConfigurationProfileTags (Maybe (Val Text))-accptKey = lens _appConfigConfigurationProfileTagsKey (\s a -> s { _appConfigConfigurationProfileTagsKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-configurationprofile-tags.html#cfn-appconfig-configurationprofile-tags-value-accptValue :: Lens' AppConfigConfigurationProfileTags (Maybe (Val Text))-accptValue = lens _appConfigConfigurationProfileTagsValue (\s a -> s { _appConfigConfigurationProfileTagsValue = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-configurationprofile-validators.html--module Stratosphere.ResourceProperties.AppConfigConfigurationProfileValidators where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigConfigurationProfileValidators.--- See 'appConfigConfigurationProfileValidators' for a more convenient--- constructor.-data AppConfigConfigurationProfileValidators =- AppConfigConfigurationProfileValidators- { _appConfigConfigurationProfileValidatorsContent :: Maybe (Val Text)- , _appConfigConfigurationProfileValidatorsType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigConfigurationProfileValidators where- toJSON AppConfigConfigurationProfileValidators{..} =- object $- catMaybes- [ fmap (("Content",) . toJSON) _appConfigConfigurationProfileValidatorsContent- , fmap (("Type",) . toJSON) _appConfigConfigurationProfileValidatorsType- ]---- | Constructor for 'AppConfigConfigurationProfileValidators' containing--- required fields as arguments.-appConfigConfigurationProfileValidators- :: AppConfigConfigurationProfileValidators-appConfigConfigurationProfileValidators =- AppConfigConfigurationProfileValidators- { _appConfigConfigurationProfileValidatorsContent = Nothing- , _appConfigConfigurationProfileValidatorsType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-configurationprofile-validators.html#cfn-appconfig-configurationprofile-validators-content-accpvContent :: Lens' AppConfigConfigurationProfileValidators (Maybe (Val Text))-accpvContent = lens _appConfigConfigurationProfileValidatorsContent (\s a -> s { _appConfigConfigurationProfileValidatorsContent = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-configurationprofile-validators.html#cfn-appconfig-configurationprofile-validators-type-accpvType :: Lens' AppConfigConfigurationProfileValidators (Maybe (Val Text))-accpvType = lens _appConfigConfigurationProfileValidatorsType (\s a -> s { _appConfigConfigurationProfileValidatorsType = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-deploymentstrategy-tags.html--module Stratosphere.ResourceProperties.AppConfigDeploymentStrategyTags where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigDeploymentStrategyTags. See--- 'appConfigDeploymentStrategyTags' for a more convenient constructor.-data AppConfigDeploymentStrategyTags =- AppConfigDeploymentStrategyTags- { _appConfigDeploymentStrategyTagsKey :: Maybe (Val Text)- , _appConfigDeploymentStrategyTagsValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigDeploymentStrategyTags where- toJSON AppConfigDeploymentStrategyTags{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _appConfigDeploymentStrategyTagsKey- , fmap (("Value",) . toJSON) _appConfigDeploymentStrategyTagsValue- ]---- | Constructor for 'AppConfigDeploymentStrategyTags' containing required--- fields as arguments.-appConfigDeploymentStrategyTags- :: AppConfigDeploymentStrategyTags-appConfigDeploymentStrategyTags =- AppConfigDeploymentStrategyTags- { _appConfigDeploymentStrategyTagsKey = Nothing- , _appConfigDeploymentStrategyTagsValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-deploymentstrategy-tags.html#cfn-appconfig-deploymentstrategy-tags-key-acdstKey :: Lens' AppConfigDeploymentStrategyTags (Maybe (Val Text))-acdstKey = lens _appConfigDeploymentStrategyTagsKey (\s a -> s { _appConfigDeploymentStrategyTagsKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-deploymentstrategy-tags.html#cfn-appconfig-deploymentstrategy-tags-value-acdstValue :: Lens' AppConfigDeploymentStrategyTags (Maybe (Val Text))-acdstValue = lens _appConfigDeploymentStrategyTagsValue (\s a -> s { _appConfigDeploymentStrategyTagsValue = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-deployment-tags.html--module Stratosphere.ResourceProperties.AppConfigDeploymentTags where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigDeploymentTags. See--- 'appConfigDeploymentTags' for a more convenient constructor.-data AppConfigDeploymentTags =- AppConfigDeploymentTags- { _appConfigDeploymentTagsKey :: Maybe (Val Text)- , _appConfigDeploymentTagsValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigDeploymentTags where- toJSON AppConfigDeploymentTags{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _appConfigDeploymentTagsKey- , fmap (("Value",) . toJSON) _appConfigDeploymentTagsValue- ]---- | Constructor for 'AppConfigDeploymentTags' containing required fields as--- arguments.-appConfigDeploymentTags- :: AppConfigDeploymentTags-appConfigDeploymentTags =- AppConfigDeploymentTags- { _appConfigDeploymentTagsKey = Nothing- , _appConfigDeploymentTagsValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-deployment-tags.html#cfn-appconfig-deployment-tags-key-acdtKey :: Lens' AppConfigDeploymentTags (Maybe (Val Text))-acdtKey = lens _appConfigDeploymentTagsKey (\s a -> s { _appConfigDeploymentTagsKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-deployment-tags.html#cfn-appconfig-deployment-tags-value-acdtValue :: Lens' AppConfigDeploymentTags (Maybe (Val Text))-acdtValue = lens _appConfigDeploymentTagsValue (\s a -> s { _appConfigDeploymentTagsValue = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-environment-monitors.html--module Stratosphere.ResourceProperties.AppConfigEnvironmentMonitors where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigEnvironmentMonitors. See--- 'appConfigEnvironmentMonitors' for a more convenient constructor.-data AppConfigEnvironmentMonitors =- AppConfigEnvironmentMonitors- { _appConfigEnvironmentMonitorsAlarmArn :: Maybe (Val Text)- , _appConfigEnvironmentMonitorsAlarmRoleArn :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigEnvironmentMonitors where- toJSON AppConfigEnvironmentMonitors{..} =- object $- catMaybes- [ fmap (("AlarmArn",) . toJSON) _appConfigEnvironmentMonitorsAlarmArn- , fmap (("AlarmRoleArn",) . toJSON) _appConfigEnvironmentMonitorsAlarmRoleArn- ]---- | Constructor for 'AppConfigEnvironmentMonitors' containing required fields--- as arguments.-appConfigEnvironmentMonitors- :: AppConfigEnvironmentMonitors-appConfigEnvironmentMonitors =- AppConfigEnvironmentMonitors- { _appConfigEnvironmentMonitorsAlarmArn = Nothing- , _appConfigEnvironmentMonitorsAlarmRoleArn = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-environment-monitors.html#cfn-appconfig-environment-monitors-alarmarn-acemAlarmArn :: Lens' AppConfigEnvironmentMonitors (Maybe (Val Text))-acemAlarmArn = lens _appConfigEnvironmentMonitorsAlarmArn (\s a -> s { _appConfigEnvironmentMonitorsAlarmArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-environment-monitors.html#cfn-appconfig-environment-monitors-alarmrolearn-acemAlarmRoleArn :: Lens' AppConfigEnvironmentMonitors (Maybe (Val Text))-acemAlarmRoleArn = lens _appConfigEnvironmentMonitorsAlarmRoleArn (\s a -> s { _appConfigEnvironmentMonitorsAlarmRoleArn = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-environment-tags.html--module Stratosphere.ResourceProperties.AppConfigEnvironmentTags where--import Stratosphere.ResourceImports----- | Full data type definition for AppConfigEnvironmentTags. See--- 'appConfigEnvironmentTags' for a more convenient constructor.-data AppConfigEnvironmentTags =- AppConfigEnvironmentTags- { _appConfigEnvironmentTagsKey :: Maybe (Val Text)- , _appConfigEnvironmentTagsValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppConfigEnvironmentTags where- toJSON AppConfigEnvironmentTags{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _appConfigEnvironmentTagsKey- , fmap (("Value",) . toJSON) _appConfigEnvironmentTagsValue- ]---- | Constructor for 'AppConfigEnvironmentTags' containing required fields as--- arguments.-appConfigEnvironmentTags- :: AppConfigEnvironmentTags-appConfigEnvironmentTags =- AppConfigEnvironmentTags- { _appConfigEnvironmentTagsKey = Nothing- , _appConfigEnvironmentTagsValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-environment-tags.html#cfn-appconfig-environment-tags-key-acetKey :: Lens' AppConfigEnvironmentTags (Maybe (Val Text))-acetKey = lens _appConfigEnvironmentTagsKey (\s a -> s { _appConfigEnvironmentTagsKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appconfig-environment-tags.html#cfn-appconfig-environment-tags-value-acetValue :: Lens' AppConfigEnvironmentTags (Maybe (Val Text))-acetValue = lens _appConfigEnvironmentTagsValue (\s a -> s { _appConfigEnvironmentTagsValue = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutespec.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteSpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshGatewayRouteGrpcGatewayRoute-import Stratosphere.ResourceProperties.AppMeshGatewayRouteHttpGatewayRoute---- | Full data type definition for AppMeshGatewayRouteGatewayRouteSpec. See--- 'appMeshGatewayRouteGatewayRouteSpec' for a more convenient constructor.-data AppMeshGatewayRouteGatewayRouteSpec =- AppMeshGatewayRouteGatewayRouteSpec- { _appMeshGatewayRouteGatewayRouteSpecGrpcRoute :: Maybe AppMeshGatewayRouteGrpcGatewayRoute- , _appMeshGatewayRouteGatewayRouteSpecHttp2Route :: Maybe AppMeshGatewayRouteHttpGatewayRoute- , _appMeshGatewayRouteGatewayRouteSpecHttpRoute :: Maybe AppMeshGatewayRouteHttpGatewayRoute- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteGatewayRouteSpec where- toJSON AppMeshGatewayRouteGatewayRouteSpec{..} =- object $- catMaybes- [ fmap (("GrpcRoute",) . toJSON) _appMeshGatewayRouteGatewayRouteSpecGrpcRoute- , fmap (("Http2Route",) . toJSON) _appMeshGatewayRouteGatewayRouteSpecHttp2Route- , fmap (("HttpRoute",) . toJSON) _appMeshGatewayRouteGatewayRouteSpecHttpRoute- ]---- | Constructor for 'AppMeshGatewayRouteGatewayRouteSpec' containing required--- fields as arguments.-appMeshGatewayRouteGatewayRouteSpec- :: AppMeshGatewayRouteGatewayRouteSpec-appMeshGatewayRouteGatewayRouteSpec =- AppMeshGatewayRouteGatewayRouteSpec- { _appMeshGatewayRouteGatewayRouteSpecGrpcRoute = Nothing- , _appMeshGatewayRouteGatewayRouteSpecHttp2Route = Nothing- , _appMeshGatewayRouteGatewayRouteSpecHttpRoute = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutespec.html#cfn-appmesh-gatewayroute-gatewayroutespec-grpcroute-amgrgrsGrpcRoute :: Lens' AppMeshGatewayRouteGatewayRouteSpec (Maybe AppMeshGatewayRouteGrpcGatewayRoute)-amgrgrsGrpcRoute = lens _appMeshGatewayRouteGatewayRouteSpecGrpcRoute (\s a -> s { _appMeshGatewayRouteGatewayRouteSpecGrpcRoute = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutespec.html#cfn-appmesh-gatewayroute-gatewayroutespec-http2route-amgrgrsHttp2Route :: Lens' AppMeshGatewayRouteGatewayRouteSpec (Maybe AppMeshGatewayRouteHttpGatewayRoute)-amgrgrsHttp2Route = lens _appMeshGatewayRouteGatewayRouteSpecHttp2Route (\s a -> s { _appMeshGatewayRouteGatewayRouteSpecHttp2Route = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutespec.html#cfn-appmesh-gatewayroute-gatewayroutespec-httproute-amgrgrsHttpRoute :: Lens' AppMeshGatewayRouteGatewayRouteSpec (Maybe AppMeshGatewayRouteHttpGatewayRoute)-amgrgrsHttpRoute = lens _appMeshGatewayRouteGatewayRouteSpecHttpRoute (\s a -> s { _appMeshGatewayRouteGatewayRouteSpecHttpRoute = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutetarget.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteTarget where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteVirtualService---- | Full data type definition for AppMeshGatewayRouteGatewayRouteTarget. See--- 'appMeshGatewayRouteGatewayRouteTarget' for a more convenient--- constructor.-data AppMeshGatewayRouteGatewayRouteTarget =- AppMeshGatewayRouteGatewayRouteTarget- { _appMeshGatewayRouteGatewayRouteTargetVirtualService :: AppMeshGatewayRouteGatewayRouteVirtualService- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteGatewayRouteTarget where- toJSON AppMeshGatewayRouteGatewayRouteTarget{..} =- object $- catMaybes- [ (Just . ("VirtualService",) . toJSON) _appMeshGatewayRouteGatewayRouteTargetVirtualService- ]---- | Constructor for 'AppMeshGatewayRouteGatewayRouteTarget' containing--- required fields as arguments.-appMeshGatewayRouteGatewayRouteTarget- :: AppMeshGatewayRouteGatewayRouteVirtualService -- ^ 'amgrgrtVirtualService'- -> AppMeshGatewayRouteGatewayRouteTarget-appMeshGatewayRouteGatewayRouteTarget virtualServicearg =- AppMeshGatewayRouteGatewayRouteTarget- { _appMeshGatewayRouteGatewayRouteTargetVirtualService = virtualServicearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutetarget.html#cfn-appmesh-gatewayroute-gatewayroutetarget-virtualservice-amgrgrtVirtualService :: Lens' AppMeshGatewayRouteGatewayRouteTarget AppMeshGatewayRouteGatewayRouteVirtualService-amgrgrtVirtualService = lens _appMeshGatewayRouteGatewayRouteTargetVirtualService (\s a -> s { _appMeshGatewayRouteGatewayRouteTargetVirtualService = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutevirtualservice.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteVirtualService where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshGatewayRouteGatewayRouteVirtualService. See--- 'appMeshGatewayRouteGatewayRouteVirtualService' for a more convenient--- constructor.-data AppMeshGatewayRouteGatewayRouteVirtualService =- AppMeshGatewayRouteGatewayRouteVirtualService- { _appMeshGatewayRouteGatewayRouteVirtualServiceVirtualServiceName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteGatewayRouteVirtualService where- toJSON AppMeshGatewayRouteGatewayRouteVirtualService{..} =- object $- catMaybes- [ (Just . ("VirtualServiceName",) . toJSON) _appMeshGatewayRouteGatewayRouteVirtualServiceVirtualServiceName- ]---- | Constructor for 'AppMeshGatewayRouteGatewayRouteVirtualService'--- containing required fields as arguments.-appMeshGatewayRouteGatewayRouteVirtualService- :: Val Text -- ^ 'amgrgrvsVirtualServiceName'- -> AppMeshGatewayRouteGatewayRouteVirtualService-appMeshGatewayRouteGatewayRouteVirtualService virtualServiceNamearg =- AppMeshGatewayRouteGatewayRouteVirtualService- { _appMeshGatewayRouteGatewayRouteVirtualServiceVirtualServiceName = virtualServiceNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-gatewayroutevirtualservice.html#cfn-appmesh-gatewayroute-gatewayroutevirtualservice-virtualservicename-amgrgrvsVirtualServiceName :: Lens' AppMeshGatewayRouteGatewayRouteVirtualService (Val Text)-amgrgrvsVirtualServiceName = lens _appMeshGatewayRouteGatewayRouteVirtualServiceVirtualServiceName (\s a -> s { _appMeshGatewayRouteGatewayRouteVirtualServiceVirtualServiceName = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayroute.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteGrpcGatewayRoute where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshGatewayRouteGrpcGatewayRouteAction-import Stratosphere.ResourceProperties.AppMeshGatewayRouteGrpcGatewayRouteMatch---- | Full data type definition for AppMeshGatewayRouteGrpcGatewayRoute. See--- 'appMeshGatewayRouteGrpcGatewayRoute' for a more convenient constructor.-data AppMeshGatewayRouteGrpcGatewayRoute =- AppMeshGatewayRouteGrpcGatewayRoute- { _appMeshGatewayRouteGrpcGatewayRouteAction :: AppMeshGatewayRouteGrpcGatewayRouteAction- , _appMeshGatewayRouteGrpcGatewayRouteMatch :: AppMeshGatewayRouteGrpcGatewayRouteMatch- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteGrpcGatewayRoute where- toJSON AppMeshGatewayRouteGrpcGatewayRoute{..} =- object $- catMaybes- [ (Just . ("Action",) . toJSON) _appMeshGatewayRouteGrpcGatewayRouteAction- , (Just . ("Match",) . toJSON) _appMeshGatewayRouteGrpcGatewayRouteMatch- ]---- | Constructor for 'AppMeshGatewayRouteGrpcGatewayRoute' containing required--- fields as arguments.-appMeshGatewayRouteGrpcGatewayRoute- :: AppMeshGatewayRouteGrpcGatewayRouteAction -- ^ 'amgrggrAction'- -> AppMeshGatewayRouteGrpcGatewayRouteMatch -- ^ 'amgrggrMatch'- -> AppMeshGatewayRouteGrpcGatewayRoute-appMeshGatewayRouteGrpcGatewayRoute actionarg matcharg =- AppMeshGatewayRouteGrpcGatewayRoute- { _appMeshGatewayRouteGrpcGatewayRouteAction = actionarg- , _appMeshGatewayRouteGrpcGatewayRouteMatch = matcharg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayroute.html#cfn-appmesh-gatewayroute-grpcgatewayroute-action-amgrggrAction :: Lens' AppMeshGatewayRouteGrpcGatewayRoute AppMeshGatewayRouteGrpcGatewayRouteAction-amgrggrAction = lens _appMeshGatewayRouteGrpcGatewayRouteAction (\s a -> s { _appMeshGatewayRouteGrpcGatewayRouteAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayroute.html#cfn-appmesh-gatewayroute-grpcgatewayroute-match-amgrggrMatch :: Lens' AppMeshGatewayRouteGrpcGatewayRoute AppMeshGatewayRouteGrpcGatewayRouteMatch-amgrggrMatch = lens _appMeshGatewayRouteGrpcGatewayRouteMatch (\s a -> s { _appMeshGatewayRouteGrpcGatewayRouteMatch = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayrouteaction.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteGrpcGatewayRouteAction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteTarget---- | Full data type definition for AppMeshGatewayRouteGrpcGatewayRouteAction.--- See 'appMeshGatewayRouteGrpcGatewayRouteAction' for a more convenient--- constructor.-data AppMeshGatewayRouteGrpcGatewayRouteAction =- AppMeshGatewayRouteGrpcGatewayRouteAction- { _appMeshGatewayRouteGrpcGatewayRouteActionTarget :: AppMeshGatewayRouteGatewayRouteTarget- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteGrpcGatewayRouteAction where- toJSON AppMeshGatewayRouteGrpcGatewayRouteAction{..} =- object $- catMaybes- [ (Just . ("Target",) . toJSON) _appMeshGatewayRouteGrpcGatewayRouteActionTarget- ]---- | Constructor for 'AppMeshGatewayRouteGrpcGatewayRouteAction' containing--- required fields as arguments.-appMeshGatewayRouteGrpcGatewayRouteAction- :: AppMeshGatewayRouteGatewayRouteTarget -- ^ 'amgrggraTarget'- -> AppMeshGatewayRouteGrpcGatewayRouteAction-appMeshGatewayRouteGrpcGatewayRouteAction targetarg =- AppMeshGatewayRouteGrpcGatewayRouteAction- { _appMeshGatewayRouteGrpcGatewayRouteActionTarget = targetarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayrouteaction.html#cfn-appmesh-gatewayroute-grpcgatewayrouteaction-target-amgrggraTarget :: Lens' AppMeshGatewayRouteGrpcGatewayRouteAction AppMeshGatewayRouteGatewayRouteTarget-amgrggraTarget = lens _appMeshGatewayRouteGrpcGatewayRouteActionTarget (\s a -> s { _appMeshGatewayRouteGrpcGatewayRouteActionTarget = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayroutematch.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteGrpcGatewayRouteMatch where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshGatewayRouteGrpcGatewayRouteMatch.--- See 'appMeshGatewayRouteGrpcGatewayRouteMatch' for a more convenient--- constructor.-data AppMeshGatewayRouteGrpcGatewayRouteMatch =- AppMeshGatewayRouteGrpcGatewayRouteMatch- { _appMeshGatewayRouteGrpcGatewayRouteMatchServiceName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteGrpcGatewayRouteMatch where- toJSON AppMeshGatewayRouteGrpcGatewayRouteMatch{..} =- object $- catMaybes- [ fmap (("ServiceName",) . toJSON) _appMeshGatewayRouteGrpcGatewayRouteMatchServiceName- ]---- | Constructor for 'AppMeshGatewayRouteGrpcGatewayRouteMatch' containing--- required fields as arguments.-appMeshGatewayRouteGrpcGatewayRouteMatch- :: AppMeshGatewayRouteGrpcGatewayRouteMatch-appMeshGatewayRouteGrpcGatewayRouteMatch =- AppMeshGatewayRouteGrpcGatewayRouteMatch- { _appMeshGatewayRouteGrpcGatewayRouteMatchServiceName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-grpcgatewayroutematch.html#cfn-appmesh-gatewayroute-grpcgatewayroutematch-servicename-amgrggrmServiceName :: Lens' AppMeshGatewayRouteGrpcGatewayRouteMatch (Maybe (Val Text))-amgrggrmServiceName = lens _appMeshGatewayRouteGrpcGatewayRouteMatchServiceName (\s a -> s { _appMeshGatewayRouteGrpcGatewayRouteMatchServiceName = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayroute.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteHttpGatewayRoute where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshGatewayRouteHttpGatewayRouteAction-import Stratosphere.ResourceProperties.AppMeshGatewayRouteHttpGatewayRouteMatch---- | Full data type definition for AppMeshGatewayRouteHttpGatewayRoute. See--- 'appMeshGatewayRouteHttpGatewayRoute' for a more convenient constructor.-data AppMeshGatewayRouteHttpGatewayRoute =- AppMeshGatewayRouteHttpGatewayRoute- { _appMeshGatewayRouteHttpGatewayRouteAction :: AppMeshGatewayRouteHttpGatewayRouteAction- , _appMeshGatewayRouteHttpGatewayRouteMatch :: AppMeshGatewayRouteHttpGatewayRouteMatch- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteHttpGatewayRoute where- toJSON AppMeshGatewayRouteHttpGatewayRoute{..} =- object $- catMaybes- [ (Just . ("Action",) . toJSON) _appMeshGatewayRouteHttpGatewayRouteAction- , (Just . ("Match",) . toJSON) _appMeshGatewayRouteHttpGatewayRouteMatch- ]---- | Constructor for 'AppMeshGatewayRouteHttpGatewayRoute' containing required--- fields as arguments.-appMeshGatewayRouteHttpGatewayRoute- :: AppMeshGatewayRouteHttpGatewayRouteAction -- ^ 'amgrhgrAction'- -> AppMeshGatewayRouteHttpGatewayRouteMatch -- ^ 'amgrhgrMatch'- -> AppMeshGatewayRouteHttpGatewayRoute-appMeshGatewayRouteHttpGatewayRoute actionarg matcharg =- AppMeshGatewayRouteHttpGatewayRoute- { _appMeshGatewayRouteHttpGatewayRouteAction = actionarg- , _appMeshGatewayRouteHttpGatewayRouteMatch = matcharg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayroute.html#cfn-appmesh-gatewayroute-httpgatewayroute-action-amgrhgrAction :: Lens' AppMeshGatewayRouteHttpGatewayRoute AppMeshGatewayRouteHttpGatewayRouteAction-amgrhgrAction = lens _appMeshGatewayRouteHttpGatewayRouteAction (\s a -> s { _appMeshGatewayRouteHttpGatewayRouteAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayroute.html#cfn-appmesh-gatewayroute-httpgatewayroute-match-amgrhgrMatch :: Lens' AppMeshGatewayRouteHttpGatewayRoute AppMeshGatewayRouteHttpGatewayRouteMatch-amgrhgrMatch = lens _appMeshGatewayRouteHttpGatewayRouteMatch (\s a -> s { _appMeshGatewayRouteHttpGatewayRouteMatch = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayrouteaction.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteHttpGatewayRouteAction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteTarget---- | Full data type definition for AppMeshGatewayRouteHttpGatewayRouteAction.--- See 'appMeshGatewayRouteHttpGatewayRouteAction' for a more convenient--- constructor.-data AppMeshGatewayRouteHttpGatewayRouteAction =- AppMeshGatewayRouteHttpGatewayRouteAction- { _appMeshGatewayRouteHttpGatewayRouteActionTarget :: AppMeshGatewayRouteGatewayRouteTarget- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteHttpGatewayRouteAction where- toJSON AppMeshGatewayRouteHttpGatewayRouteAction{..} =- object $- catMaybes- [ (Just . ("Target",) . toJSON) _appMeshGatewayRouteHttpGatewayRouteActionTarget- ]---- | Constructor for 'AppMeshGatewayRouteHttpGatewayRouteAction' containing--- required fields as arguments.-appMeshGatewayRouteHttpGatewayRouteAction- :: AppMeshGatewayRouteGatewayRouteTarget -- ^ 'amgrhgraTarget'- -> AppMeshGatewayRouteHttpGatewayRouteAction-appMeshGatewayRouteHttpGatewayRouteAction targetarg =- AppMeshGatewayRouteHttpGatewayRouteAction- { _appMeshGatewayRouteHttpGatewayRouteActionTarget = targetarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayrouteaction.html#cfn-appmesh-gatewayroute-httpgatewayrouteaction-target-amgrhgraTarget :: Lens' AppMeshGatewayRouteHttpGatewayRouteAction AppMeshGatewayRouteGatewayRouteTarget-amgrhgraTarget = lens _appMeshGatewayRouteHttpGatewayRouteActionTarget (\s a -> s { _appMeshGatewayRouteHttpGatewayRouteActionTarget = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayroutematch.html--module Stratosphere.ResourceProperties.AppMeshGatewayRouteHttpGatewayRouteMatch where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshGatewayRouteHttpGatewayRouteMatch.--- See 'appMeshGatewayRouteHttpGatewayRouteMatch' for a more convenient--- constructor.-data AppMeshGatewayRouteHttpGatewayRouteMatch =- AppMeshGatewayRouteHttpGatewayRouteMatch- { _appMeshGatewayRouteHttpGatewayRouteMatchPrefix :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshGatewayRouteHttpGatewayRouteMatch where- toJSON AppMeshGatewayRouteHttpGatewayRouteMatch{..} =- object $- catMaybes- [ (Just . ("Prefix",) . toJSON) _appMeshGatewayRouteHttpGatewayRouteMatchPrefix- ]---- | Constructor for 'AppMeshGatewayRouteHttpGatewayRouteMatch' containing--- required fields as arguments.-appMeshGatewayRouteHttpGatewayRouteMatch- :: Val Text -- ^ 'amgrhgrmPrefix'- -> AppMeshGatewayRouteHttpGatewayRouteMatch-appMeshGatewayRouteHttpGatewayRouteMatch prefixarg =- AppMeshGatewayRouteHttpGatewayRouteMatch- { _appMeshGatewayRouteHttpGatewayRouteMatchPrefix = prefixarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-gatewayroute-httpgatewayroutematch.html#cfn-appmesh-gatewayroute-httpgatewayroutematch-prefix-amgrhgrmPrefix :: Lens' AppMeshGatewayRouteHttpGatewayRouteMatch (Val Text)-amgrhgrmPrefix = lens _appMeshGatewayRouteHttpGatewayRouteMatchPrefix (\s a -> s { _appMeshGatewayRouteHttpGatewayRouteMatchPrefix = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-mesh-egressfilter.html--module Stratosphere.ResourceProperties.AppMeshMeshEgressFilter where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshMeshEgressFilter. See--- 'appMeshMeshEgressFilter' for a more convenient constructor.-data AppMeshMeshEgressFilter =- AppMeshMeshEgressFilter- { _appMeshMeshEgressFilterType :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshMeshEgressFilter where- toJSON AppMeshMeshEgressFilter{..} =- object $- catMaybes- [ (Just . ("Type",) . toJSON) _appMeshMeshEgressFilterType- ]---- | Constructor for 'AppMeshMeshEgressFilter' containing required fields as--- arguments.-appMeshMeshEgressFilter- :: Val Text -- ^ 'ammefType'- -> AppMeshMeshEgressFilter-appMeshMeshEgressFilter typearg =- AppMeshMeshEgressFilter- { _appMeshMeshEgressFilterType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-mesh-egressfilter.html#cfn-appmesh-mesh-egressfilter-type-ammefType :: Lens' AppMeshMeshEgressFilter (Val Text)-ammefType = lens _appMeshMeshEgressFilterType (\s a -> s { _appMeshMeshEgressFilterType = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-mesh-meshspec.html--module Stratosphere.ResourceProperties.AppMeshMeshMeshSpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshMeshEgressFilter---- | Full data type definition for AppMeshMeshMeshSpec. See--- 'appMeshMeshMeshSpec' for a more convenient constructor.-data AppMeshMeshMeshSpec =- AppMeshMeshMeshSpec- { _appMeshMeshMeshSpecEgressFilter :: Maybe AppMeshMeshEgressFilter- } deriving (Show, Eq)--instance ToJSON AppMeshMeshMeshSpec where- toJSON AppMeshMeshMeshSpec{..} =- object $- catMaybes- [ fmap (("EgressFilter",) . toJSON) _appMeshMeshMeshSpecEgressFilter- ]---- | Constructor for 'AppMeshMeshMeshSpec' containing required fields as--- arguments.-appMeshMeshMeshSpec- :: AppMeshMeshMeshSpec-appMeshMeshMeshSpec =- AppMeshMeshMeshSpec- { _appMeshMeshMeshSpecEgressFilter = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-mesh-meshspec.html#cfn-appmesh-mesh-meshspec-egressfilter-ammmsEgressFilter :: Lens' AppMeshMeshMeshSpec (Maybe AppMeshMeshEgressFilter)-ammmsEgressFilter = lens _appMeshMeshMeshSpecEgressFilter (\s a -> s { _appMeshMeshMeshSpecEgressFilter = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-duration.html--module Stratosphere.ResourceProperties.AppMeshRouteDuration where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshRouteDuration. See--- 'appMeshRouteDuration' for a more convenient constructor.-data AppMeshRouteDuration =- AppMeshRouteDuration- { _appMeshRouteDurationUnit :: Val Text- , _appMeshRouteDurationValue :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppMeshRouteDuration where- toJSON AppMeshRouteDuration{..} =- object $- catMaybes- [ (Just . ("Unit",) . toJSON) _appMeshRouteDurationUnit- , (Just . ("Value",) . toJSON) _appMeshRouteDurationValue- ]---- | Constructor for 'AppMeshRouteDuration' containing required fields as--- arguments.-appMeshRouteDuration- :: Val Text -- ^ 'amrdUnit'- -> Val Integer -- ^ 'amrdValue'- -> AppMeshRouteDuration-appMeshRouteDuration unitarg valuearg =- AppMeshRouteDuration- { _appMeshRouteDurationUnit = unitarg- , _appMeshRouteDurationValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-duration.html#cfn-appmesh-route-duration-unit-amrdUnit :: Lens' AppMeshRouteDuration (Val Text)-amrdUnit = lens _appMeshRouteDurationUnit (\s a -> s { _appMeshRouteDurationUnit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-duration.html#cfn-appmesh-route-duration-value-amrdValue :: Lens' AppMeshRouteDuration (Val Integer)-amrdValue = lens _appMeshRouteDurationValue (\s a -> s { _appMeshRouteDurationValue = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcretrypolicy.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcRetryPolicy where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteDuration---- | Full data type definition for AppMeshRouteGrpcRetryPolicy. See--- 'appMeshRouteGrpcRetryPolicy' for a more convenient constructor.-data AppMeshRouteGrpcRetryPolicy =- AppMeshRouteGrpcRetryPolicy- { _appMeshRouteGrpcRetryPolicyGrpcRetryEvents :: Maybe (ValList Text)- , _appMeshRouteGrpcRetryPolicyHttpRetryEvents :: Maybe (ValList Text)- , _appMeshRouteGrpcRetryPolicyMaxRetries :: Val Integer- , _appMeshRouteGrpcRetryPolicyPerRetryTimeout :: AppMeshRouteDuration- , _appMeshRouteGrpcRetryPolicyTcpRetryEvents :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcRetryPolicy where- toJSON AppMeshRouteGrpcRetryPolicy{..} =- object $- catMaybes- [ fmap (("GrpcRetryEvents",) . toJSON) _appMeshRouteGrpcRetryPolicyGrpcRetryEvents- , fmap (("HttpRetryEvents",) . toJSON) _appMeshRouteGrpcRetryPolicyHttpRetryEvents- , (Just . ("MaxRetries",) . toJSON) _appMeshRouteGrpcRetryPolicyMaxRetries- , (Just . ("PerRetryTimeout",) . toJSON) _appMeshRouteGrpcRetryPolicyPerRetryTimeout- , fmap (("TcpRetryEvents",) . toJSON) _appMeshRouteGrpcRetryPolicyTcpRetryEvents- ]---- | Constructor for 'AppMeshRouteGrpcRetryPolicy' containing required fields--- as arguments.-appMeshRouteGrpcRetryPolicy- :: Val Integer -- ^ 'amrgrpMaxRetries'- -> AppMeshRouteDuration -- ^ 'amrgrpPerRetryTimeout'- -> AppMeshRouteGrpcRetryPolicy-appMeshRouteGrpcRetryPolicy maxRetriesarg perRetryTimeoutarg =- AppMeshRouteGrpcRetryPolicy- { _appMeshRouteGrpcRetryPolicyGrpcRetryEvents = Nothing- , _appMeshRouteGrpcRetryPolicyHttpRetryEvents = Nothing- , _appMeshRouteGrpcRetryPolicyMaxRetries = maxRetriesarg- , _appMeshRouteGrpcRetryPolicyPerRetryTimeout = perRetryTimeoutarg- , _appMeshRouteGrpcRetryPolicyTcpRetryEvents = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcretrypolicy.html#cfn-appmesh-route-grpcretrypolicy-grpcretryevents-amrgrpGrpcRetryEvents :: Lens' AppMeshRouteGrpcRetryPolicy (Maybe (ValList Text))-amrgrpGrpcRetryEvents = lens _appMeshRouteGrpcRetryPolicyGrpcRetryEvents (\s a -> s { _appMeshRouteGrpcRetryPolicyGrpcRetryEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcretrypolicy.html#cfn-appmesh-route-grpcretrypolicy-httpretryevents-amrgrpHttpRetryEvents :: Lens' AppMeshRouteGrpcRetryPolicy (Maybe (ValList Text))-amrgrpHttpRetryEvents = lens _appMeshRouteGrpcRetryPolicyHttpRetryEvents (\s a -> s { _appMeshRouteGrpcRetryPolicyHttpRetryEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcretrypolicy.html#cfn-appmesh-route-grpcretrypolicy-maxretries-amrgrpMaxRetries :: Lens' AppMeshRouteGrpcRetryPolicy (Val Integer)-amrgrpMaxRetries = lens _appMeshRouteGrpcRetryPolicyMaxRetries (\s a -> s { _appMeshRouteGrpcRetryPolicyMaxRetries = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcretrypolicy.html#cfn-appmesh-route-grpcretrypolicy-perretrytimeout-amrgrpPerRetryTimeout :: Lens' AppMeshRouteGrpcRetryPolicy AppMeshRouteDuration-amrgrpPerRetryTimeout = lens _appMeshRouteGrpcRetryPolicyPerRetryTimeout (\s a -> s { _appMeshRouteGrpcRetryPolicyPerRetryTimeout = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcretrypolicy.html#cfn-appmesh-route-grpcretrypolicy-tcpretryevents-amrgrpTcpRetryEvents :: Lens' AppMeshRouteGrpcRetryPolicy (Maybe (ValList Text))-amrgrpTcpRetryEvents = lens _appMeshRouteGrpcRetryPolicyTcpRetryEvents (\s a -> s { _appMeshRouteGrpcRetryPolicyTcpRetryEvents = a })
@@ -1,64 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroute.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcRoute where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteAction-import Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteMatch-import Stratosphere.ResourceProperties.AppMeshRouteGrpcRetryPolicy-import Stratosphere.ResourceProperties.AppMeshRouteGrpcTimeout---- | Full data type definition for AppMeshRouteGrpcRoute. See--- 'appMeshRouteGrpcRoute' for a more convenient constructor.-data AppMeshRouteGrpcRoute =- AppMeshRouteGrpcRoute- { _appMeshRouteGrpcRouteAction :: AppMeshRouteGrpcRouteAction- , _appMeshRouteGrpcRouteMatch :: AppMeshRouteGrpcRouteMatch- , _appMeshRouteGrpcRouteRetryPolicy :: Maybe AppMeshRouteGrpcRetryPolicy- , _appMeshRouteGrpcRouteTimeout :: Maybe AppMeshRouteGrpcTimeout- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcRoute where- toJSON AppMeshRouteGrpcRoute{..} =- object $- catMaybes- [ (Just . ("Action",) . toJSON) _appMeshRouteGrpcRouteAction- , (Just . ("Match",) . toJSON) _appMeshRouteGrpcRouteMatch- , fmap (("RetryPolicy",) . toJSON) _appMeshRouteGrpcRouteRetryPolicy- , fmap (("Timeout",) . toJSON) _appMeshRouteGrpcRouteTimeout- ]---- | Constructor for 'AppMeshRouteGrpcRoute' containing required fields as--- arguments.-appMeshRouteGrpcRoute- :: AppMeshRouteGrpcRouteAction -- ^ 'amrgrAction'- -> AppMeshRouteGrpcRouteMatch -- ^ 'amrgrMatch'- -> AppMeshRouteGrpcRoute-appMeshRouteGrpcRoute actionarg matcharg =- AppMeshRouteGrpcRoute- { _appMeshRouteGrpcRouteAction = actionarg- , _appMeshRouteGrpcRouteMatch = matcharg- , _appMeshRouteGrpcRouteRetryPolicy = Nothing- , _appMeshRouteGrpcRouteTimeout = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroute.html#cfn-appmesh-route-grpcroute-action-amrgrAction :: Lens' AppMeshRouteGrpcRoute AppMeshRouteGrpcRouteAction-amrgrAction = lens _appMeshRouteGrpcRouteAction (\s a -> s { _appMeshRouteGrpcRouteAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroute.html#cfn-appmesh-route-grpcroute-match-amrgrMatch :: Lens' AppMeshRouteGrpcRoute AppMeshRouteGrpcRouteMatch-amrgrMatch = lens _appMeshRouteGrpcRouteMatch (\s a -> s { _appMeshRouteGrpcRouteMatch = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroute.html#cfn-appmesh-route-grpcroute-retrypolicy-amrgrRetryPolicy :: Lens' AppMeshRouteGrpcRoute (Maybe AppMeshRouteGrpcRetryPolicy)-amrgrRetryPolicy = lens _appMeshRouteGrpcRouteRetryPolicy (\s a -> s { _appMeshRouteGrpcRouteRetryPolicy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroute.html#cfn-appmesh-route-grpcroute-timeout-amrgrTimeout :: Lens' AppMeshRouteGrpcRoute (Maybe AppMeshRouteGrpcTimeout)-amrgrTimeout = lens _appMeshRouteGrpcRouteTimeout (\s a -> s { _appMeshRouteGrpcRouteTimeout = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcrouteaction.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteAction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteWeightedTarget---- | Full data type definition for AppMeshRouteGrpcRouteAction. See--- 'appMeshRouteGrpcRouteAction' for a more convenient constructor.-data AppMeshRouteGrpcRouteAction =- AppMeshRouteGrpcRouteAction- { _appMeshRouteGrpcRouteActionWeightedTargets :: [AppMeshRouteWeightedTarget]- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcRouteAction where- toJSON AppMeshRouteGrpcRouteAction{..} =- object $- catMaybes- [ (Just . ("WeightedTargets",) . toJSON) _appMeshRouteGrpcRouteActionWeightedTargets- ]---- | Constructor for 'AppMeshRouteGrpcRouteAction' containing required fields--- as arguments.-appMeshRouteGrpcRouteAction- :: [AppMeshRouteWeightedTarget] -- ^ 'amrgraWeightedTargets'- -> AppMeshRouteGrpcRouteAction-appMeshRouteGrpcRouteAction weightedTargetsarg =- AppMeshRouteGrpcRouteAction- { _appMeshRouteGrpcRouteActionWeightedTargets = weightedTargetsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcrouteaction.html#cfn-appmesh-route-grpcrouteaction-weightedtargets-amrgraWeightedTargets :: Lens' AppMeshRouteGrpcRouteAction [AppMeshRouteWeightedTarget]-amrgraWeightedTargets = lens _appMeshRouteGrpcRouteActionWeightedTargets (\s a -> s { _appMeshRouteGrpcRouteActionWeightedTargets = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutematch.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteMatch where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteMetadata---- | Full data type definition for AppMeshRouteGrpcRouteMatch. See--- 'appMeshRouteGrpcRouteMatch' for a more convenient constructor.-data AppMeshRouteGrpcRouteMatch =- AppMeshRouteGrpcRouteMatch- { _appMeshRouteGrpcRouteMatchMetadata :: Maybe [AppMeshRouteGrpcRouteMetadata]- , _appMeshRouteGrpcRouteMatchMethodName :: Maybe (Val Text)- , _appMeshRouteGrpcRouteMatchServiceName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcRouteMatch where- toJSON AppMeshRouteGrpcRouteMatch{..} =- object $- catMaybes- [ fmap (("Metadata",) . toJSON) _appMeshRouteGrpcRouteMatchMetadata- , fmap (("MethodName",) . toJSON) _appMeshRouteGrpcRouteMatchMethodName- , fmap (("ServiceName",) . toJSON) _appMeshRouteGrpcRouteMatchServiceName- ]---- | Constructor for 'AppMeshRouteGrpcRouteMatch' containing required fields--- as arguments.-appMeshRouteGrpcRouteMatch- :: AppMeshRouteGrpcRouteMatch-appMeshRouteGrpcRouteMatch =- AppMeshRouteGrpcRouteMatch- { _appMeshRouteGrpcRouteMatchMetadata = Nothing- , _appMeshRouteGrpcRouteMatchMethodName = Nothing- , _appMeshRouteGrpcRouteMatchServiceName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutematch.html#cfn-appmesh-route-grpcroutematch-metadata-amrgrmMetadata :: Lens' AppMeshRouteGrpcRouteMatch (Maybe [AppMeshRouteGrpcRouteMetadata])-amrgrmMetadata = lens _appMeshRouteGrpcRouteMatchMetadata (\s a -> s { _appMeshRouteGrpcRouteMatchMetadata = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutematch.html#cfn-appmesh-route-grpcroutematch-methodname-amrgrmMethodName :: Lens' AppMeshRouteGrpcRouteMatch (Maybe (Val Text))-amrgrmMethodName = lens _appMeshRouteGrpcRouteMatchMethodName (\s a -> s { _appMeshRouteGrpcRouteMatchMethodName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutematch.html#cfn-appmesh-route-grpcroutematch-servicename-amrgrmServiceName :: Lens' AppMeshRouteGrpcRouteMatch (Maybe (Val Text))-amrgrmServiceName = lens _appMeshRouteGrpcRouteMatchServiceName (\s a -> s { _appMeshRouteGrpcRouteMatchServiceName = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadata.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteMetadata where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteMetadataMatchMethod---- | Full data type definition for AppMeshRouteGrpcRouteMetadata. See--- 'appMeshRouteGrpcRouteMetadata' for a more convenient constructor.-data AppMeshRouteGrpcRouteMetadata =- AppMeshRouteGrpcRouteMetadata- { _appMeshRouteGrpcRouteMetadataInvert :: Maybe (Val Bool)- , _appMeshRouteGrpcRouteMetadataMatch :: Maybe AppMeshRouteGrpcRouteMetadataMatchMethod- , _appMeshRouteGrpcRouteMetadataName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcRouteMetadata where- toJSON AppMeshRouteGrpcRouteMetadata{..} =- object $- catMaybes- [ fmap (("Invert",) . toJSON) _appMeshRouteGrpcRouteMetadataInvert- , fmap (("Match",) . toJSON) _appMeshRouteGrpcRouteMetadataMatch- , (Just . ("Name",) . toJSON) _appMeshRouteGrpcRouteMetadataName- ]---- | Constructor for 'AppMeshRouteGrpcRouteMetadata' containing required--- fields as arguments.-appMeshRouteGrpcRouteMetadata- :: Val Text -- ^ 'amrgrmName'- -> AppMeshRouteGrpcRouteMetadata-appMeshRouteGrpcRouteMetadata namearg =- AppMeshRouteGrpcRouteMetadata- { _appMeshRouteGrpcRouteMetadataInvert = Nothing- , _appMeshRouteGrpcRouteMetadataMatch = Nothing- , _appMeshRouteGrpcRouteMetadataName = namearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadata.html#cfn-appmesh-route-grpcroutemetadata-invert-amrgrmInvert :: Lens' AppMeshRouteGrpcRouteMetadata (Maybe (Val Bool))-amrgrmInvert = lens _appMeshRouteGrpcRouteMetadataInvert (\s a -> s { _appMeshRouteGrpcRouteMetadataInvert = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadata.html#cfn-appmesh-route-grpcroutemetadata-match-amrgrmMatch :: Lens' AppMeshRouteGrpcRouteMetadata (Maybe AppMeshRouteGrpcRouteMetadataMatchMethod)-amrgrmMatch = lens _appMeshRouteGrpcRouteMetadataMatch (\s a -> s { _appMeshRouteGrpcRouteMetadataMatch = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadata.html#cfn-appmesh-route-grpcroutemetadata-name-amrgrmName :: Lens' AppMeshRouteGrpcRouteMetadata (Val Text)-amrgrmName = lens _appMeshRouteGrpcRouteMetadataName (\s a -> s { _appMeshRouteGrpcRouteMetadataName = a })
@@ -1,67 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadatamatchmethod.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcRouteMetadataMatchMethod where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteMatchRange---- | Full data type definition for AppMeshRouteGrpcRouteMetadataMatchMethod.--- See 'appMeshRouteGrpcRouteMetadataMatchMethod' for a more convenient--- constructor.-data AppMeshRouteGrpcRouteMetadataMatchMethod =- AppMeshRouteGrpcRouteMetadataMatchMethod- { _appMeshRouteGrpcRouteMetadataMatchMethodExact :: Maybe (Val Text)- , _appMeshRouteGrpcRouteMetadataMatchMethodPrefix :: Maybe (Val Text)- , _appMeshRouteGrpcRouteMetadataMatchMethodRange :: Maybe AppMeshRouteMatchRange- , _appMeshRouteGrpcRouteMetadataMatchMethodRegex :: Maybe (Val Text)- , _appMeshRouteGrpcRouteMetadataMatchMethodSuffix :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcRouteMetadataMatchMethod where- toJSON AppMeshRouteGrpcRouteMetadataMatchMethod{..} =- object $- catMaybes- [ fmap (("Exact",) . toJSON) _appMeshRouteGrpcRouteMetadataMatchMethodExact- , fmap (("Prefix",) . toJSON) _appMeshRouteGrpcRouteMetadataMatchMethodPrefix- , fmap (("Range",) . toJSON) _appMeshRouteGrpcRouteMetadataMatchMethodRange- , fmap (("Regex",) . toJSON) _appMeshRouteGrpcRouteMetadataMatchMethodRegex- , fmap (("Suffix",) . toJSON) _appMeshRouteGrpcRouteMetadataMatchMethodSuffix- ]---- | Constructor for 'AppMeshRouteGrpcRouteMetadataMatchMethod' containing--- required fields as arguments.-appMeshRouteGrpcRouteMetadataMatchMethod- :: AppMeshRouteGrpcRouteMetadataMatchMethod-appMeshRouteGrpcRouteMetadataMatchMethod =- AppMeshRouteGrpcRouteMetadataMatchMethod- { _appMeshRouteGrpcRouteMetadataMatchMethodExact = Nothing- , _appMeshRouteGrpcRouteMetadataMatchMethodPrefix = Nothing- , _appMeshRouteGrpcRouteMetadataMatchMethodRange = Nothing- , _appMeshRouteGrpcRouteMetadataMatchMethodRegex = Nothing- , _appMeshRouteGrpcRouteMetadataMatchMethodSuffix = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadatamatchmethod.html#cfn-appmesh-route-grpcroutemetadatamatchmethod-exact-amrgrmmmExact :: Lens' AppMeshRouteGrpcRouteMetadataMatchMethod (Maybe (Val Text))-amrgrmmmExact = lens _appMeshRouteGrpcRouteMetadataMatchMethodExact (\s a -> s { _appMeshRouteGrpcRouteMetadataMatchMethodExact = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadatamatchmethod.html#cfn-appmesh-route-grpcroutemetadatamatchmethod-prefix-amrgrmmmPrefix :: Lens' AppMeshRouteGrpcRouteMetadataMatchMethod (Maybe (Val Text))-amrgrmmmPrefix = lens _appMeshRouteGrpcRouteMetadataMatchMethodPrefix (\s a -> s { _appMeshRouteGrpcRouteMetadataMatchMethodPrefix = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadatamatchmethod.html#cfn-appmesh-route-grpcroutemetadatamatchmethod-range-amrgrmmmRange :: Lens' AppMeshRouteGrpcRouteMetadataMatchMethod (Maybe AppMeshRouteMatchRange)-amrgrmmmRange = lens _appMeshRouteGrpcRouteMetadataMatchMethodRange (\s a -> s { _appMeshRouteGrpcRouteMetadataMatchMethodRange = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadatamatchmethod.html#cfn-appmesh-route-grpcroutemetadatamatchmethod-regex-amrgrmmmRegex :: Lens' AppMeshRouteGrpcRouteMetadataMatchMethod (Maybe (Val Text))-amrgrmmmRegex = lens _appMeshRouteGrpcRouteMetadataMatchMethodRegex (\s a -> s { _appMeshRouteGrpcRouteMetadataMatchMethodRegex = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpcroutemetadatamatchmethod.html#cfn-appmesh-route-grpcroutemetadatamatchmethod-suffix-amrgrmmmSuffix :: Lens' AppMeshRouteGrpcRouteMetadataMatchMethod (Maybe (Val Text))-amrgrmmmSuffix = lens _appMeshRouteGrpcRouteMetadataMatchMethodSuffix (\s a -> s { _appMeshRouteGrpcRouteMetadataMatchMethodSuffix = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpctimeout.html--module Stratosphere.ResourceProperties.AppMeshRouteGrpcTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteDuration---- | Full data type definition for AppMeshRouteGrpcTimeout. See--- 'appMeshRouteGrpcTimeout' for a more convenient constructor.-data AppMeshRouteGrpcTimeout =- AppMeshRouteGrpcTimeout- { _appMeshRouteGrpcTimeoutIdle :: Maybe AppMeshRouteDuration- , _appMeshRouteGrpcTimeoutPerRequest :: Maybe AppMeshRouteDuration- } deriving (Show, Eq)--instance ToJSON AppMeshRouteGrpcTimeout where- toJSON AppMeshRouteGrpcTimeout{..} =- object $- catMaybes- [ fmap (("Idle",) . toJSON) _appMeshRouteGrpcTimeoutIdle- , fmap (("PerRequest",) . toJSON) _appMeshRouteGrpcTimeoutPerRequest- ]---- | Constructor for 'AppMeshRouteGrpcTimeout' containing required fields as--- arguments.-appMeshRouteGrpcTimeout- :: AppMeshRouteGrpcTimeout-appMeshRouteGrpcTimeout =- AppMeshRouteGrpcTimeout- { _appMeshRouteGrpcTimeoutIdle = Nothing- , _appMeshRouteGrpcTimeoutPerRequest = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpctimeout.html#cfn-appmesh-route-grpctimeout-idle-amrgtIdle :: Lens' AppMeshRouteGrpcTimeout (Maybe AppMeshRouteDuration)-amrgtIdle = lens _appMeshRouteGrpcTimeoutIdle (\s a -> s { _appMeshRouteGrpcTimeoutIdle = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-grpctimeout.html#cfn-appmesh-route-grpctimeout-perrequest-amrgtPerRequest :: Lens' AppMeshRouteGrpcTimeout (Maybe AppMeshRouteDuration)-amrgtPerRequest = lens _appMeshRouteGrpcTimeoutPerRequest (\s a -> s { _appMeshRouteGrpcTimeoutPerRequest = a })
@@ -1,66 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-headermatchmethod.html--module Stratosphere.ResourceProperties.AppMeshRouteHeaderMatchMethod where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteMatchRange---- | Full data type definition for AppMeshRouteHeaderMatchMethod. See--- 'appMeshRouteHeaderMatchMethod' for a more convenient constructor.-data AppMeshRouteHeaderMatchMethod =- AppMeshRouteHeaderMatchMethod- { _appMeshRouteHeaderMatchMethodExact :: Maybe (Val Text)- , _appMeshRouteHeaderMatchMethodPrefix :: Maybe (Val Text)- , _appMeshRouteHeaderMatchMethodRange :: Maybe AppMeshRouteMatchRange- , _appMeshRouteHeaderMatchMethodRegex :: Maybe (Val Text)- , _appMeshRouteHeaderMatchMethodSuffix :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHeaderMatchMethod where- toJSON AppMeshRouteHeaderMatchMethod{..} =- object $- catMaybes- [ fmap (("Exact",) . toJSON) _appMeshRouteHeaderMatchMethodExact- , fmap (("Prefix",) . toJSON) _appMeshRouteHeaderMatchMethodPrefix- , fmap (("Range",) . toJSON) _appMeshRouteHeaderMatchMethodRange- , fmap (("Regex",) . toJSON) _appMeshRouteHeaderMatchMethodRegex- , fmap (("Suffix",) . toJSON) _appMeshRouteHeaderMatchMethodSuffix- ]---- | Constructor for 'AppMeshRouteHeaderMatchMethod' containing required--- fields as arguments.-appMeshRouteHeaderMatchMethod- :: AppMeshRouteHeaderMatchMethod-appMeshRouteHeaderMatchMethod =- AppMeshRouteHeaderMatchMethod- { _appMeshRouteHeaderMatchMethodExact = Nothing- , _appMeshRouteHeaderMatchMethodPrefix = Nothing- , _appMeshRouteHeaderMatchMethodRange = Nothing- , _appMeshRouteHeaderMatchMethodRegex = Nothing- , _appMeshRouteHeaderMatchMethodSuffix = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-headermatchmethod.html#cfn-appmesh-route-headermatchmethod-exact-amrhmmExact :: Lens' AppMeshRouteHeaderMatchMethod (Maybe (Val Text))-amrhmmExact = lens _appMeshRouteHeaderMatchMethodExact (\s a -> s { _appMeshRouteHeaderMatchMethodExact = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-headermatchmethod.html#cfn-appmesh-route-headermatchmethod-prefix-amrhmmPrefix :: Lens' AppMeshRouteHeaderMatchMethod (Maybe (Val Text))-amrhmmPrefix = lens _appMeshRouteHeaderMatchMethodPrefix (\s a -> s { _appMeshRouteHeaderMatchMethodPrefix = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-headermatchmethod.html#cfn-appmesh-route-headermatchmethod-range-amrhmmRange :: Lens' AppMeshRouteHeaderMatchMethod (Maybe AppMeshRouteMatchRange)-amrhmmRange = lens _appMeshRouteHeaderMatchMethodRange (\s a -> s { _appMeshRouteHeaderMatchMethodRange = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-headermatchmethod.html#cfn-appmesh-route-headermatchmethod-regex-amrhmmRegex :: Lens' AppMeshRouteHeaderMatchMethod (Maybe (Val Text))-amrhmmRegex = lens _appMeshRouteHeaderMatchMethodRegex (\s a -> s { _appMeshRouteHeaderMatchMethodRegex = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-headermatchmethod.html#cfn-appmesh-route-headermatchmethod-suffix-amrhmmSuffix :: Lens' AppMeshRouteHeaderMatchMethod (Maybe (Val Text))-amrhmmSuffix = lens _appMeshRouteHeaderMatchMethodSuffix (\s a -> s { _appMeshRouteHeaderMatchMethodSuffix = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httpretrypolicy.html--module Stratosphere.ResourceProperties.AppMeshRouteHttpRetryPolicy where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteDuration---- | Full data type definition for AppMeshRouteHttpRetryPolicy. See--- 'appMeshRouteHttpRetryPolicy' for a more convenient constructor.-data AppMeshRouteHttpRetryPolicy =- AppMeshRouteHttpRetryPolicy- { _appMeshRouteHttpRetryPolicyHttpRetryEvents :: Maybe (ValList Text)- , _appMeshRouteHttpRetryPolicyMaxRetries :: Val Integer- , _appMeshRouteHttpRetryPolicyPerRetryTimeout :: AppMeshRouteDuration- , _appMeshRouteHttpRetryPolicyTcpRetryEvents :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHttpRetryPolicy where- toJSON AppMeshRouteHttpRetryPolicy{..} =- object $- catMaybes- [ fmap (("HttpRetryEvents",) . toJSON) _appMeshRouteHttpRetryPolicyHttpRetryEvents- , (Just . ("MaxRetries",) . toJSON) _appMeshRouteHttpRetryPolicyMaxRetries- , (Just . ("PerRetryTimeout",) . toJSON) _appMeshRouteHttpRetryPolicyPerRetryTimeout- , fmap (("TcpRetryEvents",) . toJSON) _appMeshRouteHttpRetryPolicyTcpRetryEvents- ]---- | Constructor for 'AppMeshRouteHttpRetryPolicy' containing required fields--- as arguments.-appMeshRouteHttpRetryPolicy- :: Val Integer -- ^ 'amrhrpMaxRetries'- -> AppMeshRouteDuration -- ^ 'amrhrpPerRetryTimeout'- -> AppMeshRouteHttpRetryPolicy-appMeshRouteHttpRetryPolicy maxRetriesarg perRetryTimeoutarg =- AppMeshRouteHttpRetryPolicy- { _appMeshRouteHttpRetryPolicyHttpRetryEvents = Nothing- , _appMeshRouteHttpRetryPolicyMaxRetries = maxRetriesarg- , _appMeshRouteHttpRetryPolicyPerRetryTimeout = perRetryTimeoutarg- , _appMeshRouteHttpRetryPolicyTcpRetryEvents = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httpretrypolicy.html#cfn-appmesh-route-httpretrypolicy-httpretryevents-amrhrpHttpRetryEvents :: Lens' AppMeshRouteHttpRetryPolicy (Maybe (ValList Text))-amrhrpHttpRetryEvents = lens _appMeshRouteHttpRetryPolicyHttpRetryEvents (\s a -> s { _appMeshRouteHttpRetryPolicyHttpRetryEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httpretrypolicy.html#cfn-appmesh-route-httpretrypolicy-maxretries-amrhrpMaxRetries :: Lens' AppMeshRouteHttpRetryPolicy (Val Integer)-amrhrpMaxRetries = lens _appMeshRouteHttpRetryPolicyMaxRetries (\s a -> s { _appMeshRouteHttpRetryPolicyMaxRetries = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httpretrypolicy.html#cfn-appmesh-route-httpretrypolicy-perretrytimeout-amrhrpPerRetryTimeout :: Lens' AppMeshRouteHttpRetryPolicy AppMeshRouteDuration-amrhrpPerRetryTimeout = lens _appMeshRouteHttpRetryPolicyPerRetryTimeout (\s a -> s { _appMeshRouteHttpRetryPolicyPerRetryTimeout = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httpretrypolicy.html#cfn-appmesh-route-httpretrypolicy-tcpretryevents-amrhrpTcpRetryEvents :: Lens' AppMeshRouteHttpRetryPolicy (Maybe (ValList Text))-amrhrpTcpRetryEvents = lens _appMeshRouteHttpRetryPolicyTcpRetryEvents (\s a -> s { _appMeshRouteHttpRetryPolicyTcpRetryEvents = a })
@@ -1,64 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproute.html--module Stratosphere.ResourceProperties.AppMeshRouteHttpRoute where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteHttpRouteAction-import Stratosphere.ResourceProperties.AppMeshRouteHttpRouteMatch-import Stratosphere.ResourceProperties.AppMeshRouteHttpRetryPolicy-import Stratosphere.ResourceProperties.AppMeshRouteHttpTimeout---- | Full data type definition for AppMeshRouteHttpRoute. See--- 'appMeshRouteHttpRoute' for a more convenient constructor.-data AppMeshRouteHttpRoute =- AppMeshRouteHttpRoute- { _appMeshRouteHttpRouteAction :: AppMeshRouteHttpRouteAction- , _appMeshRouteHttpRouteMatch :: AppMeshRouteHttpRouteMatch- , _appMeshRouteHttpRouteRetryPolicy :: Maybe AppMeshRouteHttpRetryPolicy- , _appMeshRouteHttpRouteTimeout :: Maybe AppMeshRouteHttpTimeout- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHttpRoute where- toJSON AppMeshRouteHttpRoute{..} =- object $- catMaybes- [ (Just . ("Action",) . toJSON) _appMeshRouteHttpRouteAction- , (Just . ("Match",) . toJSON) _appMeshRouteHttpRouteMatch- , fmap (("RetryPolicy",) . toJSON) _appMeshRouteHttpRouteRetryPolicy- , fmap (("Timeout",) . toJSON) _appMeshRouteHttpRouteTimeout- ]---- | Constructor for 'AppMeshRouteHttpRoute' containing required fields as--- arguments.-appMeshRouteHttpRoute- :: AppMeshRouteHttpRouteAction -- ^ 'amrhrAction'- -> AppMeshRouteHttpRouteMatch -- ^ 'amrhrMatch'- -> AppMeshRouteHttpRoute-appMeshRouteHttpRoute actionarg matcharg =- AppMeshRouteHttpRoute- { _appMeshRouteHttpRouteAction = actionarg- , _appMeshRouteHttpRouteMatch = matcharg- , _appMeshRouteHttpRouteRetryPolicy = Nothing- , _appMeshRouteHttpRouteTimeout = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproute.html#cfn-appmesh-route-httproute-action-amrhrAction :: Lens' AppMeshRouteHttpRoute AppMeshRouteHttpRouteAction-amrhrAction = lens _appMeshRouteHttpRouteAction (\s a -> s { _appMeshRouteHttpRouteAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproute.html#cfn-appmesh-route-httproute-match-amrhrMatch :: Lens' AppMeshRouteHttpRoute AppMeshRouteHttpRouteMatch-amrhrMatch = lens _appMeshRouteHttpRouteMatch (\s a -> s { _appMeshRouteHttpRouteMatch = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproute.html#cfn-appmesh-route-httproute-retrypolicy-amrhrRetryPolicy :: Lens' AppMeshRouteHttpRoute (Maybe AppMeshRouteHttpRetryPolicy)-amrhrRetryPolicy = lens _appMeshRouteHttpRouteRetryPolicy (\s a -> s { _appMeshRouteHttpRouteRetryPolicy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproute.html#cfn-appmesh-route-httproute-timeout-amrhrTimeout :: Lens' AppMeshRouteHttpRoute (Maybe AppMeshRouteHttpTimeout)-amrhrTimeout = lens _appMeshRouteHttpRouteTimeout (\s a -> s { _appMeshRouteHttpRouteTimeout = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httprouteaction.html--module Stratosphere.ResourceProperties.AppMeshRouteHttpRouteAction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteWeightedTarget---- | Full data type definition for AppMeshRouteHttpRouteAction. See--- 'appMeshRouteHttpRouteAction' for a more convenient constructor.-data AppMeshRouteHttpRouteAction =- AppMeshRouteHttpRouteAction- { _appMeshRouteHttpRouteActionWeightedTargets :: [AppMeshRouteWeightedTarget]- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHttpRouteAction where- toJSON AppMeshRouteHttpRouteAction{..} =- object $- catMaybes- [ (Just . ("WeightedTargets",) . toJSON) _appMeshRouteHttpRouteActionWeightedTargets- ]---- | Constructor for 'AppMeshRouteHttpRouteAction' containing required fields--- as arguments.-appMeshRouteHttpRouteAction- :: [AppMeshRouteWeightedTarget] -- ^ 'amrhraWeightedTargets'- -> AppMeshRouteHttpRouteAction-appMeshRouteHttpRouteAction weightedTargetsarg =- AppMeshRouteHttpRouteAction- { _appMeshRouteHttpRouteActionWeightedTargets = weightedTargetsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httprouteaction.html#cfn-appmesh-route-httprouteaction-weightedtargets-amrhraWeightedTargets :: Lens' AppMeshRouteHttpRouteAction [AppMeshRouteWeightedTarget]-amrhraWeightedTargets = lens _appMeshRouteHttpRouteActionWeightedTargets (\s a -> s { _appMeshRouteHttpRouteActionWeightedTargets = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httprouteheader.html--module Stratosphere.ResourceProperties.AppMeshRouteHttpRouteHeader where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteHeaderMatchMethod---- | Full data type definition for AppMeshRouteHttpRouteHeader. See--- 'appMeshRouteHttpRouteHeader' for a more convenient constructor.-data AppMeshRouteHttpRouteHeader =- AppMeshRouteHttpRouteHeader- { _appMeshRouteHttpRouteHeaderInvert :: Maybe (Val Bool)- , _appMeshRouteHttpRouteHeaderMatch :: Maybe AppMeshRouteHeaderMatchMethod- , _appMeshRouteHttpRouteHeaderName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHttpRouteHeader where- toJSON AppMeshRouteHttpRouteHeader{..} =- object $- catMaybes- [ fmap (("Invert",) . toJSON) _appMeshRouteHttpRouteHeaderInvert- , fmap (("Match",) . toJSON) _appMeshRouteHttpRouteHeaderMatch- , (Just . ("Name",) . toJSON) _appMeshRouteHttpRouteHeaderName- ]---- | Constructor for 'AppMeshRouteHttpRouteHeader' containing required fields--- as arguments.-appMeshRouteHttpRouteHeader- :: Val Text -- ^ 'amrhrhName'- -> AppMeshRouteHttpRouteHeader-appMeshRouteHttpRouteHeader namearg =- AppMeshRouteHttpRouteHeader- { _appMeshRouteHttpRouteHeaderInvert = Nothing- , _appMeshRouteHttpRouteHeaderMatch = Nothing- , _appMeshRouteHttpRouteHeaderName = namearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httprouteheader.html#cfn-appmesh-route-httprouteheader-invert-amrhrhInvert :: Lens' AppMeshRouteHttpRouteHeader (Maybe (Val Bool))-amrhrhInvert = lens _appMeshRouteHttpRouteHeaderInvert (\s a -> s { _appMeshRouteHttpRouteHeaderInvert = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httprouteheader.html#cfn-appmesh-route-httprouteheader-match-amrhrhMatch :: Lens' AppMeshRouteHttpRouteHeader (Maybe AppMeshRouteHeaderMatchMethod)-amrhrhMatch = lens _appMeshRouteHttpRouteHeaderMatch (\s a -> s { _appMeshRouteHttpRouteHeaderMatch = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httprouteheader.html#cfn-appmesh-route-httprouteheader-name-amrhrhName :: Lens' AppMeshRouteHttpRouteHeader (Val Text)-amrhrhName = lens _appMeshRouteHttpRouteHeaderName (\s a -> s { _appMeshRouteHttpRouteHeaderName = a })
@@ -1,60 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproutematch.html--module Stratosphere.ResourceProperties.AppMeshRouteHttpRouteMatch where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteHttpRouteHeader---- | Full data type definition for AppMeshRouteHttpRouteMatch. See--- 'appMeshRouteHttpRouteMatch' for a more convenient constructor.-data AppMeshRouteHttpRouteMatch =- AppMeshRouteHttpRouteMatch- { _appMeshRouteHttpRouteMatchHeaders :: Maybe [AppMeshRouteHttpRouteHeader]- , _appMeshRouteHttpRouteMatchMethod :: Maybe (Val Text)- , _appMeshRouteHttpRouteMatchPrefix :: Val Text- , _appMeshRouteHttpRouteMatchScheme :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHttpRouteMatch where- toJSON AppMeshRouteHttpRouteMatch{..} =- object $- catMaybes- [ fmap (("Headers",) . toJSON) _appMeshRouteHttpRouteMatchHeaders- , fmap (("Method",) . toJSON) _appMeshRouteHttpRouteMatchMethod- , (Just . ("Prefix",) . toJSON) _appMeshRouteHttpRouteMatchPrefix- , fmap (("Scheme",) . toJSON) _appMeshRouteHttpRouteMatchScheme- ]---- | Constructor for 'AppMeshRouteHttpRouteMatch' containing required fields--- as arguments.-appMeshRouteHttpRouteMatch- :: Val Text -- ^ 'amrhrmPrefix'- -> AppMeshRouteHttpRouteMatch-appMeshRouteHttpRouteMatch prefixarg =- AppMeshRouteHttpRouteMatch- { _appMeshRouteHttpRouteMatchHeaders = Nothing- , _appMeshRouteHttpRouteMatchMethod = Nothing- , _appMeshRouteHttpRouteMatchPrefix = prefixarg- , _appMeshRouteHttpRouteMatchScheme = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproutematch.html#cfn-appmesh-route-httproutematch-headers-amrhrmHeaders :: Lens' AppMeshRouteHttpRouteMatch (Maybe [AppMeshRouteHttpRouteHeader])-amrhrmHeaders = lens _appMeshRouteHttpRouteMatchHeaders (\s a -> s { _appMeshRouteHttpRouteMatchHeaders = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproutematch.html#cfn-appmesh-route-httproutematch-method-amrhrmMethod :: Lens' AppMeshRouteHttpRouteMatch (Maybe (Val Text))-amrhrmMethod = lens _appMeshRouteHttpRouteMatchMethod (\s a -> s { _appMeshRouteHttpRouteMatchMethod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproutematch.html#cfn-appmesh-route-httproutematch-prefix-amrhrmPrefix :: Lens' AppMeshRouteHttpRouteMatch (Val Text)-amrhrmPrefix = lens _appMeshRouteHttpRouteMatchPrefix (\s a -> s { _appMeshRouteHttpRouteMatchPrefix = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httproutematch.html#cfn-appmesh-route-httproutematch-scheme-amrhrmScheme :: Lens' AppMeshRouteHttpRouteMatch (Maybe (Val Text))-amrhrmScheme = lens _appMeshRouteHttpRouteMatchScheme (\s a -> s { _appMeshRouteHttpRouteMatchScheme = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httptimeout.html--module Stratosphere.ResourceProperties.AppMeshRouteHttpTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteDuration---- | Full data type definition for AppMeshRouteHttpTimeout. See--- 'appMeshRouteHttpTimeout' for a more convenient constructor.-data AppMeshRouteHttpTimeout =- AppMeshRouteHttpTimeout- { _appMeshRouteHttpTimeoutIdle :: Maybe AppMeshRouteDuration- , _appMeshRouteHttpTimeoutPerRequest :: Maybe AppMeshRouteDuration- } deriving (Show, Eq)--instance ToJSON AppMeshRouteHttpTimeout where- toJSON AppMeshRouteHttpTimeout{..} =- object $- catMaybes- [ fmap (("Idle",) . toJSON) _appMeshRouteHttpTimeoutIdle- , fmap (("PerRequest",) . toJSON) _appMeshRouteHttpTimeoutPerRequest- ]---- | Constructor for 'AppMeshRouteHttpTimeout' containing required fields as--- arguments.-appMeshRouteHttpTimeout- :: AppMeshRouteHttpTimeout-appMeshRouteHttpTimeout =- AppMeshRouteHttpTimeout- { _appMeshRouteHttpTimeoutIdle = Nothing- , _appMeshRouteHttpTimeoutPerRequest = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httptimeout.html#cfn-appmesh-route-httptimeout-idle-amrhtIdle :: Lens' AppMeshRouteHttpTimeout (Maybe AppMeshRouteDuration)-amrhtIdle = lens _appMeshRouteHttpTimeoutIdle (\s a -> s { _appMeshRouteHttpTimeoutIdle = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-httptimeout.html#cfn-appmesh-route-httptimeout-perrequest-amrhtPerRequest :: Lens' AppMeshRouteHttpTimeout (Maybe AppMeshRouteDuration)-amrhtPerRequest = lens _appMeshRouteHttpTimeoutPerRequest (\s a -> s { _appMeshRouteHttpTimeoutPerRequest = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-matchrange.html--module Stratosphere.ResourceProperties.AppMeshRouteMatchRange where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshRouteMatchRange. See--- 'appMeshRouteMatchRange' for a more convenient constructor.-data AppMeshRouteMatchRange =- AppMeshRouteMatchRange- { _appMeshRouteMatchRangeEnd :: Val Integer- , _appMeshRouteMatchRangeStart :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppMeshRouteMatchRange where- toJSON AppMeshRouteMatchRange{..} =- object $- catMaybes- [ (Just . ("End",) . toJSON) _appMeshRouteMatchRangeEnd- , (Just . ("Start",) . toJSON) _appMeshRouteMatchRangeStart- ]---- | Constructor for 'AppMeshRouteMatchRange' containing required fields as--- arguments.-appMeshRouteMatchRange- :: Val Integer -- ^ 'amrmrEnd'- -> Val Integer -- ^ 'amrmrStart'- -> AppMeshRouteMatchRange-appMeshRouteMatchRange endarg startarg =- AppMeshRouteMatchRange- { _appMeshRouteMatchRangeEnd = endarg- , _appMeshRouteMatchRangeStart = startarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-matchrange.html#cfn-appmesh-route-matchrange-end-amrmrEnd :: Lens' AppMeshRouteMatchRange (Val Integer)-amrmrEnd = lens _appMeshRouteMatchRangeEnd (\s a -> s { _appMeshRouteMatchRangeEnd = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-matchrange.html#cfn-appmesh-route-matchrange-start-amrmrStart :: Lens' AppMeshRouteMatchRange (Val Integer)-amrmrStart = lens _appMeshRouteMatchRangeStart (\s a -> s { _appMeshRouteMatchRangeStart = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-routespec.html--module Stratosphere.ResourceProperties.AppMeshRouteRouteSpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteGrpcRoute-import Stratosphere.ResourceProperties.AppMeshRouteHttpRoute-import Stratosphere.ResourceProperties.AppMeshRouteTcpRoute---- | Full data type definition for AppMeshRouteRouteSpec. See--- 'appMeshRouteRouteSpec' for a more convenient constructor.-data AppMeshRouteRouteSpec =- AppMeshRouteRouteSpec- { _appMeshRouteRouteSpecGrpcRoute :: Maybe AppMeshRouteGrpcRoute- , _appMeshRouteRouteSpecHttp2Route :: Maybe AppMeshRouteHttpRoute- , _appMeshRouteRouteSpecHttpRoute :: Maybe AppMeshRouteHttpRoute- , _appMeshRouteRouteSpecPriority :: Maybe (Val Integer)- , _appMeshRouteRouteSpecTcpRoute :: Maybe AppMeshRouteTcpRoute- } deriving (Show, Eq)--instance ToJSON AppMeshRouteRouteSpec where- toJSON AppMeshRouteRouteSpec{..} =- object $- catMaybes- [ fmap (("GrpcRoute",) . toJSON) _appMeshRouteRouteSpecGrpcRoute- , fmap (("Http2Route",) . toJSON) _appMeshRouteRouteSpecHttp2Route- , fmap (("HttpRoute",) . toJSON) _appMeshRouteRouteSpecHttpRoute- , fmap (("Priority",) . toJSON) _appMeshRouteRouteSpecPriority- , fmap (("TcpRoute",) . toJSON) _appMeshRouteRouteSpecTcpRoute- ]---- | Constructor for 'AppMeshRouteRouteSpec' containing required fields as--- arguments.-appMeshRouteRouteSpec- :: AppMeshRouteRouteSpec-appMeshRouteRouteSpec =- AppMeshRouteRouteSpec- { _appMeshRouteRouteSpecGrpcRoute = Nothing- , _appMeshRouteRouteSpecHttp2Route = Nothing- , _appMeshRouteRouteSpecHttpRoute = Nothing- , _appMeshRouteRouteSpecPriority = Nothing- , _appMeshRouteRouteSpecTcpRoute = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-routespec.html#cfn-appmesh-route-routespec-grpcroute-amrrsGrpcRoute :: Lens' AppMeshRouteRouteSpec (Maybe AppMeshRouteGrpcRoute)-amrrsGrpcRoute = lens _appMeshRouteRouteSpecGrpcRoute (\s a -> s { _appMeshRouteRouteSpecGrpcRoute = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-routespec.html#cfn-appmesh-route-routespec-http2route-amrrsHttp2Route :: Lens' AppMeshRouteRouteSpec (Maybe AppMeshRouteHttpRoute)-amrrsHttp2Route = lens _appMeshRouteRouteSpecHttp2Route (\s a -> s { _appMeshRouteRouteSpecHttp2Route = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-routespec.html#cfn-appmesh-route-routespec-httproute-amrrsHttpRoute :: Lens' AppMeshRouteRouteSpec (Maybe AppMeshRouteHttpRoute)-amrrsHttpRoute = lens _appMeshRouteRouteSpecHttpRoute (\s a -> s { _appMeshRouteRouteSpecHttpRoute = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-routespec.html#cfn-appmesh-route-routespec-priority-amrrsPriority :: Lens' AppMeshRouteRouteSpec (Maybe (Val Integer))-amrrsPriority = lens _appMeshRouteRouteSpecPriority (\s a -> s { _appMeshRouteRouteSpecPriority = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-routespec.html#cfn-appmesh-route-routespec-tcproute-amrrsTcpRoute :: Lens' AppMeshRouteRouteSpec (Maybe AppMeshRouteTcpRoute)-amrrsTcpRoute = lens _appMeshRouteRouteSpecTcpRoute (\s a -> s { _appMeshRouteRouteSpecTcpRoute = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcproute.html--module Stratosphere.ResourceProperties.AppMeshRouteTcpRoute where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteTcpRouteAction-import Stratosphere.ResourceProperties.AppMeshRouteTcpTimeout---- | Full data type definition for AppMeshRouteTcpRoute. See--- 'appMeshRouteTcpRoute' for a more convenient constructor.-data AppMeshRouteTcpRoute =- AppMeshRouteTcpRoute- { _appMeshRouteTcpRouteAction :: AppMeshRouteTcpRouteAction- , _appMeshRouteTcpRouteTimeout :: Maybe AppMeshRouteTcpTimeout- } deriving (Show, Eq)--instance ToJSON AppMeshRouteTcpRoute where- toJSON AppMeshRouteTcpRoute{..} =- object $- catMaybes- [ (Just . ("Action",) . toJSON) _appMeshRouteTcpRouteAction- , fmap (("Timeout",) . toJSON) _appMeshRouteTcpRouteTimeout- ]---- | Constructor for 'AppMeshRouteTcpRoute' containing required fields as--- arguments.-appMeshRouteTcpRoute- :: AppMeshRouteTcpRouteAction -- ^ 'amrtrAction'- -> AppMeshRouteTcpRoute-appMeshRouteTcpRoute actionarg =- AppMeshRouteTcpRoute- { _appMeshRouteTcpRouteAction = actionarg- , _appMeshRouteTcpRouteTimeout = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcproute.html#cfn-appmesh-route-tcproute-action-amrtrAction :: Lens' AppMeshRouteTcpRoute AppMeshRouteTcpRouteAction-amrtrAction = lens _appMeshRouteTcpRouteAction (\s a -> s { _appMeshRouteTcpRouteAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcproute.html#cfn-appmesh-route-tcproute-timeout-amrtrTimeout :: Lens' AppMeshRouteTcpRoute (Maybe AppMeshRouteTcpTimeout)-amrtrTimeout = lens _appMeshRouteTcpRouteTimeout (\s a -> s { _appMeshRouteTcpRouteTimeout = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcprouteaction.html--module Stratosphere.ResourceProperties.AppMeshRouteTcpRouteAction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteWeightedTarget---- | Full data type definition for AppMeshRouteTcpRouteAction. See--- 'appMeshRouteTcpRouteAction' for a more convenient constructor.-data AppMeshRouteTcpRouteAction =- AppMeshRouteTcpRouteAction- { _appMeshRouteTcpRouteActionWeightedTargets :: [AppMeshRouteWeightedTarget]- } deriving (Show, Eq)--instance ToJSON AppMeshRouteTcpRouteAction where- toJSON AppMeshRouteTcpRouteAction{..} =- object $- catMaybes- [ (Just . ("WeightedTargets",) . toJSON) _appMeshRouteTcpRouteActionWeightedTargets- ]---- | Constructor for 'AppMeshRouteTcpRouteAction' containing required fields--- as arguments.-appMeshRouteTcpRouteAction- :: [AppMeshRouteWeightedTarget] -- ^ 'amrtraWeightedTargets'- -> AppMeshRouteTcpRouteAction-appMeshRouteTcpRouteAction weightedTargetsarg =- AppMeshRouteTcpRouteAction- { _appMeshRouteTcpRouteActionWeightedTargets = weightedTargetsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcprouteaction.html#cfn-appmesh-route-tcprouteaction-weightedtargets-amrtraWeightedTargets :: Lens' AppMeshRouteTcpRouteAction [AppMeshRouteWeightedTarget]-amrtraWeightedTargets = lens _appMeshRouteTcpRouteActionWeightedTargets (\s a -> s { _appMeshRouteTcpRouteActionWeightedTargets = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcptimeout.html--module Stratosphere.ResourceProperties.AppMeshRouteTcpTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshRouteDuration---- | Full data type definition for AppMeshRouteTcpTimeout. See--- 'appMeshRouteTcpTimeout' for a more convenient constructor.-data AppMeshRouteTcpTimeout =- AppMeshRouteTcpTimeout- { _appMeshRouteTcpTimeoutIdle :: Maybe AppMeshRouteDuration- } deriving (Show, Eq)--instance ToJSON AppMeshRouteTcpTimeout where- toJSON AppMeshRouteTcpTimeout{..} =- object $- catMaybes- [ fmap (("Idle",) . toJSON) _appMeshRouteTcpTimeoutIdle- ]---- | Constructor for 'AppMeshRouteTcpTimeout' containing required fields as--- arguments.-appMeshRouteTcpTimeout- :: AppMeshRouteTcpTimeout-appMeshRouteTcpTimeout =- AppMeshRouteTcpTimeout- { _appMeshRouteTcpTimeoutIdle = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-tcptimeout.html#cfn-appmesh-route-tcptimeout-idle-amrttIdle :: Lens' AppMeshRouteTcpTimeout (Maybe AppMeshRouteDuration)-amrttIdle = lens _appMeshRouteTcpTimeoutIdle (\s a -> s { _appMeshRouteTcpTimeoutIdle = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-weightedtarget.html--module Stratosphere.ResourceProperties.AppMeshRouteWeightedTarget where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshRouteWeightedTarget. See--- 'appMeshRouteWeightedTarget' for a more convenient constructor.-data AppMeshRouteWeightedTarget =- AppMeshRouteWeightedTarget- { _appMeshRouteWeightedTargetVirtualNode :: Val Text- , _appMeshRouteWeightedTargetWeight :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppMeshRouteWeightedTarget where- toJSON AppMeshRouteWeightedTarget{..} =- object $- catMaybes- [ (Just . ("VirtualNode",) . toJSON) _appMeshRouteWeightedTargetVirtualNode- , (Just . ("Weight",) . toJSON) _appMeshRouteWeightedTargetWeight- ]---- | Constructor for 'AppMeshRouteWeightedTarget' containing required fields--- as arguments.-appMeshRouteWeightedTarget- :: Val Text -- ^ 'amrwtVirtualNode'- -> Val Integer -- ^ 'amrwtWeight'- -> AppMeshRouteWeightedTarget-appMeshRouteWeightedTarget virtualNodearg weightarg =- AppMeshRouteWeightedTarget- { _appMeshRouteWeightedTargetVirtualNode = virtualNodearg- , _appMeshRouteWeightedTargetWeight = weightarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-weightedtarget.html#cfn-appmesh-route-weightedtarget-virtualnode-amrwtVirtualNode :: Lens' AppMeshRouteWeightedTarget (Val Text)-amrwtVirtualNode = lens _appMeshRouteWeightedTargetVirtualNode (\s a -> s { _appMeshRouteWeightedTargetVirtualNode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-route-weightedtarget.html#cfn-appmesh-route-weightedtarget-weight-amrwtWeight :: Lens' AppMeshRouteWeightedTarget (Val Integer)-amrwtWeight = lens _appMeshRouteWeightedTargetWeight (\s a -> s { _appMeshRouteWeightedTargetWeight = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayaccesslog.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayAccessLog where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayFileAccessLog---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayAccessLog. See--- 'appMeshVirtualGatewayVirtualGatewayAccessLog' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayAccessLog =- AppMeshVirtualGatewayVirtualGatewayAccessLog- { _appMeshVirtualGatewayVirtualGatewayAccessLogFile :: Maybe AppMeshVirtualGatewayVirtualGatewayFileAccessLog- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayAccessLog where- toJSON AppMeshVirtualGatewayVirtualGatewayAccessLog{..} =- object $- catMaybes- [ fmap (("File",) . toJSON) _appMeshVirtualGatewayVirtualGatewayAccessLogFile- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayAccessLog' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewayAccessLog- :: AppMeshVirtualGatewayVirtualGatewayAccessLog-appMeshVirtualGatewayVirtualGatewayAccessLog =- AppMeshVirtualGatewayVirtualGatewayAccessLog- { _appMeshVirtualGatewayVirtualGatewayAccessLogFile = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayaccesslog.html#cfn-appmesh-virtualgateway-virtualgatewayaccesslog-file-amvgvgalFile :: Lens' AppMeshVirtualGatewayVirtualGatewayAccessLog (Maybe AppMeshVirtualGatewayVirtualGatewayFileAccessLog)-amvgvgalFile = lens _appMeshVirtualGatewayVirtualGatewayAccessLogFile (\s a -> s { _appMeshVirtualGatewayVirtualGatewayAccessLogFile = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaybackenddefaults.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayBackendDefaults where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayClientPolicy---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayBackendDefaults. See--- 'appMeshVirtualGatewayVirtualGatewayBackendDefaults' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayBackendDefaults =- AppMeshVirtualGatewayVirtualGatewayBackendDefaults- { _appMeshVirtualGatewayVirtualGatewayBackendDefaultsClientPolicy :: Maybe AppMeshVirtualGatewayVirtualGatewayClientPolicy- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayBackendDefaults where- toJSON AppMeshVirtualGatewayVirtualGatewayBackendDefaults{..} =- object $- catMaybes- [ fmap (("ClientPolicy",) . toJSON) _appMeshVirtualGatewayVirtualGatewayBackendDefaultsClientPolicy- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayBackendDefaults'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayBackendDefaults- :: AppMeshVirtualGatewayVirtualGatewayBackendDefaults-appMeshVirtualGatewayVirtualGatewayBackendDefaults =- AppMeshVirtualGatewayVirtualGatewayBackendDefaults- { _appMeshVirtualGatewayVirtualGatewayBackendDefaultsClientPolicy = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaybackenddefaults.html#cfn-appmesh-virtualgateway-virtualgatewaybackenddefaults-clientpolicy-amvgvgbdClientPolicy :: Lens' AppMeshVirtualGatewayVirtualGatewayBackendDefaults (Maybe AppMeshVirtualGatewayVirtualGatewayClientPolicy)-amvgvgbdClientPolicy = lens _appMeshVirtualGatewayVirtualGatewayBackendDefaultsClientPolicy (\s a -> s { _appMeshVirtualGatewayVirtualGatewayBackendDefaultsClientPolicy = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayclientpolicy.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayClientPolicy where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayClientPolicyTls---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayClientPolicy. See--- 'appMeshVirtualGatewayVirtualGatewayClientPolicy' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayClientPolicy =- AppMeshVirtualGatewayVirtualGatewayClientPolicy- { _appMeshVirtualGatewayVirtualGatewayClientPolicyTLS :: Maybe AppMeshVirtualGatewayVirtualGatewayClientPolicyTls- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayClientPolicy where- toJSON AppMeshVirtualGatewayVirtualGatewayClientPolicy{..} =- object $- catMaybes- [ fmap (("TLS",) . toJSON) _appMeshVirtualGatewayVirtualGatewayClientPolicyTLS- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayClientPolicy'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayClientPolicy- :: AppMeshVirtualGatewayVirtualGatewayClientPolicy-appMeshVirtualGatewayVirtualGatewayClientPolicy =- AppMeshVirtualGatewayVirtualGatewayClientPolicy- { _appMeshVirtualGatewayVirtualGatewayClientPolicyTLS = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayclientpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayclientpolicy-tls-amvgvgcpTLS :: Lens' AppMeshVirtualGatewayVirtualGatewayClientPolicy (Maybe AppMeshVirtualGatewayVirtualGatewayClientPolicyTls)-amvgvgcpTLS = lens _appMeshVirtualGatewayVirtualGatewayClientPolicyTLS (\s a -> s { _appMeshVirtualGatewayVirtualGatewayClientPolicyTLS = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayclientpolicytls.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayClientPolicyTls where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContext---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayClientPolicyTls. See--- 'appMeshVirtualGatewayVirtualGatewayClientPolicyTls' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayClientPolicyTls =- AppMeshVirtualGatewayVirtualGatewayClientPolicyTls- { _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsEnforce :: Maybe (Val Bool)- , _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsPorts :: Maybe (ValList Integer)- , _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsValidation :: AppMeshVirtualGatewayVirtualGatewayTlsValidationContext- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayClientPolicyTls where- toJSON AppMeshVirtualGatewayVirtualGatewayClientPolicyTls{..} =- object $- catMaybes- [ fmap (("Enforce",) . toJSON) _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsEnforce- , fmap (("Ports",) . toJSON) _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsPorts- , (Just . ("Validation",) . toJSON) _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsValidation- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayClientPolicyTls'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayClientPolicyTls- :: AppMeshVirtualGatewayVirtualGatewayTlsValidationContext -- ^ 'amvgvgcptValidation'- -> AppMeshVirtualGatewayVirtualGatewayClientPolicyTls-appMeshVirtualGatewayVirtualGatewayClientPolicyTls validationarg =- AppMeshVirtualGatewayVirtualGatewayClientPolicyTls- { _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsEnforce = Nothing- , _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsPorts = Nothing- , _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsValidation = validationarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayclientpolicytls.html#cfn-appmesh-virtualgateway-virtualgatewayclientpolicytls-enforce-amvgvgcptEnforce :: Lens' AppMeshVirtualGatewayVirtualGatewayClientPolicyTls (Maybe (Val Bool))-amvgvgcptEnforce = lens _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsEnforce (\s a -> s { _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsEnforce = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayclientpolicytls.html#cfn-appmesh-virtualgateway-virtualgatewayclientpolicytls-ports-amvgvgcptPorts :: Lens' AppMeshVirtualGatewayVirtualGatewayClientPolicyTls (Maybe (ValList Integer))-amvgvgcptPorts = lens _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsPorts (\s a -> s { _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsPorts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayclientpolicytls.html#cfn-appmesh-virtualgateway-virtualgatewayclientpolicytls-validation-amvgvgcptValidation :: Lens' AppMeshVirtualGatewayVirtualGatewayClientPolicyTls AppMeshVirtualGatewayVirtualGatewayTlsValidationContext-amvgvgcptValidation = lens _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsValidation (\s a -> s { _appMeshVirtualGatewayVirtualGatewayClientPolicyTlsValidation = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayfileaccesslog.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayFileAccessLog where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayFileAccessLog. See--- 'appMeshVirtualGatewayVirtualGatewayFileAccessLog' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayFileAccessLog =- AppMeshVirtualGatewayVirtualGatewayFileAccessLog- { _appMeshVirtualGatewayVirtualGatewayFileAccessLogPath :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayFileAccessLog where- toJSON AppMeshVirtualGatewayVirtualGatewayFileAccessLog{..} =- object $- catMaybes- [ (Just . ("Path",) . toJSON) _appMeshVirtualGatewayVirtualGatewayFileAccessLogPath- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayFileAccessLog'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayFileAccessLog- :: Val Text -- ^ 'amvgvgfalPath'- -> AppMeshVirtualGatewayVirtualGatewayFileAccessLog-appMeshVirtualGatewayVirtualGatewayFileAccessLog patharg =- AppMeshVirtualGatewayVirtualGatewayFileAccessLog- { _appMeshVirtualGatewayVirtualGatewayFileAccessLogPath = patharg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayfileaccesslog.html#cfn-appmesh-virtualgateway-virtualgatewayfileaccesslog-path-amvgvgfalPath :: Lens' AppMeshVirtualGatewayVirtualGatewayFileAccessLog (Val Text)-amvgvgfalPath = lens _appMeshVirtualGatewayVirtualGatewayFileAccessLogPath (\s a -> s { _appMeshVirtualGatewayVirtualGatewayFileAccessLogPath = a })
@@ -1,87 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy. See--- 'appMeshVirtualGatewayVirtualGatewayHealthCheckPolicy' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy =- AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy- { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyHealthyThreshold :: Val Integer- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyIntervalMillis :: Val Integer- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPath :: Maybe (Val Text)- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPort :: Maybe (Val Integer)- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyProtocol :: Val Text- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyTimeoutMillis :: Val Integer- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyUnhealthyThreshold :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy where- toJSON AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy{..} =- object $- catMaybes- [ (Just . ("HealthyThreshold",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyHealthyThreshold- , (Just . ("IntervalMillis",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyIntervalMillis- , fmap (("Path",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPath- , fmap (("Port",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPort- , (Just . ("Protocol",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyProtocol- , (Just . ("TimeoutMillis",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyTimeoutMillis- , (Just . ("UnhealthyThreshold",) . toJSON) _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyUnhealthyThreshold- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayHealthCheckPolicy- :: Val Integer -- ^ 'amvgvghcpHealthyThreshold'- -> Val Integer -- ^ 'amvgvghcpIntervalMillis'- -> Val Text -- ^ 'amvgvghcpProtocol'- -> Val Integer -- ^ 'amvgvghcpTimeoutMillis'- -> Val Integer -- ^ 'amvgvghcpUnhealthyThreshold'- -> AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy-appMeshVirtualGatewayVirtualGatewayHealthCheckPolicy healthyThresholdarg intervalMillisarg protocolarg timeoutMillisarg unhealthyThresholdarg =- AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy- { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyHealthyThreshold = healthyThresholdarg- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyIntervalMillis = intervalMillisarg- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPath = Nothing- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPort = Nothing- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyProtocol = protocolarg- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyTimeoutMillis = timeoutMillisarg- , _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyUnhealthyThreshold = unhealthyThresholdarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-healthythreshold-amvgvghcpHealthyThreshold :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Val Integer)-amvgvghcpHealthyThreshold = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyHealthyThreshold (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyHealthyThreshold = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-intervalmillis-amvgvghcpIntervalMillis :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Val Integer)-amvgvghcpIntervalMillis = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyIntervalMillis (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyIntervalMillis = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-path-amvgvghcpPath :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Maybe (Val Text))-amvgvghcpPath = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPath (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-port-amvgvghcpPort :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Maybe (Val Integer))-amvgvghcpPort = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPort (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-protocol-amvgvghcpProtocol :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Val Text)-amvgvghcpProtocol = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyProtocol (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyProtocol = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-timeoutmillis-amvgvghcpTimeoutMillis :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Val Integer)-amvgvghcpTimeoutMillis = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyTimeoutMillis (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyTimeoutMillis = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy.html#cfn-appmesh-virtualgateway-virtualgatewayhealthcheckpolicy-unhealthythreshold-amvgvghcpUnhealthyThreshold :: Lens' AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy (Val Integer)-amvgvghcpUnhealthyThreshold = lens _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyUnhealthyThreshold (\s a -> s { _appMeshVirtualGatewayVirtualGatewayHealthCheckPolicyUnhealthyThreshold = a })
@@ -1,57 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistener.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListener where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayPortMapping-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTls---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayListener. See--- 'appMeshVirtualGatewayVirtualGatewayListener' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayListener =- AppMeshVirtualGatewayVirtualGatewayListener- { _appMeshVirtualGatewayVirtualGatewayListenerHealthCheck :: Maybe AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy- , _appMeshVirtualGatewayVirtualGatewayListenerPortMapping :: AppMeshVirtualGatewayVirtualGatewayPortMapping- , _appMeshVirtualGatewayVirtualGatewayListenerTLS :: Maybe AppMeshVirtualGatewayVirtualGatewayListenerTls- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayListener where- toJSON AppMeshVirtualGatewayVirtualGatewayListener{..} =- object $- catMaybes- [ fmap (("HealthCheck",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerHealthCheck- , (Just . ("PortMapping",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerPortMapping- , fmap (("TLS",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTLS- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayListener' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewayListener- :: AppMeshVirtualGatewayVirtualGatewayPortMapping -- ^ 'amvgvglPortMapping'- -> AppMeshVirtualGatewayVirtualGatewayListener-appMeshVirtualGatewayVirtualGatewayListener portMappingarg =- AppMeshVirtualGatewayVirtualGatewayListener- { _appMeshVirtualGatewayVirtualGatewayListenerHealthCheck = Nothing- , _appMeshVirtualGatewayVirtualGatewayListenerPortMapping = portMappingarg- , _appMeshVirtualGatewayVirtualGatewayListenerTLS = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistener.html#cfn-appmesh-virtualgateway-virtualgatewaylistener-healthcheck-amvgvglHealthCheck :: Lens' AppMeshVirtualGatewayVirtualGatewayListener (Maybe AppMeshVirtualGatewayVirtualGatewayHealthCheckPolicy)-amvgvglHealthCheck = lens _appMeshVirtualGatewayVirtualGatewayListenerHealthCheck (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerHealthCheck = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistener.html#cfn-appmesh-virtualgateway-virtualgatewaylistener-portmapping-amvgvglPortMapping :: Lens' AppMeshVirtualGatewayVirtualGatewayListener AppMeshVirtualGatewayVirtualGatewayPortMapping-amvgvglPortMapping = lens _appMeshVirtualGatewayVirtualGatewayListenerPortMapping (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerPortMapping = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistener.html#cfn-appmesh-virtualgateway-virtualgatewaylistener-tls-amvgvglTLS :: Lens' AppMeshVirtualGatewayVirtualGatewayListener (Maybe AppMeshVirtualGatewayVirtualGatewayListenerTls)-amvgvglTLS = lens _appMeshVirtualGatewayVirtualGatewayListenerTLS (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTLS = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertls.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTls where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayListenerTls. See--- 'appMeshVirtualGatewayVirtualGatewayListenerTls' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayListenerTls =- AppMeshVirtualGatewayVirtualGatewayListenerTls- { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate :: AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate- , _appMeshVirtualGatewayVirtualGatewayListenerTlsMode :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayListenerTls where- toJSON AppMeshVirtualGatewayVirtualGatewayListenerTls{..} =- object $- catMaybes- [ (Just . ("Certificate",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate- , (Just . ("Mode",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsMode- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayListenerTls'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayListenerTls- :: AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate -- ^ 'amvgvgltCertificate'- -> Val Text -- ^ 'amvgvgltMode'- -> AppMeshVirtualGatewayVirtualGatewayListenerTls-appMeshVirtualGatewayVirtualGatewayListenerTls certificatearg modearg =- AppMeshVirtualGatewayVirtualGatewayListenerTls- { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate = certificatearg- , _appMeshVirtualGatewayVirtualGatewayListenerTlsMode = modearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertls.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertls-certificate-amvgvgltCertificate :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTls AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate-amvgvgltCertificate = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertls.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertls-mode-amvgvgltMode :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTls (Val Text)-amvgvgltMode = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsMode (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsMode = a })
@@ -1,42 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlsacmcertificate.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate. See--- 'appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate =- AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate- { _appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificateCertificateArn :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate where- toJSON AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate{..} =- object $- catMaybes- [ (Just . ("CertificateArn",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificateCertificateArn- ]---- | Constructor for--- 'AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate- :: Val Text -- ^ 'amvgvgltacCertificateArn'- -> AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate-appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate certificateArnarg =- AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate- { _appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificateCertificateArn = certificateArnarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlsacmcertificate.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertlsacmcertificate-certificatearn-amvgvgltacCertificateArn :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate (Val Text)-amvgvgltacCertificateArn = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificateCertificateArn (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificateCertificateArn = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlscertificate.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate. See--- 'appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate =- AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate- { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateACM :: Maybe AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate- , _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateFile :: Maybe AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate where- toJSON AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate{..} =- object $- catMaybes- [ fmap (("ACM",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateACM- , fmap (("File",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateFile- ]---- | Constructor for--- 'AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate- :: AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate-appMeshVirtualGatewayVirtualGatewayListenerTlsCertificate =- AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate- { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateACM = Nothing- , _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateFile = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlscertificate.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertlscertificate-acm-amvgvgltcACM :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate (Maybe AppMeshVirtualGatewayVirtualGatewayListenerTlsAcmCertificate)-amvgvgltcACM = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateACM (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateACM = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlscertificate.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertlscertificate-file-amvgvgltcFile :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTlsCertificate (Maybe AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate)-amvgvgltcFile = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateFile (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsCertificateFile = a })
@@ -1,50 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlsfilecertificate.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate. See--- 'appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate' for a--- more convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate =- AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate- { _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificateCertificateChain :: Val Text- , _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificatePrivateKey :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate where- toJSON AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate{..} =- object $- catMaybes- [ (Just . ("CertificateChain",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificateCertificateChain- , (Just . ("PrivateKey",) . toJSON) _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificatePrivateKey- ]---- | Constructor for--- 'AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate- :: Val Text -- ^ 'amvgvgltfcCertificateChain'- -> Val Text -- ^ 'amvgvgltfcPrivateKey'- -> AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate-appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate certificateChainarg privateKeyarg =- AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate- { _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificateCertificateChain = certificateChainarg- , _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificatePrivateKey = privateKeyarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlsfilecertificate.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertlsfilecertificate-certificatechain-amvgvgltfcCertificateChain :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate (Val Text)-amvgvgltfcCertificateChain = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificateCertificateChain (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificateCertificateChain = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylistenertlsfilecertificate.html#cfn-appmesh-virtualgateway-virtualgatewaylistenertlsfilecertificate-privatekey-amvgvgltfcPrivateKey :: Lens' AppMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificate (Val Text)-amvgvgltfcPrivateKey = lens _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificatePrivateKey (\s a -> s { _appMeshVirtualGatewayVirtualGatewayListenerTlsFileCertificatePrivateKey = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylogging.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayLogging where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayAccessLog---- | Full data type definition for AppMeshVirtualGatewayVirtualGatewayLogging.--- See 'appMeshVirtualGatewayVirtualGatewayLogging' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayLogging =- AppMeshVirtualGatewayVirtualGatewayLogging- { _appMeshVirtualGatewayVirtualGatewayLoggingAccessLog :: Maybe AppMeshVirtualGatewayVirtualGatewayAccessLog- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayLogging where- toJSON AppMeshVirtualGatewayVirtualGatewayLogging{..} =- object $- catMaybes- [ fmap (("AccessLog",) . toJSON) _appMeshVirtualGatewayVirtualGatewayLoggingAccessLog- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayLogging' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewayLogging- :: AppMeshVirtualGatewayVirtualGatewayLogging-appMeshVirtualGatewayVirtualGatewayLogging =- AppMeshVirtualGatewayVirtualGatewayLogging- { _appMeshVirtualGatewayVirtualGatewayLoggingAccessLog = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaylogging.html#cfn-appmesh-virtualgateway-virtualgatewaylogging-accesslog-amvgvglAccessLog :: Lens' AppMeshVirtualGatewayVirtualGatewayLogging (Maybe AppMeshVirtualGatewayVirtualGatewayAccessLog)-amvgvglAccessLog = lens _appMeshVirtualGatewayVirtualGatewayLoggingAccessLog (\s a -> s { _appMeshVirtualGatewayVirtualGatewayLoggingAccessLog = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayportmapping.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayPortMapping where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayPortMapping. See--- 'appMeshVirtualGatewayVirtualGatewayPortMapping' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewayPortMapping =- AppMeshVirtualGatewayVirtualGatewayPortMapping- { _appMeshVirtualGatewayVirtualGatewayPortMappingPort :: Val Integer- , _appMeshVirtualGatewayVirtualGatewayPortMappingProtocol :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayPortMapping where- toJSON AppMeshVirtualGatewayVirtualGatewayPortMapping{..} =- object $- catMaybes- [ (Just . ("Port",) . toJSON) _appMeshVirtualGatewayVirtualGatewayPortMappingPort- , (Just . ("Protocol",) . toJSON) _appMeshVirtualGatewayVirtualGatewayPortMappingProtocol- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayPortMapping'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayPortMapping- :: Val Integer -- ^ 'amvgvgpmPort'- -> Val Text -- ^ 'amvgvgpmProtocol'- -> AppMeshVirtualGatewayVirtualGatewayPortMapping-appMeshVirtualGatewayVirtualGatewayPortMapping portarg protocolarg =- AppMeshVirtualGatewayVirtualGatewayPortMapping- { _appMeshVirtualGatewayVirtualGatewayPortMappingPort = portarg- , _appMeshVirtualGatewayVirtualGatewayPortMappingProtocol = protocolarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayportmapping.html#cfn-appmesh-virtualgateway-virtualgatewayportmapping-port-amvgvgpmPort :: Lens' AppMeshVirtualGatewayVirtualGatewayPortMapping (Val Integer)-amvgvgpmPort = lens _appMeshVirtualGatewayVirtualGatewayPortMappingPort (\s a -> s { _appMeshVirtualGatewayVirtualGatewayPortMappingPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayportmapping.html#cfn-appmesh-virtualgateway-virtualgatewayportmapping-protocol-amvgvgpmProtocol :: Lens' AppMeshVirtualGatewayVirtualGatewayPortMapping (Val Text)-amvgvgpmProtocol = lens _appMeshVirtualGatewayVirtualGatewayPortMappingProtocol (\s a -> s { _appMeshVirtualGatewayVirtualGatewayPortMappingProtocol = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayspec.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewaySpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayBackendDefaults-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayListener-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayLogging---- | Full data type definition for AppMeshVirtualGatewayVirtualGatewaySpec.--- See 'appMeshVirtualGatewayVirtualGatewaySpec' for a more convenient--- constructor.-data AppMeshVirtualGatewayVirtualGatewaySpec =- AppMeshVirtualGatewayVirtualGatewaySpec- { _appMeshVirtualGatewayVirtualGatewaySpecBackendDefaults :: Maybe AppMeshVirtualGatewayVirtualGatewayBackendDefaults- , _appMeshVirtualGatewayVirtualGatewaySpecListeners :: [AppMeshVirtualGatewayVirtualGatewayListener]- , _appMeshVirtualGatewayVirtualGatewaySpecLogging :: Maybe AppMeshVirtualGatewayVirtualGatewayLogging- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewaySpec where- toJSON AppMeshVirtualGatewayVirtualGatewaySpec{..} =- object $- catMaybes- [ fmap (("BackendDefaults",) . toJSON) _appMeshVirtualGatewayVirtualGatewaySpecBackendDefaults- , (Just . ("Listeners",) . toJSON) _appMeshVirtualGatewayVirtualGatewaySpecListeners- , fmap (("Logging",) . toJSON) _appMeshVirtualGatewayVirtualGatewaySpecLogging- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewaySpec' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewaySpec- :: [AppMeshVirtualGatewayVirtualGatewayListener] -- ^ 'amvgvgsListeners'- -> AppMeshVirtualGatewayVirtualGatewaySpec-appMeshVirtualGatewayVirtualGatewaySpec listenersarg =- AppMeshVirtualGatewayVirtualGatewaySpec- { _appMeshVirtualGatewayVirtualGatewaySpecBackendDefaults = Nothing- , _appMeshVirtualGatewayVirtualGatewaySpecListeners = listenersarg- , _appMeshVirtualGatewayVirtualGatewaySpecLogging = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayspec.html#cfn-appmesh-virtualgateway-virtualgatewayspec-backenddefaults-amvgvgsBackendDefaults :: Lens' AppMeshVirtualGatewayVirtualGatewaySpec (Maybe AppMeshVirtualGatewayVirtualGatewayBackendDefaults)-amvgvgsBackendDefaults = lens _appMeshVirtualGatewayVirtualGatewaySpecBackendDefaults (\s a -> s { _appMeshVirtualGatewayVirtualGatewaySpecBackendDefaults = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayspec.html#cfn-appmesh-virtualgateway-virtualgatewayspec-listeners-amvgvgsListeners :: Lens' AppMeshVirtualGatewayVirtualGatewaySpec [AppMeshVirtualGatewayVirtualGatewayListener]-amvgvgsListeners = lens _appMeshVirtualGatewayVirtualGatewaySpecListeners (\s a -> s { _appMeshVirtualGatewayVirtualGatewaySpecListeners = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewayspec.html#cfn-appmesh-virtualgateway-virtualgatewayspec-logging-amvgvgsLogging :: Lens' AppMeshVirtualGatewayVirtualGatewaySpec (Maybe AppMeshVirtualGatewayVirtualGatewayLogging)-amvgvgsLogging = lens _appMeshVirtualGatewayVirtualGatewaySpecLogging (\s a -> s { _appMeshVirtualGatewayVirtualGatewaySpecLogging = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontext.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContext where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayTlsValidationContext. See--- 'appMeshVirtualGatewayVirtualGatewayTlsValidationContext' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayTlsValidationContext =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContext- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust :: AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContext where- toJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContext{..} =- object $- catMaybes- [ (Just . ("Trust",) . toJSON) _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust- ]---- | Constructor for 'AppMeshVirtualGatewayVirtualGatewayTlsValidationContext'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayTlsValidationContext- :: AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust -- ^ 'amvgvgtvcTrust'- -> AppMeshVirtualGatewayVirtualGatewayTlsValidationContext-appMeshVirtualGatewayVirtualGatewayTlsValidationContext trustarg =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContext- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust = trustarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontext.html#cfn-appmesh-virtualgateway-virtualgatewaytlsvalidationcontext-trust-amvgvgtvcTrust :: Lens' AppMeshVirtualGatewayVirtualGatewayTlsValidationContext AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust-amvgvgtvcTrust = lens _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust (\s a -> s { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust = a })
@@ -1,42 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontextacmtrust.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust. See--- 'appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust' for a--- more convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrustCertificateAuthorityArns :: ValList Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust where- toJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust{..} =- object $- catMaybes- [ (Just . ("CertificateAuthorityArns",) . toJSON) _appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrustCertificateAuthorityArns- ]---- | Constructor for--- 'AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust- :: ValList Text -- ^ 'amvgvgtvcatCertificateAuthorityArns'- -> AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust-appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust certificateAuthorityArnsarg =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrustCertificateAuthorityArns = certificateAuthorityArnsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontextacmtrust.html#cfn-appmesh-virtualgateway-virtualgatewaytlsvalidationcontextacmtrust-certificateauthorityarns-amvgvgtvcatCertificateAuthorityArns :: Lens' AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust (ValList Text)-amvgvgtvcatCertificateAuthorityArns = lens _appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrustCertificateAuthorityArns (\s a -> s { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrustCertificateAuthorityArns = a })
@@ -1,42 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontextfiletrust.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust. See--- 'appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust' for a--- more convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrustCertificateChain :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust where- toJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust{..} =- object $- catMaybes- [ (Just . ("CertificateChain",) . toJSON) _appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrustCertificateChain- ]---- | Constructor for--- 'AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust'--- containing required fields as arguments.-appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust- :: Val Text -- ^ 'amvgvgtvcftCertificateChain'- -> AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust-appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust certificateChainarg =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrustCertificateChain = certificateChainarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontextfiletrust.html#cfn-appmesh-virtualgateway-virtualgatewaytlsvalidationcontextfiletrust-certificatechain-amvgvgtvcftCertificateChain :: Lens' AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust (Val Text)-amvgvgtvcftCertificateChain = lens _appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrustCertificateChain (\s a -> s { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrustCertificateChain = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontexttrust.html--module Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust-import Stratosphere.ResourceProperties.AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust---- | Full data type definition for--- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust. See--- 'appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust' for a more--- convenient constructor.-data AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustACM :: Maybe AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust- , _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustFile :: Maybe AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust where- toJSON AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust{..} =- object $- catMaybes- [ fmap (("ACM",) . toJSON) _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustACM- , fmap (("File",) . toJSON) _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustFile- ]---- | Constructor for--- 'AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust' containing--- required fields as arguments.-appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust- :: AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust-appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust =- AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust- { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustACM = Nothing- , _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustFile = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontexttrust.html#cfn-appmesh-virtualgateway-virtualgatewaytlsvalidationcontexttrust-acm-amvgvgtvctACM :: Lens' AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust (Maybe AppMeshVirtualGatewayVirtualGatewayTlsValidationContextAcmTrust)-amvgvgtvctACM = lens _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustACM (\s a -> s { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustACM = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualgateway-virtualgatewaytlsvalidationcontexttrust.html#cfn-appmesh-virtualgateway-virtualgatewaytlsvalidationcontexttrust-file-amvgvgtvctFile :: Lens' AppMeshVirtualGatewayVirtualGatewayTlsValidationContextTrust (Maybe AppMeshVirtualGatewayVirtualGatewayTlsValidationContextFileTrust)-amvgvgtvctFile = lens _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustFile (\s a -> s { _appMeshVirtualGatewayVirtualGatewayTlsValidationContextTrustFile = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-accesslog.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeAccessLog where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeFileAccessLog---- | Full data type definition for AppMeshVirtualNodeAccessLog. See--- 'appMeshVirtualNodeAccessLog' for a more convenient constructor.-data AppMeshVirtualNodeAccessLog =- AppMeshVirtualNodeAccessLog- { _appMeshVirtualNodeAccessLogFile :: Maybe AppMeshVirtualNodeFileAccessLog- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeAccessLog where- toJSON AppMeshVirtualNodeAccessLog{..} =- object $- catMaybes- [ fmap (("File",) . toJSON) _appMeshVirtualNodeAccessLogFile- ]---- | Constructor for 'AppMeshVirtualNodeAccessLog' containing required fields--- as arguments.-appMeshVirtualNodeAccessLog- :: AppMeshVirtualNodeAccessLog-appMeshVirtualNodeAccessLog =- AppMeshVirtualNodeAccessLog- { _appMeshVirtualNodeAccessLogFile = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-accesslog.html#cfn-appmesh-virtualnode-accesslog-file-amvnalFile :: Lens' AppMeshVirtualNodeAccessLog (Maybe AppMeshVirtualNodeFileAccessLog)-amvnalFile = lens _appMeshVirtualNodeAccessLogFile (\s a -> s { _appMeshVirtualNodeAccessLogFile = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapinstanceattribute.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeAwsCloudMapInstanceAttribute where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualNodeAwsCloudMapInstanceAttribute. See--- 'appMeshVirtualNodeAwsCloudMapInstanceAttribute' for a more convenient--- constructor.-data AppMeshVirtualNodeAwsCloudMapInstanceAttribute =- AppMeshVirtualNodeAwsCloudMapInstanceAttribute- { _appMeshVirtualNodeAwsCloudMapInstanceAttributeKey :: Val Text- , _appMeshVirtualNodeAwsCloudMapInstanceAttributeValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeAwsCloudMapInstanceAttribute where- toJSON AppMeshVirtualNodeAwsCloudMapInstanceAttribute{..} =- object $- catMaybes- [ (Just . ("Key",) . toJSON) _appMeshVirtualNodeAwsCloudMapInstanceAttributeKey- , (Just . ("Value",) . toJSON) _appMeshVirtualNodeAwsCloudMapInstanceAttributeValue- ]---- | Constructor for 'AppMeshVirtualNodeAwsCloudMapInstanceAttribute'--- containing required fields as arguments.-appMeshVirtualNodeAwsCloudMapInstanceAttribute- :: Val Text -- ^ 'amvnacmiaKey'- -> Val Text -- ^ 'amvnacmiaValue'- -> AppMeshVirtualNodeAwsCloudMapInstanceAttribute-appMeshVirtualNodeAwsCloudMapInstanceAttribute keyarg valuearg =- AppMeshVirtualNodeAwsCloudMapInstanceAttribute- { _appMeshVirtualNodeAwsCloudMapInstanceAttributeKey = keyarg- , _appMeshVirtualNodeAwsCloudMapInstanceAttributeValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapinstanceattribute.html#cfn-appmesh-virtualnode-awscloudmapinstanceattribute-key-amvnacmiaKey :: Lens' AppMeshVirtualNodeAwsCloudMapInstanceAttribute (Val Text)-amvnacmiaKey = lens _appMeshVirtualNodeAwsCloudMapInstanceAttributeKey (\s a -> s { _appMeshVirtualNodeAwsCloudMapInstanceAttributeKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapinstanceattribute.html#cfn-appmesh-virtualnode-awscloudmapinstanceattribute-value-amvnacmiaValue :: Lens' AppMeshVirtualNodeAwsCloudMapInstanceAttribute (Val Text)-amvnacmiaValue = lens _appMeshVirtualNodeAwsCloudMapInstanceAttributeValue (\s a -> s { _appMeshVirtualNodeAwsCloudMapInstanceAttributeValue = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapservicediscovery.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeAwsCloudMapServiceDiscovery where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeAwsCloudMapInstanceAttribute---- | Full data type definition for--- AppMeshVirtualNodeAwsCloudMapServiceDiscovery. See--- 'appMeshVirtualNodeAwsCloudMapServiceDiscovery' for a more convenient--- constructor.-data AppMeshVirtualNodeAwsCloudMapServiceDiscovery =- AppMeshVirtualNodeAwsCloudMapServiceDiscovery- { _appMeshVirtualNodeAwsCloudMapServiceDiscoveryAttributes :: Maybe [AppMeshVirtualNodeAwsCloudMapInstanceAttribute]- , _appMeshVirtualNodeAwsCloudMapServiceDiscoveryNamespaceName :: Val Text- , _appMeshVirtualNodeAwsCloudMapServiceDiscoveryServiceName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeAwsCloudMapServiceDiscovery where- toJSON AppMeshVirtualNodeAwsCloudMapServiceDiscovery{..} =- object $- catMaybes- [ fmap (("Attributes",) . toJSON) _appMeshVirtualNodeAwsCloudMapServiceDiscoveryAttributes- , (Just . ("NamespaceName",) . toJSON) _appMeshVirtualNodeAwsCloudMapServiceDiscoveryNamespaceName- , (Just . ("ServiceName",) . toJSON) _appMeshVirtualNodeAwsCloudMapServiceDiscoveryServiceName- ]---- | Constructor for 'AppMeshVirtualNodeAwsCloudMapServiceDiscovery'--- containing required fields as arguments.-appMeshVirtualNodeAwsCloudMapServiceDiscovery- :: Val Text -- ^ 'amvnacmsdNamespaceName'- -> Val Text -- ^ 'amvnacmsdServiceName'- -> AppMeshVirtualNodeAwsCloudMapServiceDiscovery-appMeshVirtualNodeAwsCloudMapServiceDiscovery namespaceNamearg serviceNamearg =- AppMeshVirtualNodeAwsCloudMapServiceDiscovery- { _appMeshVirtualNodeAwsCloudMapServiceDiscoveryAttributes = Nothing- , _appMeshVirtualNodeAwsCloudMapServiceDiscoveryNamespaceName = namespaceNamearg- , _appMeshVirtualNodeAwsCloudMapServiceDiscoveryServiceName = serviceNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapservicediscovery.html#cfn-appmesh-virtualnode-awscloudmapservicediscovery-attributes-amvnacmsdAttributes :: Lens' AppMeshVirtualNodeAwsCloudMapServiceDiscovery (Maybe [AppMeshVirtualNodeAwsCloudMapInstanceAttribute])-amvnacmsdAttributes = lens _appMeshVirtualNodeAwsCloudMapServiceDiscoveryAttributes (\s a -> s { _appMeshVirtualNodeAwsCloudMapServiceDiscoveryAttributes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapservicediscovery.html#cfn-appmesh-virtualnode-awscloudmapservicediscovery-namespacename-amvnacmsdNamespaceName :: Lens' AppMeshVirtualNodeAwsCloudMapServiceDiscovery (Val Text)-amvnacmsdNamespaceName = lens _appMeshVirtualNodeAwsCloudMapServiceDiscoveryNamespaceName (\s a -> s { _appMeshVirtualNodeAwsCloudMapServiceDiscoveryNamespaceName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-awscloudmapservicediscovery.html#cfn-appmesh-virtualnode-awscloudmapservicediscovery-servicename-amvnacmsdServiceName :: Lens' AppMeshVirtualNodeAwsCloudMapServiceDiscovery (Val Text)-amvnacmsdServiceName = lens _appMeshVirtualNodeAwsCloudMapServiceDiscoveryServiceName (\s a -> s { _appMeshVirtualNodeAwsCloudMapServiceDiscoveryServiceName = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-backend.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeBackend where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeVirtualServiceBackend---- | Full data type definition for AppMeshVirtualNodeBackend. See--- 'appMeshVirtualNodeBackend' for a more convenient constructor.-data AppMeshVirtualNodeBackend =- AppMeshVirtualNodeBackend- { _appMeshVirtualNodeBackendVirtualService :: Maybe AppMeshVirtualNodeVirtualServiceBackend- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeBackend where- toJSON AppMeshVirtualNodeBackend{..} =- object $- catMaybes- [ fmap (("VirtualService",) . toJSON) _appMeshVirtualNodeBackendVirtualService- ]---- | Constructor for 'AppMeshVirtualNodeBackend' containing required fields as--- arguments.-appMeshVirtualNodeBackend- :: AppMeshVirtualNodeBackend-appMeshVirtualNodeBackend =- AppMeshVirtualNodeBackend- { _appMeshVirtualNodeBackendVirtualService = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-backend.html#cfn-appmesh-virtualnode-backend-virtualservice-amvnbVirtualService :: Lens' AppMeshVirtualNodeBackend (Maybe AppMeshVirtualNodeVirtualServiceBackend)-amvnbVirtualService = lens _appMeshVirtualNodeBackendVirtualService (\s a -> s { _appMeshVirtualNodeBackendVirtualService = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-backenddefaults.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeBackendDefaults where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeClientPolicy---- | Full data type definition for AppMeshVirtualNodeBackendDefaults. See--- 'appMeshVirtualNodeBackendDefaults' for a more convenient constructor.-data AppMeshVirtualNodeBackendDefaults =- AppMeshVirtualNodeBackendDefaults- { _appMeshVirtualNodeBackendDefaultsClientPolicy :: Maybe AppMeshVirtualNodeClientPolicy- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeBackendDefaults where- toJSON AppMeshVirtualNodeBackendDefaults{..} =- object $- catMaybes- [ fmap (("ClientPolicy",) . toJSON) _appMeshVirtualNodeBackendDefaultsClientPolicy- ]---- | Constructor for 'AppMeshVirtualNodeBackendDefaults' containing required--- fields as arguments.-appMeshVirtualNodeBackendDefaults- :: AppMeshVirtualNodeBackendDefaults-appMeshVirtualNodeBackendDefaults =- AppMeshVirtualNodeBackendDefaults- { _appMeshVirtualNodeBackendDefaultsClientPolicy = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-backenddefaults.html#cfn-appmesh-virtualnode-backenddefaults-clientpolicy-amvnbdClientPolicy :: Lens' AppMeshVirtualNodeBackendDefaults (Maybe AppMeshVirtualNodeClientPolicy)-amvnbdClientPolicy = lens _appMeshVirtualNodeBackendDefaultsClientPolicy (\s a -> s { _appMeshVirtualNodeBackendDefaultsClientPolicy = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-clientpolicy.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeClientPolicy where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeClientPolicyTls---- | Full data type definition for AppMeshVirtualNodeClientPolicy. See--- 'appMeshVirtualNodeClientPolicy' for a more convenient constructor.-data AppMeshVirtualNodeClientPolicy =- AppMeshVirtualNodeClientPolicy- { _appMeshVirtualNodeClientPolicyTLS :: Maybe AppMeshVirtualNodeClientPolicyTls- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeClientPolicy where- toJSON AppMeshVirtualNodeClientPolicy{..} =- object $- catMaybes- [ fmap (("TLS",) . toJSON) _appMeshVirtualNodeClientPolicyTLS- ]---- | Constructor for 'AppMeshVirtualNodeClientPolicy' containing required--- fields as arguments.-appMeshVirtualNodeClientPolicy- :: AppMeshVirtualNodeClientPolicy-appMeshVirtualNodeClientPolicy =- AppMeshVirtualNodeClientPolicy- { _appMeshVirtualNodeClientPolicyTLS = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-clientpolicy.html#cfn-appmesh-virtualnode-clientpolicy-tls-amvncpTLS :: Lens' AppMeshVirtualNodeClientPolicy (Maybe AppMeshVirtualNodeClientPolicyTls)-amvncpTLS = lens _appMeshVirtualNodeClientPolicyTLS (\s a -> s { _appMeshVirtualNodeClientPolicyTLS = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-clientpolicytls.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeClientPolicyTls where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContext---- | Full data type definition for AppMeshVirtualNodeClientPolicyTls. See--- 'appMeshVirtualNodeClientPolicyTls' for a more convenient constructor.-data AppMeshVirtualNodeClientPolicyTls =- AppMeshVirtualNodeClientPolicyTls- { _appMeshVirtualNodeClientPolicyTlsEnforce :: Maybe (Val Bool)- , _appMeshVirtualNodeClientPolicyTlsPorts :: Maybe (ValList Integer)- , _appMeshVirtualNodeClientPolicyTlsValidation :: AppMeshVirtualNodeTlsValidationContext- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeClientPolicyTls where- toJSON AppMeshVirtualNodeClientPolicyTls{..} =- object $- catMaybes- [ fmap (("Enforce",) . toJSON) _appMeshVirtualNodeClientPolicyTlsEnforce- , fmap (("Ports",) . toJSON) _appMeshVirtualNodeClientPolicyTlsPorts- , (Just . ("Validation",) . toJSON) _appMeshVirtualNodeClientPolicyTlsValidation- ]---- | Constructor for 'AppMeshVirtualNodeClientPolicyTls' containing required--- fields as arguments.-appMeshVirtualNodeClientPolicyTls- :: AppMeshVirtualNodeTlsValidationContext -- ^ 'amvncptValidation'- -> AppMeshVirtualNodeClientPolicyTls-appMeshVirtualNodeClientPolicyTls validationarg =- AppMeshVirtualNodeClientPolicyTls- { _appMeshVirtualNodeClientPolicyTlsEnforce = Nothing- , _appMeshVirtualNodeClientPolicyTlsPorts = Nothing- , _appMeshVirtualNodeClientPolicyTlsValidation = validationarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-clientpolicytls.html#cfn-appmesh-virtualnode-clientpolicytls-enforce-amvncptEnforce :: Lens' AppMeshVirtualNodeClientPolicyTls (Maybe (Val Bool))-amvncptEnforce = lens _appMeshVirtualNodeClientPolicyTlsEnforce (\s a -> s { _appMeshVirtualNodeClientPolicyTlsEnforce = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-clientpolicytls.html#cfn-appmesh-virtualnode-clientpolicytls-ports-amvncptPorts :: Lens' AppMeshVirtualNodeClientPolicyTls (Maybe (ValList Integer))-amvncptPorts = lens _appMeshVirtualNodeClientPolicyTlsPorts (\s a -> s { _appMeshVirtualNodeClientPolicyTlsPorts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-clientpolicytls.html#cfn-appmesh-virtualnode-clientpolicytls-validation-amvncptValidation :: Lens' AppMeshVirtualNodeClientPolicyTls AppMeshVirtualNodeTlsValidationContext-amvncptValidation = lens _appMeshVirtualNodeClientPolicyTlsValidation (\s a -> s { _appMeshVirtualNodeClientPolicyTlsValidation = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-dnsservicediscovery.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeDnsServiceDiscovery where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshVirtualNodeDnsServiceDiscovery. See--- 'appMeshVirtualNodeDnsServiceDiscovery' for a more convenient--- constructor.-data AppMeshVirtualNodeDnsServiceDiscovery =- AppMeshVirtualNodeDnsServiceDiscovery- { _appMeshVirtualNodeDnsServiceDiscoveryHostname :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeDnsServiceDiscovery where- toJSON AppMeshVirtualNodeDnsServiceDiscovery{..} =- object $- catMaybes- [ (Just . ("Hostname",) . toJSON) _appMeshVirtualNodeDnsServiceDiscoveryHostname- ]---- | Constructor for 'AppMeshVirtualNodeDnsServiceDiscovery' containing--- required fields as arguments.-appMeshVirtualNodeDnsServiceDiscovery- :: Val Text -- ^ 'amvndsdHostname'- -> AppMeshVirtualNodeDnsServiceDiscovery-appMeshVirtualNodeDnsServiceDiscovery hostnamearg =- AppMeshVirtualNodeDnsServiceDiscovery- { _appMeshVirtualNodeDnsServiceDiscoveryHostname = hostnamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-dnsservicediscovery.html#cfn-appmesh-virtualnode-dnsservicediscovery-hostname-amvndsdHostname :: Lens' AppMeshVirtualNodeDnsServiceDiscovery (Val Text)-amvndsdHostname = lens _appMeshVirtualNodeDnsServiceDiscoveryHostname (\s a -> s { _appMeshVirtualNodeDnsServiceDiscoveryHostname = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-duration.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeDuration where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshVirtualNodeDuration. See--- 'appMeshVirtualNodeDuration' for a more convenient constructor.-data AppMeshVirtualNodeDuration =- AppMeshVirtualNodeDuration- { _appMeshVirtualNodeDurationUnit :: Val Text- , _appMeshVirtualNodeDurationValue :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeDuration where- toJSON AppMeshVirtualNodeDuration{..} =- object $- catMaybes- [ (Just . ("Unit",) . toJSON) _appMeshVirtualNodeDurationUnit- , (Just . ("Value",) . toJSON) _appMeshVirtualNodeDurationValue- ]---- | Constructor for 'AppMeshVirtualNodeDuration' containing required fields--- as arguments.-appMeshVirtualNodeDuration- :: Val Text -- ^ 'amvndUnit'- -> Val Integer -- ^ 'amvndValue'- -> AppMeshVirtualNodeDuration-appMeshVirtualNodeDuration unitarg valuearg =- AppMeshVirtualNodeDuration- { _appMeshVirtualNodeDurationUnit = unitarg- , _appMeshVirtualNodeDurationValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-duration.html#cfn-appmesh-virtualnode-duration-unit-amvndUnit :: Lens' AppMeshVirtualNodeDuration (Val Text)-amvndUnit = lens _appMeshVirtualNodeDurationUnit (\s a -> s { _appMeshVirtualNodeDurationUnit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-duration.html#cfn-appmesh-virtualnode-duration-value-amvndValue :: Lens' AppMeshVirtualNodeDuration (Val Integer)-amvndValue = lens _appMeshVirtualNodeDurationValue (\s a -> s { _appMeshVirtualNodeDurationValue = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-fileaccesslog.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeFileAccessLog where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshVirtualNodeFileAccessLog. See--- 'appMeshVirtualNodeFileAccessLog' for a more convenient constructor.-data AppMeshVirtualNodeFileAccessLog =- AppMeshVirtualNodeFileAccessLog- { _appMeshVirtualNodeFileAccessLogPath :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeFileAccessLog where- toJSON AppMeshVirtualNodeFileAccessLog{..} =- object $- catMaybes- [ (Just . ("Path",) . toJSON) _appMeshVirtualNodeFileAccessLogPath- ]---- | Constructor for 'AppMeshVirtualNodeFileAccessLog' containing required--- fields as arguments.-appMeshVirtualNodeFileAccessLog- :: Val Text -- ^ 'amvnfalPath'- -> AppMeshVirtualNodeFileAccessLog-appMeshVirtualNodeFileAccessLog patharg =- AppMeshVirtualNodeFileAccessLog- { _appMeshVirtualNodeFileAccessLogPath = patharg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-fileaccesslog.html#cfn-appmesh-virtualnode-fileaccesslog-path-amvnfalPath :: Lens' AppMeshVirtualNodeFileAccessLog (Val Text)-amvnfalPath = lens _appMeshVirtualNodeFileAccessLogPath (\s a -> s { _appMeshVirtualNodeFileAccessLogPath = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-grpctimeout.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeGrpcTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeDuration---- | Full data type definition for AppMeshVirtualNodeGrpcTimeout. See--- 'appMeshVirtualNodeGrpcTimeout' for a more convenient constructor.-data AppMeshVirtualNodeGrpcTimeout =- AppMeshVirtualNodeGrpcTimeout- { _appMeshVirtualNodeGrpcTimeoutIdle :: Maybe AppMeshVirtualNodeDuration- , _appMeshVirtualNodeGrpcTimeoutPerRequest :: Maybe AppMeshVirtualNodeDuration- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeGrpcTimeout where- toJSON AppMeshVirtualNodeGrpcTimeout{..} =- object $- catMaybes- [ fmap (("Idle",) . toJSON) _appMeshVirtualNodeGrpcTimeoutIdle- , fmap (("PerRequest",) . toJSON) _appMeshVirtualNodeGrpcTimeoutPerRequest- ]---- | Constructor for 'AppMeshVirtualNodeGrpcTimeout' containing required--- fields as arguments.-appMeshVirtualNodeGrpcTimeout- :: AppMeshVirtualNodeGrpcTimeout-appMeshVirtualNodeGrpcTimeout =- AppMeshVirtualNodeGrpcTimeout- { _appMeshVirtualNodeGrpcTimeoutIdle = Nothing- , _appMeshVirtualNodeGrpcTimeoutPerRequest = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-grpctimeout.html#cfn-appmesh-virtualnode-grpctimeout-idle-amvngtIdle :: Lens' AppMeshVirtualNodeGrpcTimeout (Maybe AppMeshVirtualNodeDuration)-amvngtIdle = lens _appMeshVirtualNodeGrpcTimeoutIdle (\s a -> s { _appMeshVirtualNodeGrpcTimeoutIdle = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-grpctimeout.html#cfn-appmesh-virtualnode-grpctimeout-perrequest-amvngtPerRequest :: Lens' AppMeshVirtualNodeGrpcTimeout (Maybe AppMeshVirtualNodeDuration)-amvngtPerRequest = lens _appMeshVirtualNodeGrpcTimeoutPerRequest (\s a -> s { _appMeshVirtualNodeGrpcTimeoutPerRequest = a })
@@ -1,85 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeHealthCheck where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshVirtualNodeHealthCheck. See--- 'appMeshVirtualNodeHealthCheck' for a more convenient constructor.-data AppMeshVirtualNodeHealthCheck =- AppMeshVirtualNodeHealthCheck- { _appMeshVirtualNodeHealthCheckHealthyThreshold :: Val Integer- , _appMeshVirtualNodeHealthCheckIntervalMillis :: Val Integer- , _appMeshVirtualNodeHealthCheckPath :: Maybe (Val Text)- , _appMeshVirtualNodeHealthCheckPort :: Maybe (Val Integer)- , _appMeshVirtualNodeHealthCheckProtocol :: Val Text- , _appMeshVirtualNodeHealthCheckTimeoutMillis :: Val Integer- , _appMeshVirtualNodeHealthCheckUnhealthyThreshold :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeHealthCheck where- toJSON AppMeshVirtualNodeHealthCheck{..} =- object $- catMaybes- [ (Just . ("HealthyThreshold",) . toJSON) _appMeshVirtualNodeHealthCheckHealthyThreshold- , (Just . ("IntervalMillis",) . toJSON) _appMeshVirtualNodeHealthCheckIntervalMillis- , fmap (("Path",) . toJSON) _appMeshVirtualNodeHealthCheckPath- , fmap (("Port",) . toJSON) _appMeshVirtualNodeHealthCheckPort- , (Just . ("Protocol",) . toJSON) _appMeshVirtualNodeHealthCheckProtocol- , (Just . ("TimeoutMillis",) . toJSON) _appMeshVirtualNodeHealthCheckTimeoutMillis- , (Just . ("UnhealthyThreshold",) . toJSON) _appMeshVirtualNodeHealthCheckUnhealthyThreshold- ]---- | Constructor for 'AppMeshVirtualNodeHealthCheck' containing required--- fields as arguments.-appMeshVirtualNodeHealthCheck- :: Val Integer -- ^ 'amvnhcHealthyThreshold'- -> Val Integer -- ^ 'amvnhcIntervalMillis'- -> Val Text -- ^ 'amvnhcProtocol'- -> Val Integer -- ^ 'amvnhcTimeoutMillis'- -> Val Integer -- ^ 'amvnhcUnhealthyThreshold'- -> AppMeshVirtualNodeHealthCheck-appMeshVirtualNodeHealthCheck healthyThresholdarg intervalMillisarg protocolarg timeoutMillisarg unhealthyThresholdarg =- AppMeshVirtualNodeHealthCheck- { _appMeshVirtualNodeHealthCheckHealthyThreshold = healthyThresholdarg- , _appMeshVirtualNodeHealthCheckIntervalMillis = intervalMillisarg- , _appMeshVirtualNodeHealthCheckPath = Nothing- , _appMeshVirtualNodeHealthCheckPort = Nothing- , _appMeshVirtualNodeHealthCheckProtocol = protocolarg- , _appMeshVirtualNodeHealthCheckTimeoutMillis = timeoutMillisarg- , _appMeshVirtualNodeHealthCheckUnhealthyThreshold = unhealthyThresholdarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-healthythreshold-amvnhcHealthyThreshold :: Lens' AppMeshVirtualNodeHealthCheck (Val Integer)-amvnhcHealthyThreshold = lens _appMeshVirtualNodeHealthCheckHealthyThreshold (\s a -> s { _appMeshVirtualNodeHealthCheckHealthyThreshold = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-intervalmillis-amvnhcIntervalMillis :: Lens' AppMeshVirtualNodeHealthCheck (Val Integer)-amvnhcIntervalMillis = lens _appMeshVirtualNodeHealthCheckIntervalMillis (\s a -> s { _appMeshVirtualNodeHealthCheckIntervalMillis = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-path-amvnhcPath :: Lens' AppMeshVirtualNodeHealthCheck (Maybe (Val Text))-amvnhcPath = lens _appMeshVirtualNodeHealthCheckPath (\s a -> s { _appMeshVirtualNodeHealthCheckPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-port-amvnhcPort :: Lens' AppMeshVirtualNodeHealthCheck (Maybe (Val Integer))-amvnhcPort = lens _appMeshVirtualNodeHealthCheckPort (\s a -> s { _appMeshVirtualNodeHealthCheckPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-protocol-amvnhcProtocol :: Lens' AppMeshVirtualNodeHealthCheck (Val Text)-amvnhcProtocol = lens _appMeshVirtualNodeHealthCheckProtocol (\s a -> s { _appMeshVirtualNodeHealthCheckProtocol = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-timeoutmillis-amvnhcTimeoutMillis :: Lens' AppMeshVirtualNodeHealthCheck (Val Integer)-amvnhcTimeoutMillis = lens _appMeshVirtualNodeHealthCheckTimeoutMillis (\s a -> s { _appMeshVirtualNodeHealthCheckTimeoutMillis = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-healthcheck.html#cfn-appmesh-virtualnode-healthcheck-unhealthythreshold-amvnhcUnhealthyThreshold :: Lens' AppMeshVirtualNodeHealthCheck (Val Integer)-amvnhcUnhealthyThreshold = lens _appMeshVirtualNodeHealthCheckUnhealthyThreshold (\s a -> s { _appMeshVirtualNodeHealthCheckUnhealthyThreshold = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-httptimeout.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeHttpTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeDuration---- | Full data type definition for AppMeshVirtualNodeHttpTimeout. See--- 'appMeshVirtualNodeHttpTimeout' for a more convenient constructor.-data AppMeshVirtualNodeHttpTimeout =- AppMeshVirtualNodeHttpTimeout- { _appMeshVirtualNodeHttpTimeoutIdle :: Maybe AppMeshVirtualNodeDuration- , _appMeshVirtualNodeHttpTimeoutPerRequest :: Maybe AppMeshVirtualNodeDuration- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeHttpTimeout where- toJSON AppMeshVirtualNodeHttpTimeout{..} =- object $- catMaybes- [ fmap (("Idle",) . toJSON) _appMeshVirtualNodeHttpTimeoutIdle- , fmap (("PerRequest",) . toJSON) _appMeshVirtualNodeHttpTimeoutPerRequest- ]---- | Constructor for 'AppMeshVirtualNodeHttpTimeout' containing required--- fields as arguments.-appMeshVirtualNodeHttpTimeout- :: AppMeshVirtualNodeHttpTimeout-appMeshVirtualNodeHttpTimeout =- AppMeshVirtualNodeHttpTimeout- { _appMeshVirtualNodeHttpTimeoutIdle = Nothing- , _appMeshVirtualNodeHttpTimeoutPerRequest = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-httptimeout.html#cfn-appmesh-virtualnode-httptimeout-idle-amvnhtIdle :: Lens' AppMeshVirtualNodeHttpTimeout (Maybe AppMeshVirtualNodeDuration)-amvnhtIdle = lens _appMeshVirtualNodeHttpTimeoutIdle (\s a -> s { _appMeshVirtualNodeHttpTimeoutIdle = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-httptimeout.html#cfn-appmesh-virtualnode-httptimeout-perrequest-amvnhtPerRequest :: Lens' AppMeshVirtualNodeHttpTimeout (Maybe AppMeshVirtualNodeDuration)-amvnhtPerRequest = lens _appMeshVirtualNodeHttpTimeoutPerRequest (\s a -> s { _appMeshVirtualNodeHttpTimeoutPerRequest = a })
@@ -1,63 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listener.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeListener where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeHealthCheck-import Stratosphere.ResourceProperties.AppMeshVirtualNodePortMapping-import Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTls-import Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTimeout---- | Full data type definition for AppMeshVirtualNodeListener. See--- 'appMeshVirtualNodeListener' for a more convenient constructor.-data AppMeshVirtualNodeListener =- AppMeshVirtualNodeListener- { _appMeshVirtualNodeListenerHealthCheck :: Maybe AppMeshVirtualNodeHealthCheck- , _appMeshVirtualNodeListenerPortMapping :: AppMeshVirtualNodePortMapping- , _appMeshVirtualNodeListenerTLS :: Maybe AppMeshVirtualNodeListenerTls- , _appMeshVirtualNodeListenerTimeout :: Maybe AppMeshVirtualNodeListenerTimeout- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeListener where- toJSON AppMeshVirtualNodeListener{..} =- object $- catMaybes- [ fmap (("HealthCheck",) . toJSON) _appMeshVirtualNodeListenerHealthCheck- , (Just . ("PortMapping",) . toJSON) _appMeshVirtualNodeListenerPortMapping- , fmap (("TLS",) . toJSON) _appMeshVirtualNodeListenerTLS- , fmap (("Timeout",) . toJSON) _appMeshVirtualNodeListenerTimeout- ]---- | Constructor for 'AppMeshVirtualNodeListener' containing required fields--- as arguments.-appMeshVirtualNodeListener- :: AppMeshVirtualNodePortMapping -- ^ 'amvnlPortMapping'- -> AppMeshVirtualNodeListener-appMeshVirtualNodeListener portMappingarg =- AppMeshVirtualNodeListener- { _appMeshVirtualNodeListenerHealthCheck = Nothing- , _appMeshVirtualNodeListenerPortMapping = portMappingarg- , _appMeshVirtualNodeListenerTLS = Nothing- , _appMeshVirtualNodeListenerTimeout = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listener.html#cfn-appmesh-virtualnode-listener-healthcheck-amvnlHealthCheck :: Lens' AppMeshVirtualNodeListener (Maybe AppMeshVirtualNodeHealthCheck)-amvnlHealthCheck = lens _appMeshVirtualNodeListenerHealthCheck (\s a -> s { _appMeshVirtualNodeListenerHealthCheck = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listener.html#cfn-appmesh-virtualnode-listener-portmapping-amvnlPortMapping :: Lens' AppMeshVirtualNodeListener AppMeshVirtualNodePortMapping-amvnlPortMapping = lens _appMeshVirtualNodeListenerPortMapping (\s a -> s { _appMeshVirtualNodeListenerPortMapping = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listener.html#cfn-appmesh-virtualnode-listener-tls-amvnlTLS :: Lens' AppMeshVirtualNodeListener (Maybe AppMeshVirtualNodeListenerTls)-amvnlTLS = lens _appMeshVirtualNodeListenerTLS (\s a -> s { _appMeshVirtualNodeListenerTLS = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listener.html#cfn-appmesh-virtualnode-listener-timeout-amvnlTimeout :: Lens' AppMeshVirtualNodeListener (Maybe AppMeshVirtualNodeListenerTimeout)-amvnlTimeout = lens _appMeshVirtualNodeListenerTimeout (\s a -> s { _appMeshVirtualNodeListenerTimeout = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertimeout.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeGrpcTimeout-import Stratosphere.ResourceProperties.AppMeshVirtualNodeHttpTimeout-import Stratosphere.ResourceProperties.AppMeshVirtualNodeTcpTimeout---- | Full data type definition for AppMeshVirtualNodeListenerTimeout. See--- 'appMeshVirtualNodeListenerTimeout' for a more convenient constructor.-data AppMeshVirtualNodeListenerTimeout =- AppMeshVirtualNodeListenerTimeout- { _appMeshVirtualNodeListenerTimeoutGRPC :: Maybe AppMeshVirtualNodeGrpcTimeout- , _appMeshVirtualNodeListenerTimeoutHTTP :: Maybe AppMeshVirtualNodeHttpTimeout- , _appMeshVirtualNodeListenerTimeoutHTTP2 :: Maybe AppMeshVirtualNodeHttpTimeout- , _appMeshVirtualNodeListenerTimeoutTCP :: Maybe AppMeshVirtualNodeTcpTimeout- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeListenerTimeout where- toJSON AppMeshVirtualNodeListenerTimeout{..} =- object $- catMaybes- [ fmap (("GRPC",) . toJSON) _appMeshVirtualNodeListenerTimeoutGRPC- , fmap (("HTTP",) . toJSON) _appMeshVirtualNodeListenerTimeoutHTTP- , fmap (("HTTP2",) . toJSON) _appMeshVirtualNodeListenerTimeoutHTTP2- , fmap (("TCP",) . toJSON) _appMeshVirtualNodeListenerTimeoutTCP- ]---- | Constructor for 'AppMeshVirtualNodeListenerTimeout' containing required--- fields as arguments.-appMeshVirtualNodeListenerTimeout- :: AppMeshVirtualNodeListenerTimeout-appMeshVirtualNodeListenerTimeout =- AppMeshVirtualNodeListenerTimeout- { _appMeshVirtualNodeListenerTimeoutGRPC = Nothing- , _appMeshVirtualNodeListenerTimeoutHTTP = Nothing- , _appMeshVirtualNodeListenerTimeoutHTTP2 = Nothing- , _appMeshVirtualNodeListenerTimeoutTCP = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertimeout.html#cfn-appmesh-virtualnode-listenertimeout-grpc-amvnltGRPC :: Lens' AppMeshVirtualNodeListenerTimeout (Maybe AppMeshVirtualNodeGrpcTimeout)-amvnltGRPC = lens _appMeshVirtualNodeListenerTimeoutGRPC (\s a -> s { _appMeshVirtualNodeListenerTimeoutGRPC = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertimeout.html#cfn-appmesh-virtualnode-listenertimeout-http-amvnltHTTP :: Lens' AppMeshVirtualNodeListenerTimeout (Maybe AppMeshVirtualNodeHttpTimeout)-amvnltHTTP = lens _appMeshVirtualNodeListenerTimeoutHTTP (\s a -> s { _appMeshVirtualNodeListenerTimeoutHTTP = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertimeout.html#cfn-appmesh-virtualnode-listenertimeout-http2-amvnltHTTP2 :: Lens' AppMeshVirtualNodeListenerTimeout (Maybe AppMeshVirtualNodeHttpTimeout)-amvnltHTTP2 = lens _appMeshVirtualNodeListenerTimeoutHTTP2 (\s a -> s { _appMeshVirtualNodeListenerTimeoutHTTP2 = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertimeout.html#cfn-appmesh-virtualnode-listenertimeout-tcp-amvnltTCP :: Lens' AppMeshVirtualNodeListenerTimeout (Maybe AppMeshVirtualNodeTcpTimeout)-amvnltTCP = lens _appMeshVirtualNodeListenerTimeoutTCP (\s a -> s { _appMeshVirtualNodeListenerTimeoutTCP = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertls.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTls where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTlsCertificate---- | Full data type definition for AppMeshVirtualNodeListenerTls. See--- 'appMeshVirtualNodeListenerTls' for a more convenient constructor.-data AppMeshVirtualNodeListenerTls =- AppMeshVirtualNodeListenerTls- { _appMeshVirtualNodeListenerTlsCertificate :: AppMeshVirtualNodeListenerTlsCertificate- , _appMeshVirtualNodeListenerTlsMode :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeListenerTls where- toJSON AppMeshVirtualNodeListenerTls{..} =- object $- catMaybes- [ (Just . ("Certificate",) . toJSON) _appMeshVirtualNodeListenerTlsCertificate- , (Just . ("Mode",) . toJSON) _appMeshVirtualNodeListenerTlsMode- ]---- | Constructor for 'AppMeshVirtualNodeListenerTls' containing required--- fields as arguments.-appMeshVirtualNodeListenerTls- :: AppMeshVirtualNodeListenerTlsCertificate -- ^ 'amvnltCertificate'- -> Val Text -- ^ 'amvnltMode'- -> AppMeshVirtualNodeListenerTls-appMeshVirtualNodeListenerTls certificatearg modearg =- AppMeshVirtualNodeListenerTls- { _appMeshVirtualNodeListenerTlsCertificate = certificatearg- , _appMeshVirtualNodeListenerTlsMode = modearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertls.html#cfn-appmesh-virtualnode-listenertls-certificate-amvnltCertificate :: Lens' AppMeshVirtualNodeListenerTls AppMeshVirtualNodeListenerTlsCertificate-amvnltCertificate = lens _appMeshVirtualNodeListenerTlsCertificate (\s a -> s { _appMeshVirtualNodeListenerTlsCertificate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertls.html#cfn-appmesh-virtualnode-listenertls-mode-amvnltMode :: Lens' AppMeshVirtualNodeListenerTls (Val Text)-amvnltMode = lens _appMeshVirtualNodeListenerTlsMode (\s a -> s { _appMeshVirtualNodeListenerTlsMode = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlsacmcertificate.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTlsAcmCertificate where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualNodeListenerTlsAcmCertificate. See--- 'appMeshVirtualNodeListenerTlsAcmCertificate' for a more convenient--- constructor.-data AppMeshVirtualNodeListenerTlsAcmCertificate =- AppMeshVirtualNodeListenerTlsAcmCertificate- { _appMeshVirtualNodeListenerTlsAcmCertificateCertificateArn :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeListenerTlsAcmCertificate where- toJSON AppMeshVirtualNodeListenerTlsAcmCertificate{..} =- object $- catMaybes- [ (Just . ("CertificateArn",) . toJSON) _appMeshVirtualNodeListenerTlsAcmCertificateCertificateArn- ]---- | Constructor for 'AppMeshVirtualNodeListenerTlsAcmCertificate' containing--- required fields as arguments.-appMeshVirtualNodeListenerTlsAcmCertificate- :: Val Text -- ^ 'amvnltacCertificateArn'- -> AppMeshVirtualNodeListenerTlsAcmCertificate-appMeshVirtualNodeListenerTlsAcmCertificate certificateArnarg =- AppMeshVirtualNodeListenerTlsAcmCertificate- { _appMeshVirtualNodeListenerTlsAcmCertificateCertificateArn = certificateArnarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlsacmcertificate.html#cfn-appmesh-virtualnode-listenertlsacmcertificate-certificatearn-amvnltacCertificateArn :: Lens' AppMeshVirtualNodeListenerTlsAcmCertificate (Val Text)-amvnltacCertificateArn = lens _appMeshVirtualNodeListenerTlsAcmCertificateCertificateArn (\s a -> s { _appMeshVirtualNodeListenerTlsAcmCertificateCertificateArn = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlscertificate.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTlsCertificate where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTlsAcmCertificate-import Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTlsFileCertificate---- | Full data type definition for AppMeshVirtualNodeListenerTlsCertificate.--- See 'appMeshVirtualNodeListenerTlsCertificate' for a more convenient--- constructor.-data AppMeshVirtualNodeListenerTlsCertificate =- AppMeshVirtualNodeListenerTlsCertificate- { _appMeshVirtualNodeListenerTlsCertificateACM :: Maybe AppMeshVirtualNodeListenerTlsAcmCertificate- , _appMeshVirtualNodeListenerTlsCertificateFile :: Maybe AppMeshVirtualNodeListenerTlsFileCertificate- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeListenerTlsCertificate where- toJSON AppMeshVirtualNodeListenerTlsCertificate{..} =- object $- catMaybes- [ fmap (("ACM",) . toJSON) _appMeshVirtualNodeListenerTlsCertificateACM- , fmap (("File",) . toJSON) _appMeshVirtualNodeListenerTlsCertificateFile- ]---- | Constructor for 'AppMeshVirtualNodeListenerTlsCertificate' containing--- required fields as arguments.-appMeshVirtualNodeListenerTlsCertificate- :: AppMeshVirtualNodeListenerTlsCertificate-appMeshVirtualNodeListenerTlsCertificate =- AppMeshVirtualNodeListenerTlsCertificate- { _appMeshVirtualNodeListenerTlsCertificateACM = Nothing- , _appMeshVirtualNodeListenerTlsCertificateFile = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlscertificate.html#cfn-appmesh-virtualnode-listenertlscertificate-acm-amvnltcACM :: Lens' AppMeshVirtualNodeListenerTlsCertificate (Maybe AppMeshVirtualNodeListenerTlsAcmCertificate)-amvnltcACM = lens _appMeshVirtualNodeListenerTlsCertificateACM (\s a -> s { _appMeshVirtualNodeListenerTlsCertificateACM = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlscertificate.html#cfn-appmesh-virtualnode-listenertlscertificate-file-amvnltcFile :: Lens' AppMeshVirtualNodeListenerTlsCertificate (Maybe AppMeshVirtualNodeListenerTlsFileCertificate)-amvnltcFile = lens _appMeshVirtualNodeListenerTlsCertificateFile (\s a -> s { _appMeshVirtualNodeListenerTlsCertificateFile = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlsfilecertificate.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeListenerTlsFileCertificate where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualNodeListenerTlsFileCertificate. See--- 'appMeshVirtualNodeListenerTlsFileCertificate' for a more convenient--- constructor.-data AppMeshVirtualNodeListenerTlsFileCertificate =- AppMeshVirtualNodeListenerTlsFileCertificate- { _appMeshVirtualNodeListenerTlsFileCertificateCertificateChain :: Val Text- , _appMeshVirtualNodeListenerTlsFileCertificatePrivateKey :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeListenerTlsFileCertificate where- toJSON AppMeshVirtualNodeListenerTlsFileCertificate{..} =- object $- catMaybes- [ (Just . ("CertificateChain",) . toJSON) _appMeshVirtualNodeListenerTlsFileCertificateCertificateChain- , (Just . ("PrivateKey",) . toJSON) _appMeshVirtualNodeListenerTlsFileCertificatePrivateKey- ]---- | Constructor for 'AppMeshVirtualNodeListenerTlsFileCertificate' containing--- required fields as arguments.-appMeshVirtualNodeListenerTlsFileCertificate- :: Val Text -- ^ 'amvnltfcCertificateChain'- -> Val Text -- ^ 'amvnltfcPrivateKey'- -> AppMeshVirtualNodeListenerTlsFileCertificate-appMeshVirtualNodeListenerTlsFileCertificate certificateChainarg privateKeyarg =- AppMeshVirtualNodeListenerTlsFileCertificate- { _appMeshVirtualNodeListenerTlsFileCertificateCertificateChain = certificateChainarg- , _appMeshVirtualNodeListenerTlsFileCertificatePrivateKey = privateKeyarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlsfilecertificate.html#cfn-appmesh-virtualnode-listenertlsfilecertificate-certificatechain-amvnltfcCertificateChain :: Lens' AppMeshVirtualNodeListenerTlsFileCertificate (Val Text)-amvnltfcCertificateChain = lens _appMeshVirtualNodeListenerTlsFileCertificateCertificateChain (\s a -> s { _appMeshVirtualNodeListenerTlsFileCertificateCertificateChain = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-listenertlsfilecertificate.html#cfn-appmesh-virtualnode-listenertlsfilecertificate-privatekey-amvnltfcPrivateKey :: Lens' AppMeshVirtualNodeListenerTlsFileCertificate (Val Text)-amvnltfcPrivateKey = lens _appMeshVirtualNodeListenerTlsFileCertificatePrivateKey (\s a -> s { _appMeshVirtualNodeListenerTlsFileCertificatePrivateKey = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-logging.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeLogging where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeAccessLog---- | Full data type definition for AppMeshVirtualNodeLogging. See--- 'appMeshVirtualNodeLogging' for a more convenient constructor.-data AppMeshVirtualNodeLogging =- AppMeshVirtualNodeLogging- { _appMeshVirtualNodeLoggingAccessLog :: Maybe AppMeshVirtualNodeAccessLog- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeLogging where- toJSON AppMeshVirtualNodeLogging{..} =- object $- catMaybes- [ fmap (("AccessLog",) . toJSON) _appMeshVirtualNodeLoggingAccessLog- ]---- | Constructor for 'AppMeshVirtualNodeLogging' containing required fields as--- arguments.-appMeshVirtualNodeLogging- :: AppMeshVirtualNodeLogging-appMeshVirtualNodeLogging =- AppMeshVirtualNodeLogging- { _appMeshVirtualNodeLoggingAccessLog = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-logging.html#cfn-appmesh-virtualnode-logging-accesslog-amvnlAccessLog :: Lens' AppMeshVirtualNodeLogging (Maybe AppMeshVirtualNodeAccessLog)-amvnlAccessLog = lens _appMeshVirtualNodeLoggingAccessLog (\s a -> s { _appMeshVirtualNodeLoggingAccessLog = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-portmapping.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodePortMapping where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshVirtualNodePortMapping. See--- 'appMeshVirtualNodePortMapping' for a more convenient constructor.-data AppMeshVirtualNodePortMapping =- AppMeshVirtualNodePortMapping- { _appMeshVirtualNodePortMappingPort :: Val Integer- , _appMeshVirtualNodePortMappingProtocol :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodePortMapping where- toJSON AppMeshVirtualNodePortMapping{..} =- object $- catMaybes- [ (Just . ("Port",) . toJSON) _appMeshVirtualNodePortMappingPort- , (Just . ("Protocol",) . toJSON) _appMeshVirtualNodePortMappingProtocol- ]---- | Constructor for 'AppMeshVirtualNodePortMapping' containing required--- fields as arguments.-appMeshVirtualNodePortMapping- :: Val Integer -- ^ 'amvnpmPort'- -> Val Text -- ^ 'amvnpmProtocol'- -> AppMeshVirtualNodePortMapping-appMeshVirtualNodePortMapping portarg protocolarg =- AppMeshVirtualNodePortMapping- { _appMeshVirtualNodePortMappingPort = portarg- , _appMeshVirtualNodePortMappingProtocol = protocolarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-portmapping.html#cfn-appmesh-virtualnode-portmapping-port-amvnpmPort :: Lens' AppMeshVirtualNodePortMapping (Val Integer)-amvnpmPort = lens _appMeshVirtualNodePortMappingPort (\s a -> s { _appMeshVirtualNodePortMappingPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-portmapping.html#cfn-appmesh-virtualnode-portmapping-protocol-amvnpmProtocol :: Lens' AppMeshVirtualNodePortMapping (Val Text)-amvnpmProtocol = lens _appMeshVirtualNodePortMappingProtocol (\s a -> s { _appMeshVirtualNodePortMappingProtocol = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-servicediscovery.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeServiceDiscovery where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeAwsCloudMapServiceDiscovery-import Stratosphere.ResourceProperties.AppMeshVirtualNodeDnsServiceDiscovery---- | Full data type definition for AppMeshVirtualNodeServiceDiscovery. See--- 'appMeshVirtualNodeServiceDiscovery' for a more convenient constructor.-data AppMeshVirtualNodeServiceDiscovery =- AppMeshVirtualNodeServiceDiscovery- { _appMeshVirtualNodeServiceDiscoveryAWSCloudMap :: Maybe AppMeshVirtualNodeAwsCloudMapServiceDiscovery- , _appMeshVirtualNodeServiceDiscoveryDNS :: Maybe AppMeshVirtualNodeDnsServiceDiscovery- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeServiceDiscovery where- toJSON AppMeshVirtualNodeServiceDiscovery{..} =- object $- catMaybes- [ fmap (("AWSCloudMap",) . toJSON) _appMeshVirtualNodeServiceDiscoveryAWSCloudMap- , fmap (("DNS",) . toJSON) _appMeshVirtualNodeServiceDiscoveryDNS- ]---- | Constructor for 'AppMeshVirtualNodeServiceDiscovery' containing required--- fields as arguments.-appMeshVirtualNodeServiceDiscovery- :: AppMeshVirtualNodeServiceDiscovery-appMeshVirtualNodeServiceDiscovery =- AppMeshVirtualNodeServiceDiscovery- { _appMeshVirtualNodeServiceDiscoveryAWSCloudMap = Nothing- , _appMeshVirtualNodeServiceDiscoveryDNS = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-servicediscovery.html#cfn-appmesh-virtualnode-servicediscovery-awscloudmap-amvnsdAWSCloudMap :: Lens' AppMeshVirtualNodeServiceDiscovery (Maybe AppMeshVirtualNodeAwsCloudMapServiceDiscovery)-amvnsdAWSCloudMap = lens _appMeshVirtualNodeServiceDiscoveryAWSCloudMap (\s a -> s { _appMeshVirtualNodeServiceDiscoveryAWSCloudMap = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-servicediscovery.html#cfn-appmesh-virtualnode-servicediscovery-dns-amvnsdDNS :: Lens' AppMeshVirtualNodeServiceDiscovery (Maybe AppMeshVirtualNodeDnsServiceDiscovery)-amvnsdDNS = lens _appMeshVirtualNodeServiceDiscoveryDNS (\s a -> s { _appMeshVirtualNodeServiceDiscoveryDNS = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tcptimeout.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeTcpTimeout where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeDuration---- | Full data type definition for AppMeshVirtualNodeTcpTimeout. See--- 'appMeshVirtualNodeTcpTimeout' for a more convenient constructor.-data AppMeshVirtualNodeTcpTimeout =- AppMeshVirtualNodeTcpTimeout- { _appMeshVirtualNodeTcpTimeoutIdle :: Maybe AppMeshVirtualNodeDuration- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeTcpTimeout where- toJSON AppMeshVirtualNodeTcpTimeout{..} =- object $- catMaybes- [ fmap (("Idle",) . toJSON) _appMeshVirtualNodeTcpTimeoutIdle- ]---- | Constructor for 'AppMeshVirtualNodeTcpTimeout' containing required fields--- as arguments.-appMeshVirtualNodeTcpTimeout- :: AppMeshVirtualNodeTcpTimeout-appMeshVirtualNodeTcpTimeout =- AppMeshVirtualNodeTcpTimeout- { _appMeshVirtualNodeTcpTimeoutIdle = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tcptimeout.html#cfn-appmesh-virtualnode-tcptimeout-idle-amvnttIdle :: Lens' AppMeshVirtualNodeTcpTimeout (Maybe AppMeshVirtualNodeDuration)-amvnttIdle = lens _appMeshVirtualNodeTcpTimeoutIdle (\s a -> s { _appMeshVirtualNodeTcpTimeoutIdle = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontext.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContext where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContextTrust---- | Full data type definition for AppMeshVirtualNodeTlsValidationContext. See--- 'appMeshVirtualNodeTlsValidationContext' for a more convenient--- constructor.-data AppMeshVirtualNodeTlsValidationContext =- AppMeshVirtualNodeTlsValidationContext- { _appMeshVirtualNodeTlsValidationContextTrust :: AppMeshVirtualNodeTlsValidationContextTrust- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeTlsValidationContext where- toJSON AppMeshVirtualNodeTlsValidationContext{..} =- object $- catMaybes- [ (Just . ("Trust",) . toJSON) _appMeshVirtualNodeTlsValidationContextTrust- ]---- | Constructor for 'AppMeshVirtualNodeTlsValidationContext' containing--- required fields as arguments.-appMeshVirtualNodeTlsValidationContext- :: AppMeshVirtualNodeTlsValidationContextTrust -- ^ 'amvntvcTrust'- -> AppMeshVirtualNodeTlsValidationContext-appMeshVirtualNodeTlsValidationContext trustarg =- AppMeshVirtualNodeTlsValidationContext- { _appMeshVirtualNodeTlsValidationContextTrust = trustarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontext.html#cfn-appmesh-virtualnode-tlsvalidationcontext-trust-amvntvcTrust :: Lens' AppMeshVirtualNodeTlsValidationContext AppMeshVirtualNodeTlsValidationContextTrust-amvntvcTrust = lens _appMeshVirtualNodeTlsValidationContextTrust (\s a -> s { _appMeshVirtualNodeTlsValidationContextTrust = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontextacmtrust.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContextAcmTrust where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualNodeTlsValidationContextAcmTrust. See--- 'appMeshVirtualNodeTlsValidationContextAcmTrust' for a more convenient--- constructor.-data AppMeshVirtualNodeTlsValidationContextAcmTrust =- AppMeshVirtualNodeTlsValidationContextAcmTrust- { _appMeshVirtualNodeTlsValidationContextAcmTrustCertificateAuthorityArns :: ValList Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeTlsValidationContextAcmTrust where- toJSON AppMeshVirtualNodeTlsValidationContextAcmTrust{..} =- object $- catMaybes- [ (Just . ("CertificateAuthorityArns",) . toJSON) _appMeshVirtualNodeTlsValidationContextAcmTrustCertificateAuthorityArns- ]---- | Constructor for 'AppMeshVirtualNodeTlsValidationContextAcmTrust'--- containing required fields as arguments.-appMeshVirtualNodeTlsValidationContextAcmTrust- :: ValList Text -- ^ 'amvntvcatCertificateAuthorityArns'- -> AppMeshVirtualNodeTlsValidationContextAcmTrust-appMeshVirtualNodeTlsValidationContextAcmTrust certificateAuthorityArnsarg =- AppMeshVirtualNodeTlsValidationContextAcmTrust- { _appMeshVirtualNodeTlsValidationContextAcmTrustCertificateAuthorityArns = certificateAuthorityArnsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontextacmtrust.html#cfn-appmesh-virtualnode-tlsvalidationcontextacmtrust-certificateauthorityarns-amvntvcatCertificateAuthorityArns :: Lens' AppMeshVirtualNodeTlsValidationContextAcmTrust (ValList Text)-amvntvcatCertificateAuthorityArns = lens _appMeshVirtualNodeTlsValidationContextAcmTrustCertificateAuthorityArns (\s a -> s { _appMeshVirtualNodeTlsValidationContextAcmTrustCertificateAuthorityArns = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontextfiletrust.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContextFileTrust where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualNodeTlsValidationContextFileTrust. See--- 'appMeshVirtualNodeTlsValidationContextFileTrust' for a more convenient--- constructor.-data AppMeshVirtualNodeTlsValidationContextFileTrust =- AppMeshVirtualNodeTlsValidationContextFileTrust- { _appMeshVirtualNodeTlsValidationContextFileTrustCertificateChain :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeTlsValidationContextFileTrust where- toJSON AppMeshVirtualNodeTlsValidationContextFileTrust{..} =- object $- catMaybes- [ (Just . ("CertificateChain",) . toJSON) _appMeshVirtualNodeTlsValidationContextFileTrustCertificateChain- ]---- | Constructor for 'AppMeshVirtualNodeTlsValidationContextFileTrust'--- containing required fields as arguments.-appMeshVirtualNodeTlsValidationContextFileTrust- :: Val Text -- ^ 'amvntvcftCertificateChain'- -> AppMeshVirtualNodeTlsValidationContextFileTrust-appMeshVirtualNodeTlsValidationContextFileTrust certificateChainarg =- AppMeshVirtualNodeTlsValidationContextFileTrust- { _appMeshVirtualNodeTlsValidationContextFileTrustCertificateChain = certificateChainarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontextfiletrust.html#cfn-appmesh-virtualnode-tlsvalidationcontextfiletrust-certificatechain-amvntvcftCertificateChain :: Lens' AppMeshVirtualNodeTlsValidationContextFileTrust (Val Text)-amvntvcftCertificateChain = lens _appMeshVirtualNodeTlsValidationContextFileTrustCertificateChain (\s a -> s { _appMeshVirtualNodeTlsValidationContextFileTrustCertificateChain = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontexttrust.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContextTrust where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContextAcmTrust-import Stratosphere.ResourceProperties.AppMeshVirtualNodeTlsValidationContextFileTrust---- | Full data type definition for--- AppMeshVirtualNodeTlsValidationContextTrust. See--- 'appMeshVirtualNodeTlsValidationContextTrust' for a more convenient--- constructor.-data AppMeshVirtualNodeTlsValidationContextTrust =- AppMeshVirtualNodeTlsValidationContextTrust- { _appMeshVirtualNodeTlsValidationContextTrustACM :: Maybe AppMeshVirtualNodeTlsValidationContextAcmTrust- , _appMeshVirtualNodeTlsValidationContextTrustFile :: Maybe AppMeshVirtualNodeTlsValidationContextFileTrust- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeTlsValidationContextTrust where- toJSON AppMeshVirtualNodeTlsValidationContextTrust{..} =- object $- catMaybes- [ fmap (("ACM",) . toJSON) _appMeshVirtualNodeTlsValidationContextTrustACM- , fmap (("File",) . toJSON) _appMeshVirtualNodeTlsValidationContextTrustFile- ]---- | Constructor for 'AppMeshVirtualNodeTlsValidationContextTrust' containing--- required fields as arguments.-appMeshVirtualNodeTlsValidationContextTrust- :: AppMeshVirtualNodeTlsValidationContextTrust-appMeshVirtualNodeTlsValidationContextTrust =- AppMeshVirtualNodeTlsValidationContextTrust- { _appMeshVirtualNodeTlsValidationContextTrustACM = Nothing- , _appMeshVirtualNodeTlsValidationContextTrustFile = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontexttrust.html#cfn-appmesh-virtualnode-tlsvalidationcontexttrust-acm-amvntvctACM :: Lens' AppMeshVirtualNodeTlsValidationContextTrust (Maybe AppMeshVirtualNodeTlsValidationContextAcmTrust)-amvntvctACM = lens _appMeshVirtualNodeTlsValidationContextTrustACM (\s a -> s { _appMeshVirtualNodeTlsValidationContextTrustACM = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-tlsvalidationcontexttrust.html#cfn-appmesh-virtualnode-tlsvalidationcontexttrust-file-amvntvctFile :: Lens' AppMeshVirtualNodeTlsValidationContextTrust (Maybe AppMeshVirtualNodeTlsValidationContextFileTrust)-amvntvctFile = lens _appMeshVirtualNodeTlsValidationContextTrustFile (\s a -> s { _appMeshVirtualNodeTlsValidationContextTrustFile = a })
@@ -1,70 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodespec.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeVirtualNodeSpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeBackendDefaults-import Stratosphere.ResourceProperties.AppMeshVirtualNodeBackend-import Stratosphere.ResourceProperties.AppMeshVirtualNodeListener-import Stratosphere.ResourceProperties.AppMeshVirtualNodeLogging-import Stratosphere.ResourceProperties.AppMeshVirtualNodeServiceDiscovery---- | Full data type definition for AppMeshVirtualNodeVirtualNodeSpec. See--- 'appMeshVirtualNodeVirtualNodeSpec' for a more convenient constructor.-data AppMeshVirtualNodeVirtualNodeSpec =- AppMeshVirtualNodeVirtualNodeSpec- { _appMeshVirtualNodeVirtualNodeSpecBackendDefaults :: Maybe AppMeshVirtualNodeBackendDefaults- , _appMeshVirtualNodeVirtualNodeSpecBackends :: Maybe [AppMeshVirtualNodeBackend]- , _appMeshVirtualNodeVirtualNodeSpecListeners :: Maybe [AppMeshVirtualNodeListener]- , _appMeshVirtualNodeVirtualNodeSpecLogging :: Maybe AppMeshVirtualNodeLogging- , _appMeshVirtualNodeVirtualNodeSpecServiceDiscovery :: Maybe AppMeshVirtualNodeServiceDiscovery- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeVirtualNodeSpec where- toJSON AppMeshVirtualNodeVirtualNodeSpec{..} =- object $- catMaybes- [ fmap (("BackendDefaults",) . toJSON) _appMeshVirtualNodeVirtualNodeSpecBackendDefaults- , fmap (("Backends",) . toJSON) _appMeshVirtualNodeVirtualNodeSpecBackends- , fmap (("Listeners",) . toJSON) _appMeshVirtualNodeVirtualNodeSpecListeners- , fmap (("Logging",) . toJSON) _appMeshVirtualNodeVirtualNodeSpecLogging- , fmap (("ServiceDiscovery",) . toJSON) _appMeshVirtualNodeVirtualNodeSpecServiceDiscovery- ]---- | Constructor for 'AppMeshVirtualNodeVirtualNodeSpec' containing required--- fields as arguments.-appMeshVirtualNodeVirtualNodeSpec- :: AppMeshVirtualNodeVirtualNodeSpec-appMeshVirtualNodeVirtualNodeSpec =- AppMeshVirtualNodeVirtualNodeSpec- { _appMeshVirtualNodeVirtualNodeSpecBackendDefaults = Nothing- , _appMeshVirtualNodeVirtualNodeSpecBackends = Nothing- , _appMeshVirtualNodeVirtualNodeSpecListeners = Nothing- , _appMeshVirtualNodeVirtualNodeSpecLogging = Nothing- , _appMeshVirtualNodeVirtualNodeSpecServiceDiscovery = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodespec.html#cfn-appmesh-virtualnode-virtualnodespec-backenddefaults-amvnvnsBackendDefaults :: Lens' AppMeshVirtualNodeVirtualNodeSpec (Maybe AppMeshVirtualNodeBackendDefaults)-amvnvnsBackendDefaults = lens _appMeshVirtualNodeVirtualNodeSpecBackendDefaults (\s a -> s { _appMeshVirtualNodeVirtualNodeSpecBackendDefaults = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodespec.html#cfn-appmesh-virtualnode-virtualnodespec-backends-amvnvnsBackends :: Lens' AppMeshVirtualNodeVirtualNodeSpec (Maybe [AppMeshVirtualNodeBackend])-amvnvnsBackends = lens _appMeshVirtualNodeVirtualNodeSpecBackends (\s a -> s { _appMeshVirtualNodeVirtualNodeSpecBackends = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodespec.html#cfn-appmesh-virtualnode-virtualnodespec-listeners-amvnvnsListeners :: Lens' AppMeshVirtualNodeVirtualNodeSpec (Maybe [AppMeshVirtualNodeListener])-amvnvnsListeners = lens _appMeshVirtualNodeVirtualNodeSpecListeners (\s a -> s { _appMeshVirtualNodeVirtualNodeSpecListeners = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodespec.html#cfn-appmesh-virtualnode-virtualnodespec-logging-amvnvnsLogging :: Lens' AppMeshVirtualNodeVirtualNodeSpec (Maybe AppMeshVirtualNodeLogging)-amvnvnsLogging = lens _appMeshVirtualNodeVirtualNodeSpecLogging (\s a -> s { _appMeshVirtualNodeVirtualNodeSpecLogging = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodespec.html#cfn-appmesh-virtualnode-virtualnodespec-servicediscovery-amvnvnsServiceDiscovery :: Lens' AppMeshVirtualNodeVirtualNodeSpec (Maybe AppMeshVirtualNodeServiceDiscovery)-amvnvnsServiceDiscovery = lens _appMeshVirtualNodeVirtualNodeSpecServiceDiscovery (\s a -> s { _appMeshVirtualNodeVirtualNodeSpecServiceDiscovery = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualservicebackend.html--module Stratosphere.ResourceProperties.AppMeshVirtualNodeVirtualServiceBackend where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualNodeClientPolicy---- | Full data type definition for AppMeshVirtualNodeVirtualServiceBackend.--- See 'appMeshVirtualNodeVirtualServiceBackend' for a more convenient--- constructor.-data AppMeshVirtualNodeVirtualServiceBackend =- AppMeshVirtualNodeVirtualServiceBackend- { _appMeshVirtualNodeVirtualServiceBackendClientPolicy :: Maybe AppMeshVirtualNodeClientPolicy- , _appMeshVirtualNodeVirtualServiceBackendVirtualServiceName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualNodeVirtualServiceBackend where- toJSON AppMeshVirtualNodeVirtualServiceBackend{..} =- object $- catMaybes- [ fmap (("ClientPolicy",) . toJSON) _appMeshVirtualNodeVirtualServiceBackendClientPolicy- , (Just . ("VirtualServiceName",) . toJSON) _appMeshVirtualNodeVirtualServiceBackendVirtualServiceName- ]---- | Constructor for 'AppMeshVirtualNodeVirtualServiceBackend' containing--- required fields as arguments.-appMeshVirtualNodeVirtualServiceBackend- :: Val Text -- ^ 'amvnvsbVirtualServiceName'- -> AppMeshVirtualNodeVirtualServiceBackend-appMeshVirtualNodeVirtualServiceBackend virtualServiceNamearg =- AppMeshVirtualNodeVirtualServiceBackend- { _appMeshVirtualNodeVirtualServiceBackendClientPolicy = Nothing- , _appMeshVirtualNodeVirtualServiceBackendVirtualServiceName = virtualServiceNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualservicebackend.html#cfn-appmesh-virtualnode-virtualservicebackend-clientpolicy-amvnvsbClientPolicy :: Lens' AppMeshVirtualNodeVirtualServiceBackend (Maybe AppMeshVirtualNodeClientPolicy)-amvnvsbClientPolicy = lens _appMeshVirtualNodeVirtualServiceBackendClientPolicy (\s a -> s { _appMeshVirtualNodeVirtualServiceBackendClientPolicy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualservicebackend.html#cfn-appmesh-virtualnode-virtualservicebackend-virtualservicename-amvnvsbVirtualServiceName :: Lens' AppMeshVirtualNodeVirtualServiceBackend (Val Text)-amvnvsbVirtualServiceName = lens _appMeshVirtualNodeVirtualServiceBackendVirtualServiceName (\s a -> s { _appMeshVirtualNodeVirtualServiceBackendVirtualServiceName = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-portmapping.html--module Stratosphere.ResourceProperties.AppMeshVirtualRouterPortMapping where--import Stratosphere.ResourceImports----- | Full data type definition for AppMeshVirtualRouterPortMapping. See--- 'appMeshVirtualRouterPortMapping' for a more convenient constructor.-data AppMeshVirtualRouterPortMapping =- AppMeshVirtualRouterPortMapping- { _appMeshVirtualRouterPortMappingPort :: Val Integer- , _appMeshVirtualRouterPortMappingProtocol :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualRouterPortMapping where- toJSON AppMeshVirtualRouterPortMapping{..} =- object $- catMaybes- [ (Just . ("Port",) . toJSON) _appMeshVirtualRouterPortMappingPort- , (Just . ("Protocol",) . toJSON) _appMeshVirtualRouterPortMappingProtocol- ]---- | Constructor for 'AppMeshVirtualRouterPortMapping' containing required--- fields as arguments.-appMeshVirtualRouterPortMapping- :: Val Integer -- ^ 'amvrpmPort'- -> Val Text -- ^ 'amvrpmProtocol'- -> AppMeshVirtualRouterPortMapping-appMeshVirtualRouterPortMapping portarg protocolarg =- AppMeshVirtualRouterPortMapping- { _appMeshVirtualRouterPortMappingPort = portarg- , _appMeshVirtualRouterPortMappingProtocol = protocolarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-portmapping.html#cfn-appmesh-virtualrouter-portmapping-port-amvrpmPort :: Lens' AppMeshVirtualRouterPortMapping (Val Integer)-amvrpmPort = lens _appMeshVirtualRouterPortMappingPort (\s a -> s { _appMeshVirtualRouterPortMappingPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-portmapping.html#cfn-appmesh-virtualrouter-portmapping-protocol-amvrpmProtocol :: Lens' AppMeshVirtualRouterPortMapping (Val Text)-amvrpmProtocol = lens _appMeshVirtualRouterPortMappingProtocol (\s a -> s { _appMeshVirtualRouterPortMappingProtocol = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-virtualrouterlistener.html--module Stratosphere.ResourceProperties.AppMeshVirtualRouterVirtualRouterListener where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualRouterPortMapping---- | Full data type definition for AppMeshVirtualRouterVirtualRouterListener.--- See 'appMeshVirtualRouterVirtualRouterListener' for a more convenient--- constructor.-data AppMeshVirtualRouterVirtualRouterListener =- AppMeshVirtualRouterVirtualRouterListener- { _appMeshVirtualRouterVirtualRouterListenerPortMapping :: AppMeshVirtualRouterPortMapping- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualRouterVirtualRouterListener where- toJSON AppMeshVirtualRouterVirtualRouterListener{..} =- object $- catMaybes- [ (Just . ("PortMapping",) . toJSON) _appMeshVirtualRouterVirtualRouterListenerPortMapping- ]---- | Constructor for 'AppMeshVirtualRouterVirtualRouterListener' containing--- required fields as arguments.-appMeshVirtualRouterVirtualRouterListener- :: AppMeshVirtualRouterPortMapping -- ^ 'amvrvrlPortMapping'- -> AppMeshVirtualRouterVirtualRouterListener-appMeshVirtualRouterVirtualRouterListener portMappingarg =- AppMeshVirtualRouterVirtualRouterListener- { _appMeshVirtualRouterVirtualRouterListenerPortMapping = portMappingarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-virtualrouterlistener.html#cfn-appmesh-virtualrouter-virtualrouterlistener-portmapping-amvrvrlPortMapping :: Lens' AppMeshVirtualRouterVirtualRouterListener AppMeshVirtualRouterPortMapping-amvrvrlPortMapping = lens _appMeshVirtualRouterVirtualRouterListenerPortMapping (\s a -> s { _appMeshVirtualRouterVirtualRouterListenerPortMapping = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-virtualrouterspec.html--module Stratosphere.ResourceProperties.AppMeshVirtualRouterVirtualRouterSpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualRouterVirtualRouterListener---- | Full data type definition for AppMeshVirtualRouterVirtualRouterSpec. See--- 'appMeshVirtualRouterVirtualRouterSpec' for a more convenient--- constructor.-data AppMeshVirtualRouterVirtualRouterSpec =- AppMeshVirtualRouterVirtualRouterSpec- { _appMeshVirtualRouterVirtualRouterSpecListeners :: [AppMeshVirtualRouterVirtualRouterListener]- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualRouterVirtualRouterSpec where- toJSON AppMeshVirtualRouterVirtualRouterSpec{..} =- object $- catMaybes- [ (Just . ("Listeners",) . toJSON) _appMeshVirtualRouterVirtualRouterSpecListeners- ]---- | Constructor for 'AppMeshVirtualRouterVirtualRouterSpec' containing--- required fields as arguments.-appMeshVirtualRouterVirtualRouterSpec- :: [AppMeshVirtualRouterVirtualRouterListener] -- ^ 'amvrvrsListeners'- -> AppMeshVirtualRouterVirtualRouterSpec-appMeshVirtualRouterVirtualRouterSpec listenersarg =- AppMeshVirtualRouterVirtualRouterSpec- { _appMeshVirtualRouterVirtualRouterSpecListeners = listenersarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-virtualrouterspec.html#cfn-appmesh-virtualrouter-virtualrouterspec-listeners-amvrvrsListeners :: Lens' AppMeshVirtualRouterVirtualRouterSpec [AppMeshVirtualRouterVirtualRouterListener]-amvrvrsListeners = lens _appMeshVirtualRouterVirtualRouterSpecListeners (\s a -> s { _appMeshVirtualRouterVirtualRouterSpecListeners = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualnodeserviceprovider.html--module Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualNodeServiceProvider where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualServiceVirtualNodeServiceProvider. See--- 'appMeshVirtualServiceVirtualNodeServiceProvider' for a more convenient--- constructor.-data AppMeshVirtualServiceVirtualNodeServiceProvider =- AppMeshVirtualServiceVirtualNodeServiceProvider- { _appMeshVirtualServiceVirtualNodeServiceProviderVirtualNodeName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualServiceVirtualNodeServiceProvider where- toJSON AppMeshVirtualServiceVirtualNodeServiceProvider{..} =- object $- catMaybes- [ (Just . ("VirtualNodeName",) . toJSON) _appMeshVirtualServiceVirtualNodeServiceProviderVirtualNodeName- ]---- | Constructor for 'AppMeshVirtualServiceVirtualNodeServiceProvider'--- containing required fields as arguments.-appMeshVirtualServiceVirtualNodeServiceProvider- :: Val Text -- ^ 'amvsvnspVirtualNodeName'- -> AppMeshVirtualServiceVirtualNodeServiceProvider-appMeshVirtualServiceVirtualNodeServiceProvider virtualNodeNamearg =- AppMeshVirtualServiceVirtualNodeServiceProvider- { _appMeshVirtualServiceVirtualNodeServiceProviderVirtualNodeName = virtualNodeNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualnodeserviceprovider.html#cfn-appmesh-virtualservice-virtualnodeserviceprovider-virtualnodename-amvsvnspVirtualNodeName :: Lens' AppMeshVirtualServiceVirtualNodeServiceProvider (Val Text)-amvsvnspVirtualNodeName = lens _appMeshVirtualServiceVirtualNodeServiceProviderVirtualNodeName (\s a -> s { _appMeshVirtualServiceVirtualNodeServiceProviderVirtualNodeName = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualrouterserviceprovider.html--module Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualRouterServiceProvider where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppMeshVirtualServiceVirtualRouterServiceProvider. See--- 'appMeshVirtualServiceVirtualRouterServiceProvider' for a more convenient--- constructor.-data AppMeshVirtualServiceVirtualRouterServiceProvider =- AppMeshVirtualServiceVirtualRouterServiceProvider- { _appMeshVirtualServiceVirtualRouterServiceProviderVirtualRouterName :: Val Text- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualServiceVirtualRouterServiceProvider where- toJSON AppMeshVirtualServiceVirtualRouterServiceProvider{..} =- object $- catMaybes- [ (Just . ("VirtualRouterName",) . toJSON) _appMeshVirtualServiceVirtualRouterServiceProviderVirtualRouterName- ]---- | Constructor for 'AppMeshVirtualServiceVirtualRouterServiceProvider'--- containing required fields as arguments.-appMeshVirtualServiceVirtualRouterServiceProvider- :: Val Text -- ^ 'amvsvrspVirtualRouterName'- -> AppMeshVirtualServiceVirtualRouterServiceProvider-appMeshVirtualServiceVirtualRouterServiceProvider virtualRouterNamearg =- AppMeshVirtualServiceVirtualRouterServiceProvider- { _appMeshVirtualServiceVirtualRouterServiceProviderVirtualRouterName = virtualRouterNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualrouterserviceprovider.html#cfn-appmesh-virtualservice-virtualrouterserviceprovider-virtualroutername-amvsvrspVirtualRouterName :: Lens' AppMeshVirtualServiceVirtualRouterServiceProvider (Val Text)-amvsvrspVirtualRouterName = lens _appMeshVirtualServiceVirtualRouterServiceProviderVirtualRouterName (\s a -> s { _appMeshVirtualServiceVirtualRouterServiceProviderVirtualRouterName = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualserviceprovider.html--module Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualServiceProvider where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualNodeServiceProvider-import Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualRouterServiceProvider---- | Full data type definition for--- AppMeshVirtualServiceVirtualServiceProvider. See--- 'appMeshVirtualServiceVirtualServiceProvider' for a more convenient--- constructor.-data AppMeshVirtualServiceVirtualServiceProvider =- AppMeshVirtualServiceVirtualServiceProvider- { _appMeshVirtualServiceVirtualServiceProviderVirtualNode :: Maybe AppMeshVirtualServiceVirtualNodeServiceProvider- , _appMeshVirtualServiceVirtualServiceProviderVirtualRouter :: Maybe AppMeshVirtualServiceVirtualRouterServiceProvider- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualServiceVirtualServiceProvider where- toJSON AppMeshVirtualServiceVirtualServiceProvider{..} =- object $- catMaybes- [ fmap (("VirtualNode",) . toJSON) _appMeshVirtualServiceVirtualServiceProviderVirtualNode- , fmap (("VirtualRouter",) . toJSON) _appMeshVirtualServiceVirtualServiceProviderVirtualRouter- ]---- | Constructor for 'AppMeshVirtualServiceVirtualServiceProvider' containing--- required fields as arguments.-appMeshVirtualServiceVirtualServiceProvider- :: AppMeshVirtualServiceVirtualServiceProvider-appMeshVirtualServiceVirtualServiceProvider =- AppMeshVirtualServiceVirtualServiceProvider- { _appMeshVirtualServiceVirtualServiceProviderVirtualNode = Nothing- , _appMeshVirtualServiceVirtualServiceProviderVirtualRouter = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualserviceprovider.html#cfn-appmesh-virtualservice-virtualserviceprovider-virtualnode-amvsvspVirtualNode :: Lens' AppMeshVirtualServiceVirtualServiceProvider (Maybe AppMeshVirtualServiceVirtualNodeServiceProvider)-amvsvspVirtualNode = lens _appMeshVirtualServiceVirtualServiceProviderVirtualNode (\s a -> s { _appMeshVirtualServiceVirtualServiceProviderVirtualNode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualserviceprovider.html#cfn-appmesh-virtualservice-virtualserviceprovider-virtualrouter-amvsvspVirtualRouter :: Lens' AppMeshVirtualServiceVirtualServiceProvider (Maybe AppMeshVirtualServiceVirtualRouterServiceProvider)-amvsvspVirtualRouter = lens _appMeshVirtualServiceVirtualServiceProviderVirtualRouter (\s a -> s { _appMeshVirtualServiceVirtualServiceProviderVirtualRouter = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualservicespec.html--module Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualServiceSpec where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppMeshVirtualServiceVirtualServiceProvider---- | Full data type definition for AppMeshVirtualServiceVirtualServiceSpec.--- See 'appMeshVirtualServiceVirtualServiceSpec' for a more convenient--- constructor.-data AppMeshVirtualServiceVirtualServiceSpec =- AppMeshVirtualServiceVirtualServiceSpec- { _appMeshVirtualServiceVirtualServiceSpecProvider :: Maybe AppMeshVirtualServiceVirtualServiceProvider- } deriving (Show, Eq)--instance ToJSON AppMeshVirtualServiceVirtualServiceSpec where- toJSON AppMeshVirtualServiceVirtualServiceSpec{..} =- object $- catMaybes- [ fmap (("Provider",) . toJSON) _appMeshVirtualServiceVirtualServiceSpecProvider- ]---- | Constructor for 'AppMeshVirtualServiceVirtualServiceSpec' containing--- required fields as arguments.-appMeshVirtualServiceVirtualServiceSpec- :: AppMeshVirtualServiceVirtualServiceSpec-appMeshVirtualServiceVirtualServiceSpec =- AppMeshVirtualServiceVirtualServiceSpec- { _appMeshVirtualServiceVirtualServiceSpecProvider = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualservicespec.html#cfn-appmesh-virtualservice-virtualservicespec-provider-amvsvssProvider :: Lens' AppMeshVirtualServiceVirtualServiceSpec (Maybe AppMeshVirtualServiceVirtualServiceProvider)-amvsvssProvider = lens _appMeshVirtualServiceVirtualServiceSpecProvider (\s a -> s { _appMeshVirtualServiceVirtualServiceSpecProvider = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-directoryconfig-serviceaccountcredentials.html--module Stratosphere.ResourceProperties.AppStreamDirectoryConfigServiceAccountCredentials where--import Stratosphere.ResourceImports----- | Full data type definition for--- AppStreamDirectoryConfigServiceAccountCredentials. See--- 'appStreamDirectoryConfigServiceAccountCredentials' for a more convenient--- constructor.-data AppStreamDirectoryConfigServiceAccountCredentials =- AppStreamDirectoryConfigServiceAccountCredentials- { _appStreamDirectoryConfigServiceAccountCredentialsAccountName :: Val Text- , _appStreamDirectoryConfigServiceAccountCredentialsAccountPassword :: Val Text- } deriving (Show, Eq)--instance ToJSON AppStreamDirectoryConfigServiceAccountCredentials where- toJSON AppStreamDirectoryConfigServiceAccountCredentials{..} =- object $- catMaybes- [ (Just . ("AccountName",) . toJSON) _appStreamDirectoryConfigServiceAccountCredentialsAccountName- , (Just . ("AccountPassword",) . toJSON) _appStreamDirectoryConfigServiceAccountCredentialsAccountPassword- ]---- | Constructor for 'AppStreamDirectoryConfigServiceAccountCredentials'--- containing required fields as arguments.-appStreamDirectoryConfigServiceAccountCredentials- :: Val Text -- ^ 'asdcsacAccountName'- -> Val Text -- ^ 'asdcsacAccountPassword'- -> AppStreamDirectoryConfigServiceAccountCredentials-appStreamDirectoryConfigServiceAccountCredentials accountNamearg accountPasswordarg =- AppStreamDirectoryConfigServiceAccountCredentials- { _appStreamDirectoryConfigServiceAccountCredentialsAccountName = accountNamearg- , _appStreamDirectoryConfigServiceAccountCredentialsAccountPassword = accountPasswordarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-directoryconfig-serviceaccountcredentials.html#cfn-appstream-directoryconfig-serviceaccountcredentials-accountname-asdcsacAccountName :: Lens' AppStreamDirectoryConfigServiceAccountCredentials (Val Text)-asdcsacAccountName = lens _appStreamDirectoryConfigServiceAccountCredentialsAccountName (\s a -> s { _appStreamDirectoryConfigServiceAccountCredentialsAccountName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-directoryconfig-serviceaccountcredentials.html#cfn-appstream-directoryconfig-serviceaccountcredentials-accountpassword-asdcsacAccountPassword :: Lens' AppStreamDirectoryConfigServiceAccountCredentials (Val Text)-asdcsacAccountPassword = lens _appStreamDirectoryConfigServiceAccountCredentialsAccountPassword (\s a -> s { _appStreamDirectoryConfigServiceAccountCredentialsAccountPassword = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-computecapacity.html--module Stratosphere.ResourceProperties.AppStreamFleetComputeCapacity where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamFleetComputeCapacity. See--- 'appStreamFleetComputeCapacity' for a more convenient constructor.-data AppStreamFleetComputeCapacity =- AppStreamFleetComputeCapacity- { _appStreamFleetComputeCapacityDesiredInstances :: Val Integer- } deriving (Show, Eq)--instance ToJSON AppStreamFleetComputeCapacity where- toJSON AppStreamFleetComputeCapacity{..} =- object $- catMaybes- [ (Just . ("DesiredInstances",) . toJSON) _appStreamFleetComputeCapacityDesiredInstances- ]---- | Constructor for 'AppStreamFleetComputeCapacity' containing required--- fields as arguments.-appStreamFleetComputeCapacity- :: Val Integer -- ^ 'asfccDesiredInstances'- -> AppStreamFleetComputeCapacity-appStreamFleetComputeCapacity desiredInstancesarg =- AppStreamFleetComputeCapacity- { _appStreamFleetComputeCapacityDesiredInstances = desiredInstancesarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-computecapacity.html#cfn-appstream-fleet-computecapacity-desiredinstances-asfccDesiredInstances :: Lens' AppStreamFleetComputeCapacity (Val Integer)-asfccDesiredInstances = lens _appStreamFleetComputeCapacityDesiredInstances (\s a -> s { _appStreamFleetComputeCapacityDesiredInstances = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-domainjoininfo.html--module Stratosphere.ResourceProperties.AppStreamFleetDomainJoinInfo where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamFleetDomainJoinInfo. See--- 'appStreamFleetDomainJoinInfo' for a more convenient constructor.-data AppStreamFleetDomainJoinInfo =- AppStreamFleetDomainJoinInfo- { _appStreamFleetDomainJoinInfoDirectoryName :: Maybe (Val Text)- , _appStreamFleetDomainJoinInfoOrganizationalUnitDistinguishedName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppStreamFleetDomainJoinInfo where- toJSON AppStreamFleetDomainJoinInfo{..} =- object $- catMaybes- [ fmap (("DirectoryName",) . toJSON) _appStreamFleetDomainJoinInfoDirectoryName- , fmap (("OrganizationalUnitDistinguishedName",) . toJSON) _appStreamFleetDomainJoinInfoOrganizationalUnitDistinguishedName- ]---- | Constructor for 'AppStreamFleetDomainJoinInfo' containing required fields--- as arguments.-appStreamFleetDomainJoinInfo- :: AppStreamFleetDomainJoinInfo-appStreamFleetDomainJoinInfo =- AppStreamFleetDomainJoinInfo- { _appStreamFleetDomainJoinInfoDirectoryName = Nothing- , _appStreamFleetDomainJoinInfoOrganizationalUnitDistinguishedName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-domainjoininfo.html#cfn-appstream-fleet-domainjoininfo-directoryname-asfdjiDirectoryName :: Lens' AppStreamFleetDomainJoinInfo (Maybe (Val Text))-asfdjiDirectoryName = lens _appStreamFleetDomainJoinInfoDirectoryName (\s a -> s { _appStreamFleetDomainJoinInfoDirectoryName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-domainjoininfo.html#cfn-appstream-fleet-domainjoininfo-organizationalunitdistinguishedname-asfdjiOrganizationalUnitDistinguishedName :: Lens' AppStreamFleetDomainJoinInfo (Maybe (Val Text))-asfdjiOrganizationalUnitDistinguishedName = lens _appStreamFleetDomainJoinInfoOrganizationalUnitDistinguishedName (\s a -> s { _appStreamFleetDomainJoinInfoOrganizationalUnitDistinguishedName = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-vpcconfig.html--module Stratosphere.ResourceProperties.AppStreamFleetVpcConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamFleetVpcConfig. See--- 'appStreamFleetVpcConfig' for a more convenient constructor.-data AppStreamFleetVpcConfig =- AppStreamFleetVpcConfig- { _appStreamFleetVpcConfigSecurityGroupIds :: Maybe (ValList Text)- , _appStreamFleetVpcConfigSubnetIds :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AppStreamFleetVpcConfig where- toJSON AppStreamFleetVpcConfig{..} =- object $- catMaybes- [ fmap (("SecurityGroupIds",) . toJSON) _appStreamFleetVpcConfigSecurityGroupIds- , fmap (("SubnetIds",) . toJSON) _appStreamFleetVpcConfigSubnetIds- ]---- | Constructor for 'AppStreamFleetVpcConfig' containing required fields as--- arguments.-appStreamFleetVpcConfig- :: AppStreamFleetVpcConfig-appStreamFleetVpcConfig =- AppStreamFleetVpcConfig- { _appStreamFleetVpcConfigSecurityGroupIds = Nothing- , _appStreamFleetVpcConfigSubnetIds = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-vpcconfig.html#cfn-appstream-fleet-vpcconfig-securitygroupids-asfvcSecurityGroupIds :: Lens' AppStreamFleetVpcConfig (Maybe (ValList Text))-asfvcSecurityGroupIds = lens _appStreamFleetVpcConfigSecurityGroupIds (\s a -> s { _appStreamFleetVpcConfigSecurityGroupIds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-fleet-vpcconfig.html#cfn-appstream-fleet-vpcconfig-subnetids-asfvcSubnetIds :: Lens' AppStreamFleetVpcConfig (Maybe (ValList Text))-asfvcSubnetIds = lens _appStreamFleetVpcConfigSubnetIds (\s a -> s { _appStreamFleetVpcConfigSubnetIds = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-accessendpoint.html--module Stratosphere.ResourceProperties.AppStreamImageBuilderAccessEndpoint where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamImageBuilderAccessEndpoint. See--- 'appStreamImageBuilderAccessEndpoint' for a more convenient constructor.-data AppStreamImageBuilderAccessEndpoint =- AppStreamImageBuilderAccessEndpoint- { _appStreamImageBuilderAccessEndpointEndpointType :: Val Text- , _appStreamImageBuilderAccessEndpointVpceId :: Val Text- } deriving (Show, Eq)--instance ToJSON AppStreamImageBuilderAccessEndpoint where- toJSON AppStreamImageBuilderAccessEndpoint{..} =- object $- catMaybes- [ (Just . ("EndpointType",) . toJSON) _appStreamImageBuilderAccessEndpointEndpointType- , (Just . ("VpceId",) . toJSON) _appStreamImageBuilderAccessEndpointVpceId- ]---- | Constructor for 'AppStreamImageBuilderAccessEndpoint' containing required--- fields as arguments.-appStreamImageBuilderAccessEndpoint- :: Val Text -- ^ 'asibaeEndpointType'- -> Val Text -- ^ 'asibaeVpceId'- -> AppStreamImageBuilderAccessEndpoint-appStreamImageBuilderAccessEndpoint endpointTypearg vpceIdarg =- AppStreamImageBuilderAccessEndpoint- { _appStreamImageBuilderAccessEndpointEndpointType = endpointTypearg- , _appStreamImageBuilderAccessEndpointVpceId = vpceIdarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-accessendpoint.html#cfn-appstream-imagebuilder-accessendpoint-endpointtype-asibaeEndpointType :: Lens' AppStreamImageBuilderAccessEndpoint (Val Text)-asibaeEndpointType = lens _appStreamImageBuilderAccessEndpointEndpointType (\s a -> s { _appStreamImageBuilderAccessEndpointEndpointType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-accessendpoint.html#cfn-appstream-imagebuilder-accessendpoint-vpceid-asibaeVpceId :: Lens' AppStreamImageBuilderAccessEndpoint (Val Text)-asibaeVpceId = lens _appStreamImageBuilderAccessEndpointVpceId (\s a -> s { _appStreamImageBuilderAccessEndpointVpceId = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-domainjoininfo.html--module Stratosphere.ResourceProperties.AppStreamImageBuilderDomainJoinInfo where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamImageBuilderDomainJoinInfo. See--- 'appStreamImageBuilderDomainJoinInfo' for a more convenient constructor.-data AppStreamImageBuilderDomainJoinInfo =- AppStreamImageBuilderDomainJoinInfo- { _appStreamImageBuilderDomainJoinInfoDirectoryName :: Maybe (Val Text)- , _appStreamImageBuilderDomainJoinInfoOrganizationalUnitDistinguishedName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppStreamImageBuilderDomainJoinInfo where- toJSON AppStreamImageBuilderDomainJoinInfo{..} =- object $- catMaybes- [ fmap (("DirectoryName",) . toJSON) _appStreamImageBuilderDomainJoinInfoDirectoryName- , fmap (("OrganizationalUnitDistinguishedName",) . toJSON) _appStreamImageBuilderDomainJoinInfoOrganizationalUnitDistinguishedName- ]---- | Constructor for 'AppStreamImageBuilderDomainJoinInfo' containing required--- fields as arguments.-appStreamImageBuilderDomainJoinInfo- :: AppStreamImageBuilderDomainJoinInfo-appStreamImageBuilderDomainJoinInfo =- AppStreamImageBuilderDomainJoinInfo- { _appStreamImageBuilderDomainJoinInfoDirectoryName = Nothing- , _appStreamImageBuilderDomainJoinInfoOrganizationalUnitDistinguishedName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-domainjoininfo.html#cfn-appstream-imagebuilder-domainjoininfo-directoryname-asibdjiDirectoryName :: Lens' AppStreamImageBuilderDomainJoinInfo (Maybe (Val Text))-asibdjiDirectoryName = lens _appStreamImageBuilderDomainJoinInfoDirectoryName (\s a -> s { _appStreamImageBuilderDomainJoinInfoDirectoryName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-domainjoininfo.html#cfn-appstream-imagebuilder-domainjoininfo-organizationalunitdistinguishedname-asibdjiOrganizationalUnitDistinguishedName :: Lens' AppStreamImageBuilderDomainJoinInfo (Maybe (Val Text))-asibdjiOrganizationalUnitDistinguishedName = lens _appStreamImageBuilderDomainJoinInfoOrganizationalUnitDistinguishedName (\s a -> s { _appStreamImageBuilderDomainJoinInfoOrganizationalUnitDistinguishedName = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-vpcconfig.html--module Stratosphere.ResourceProperties.AppStreamImageBuilderVpcConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamImageBuilderVpcConfig. See--- 'appStreamImageBuilderVpcConfig' for a more convenient constructor.-data AppStreamImageBuilderVpcConfig =- AppStreamImageBuilderVpcConfig- { _appStreamImageBuilderVpcConfigSecurityGroupIds :: Maybe (ValList Text)- , _appStreamImageBuilderVpcConfigSubnetIds :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AppStreamImageBuilderVpcConfig where- toJSON AppStreamImageBuilderVpcConfig{..} =- object $- catMaybes- [ fmap (("SecurityGroupIds",) . toJSON) _appStreamImageBuilderVpcConfigSecurityGroupIds- , fmap (("SubnetIds",) . toJSON) _appStreamImageBuilderVpcConfigSubnetIds- ]---- | Constructor for 'AppStreamImageBuilderVpcConfig' containing required--- fields as arguments.-appStreamImageBuilderVpcConfig- :: AppStreamImageBuilderVpcConfig-appStreamImageBuilderVpcConfig =- AppStreamImageBuilderVpcConfig- { _appStreamImageBuilderVpcConfigSecurityGroupIds = Nothing- , _appStreamImageBuilderVpcConfigSubnetIds = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-vpcconfig.html#cfn-appstream-imagebuilder-vpcconfig-securitygroupids-asibvcSecurityGroupIds :: Lens' AppStreamImageBuilderVpcConfig (Maybe (ValList Text))-asibvcSecurityGroupIds = lens _appStreamImageBuilderVpcConfigSecurityGroupIds (\s a -> s { _appStreamImageBuilderVpcConfigSecurityGroupIds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-imagebuilder-vpcconfig.html#cfn-appstream-imagebuilder-vpcconfig-subnetids-asibvcSubnetIds :: Lens' AppStreamImageBuilderVpcConfig (Maybe (ValList Text))-asibvcSubnetIds = lens _appStreamImageBuilderVpcConfigSubnetIds (\s a -> s { _appStreamImageBuilderVpcConfigSubnetIds = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-accessendpoint.html--module Stratosphere.ResourceProperties.AppStreamStackAccessEndpoint where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamStackAccessEndpoint. See--- 'appStreamStackAccessEndpoint' for a more convenient constructor.-data AppStreamStackAccessEndpoint =- AppStreamStackAccessEndpoint- { _appStreamStackAccessEndpointEndpointType :: Val Text- , _appStreamStackAccessEndpointVpceId :: Val Text- } deriving (Show, Eq)--instance ToJSON AppStreamStackAccessEndpoint where- toJSON AppStreamStackAccessEndpoint{..} =- object $- catMaybes- [ (Just . ("EndpointType",) . toJSON) _appStreamStackAccessEndpointEndpointType- , (Just . ("VpceId",) . toJSON) _appStreamStackAccessEndpointVpceId- ]---- | Constructor for 'AppStreamStackAccessEndpoint' containing required fields--- as arguments.-appStreamStackAccessEndpoint- :: Val Text -- ^ 'assaeEndpointType'- -> Val Text -- ^ 'assaeVpceId'- -> AppStreamStackAccessEndpoint-appStreamStackAccessEndpoint endpointTypearg vpceIdarg =- AppStreamStackAccessEndpoint- { _appStreamStackAccessEndpointEndpointType = endpointTypearg- , _appStreamStackAccessEndpointVpceId = vpceIdarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-accessendpoint.html#cfn-appstream-stack-accessendpoint-endpointtype-assaeEndpointType :: Lens' AppStreamStackAccessEndpoint (Val Text)-assaeEndpointType = lens _appStreamStackAccessEndpointEndpointType (\s a -> s { _appStreamStackAccessEndpointEndpointType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-accessendpoint.html#cfn-appstream-stack-accessendpoint-vpceid-assaeVpceId :: Lens' AppStreamStackAccessEndpoint (Val Text)-assaeVpceId = lens _appStreamStackAccessEndpointVpceId (\s a -> s { _appStreamStackAccessEndpointVpceId = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-applicationsettings.html--module Stratosphere.ResourceProperties.AppStreamStackApplicationSettings where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamStackApplicationSettings. See--- 'appStreamStackApplicationSettings' for a more convenient constructor.-data AppStreamStackApplicationSettings =- AppStreamStackApplicationSettings- { _appStreamStackApplicationSettingsEnabled :: Val Bool- , _appStreamStackApplicationSettingsSettingsGroup :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppStreamStackApplicationSettings where- toJSON AppStreamStackApplicationSettings{..} =- object $- catMaybes- [ (Just . ("Enabled",) . toJSON) _appStreamStackApplicationSettingsEnabled- , fmap (("SettingsGroup",) . toJSON) _appStreamStackApplicationSettingsSettingsGroup- ]---- | Constructor for 'AppStreamStackApplicationSettings' containing required--- fields as arguments.-appStreamStackApplicationSettings- :: Val Bool -- ^ 'assasEnabled'- -> AppStreamStackApplicationSettings-appStreamStackApplicationSettings enabledarg =- AppStreamStackApplicationSettings- { _appStreamStackApplicationSettingsEnabled = enabledarg- , _appStreamStackApplicationSettingsSettingsGroup = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-applicationsettings.html#cfn-appstream-stack-applicationsettings-enabled-assasEnabled :: Lens' AppStreamStackApplicationSettings (Val Bool)-assasEnabled = lens _appStreamStackApplicationSettingsEnabled (\s a -> s { _appStreamStackApplicationSettingsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-applicationsettings.html#cfn-appstream-stack-applicationsettings-settingsgroup-assasSettingsGroup :: Lens' AppStreamStackApplicationSettings (Maybe (Val Text))-assasSettingsGroup = lens _appStreamStackApplicationSettingsSettingsGroup (\s a -> s { _appStreamStackApplicationSettingsSettingsGroup = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-storageconnector.html--module Stratosphere.ResourceProperties.AppStreamStackStorageConnector where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamStackStorageConnector. See--- 'appStreamStackStorageConnector' for a more convenient constructor.-data AppStreamStackStorageConnector =- AppStreamStackStorageConnector- { _appStreamStackStorageConnectorConnectorType :: Val Text- , _appStreamStackStorageConnectorDomains :: Maybe (ValList Text)- , _appStreamStackStorageConnectorResourceIdentifier :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppStreamStackStorageConnector where- toJSON AppStreamStackStorageConnector{..} =- object $- catMaybes- [ (Just . ("ConnectorType",) . toJSON) _appStreamStackStorageConnectorConnectorType- , fmap (("Domains",) . toJSON) _appStreamStackStorageConnectorDomains- , fmap (("ResourceIdentifier",) . toJSON) _appStreamStackStorageConnectorResourceIdentifier- ]---- | Constructor for 'AppStreamStackStorageConnector' containing required--- fields as arguments.-appStreamStackStorageConnector- :: Val Text -- ^ 'assscConnectorType'- -> AppStreamStackStorageConnector-appStreamStackStorageConnector connectorTypearg =- AppStreamStackStorageConnector- { _appStreamStackStorageConnectorConnectorType = connectorTypearg- , _appStreamStackStorageConnectorDomains = Nothing- , _appStreamStackStorageConnectorResourceIdentifier = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-storageconnector.html#cfn-appstream-stack-storageconnector-connectortype-assscConnectorType :: Lens' AppStreamStackStorageConnector (Val Text)-assscConnectorType = lens _appStreamStackStorageConnectorConnectorType (\s a -> s { _appStreamStackStorageConnectorConnectorType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-storageconnector.html#cfn-appstream-stack-storageconnector-domains-assscDomains :: Lens' AppStreamStackStorageConnector (Maybe (ValList Text))-assscDomains = lens _appStreamStackStorageConnectorDomains (\s a -> s { _appStreamStackStorageConnectorDomains = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-storageconnector.html#cfn-appstream-stack-storageconnector-resourceidentifier-assscResourceIdentifier :: Lens' AppStreamStackStorageConnector (Maybe (Val Text))-assscResourceIdentifier = lens _appStreamStackStorageConnectorResourceIdentifier (\s a -> s { _appStreamStackStorageConnectorResourceIdentifier = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-usersetting.html--module Stratosphere.ResourceProperties.AppStreamStackUserSetting where--import Stratosphere.ResourceImports----- | Full data type definition for AppStreamStackUserSetting. See--- 'appStreamStackUserSetting' for a more convenient constructor.-data AppStreamStackUserSetting =- AppStreamStackUserSetting- { _appStreamStackUserSettingAction :: Val Text- , _appStreamStackUserSettingPermission :: Val Text- } deriving (Show, Eq)--instance ToJSON AppStreamStackUserSetting where- toJSON AppStreamStackUserSetting{..} =- object $- catMaybes- [ (Just . ("Action",) . toJSON) _appStreamStackUserSettingAction- , (Just . ("Permission",) . toJSON) _appStreamStackUserSettingPermission- ]---- | Constructor for 'AppStreamStackUserSetting' containing required fields as--- arguments.-appStreamStackUserSetting- :: Val Text -- ^ 'assusAction'- -> Val Text -- ^ 'assusPermission'- -> AppStreamStackUserSetting-appStreamStackUserSetting actionarg permissionarg =- AppStreamStackUserSetting- { _appStreamStackUserSettingAction = actionarg- , _appStreamStackUserSettingPermission = permissionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-usersetting.html#cfn-appstream-stack-usersetting-action-assusAction :: Lens' AppStreamStackUserSetting (Val Text)-assusAction = lens _appStreamStackUserSettingAction (\s a -> s { _appStreamStackUserSettingAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appstream-stack-usersetting.html#cfn-appstream-stack-usersetting-permission-assusPermission :: Lens' AppStreamStackUserSetting (Val Text)-assusPermission = lens _appStreamStackUserSettingPermission (\s a -> s { _appStreamStackUserSettingPermission = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-authorizationconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceAuthorizationConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppSyncDataSourceAwsIamConfig---- | Full data type definition for AppSyncDataSourceAuthorizationConfig. See--- 'appSyncDataSourceAuthorizationConfig' for a more convenient constructor.-data AppSyncDataSourceAuthorizationConfig =- AppSyncDataSourceAuthorizationConfig- { _appSyncDataSourceAuthorizationConfigAuthorizationType :: Val Text- , _appSyncDataSourceAuthorizationConfigAwsIamConfig :: Maybe AppSyncDataSourceAwsIamConfig- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceAuthorizationConfig where- toJSON AppSyncDataSourceAuthorizationConfig{..} =- object $- catMaybes- [ (Just . ("AuthorizationType",) . toJSON) _appSyncDataSourceAuthorizationConfigAuthorizationType- , fmap (("AwsIamConfig",) . toJSON) _appSyncDataSourceAuthorizationConfigAwsIamConfig- ]---- | Constructor for 'AppSyncDataSourceAuthorizationConfig' containing--- required fields as arguments.-appSyncDataSourceAuthorizationConfig- :: Val Text -- ^ 'asdsacAuthorizationType'- -> AppSyncDataSourceAuthorizationConfig-appSyncDataSourceAuthorizationConfig authorizationTypearg =- AppSyncDataSourceAuthorizationConfig- { _appSyncDataSourceAuthorizationConfigAuthorizationType = authorizationTypearg- , _appSyncDataSourceAuthorizationConfigAwsIamConfig = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-authorizationconfig.html#cfn-appsync-datasource-authorizationconfig-authorizationtype-asdsacAuthorizationType :: Lens' AppSyncDataSourceAuthorizationConfig (Val Text)-asdsacAuthorizationType = lens _appSyncDataSourceAuthorizationConfigAuthorizationType (\s a -> s { _appSyncDataSourceAuthorizationConfigAuthorizationType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-authorizationconfig.html#cfn-appsync-datasource-authorizationconfig-awsiamconfig-asdsacAwsIamConfig :: Lens' AppSyncDataSourceAuthorizationConfig (Maybe AppSyncDataSourceAwsIamConfig)-asdsacAwsIamConfig = lens _appSyncDataSourceAuthorizationConfigAwsIamConfig (\s a -> s { _appSyncDataSourceAuthorizationConfigAwsIamConfig = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-awsiamconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceAwsIamConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncDataSourceAwsIamConfig. See--- 'appSyncDataSourceAwsIamConfig' for a more convenient constructor.-data AppSyncDataSourceAwsIamConfig =- AppSyncDataSourceAwsIamConfig- { _appSyncDataSourceAwsIamConfigSigningRegion :: Maybe (Val Text)- , _appSyncDataSourceAwsIamConfigSigningServiceName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceAwsIamConfig where- toJSON AppSyncDataSourceAwsIamConfig{..} =- object $- catMaybes- [ fmap (("SigningRegion",) . toJSON) _appSyncDataSourceAwsIamConfigSigningRegion- , fmap (("SigningServiceName",) . toJSON) _appSyncDataSourceAwsIamConfigSigningServiceName- ]---- | Constructor for 'AppSyncDataSourceAwsIamConfig' containing required--- fields as arguments.-appSyncDataSourceAwsIamConfig- :: AppSyncDataSourceAwsIamConfig-appSyncDataSourceAwsIamConfig =- AppSyncDataSourceAwsIamConfig- { _appSyncDataSourceAwsIamConfigSigningRegion = Nothing- , _appSyncDataSourceAwsIamConfigSigningServiceName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-awsiamconfig.html#cfn-appsync-datasource-awsiamconfig-signingregion-asdsaicSigningRegion :: Lens' AppSyncDataSourceAwsIamConfig (Maybe (Val Text))-asdsaicSigningRegion = lens _appSyncDataSourceAwsIamConfigSigningRegion (\s a -> s { _appSyncDataSourceAwsIamConfigSigningRegion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-awsiamconfig.html#cfn-appsync-datasource-awsiamconfig-signingservicename-asdsaicSigningServiceName :: Lens' AppSyncDataSourceAwsIamConfig (Maybe (Val Text))-asdsaicSigningServiceName = lens _appSyncDataSourceAwsIamConfigSigningServiceName (\s a -> s { _appSyncDataSourceAwsIamConfigSigningServiceName = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-deltasyncconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceDeltaSyncConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncDataSourceDeltaSyncConfig. See--- 'appSyncDataSourceDeltaSyncConfig' for a more convenient constructor.-data AppSyncDataSourceDeltaSyncConfig =- AppSyncDataSourceDeltaSyncConfig- { _appSyncDataSourceDeltaSyncConfigBaseTableTTL :: Val Text- , _appSyncDataSourceDeltaSyncConfigDeltaSyncTableName :: Val Text- , _appSyncDataSourceDeltaSyncConfigDeltaSyncTableTTL :: Val Text- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceDeltaSyncConfig where- toJSON AppSyncDataSourceDeltaSyncConfig{..} =- object $- catMaybes- [ (Just . ("BaseTableTTL",) . toJSON) _appSyncDataSourceDeltaSyncConfigBaseTableTTL- , (Just . ("DeltaSyncTableName",) . toJSON) _appSyncDataSourceDeltaSyncConfigDeltaSyncTableName- , (Just . ("DeltaSyncTableTTL",) . toJSON) _appSyncDataSourceDeltaSyncConfigDeltaSyncTableTTL- ]---- | Constructor for 'AppSyncDataSourceDeltaSyncConfig' containing required--- fields as arguments.-appSyncDataSourceDeltaSyncConfig- :: Val Text -- ^ 'asdsdscBaseTableTTL'- -> Val Text -- ^ 'asdsdscDeltaSyncTableName'- -> Val Text -- ^ 'asdsdscDeltaSyncTableTTL'- -> AppSyncDataSourceDeltaSyncConfig-appSyncDataSourceDeltaSyncConfig baseTableTTLarg deltaSyncTableNamearg deltaSyncTableTTLarg =- AppSyncDataSourceDeltaSyncConfig- { _appSyncDataSourceDeltaSyncConfigBaseTableTTL = baseTableTTLarg- , _appSyncDataSourceDeltaSyncConfigDeltaSyncTableName = deltaSyncTableNamearg- , _appSyncDataSourceDeltaSyncConfigDeltaSyncTableTTL = deltaSyncTableTTLarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-deltasyncconfig.html#cfn-appsync-datasource-deltasyncconfig-basetablettl-asdsdscBaseTableTTL :: Lens' AppSyncDataSourceDeltaSyncConfig (Val Text)-asdsdscBaseTableTTL = lens _appSyncDataSourceDeltaSyncConfigBaseTableTTL (\s a -> s { _appSyncDataSourceDeltaSyncConfigBaseTableTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-deltasyncconfig.html#cfn-appsync-datasource-deltasyncconfig-deltasynctablename-asdsdscDeltaSyncTableName :: Lens' AppSyncDataSourceDeltaSyncConfig (Val Text)-asdsdscDeltaSyncTableName = lens _appSyncDataSourceDeltaSyncConfigDeltaSyncTableName (\s a -> s { _appSyncDataSourceDeltaSyncConfigDeltaSyncTableName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-deltasyncconfig.html#cfn-appsync-datasource-deltasyncconfig-deltasynctablettl-asdsdscDeltaSyncTableTTL :: Lens' AppSyncDataSourceDeltaSyncConfig (Val Text)-asdsdscDeltaSyncTableTTL = lens _appSyncDataSourceDeltaSyncConfigDeltaSyncTableTTL (\s a -> s { _appSyncDataSourceDeltaSyncConfigDeltaSyncTableTTL = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-dynamodbconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceDynamoDBConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppSyncDataSourceDeltaSyncConfig---- | Full data type definition for AppSyncDataSourceDynamoDBConfig. See--- 'appSyncDataSourceDynamoDBConfig' for a more convenient constructor.-data AppSyncDataSourceDynamoDBConfig =- AppSyncDataSourceDynamoDBConfig- { _appSyncDataSourceDynamoDBConfigAwsRegion :: Val Text- , _appSyncDataSourceDynamoDBConfigDeltaSyncConfig :: Maybe AppSyncDataSourceDeltaSyncConfig- , _appSyncDataSourceDynamoDBConfigTableName :: Val Text- , _appSyncDataSourceDynamoDBConfigUseCallerCredentials :: Maybe (Val Bool)- , _appSyncDataSourceDynamoDBConfigVersioned :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceDynamoDBConfig where- toJSON AppSyncDataSourceDynamoDBConfig{..} =- object $- catMaybes- [ (Just . ("AwsRegion",) . toJSON) _appSyncDataSourceDynamoDBConfigAwsRegion- , fmap (("DeltaSyncConfig",) . toJSON) _appSyncDataSourceDynamoDBConfigDeltaSyncConfig- , (Just . ("TableName",) . toJSON) _appSyncDataSourceDynamoDBConfigTableName- , fmap (("UseCallerCredentials",) . toJSON) _appSyncDataSourceDynamoDBConfigUseCallerCredentials- , fmap (("Versioned",) . toJSON) _appSyncDataSourceDynamoDBConfigVersioned- ]---- | Constructor for 'AppSyncDataSourceDynamoDBConfig' containing required--- fields as arguments.-appSyncDataSourceDynamoDBConfig- :: Val Text -- ^ 'asdsddbcAwsRegion'- -> Val Text -- ^ 'asdsddbcTableName'- -> AppSyncDataSourceDynamoDBConfig-appSyncDataSourceDynamoDBConfig awsRegionarg tableNamearg =- AppSyncDataSourceDynamoDBConfig- { _appSyncDataSourceDynamoDBConfigAwsRegion = awsRegionarg- , _appSyncDataSourceDynamoDBConfigDeltaSyncConfig = Nothing- , _appSyncDataSourceDynamoDBConfigTableName = tableNamearg- , _appSyncDataSourceDynamoDBConfigUseCallerCredentials = Nothing- , _appSyncDataSourceDynamoDBConfigVersioned = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-dynamodbconfig.html#cfn-appsync-datasource-dynamodbconfig-awsregion-asdsddbcAwsRegion :: Lens' AppSyncDataSourceDynamoDBConfig (Val Text)-asdsddbcAwsRegion = lens _appSyncDataSourceDynamoDBConfigAwsRegion (\s a -> s { _appSyncDataSourceDynamoDBConfigAwsRegion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-dynamodbconfig.html#cfn-appsync-datasource-dynamodbconfig-deltasyncconfig-asdsddbcDeltaSyncConfig :: Lens' AppSyncDataSourceDynamoDBConfig (Maybe AppSyncDataSourceDeltaSyncConfig)-asdsddbcDeltaSyncConfig = lens _appSyncDataSourceDynamoDBConfigDeltaSyncConfig (\s a -> s { _appSyncDataSourceDynamoDBConfigDeltaSyncConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-dynamodbconfig.html#cfn-appsync-datasource-dynamodbconfig-tablename-asdsddbcTableName :: Lens' AppSyncDataSourceDynamoDBConfig (Val Text)-asdsddbcTableName = lens _appSyncDataSourceDynamoDBConfigTableName (\s a -> s { _appSyncDataSourceDynamoDBConfigTableName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-dynamodbconfig.html#cfn-appsync-datasource-dynamodbconfig-usecallercredentials-asdsddbcUseCallerCredentials :: Lens' AppSyncDataSourceDynamoDBConfig (Maybe (Val Bool))-asdsddbcUseCallerCredentials = lens _appSyncDataSourceDynamoDBConfigUseCallerCredentials (\s a -> s { _appSyncDataSourceDynamoDBConfigUseCallerCredentials = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-dynamodbconfig.html#cfn-appsync-datasource-dynamodbconfig-versioned-asdsddbcVersioned :: Lens' AppSyncDataSourceDynamoDBConfig (Maybe (Val Bool))-asdsddbcVersioned = lens _appSyncDataSourceDynamoDBConfigVersioned (\s a -> s { _appSyncDataSourceDynamoDBConfigVersioned = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-elasticsearchconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceElasticsearchConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncDataSourceElasticsearchConfig. See--- 'appSyncDataSourceElasticsearchConfig' for a more convenient constructor.-data AppSyncDataSourceElasticsearchConfig =- AppSyncDataSourceElasticsearchConfig- { _appSyncDataSourceElasticsearchConfigAwsRegion :: Val Text- , _appSyncDataSourceElasticsearchConfigEndpoint :: Val Text- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceElasticsearchConfig where- toJSON AppSyncDataSourceElasticsearchConfig{..} =- object $- catMaybes- [ (Just . ("AwsRegion",) . toJSON) _appSyncDataSourceElasticsearchConfigAwsRegion- , (Just . ("Endpoint",) . toJSON) _appSyncDataSourceElasticsearchConfigEndpoint- ]---- | Constructor for 'AppSyncDataSourceElasticsearchConfig' containing--- required fields as arguments.-appSyncDataSourceElasticsearchConfig- :: Val Text -- ^ 'asdsecAwsRegion'- -> Val Text -- ^ 'asdsecEndpoint'- -> AppSyncDataSourceElasticsearchConfig-appSyncDataSourceElasticsearchConfig awsRegionarg endpointarg =- AppSyncDataSourceElasticsearchConfig- { _appSyncDataSourceElasticsearchConfigAwsRegion = awsRegionarg- , _appSyncDataSourceElasticsearchConfigEndpoint = endpointarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-elasticsearchconfig.html#cfn-appsync-datasource-elasticsearchconfig-awsregion-asdsecAwsRegion :: Lens' AppSyncDataSourceElasticsearchConfig (Val Text)-asdsecAwsRegion = lens _appSyncDataSourceElasticsearchConfigAwsRegion (\s a -> s { _appSyncDataSourceElasticsearchConfigAwsRegion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-elasticsearchconfig.html#cfn-appsync-datasource-elasticsearchconfig-endpoint-asdsecEndpoint :: Lens' AppSyncDataSourceElasticsearchConfig (Val Text)-asdsecEndpoint = lens _appSyncDataSourceElasticsearchConfigEndpoint (\s a -> s { _appSyncDataSourceElasticsearchConfigEndpoint = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-httpconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceHttpConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppSyncDataSourceAuthorizationConfig---- | Full data type definition for AppSyncDataSourceHttpConfig. See--- 'appSyncDataSourceHttpConfig' for a more convenient constructor.-data AppSyncDataSourceHttpConfig =- AppSyncDataSourceHttpConfig- { _appSyncDataSourceHttpConfigAuthorizationConfig :: Maybe AppSyncDataSourceAuthorizationConfig- , _appSyncDataSourceHttpConfigEndpoint :: Val Text- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceHttpConfig where- toJSON AppSyncDataSourceHttpConfig{..} =- object $- catMaybes- [ fmap (("AuthorizationConfig",) . toJSON) _appSyncDataSourceHttpConfigAuthorizationConfig- , (Just . ("Endpoint",) . toJSON) _appSyncDataSourceHttpConfigEndpoint- ]---- | Constructor for 'AppSyncDataSourceHttpConfig' containing required fields--- as arguments.-appSyncDataSourceHttpConfig- :: Val Text -- ^ 'asdshcEndpoint'- -> AppSyncDataSourceHttpConfig-appSyncDataSourceHttpConfig endpointarg =- AppSyncDataSourceHttpConfig- { _appSyncDataSourceHttpConfigAuthorizationConfig = Nothing- , _appSyncDataSourceHttpConfigEndpoint = endpointarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-httpconfig.html#cfn-appsync-datasource-httpconfig-authorizationconfig-asdshcAuthorizationConfig :: Lens' AppSyncDataSourceHttpConfig (Maybe AppSyncDataSourceAuthorizationConfig)-asdshcAuthorizationConfig = lens _appSyncDataSourceHttpConfigAuthorizationConfig (\s a -> s { _appSyncDataSourceHttpConfigAuthorizationConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-httpconfig.html#cfn-appsync-datasource-httpconfig-endpoint-asdshcEndpoint :: Lens' AppSyncDataSourceHttpConfig (Val Text)-asdshcEndpoint = lens _appSyncDataSourceHttpConfigEndpoint (\s a -> s { _appSyncDataSourceHttpConfigEndpoint = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-lambdaconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceLambdaConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncDataSourceLambdaConfig. See--- 'appSyncDataSourceLambdaConfig' for a more convenient constructor.-data AppSyncDataSourceLambdaConfig =- AppSyncDataSourceLambdaConfig- { _appSyncDataSourceLambdaConfigLambdaFunctionArn :: Val Text- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceLambdaConfig where- toJSON AppSyncDataSourceLambdaConfig{..} =- object $- catMaybes- [ (Just . ("LambdaFunctionArn",) . toJSON) _appSyncDataSourceLambdaConfigLambdaFunctionArn- ]---- | Constructor for 'AppSyncDataSourceLambdaConfig' containing required--- fields as arguments.-appSyncDataSourceLambdaConfig- :: Val Text -- ^ 'asdslcLambdaFunctionArn'- -> AppSyncDataSourceLambdaConfig-appSyncDataSourceLambdaConfig lambdaFunctionArnarg =- AppSyncDataSourceLambdaConfig- { _appSyncDataSourceLambdaConfigLambdaFunctionArn = lambdaFunctionArnarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-lambdaconfig.html#cfn-appsync-datasource-lambdaconfig-lambdafunctionarn-asdslcLambdaFunctionArn :: Lens' AppSyncDataSourceLambdaConfig (Val Text)-asdslcLambdaFunctionArn = lens _appSyncDataSourceLambdaConfigLambdaFunctionArn (\s a -> s { _appSyncDataSourceLambdaConfigLambdaFunctionArn = a })
@@ -1,70 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-rdshttpendpointconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceRdsHttpEndpointConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncDataSourceRdsHttpEndpointConfig. See--- 'appSyncDataSourceRdsHttpEndpointConfig' for a more convenient--- constructor.-data AppSyncDataSourceRdsHttpEndpointConfig =- AppSyncDataSourceRdsHttpEndpointConfig- { _appSyncDataSourceRdsHttpEndpointConfigAwsRegion :: Val Text- , _appSyncDataSourceRdsHttpEndpointConfigAwsSecretStoreArn :: Val Text- , _appSyncDataSourceRdsHttpEndpointConfigDatabaseName :: Maybe (Val Text)- , _appSyncDataSourceRdsHttpEndpointConfigDbClusterIdentifier :: Val Text- , _appSyncDataSourceRdsHttpEndpointConfigSchema :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceRdsHttpEndpointConfig where- toJSON AppSyncDataSourceRdsHttpEndpointConfig{..} =- object $- catMaybes- [ (Just . ("AwsRegion",) . toJSON) _appSyncDataSourceRdsHttpEndpointConfigAwsRegion- , (Just . ("AwsSecretStoreArn",) . toJSON) _appSyncDataSourceRdsHttpEndpointConfigAwsSecretStoreArn- , fmap (("DatabaseName",) . toJSON) _appSyncDataSourceRdsHttpEndpointConfigDatabaseName- , (Just . ("DbClusterIdentifier",) . toJSON) _appSyncDataSourceRdsHttpEndpointConfigDbClusterIdentifier- , fmap (("Schema",) . toJSON) _appSyncDataSourceRdsHttpEndpointConfigSchema- ]---- | Constructor for 'AppSyncDataSourceRdsHttpEndpointConfig' containing--- required fields as arguments.-appSyncDataSourceRdsHttpEndpointConfig- :: Val Text -- ^ 'asdsrhecAwsRegion'- -> Val Text -- ^ 'asdsrhecAwsSecretStoreArn'- -> Val Text -- ^ 'asdsrhecDbClusterIdentifier'- -> AppSyncDataSourceRdsHttpEndpointConfig-appSyncDataSourceRdsHttpEndpointConfig awsRegionarg awsSecretStoreArnarg dbClusterIdentifierarg =- AppSyncDataSourceRdsHttpEndpointConfig- { _appSyncDataSourceRdsHttpEndpointConfigAwsRegion = awsRegionarg- , _appSyncDataSourceRdsHttpEndpointConfigAwsSecretStoreArn = awsSecretStoreArnarg- , _appSyncDataSourceRdsHttpEndpointConfigDatabaseName = Nothing- , _appSyncDataSourceRdsHttpEndpointConfigDbClusterIdentifier = dbClusterIdentifierarg- , _appSyncDataSourceRdsHttpEndpointConfigSchema = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-rdshttpendpointconfig.html#cfn-appsync-datasource-rdshttpendpointconfig-awsregion-asdsrhecAwsRegion :: Lens' AppSyncDataSourceRdsHttpEndpointConfig (Val Text)-asdsrhecAwsRegion = lens _appSyncDataSourceRdsHttpEndpointConfigAwsRegion (\s a -> s { _appSyncDataSourceRdsHttpEndpointConfigAwsRegion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-rdshttpendpointconfig.html#cfn-appsync-datasource-rdshttpendpointconfig-awssecretstorearn-asdsrhecAwsSecretStoreArn :: Lens' AppSyncDataSourceRdsHttpEndpointConfig (Val Text)-asdsrhecAwsSecretStoreArn = lens _appSyncDataSourceRdsHttpEndpointConfigAwsSecretStoreArn (\s a -> s { _appSyncDataSourceRdsHttpEndpointConfigAwsSecretStoreArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-rdshttpendpointconfig.html#cfn-appsync-datasource-rdshttpendpointconfig-databasename-asdsrhecDatabaseName :: Lens' AppSyncDataSourceRdsHttpEndpointConfig (Maybe (Val Text))-asdsrhecDatabaseName = lens _appSyncDataSourceRdsHttpEndpointConfigDatabaseName (\s a -> s { _appSyncDataSourceRdsHttpEndpointConfigDatabaseName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-rdshttpendpointconfig.html#cfn-appsync-datasource-rdshttpendpointconfig-dbclusteridentifier-asdsrhecDbClusterIdentifier :: Lens' AppSyncDataSourceRdsHttpEndpointConfig (Val Text)-asdsrhecDbClusterIdentifier = lens _appSyncDataSourceRdsHttpEndpointConfigDbClusterIdentifier (\s a -> s { _appSyncDataSourceRdsHttpEndpointConfigDbClusterIdentifier = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-rdshttpendpointconfig.html#cfn-appsync-datasource-rdshttpendpointconfig-schema-asdsrhecSchema :: Lens' AppSyncDataSourceRdsHttpEndpointConfig (Maybe (Val Text))-asdsrhecSchema = lens _appSyncDataSourceRdsHttpEndpointConfigSchema (\s a -> s { _appSyncDataSourceRdsHttpEndpointConfigSchema = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-relationaldatabaseconfig.html--module Stratosphere.ResourceProperties.AppSyncDataSourceRelationalDatabaseConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppSyncDataSourceRdsHttpEndpointConfig---- | Full data type definition for AppSyncDataSourceRelationalDatabaseConfig.--- See 'appSyncDataSourceRelationalDatabaseConfig' for a more convenient--- constructor.-data AppSyncDataSourceRelationalDatabaseConfig =- AppSyncDataSourceRelationalDatabaseConfig- { _appSyncDataSourceRelationalDatabaseConfigRdsHttpEndpointConfig :: Maybe AppSyncDataSourceRdsHttpEndpointConfig- , _appSyncDataSourceRelationalDatabaseConfigRelationalDatabaseSourceType :: Val Text- } deriving (Show, Eq)--instance ToJSON AppSyncDataSourceRelationalDatabaseConfig where- toJSON AppSyncDataSourceRelationalDatabaseConfig{..} =- object $- catMaybes- [ fmap (("RdsHttpEndpointConfig",) . toJSON) _appSyncDataSourceRelationalDatabaseConfigRdsHttpEndpointConfig- , (Just . ("RelationalDatabaseSourceType",) . toJSON) _appSyncDataSourceRelationalDatabaseConfigRelationalDatabaseSourceType- ]---- | Constructor for 'AppSyncDataSourceRelationalDatabaseConfig' containing--- required fields as arguments.-appSyncDataSourceRelationalDatabaseConfig- :: Val Text -- ^ 'asdsrdcRelationalDatabaseSourceType'- -> AppSyncDataSourceRelationalDatabaseConfig-appSyncDataSourceRelationalDatabaseConfig relationalDatabaseSourceTypearg =- AppSyncDataSourceRelationalDatabaseConfig- { _appSyncDataSourceRelationalDatabaseConfigRdsHttpEndpointConfig = Nothing- , _appSyncDataSourceRelationalDatabaseConfigRelationalDatabaseSourceType = relationalDatabaseSourceTypearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-relationaldatabaseconfig.html#cfn-appsync-datasource-relationaldatabaseconfig-rdshttpendpointconfig-asdsrdcRdsHttpEndpointConfig :: Lens' AppSyncDataSourceRelationalDatabaseConfig (Maybe AppSyncDataSourceRdsHttpEndpointConfig)-asdsrdcRdsHttpEndpointConfig = lens _appSyncDataSourceRelationalDatabaseConfigRdsHttpEndpointConfig (\s a -> s { _appSyncDataSourceRelationalDatabaseConfigRdsHttpEndpointConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-datasource-relationaldatabaseconfig.html#cfn-appsync-datasource-relationaldatabaseconfig-relationaldatabasesourcetype-asdsrdcRelationalDatabaseSourceType :: Lens' AppSyncDataSourceRelationalDatabaseConfig (Val Text)-asdsrdcRelationalDatabaseSourceType = lens _appSyncDataSourceRelationalDatabaseConfigRelationalDatabaseSourceType (\s a -> s { _appSyncDataSourceRelationalDatabaseConfigRelationalDatabaseSourceType = a })
@@ -1,56 +0,0 @@-{-# 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 })
@@ -1,53 +0,0 @@-{-# 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 })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-logconfig.html--module Stratosphere.ResourceProperties.AppSyncGraphQLApiLogConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncGraphQLApiLogConfig. See--- 'appSyncGraphQLApiLogConfig' for a more convenient constructor.-data AppSyncGraphQLApiLogConfig =- AppSyncGraphQLApiLogConfig- { _appSyncGraphQLApiLogConfigCloudWatchLogsRoleArn :: Maybe (Val Text)- , _appSyncGraphQLApiLogConfigExcludeVerboseContent :: Maybe (Val Bool)- , _appSyncGraphQLApiLogConfigFieldLogLevel :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppSyncGraphQLApiLogConfig where- toJSON AppSyncGraphQLApiLogConfig{..} =- object $- catMaybes- [ fmap (("CloudWatchLogsRoleArn",) . toJSON) _appSyncGraphQLApiLogConfigCloudWatchLogsRoleArn- , fmap (("ExcludeVerboseContent",) . toJSON) _appSyncGraphQLApiLogConfigExcludeVerboseContent- , fmap (("FieldLogLevel",) . toJSON) _appSyncGraphQLApiLogConfigFieldLogLevel- ]---- | Constructor for 'AppSyncGraphQLApiLogConfig' containing required fields--- as arguments.-appSyncGraphQLApiLogConfig- :: AppSyncGraphQLApiLogConfig-appSyncGraphQLApiLogConfig =- AppSyncGraphQLApiLogConfig- { _appSyncGraphQLApiLogConfigCloudWatchLogsRoleArn = Nothing- , _appSyncGraphQLApiLogConfigExcludeVerboseContent = Nothing- , _appSyncGraphQLApiLogConfigFieldLogLevel = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-logconfig.html#cfn-appsync-graphqlapi-logconfig-cloudwatchlogsrolearn-asgqlalcCloudWatchLogsRoleArn :: Lens' AppSyncGraphQLApiLogConfig (Maybe (Val Text))-asgqlalcCloudWatchLogsRoleArn = lens _appSyncGraphQLApiLogConfigCloudWatchLogsRoleArn (\s a -> s { _appSyncGraphQLApiLogConfigCloudWatchLogsRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-logconfig.html#cfn-appsync-graphqlapi-logconfig-excludeverbosecontent-asgqlalcExcludeVerboseContent :: Lens' AppSyncGraphQLApiLogConfig (Maybe (Val Bool))-asgqlalcExcludeVerboseContent = lens _appSyncGraphQLApiLogConfigExcludeVerboseContent (\s a -> s { _appSyncGraphQLApiLogConfigExcludeVerboseContent = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-logconfig.html#cfn-appsync-graphqlapi-logconfig-fieldloglevel-asgqlalcFieldLogLevel :: Lens' AppSyncGraphQLApiLogConfig (Maybe (Val Text))-asgqlalcFieldLogLevel = lens _appSyncGraphQLApiLogConfigFieldLogLevel (\s a -> s { _appSyncGraphQLApiLogConfigFieldLogLevel = a })
@@ -1,59 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-openidconnectconfig.html--module Stratosphere.ResourceProperties.AppSyncGraphQLApiOpenIDConnectConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncGraphQLApiOpenIDConnectConfig. See--- 'appSyncGraphQLApiOpenIDConnectConfig' for a more convenient constructor.-data AppSyncGraphQLApiOpenIDConnectConfig =- AppSyncGraphQLApiOpenIDConnectConfig- { _appSyncGraphQLApiOpenIDConnectConfigAuthTTL :: Maybe (Val Double)- , _appSyncGraphQLApiOpenIDConnectConfigClientId :: Maybe (Val Text)- , _appSyncGraphQLApiOpenIDConnectConfigIatTTL :: Maybe (Val Double)- , _appSyncGraphQLApiOpenIDConnectConfigIssuer :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppSyncGraphQLApiOpenIDConnectConfig where- toJSON AppSyncGraphQLApiOpenIDConnectConfig{..} =- object $- catMaybes- [ fmap (("AuthTTL",) . toJSON) _appSyncGraphQLApiOpenIDConnectConfigAuthTTL- , fmap (("ClientId",) . toJSON) _appSyncGraphQLApiOpenIDConnectConfigClientId- , fmap (("IatTTL",) . toJSON) _appSyncGraphQLApiOpenIDConnectConfigIatTTL- , fmap (("Issuer",) . toJSON) _appSyncGraphQLApiOpenIDConnectConfigIssuer- ]---- | Constructor for 'AppSyncGraphQLApiOpenIDConnectConfig' containing--- required fields as arguments.-appSyncGraphQLApiOpenIDConnectConfig- :: AppSyncGraphQLApiOpenIDConnectConfig-appSyncGraphQLApiOpenIDConnectConfig =- AppSyncGraphQLApiOpenIDConnectConfig- { _appSyncGraphQLApiOpenIDConnectConfigAuthTTL = Nothing- , _appSyncGraphQLApiOpenIDConnectConfigClientId = Nothing- , _appSyncGraphQLApiOpenIDConnectConfigIatTTL = Nothing- , _appSyncGraphQLApiOpenIDConnectConfigIssuer = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-openidconnectconfig.html#cfn-appsync-graphqlapi-openidconnectconfig-authttl-asgqlaoidccAuthTTL :: Lens' AppSyncGraphQLApiOpenIDConnectConfig (Maybe (Val Double))-asgqlaoidccAuthTTL = lens _appSyncGraphQLApiOpenIDConnectConfigAuthTTL (\s a -> s { _appSyncGraphQLApiOpenIDConnectConfigAuthTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-openidconnectconfig.html#cfn-appsync-graphqlapi-openidconnectconfig-clientid-asgqlaoidccClientId :: Lens' AppSyncGraphQLApiOpenIDConnectConfig (Maybe (Val Text))-asgqlaoidccClientId = lens _appSyncGraphQLApiOpenIDConnectConfigClientId (\s a -> s { _appSyncGraphQLApiOpenIDConnectConfigClientId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-openidconnectconfig.html#cfn-appsync-graphqlapi-openidconnectconfig-iatttl-asgqlaoidccIatTTL :: Lens' AppSyncGraphQLApiOpenIDConnectConfig (Maybe (Val Double))-asgqlaoidccIatTTL = lens _appSyncGraphQLApiOpenIDConnectConfigIatTTL (\s a -> s { _appSyncGraphQLApiOpenIDConnectConfigIatTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-openidconnectconfig.html#cfn-appsync-graphqlapi-openidconnectconfig-issuer-asgqlaoidccIssuer :: Lens' AppSyncGraphQLApiOpenIDConnectConfig (Maybe (Val Text))-asgqlaoidccIssuer = lens _appSyncGraphQLApiOpenIDConnectConfigIssuer (\s a -> s { _appSyncGraphQLApiOpenIDConnectConfigIssuer = a })
@@ -1,59 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-userpoolconfig.html--module Stratosphere.ResourceProperties.AppSyncGraphQLApiUserPoolConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncGraphQLApiUserPoolConfig. See--- 'appSyncGraphQLApiUserPoolConfig' for a more convenient constructor.-data AppSyncGraphQLApiUserPoolConfig =- AppSyncGraphQLApiUserPoolConfig- { _appSyncGraphQLApiUserPoolConfigAppIdClientRegex :: Maybe (Val Text)- , _appSyncGraphQLApiUserPoolConfigAwsRegion :: Maybe (Val Text)- , _appSyncGraphQLApiUserPoolConfigDefaultAction :: Maybe (Val Text)- , _appSyncGraphQLApiUserPoolConfigUserPoolId :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppSyncGraphQLApiUserPoolConfig where- toJSON AppSyncGraphQLApiUserPoolConfig{..} =- object $- catMaybes- [ fmap (("AppIdClientRegex",) . toJSON) _appSyncGraphQLApiUserPoolConfigAppIdClientRegex- , fmap (("AwsRegion",) . toJSON) _appSyncGraphQLApiUserPoolConfigAwsRegion- , fmap (("DefaultAction",) . toJSON) _appSyncGraphQLApiUserPoolConfigDefaultAction- , fmap (("UserPoolId",) . toJSON) _appSyncGraphQLApiUserPoolConfigUserPoolId- ]---- | Constructor for 'AppSyncGraphQLApiUserPoolConfig' containing required--- fields as arguments.-appSyncGraphQLApiUserPoolConfig- :: AppSyncGraphQLApiUserPoolConfig-appSyncGraphQLApiUserPoolConfig =- AppSyncGraphQLApiUserPoolConfig- { _appSyncGraphQLApiUserPoolConfigAppIdClientRegex = Nothing- , _appSyncGraphQLApiUserPoolConfigAwsRegion = Nothing- , _appSyncGraphQLApiUserPoolConfigDefaultAction = Nothing- , _appSyncGraphQLApiUserPoolConfigUserPoolId = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-userpoolconfig.html#cfn-appsync-graphqlapi-userpoolconfig-appidclientregex-asgqlaupcAppIdClientRegex :: Lens' AppSyncGraphQLApiUserPoolConfig (Maybe (Val Text))-asgqlaupcAppIdClientRegex = lens _appSyncGraphQLApiUserPoolConfigAppIdClientRegex (\s a -> s { _appSyncGraphQLApiUserPoolConfigAppIdClientRegex = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-userpoolconfig.html#cfn-appsync-graphqlapi-userpoolconfig-awsregion-asgqlaupcAwsRegion :: Lens' AppSyncGraphQLApiUserPoolConfig (Maybe (Val Text))-asgqlaupcAwsRegion = lens _appSyncGraphQLApiUserPoolConfigAwsRegion (\s a -> s { _appSyncGraphQLApiUserPoolConfigAwsRegion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-userpoolconfig.html#cfn-appsync-graphqlapi-userpoolconfig-defaultaction-asgqlaupcDefaultAction :: Lens' AppSyncGraphQLApiUserPoolConfig (Maybe (Val Text))-asgqlaupcDefaultAction = lens _appSyncGraphQLApiUserPoolConfigDefaultAction (\s a -> s { _appSyncGraphQLApiUserPoolConfigDefaultAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-graphqlapi-userpoolconfig.html#cfn-appsync-graphqlapi-userpoolconfig-userpoolid-asgqlaupcUserPoolId :: Lens' AppSyncGraphQLApiUserPoolConfig (Maybe (Val Text))-asgqlaupcUserPoolId = lens _appSyncGraphQLApiUserPoolConfigUserPoolId (\s a -> s { _appSyncGraphQLApiUserPoolConfigUserPoolId = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-cachingconfig.html--module Stratosphere.ResourceProperties.AppSyncResolverCachingConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncResolverCachingConfig. See--- 'appSyncResolverCachingConfig' for a more convenient constructor.-data AppSyncResolverCachingConfig =- AppSyncResolverCachingConfig- { _appSyncResolverCachingConfigCachingKeys :: Maybe (ValList Text)- , _appSyncResolverCachingConfigTtl :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON AppSyncResolverCachingConfig where- toJSON AppSyncResolverCachingConfig{..} =- object $- catMaybes- [ fmap (("CachingKeys",) . toJSON) _appSyncResolverCachingConfigCachingKeys- , fmap (("Ttl",) . toJSON) _appSyncResolverCachingConfigTtl- ]---- | Constructor for 'AppSyncResolverCachingConfig' containing required fields--- as arguments.-appSyncResolverCachingConfig- :: AppSyncResolverCachingConfig-appSyncResolverCachingConfig =- AppSyncResolverCachingConfig- { _appSyncResolverCachingConfigCachingKeys = Nothing- , _appSyncResolverCachingConfigTtl = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-cachingconfig.html#cfn-appsync-resolver-cachingconfig-cachingkeys-asrccCachingKeys :: Lens' AppSyncResolverCachingConfig (Maybe (ValList Text))-asrccCachingKeys = lens _appSyncResolverCachingConfigCachingKeys (\s a -> s { _appSyncResolverCachingConfigCachingKeys = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-cachingconfig.html#cfn-appsync-resolver-cachingconfig-ttl-asrccTtl :: Lens' AppSyncResolverCachingConfig (Maybe (Val Double))-asrccTtl = lens _appSyncResolverCachingConfigTtl (\s a -> s { _appSyncResolverCachingConfigTtl = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-lambdaconflicthandlerconfig.html--module Stratosphere.ResourceProperties.AppSyncResolverLambdaConflictHandlerConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncResolverLambdaConflictHandlerConfig.--- See 'appSyncResolverLambdaConflictHandlerConfig' for a more convenient--- constructor.-data AppSyncResolverLambdaConflictHandlerConfig =- AppSyncResolverLambdaConflictHandlerConfig- { _appSyncResolverLambdaConflictHandlerConfigLambdaConflictHandlerArn :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AppSyncResolverLambdaConflictHandlerConfig where- toJSON AppSyncResolverLambdaConflictHandlerConfig{..} =- object $- catMaybes- [ fmap (("LambdaConflictHandlerArn",) . toJSON) _appSyncResolverLambdaConflictHandlerConfigLambdaConflictHandlerArn- ]---- | Constructor for 'AppSyncResolverLambdaConflictHandlerConfig' containing--- required fields as arguments.-appSyncResolverLambdaConflictHandlerConfig- :: AppSyncResolverLambdaConflictHandlerConfig-appSyncResolverLambdaConflictHandlerConfig =- AppSyncResolverLambdaConflictHandlerConfig- { _appSyncResolverLambdaConflictHandlerConfigLambdaConflictHandlerArn = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-lambdaconflicthandlerconfig.html#cfn-appsync-resolver-lambdaconflicthandlerconfig-lambdaconflicthandlerarn-asrlchcLambdaConflictHandlerArn :: Lens' AppSyncResolverLambdaConflictHandlerConfig (Maybe (Val Text))-asrlchcLambdaConflictHandlerArn = lens _appSyncResolverLambdaConflictHandlerConfigLambdaConflictHandlerArn (\s a -> s { _appSyncResolverLambdaConflictHandlerConfigLambdaConflictHandlerArn = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-pipelineconfig.html--module Stratosphere.ResourceProperties.AppSyncResolverPipelineConfig where--import Stratosphere.ResourceImports----- | Full data type definition for AppSyncResolverPipelineConfig. See--- 'appSyncResolverPipelineConfig' for a more convenient constructor.-data AppSyncResolverPipelineConfig =- AppSyncResolverPipelineConfig- { _appSyncResolverPipelineConfigFunctions :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AppSyncResolverPipelineConfig where- toJSON AppSyncResolverPipelineConfig{..} =- object $- catMaybes- [ fmap (("Functions",) . toJSON) _appSyncResolverPipelineConfigFunctions- ]---- | Constructor for 'AppSyncResolverPipelineConfig' containing required--- fields as arguments.-appSyncResolverPipelineConfig- :: AppSyncResolverPipelineConfig-appSyncResolverPipelineConfig =- AppSyncResolverPipelineConfig- { _appSyncResolverPipelineConfigFunctions = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-pipelineconfig.html#cfn-appsync-resolver-pipelineconfig-functions-asrpcFunctions :: Lens' AppSyncResolverPipelineConfig (Maybe (ValList Text))-asrpcFunctions = lens _appSyncResolverPipelineConfigFunctions (\s a -> s { _appSyncResolverPipelineConfigFunctions = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-syncconfig.html--module Stratosphere.ResourceProperties.AppSyncResolverSyncConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AppSyncResolverLambdaConflictHandlerConfig---- | Full data type definition for AppSyncResolverSyncConfig. See--- 'appSyncResolverSyncConfig' for a more convenient constructor.-data AppSyncResolverSyncConfig =- AppSyncResolverSyncConfig- { _appSyncResolverSyncConfigConflictDetection :: Val Text- , _appSyncResolverSyncConfigConflictHandler :: Maybe (Val Text)- , _appSyncResolverSyncConfigLambdaConflictHandlerConfig :: Maybe AppSyncResolverLambdaConflictHandlerConfig- } deriving (Show, Eq)--instance ToJSON AppSyncResolverSyncConfig where- toJSON AppSyncResolverSyncConfig{..} =- object $- catMaybes- [ (Just . ("ConflictDetection",) . toJSON) _appSyncResolverSyncConfigConflictDetection- , fmap (("ConflictHandler",) . toJSON) _appSyncResolverSyncConfigConflictHandler- , fmap (("LambdaConflictHandlerConfig",) . toJSON) _appSyncResolverSyncConfigLambdaConflictHandlerConfig- ]---- | Constructor for 'AppSyncResolverSyncConfig' containing required fields as--- arguments.-appSyncResolverSyncConfig- :: Val Text -- ^ 'asrscConflictDetection'- -> AppSyncResolverSyncConfig-appSyncResolverSyncConfig conflictDetectionarg =- AppSyncResolverSyncConfig- { _appSyncResolverSyncConfigConflictDetection = conflictDetectionarg- , _appSyncResolverSyncConfigConflictHandler = Nothing- , _appSyncResolverSyncConfigLambdaConflictHandlerConfig = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-syncconfig.html#cfn-appsync-resolver-syncconfig-conflictdetection-asrscConflictDetection :: Lens' AppSyncResolverSyncConfig (Val Text)-asrscConflictDetection = lens _appSyncResolverSyncConfigConflictDetection (\s a -> s { _appSyncResolverSyncConfigConflictDetection = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-syncconfig.html#cfn-appsync-resolver-syncconfig-conflicthandler-asrscConflictHandler :: Lens' AppSyncResolverSyncConfig (Maybe (Val Text))-asrscConflictHandler = lens _appSyncResolverSyncConfigConflictHandler (\s a -> s { _appSyncResolverSyncConfigConflictHandler = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appsync-resolver-syncconfig.html#cfn-appsync-resolver-syncconfig-lambdaconflicthandlerconfig-asrscLambdaConflictHandlerConfig :: Lens' AppSyncResolverSyncConfig (Maybe AppSyncResolverLambdaConflictHandlerConfig)-asrscLambdaConflictHandlerConfig = lens _appSyncResolverSyncConfigLambdaConflictHandlerConfig (\s a -> s { _appSyncResolverSyncConfigLambdaConflictHandlerConfig = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scalabletargetaction.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalableTargetScalableTargetAction where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApplicationAutoScalingScalableTargetScalableTargetAction. See--- 'applicationAutoScalingScalableTargetScalableTargetAction' for a more--- convenient constructor.-data ApplicationAutoScalingScalableTargetScalableTargetAction =- ApplicationAutoScalingScalableTargetScalableTargetAction- { _applicationAutoScalingScalableTargetScalableTargetActionMaxCapacity :: Maybe (Val Integer)- , _applicationAutoScalingScalableTargetScalableTargetActionMinCapacity :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalableTargetScalableTargetAction where- toJSON ApplicationAutoScalingScalableTargetScalableTargetAction{..} =- object $- catMaybes- [ fmap (("MaxCapacity",) . toJSON) _applicationAutoScalingScalableTargetScalableTargetActionMaxCapacity- , fmap (("MinCapacity",) . toJSON) _applicationAutoScalingScalableTargetScalableTargetActionMinCapacity- ]---- | Constructor for--- 'ApplicationAutoScalingScalableTargetScalableTargetAction' containing--- required fields as arguments.-applicationAutoScalingScalableTargetScalableTargetAction- :: ApplicationAutoScalingScalableTargetScalableTargetAction-applicationAutoScalingScalableTargetScalableTargetAction =- ApplicationAutoScalingScalableTargetScalableTargetAction- { _applicationAutoScalingScalableTargetScalableTargetActionMaxCapacity = Nothing- , _applicationAutoScalingScalableTargetScalableTargetActionMinCapacity = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scalabletargetaction.html#cfn-applicationautoscaling-scalabletarget-scalabletargetaction-maxcapacity-aasststaMaxCapacity :: Lens' ApplicationAutoScalingScalableTargetScalableTargetAction (Maybe (Val Integer))-aasststaMaxCapacity = lens _applicationAutoScalingScalableTargetScalableTargetActionMaxCapacity (\s a -> s { _applicationAutoScalingScalableTargetScalableTargetActionMaxCapacity = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scalabletargetaction.html#cfn-applicationautoscaling-scalabletarget-scalabletargetaction-mincapacity-aasststaMinCapacity :: Lens' ApplicationAutoScalingScalableTargetScalableTargetAction (Maybe (Val Integer))-aasststaMinCapacity = lens _applicationAutoScalingScalableTargetScalableTargetActionMinCapacity (\s a -> s { _applicationAutoScalingScalableTargetScalableTargetActionMinCapacity = a })
@@ -1,70 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scheduledaction.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalableTargetScheduledAction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationAutoScalingScalableTargetScalableTargetAction---- | Full data type definition for--- ApplicationAutoScalingScalableTargetScheduledAction. See--- 'applicationAutoScalingScalableTargetScheduledAction' for a more--- convenient constructor.-data ApplicationAutoScalingScalableTargetScheduledAction =- ApplicationAutoScalingScalableTargetScheduledAction- { _applicationAutoScalingScalableTargetScheduledActionEndTime :: Maybe (Val Text)- , _applicationAutoScalingScalableTargetScheduledActionScalableTargetAction :: Maybe ApplicationAutoScalingScalableTargetScalableTargetAction- , _applicationAutoScalingScalableTargetScheduledActionSchedule :: Val Text- , _applicationAutoScalingScalableTargetScheduledActionScheduledActionName :: Val Text- , _applicationAutoScalingScalableTargetScheduledActionStartTime :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalableTargetScheduledAction where- toJSON ApplicationAutoScalingScalableTargetScheduledAction{..} =- object $- catMaybes- [ fmap (("EndTime",) . toJSON) _applicationAutoScalingScalableTargetScheduledActionEndTime- , fmap (("ScalableTargetAction",) . toJSON) _applicationAutoScalingScalableTargetScheduledActionScalableTargetAction- , (Just . ("Schedule",) . toJSON) _applicationAutoScalingScalableTargetScheduledActionSchedule- , (Just . ("ScheduledActionName",) . toJSON) _applicationAutoScalingScalableTargetScheduledActionScheduledActionName- , fmap (("StartTime",) . toJSON) _applicationAutoScalingScalableTargetScheduledActionStartTime- ]---- | Constructor for 'ApplicationAutoScalingScalableTargetScheduledAction'--- containing required fields as arguments.-applicationAutoScalingScalableTargetScheduledAction- :: Val Text -- ^ 'aasstsaSchedule'- -> Val Text -- ^ 'aasstsaScheduledActionName'- -> ApplicationAutoScalingScalableTargetScheduledAction-applicationAutoScalingScalableTargetScheduledAction schedulearg scheduledActionNamearg =- ApplicationAutoScalingScalableTargetScheduledAction- { _applicationAutoScalingScalableTargetScheduledActionEndTime = Nothing- , _applicationAutoScalingScalableTargetScheduledActionScalableTargetAction = Nothing- , _applicationAutoScalingScalableTargetScheduledActionSchedule = schedulearg- , _applicationAutoScalingScalableTargetScheduledActionScheduledActionName = scheduledActionNamearg- , _applicationAutoScalingScalableTargetScheduledActionStartTime = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scheduledaction.html#cfn-applicationautoscaling-scalabletarget-scheduledaction-endtime-aasstsaEndTime :: Lens' ApplicationAutoScalingScalableTargetScheduledAction (Maybe (Val Text))-aasstsaEndTime = lens _applicationAutoScalingScalableTargetScheduledActionEndTime (\s a -> s { _applicationAutoScalingScalableTargetScheduledActionEndTime = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scheduledaction.html#cfn-applicationautoscaling-scalabletarget-scheduledaction-scalabletargetaction-aasstsaScalableTargetAction :: Lens' ApplicationAutoScalingScalableTargetScheduledAction (Maybe ApplicationAutoScalingScalableTargetScalableTargetAction)-aasstsaScalableTargetAction = lens _applicationAutoScalingScalableTargetScheduledActionScalableTargetAction (\s a -> s { _applicationAutoScalingScalableTargetScheduledActionScalableTargetAction = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scheduledaction.html#cfn-applicationautoscaling-scalabletarget-scheduledaction-schedule-aasstsaSchedule :: Lens' ApplicationAutoScalingScalableTargetScheduledAction (Val Text)-aasstsaSchedule = lens _applicationAutoScalingScalableTargetScheduledActionSchedule (\s a -> s { _applicationAutoScalingScalableTargetScheduledActionSchedule = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scheduledaction.html#cfn-applicationautoscaling-scalabletarget-scheduledaction-scheduledactionname-aasstsaScheduledActionName :: Lens' ApplicationAutoScalingScalableTargetScheduledAction (Val Text)-aasstsaScheduledActionName = lens _applicationAutoScalingScalableTargetScheduledActionScheduledActionName (\s a -> s { _applicationAutoScalingScalableTargetScheduledActionScheduledActionName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-scheduledaction.html#cfn-applicationautoscaling-scalabletarget-scheduledaction-starttime-aasstsaStartTime :: Lens' ApplicationAutoScalingScalableTargetScheduledAction (Maybe (Val Text))-aasstsaStartTime = lens _applicationAutoScalingScalableTargetScheduledActionStartTime (\s a -> s { _applicationAutoScalingScalableTargetScheduledActionStartTime = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-suspendedstate.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalableTargetSuspendedState where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApplicationAutoScalingScalableTargetSuspendedState. See--- 'applicationAutoScalingScalableTargetSuspendedState' for a more--- convenient constructor.-data ApplicationAutoScalingScalableTargetSuspendedState =- ApplicationAutoScalingScalableTargetSuspendedState- { _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingInSuspended :: Maybe (Val Bool)- , _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingOutSuspended :: Maybe (Val Bool)- , _applicationAutoScalingScalableTargetSuspendedStateScheduledScalingSuspended :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalableTargetSuspendedState where- toJSON ApplicationAutoScalingScalableTargetSuspendedState{..} =- object $- catMaybes- [ fmap (("DynamicScalingInSuspended",) . toJSON) _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingInSuspended- , fmap (("DynamicScalingOutSuspended",) . toJSON) _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingOutSuspended- , fmap (("ScheduledScalingSuspended",) . toJSON) _applicationAutoScalingScalableTargetSuspendedStateScheduledScalingSuspended- ]---- | Constructor for 'ApplicationAutoScalingScalableTargetSuspendedState'--- containing required fields as arguments.-applicationAutoScalingScalableTargetSuspendedState- :: ApplicationAutoScalingScalableTargetSuspendedState-applicationAutoScalingScalableTargetSuspendedState =- ApplicationAutoScalingScalableTargetSuspendedState- { _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingInSuspended = Nothing- , _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingOutSuspended = Nothing- , _applicationAutoScalingScalableTargetSuspendedStateScheduledScalingSuspended = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-suspendedstate.html#cfn-applicationautoscaling-scalabletarget-suspendedstate-dynamicscalinginsuspended-aasstssDynamicScalingInSuspended :: Lens' ApplicationAutoScalingScalableTargetSuspendedState (Maybe (Val Bool))-aasstssDynamicScalingInSuspended = lens _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingInSuspended (\s a -> s { _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingInSuspended = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-suspendedstate.html#cfn-applicationautoscaling-scalabletarget-suspendedstate-dynamicscalingoutsuspended-aasstssDynamicScalingOutSuspended :: Lens' ApplicationAutoScalingScalableTargetSuspendedState (Maybe (Val Bool))-aasstssDynamicScalingOutSuspended = lens _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingOutSuspended (\s a -> s { _applicationAutoScalingScalableTargetSuspendedStateDynamicScalingOutSuspended = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalabletarget-suspendedstate.html#cfn-applicationautoscaling-scalabletarget-suspendedstate-scheduledscalingsuspended-aasstssScheduledScalingSuspended :: Lens' ApplicationAutoScalingScalableTargetSuspendedState (Maybe (Val Bool))-aasstssScheduledScalingSuspended = lens _applicationAutoScalingScalableTargetSuspendedStateScheduledScalingSuspended (\s a -> s { _applicationAutoScalingScalableTargetSuspendedStateScheduledScalingSuspended = a })
@@ -1,72 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-customizedmetricspecification.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyMetricDimension---- | Full data type definition for--- ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification. See--- 'applicationAutoScalingScalingPolicyCustomizedMetricSpecification' for a--- more convenient constructor.-data ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification =- ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification- { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationDimensions :: Maybe [ApplicationAutoScalingScalingPolicyMetricDimension]- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationMetricName :: Val Text- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationNamespace :: Val Text- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationStatistic :: Val Text- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationUnit :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification where- toJSON ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification{..} =- object $- catMaybes- [ fmap (("Dimensions",) . toJSON) _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationDimensions- , (Just . ("MetricName",) . toJSON) _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationMetricName- , (Just . ("Namespace",) . toJSON) _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationNamespace- , (Just . ("Statistic",) . toJSON) _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationStatistic- , fmap (("Unit",) . toJSON) _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationUnit- ]---- | Constructor for--- 'ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification'--- containing required fields as arguments.-applicationAutoScalingScalingPolicyCustomizedMetricSpecification- :: Val Text -- ^ 'aasspcmsMetricName'- -> Val Text -- ^ 'aasspcmsNamespace'- -> Val Text -- ^ 'aasspcmsStatistic'- -> ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification-applicationAutoScalingScalingPolicyCustomizedMetricSpecification metricNamearg namespacearg statisticarg =- ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification- { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationDimensions = Nothing- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationMetricName = metricNamearg- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationNamespace = namespacearg- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationStatistic = statisticarg- , _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationUnit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-customizedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-customizedmetricspecification-dimensions-aasspcmsDimensions :: Lens' ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification (Maybe [ApplicationAutoScalingScalingPolicyMetricDimension])-aasspcmsDimensions = lens _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationDimensions (\s a -> s { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationDimensions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-customizedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-customizedmetricspecification-metricname-aasspcmsMetricName :: Lens' ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification (Val Text)-aasspcmsMetricName = lens _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationMetricName (\s a -> s { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationMetricName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-customizedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-customizedmetricspecification-namespace-aasspcmsNamespace :: Lens' ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification (Val Text)-aasspcmsNamespace = lens _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationNamespace (\s a -> s { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-customizedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-customizedmetricspecification-statistic-aasspcmsStatistic :: Lens' ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification (Val Text)-aasspcmsStatistic = lens _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationStatistic (\s a -> s { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationStatistic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-customizedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-customizedmetricspecification-unit-aasspcmsUnit :: Lens' ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification (Maybe (Val Text))-aasspcmsUnit = lens _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationUnit (\s a -> s { _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationUnit = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-metricdimension.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyMetricDimension where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApplicationAutoScalingScalingPolicyMetricDimension. See--- 'applicationAutoScalingScalingPolicyMetricDimension' for a more--- convenient constructor.-data ApplicationAutoScalingScalingPolicyMetricDimension =- ApplicationAutoScalingScalingPolicyMetricDimension- { _applicationAutoScalingScalingPolicyMetricDimensionName :: Val Text- , _applicationAutoScalingScalingPolicyMetricDimensionValue :: Val Text- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalingPolicyMetricDimension where- toJSON ApplicationAutoScalingScalingPolicyMetricDimension{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _applicationAutoScalingScalingPolicyMetricDimensionName- , (Just . ("Value",) . toJSON) _applicationAutoScalingScalingPolicyMetricDimensionValue- ]---- | Constructor for 'ApplicationAutoScalingScalingPolicyMetricDimension'--- containing required fields as arguments.-applicationAutoScalingScalingPolicyMetricDimension- :: Val Text -- ^ 'aasspmdName'- -> Val Text -- ^ 'aasspmdValue'- -> ApplicationAutoScalingScalingPolicyMetricDimension-applicationAutoScalingScalingPolicyMetricDimension namearg valuearg =- ApplicationAutoScalingScalingPolicyMetricDimension- { _applicationAutoScalingScalingPolicyMetricDimensionName = namearg- , _applicationAutoScalingScalingPolicyMetricDimensionValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-metricdimension.html#cfn-applicationautoscaling-scalingpolicy-metricdimension-name-aasspmdName :: Lens' ApplicationAutoScalingScalingPolicyMetricDimension (Val Text)-aasspmdName = lens _applicationAutoScalingScalingPolicyMetricDimensionName (\s a -> s { _applicationAutoScalingScalingPolicyMetricDimensionName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-metricdimension.html#cfn-applicationautoscaling-scalingpolicy-metricdimension-value-aasspmdValue :: Lens' ApplicationAutoScalingScalingPolicyMetricDimension (Val Text)-aasspmdValue = lens _applicationAutoScalingScalingPolicyMetricDimensionValue (\s a -> s { _applicationAutoScalingScalingPolicyMetricDimensionValue = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-predefinedmetricspecification.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification. See--- 'applicationAutoScalingScalingPolicyPredefinedMetricSpecification' for a--- more convenient constructor.-data ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification =- ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification- { _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType :: Val Text- , _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification where- toJSON ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification{..} =- object $- catMaybes- [ (Just . ("PredefinedMetricType",) . toJSON) _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType- , fmap (("ResourceLabel",) . toJSON) _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel- ]---- | Constructor for--- 'ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification'--- containing required fields as arguments.-applicationAutoScalingScalingPolicyPredefinedMetricSpecification- :: Val Text -- ^ 'aassppmsPredefinedMetricType'- -> ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification-applicationAutoScalingScalingPolicyPredefinedMetricSpecification predefinedMetricTypearg =- ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification- { _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType = predefinedMetricTypearg- , _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-predefinedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-predefinedmetricspecification-predefinedmetrictype-aassppmsPredefinedMetricType :: Lens' ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification (Val Text)-aassppmsPredefinedMetricType = lens _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType (\s a -> s { _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-predefinedmetricspecification.html#cfn-applicationautoscaling-scalingpolicy-predefinedmetricspecification-resourcelabel-aassppmsResourceLabel :: Lens' ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification (Maybe (Val Text))-aassppmsResourceLabel = lens _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel (\s a -> s { _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepAdjustment where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApplicationAutoScalingScalingPolicyStepAdjustment. See--- 'applicationAutoScalingScalingPolicyStepAdjustment' for a more convenient--- constructor.-data ApplicationAutoScalingScalingPolicyStepAdjustment =- ApplicationAutoScalingScalingPolicyStepAdjustment- { _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound :: Maybe (Val Double)- , _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound :: Maybe (Val Double)- , _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment :: Val Integer- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalingPolicyStepAdjustment where- toJSON ApplicationAutoScalingScalingPolicyStepAdjustment{..} =- object $- catMaybes- [ fmap (("MetricIntervalLowerBound",) . toJSON) _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound- , fmap (("MetricIntervalUpperBound",) . toJSON) _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound- , (Just . ("ScalingAdjustment",) . toJSON) _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment- ]---- | Constructor for 'ApplicationAutoScalingScalingPolicyStepAdjustment'--- containing required fields as arguments.-applicationAutoScalingScalingPolicyStepAdjustment- :: Val Integer -- ^ 'aasspsaScalingAdjustment'- -> ApplicationAutoScalingScalingPolicyStepAdjustment-applicationAutoScalingScalingPolicyStepAdjustment scalingAdjustmentarg =- ApplicationAutoScalingScalingPolicyStepAdjustment- { _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound = Nothing- , _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound = Nothing- , _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment = scalingAdjustmentarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment-metricintervallowerbound-aasspsaMetricIntervalLowerBound :: Lens' ApplicationAutoScalingScalingPolicyStepAdjustment (Maybe (Val Double))-aasspsaMetricIntervalLowerBound = lens _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound (\s a -> s { _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment-metricintervalupperbound-aasspsaMetricIntervalUpperBound :: Lens' ApplicationAutoScalingScalingPolicyStepAdjustment (Maybe (Val Double))-aasspsaMetricIntervalUpperBound = lens _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound (\s a -> s { _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustment-scalingadjustment-aasspsaScalingAdjustment :: Lens' ApplicationAutoScalingScalingPolicyStepAdjustment (Val Integer)-aasspsaScalingAdjustment = lens _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment (\s a -> s { _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment = a })
@@ -1,69 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepAdjustment---- | Full data type definition for--- ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration. See--- 'applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration' for a--- more convenient constructor.-data ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration =- ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration- { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationAdjustmentType :: Maybe (Val Text)- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationCooldown :: Maybe (Val Integer)- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMetricAggregationType :: Maybe (Val Text)- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMinAdjustmentMagnitude :: Maybe (Val Integer)- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments :: Maybe [ApplicationAutoScalingScalingPolicyStepAdjustment]- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration where- toJSON ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration{..} =- object $- catMaybes- [ fmap (("AdjustmentType",) . toJSON) _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationAdjustmentType- , fmap (("Cooldown",) . toJSON) _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationCooldown- , fmap (("MetricAggregationType",) . toJSON) _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMetricAggregationType- , fmap (("MinAdjustmentMagnitude",) . toJSON) _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMinAdjustmentMagnitude- , fmap (("StepAdjustments",) . toJSON) _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments- ]---- | Constructor for--- 'ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration'--- containing required fields as arguments.-applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration- :: ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration-applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration =- ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration- { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationAdjustmentType = Nothing- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationCooldown = Nothing- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMetricAggregationType = Nothing- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMinAdjustmentMagnitude = Nothing- , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-adjustmenttype-aasspsspcAdjustmentType :: Lens' ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration (Maybe (Val Text))-aasspsspcAdjustmentType = lens _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationAdjustmentType (\s a -> s { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationAdjustmentType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-cooldown-aasspsspcCooldown :: Lens' ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration (Maybe (Val Integer))-aasspsspcCooldown = lens _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationCooldown (\s a -> s { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationCooldown = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-metricaggregationtype-aasspsspcMetricAggregationType :: Lens' ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration (Maybe (Val Text))-aasspsspcMetricAggregationType = lens _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMetricAggregationType (\s a -> s { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMetricAggregationType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-minadjustmentmagnitude-aasspsspcMinAdjustmentMagnitude :: Lens' ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration (Maybe (Val Integer))-aasspsspcMinAdjustmentMagnitude = lens _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMinAdjustmentMagnitude (\s a -> s { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMinAdjustmentMagnitude = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-stepscalingpolicyconfiguration-stepadjustments-aasspsspcStepAdjustments :: Lens' ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration (Maybe [ApplicationAutoScalingScalingPolicyStepAdjustment])-aasspsspcStepAdjustments = lens _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments (\s a -> s { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments = a })
@@ -1,79 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html--module Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification-import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification---- | Full data type definition for--- ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration.--- See--- 'applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration'--- for a more convenient constructor.-data ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration =- ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration- { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationCustomizedMetricSpecification :: Maybe ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationDisableScaleIn :: Maybe (Val Bool)- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationPredefinedMetricSpecification :: Maybe ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleInCooldown :: Maybe (Val Integer)- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleOutCooldown :: Maybe (Val Integer)- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationTargetValue :: Val Double- } deriving (Show, Eq)--instance ToJSON ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration where- toJSON ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration{..} =- object $- catMaybes- [ fmap (("CustomizedMetricSpecification",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationCustomizedMetricSpecification- , fmap (("DisableScaleIn",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationDisableScaleIn- , fmap (("PredefinedMetricSpecification",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationPredefinedMetricSpecification- , fmap (("ScaleInCooldown",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleInCooldown- , fmap (("ScaleOutCooldown",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleOutCooldown- , (Just . ("TargetValue",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationTargetValue- ]---- | Constructor for--- 'ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration'--- containing required fields as arguments.-applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration- :: Val Double -- ^ 'aasspttspcTargetValue'- -> ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration-applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration targetValuearg =- ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration- { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationCustomizedMetricSpecification = Nothing- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationDisableScaleIn = Nothing- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationPredefinedMetricSpecification = Nothing- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleInCooldown = Nothing- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleOutCooldown = Nothing- , _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationTargetValue = targetValuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration-customizedmetricspecification-aasspttspcCustomizedMetricSpecification :: Lens' ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration (Maybe ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification)-aasspttspcCustomizedMetricSpecification = lens _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationCustomizedMetricSpecification (\s a -> s { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationCustomizedMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration-disablescalein-aasspttspcDisableScaleIn :: Lens' ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration (Maybe (Val Bool))-aasspttspcDisableScaleIn = lens _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationDisableScaleIn (\s a -> s { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationDisableScaleIn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration-predefinedmetricspecification-aasspttspcPredefinedMetricSpecification :: Lens' ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration (Maybe ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification)-aasspttspcPredefinedMetricSpecification = lens _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationPredefinedMetricSpecification (\s a -> s { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationPredefinedMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration-scaleincooldown-aasspttspcScaleInCooldown :: Lens' ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration (Maybe (Val Integer))-aasspttspcScaleInCooldown = lens _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleInCooldown (\s a -> s { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleInCooldown = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration-scaleoutcooldown-aasspttspcScaleOutCooldown :: Lens' ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration (Maybe (Val Integer))-aasspttspcScaleOutCooldown = lens _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleOutCooldown (\s a -> s { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationScaleOutCooldown = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration.html#cfn-applicationautoscaling-scalingpolicy-targettrackingscalingpolicyconfiguration-targetvalue-aasspttspcTargetValue :: Lens' ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration (Val Double)-aasspttspcTargetValue = lens _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationTargetValue (\s a -> s { _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationTargetValue = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarm.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarm where--import Stratosphere.ResourceImports----- | Full data type definition for ApplicationInsightsApplicationAlarm. See--- 'applicationInsightsApplicationAlarm' for a more convenient constructor.-data ApplicationInsightsApplicationAlarm =- ApplicationInsightsApplicationAlarm- { _applicationInsightsApplicationAlarmAlarmName :: Val Text- , _applicationInsightsApplicationAlarmSeverity :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationAlarm where- toJSON ApplicationInsightsApplicationAlarm{..} =- object $- catMaybes- [ (Just . ("AlarmName",) . toJSON) _applicationInsightsApplicationAlarmAlarmName- , fmap (("Severity",) . toJSON) _applicationInsightsApplicationAlarmSeverity- ]---- | Constructor for 'ApplicationInsightsApplicationAlarm' containing required--- fields as arguments.-applicationInsightsApplicationAlarm- :: Val Text -- ^ 'aiaaAlarmName'- -> ApplicationInsightsApplicationAlarm-applicationInsightsApplicationAlarm alarmNamearg =- ApplicationInsightsApplicationAlarm- { _applicationInsightsApplicationAlarmAlarmName = alarmNamearg- , _applicationInsightsApplicationAlarmSeverity = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarm.html#cfn-applicationinsights-application-alarm-alarmname-aiaaAlarmName :: Lens' ApplicationInsightsApplicationAlarm (Val Text)-aiaaAlarmName = lens _applicationInsightsApplicationAlarmAlarmName (\s a -> s { _applicationInsightsApplicationAlarmAlarmName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarm.html#cfn-applicationinsights-application-alarm-severity-aiaaSeverity :: Lens' ApplicationInsightsApplicationAlarm (Maybe (Val Text))-aiaaSeverity = lens _applicationInsightsApplicationAlarmSeverity (\s a -> s { _applicationInsightsApplicationAlarmSeverity = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarmmetric.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric where--import Stratosphere.ResourceImports----- | Full data type definition for ApplicationInsightsApplicationAlarmMetric.--- See 'applicationInsightsApplicationAlarmMetric' for a more convenient--- constructor.-data ApplicationInsightsApplicationAlarmMetric =- ApplicationInsightsApplicationAlarmMetric- { _applicationInsightsApplicationAlarmMetricAlarmMetricName :: Val Text- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationAlarmMetric where- toJSON ApplicationInsightsApplicationAlarmMetric{..} =- object $- catMaybes- [ (Just . ("AlarmMetricName",) . toJSON) _applicationInsightsApplicationAlarmMetricAlarmMetricName- ]---- | Constructor for 'ApplicationInsightsApplicationAlarmMetric' containing--- required fields as arguments.-applicationInsightsApplicationAlarmMetric- :: Val Text -- ^ 'aiaamAlarmMetricName'- -> ApplicationInsightsApplicationAlarmMetric-applicationInsightsApplicationAlarmMetric alarmMetricNamearg =- ApplicationInsightsApplicationAlarmMetric- { _applicationInsightsApplicationAlarmMetricAlarmMetricName = alarmMetricNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarmmetric.html#cfn-applicationinsights-application-alarmmetric-alarmmetricname-aiaamAlarmMetricName :: Lens' ApplicationInsightsApplicationAlarmMetric (Val Text)-aiaamAlarmMetricName = lens _applicationInsightsApplicationAlarmMetricAlarmMetricName (\s a -> s { _applicationInsightsApplicationAlarmMetricAlarmMetricName = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentconfiguration.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationConfigurationDetails-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentTypeConfiguration---- | Full data type definition for--- ApplicationInsightsApplicationComponentConfiguration. See--- 'applicationInsightsApplicationComponentConfiguration' for a more--- convenient constructor.-data ApplicationInsightsApplicationComponentConfiguration =- ApplicationInsightsApplicationComponentConfiguration- { _applicationInsightsApplicationComponentConfigurationConfigurationDetails :: Maybe ApplicationInsightsApplicationConfigurationDetails- , _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations :: Maybe [ApplicationInsightsApplicationSubComponentTypeConfiguration]- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationComponentConfiguration where- toJSON ApplicationInsightsApplicationComponentConfiguration{..} =- object $- catMaybes- [ fmap (("ConfigurationDetails",) . toJSON) _applicationInsightsApplicationComponentConfigurationConfigurationDetails- , fmap (("SubComponentTypeConfigurations",) . toJSON) _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations- ]---- | Constructor for 'ApplicationInsightsApplicationComponentConfiguration'--- containing required fields as arguments.-applicationInsightsApplicationComponentConfiguration- :: ApplicationInsightsApplicationComponentConfiguration-applicationInsightsApplicationComponentConfiguration =- ApplicationInsightsApplicationComponentConfiguration- { _applicationInsightsApplicationComponentConfigurationConfigurationDetails = Nothing- , _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentconfiguration.html#cfn-applicationinsights-application-componentconfiguration-configurationdetails-aiaccConfigurationDetails :: Lens' ApplicationInsightsApplicationComponentConfiguration (Maybe ApplicationInsightsApplicationConfigurationDetails)-aiaccConfigurationDetails = lens _applicationInsightsApplicationComponentConfigurationConfigurationDetails (\s a -> s { _applicationInsightsApplicationComponentConfigurationConfigurationDetails = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentconfiguration.html#cfn-applicationinsights-application-componentconfiguration-subcomponenttypeconfigurations-aiaccSubComponentTypeConfigurations :: Lens' ApplicationInsightsApplicationComponentConfiguration (Maybe [ApplicationInsightsApplicationSubComponentTypeConfiguration])-aiaccSubComponentTypeConfigurations = lens _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations (\s a -> s { _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations = a })
@@ -1,76 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentMonitoringSetting where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentConfiguration---- | Full data type definition for--- ApplicationInsightsApplicationComponentMonitoringSetting. See--- 'applicationInsightsApplicationComponentMonitoringSetting' for a more--- convenient constructor.-data ApplicationInsightsApplicationComponentMonitoringSetting =- ApplicationInsightsApplicationComponentMonitoringSetting- { _applicationInsightsApplicationComponentMonitoringSettingComponentARN :: Maybe (Val Text)- , _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode :: Maybe (Val Text)- , _applicationInsightsApplicationComponentMonitoringSettingComponentName :: Maybe (Val Text)- , _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration :: Maybe ApplicationInsightsApplicationComponentConfiguration- , _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration :: Maybe ApplicationInsightsApplicationComponentConfiguration- , _applicationInsightsApplicationComponentMonitoringSettingTier :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationComponentMonitoringSetting where- toJSON ApplicationInsightsApplicationComponentMonitoringSetting{..} =- object $- catMaybes- [ fmap (("ComponentARN",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingComponentARN- , fmap (("ComponentConfigurationMode",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode- , fmap (("ComponentName",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingComponentName- , fmap (("CustomComponentConfiguration",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration- , fmap (("DefaultOverwriteComponentConfiguration",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration- , fmap (("Tier",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingTier- ]---- | Constructor for--- 'ApplicationInsightsApplicationComponentMonitoringSetting' containing--- required fields as arguments.-applicationInsightsApplicationComponentMonitoringSetting- :: ApplicationInsightsApplicationComponentMonitoringSetting-applicationInsightsApplicationComponentMonitoringSetting =- ApplicationInsightsApplicationComponentMonitoringSetting- { _applicationInsightsApplicationComponentMonitoringSettingComponentARN = Nothing- , _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode = Nothing- , _applicationInsightsApplicationComponentMonitoringSettingComponentName = Nothing- , _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration = Nothing- , _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration = Nothing- , _applicationInsightsApplicationComponentMonitoringSettingTier = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-componentarn-aiacmsComponentARN :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))-aiacmsComponentARN = lens _applicationInsightsApplicationComponentMonitoringSettingComponentARN (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingComponentARN = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-componentconfigurationmode-aiacmsComponentConfigurationMode :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))-aiacmsComponentConfigurationMode = lens _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-componentname-aiacmsComponentName :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))-aiacmsComponentName = lens _applicationInsightsApplicationComponentMonitoringSettingComponentName (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingComponentName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-customcomponentconfiguration-aiacmsCustomComponentConfiguration :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe ApplicationInsightsApplicationComponentConfiguration)-aiacmsCustomComponentConfiguration = lens _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-defaultoverwritecomponentconfiguration-aiacmsDefaultOverwriteComponentConfiguration :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe ApplicationInsightsApplicationComponentConfiguration)-aiacmsDefaultOverwriteComponentConfiguration = lens _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-tier-aiacmsTier :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))-aiacmsTier = lens _applicationInsightsApplicationComponentMonitoringSettingTier (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingTier = a })
@@ -1,64 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationConfigurationDetails where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarm-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent---- | Full data type definition for--- ApplicationInsightsApplicationConfigurationDetails. See--- 'applicationInsightsApplicationConfigurationDetails' for a more--- convenient constructor.-data ApplicationInsightsApplicationConfigurationDetails =- ApplicationInsightsApplicationConfigurationDetails- { _applicationInsightsApplicationConfigurationDetailsAlarmMetrics :: Maybe [ApplicationInsightsApplicationAlarmMetric]- , _applicationInsightsApplicationConfigurationDetailsAlarms :: Maybe [ApplicationInsightsApplicationAlarm]- , _applicationInsightsApplicationConfigurationDetailsLogs :: Maybe [ApplicationInsightsApplicationLog]- , _applicationInsightsApplicationConfigurationDetailsWindowsEvents :: Maybe [ApplicationInsightsApplicationWindowsEvent]- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationConfigurationDetails where- toJSON ApplicationInsightsApplicationConfigurationDetails{..} =- object $- catMaybes- [ fmap (("AlarmMetrics",) . toJSON) _applicationInsightsApplicationConfigurationDetailsAlarmMetrics- , fmap (("Alarms",) . toJSON) _applicationInsightsApplicationConfigurationDetailsAlarms- , fmap (("Logs",) . toJSON) _applicationInsightsApplicationConfigurationDetailsLogs- , fmap (("WindowsEvents",) . toJSON) _applicationInsightsApplicationConfigurationDetailsWindowsEvents- ]---- | Constructor for 'ApplicationInsightsApplicationConfigurationDetails'--- containing required fields as arguments.-applicationInsightsApplicationConfigurationDetails- :: ApplicationInsightsApplicationConfigurationDetails-applicationInsightsApplicationConfigurationDetails =- ApplicationInsightsApplicationConfigurationDetails- { _applicationInsightsApplicationConfigurationDetailsAlarmMetrics = Nothing- , _applicationInsightsApplicationConfigurationDetailsAlarms = Nothing- , _applicationInsightsApplicationConfigurationDetailsLogs = Nothing- , _applicationInsightsApplicationConfigurationDetailsWindowsEvents = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-alarmmetrics-aiacdAlarmMetrics :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationAlarmMetric])-aiacdAlarmMetrics = lens _applicationInsightsApplicationConfigurationDetailsAlarmMetrics (\s a -> s { _applicationInsightsApplicationConfigurationDetailsAlarmMetrics = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-alarms-aiacdAlarms :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationAlarm])-aiacdAlarms = lens _applicationInsightsApplicationConfigurationDetailsAlarms (\s a -> s { _applicationInsightsApplicationConfigurationDetailsAlarms = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-logs-aiacdLogs :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationLog])-aiacdLogs = lens _applicationInsightsApplicationConfigurationDetailsLogs (\s a -> s { _applicationInsightsApplicationConfigurationDetailsLogs = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-windowsevents-aiacdWindowsEvents :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationWindowsEvent])-aiacdWindowsEvents = lens _applicationInsightsApplicationConfigurationDetailsWindowsEvents (\s a -> s { _applicationInsightsApplicationConfigurationDetailsWindowsEvents = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-customcomponent.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationCustomComponent where--import Stratosphere.ResourceImports----- | Full data type definition for--- ApplicationInsightsApplicationCustomComponent. See--- 'applicationInsightsApplicationCustomComponent' for a more convenient--- constructor.-data ApplicationInsightsApplicationCustomComponent =- ApplicationInsightsApplicationCustomComponent- { _applicationInsightsApplicationCustomComponentComponentName :: Val Text- , _applicationInsightsApplicationCustomComponentResourceList :: ValList Text- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationCustomComponent where- toJSON ApplicationInsightsApplicationCustomComponent{..} =- object $- catMaybes- [ (Just . ("ComponentName",) . toJSON) _applicationInsightsApplicationCustomComponentComponentName- , (Just . ("ResourceList",) . toJSON) _applicationInsightsApplicationCustomComponentResourceList- ]---- | Constructor for 'ApplicationInsightsApplicationCustomComponent'--- containing required fields as arguments.-applicationInsightsApplicationCustomComponent- :: Val Text -- ^ 'aiaccComponentName'- -> ValList Text -- ^ 'aiaccResourceList'- -> ApplicationInsightsApplicationCustomComponent-applicationInsightsApplicationCustomComponent componentNamearg resourceListarg =- ApplicationInsightsApplicationCustomComponent- { _applicationInsightsApplicationCustomComponentComponentName = componentNamearg- , _applicationInsightsApplicationCustomComponentResourceList = resourceListarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-customcomponent.html#cfn-applicationinsights-application-customcomponent-componentname-aiaccComponentName :: Lens' ApplicationInsightsApplicationCustomComponent (Val Text)-aiaccComponentName = lens _applicationInsightsApplicationCustomComponentComponentName (\s a -> s { _applicationInsightsApplicationCustomComponentComponentName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-customcomponent.html#cfn-applicationinsights-application-customcomponent-resourcelist-aiaccResourceList :: Lens' ApplicationInsightsApplicationCustomComponent (ValList Text)-aiaccResourceList = lens _applicationInsightsApplicationCustomComponentResourceList (\s a -> s { _applicationInsightsApplicationCustomComponentResourceList = a })
@@ -1,67 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog where--import Stratosphere.ResourceImports----- | Full data type definition for ApplicationInsightsApplicationLog. See--- 'applicationInsightsApplicationLog' for a more convenient constructor.-data ApplicationInsightsApplicationLog =- ApplicationInsightsApplicationLog- { _applicationInsightsApplicationLogEncoding :: Maybe (Val Text)- , _applicationInsightsApplicationLogLogGroupName :: Maybe (Val Text)- , _applicationInsightsApplicationLogLogPath :: Maybe (Val Text)- , _applicationInsightsApplicationLogLogType :: Val Text- , _applicationInsightsApplicationLogPatternSet :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationLog where- toJSON ApplicationInsightsApplicationLog{..} =- object $- catMaybes- [ fmap (("Encoding",) . toJSON) _applicationInsightsApplicationLogEncoding- , fmap (("LogGroupName",) . toJSON) _applicationInsightsApplicationLogLogGroupName- , fmap (("LogPath",) . toJSON) _applicationInsightsApplicationLogLogPath- , (Just . ("LogType",) . toJSON) _applicationInsightsApplicationLogLogType- , fmap (("PatternSet",) . toJSON) _applicationInsightsApplicationLogPatternSet- ]---- | Constructor for 'ApplicationInsightsApplicationLog' containing required--- fields as arguments.-applicationInsightsApplicationLog- :: Val Text -- ^ 'aialLogType'- -> ApplicationInsightsApplicationLog-applicationInsightsApplicationLog logTypearg =- ApplicationInsightsApplicationLog- { _applicationInsightsApplicationLogEncoding = Nothing- , _applicationInsightsApplicationLogLogGroupName = Nothing- , _applicationInsightsApplicationLogLogPath = Nothing- , _applicationInsightsApplicationLogLogType = logTypearg- , _applicationInsightsApplicationLogPatternSet = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-encoding-aialEncoding :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))-aialEncoding = lens _applicationInsightsApplicationLogEncoding (\s a -> s { _applicationInsightsApplicationLogEncoding = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-loggroupname-aialLogGroupName :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))-aialLogGroupName = lens _applicationInsightsApplicationLogLogGroupName (\s a -> s { _applicationInsightsApplicationLogLogGroupName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-logpath-aialLogPath :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))-aialLogPath = lens _applicationInsightsApplicationLogLogPath (\s a -> s { _applicationInsightsApplicationLogLogPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-logtype-aialLogType :: Lens' ApplicationInsightsApplicationLog (Val Text)-aialLogType = lens _applicationInsightsApplicationLogLogType (\s a -> s { _applicationInsightsApplicationLogLogType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-patternset-aialPatternSet :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))-aialPatternSet = lens _applicationInsightsApplicationLogPatternSet (\s a -> s { _applicationInsightsApplicationLogPatternSet = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPattern where--import Stratosphere.ResourceImports----- | Full data type definition for ApplicationInsightsApplicationLogPattern.--- See 'applicationInsightsApplicationLogPattern' for a more convenient--- constructor.-data ApplicationInsightsApplicationLogPattern =- ApplicationInsightsApplicationLogPattern- { _applicationInsightsApplicationLogPatternPattern :: Val Text- , _applicationInsightsApplicationLogPatternPatternName :: Val Text- , _applicationInsightsApplicationLogPatternRank :: Val Integer- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationLogPattern where- toJSON ApplicationInsightsApplicationLogPattern{..} =- object $- catMaybes- [ (Just . ("Pattern",) . toJSON) _applicationInsightsApplicationLogPatternPattern- , (Just . ("PatternName",) . toJSON) _applicationInsightsApplicationLogPatternPatternName- , (Just . ("Rank",) . toJSON) _applicationInsightsApplicationLogPatternRank- ]---- | Constructor for 'ApplicationInsightsApplicationLogPattern' containing--- required fields as arguments.-applicationInsightsApplicationLogPattern- :: Val Text -- ^ 'aialpPattern'- -> Val Text -- ^ 'aialpPatternName'- -> Val Integer -- ^ 'aialpRank'- -> ApplicationInsightsApplicationLogPattern-applicationInsightsApplicationLogPattern patternarg patternNamearg rankarg =- ApplicationInsightsApplicationLogPattern- { _applicationInsightsApplicationLogPatternPattern = patternarg- , _applicationInsightsApplicationLogPatternPatternName = patternNamearg- , _applicationInsightsApplicationLogPatternRank = rankarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html#cfn-applicationinsights-application-logpattern-pattern-aialpPattern :: Lens' ApplicationInsightsApplicationLogPattern (Val Text)-aialpPattern = lens _applicationInsightsApplicationLogPatternPattern (\s a -> s { _applicationInsightsApplicationLogPatternPattern = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html#cfn-applicationinsights-application-logpattern-patternname-aialpPatternName :: Lens' ApplicationInsightsApplicationLogPattern (Val Text)-aialpPatternName = lens _applicationInsightsApplicationLogPatternPatternName (\s a -> s { _applicationInsightsApplicationLogPatternPatternName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html#cfn-applicationinsights-application-logpattern-rank-aialpRank :: Lens' ApplicationInsightsApplicationLogPattern (Val Integer)-aialpRank = lens _applicationInsightsApplicationLogPatternRank (\s a -> s { _applicationInsightsApplicationLogPatternRank = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpatternset.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPatternSet where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPattern---- | Full data type definition for--- ApplicationInsightsApplicationLogPatternSet. See--- 'applicationInsightsApplicationLogPatternSet' for a more convenient--- constructor.-data ApplicationInsightsApplicationLogPatternSet =- ApplicationInsightsApplicationLogPatternSet- { _applicationInsightsApplicationLogPatternSetLogPatterns :: [ApplicationInsightsApplicationLogPattern]- , _applicationInsightsApplicationLogPatternSetPatternSetName :: Val Text- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationLogPatternSet where- toJSON ApplicationInsightsApplicationLogPatternSet{..} =- object $- catMaybes- [ (Just . ("LogPatterns",) . toJSON) _applicationInsightsApplicationLogPatternSetLogPatterns- , (Just . ("PatternSetName",) . toJSON) _applicationInsightsApplicationLogPatternSetPatternSetName- ]---- | Constructor for 'ApplicationInsightsApplicationLogPatternSet' containing--- required fields as arguments.-applicationInsightsApplicationLogPatternSet- :: [ApplicationInsightsApplicationLogPattern] -- ^ 'aialpsLogPatterns'- -> Val Text -- ^ 'aialpsPatternSetName'- -> ApplicationInsightsApplicationLogPatternSet-applicationInsightsApplicationLogPatternSet logPatternsarg patternSetNamearg =- ApplicationInsightsApplicationLogPatternSet- { _applicationInsightsApplicationLogPatternSetLogPatterns = logPatternsarg- , _applicationInsightsApplicationLogPatternSetPatternSetName = patternSetNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpatternset.html#cfn-applicationinsights-application-logpatternset-logpatterns-aialpsLogPatterns :: Lens' ApplicationInsightsApplicationLogPatternSet [ApplicationInsightsApplicationLogPattern]-aialpsLogPatterns = lens _applicationInsightsApplicationLogPatternSetLogPatterns (\s a -> s { _applicationInsightsApplicationLogPatternSetLogPatterns = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpatternset.html#cfn-applicationinsights-application-logpatternset-patternsetname-aialpsPatternSetName :: Lens' ApplicationInsightsApplicationLogPatternSet (Val Text)-aialpsPatternSetName = lens _applicationInsightsApplicationLogPatternSetPatternSetName (\s a -> s { _applicationInsightsApplicationLogPatternSetPatternSetName = a })
@@ -1,57 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentConfigurationDetails where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent---- | Full data type definition for--- ApplicationInsightsApplicationSubComponentConfigurationDetails. See--- 'applicationInsightsApplicationSubComponentConfigurationDetails' for a--- more convenient constructor.-data ApplicationInsightsApplicationSubComponentConfigurationDetails =- ApplicationInsightsApplicationSubComponentConfigurationDetails- { _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics :: Maybe [ApplicationInsightsApplicationAlarmMetric]- , _applicationInsightsApplicationSubComponentConfigurationDetailsLogs :: Maybe [ApplicationInsightsApplicationLog]- , _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents :: Maybe [ApplicationInsightsApplicationWindowsEvent]- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationSubComponentConfigurationDetails where- toJSON ApplicationInsightsApplicationSubComponentConfigurationDetails{..} =- object $- catMaybes- [ fmap (("AlarmMetrics",) . toJSON) _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics- , fmap (("Logs",) . toJSON) _applicationInsightsApplicationSubComponentConfigurationDetailsLogs- , fmap (("WindowsEvents",) . toJSON) _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents- ]---- | Constructor for--- 'ApplicationInsightsApplicationSubComponentConfigurationDetails'--- containing required fields as arguments.-applicationInsightsApplicationSubComponentConfigurationDetails- :: ApplicationInsightsApplicationSubComponentConfigurationDetails-applicationInsightsApplicationSubComponentConfigurationDetails =- ApplicationInsightsApplicationSubComponentConfigurationDetails- { _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics = Nothing- , _applicationInsightsApplicationSubComponentConfigurationDetailsLogs = Nothing- , _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html#cfn-applicationinsights-application-subcomponentconfigurationdetails-alarmmetrics-aiasccdAlarmMetrics :: Lens' ApplicationInsightsApplicationSubComponentConfigurationDetails (Maybe [ApplicationInsightsApplicationAlarmMetric])-aiasccdAlarmMetrics = lens _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics (\s a -> s { _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html#cfn-applicationinsights-application-subcomponentconfigurationdetails-logs-aiasccdLogs :: Lens' ApplicationInsightsApplicationSubComponentConfigurationDetails (Maybe [ApplicationInsightsApplicationLog])-aiasccdLogs = lens _applicationInsightsApplicationSubComponentConfigurationDetailsLogs (\s a -> s { _applicationInsightsApplicationSubComponentConfigurationDetailsLogs = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html#cfn-applicationinsights-application-subcomponentconfigurationdetails-windowsevents-aiasccdWindowsEvents :: Lens' ApplicationInsightsApplicationSubComponentConfigurationDetails (Maybe [ApplicationInsightsApplicationWindowsEvent])-aiasccdWindowsEvents = lens _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents (\s a -> s { _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents = a })
@@ -1,50 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponenttypeconfiguration.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentTypeConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentConfigurationDetails---- | Full data type definition for--- ApplicationInsightsApplicationSubComponentTypeConfiguration. See--- 'applicationInsightsApplicationSubComponentTypeConfiguration' for a more--- convenient constructor.-data ApplicationInsightsApplicationSubComponentTypeConfiguration =- ApplicationInsightsApplicationSubComponentTypeConfiguration- { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails :: ApplicationInsightsApplicationSubComponentConfigurationDetails- , _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType :: Val Text- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationSubComponentTypeConfiguration where- toJSON ApplicationInsightsApplicationSubComponentTypeConfiguration{..} =- object $- catMaybes- [ (Just . ("SubComponentConfigurationDetails",) . toJSON) _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails- , (Just . ("SubComponentType",) . toJSON) _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType- ]---- | Constructor for--- 'ApplicationInsightsApplicationSubComponentTypeConfiguration' containing--- required fields as arguments.-applicationInsightsApplicationSubComponentTypeConfiguration- :: ApplicationInsightsApplicationSubComponentConfigurationDetails -- ^ 'aiasctcSubComponentConfigurationDetails'- -> Val Text -- ^ 'aiasctcSubComponentType'- -> ApplicationInsightsApplicationSubComponentTypeConfiguration-applicationInsightsApplicationSubComponentTypeConfiguration subComponentConfigurationDetailsarg subComponentTypearg =- ApplicationInsightsApplicationSubComponentTypeConfiguration- { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails = subComponentConfigurationDetailsarg- , _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType = subComponentTypearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponenttypeconfiguration.html#cfn-applicationinsights-application-subcomponenttypeconfiguration-subcomponentconfigurationdetails-aiasctcSubComponentConfigurationDetails :: Lens' ApplicationInsightsApplicationSubComponentTypeConfiguration ApplicationInsightsApplicationSubComponentConfigurationDetails-aiasctcSubComponentConfigurationDetails = lens _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails (\s a -> s { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponenttypeconfiguration.html#cfn-applicationinsights-application-subcomponenttypeconfiguration-subcomponenttype-aiasctcSubComponentType :: Lens' ApplicationInsightsApplicationSubComponentTypeConfiguration (Val Text)-aiasctcSubComponentType = lens _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType (\s a -> s { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType = a })
@@ -1,63 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html--module Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent where--import Stratosphere.ResourceImports----- | Full data type definition for ApplicationInsightsApplicationWindowsEvent.--- See 'applicationInsightsApplicationWindowsEvent' for a more convenient--- constructor.-data ApplicationInsightsApplicationWindowsEvent =- ApplicationInsightsApplicationWindowsEvent- { _applicationInsightsApplicationWindowsEventEventLevels :: ValList Text- , _applicationInsightsApplicationWindowsEventEventName :: Val Text- , _applicationInsightsApplicationWindowsEventLogGroupName :: Val Text- , _applicationInsightsApplicationWindowsEventPatternSet :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON ApplicationInsightsApplicationWindowsEvent where- toJSON ApplicationInsightsApplicationWindowsEvent{..} =- object $- catMaybes- [ (Just . ("EventLevels",) . toJSON) _applicationInsightsApplicationWindowsEventEventLevels- , (Just . ("EventName",) . toJSON) _applicationInsightsApplicationWindowsEventEventName- , (Just . ("LogGroupName",) . toJSON) _applicationInsightsApplicationWindowsEventLogGroupName- , fmap (("PatternSet",) . toJSON) _applicationInsightsApplicationWindowsEventPatternSet- ]---- | Constructor for 'ApplicationInsightsApplicationWindowsEvent' containing--- required fields as arguments.-applicationInsightsApplicationWindowsEvent- :: ValList Text -- ^ 'aiaweEventLevels'- -> Val Text -- ^ 'aiaweEventName'- -> Val Text -- ^ 'aiaweLogGroupName'- -> ApplicationInsightsApplicationWindowsEvent-applicationInsightsApplicationWindowsEvent eventLevelsarg eventNamearg logGroupNamearg =- ApplicationInsightsApplicationWindowsEvent- { _applicationInsightsApplicationWindowsEventEventLevels = eventLevelsarg- , _applicationInsightsApplicationWindowsEventEventName = eventNamearg- , _applicationInsightsApplicationWindowsEventLogGroupName = logGroupNamearg- , _applicationInsightsApplicationWindowsEventPatternSet = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-eventlevels-aiaweEventLevels :: Lens' ApplicationInsightsApplicationWindowsEvent (ValList Text)-aiaweEventLevels = lens _applicationInsightsApplicationWindowsEventEventLevels (\s a -> s { _applicationInsightsApplicationWindowsEventEventLevels = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-eventname-aiaweEventName :: Lens' ApplicationInsightsApplicationWindowsEvent (Val Text)-aiaweEventName = lens _applicationInsightsApplicationWindowsEventEventName (\s a -> s { _applicationInsightsApplicationWindowsEventEventName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-loggroupname-aiaweLogGroupName :: Lens' ApplicationInsightsApplicationWindowsEvent (Val Text)-aiaweLogGroupName = lens _applicationInsightsApplicationWindowsEventLogGroupName (\s a -> s { _applicationInsightsApplicationWindowsEventLogGroupName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-patternset-aiawePatternSet :: Lens' ApplicationInsightsApplicationWindowsEvent (Maybe (Val Text))-aiawePatternSet = lens _applicationInsightsApplicationWindowsEventPatternSet (\s a -> s { _applicationInsightsApplicationWindowsEventPatternSet = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-datacatalog-tags.html--module Stratosphere.ResourceProperties.AthenaDataCatalogTags where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.Tag---- | Full data type definition for AthenaDataCatalogTags. See--- 'athenaDataCatalogTags' for a more convenient constructor.-data AthenaDataCatalogTags =- AthenaDataCatalogTags- { _athenaDataCatalogTagsTags :: Maybe [Tag]- } deriving (Show, Eq)--instance ToJSON AthenaDataCatalogTags where- toJSON AthenaDataCatalogTags{..} =- object $- catMaybes- [ fmap (("Tags",) . toJSON) _athenaDataCatalogTagsTags- ]---- | Constructor for 'AthenaDataCatalogTags' containing required fields as--- arguments.-athenaDataCatalogTags- :: AthenaDataCatalogTags-athenaDataCatalogTags =- AthenaDataCatalogTags- { _athenaDataCatalogTagsTags = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-datacatalog-tags.html#cfn-athena-datacatalog-tags-tags-adctTags :: Lens' AthenaDataCatalogTags (Maybe [Tag])-adctTags = lens _athenaDataCatalogTagsTags (\s a -> s { _athenaDataCatalogTagsTags = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-encryptionconfiguration.html--module Stratosphere.ResourceProperties.AthenaWorkGroupEncryptionConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for AthenaWorkGroupEncryptionConfiguration. See--- 'athenaWorkGroupEncryptionConfiguration' for a more convenient--- constructor.-data AthenaWorkGroupEncryptionConfiguration =- AthenaWorkGroupEncryptionConfiguration- { _athenaWorkGroupEncryptionConfigurationEncryptionOption :: Val Text- , _athenaWorkGroupEncryptionConfigurationKmsKey :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AthenaWorkGroupEncryptionConfiguration where- toJSON AthenaWorkGroupEncryptionConfiguration{..} =- object $- catMaybes- [ (Just . ("EncryptionOption",) . toJSON) _athenaWorkGroupEncryptionConfigurationEncryptionOption- , fmap (("KmsKey",) . toJSON) _athenaWorkGroupEncryptionConfigurationKmsKey- ]---- | Constructor for 'AthenaWorkGroupEncryptionConfiguration' containing--- required fields as arguments.-athenaWorkGroupEncryptionConfiguration- :: Val Text -- ^ 'awgecEncryptionOption'- -> AthenaWorkGroupEncryptionConfiguration-athenaWorkGroupEncryptionConfiguration encryptionOptionarg =- AthenaWorkGroupEncryptionConfiguration- { _athenaWorkGroupEncryptionConfigurationEncryptionOption = encryptionOptionarg- , _athenaWorkGroupEncryptionConfigurationKmsKey = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-encryptionconfiguration.html#cfn-athena-workgroup-encryptionconfiguration-encryptionoption-awgecEncryptionOption :: Lens' AthenaWorkGroupEncryptionConfiguration (Val Text)-awgecEncryptionOption = lens _athenaWorkGroupEncryptionConfigurationEncryptionOption (\s a -> s { _athenaWorkGroupEncryptionConfigurationEncryptionOption = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-encryptionconfiguration.html#cfn-athena-workgroup-encryptionconfiguration-kmskey-awgecKmsKey :: Lens' AthenaWorkGroupEncryptionConfiguration (Maybe (Val Text))-awgecKmsKey = lens _athenaWorkGroupEncryptionConfigurationKmsKey (\s a -> s { _athenaWorkGroupEncryptionConfigurationKmsKey = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfiguration.html--module Stratosphere.ResourceProperties.AthenaWorkGroupResultConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AthenaWorkGroupEncryptionConfiguration---- | Full data type definition for AthenaWorkGroupResultConfiguration. See--- 'athenaWorkGroupResultConfiguration' for a more convenient constructor.-data AthenaWorkGroupResultConfiguration =- AthenaWorkGroupResultConfiguration- { _athenaWorkGroupResultConfigurationEncryptionConfiguration :: Maybe AthenaWorkGroupEncryptionConfiguration- , _athenaWorkGroupResultConfigurationOutputLocation :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AthenaWorkGroupResultConfiguration where- toJSON AthenaWorkGroupResultConfiguration{..} =- object $- catMaybes- [ fmap (("EncryptionConfiguration",) . toJSON) _athenaWorkGroupResultConfigurationEncryptionConfiguration- , fmap (("OutputLocation",) . toJSON) _athenaWorkGroupResultConfigurationOutputLocation- ]---- | Constructor for 'AthenaWorkGroupResultConfiguration' containing required--- fields as arguments.-athenaWorkGroupResultConfiguration- :: AthenaWorkGroupResultConfiguration-athenaWorkGroupResultConfiguration =- AthenaWorkGroupResultConfiguration- { _athenaWorkGroupResultConfigurationEncryptionConfiguration = Nothing- , _athenaWorkGroupResultConfigurationOutputLocation = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfiguration.html#cfn-athena-workgroup-resultconfiguration-encryptionconfiguration-awgrcEncryptionConfiguration :: Lens' AthenaWorkGroupResultConfiguration (Maybe AthenaWorkGroupEncryptionConfiguration)-awgrcEncryptionConfiguration = lens _athenaWorkGroupResultConfigurationEncryptionConfiguration (\s a -> s { _athenaWorkGroupResultConfigurationEncryptionConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfiguration.html#cfn-athena-workgroup-resultconfiguration-outputlocation-awgrcOutputLocation :: Lens' AthenaWorkGroupResultConfiguration (Maybe (Val Text))-awgrcOutputLocation = lens _athenaWorkGroupResultConfigurationOutputLocation (\s a -> s { _athenaWorkGroupResultConfigurationOutputLocation = a })
@@ -1,60 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfigurationupdates.html--module Stratosphere.ResourceProperties.AthenaWorkGroupResultConfigurationUpdates where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AthenaWorkGroupEncryptionConfiguration---- | Full data type definition for AthenaWorkGroupResultConfigurationUpdates.--- See 'athenaWorkGroupResultConfigurationUpdates' for a more convenient--- constructor.-data AthenaWorkGroupResultConfigurationUpdates =- AthenaWorkGroupResultConfigurationUpdates- { _athenaWorkGroupResultConfigurationUpdatesEncryptionConfiguration :: Maybe AthenaWorkGroupEncryptionConfiguration- , _athenaWorkGroupResultConfigurationUpdatesOutputLocation :: Maybe (Val Text)- , _athenaWorkGroupResultConfigurationUpdatesRemoveEncryptionConfiguration :: Maybe (Val Bool)- , _athenaWorkGroupResultConfigurationUpdatesRemoveOutputLocation :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON AthenaWorkGroupResultConfigurationUpdates where- toJSON AthenaWorkGroupResultConfigurationUpdates{..} =- object $- catMaybes- [ fmap (("EncryptionConfiguration",) . toJSON) _athenaWorkGroupResultConfigurationUpdatesEncryptionConfiguration- , fmap (("OutputLocation",) . toJSON) _athenaWorkGroupResultConfigurationUpdatesOutputLocation- , fmap (("RemoveEncryptionConfiguration",) . toJSON) _athenaWorkGroupResultConfigurationUpdatesRemoveEncryptionConfiguration- , fmap (("RemoveOutputLocation",) . toJSON) _athenaWorkGroupResultConfigurationUpdatesRemoveOutputLocation- ]---- | Constructor for 'AthenaWorkGroupResultConfigurationUpdates' containing--- required fields as arguments.-athenaWorkGroupResultConfigurationUpdates- :: AthenaWorkGroupResultConfigurationUpdates-athenaWorkGroupResultConfigurationUpdates =- AthenaWorkGroupResultConfigurationUpdates- { _athenaWorkGroupResultConfigurationUpdatesEncryptionConfiguration = Nothing- , _athenaWorkGroupResultConfigurationUpdatesOutputLocation = Nothing- , _athenaWorkGroupResultConfigurationUpdatesRemoveEncryptionConfiguration = Nothing- , _athenaWorkGroupResultConfigurationUpdatesRemoveOutputLocation = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfigurationupdates.html#cfn-athena-workgroup-resultconfigurationupdates-encryptionconfiguration-awgrcuEncryptionConfiguration :: Lens' AthenaWorkGroupResultConfigurationUpdates (Maybe AthenaWorkGroupEncryptionConfiguration)-awgrcuEncryptionConfiguration = lens _athenaWorkGroupResultConfigurationUpdatesEncryptionConfiguration (\s a -> s { _athenaWorkGroupResultConfigurationUpdatesEncryptionConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfigurationupdates.html#cfn-athena-workgroup-resultconfigurationupdates-outputlocation-awgrcuOutputLocation :: Lens' AthenaWorkGroupResultConfigurationUpdates (Maybe (Val Text))-awgrcuOutputLocation = lens _athenaWorkGroupResultConfigurationUpdatesOutputLocation (\s a -> s { _athenaWorkGroupResultConfigurationUpdatesOutputLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfigurationupdates.html#cfn-athena-workgroup-resultconfigurationupdates-removeencryptionconfiguration-awgrcuRemoveEncryptionConfiguration :: Lens' AthenaWorkGroupResultConfigurationUpdates (Maybe (Val Bool))-awgrcuRemoveEncryptionConfiguration = lens _athenaWorkGroupResultConfigurationUpdatesRemoveEncryptionConfiguration (\s a -> s { _athenaWorkGroupResultConfigurationUpdatesRemoveEncryptionConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-resultconfigurationupdates.html#cfn-athena-workgroup-resultconfigurationupdates-removeoutputlocation-awgrcuRemoveOutputLocation :: Lens' AthenaWorkGroupResultConfigurationUpdates (Maybe (Val Bool))-awgrcuRemoveOutputLocation = lens _athenaWorkGroupResultConfigurationUpdatesRemoveOutputLocation (\s a -> s { _athenaWorkGroupResultConfigurationUpdatesRemoveOutputLocation = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-tags.html--module Stratosphere.ResourceProperties.AthenaWorkGroupTags where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.Tag---- | Full data type definition for AthenaWorkGroupTags. See--- 'athenaWorkGroupTags' for a more convenient constructor.-data AthenaWorkGroupTags =- AthenaWorkGroupTags- { _athenaWorkGroupTagsTags :: Maybe [Tag]- } deriving (Show, Eq)--instance ToJSON AthenaWorkGroupTags where- toJSON AthenaWorkGroupTags{..} =- object $- catMaybes- [ fmap (("Tags",) . toJSON) _athenaWorkGroupTagsTags- ]---- | Constructor for 'AthenaWorkGroupTags' containing required fields as--- arguments.-athenaWorkGroupTags- :: AthenaWorkGroupTags-athenaWorkGroupTags =- AthenaWorkGroupTags- { _athenaWorkGroupTagsTags = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-tags.html#cfn-athena-workgroup-tags-tags-awgtTags :: Lens' AthenaWorkGroupTags (Maybe [Tag])-awgtTags = lens _athenaWorkGroupTagsTags (\s a -> s { _athenaWorkGroupTagsTags = a })
@@ -1,67 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfiguration.html--module Stratosphere.ResourceProperties.AthenaWorkGroupWorkGroupConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AthenaWorkGroupResultConfiguration---- | Full data type definition for AthenaWorkGroupWorkGroupConfiguration. See--- 'athenaWorkGroupWorkGroupConfiguration' for a more convenient--- constructor.-data AthenaWorkGroupWorkGroupConfiguration =- AthenaWorkGroupWorkGroupConfiguration- { _athenaWorkGroupWorkGroupConfigurationBytesScannedCutoffPerQuery :: Maybe (Val Integer)- , _athenaWorkGroupWorkGroupConfigurationEnforceWorkGroupConfiguration :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationPublishCloudWatchMetricsEnabled :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationRequesterPaysEnabled :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationResultConfiguration :: Maybe AthenaWorkGroupResultConfiguration- } deriving (Show, Eq)--instance ToJSON AthenaWorkGroupWorkGroupConfiguration where- toJSON AthenaWorkGroupWorkGroupConfiguration{..} =- object $- catMaybes- [ fmap (("BytesScannedCutoffPerQuery",) . toJSON) _athenaWorkGroupWorkGroupConfigurationBytesScannedCutoffPerQuery- , fmap (("EnforceWorkGroupConfiguration",) . toJSON) _athenaWorkGroupWorkGroupConfigurationEnforceWorkGroupConfiguration- , fmap (("PublishCloudWatchMetricsEnabled",) . toJSON) _athenaWorkGroupWorkGroupConfigurationPublishCloudWatchMetricsEnabled- , fmap (("RequesterPaysEnabled",) . toJSON) _athenaWorkGroupWorkGroupConfigurationRequesterPaysEnabled- , fmap (("ResultConfiguration",) . toJSON) _athenaWorkGroupWorkGroupConfigurationResultConfiguration- ]---- | Constructor for 'AthenaWorkGroupWorkGroupConfiguration' containing--- required fields as arguments.-athenaWorkGroupWorkGroupConfiguration- :: AthenaWorkGroupWorkGroupConfiguration-athenaWorkGroupWorkGroupConfiguration =- AthenaWorkGroupWorkGroupConfiguration- { _athenaWorkGroupWorkGroupConfigurationBytesScannedCutoffPerQuery = Nothing- , _athenaWorkGroupWorkGroupConfigurationEnforceWorkGroupConfiguration = Nothing- , _athenaWorkGroupWorkGroupConfigurationPublishCloudWatchMetricsEnabled = Nothing- , _athenaWorkGroupWorkGroupConfigurationRequesterPaysEnabled = Nothing- , _athenaWorkGroupWorkGroupConfigurationResultConfiguration = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfiguration.html#cfn-athena-workgroup-workgroupconfiguration-bytesscannedcutoffperquery-awgwgcBytesScannedCutoffPerQuery :: Lens' AthenaWorkGroupWorkGroupConfiguration (Maybe (Val Integer))-awgwgcBytesScannedCutoffPerQuery = lens _athenaWorkGroupWorkGroupConfigurationBytesScannedCutoffPerQuery (\s a -> s { _athenaWorkGroupWorkGroupConfigurationBytesScannedCutoffPerQuery = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfiguration.html#cfn-athena-workgroup-workgroupconfiguration-enforceworkgroupconfiguration-awgwgcEnforceWorkGroupConfiguration :: Lens' AthenaWorkGroupWorkGroupConfiguration (Maybe (Val Bool))-awgwgcEnforceWorkGroupConfiguration = lens _athenaWorkGroupWorkGroupConfigurationEnforceWorkGroupConfiguration (\s a -> s { _athenaWorkGroupWorkGroupConfigurationEnforceWorkGroupConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfiguration.html#cfn-athena-workgroup-workgroupconfiguration-publishcloudwatchmetricsenabled-awgwgcPublishCloudWatchMetricsEnabled :: Lens' AthenaWorkGroupWorkGroupConfiguration (Maybe (Val Bool))-awgwgcPublishCloudWatchMetricsEnabled = lens _athenaWorkGroupWorkGroupConfigurationPublishCloudWatchMetricsEnabled (\s a -> s { _athenaWorkGroupWorkGroupConfigurationPublishCloudWatchMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfiguration.html#cfn-athena-workgroup-workgroupconfiguration-requesterpaysenabled-awgwgcRequesterPaysEnabled :: Lens' AthenaWorkGroupWorkGroupConfiguration (Maybe (Val Bool))-awgwgcRequesterPaysEnabled = lens _athenaWorkGroupWorkGroupConfigurationRequesterPaysEnabled (\s a -> s { _athenaWorkGroupWorkGroupConfigurationRequesterPaysEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfiguration.html#cfn-athena-workgroup-workgroupconfiguration-resultconfiguration-awgwgcResultConfiguration :: Lens' AthenaWorkGroupWorkGroupConfiguration (Maybe AthenaWorkGroupResultConfiguration)-awgwgcResultConfiguration = lens _athenaWorkGroupWorkGroupConfigurationResultConfiguration (\s a -> s { _athenaWorkGroupWorkGroupConfigurationResultConfiguration = a })
@@ -1,75 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html--module Stratosphere.ResourceProperties.AthenaWorkGroupWorkGroupConfigurationUpdates where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AthenaWorkGroupResultConfigurationUpdates---- | Full data type definition for--- AthenaWorkGroupWorkGroupConfigurationUpdates. See--- 'athenaWorkGroupWorkGroupConfigurationUpdates' for a more convenient--- constructor.-data AthenaWorkGroupWorkGroupConfigurationUpdates =- AthenaWorkGroupWorkGroupConfigurationUpdates- { _athenaWorkGroupWorkGroupConfigurationUpdatesBytesScannedCutoffPerQuery :: Maybe (Val Integer)- , _athenaWorkGroupWorkGroupConfigurationUpdatesEnforceWorkGroupConfiguration :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationUpdatesPublishCloudWatchMetricsEnabled :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationUpdatesRemoveBytesScannedCutoffPerQuery :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationUpdatesRequesterPaysEnabled :: Maybe (Val Bool)- , _athenaWorkGroupWorkGroupConfigurationUpdatesResultConfigurationUpdates :: Maybe AthenaWorkGroupResultConfigurationUpdates- } deriving (Show, Eq)--instance ToJSON AthenaWorkGroupWorkGroupConfigurationUpdates where- toJSON AthenaWorkGroupWorkGroupConfigurationUpdates{..} =- object $- catMaybes- [ fmap (("BytesScannedCutoffPerQuery",) . toJSON) _athenaWorkGroupWorkGroupConfigurationUpdatesBytesScannedCutoffPerQuery- , fmap (("EnforceWorkGroupConfiguration",) . toJSON) _athenaWorkGroupWorkGroupConfigurationUpdatesEnforceWorkGroupConfiguration- , fmap (("PublishCloudWatchMetricsEnabled",) . toJSON) _athenaWorkGroupWorkGroupConfigurationUpdatesPublishCloudWatchMetricsEnabled- , fmap (("RemoveBytesScannedCutoffPerQuery",) . toJSON) _athenaWorkGroupWorkGroupConfigurationUpdatesRemoveBytesScannedCutoffPerQuery- , fmap (("RequesterPaysEnabled",) . toJSON) _athenaWorkGroupWorkGroupConfigurationUpdatesRequesterPaysEnabled- , fmap (("ResultConfigurationUpdates",) . toJSON) _athenaWorkGroupWorkGroupConfigurationUpdatesResultConfigurationUpdates- ]---- | Constructor for 'AthenaWorkGroupWorkGroupConfigurationUpdates' containing--- required fields as arguments.-athenaWorkGroupWorkGroupConfigurationUpdates- :: AthenaWorkGroupWorkGroupConfigurationUpdates-athenaWorkGroupWorkGroupConfigurationUpdates =- AthenaWorkGroupWorkGroupConfigurationUpdates- { _athenaWorkGroupWorkGroupConfigurationUpdatesBytesScannedCutoffPerQuery = Nothing- , _athenaWorkGroupWorkGroupConfigurationUpdatesEnforceWorkGroupConfiguration = Nothing- , _athenaWorkGroupWorkGroupConfigurationUpdatesPublishCloudWatchMetricsEnabled = Nothing- , _athenaWorkGroupWorkGroupConfigurationUpdatesRemoveBytesScannedCutoffPerQuery = Nothing- , _athenaWorkGroupWorkGroupConfigurationUpdatesRequesterPaysEnabled = Nothing- , _athenaWorkGroupWorkGroupConfigurationUpdatesResultConfigurationUpdates = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html#cfn-athena-workgroup-workgroupconfigurationupdates-bytesscannedcutoffperquery-awgwgcuBytesScannedCutoffPerQuery :: Lens' AthenaWorkGroupWorkGroupConfigurationUpdates (Maybe (Val Integer))-awgwgcuBytesScannedCutoffPerQuery = lens _athenaWorkGroupWorkGroupConfigurationUpdatesBytesScannedCutoffPerQuery (\s a -> s { _athenaWorkGroupWorkGroupConfigurationUpdatesBytesScannedCutoffPerQuery = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html#cfn-athena-workgroup-workgroupconfigurationupdates-enforceworkgroupconfiguration-awgwgcuEnforceWorkGroupConfiguration :: Lens' AthenaWorkGroupWorkGroupConfigurationUpdates (Maybe (Val Bool))-awgwgcuEnforceWorkGroupConfiguration = lens _athenaWorkGroupWorkGroupConfigurationUpdatesEnforceWorkGroupConfiguration (\s a -> s { _athenaWorkGroupWorkGroupConfigurationUpdatesEnforceWorkGroupConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html#cfn-athena-workgroup-workgroupconfigurationupdates-publishcloudwatchmetricsenabled-awgwgcuPublishCloudWatchMetricsEnabled :: Lens' AthenaWorkGroupWorkGroupConfigurationUpdates (Maybe (Val Bool))-awgwgcuPublishCloudWatchMetricsEnabled = lens _athenaWorkGroupWorkGroupConfigurationUpdatesPublishCloudWatchMetricsEnabled (\s a -> s { _athenaWorkGroupWorkGroupConfigurationUpdatesPublishCloudWatchMetricsEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html#cfn-athena-workgroup-workgroupconfigurationupdates-removebytesscannedcutoffperquery-awgwgcuRemoveBytesScannedCutoffPerQuery :: Lens' AthenaWorkGroupWorkGroupConfigurationUpdates (Maybe (Val Bool))-awgwgcuRemoveBytesScannedCutoffPerQuery = lens _athenaWorkGroupWorkGroupConfigurationUpdatesRemoveBytesScannedCutoffPerQuery (\s a -> s { _athenaWorkGroupWorkGroupConfigurationUpdatesRemoveBytesScannedCutoffPerQuery = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html#cfn-athena-workgroup-workgroupconfigurationupdates-requesterpaysenabled-awgwgcuRequesterPaysEnabled :: Lens' AthenaWorkGroupWorkGroupConfigurationUpdates (Maybe (Val Bool))-awgwgcuRequesterPaysEnabled = lens _athenaWorkGroupWorkGroupConfigurationUpdatesRequesterPaysEnabled (\s a -> s { _athenaWorkGroupWorkGroupConfigurationUpdatesRequesterPaysEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-athena-workgroup-workgroupconfigurationupdates.html#cfn-athena-workgroup-workgroupconfigurationupdates-resultconfigurationupdates-awgwgcuResultConfigurationUpdates :: Lens' AthenaWorkGroupWorkGroupConfigurationUpdates (Maybe AthenaWorkGroupResultConfigurationUpdates)-awgwgcuResultConfigurationUpdates = lens _athenaWorkGroupWorkGroupConfigurationUpdatesResultConfigurationUpdates (\s a -> s { _athenaWorkGroupWorkGroupConfigurationUpdatesResultConfigurationUpdates = a })
@@ -1,75 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupInstancesDistribution where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingAutoScalingGroupInstancesDistribution. See--- 'autoScalingAutoScalingGroupInstancesDistribution' for a more convenient--- constructor.-data AutoScalingAutoScalingGroupInstancesDistribution =- AutoScalingAutoScalingGroupInstancesDistribution- { _autoScalingAutoScalingGroupInstancesDistributionOnDemandAllocationStrategy :: Maybe (Val Text)- , _autoScalingAutoScalingGroupInstancesDistributionOnDemandBaseCapacity :: Maybe (Val Integer)- , _autoScalingAutoScalingGroupInstancesDistributionOnDemandPercentageAboveBaseCapacity :: Maybe (Val Integer)- , _autoScalingAutoScalingGroupInstancesDistributionSpotAllocationStrategy :: Maybe (Val Text)- , _autoScalingAutoScalingGroupInstancesDistributionSpotInstancePools :: Maybe (Val Integer)- , _autoScalingAutoScalingGroupInstancesDistributionSpotMaxPrice :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupInstancesDistribution where- toJSON AutoScalingAutoScalingGroupInstancesDistribution{..} =- object $- catMaybes- [ fmap (("OnDemandAllocationStrategy",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionOnDemandAllocationStrategy- , fmap (("OnDemandBaseCapacity",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionOnDemandBaseCapacity- , fmap (("OnDemandPercentageAboveBaseCapacity",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionOnDemandPercentageAboveBaseCapacity- , fmap (("SpotAllocationStrategy",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionSpotAllocationStrategy- , fmap (("SpotInstancePools",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionSpotInstancePools- , fmap (("SpotMaxPrice",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionSpotMaxPrice- ]---- | Constructor for 'AutoScalingAutoScalingGroupInstancesDistribution'--- containing required fields as arguments.-autoScalingAutoScalingGroupInstancesDistribution- :: AutoScalingAutoScalingGroupInstancesDistribution-autoScalingAutoScalingGroupInstancesDistribution =- AutoScalingAutoScalingGroupInstancesDistribution- { _autoScalingAutoScalingGroupInstancesDistributionOnDemandAllocationStrategy = Nothing- , _autoScalingAutoScalingGroupInstancesDistributionOnDemandBaseCapacity = Nothing- , _autoScalingAutoScalingGroupInstancesDistributionOnDemandPercentageAboveBaseCapacity = Nothing- , _autoScalingAutoScalingGroupInstancesDistributionSpotAllocationStrategy = Nothing- , _autoScalingAutoScalingGroupInstancesDistributionSpotInstancePools = Nothing- , _autoScalingAutoScalingGroupInstancesDistributionSpotMaxPrice = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html#cfn-autoscaling-autoscalinggroup-instancesdistribution-ondemandallocationstrategy-asasgidOnDemandAllocationStrategy :: Lens' AutoScalingAutoScalingGroupInstancesDistribution (Maybe (Val Text))-asasgidOnDemandAllocationStrategy = lens _autoScalingAutoScalingGroupInstancesDistributionOnDemandAllocationStrategy (\s a -> s { _autoScalingAutoScalingGroupInstancesDistributionOnDemandAllocationStrategy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html#cfn-autoscaling-autoscalinggroup-instancesdistribution-ondemandbasecapacity-asasgidOnDemandBaseCapacity :: Lens' AutoScalingAutoScalingGroupInstancesDistribution (Maybe (Val Integer))-asasgidOnDemandBaseCapacity = lens _autoScalingAutoScalingGroupInstancesDistributionOnDemandBaseCapacity (\s a -> s { _autoScalingAutoScalingGroupInstancesDistributionOnDemandBaseCapacity = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html#cfn-autoscaling-autoscalinggroup-instancesdistribution-ondemandpercentageabovebasecapacity-asasgidOnDemandPercentageAboveBaseCapacity :: Lens' AutoScalingAutoScalingGroupInstancesDistribution (Maybe (Val Integer))-asasgidOnDemandPercentageAboveBaseCapacity = lens _autoScalingAutoScalingGroupInstancesDistributionOnDemandPercentageAboveBaseCapacity (\s a -> s { _autoScalingAutoScalingGroupInstancesDistributionOnDemandPercentageAboveBaseCapacity = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html#cfn-autoscaling-autoscalinggroup-instancesdistribution-spotallocationstrategy-asasgidSpotAllocationStrategy :: Lens' AutoScalingAutoScalingGroupInstancesDistribution (Maybe (Val Text))-asasgidSpotAllocationStrategy = lens _autoScalingAutoScalingGroupInstancesDistributionSpotAllocationStrategy (\s a -> s { _autoScalingAutoScalingGroupInstancesDistributionSpotAllocationStrategy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html#cfn-autoscaling-autoscalinggroup-instancesdistribution-spotinstancepools-asasgidSpotInstancePools :: Lens' AutoScalingAutoScalingGroupInstancesDistribution (Maybe (Val Integer))-asasgidSpotInstancePools = lens _autoScalingAutoScalingGroupInstancesDistributionSpotInstancePools (\s a -> s { _autoScalingAutoScalingGroupInstancesDistributionSpotInstancePools = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-instancesdistribution.html#cfn-autoscaling-autoscalinggroup-instancesdistribution-spotmaxprice-asasgidSpotMaxPrice :: Lens' AutoScalingAutoScalingGroupInstancesDistribution (Maybe (Val Text))-asasgidSpotMaxPrice = lens _autoScalingAutoScalingGroupInstancesDistributionSpotMaxPrice (\s a -> s { _autoScalingAutoScalingGroupInstancesDistributionSpotMaxPrice = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-launchtemplate.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLaunchTemplate where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLaunchTemplateSpecification-import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLaunchTemplateOverrides---- | Full data type definition for AutoScalingAutoScalingGroupLaunchTemplate.--- See 'autoScalingAutoScalingGroupLaunchTemplate' for a more convenient--- constructor.-data AutoScalingAutoScalingGroupLaunchTemplate =- AutoScalingAutoScalingGroupLaunchTemplate- { _autoScalingAutoScalingGroupLaunchTemplateLaunchTemplateSpecification :: AutoScalingAutoScalingGroupLaunchTemplateSpecification- , _autoScalingAutoScalingGroupLaunchTemplateOverrides :: Maybe [AutoScalingAutoScalingGroupLaunchTemplateOverrides]- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupLaunchTemplate where- toJSON AutoScalingAutoScalingGroupLaunchTemplate{..} =- object $- catMaybes- [ (Just . ("LaunchTemplateSpecification",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateLaunchTemplateSpecification- , fmap (("Overrides",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateOverrides- ]---- | Constructor for 'AutoScalingAutoScalingGroupLaunchTemplate' containing--- required fields as arguments.-autoScalingAutoScalingGroupLaunchTemplate- :: AutoScalingAutoScalingGroupLaunchTemplateSpecification -- ^ 'asasgltLaunchTemplateSpecification'- -> AutoScalingAutoScalingGroupLaunchTemplate-autoScalingAutoScalingGroupLaunchTemplate launchTemplateSpecificationarg =- AutoScalingAutoScalingGroupLaunchTemplate- { _autoScalingAutoScalingGroupLaunchTemplateLaunchTemplateSpecification = launchTemplateSpecificationarg- , _autoScalingAutoScalingGroupLaunchTemplateOverrides = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-launchtemplate.html#cfn-as-group-launchtemplate-asasgltLaunchTemplateSpecification :: Lens' AutoScalingAutoScalingGroupLaunchTemplate AutoScalingAutoScalingGroupLaunchTemplateSpecification-asasgltLaunchTemplateSpecification = lens _autoScalingAutoScalingGroupLaunchTemplateLaunchTemplateSpecification (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateLaunchTemplateSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-launchtemplate.html#cfn-as-mixedinstancespolicy-overrides-asasgltOverrides :: Lens' AutoScalingAutoScalingGroupLaunchTemplate (Maybe [AutoScalingAutoScalingGroupLaunchTemplateOverrides])-asasgltOverrides = lens _autoScalingAutoScalingGroupLaunchTemplateOverrides (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateOverrides = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-launchtemplateoverrides.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLaunchTemplateOverrides where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingAutoScalingGroupLaunchTemplateOverrides. See--- 'autoScalingAutoScalingGroupLaunchTemplateOverrides' for a more--- convenient constructor.-data AutoScalingAutoScalingGroupLaunchTemplateOverrides =- AutoScalingAutoScalingGroupLaunchTemplateOverrides- { _autoScalingAutoScalingGroupLaunchTemplateOverridesInstanceType :: Maybe (Val Text)- , _autoScalingAutoScalingGroupLaunchTemplateOverridesWeightedCapacity :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupLaunchTemplateOverrides where- toJSON AutoScalingAutoScalingGroupLaunchTemplateOverrides{..} =- object $- catMaybes- [ fmap (("InstanceType",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateOverridesInstanceType- , fmap (("WeightedCapacity",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateOverridesWeightedCapacity- ]---- | Constructor for 'AutoScalingAutoScalingGroupLaunchTemplateOverrides'--- containing required fields as arguments.-autoScalingAutoScalingGroupLaunchTemplateOverrides- :: AutoScalingAutoScalingGroupLaunchTemplateOverrides-autoScalingAutoScalingGroupLaunchTemplateOverrides =- AutoScalingAutoScalingGroupLaunchTemplateOverrides- { _autoScalingAutoScalingGroupLaunchTemplateOverridesInstanceType = Nothing- , _autoScalingAutoScalingGroupLaunchTemplateOverridesWeightedCapacity = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-launchtemplateoverrides.html#cfn-autoscaling-autoscalinggroup-launchtemplateoverrides-instancetype-asasgltoInstanceType :: Lens' AutoScalingAutoScalingGroupLaunchTemplateOverrides (Maybe (Val Text))-asasgltoInstanceType = lens _autoScalingAutoScalingGroupLaunchTemplateOverridesInstanceType (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateOverridesInstanceType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-mixedinstancespolicy-launchtemplateoverrides.html#cfn-autoscaling-autoscalinggroup-launchtemplateoverrides-weightedcapacity-asasgltoWeightedCapacity :: Lens' AutoScalingAutoScalingGroupLaunchTemplateOverrides (Maybe (Val Text))-asasgltoWeightedCapacity = lens _autoScalingAutoScalingGroupLaunchTemplateOverridesWeightedCapacity (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateOverridesWeightedCapacity = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-launchtemplatespecification.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLaunchTemplateSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingAutoScalingGroupLaunchTemplateSpecification. See--- 'autoScalingAutoScalingGroupLaunchTemplateSpecification' for a more--- convenient constructor.-data AutoScalingAutoScalingGroupLaunchTemplateSpecification =- AutoScalingAutoScalingGroupLaunchTemplateSpecification- { _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateId :: Maybe (Val Text)- , _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateName :: Maybe (Val Text)- , _autoScalingAutoScalingGroupLaunchTemplateSpecificationVersion :: Val Text- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupLaunchTemplateSpecification where- toJSON AutoScalingAutoScalingGroupLaunchTemplateSpecification{..} =- object $- catMaybes- [ fmap (("LaunchTemplateId",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateId- , fmap (("LaunchTemplateName",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateName- , (Just . ("Version",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateSpecificationVersion- ]---- | Constructor for 'AutoScalingAutoScalingGroupLaunchTemplateSpecification'--- containing required fields as arguments.-autoScalingAutoScalingGroupLaunchTemplateSpecification- :: Val Text -- ^ 'asasgltsVersion'- -> AutoScalingAutoScalingGroupLaunchTemplateSpecification-autoScalingAutoScalingGroupLaunchTemplateSpecification versionarg =- AutoScalingAutoScalingGroupLaunchTemplateSpecification- { _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateId = Nothing- , _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateName = Nothing- , _autoScalingAutoScalingGroupLaunchTemplateSpecificationVersion = versionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-launchtemplatespecification.html#cfn-autoscaling-autoscalinggroup-launchtemplatespecification-launchtemplateid-asasgltsLaunchTemplateId :: Lens' AutoScalingAutoScalingGroupLaunchTemplateSpecification (Maybe (Val Text))-asasgltsLaunchTemplateId = lens _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateId (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-launchtemplatespecification.html#cfn-autoscaling-autoscalinggroup-launchtemplatespecification-launchtemplatename-asasgltsLaunchTemplateName :: Lens' AutoScalingAutoScalingGroupLaunchTemplateSpecification (Maybe (Val Text))-asasgltsLaunchTemplateName = lens _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateName (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateSpecificationLaunchTemplateName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-launchtemplatespecification.html#cfn-autoscaling-autoscalinggroup-launchtemplatespecification-version-asasgltsVersion :: Lens' AutoScalingAutoScalingGroupLaunchTemplateSpecification (Val Text)-asasgltsVersion = lens _autoScalingAutoScalingGroupLaunchTemplateSpecificationVersion (\s a -> s { _autoScalingAutoScalingGroupLaunchTemplateSpecificationVersion = a })
@@ -1,84 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLifecycleHookSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingAutoScalingGroupLifecycleHookSpecification. See--- 'autoScalingAutoScalingGroupLifecycleHookSpecification' for a more--- convenient constructor.-data AutoScalingAutoScalingGroupLifecycleHookSpecification =- AutoScalingAutoScalingGroupLifecycleHookSpecification- { _autoScalingAutoScalingGroupLifecycleHookSpecificationDefaultResult :: Maybe (Val Text)- , _autoScalingAutoScalingGroupLifecycleHookSpecificationHeartbeatTimeout :: Maybe (Val Integer)- , _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleHookName :: Val Text- , _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleTransition :: Val Text- , _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationMetadata :: Maybe (Val Text)- , _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationTargetARN :: Maybe (Val Text)- , _autoScalingAutoScalingGroupLifecycleHookSpecificationRoleARN :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupLifecycleHookSpecification where- toJSON AutoScalingAutoScalingGroupLifecycleHookSpecification{..} =- object $- catMaybes- [ fmap (("DefaultResult",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationDefaultResult- , fmap (("HeartbeatTimeout",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationHeartbeatTimeout- , (Just . ("LifecycleHookName",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleHookName- , (Just . ("LifecycleTransition",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleTransition- , fmap (("NotificationMetadata",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationMetadata- , fmap (("NotificationTargetARN",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationTargetARN- , fmap (("RoleARN",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationRoleARN- ]---- | Constructor for 'AutoScalingAutoScalingGroupLifecycleHookSpecification'--- containing required fields as arguments.-autoScalingAutoScalingGroupLifecycleHookSpecification- :: Val Text -- ^ 'asasglhsLifecycleHookName'- -> Val Text -- ^ 'asasglhsLifecycleTransition'- -> AutoScalingAutoScalingGroupLifecycleHookSpecification-autoScalingAutoScalingGroupLifecycleHookSpecification lifecycleHookNamearg lifecycleTransitionarg =- AutoScalingAutoScalingGroupLifecycleHookSpecification- { _autoScalingAutoScalingGroupLifecycleHookSpecificationDefaultResult = Nothing- , _autoScalingAutoScalingGroupLifecycleHookSpecificationHeartbeatTimeout = Nothing- , _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleHookName = lifecycleHookNamearg- , _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleTransition = lifecycleTransitionarg- , _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationMetadata = Nothing- , _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationTargetARN = Nothing- , _autoScalingAutoScalingGroupLifecycleHookSpecificationRoleARN = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-defaultresult-asasglhsDefaultResult :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Maybe (Val Text))-asasglhsDefaultResult = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationDefaultResult (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationDefaultResult = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-heartbeattimeout-asasglhsHeartbeatTimeout :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Maybe (Val Integer))-asasglhsHeartbeatTimeout = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationHeartbeatTimeout (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationHeartbeatTimeout = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-lifecyclehookname-asasglhsLifecycleHookName :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Val Text)-asasglhsLifecycleHookName = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleHookName (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleHookName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-lifecycletransition-asasglhsLifecycleTransition :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Val Text)-asasglhsLifecycleTransition = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleTransition (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationLifecycleTransition = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-notificationmetadata-asasglhsNotificationMetadata :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Maybe (Val Text))-asasglhsNotificationMetadata = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationMetadata (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationMetadata = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-notificationtargetarn-asasglhsNotificationTargetARN :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Maybe (Val Text))-asasglhsNotificationTargetARN = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationTargetARN (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationNotificationTargetARN = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-autoscalinggroup-lifecyclehookspecification.html#cfn-autoscaling-autoscalinggroup-lifecyclehookspecification-rolearn-asasglhsRoleARN :: Lens' AutoScalingAutoScalingGroupLifecycleHookSpecification (Maybe (Val Text))-asasglhsRoleARN = lens _autoScalingAutoScalingGroupLifecycleHookSpecificationRoleARN (\s a -> s { _autoScalingAutoScalingGroupLifecycleHookSpecificationRoleARN = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-metricscollection.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupMetricsCollection where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingAutoScalingGroupMetricsCollection. See--- 'autoScalingAutoScalingGroupMetricsCollection' for a more convenient--- constructor.-data AutoScalingAutoScalingGroupMetricsCollection =- AutoScalingAutoScalingGroupMetricsCollection- { _autoScalingAutoScalingGroupMetricsCollectionGranularity :: Val Text- , _autoScalingAutoScalingGroupMetricsCollectionMetrics :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupMetricsCollection where- toJSON AutoScalingAutoScalingGroupMetricsCollection{..} =- object $- catMaybes- [ (Just . ("Granularity",) . toJSON) _autoScalingAutoScalingGroupMetricsCollectionGranularity- , fmap (("Metrics",) . toJSON) _autoScalingAutoScalingGroupMetricsCollectionMetrics- ]---- | Constructor for 'AutoScalingAutoScalingGroupMetricsCollection' containing--- required fields as arguments.-autoScalingAutoScalingGroupMetricsCollection- :: Val Text -- ^ 'asasgmcGranularity'- -> AutoScalingAutoScalingGroupMetricsCollection-autoScalingAutoScalingGroupMetricsCollection granularityarg =- AutoScalingAutoScalingGroupMetricsCollection- { _autoScalingAutoScalingGroupMetricsCollectionGranularity = granularityarg- , _autoScalingAutoScalingGroupMetricsCollectionMetrics = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-metricscollection.html#cfn-as-metricscollection-granularity-asasgmcGranularity :: Lens' AutoScalingAutoScalingGroupMetricsCollection (Val Text)-asasgmcGranularity = lens _autoScalingAutoScalingGroupMetricsCollectionGranularity (\s a -> s { _autoScalingAutoScalingGroupMetricsCollectionGranularity = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-metricscollection.html#cfn-as-metricscollection-metrics-asasgmcMetrics :: Lens' AutoScalingAutoScalingGroupMetricsCollection (Maybe (ValList Text))-asasgmcMetrics = lens _autoScalingAutoScalingGroupMetricsCollectionMetrics (\s a -> s { _autoScalingAutoScalingGroupMetricsCollectionMetrics = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-group-mixedinstancespolicy.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupMixedInstancesPolicy where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupInstancesDistribution-import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupLaunchTemplate---- | Full data type definition for--- AutoScalingAutoScalingGroupMixedInstancesPolicy. See--- 'autoScalingAutoScalingGroupMixedInstancesPolicy' for a more convenient--- constructor.-data AutoScalingAutoScalingGroupMixedInstancesPolicy =- AutoScalingAutoScalingGroupMixedInstancesPolicy- { _autoScalingAutoScalingGroupMixedInstancesPolicyInstancesDistribution :: Maybe AutoScalingAutoScalingGroupInstancesDistribution- , _autoScalingAutoScalingGroupMixedInstancesPolicyLaunchTemplate :: AutoScalingAutoScalingGroupLaunchTemplate- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupMixedInstancesPolicy where- toJSON AutoScalingAutoScalingGroupMixedInstancesPolicy{..} =- object $- catMaybes- [ fmap (("InstancesDistribution",) . toJSON) _autoScalingAutoScalingGroupMixedInstancesPolicyInstancesDistribution- , (Just . ("LaunchTemplate",) . toJSON) _autoScalingAutoScalingGroupMixedInstancesPolicyLaunchTemplate- ]---- | Constructor for 'AutoScalingAutoScalingGroupMixedInstancesPolicy'--- containing required fields as arguments.-autoScalingAutoScalingGroupMixedInstancesPolicy- :: AutoScalingAutoScalingGroupLaunchTemplate -- ^ 'asasgmipLaunchTemplate'- -> AutoScalingAutoScalingGroupMixedInstancesPolicy-autoScalingAutoScalingGroupMixedInstancesPolicy launchTemplatearg =- AutoScalingAutoScalingGroupMixedInstancesPolicy- { _autoScalingAutoScalingGroupMixedInstancesPolicyInstancesDistribution = Nothing- , _autoScalingAutoScalingGroupMixedInstancesPolicyLaunchTemplate = launchTemplatearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-group-mixedinstancespolicy.html#cfn-as-mixedinstancespolicy-instancesdistribution-asasgmipInstancesDistribution :: Lens' AutoScalingAutoScalingGroupMixedInstancesPolicy (Maybe AutoScalingAutoScalingGroupInstancesDistribution)-asasgmipInstancesDistribution = lens _autoScalingAutoScalingGroupMixedInstancesPolicyInstancesDistribution (\s a -> s { _autoScalingAutoScalingGroupMixedInstancesPolicyInstancesDistribution = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/cfn-as-group-mixedinstancespolicy.html#cfn-as-mixedinstancespolicy-launchtemplate-asasgmipLaunchTemplate :: Lens' AutoScalingAutoScalingGroupMixedInstancesPolicy AutoScalingAutoScalingGroupLaunchTemplate-asasgmipLaunchTemplate = lens _autoScalingAutoScalingGroupMixedInstancesPolicyLaunchTemplate (\s a -> s { _autoScalingAutoScalingGroupMixedInstancesPolicyLaunchTemplate = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-notificationconfigurations.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupNotificationConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingAutoScalingGroupNotificationConfiguration. See--- 'autoScalingAutoScalingGroupNotificationConfiguration' for a more--- convenient constructor.-data AutoScalingAutoScalingGroupNotificationConfiguration =- AutoScalingAutoScalingGroupNotificationConfiguration- { _autoScalingAutoScalingGroupNotificationConfigurationNotificationTypes :: Maybe (ValList Text)- , _autoScalingAutoScalingGroupNotificationConfigurationTopicARN :: Val Text- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupNotificationConfiguration where- toJSON AutoScalingAutoScalingGroupNotificationConfiguration{..} =- object $- catMaybes- [ fmap (("NotificationTypes",) . toJSON) _autoScalingAutoScalingGroupNotificationConfigurationNotificationTypes- , (Just . ("TopicARN",) . toJSON) _autoScalingAutoScalingGroupNotificationConfigurationTopicARN- ]---- | Constructor for 'AutoScalingAutoScalingGroupNotificationConfiguration'--- containing required fields as arguments.-autoScalingAutoScalingGroupNotificationConfiguration- :: Val Text -- ^ 'asasgncTopicARN'- -> AutoScalingAutoScalingGroupNotificationConfiguration-autoScalingAutoScalingGroupNotificationConfiguration topicARNarg =- AutoScalingAutoScalingGroupNotificationConfiguration- { _autoScalingAutoScalingGroupNotificationConfigurationNotificationTypes = Nothing- , _autoScalingAutoScalingGroupNotificationConfigurationTopicARN = topicARNarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-notificationconfigurations.html#cfn-as-group-notificationconfigurations-notificationtypes-asasgncNotificationTypes :: Lens' AutoScalingAutoScalingGroupNotificationConfiguration (Maybe (ValList Text))-asasgncNotificationTypes = lens _autoScalingAutoScalingGroupNotificationConfigurationNotificationTypes (\s a -> s { _autoScalingAutoScalingGroupNotificationConfigurationNotificationTypes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-notificationconfigurations.html#cfn-autoscaling-autoscalinggroup-notificationconfigurations-topicarn-asasgncTopicARN :: Lens' AutoScalingAutoScalingGroupNotificationConfiguration (Val Text)-asasgncTopicARN = lens _autoScalingAutoScalingGroupNotificationConfigurationTopicARN (\s a -> s { _autoScalingAutoScalingGroupNotificationConfigurationTopicARN = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-tags.html--module Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupTagProperty where--import Stratosphere.ResourceImports----- | Full data type definition for AutoScalingAutoScalingGroupTagProperty. See--- 'autoScalingAutoScalingGroupTagProperty' for a more convenient--- constructor.-data AutoScalingAutoScalingGroupTagProperty =- AutoScalingAutoScalingGroupTagProperty- { _autoScalingAutoScalingGroupTagPropertyKey :: Val Text- , _autoScalingAutoScalingGroupTagPropertyPropagateAtLaunch :: Val Bool- , _autoScalingAutoScalingGroupTagPropertyValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AutoScalingAutoScalingGroupTagProperty where- toJSON AutoScalingAutoScalingGroupTagProperty{..} =- object $- catMaybes- [ (Just . ("Key",) . toJSON) _autoScalingAutoScalingGroupTagPropertyKey- , (Just . ("PropagateAtLaunch",) . toJSON) _autoScalingAutoScalingGroupTagPropertyPropagateAtLaunch- , (Just . ("Value",) . toJSON) _autoScalingAutoScalingGroupTagPropertyValue- ]---- | Constructor for 'AutoScalingAutoScalingGroupTagProperty' containing--- required fields as arguments.-autoScalingAutoScalingGroupTagProperty- :: Val Text -- ^ 'asasgtpKey'- -> Val Bool -- ^ 'asasgtpPropagateAtLaunch'- -> Val Text -- ^ 'asasgtpValue'- -> AutoScalingAutoScalingGroupTagProperty-autoScalingAutoScalingGroupTagProperty keyarg propagateAtLauncharg valuearg =- AutoScalingAutoScalingGroupTagProperty- { _autoScalingAutoScalingGroupTagPropertyKey = keyarg- , _autoScalingAutoScalingGroupTagPropertyPropagateAtLaunch = propagateAtLauncharg- , _autoScalingAutoScalingGroupTagPropertyValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-tags.html#cfn-as-tags-Key-asasgtpKey :: Lens' AutoScalingAutoScalingGroupTagProperty (Val Text)-asasgtpKey = lens _autoScalingAutoScalingGroupTagPropertyKey (\s a -> s { _autoScalingAutoScalingGroupTagPropertyKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-tags.html#cfn-as-tags-PropagateAtLaunch-asasgtpPropagateAtLaunch :: Lens' AutoScalingAutoScalingGroupTagProperty (Val Bool)-asasgtpPropagateAtLaunch = lens _autoScalingAutoScalingGroupTagPropertyPropagateAtLaunch (\s a -> s { _autoScalingAutoScalingGroupTagPropertyPropagateAtLaunch = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-tags.html#cfn-as-tags-Value-asasgtpValue :: Lens' AutoScalingAutoScalingGroupTagProperty (Val Text)-asasgtpValue = lens _autoScalingAutoScalingGroupTagPropertyValue (\s a -> s { _autoScalingAutoScalingGroupTagPropertyValue = a })
@@ -1,74 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html--module Stratosphere.ResourceProperties.AutoScalingLaunchConfigurationBlockDevice where--import Stratosphere.ResourceImports----- | Full data type definition for AutoScalingLaunchConfigurationBlockDevice.--- See 'autoScalingLaunchConfigurationBlockDevice' for a more convenient--- constructor.-data AutoScalingLaunchConfigurationBlockDevice =- AutoScalingLaunchConfigurationBlockDevice- { _autoScalingLaunchConfigurationBlockDeviceDeleteOnTermination :: Maybe (Val Bool)- , _autoScalingLaunchConfigurationBlockDeviceEncrypted :: Maybe (Val Bool)- , _autoScalingLaunchConfigurationBlockDeviceIops :: Maybe (Val Integer)- , _autoScalingLaunchConfigurationBlockDeviceSnapshotId :: Maybe (Val Text)- , _autoScalingLaunchConfigurationBlockDeviceVolumeSize :: Maybe (Val Integer)- , _autoScalingLaunchConfigurationBlockDeviceVolumeType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingLaunchConfigurationBlockDevice where- toJSON AutoScalingLaunchConfigurationBlockDevice{..} =- object $- catMaybes- [ fmap (("DeleteOnTermination",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceDeleteOnTermination- , fmap (("Encrypted",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceEncrypted- , fmap (("Iops",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceIops- , fmap (("SnapshotId",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceSnapshotId- , fmap (("VolumeSize",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceVolumeSize- , fmap (("VolumeType",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceVolumeType- ]---- | Constructor for 'AutoScalingLaunchConfigurationBlockDevice' containing--- required fields as arguments.-autoScalingLaunchConfigurationBlockDevice- :: AutoScalingLaunchConfigurationBlockDevice-autoScalingLaunchConfigurationBlockDevice =- AutoScalingLaunchConfigurationBlockDevice- { _autoScalingLaunchConfigurationBlockDeviceDeleteOnTermination = Nothing- , _autoScalingLaunchConfigurationBlockDeviceEncrypted = Nothing- , _autoScalingLaunchConfigurationBlockDeviceIops = Nothing- , _autoScalingLaunchConfigurationBlockDeviceSnapshotId = Nothing- , _autoScalingLaunchConfigurationBlockDeviceVolumeSize = Nothing- , _autoScalingLaunchConfigurationBlockDeviceVolumeType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-deleteonterm-aslcbdDeleteOnTermination :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Bool))-aslcbdDeleteOnTermination = lens _autoScalingLaunchConfigurationBlockDeviceDeleteOnTermination (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceDeleteOnTermination = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-encrypted-aslcbdEncrypted :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Bool))-aslcbdEncrypted = lens _autoScalingLaunchConfigurationBlockDeviceEncrypted (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceEncrypted = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-iops-aslcbdIops :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Integer))-aslcbdIops = lens _autoScalingLaunchConfigurationBlockDeviceIops (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceIops = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-snapshotid-aslcbdSnapshotId :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Text))-aslcbdSnapshotId = lens _autoScalingLaunchConfigurationBlockDeviceSnapshotId (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceSnapshotId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-volumesize-aslcbdVolumeSize :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Integer))-aslcbdVolumeSize = lens _autoScalingLaunchConfigurationBlockDeviceVolumeSize (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceVolumeSize = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-volumetype-aslcbdVolumeType :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Text))-aslcbdVolumeType = lens _autoScalingLaunchConfigurationBlockDeviceVolumeType (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceVolumeType = a })
@@ -1,62 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-mapping.html--module Stratosphere.ResourceProperties.AutoScalingLaunchConfigurationBlockDeviceMapping where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingLaunchConfigurationBlockDevice---- | Full data type definition for--- AutoScalingLaunchConfigurationBlockDeviceMapping. See--- 'autoScalingLaunchConfigurationBlockDeviceMapping' for a more convenient--- constructor.-data AutoScalingLaunchConfigurationBlockDeviceMapping =- AutoScalingLaunchConfigurationBlockDeviceMapping- { _autoScalingLaunchConfigurationBlockDeviceMappingDeviceName :: Val Text- , _autoScalingLaunchConfigurationBlockDeviceMappingEbs :: Maybe AutoScalingLaunchConfigurationBlockDevice- , _autoScalingLaunchConfigurationBlockDeviceMappingNoDevice :: Maybe (Val Bool)- , _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingLaunchConfigurationBlockDeviceMapping where- toJSON AutoScalingLaunchConfigurationBlockDeviceMapping{..} =- object $- catMaybes- [ (Just . ("DeviceName",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceMappingDeviceName- , fmap (("Ebs",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceMappingEbs- , fmap (("NoDevice",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceMappingNoDevice- , fmap (("VirtualName",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName- ]---- | Constructor for 'AutoScalingLaunchConfigurationBlockDeviceMapping'--- containing required fields as arguments.-autoScalingLaunchConfigurationBlockDeviceMapping- :: Val Text -- ^ 'aslcbdmDeviceName'- -> AutoScalingLaunchConfigurationBlockDeviceMapping-autoScalingLaunchConfigurationBlockDeviceMapping deviceNamearg =- AutoScalingLaunchConfigurationBlockDeviceMapping- { _autoScalingLaunchConfigurationBlockDeviceMappingDeviceName = deviceNamearg- , _autoScalingLaunchConfigurationBlockDeviceMappingEbs = Nothing- , _autoScalingLaunchConfigurationBlockDeviceMappingNoDevice = Nothing- , _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-mapping.html#cfn-as-launchconfig-blockdev-mapping-devicename-aslcbdmDeviceName :: Lens' AutoScalingLaunchConfigurationBlockDeviceMapping (Val Text)-aslcbdmDeviceName = lens _autoScalingLaunchConfigurationBlockDeviceMappingDeviceName (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceMappingDeviceName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-mapping.html#cfn-as-launchconfig-blockdev-mapping-ebs-aslcbdmEbs :: Lens' AutoScalingLaunchConfigurationBlockDeviceMapping (Maybe AutoScalingLaunchConfigurationBlockDevice)-aslcbdmEbs = lens _autoScalingLaunchConfigurationBlockDeviceMappingEbs (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceMappingEbs = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-mapping.html#cfn-as-launchconfig-blockdev-mapping-nodevice-aslcbdmNoDevice :: Lens' AutoScalingLaunchConfigurationBlockDeviceMapping (Maybe (Val Bool))-aslcbdmNoDevice = lens _autoScalingLaunchConfigurationBlockDeviceMappingNoDevice (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceMappingNoDevice = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-mapping.html#cfn-as-launchconfig-blockdev-mapping-virtualname-aslcbdmVirtualName :: Lens' AutoScalingLaunchConfigurationBlockDeviceMapping (Maybe (Val Text))-aslcbdmVirtualName = lens _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-applicationsource.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanApplicationSource where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanTagFilter---- | Full data type definition for--- AutoScalingPlansScalingPlanApplicationSource. See--- 'autoScalingPlansScalingPlanApplicationSource' for a more convenient--- constructor.-data AutoScalingPlansScalingPlanApplicationSource =- AutoScalingPlansScalingPlanApplicationSource- { _autoScalingPlansScalingPlanApplicationSourceCloudFormationStackARN :: Maybe (Val Text)- , _autoScalingPlansScalingPlanApplicationSourceTagFilters :: Maybe [AutoScalingPlansScalingPlanTagFilter]- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanApplicationSource where- toJSON AutoScalingPlansScalingPlanApplicationSource{..} =- object $- catMaybes- [ fmap (("CloudFormationStackARN",) . toJSON) _autoScalingPlansScalingPlanApplicationSourceCloudFormationStackARN- , fmap (("TagFilters",) . toJSON) _autoScalingPlansScalingPlanApplicationSourceTagFilters- ]---- | Constructor for 'AutoScalingPlansScalingPlanApplicationSource' containing--- required fields as arguments.-autoScalingPlansScalingPlanApplicationSource- :: AutoScalingPlansScalingPlanApplicationSource-autoScalingPlansScalingPlanApplicationSource =- AutoScalingPlansScalingPlanApplicationSource- { _autoScalingPlansScalingPlanApplicationSourceCloudFormationStackARN = Nothing- , _autoScalingPlansScalingPlanApplicationSourceTagFilters = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-applicationsource.html#cfn-autoscalingplans-scalingplan-applicationsource-cloudformationstackarn-aspspasCloudFormationStackARN :: Lens' AutoScalingPlansScalingPlanApplicationSource (Maybe (Val Text))-aspspasCloudFormationStackARN = lens _autoScalingPlansScalingPlanApplicationSourceCloudFormationStackARN (\s a -> s { _autoScalingPlansScalingPlanApplicationSourceCloudFormationStackARN = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-applicationsource.html#cfn-autoscalingplans-scalingplan-applicationsource-tagfilters-aspspasTagFilters :: Lens' AutoScalingPlansScalingPlanApplicationSource (Maybe [AutoScalingPlansScalingPlanTagFilter])-aspspasTagFilters = lens _autoScalingPlansScalingPlanApplicationSourceTagFilters (\s a -> s { _autoScalingPlansScalingPlanApplicationSourceTagFilters = a })
@@ -1,72 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedloadmetricspecification.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanMetricDimension---- | Full data type definition for--- AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification. See--- 'autoScalingPlansScalingPlanCustomizedLoadMetricSpecification' for a more--- convenient constructor.-data AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification =- AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification- { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationDimensions :: Maybe [AutoScalingPlansScalingPlanMetricDimension]- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationMetricName :: Val Text- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationNamespace :: Val Text- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationStatistic :: Val Text- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationUnit :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification where- toJSON AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification{..} =- object $- catMaybes- [ fmap (("Dimensions",) . toJSON) _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationDimensions- , (Just . ("MetricName",) . toJSON) _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationMetricName- , (Just . ("Namespace",) . toJSON) _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationNamespace- , (Just . ("Statistic",) . toJSON) _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationStatistic- , fmap (("Unit",) . toJSON) _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationUnit- ]---- | Constructor for--- 'AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification' containing--- required fields as arguments.-autoScalingPlansScalingPlanCustomizedLoadMetricSpecification- :: Val Text -- ^ 'aspspclmsMetricName'- -> Val Text -- ^ 'aspspclmsNamespace'- -> Val Text -- ^ 'aspspclmsStatistic'- -> AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification-autoScalingPlansScalingPlanCustomizedLoadMetricSpecification metricNamearg namespacearg statisticarg =- AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification- { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationDimensions = Nothing- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationMetricName = metricNamearg- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationNamespace = namespacearg- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationStatistic = statisticarg- , _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationUnit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedloadmetricspecification-dimensions-aspspclmsDimensions :: Lens' AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification (Maybe [AutoScalingPlansScalingPlanMetricDimension])-aspspclmsDimensions = lens _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationDimensions (\s a -> s { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationDimensions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedloadmetricspecification-metricname-aspspclmsMetricName :: Lens' AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification (Val Text)-aspspclmsMetricName = lens _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationMetricName (\s a -> s { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationMetricName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedloadmetricspecification-namespace-aspspclmsNamespace :: Lens' AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification (Val Text)-aspspclmsNamespace = lens _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationNamespace (\s a -> s { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedloadmetricspecification-statistic-aspspclmsStatistic :: Lens' AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification (Val Text)-aspspclmsStatistic = lens _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationStatistic (\s a -> s { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationStatistic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedloadmetricspecification-unit-aspspclmsUnit :: Lens' AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification (Maybe (Val Text))-aspspclmsUnit = lens _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationUnit (\s a -> s { _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationUnit = a })
@@ -1,72 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedscalingmetricspecification.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanMetricDimension---- | Full data type definition for--- AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification. See--- 'autoScalingPlansScalingPlanCustomizedScalingMetricSpecification' for a--- more convenient constructor.-data AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification =- AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification- { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationDimensions :: Maybe [AutoScalingPlansScalingPlanMetricDimension]- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationMetricName :: Val Text- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationNamespace :: Val Text- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationStatistic :: Val Text- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationUnit :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification where- toJSON AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification{..} =- object $- catMaybes- [ fmap (("Dimensions",) . toJSON) _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationDimensions- , (Just . ("MetricName",) . toJSON) _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationMetricName- , (Just . ("Namespace",) . toJSON) _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationNamespace- , (Just . ("Statistic",) . toJSON) _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationStatistic- , fmap (("Unit",) . toJSON) _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationUnit- ]---- | Constructor for--- 'AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification'--- containing required fields as arguments.-autoScalingPlansScalingPlanCustomizedScalingMetricSpecification- :: Val Text -- ^ 'aspspcsmsMetricName'- -> Val Text -- ^ 'aspspcsmsNamespace'- -> Val Text -- ^ 'aspspcsmsStatistic'- -> AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification-autoScalingPlansScalingPlanCustomizedScalingMetricSpecification metricNamearg namespacearg statisticarg =- AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification- { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationDimensions = Nothing- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationMetricName = metricNamearg- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationNamespace = namespacearg- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationStatistic = statisticarg- , _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationUnit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedscalingmetricspecification-dimensions-aspspcsmsDimensions :: Lens' AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification (Maybe [AutoScalingPlansScalingPlanMetricDimension])-aspspcsmsDimensions = lens _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationDimensions (\s a -> s { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationDimensions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedscalingmetricspecification-metricname-aspspcsmsMetricName :: Lens' AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification (Val Text)-aspspcsmsMetricName = lens _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationMetricName (\s a -> s { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationMetricName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedscalingmetricspecification-namespace-aspspcsmsNamespace :: Lens' AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification (Val Text)-aspspcsmsNamespace = lens _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationNamespace (\s a -> s { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedscalingmetricspecification-statistic-aspspcsmsStatistic :: Lens' AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification (Val Text)-aspspcsmsStatistic = lens _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationStatistic (\s a -> s { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationStatistic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-customizedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-customizedscalingmetricspecification-unit-aspspcsmsUnit :: Lens' AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification (Maybe (Val Text))-aspspcsmsUnit = lens _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationUnit (\s a -> s { _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationUnit = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-metricdimension.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanMetricDimension where--import Stratosphere.ResourceImports----- | Full data type definition for AutoScalingPlansScalingPlanMetricDimension.--- See 'autoScalingPlansScalingPlanMetricDimension' for a more convenient--- constructor.-data AutoScalingPlansScalingPlanMetricDimension =- AutoScalingPlansScalingPlanMetricDimension- { _autoScalingPlansScalingPlanMetricDimensionName :: Val Text- , _autoScalingPlansScalingPlanMetricDimensionValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanMetricDimension where- toJSON AutoScalingPlansScalingPlanMetricDimension{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _autoScalingPlansScalingPlanMetricDimensionName- , (Just . ("Value",) . toJSON) _autoScalingPlansScalingPlanMetricDimensionValue- ]---- | Constructor for 'AutoScalingPlansScalingPlanMetricDimension' containing--- required fields as arguments.-autoScalingPlansScalingPlanMetricDimension- :: Val Text -- ^ 'aspspmdName'- -> Val Text -- ^ 'aspspmdValue'- -> AutoScalingPlansScalingPlanMetricDimension-autoScalingPlansScalingPlanMetricDimension namearg valuearg =- AutoScalingPlansScalingPlanMetricDimension- { _autoScalingPlansScalingPlanMetricDimensionName = namearg- , _autoScalingPlansScalingPlanMetricDimensionValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-metricdimension.html#cfn-autoscalingplans-scalingplan-metricdimension-name-aspspmdName :: Lens' AutoScalingPlansScalingPlanMetricDimension (Val Text)-aspspmdName = lens _autoScalingPlansScalingPlanMetricDimensionName (\s a -> s { _autoScalingPlansScalingPlanMetricDimensionName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-metricdimension.html#cfn-autoscalingplans-scalingplan-metricdimension-value-aspspmdValue :: Lens' AutoScalingPlansScalingPlanMetricDimension (Val Text)-aspspmdValue = lens _autoScalingPlansScalingPlanMetricDimensionValue (\s a -> s { _autoScalingPlansScalingPlanMetricDimensionValue = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-predefinedloadmetricspecification.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification. See--- 'autoScalingPlansScalingPlanPredefinedLoadMetricSpecification' for a more--- convenient constructor.-data AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification =- AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification- { _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationPredefinedLoadMetricType :: Val Text- , _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationResourceLabel :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification where- toJSON AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification{..} =- object $- catMaybes- [ (Just . ("PredefinedLoadMetricType",) . toJSON) _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationPredefinedLoadMetricType- , fmap (("ResourceLabel",) . toJSON) _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationResourceLabel- ]---- | Constructor for--- 'AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification' containing--- required fields as arguments.-autoScalingPlansScalingPlanPredefinedLoadMetricSpecification- :: Val Text -- ^ 'aspspplmsPredefinedLoadMetricType'- -> AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification-autoScalingPlansScalingPlanPredefinedLoadMetricSpecification predefinedLoadMetricTypearg =- AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification- { _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationPredefinedLoadMetricType = predefinedLoadMetricTypearg- , _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationResourceLabel = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-predefinedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-predefinedloadmetricspecification-predefinedloadmetrictype-aspspplmsPredefinedLoadMetricType :: Lens' AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification (Val Text)-aspspplmsPredefinedLoadMetricType = lens _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationPredefinedLoadMetricType (\s a -> s { _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationPredefinedLoadMetricType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-predefinedloadmetricspecification.html#cfn-autoscalingplans-scalingplan-predefinedloadmetricspecification-resourcelabel-aspspplmsResourceLabel :: Lens' AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification (Maybe (Val Text))-aspspplmsResourceLabel = lens _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationResourceLabel (\s a -> s { _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationResourceLabel = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-predefinedscalingmetricspecification.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification. See--- 'autoScalingPlansScalingPlanPredefinedScalingMetricSpecification' for a--- more convenient constructor.-data AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification =- AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification- { _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationPredefinedScalingMetricType :: Val Text- , _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationResourceLabel :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification where- toJSON AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification{..} =- object $- catMaybes- [ (Just . ("PredefinedScalingMetricType",) . toJSON) _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationPredefinedScalingMetricType- , fmap (("ResourceLabel",) . toJSON) _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationResourceLabel- ]---- | Constructor for--- 'AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification'--- containing required fields as arguments.-autoScalingPlansScalingPlanPredefinedScalingMetricSpecification- :: Val Text -- ^ 'aspsppsmsPredefinedScalingMetricType'- -> AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification-autoScalingPlansScalingPlanPredefinedScalingMetricSpecification predefinedScalingMetricTypearg =- AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification- { _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationPredefinedScalingMetricType = predefinedScalingMetricTypearg- , _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationResourceLabel = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-predefinedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-predefinedscalingmetricspecification-predefinedscalingmetrictype-aspsppsmsPredefinedScalingMetricType :: Lens' AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification (Val Text)-aspsppsmsPredefinedScalingMetricType = lens _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationPredefinedScalingMetricType (\s a -> s { _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationPredefinedScalingMetricType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-predefinedscalingmetricspecification.html#cfn-autoscalingplans-scalingplan-predefinedscalingmetricspecification-resourcelabel-aspsppsmsResourceLabel :: Lens' AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification (Maybe (Val Text))-aspsppsmsResourceLabel = lens _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationResourceLabel (\s a -> s { _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationResourceLabel = a })
@@ -1,139 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanScalingInstruction where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanTargetTrackingConfiguration---- | Full data type definition for--- AutoScalingPlansScalingPlanScalingInstruction. See--- 'autoScalingPlansScalingPlanScalingInstruction' for a more convenient--- constructor.-data AutoScalingPlansScalingPlanScalingInstruction =- AutoScalingPlansScalingPlanScalingInstruction- { _autoScalingPlansScalingPlanScalingInstructionCustomizedLoadMetricSpecification :: Maybe AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification- , _autoScalingPlansScalingPlanScalingInstructionDisableDynamicScaling :: Maybe (Val Bool)- , _autoScalingPlansScalingPlanScalingInstructionMaxCapacity :: Val Integer- , _autoScalingPlansScalingPlanScalingInstructionMinCapacity :: Val Integer- , _autoScalingPlansScalingPlanScalingInstructionPredefinedLoadMetricSpecification :: Maybe AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification- , _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBehavior :: Maybe (Val Text)- , _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBuffer :: Maybe (Val Integer)- , _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMode :: Maybe (Val Text)- , _autoScalingPlansScalingPlanScalingInstructionResourceId :: Val Text- , _autoScalingPlansScalingPlanScalingInstructionScalableDimension :: Val Text- , _autoScalingPlansScalingPlanScalingInstructionScalingPolicyUpdateBehavior :: Maybe (Val Text)- , _autoScalingPlansScalingPlanScalingInstructionScheduledActionBufferTime :: Maybe (Val Integer)- , _autoScalingPlansScalingPlanScalingInstructionServiceNamespace :: Val Text- , _autoScalingPlansScalingPlanScalingInstructionTargetTrackingConfigurations :: [AutoScalingPlansScalingPlanTargetTrackingConfiguration]- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanScalingInstruction where- toJSON AutoScalingPlansScalingPlanScalingInstruction{..} =- object $- catMaybes- [ fmap (("CustomizedLoadMetricSpecification",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionCustomizedLoadMetricSpecification- , fmap (("DisableDynamicScaling",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionDisableDynamicScaling- , (Just . ("MaxCapacity",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionMaxCapacity- , (Just . ("MinCapacity",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionMinCapacity- , fmap (("PredefinedLoadMetricSpecification",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionPredefinedLoadMetricSpecification- , fmap (("PredictiveScalingMaxCapacityBehavior",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBehavior- , fmap (("PredictiveScalingMaxCapacityBuffer",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBuffer- , fmap (("PredictiveScalingMode",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMode- , (Just . ("ResourceId",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionResourceId- , (Just . ("ScalableDimension",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionScalableDimension- , fmap (("ScalingPolicyUpdateBehavior",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionScalingPolicyUpdateBehavior- , fmap (("ScheduledActionBufferTime",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionScheduledActionBufferTime- , (Just . ("ServiceNamespace",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionServiceNamespace- , (Just . ("TargetTrackingConfigurations",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionTargetTrackingConfigurations- ]---- | Constructor for 'AutoScalingPlansScalingPlanScalingInstruction'--- containing required fields as arguments.-autoScalingPlansScalingPlanScalingInstruction- :: Val Integer -- ^ 'aspspsiMaxCapacity'- -> Val Integer -- ^ 'aspspsiMinCapacity'- -> Val Text -- ^ 'aspspsiResourceId'- -> Val Text -- ^ 'aspspsiScalableDimension'- -> Val Text -- ^ 'aspspsiServiceNamespace'- -> [AutoScalingPlansScalingPlanTargetTrackingConfiguration] -- ^ 'aspspsiTargetTrackingConfigurations'- -> AutoScalingPlansScalingPlanScalingInstruction-autoScalingPlansScalingPlanScalingInstruction maxCapacityarg minCapacityarg resourceIdarg scalableDimensionarg serviceNamespacearg targetTrackingConfigurationsarg =- AutoScalingPlansScalingPlanScalingInstruction- { _autoScalingPlansScalingPlanScalingInstructionCustomizedLoadMetricSpecification = Nothing- , _autoScalingPlansScalingPlanScalingInstructionDisableDynamicScaling = Nothing- , _autoScalingPlansScalingPlanScalingInstructionMaxCapacity = maxCapacityarg- , _autoScalingPlansScalingPlanScalingInstructionMinCapacity = minCapacityarg- , _autoScalingPlansScalingPlanScalingInstructionPredefinedLoadMetricSpecification = Nothing- , _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBehavior = Nothing- , _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBuffer = Nothing- , _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMode = Nothing- , _autoScalingPlansScalingPlanScalingInstructionResourceId = resourceIdarg- , _autoScalingPlansScalingPlanScalingInstructionScalableDimension = scalableDimensionarg- , _autoScalingPlansScalingPlanScalingInstructionScalingPolicyUpdateBehavior = Nothing- , _autoScalingPlansScalingPlanScalingInstructionScheduledActionBufferTime = Nothing- , _autoScalingPlansScalingPlanScalingInstructionServiceNamespace = serviceNamespacearg- , _autoScalingPlansScalingPlanScalingInstructionTargetTrackingConfigurations = targetTrackingConfigurationsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-customizedloadmetricspecification-aspspsiCustomizedLoadMetricSpecification :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification)-aspspsiCustomizedLoadMetricSpecification = lens _autoScalingPlansScalingPlanScalingInstructionCustomizedLoadMetricSpecification (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionCustomizedLoadMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-disabledynamicscaling-aspspsiDisableDynamicScaling :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe (Val Bool))-aspspsiDisableDynamicScaling = lens _autoScalingPlansScalingPlanScalingInstructionDisableDynamicScaling (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionDisableDynamicScaling = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-maxcapacity-aspspsiMaxCapacity :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Val Integer)-aspspsiMaxCapacity = lens _autoScalingPlansScalingPlanScalingInstructionMaxCapacity (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionMaxCapacity = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-mincapacity-aspspsiMinCapacity :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Val Integer)-aspspsiMinCapacity = lens _autoScalingPlansScalingPlanScalingInstructionMinCapacity (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionMinCapacity = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-predefinedloadmetricspecification-aspspsiPredefinedLoadMetricSpecification :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification)-aspspsiPredefinedLoadMetricSpecification = lens _autoScalingPlansScalingPlanScalingInstructionPredefinedLoadMetricSpecification (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionPredefinedLoadMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-predictivescalingmaxcapacitybehavior-aspspsiPredictiveScalingMaxCapacityBehavior :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe (Val Text))-aspspsiPredictiveScalingMaxCapacityBehavior = lens _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBehavior (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-predictivescalingmaxcapacitybuffer-aspspsiPredictiveScalingMaxCapacityBuffer :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe (Val Integer))-aspspsiPredictiveScalingMaxCapacityBuffer = lens _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBuffer (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMaxCapacityBuffer = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-predictivescalingmode-aspspsiPredictiveScalingMode :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe (Val Text))-aspspsiPredictiveScalingMode = lens _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMode (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionPredictiveScalingMode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-resourceid-aspspsiResourceId :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Val Text)-aspspsiResourceId = lens _autoScalingPlansScalingPlanScalingInstructionResourceId (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionResourceId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-scalabledimension-aspspsiScalableDimension :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Val Text)-aspspsiScalableDimension = lens _autoScalingPlansScalingPlanScalingInstructionScalableDimension (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionScalableDimension = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-scalingpolicyupdatebehavior-aspspsiScalingPolicyUpdateBehavior :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe (Val Text))-aspspsiScalingPolicyUpdateBehavior = lens _autoScalingPlansScalingPlanScalingInstructionScalingPolicyUpdateBehavior (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionScalingPolicyUpdateBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-scheduledactionbuffertime-aspspsiScheduledActionBufferTime :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Maybe (Val Integer))-aspspsiScheduledActionBufferTime = lens _autoScalingPlansScalingPlanScalingInstructionScheduledActionBufferTime (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionScheduledActionBufferTime = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-servicenamespace-aspspsiServiceNamespace :: Lens' AutoScalingPlansScalingPlanScalingInstruction (Val Text)-aspspsiServiceNamespace = lens _autoScalingPlansScalingPlanScalingInstructionServiceNamespace (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionServiceNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-scalinginstruction.html#cfn-autoscalingplans-scalingplan-scalinginstruction-targettrackingconfigurations-aspspsiTargetTrackingConfigurations :: Lens' AutoScalingPlansScalingPlanScalingInstruction [AutoScalingPlansScalingPlanTargetTrackingConfiguration]-aspspsiTargetTrackingConfigurations = lens _autoScalingPlansScalingPlanScalingInstructionTargetTrackingConfigurations (\s a -> s { _autoScalingPlansScalingPlanScalingInstructionTargetTrackingConfigurations = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-tagfilter.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanTagFilter where--import Stratosphere.ResourceImports----- | Full data type definition for AutoScalingPlansScalingPlanTagFilter. See--- 'autoScalingPlansScalingPlanTagFilter' for a more convenient constructor.-data AutoScalingPlansScalingPlanTagFilter =- AutoScalingPlansScalingPlanTagFilter- { _autoScalingPlansScalingPlanTagFilterKey :: Val Text- , _autoScalingPlansScalingPlanTagFilterValues :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanTagFilter where- toJSON AutoScalingPlansScalingPlanTagFilter{..} =- object $- catMaybes- [ (Just . ("Key",) . toJSON) _autoScalingPlansScalingPlanTagFilterKey- , fmap (("Values",) . toJSON) _autoScalingPlansScalingPlanTagFilterValues- ]---- | Constructor for 'AutoScalingPlansScalingPlanTagFilter' containing--- required fields as arguments.-autoScalingPlansScalingPlanTagFilter- :: Val Text -- ^ 'aspsptfKey'- -> AutoScalingPlansScalingPlanTagFilter-autoScalingPlansScalingPlanTagFilter keyarg =- AutoScalingPlansScalingPlanTagFilter- { _autoScalingPlansScalingPlanTagFilterKey = keyarg- , _autoScalingPlansScalingPlanTagFilterValues = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-tagfilter.html#cfn-autoscalingplans-scalingplan-tagfilter-key-aspsptfKey :: Lens' AutoScalingPlansScalingPlanTagFilter (Val Text)-aspsptfKey = lens _autoScalingPlansScalingPlanTagFilterKey (\s a -> s { _autoScalingPlansScalingPlanTagFilterKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-tagfilter.html#cfn-autoscalingplans-scalingplan-tagfilter-values-aspsptfValues :: Lens' AutoScalingPlansScalingPlanTagFilter (Maybe (ValList Text))-aspsptfValues = lens _autoScalingPlansScalingPlanTagFilterValues (\s a -> s { _autoScalingPlansScalingPlanTagFilterValues = a })
@@ -1,84 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html--module Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanTargetTrackingConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification-import Stratosphere.ResourceProperties.AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification---- | Full data type definition for--- AutoScalingPlansScalingPlanTargetTrackingConfiguration. See--- 'autoScalingPlansScalingPlanTargetTrackingConfiguration' for a more--- convenient constructor.-data AutoScalingPlansScalingPlanTargetTrackingConfiguration =- AutoScalingPlansScalingPlanTargetTrackingConfiguration- { _autoScalingPlansScalingPlanTargetTrackingConfigurationCustomizedScalingMetricSpecification :: Maybe AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification- , _autoScalingPlansScalingPlanTargetTrackingConfigurationDisableScaleIn :: Maybe (Val Bool)- , _autoScalingPlansScalingPlanTargetTrackingConfigurationEstimatedInstanceWarmup :: Maybe (Val Integer)- , _autoScalingPlansScalingPlanTargetTrackingConfigurationPredefinedScalingMetricSpecification :: Maybe AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification- , _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleInCooldown :: Maybe (Val Integer)- , _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleOutCooldown :: Maybe (Val Integer)- , _autoScalingPlansScalingPlanTargetTrackingConfigurationTargetValue :: Val Double- } deriving (Show, Eq)--instance ToJSON AutoScalingPlansScalingPlanTargetTrackingConfiguration where- toJSON AutoScalingPlansScalingPlanTargetTrackingConfiguration{..} =- object $- catMaybes- [ fmap (("CustomizedScalingMetricSpecification",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationCustomizedScalingMetricSpecification- , fmap (("DisableScaleIn",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationDisableScaleIn- , fmap (("EstimatedInstanceWarmup",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationEstimatedInstanceWarmup- , fmap (("PredefinedScalingMetricSpecification",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationPredefinedScalingMetricSpecification- , fmap (("ScaleInCooldown",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleInCooldown- , fmap (("ScaleOutCooldown",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleOutCooldown- , (Just . ("TargetValue",) . toJSON) _autoScalingPlansScalingPlanTargetTrackingConfigurationTargetValue- ]---- | Constructor for 'AutoScalingPlansScalingPlanTargetTrackingConfiguration'--- containing required fields as arguments.-autoScalingPlansScalingPlanTargetTrackingConfiguration- :: Val Double -- ^ 'aspspttcTargetValue'- -> AutoScalingPlansScalingPlanTargetTrackingConfiguration-autoScalingPlansScalingPlanTargetTrackingConfiguration targetValuearg =- AutoScalingPlansScalingPlanTargetTrackingConfiguration- { _autoScalingPlansScalingPlanTargetTrackingConfigurationCustomizedScalingMetricSpecification = Nothing- , _autoScalingPlansScalingPlanTargetTrackingConfigurationDisableScaleIn = Nothing- , _autoScalingPlansScalingPlanTargetTrackingConfigurationEstimatedInstanceWarmup = Nothing- , _autoScalingPlansScalingPlanTargetTrackingConfigurationPredefinedScalingMetricSpecification = Nothing- , _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleInCooldown = Nothing- , _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleOutCooldown = Nothing- , _autoScalingPlansScalingPlanTargetTrackingConfigurationTargetValue = targetValuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-customizedscalingmetricspecification-aspspttcCustomizedScalingMetricSpecification :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Maybe AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification)-aspspttcCustomizedScalingMetricSpecification = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationCustomizedScalingMetricSpecification (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationCustomizedScalingMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-disablescalein-aspspttcDisableScaleIn :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Maybe (Val Bool))-aspspttcDisableScaleIn = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationDisableScaleIn (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationDisableScaleIn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-estimatedinstancewarmup-aspspttcEstimatedInstanceWarmup :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Maybe (Val Integer))-aspspttcEstimatedInstanceWarmup = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationEstimatedInstanceWarmup (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationEstimatedInstanceWarmup = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-predefinedscalingmetricspecification-aspspttcPredefinedScalingMetricSpecification :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Maybe AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification)-aspspttcPredefinedScalingMetricSpecification = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationPredefinedScalingMetricSpecification (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationPredefinedScalingMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-scaleincooldown-aspspttcScaleInCooldown :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Maybe (Val Integer))-aspspttcScaleInCooldown = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleInCooldown (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleInCooldown = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-scaleoutcooldown-aspspttcScaleOutCooldown :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Maybe (Val Integer))-aspspttcScaleOutCooldown = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleOutCooldown (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationScaleOutCooldown = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscalingplans-scalingplan-targettrackingconfiguration.html#cfn-autoscalingplans-scalingplan-targettrackingconfiguration-targetvalue-aspspttcTargetValue :: Lens' AutoScalingPlansScalingPlanTargetTrackingConfiguration (Val Double)-aspspttcTargetValue = lens _autoScalingPlansScalingPlanTargetTrackingConfigurationTargetValue (\s a -> s { _autoScalingPlansScalingPlanTargetTrackingConfigurationTargetValue = a })
@@ -1,71 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-customizedmetricspecification.html--module Stratosphere.ResourceProperties.AutoScalingScalingPolicyCustomizedMetricSpecification where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingScalingPolicyMetricDimension---- | Full data type definition for--- AutoScalingScalingPolicyCustomizedMetricSpecification. See--- 'autoScalingScalingPolicyCustomizedMetricSpecification' for a more--- convenient constructor.-data AutoScalingScalingPolicyCustomizedMetricSpecification =- AutoScalingScalingPolicyCustomizedMetricSpecification- { _autoScalingScalingPolicyCustomizedMetricSpecificationDimensions :: Maybe [AutoScalingScalingPolicyMetricDimension]- , _autoScalingScalingPolicyCustomizedMetricSpecificationMetricName :: Val Text- , _autoScalingScalingPolicyCustomizedMetricSpecificationNamespace :: Val Text- , _autoScalingScalingPolicyCustomizedMetricSpecificationStatistic :: Val Text- , _autoScalingScalingPolicyCustomizedMetricSpecificationUnit :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingScalingPolicyCustomizedMetricSpecification where- toJSON AutoScalingScalingPolicyCustomizedMetricSpecification{..} =- object $- catMaybes- [ fmap (("Dimensions",) . toJSON) _autoScalingScalingPolicyCustomizedMetricSpecificationDimensions- , (Just . ("MetricName",) . toJSON) _autoScalingScalingPolicyCustomizedMetricSpecificationMetricName- , (Just . ("Namespace",) . toJSON) _autoScalingScalingPolicyCustomizedMetricSpecificationNamespace- , (Just . ("Statistic",) . toJSON) _autoScalingScalingPolicyCustomizedMetricSpecificationStatistic- , fmap (("Unit",) . toJSON) _autoScalingScalingPolicyCustomizedMetricSpecificationUnit- ]---- | Constructor for 'AutoScalingScalingPolicyCustomizedMetricSpecification'--- containing required fields as arguments.-autoScalingScalingPolicyCustomizedMetricSpecification- :: Val Text -- ^ 'asspcmsMetricName'- -> Val Text -- ^ 'asspcmsNamespace'- -> Val Text -- ^ 'asspcmsStatistic'- -> AutoScalingScalingPolicyCustomizedMetricSpecification-autoScalingScalingPolicyCustomizedMetricSpecification metricNamearg namespacearg statisticarg =- AutoScalingScalingPolicyCustomizedMetricSpecification- { _autoScalingScalingPolicyCustomizedMetricSpecificationDimensions = Nothing- , _autoScalingScalingPolicyCustomizedMetricSpecificationMetricName = metricNamearg- , _autoScalingScalingPolicyCustomizedMetricSpecificationNamespace = namespacearg- , _autoScalingScalingPolicyCustomizedMetricSpecificationStatistic = statisticarg- , _autoScalingScalingPolicyCustomizedMetricSpecificationUnit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-customizedmetricspecification.html#cfn-autoscaling-scalingpolicy-customizedmetricspecification-dimensions-asspcmsDimensions :: Lens' AutoScalingScalingPolicyCustomizedMetricSpecification (Maybe [AutoScalingScalingPolicyMetricDimension])-asspcmsDimensions = lens _autoScalingScalingPolicyCustomizedMetricSpecificationDimensions (\s a -> s { _autoScalingScalingPolicyCustomizedMetricSpecificationDimensions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-customizedmetricspecification.html#cfn-autoscaling-scalingpolicy-customizedmetricspecification-metricname-asspcmsMetricName :: Lens' AutoScalingScalingPolicyCustomizedMetricSpecification (Val Text)-asspcmsMetricName = lens _autoScalingScalingPolicyCustomizedMetricSpecificationMetricName (\s a -> s { _autoScalingScalingPolicyCustomizedMetricSpecificationMetricName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-customizedmetricspecification.html#cfn-autoscaling-scalingpolicy-customizedmetricspecification-namespace-asspcmsNamespace :: Lens' AutoScalingScalingPolicyCustomizedMetricSpecification (Val Text)-asspcmsNamespace = lens _autoScalingScalingPolicyCustomizedMetricSpecificationNamespace (\s a -> s { _autoScalingScalingPolicyCustomizedMetricSpecificationNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-customizedmetricspecification.html#cfn-autoscaling-scalingpolicy-customizedmetricspecification-statistic-asspcmsStatistic :: Lens' AutoScalingScalingPolicyCustomizedMetricSpecification (Val Text)-asspcmsStatistic = lens _autoScalingScalingPolicyCustomizedMetricSpecificationStatistic (\s a -> s { _autoScalingScalingPolicyCustomizedMetricSpecificationStatistic = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-customizedmetricspecification.html#cfn-autoscaling-scalingpolicy-customizedmetricspecification-unit-asspcmsUnit :: Lens' AutoScalingScalingPolicyCustomizedMetricSpecification (Maybe (Val Text))-asspcmsUnit = lens _autoScalingScalingPolicyCustomizedMetricSpecificationUnit (\s a -> s { _autoScalingScalingPolicyCustomizedMetricSpecificationUnit = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-metricdimension.html--module Stratosphere.ResourceProperties.AutoScalingScalingPolicyMetricDimension where--import Stratosphere.ResourceImports----- | Full data type definition for AutoScalingScalingPolicyMetricDimension.--- See 'autoScalingScalingPolicyMetricDimension' for a more convenient--- constructor.-data AutoScalingScalingPolicyMetricDimension =- AutoScalingScalingPolicyMetricDimension- { _autoScalingScalingPolicyMetricDimensionName :: Val Text- , _autoScalingScalingPolicyMetricDimensionValue :: Val Text- } deriving (Show, Eq)--instance ToJSON AutoScalingScalingPolicyMetricDimension where- toJSON AutoScalingScalingPolicyMetricDimension{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _autoScalingScalingPolicyMetricDimensionName- , (Just . ("Value",) . toJSON) _autoScalingScalingPolicyMetricDimensionValue- ]---- | Constructor for 'AutoScalingScalingPolicyMetricDimension' containing--- required fields as arguments.-autoScalingScalingPolicyMetricDimension- :: Val Text -- ^ 'asspmdName'- -> Val Text -- ^ 'asspmdValue'- -> AutoScalingScalingPolicyMetricDimension-autoScalingScalingPolicyMetricDimension namearg valuearg =- AutoScalingScalingPolicyMetricDimension- { _autoScalingScalingPolicyMetricDimensionName = namearg- , _autoScalingScalingPolicyMetricDimensionValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-metricdimension.html#cfn-autoscaling-scalingpolicy-metricdimension-name-asspmdName :: Lens' AutoScalingScalingPolicyMetricDimension (Val Text)-asspmdName = lens _autoScalingScalingPolicyMetricDimensionName (\s a -> s { _autoScalingScalingPolicyMetricDimensionName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-metricdimension.html#cfn-autoscaling-scalingpolicy-metricdimension-value-asspmdValue :: Lens' AutoScalingScalingPolicyMetricDimension (Val Text)-asspmdValue = lens _autoScalingScalingPolicyMetricDimensionValue (\s a -> s { _autoScalingScalingPolicyMetricDimensionValue = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-predefinedmetricspecification.html--module Stratosphere.ResourceProperties.AutoScalingScalingPolicyPredefinedMetricSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- AutoScalingScalingPolicyPredefinedMetricSpecification. See--- 'autoScalingScalingPolicyPredefinedMetricSpecification' for a more--- convenient constructor.-data AutoScalingScalingPolicyPredefinedMetricSpecification =- AutoScalingScalingPolicyPredefinedMetricSpecification- { _autoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType :: Val Text- , _autoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON AutoScalingScalingPolicyPredefinedMetricSpecification where- toJSON AutoScalingScalingPolicyPredefinedMetricSpecification{..} =- object $- catMaybes- [ (Just . ("PredefinedMetricType",) . toJSON) _autoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType- , fmap (("ResourceLabel",) . toJSON) _autoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel- ]---- | Constructor for 'AutoScalingScalingPolicyPredefinedMetricSpecification'--- containing required fields as arguments.-autoScalingScalingPolicyPredefinedMetricSpecification- :: Val Text -- ^ 'assppmsPredefinedMetricType'- -> AutoScalingScalingPolicyPredefinedMetricSpecification-autoScalingScalingPolicyPredefinedMetricSpecification predefinedMetricTypearg =- AutoScalingScalingPolicyPredefinedMetricSpecification- { _autoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType = predefinedMetricTypearg- , _autoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-predefinedmetricspecification.html#cfn-autoscaling-scalingpolicy-predefinedmetricspecification-predefinedmetrictype-assppmsPredefinedMetricType :: Lens' AutoScalingScalingPolicyPredefinedMetricSpecification (Val Text)-assppmsPredefinedMetricType = lens _autoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType (\s a -> s { _autoScalingScalingPolicyPredefinedMetricSpecificationPredefinedMetricType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-predefinedmetricspecification.html#cfn-autoscaling-scalingpolicy-predefinedmetricspecification-resourcelabel-assppmsResourceLabel :: Lens' AutoScalingScalingPolicyPredefinedMetricSpecification (Maybe (Val Text))-assppmsResourceLabel = lens _autoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel (\s a -> s { _autoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-stepadjustments.html--module Stratosphere.ResourceProperties.AutoScalingScalingPolicyStepAdjustment where--import Stratosphere.ResourceImports----- | Full data type definition for AutoScalingScalingPolicyStepAdjustment. See--- 'autoScalingScalingPolicyStepAdjustment' for a more convenient--- constructor.-data AutoScalingScalingPolicyStepAdjustment =- AutoScalingScalingPolicyStepAdjustment- { _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound :: Maybe (Val Double)- , _autoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound :: Maybe (Val Double)- , _autoScalingScalingPolicyStepAdjustmentScalingAdjustment :: Val Integer- } deriving (Show, Eq)--instance ToJSON AutoScalingScalingPolicyStepAdjustment where- toJSON AutoScalingScalingPolicyStepAdjustment{..} =- object $- catMaybes- [ fmap (("MetricIntervalLowerBound",) . toJSON) _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound- , fmap (("MetricIntervalUpperBound",) . toJSON) _autoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound- , (Just . ("ScalingAdjustment",) . toJSON) _autoScalingScalingPolicyStepAdjustmentScalingAdjustment- ]---- | Constructor for 'AutoScalingScalingPolicyStepAdjustment' containing--- required fields as arguments.-autoScalingScalingPolicyStepAdjustment- :: Val Integer -- ^ 'asspsaScalingAdjustment'- -> AutoScalingScalingPolicyStepAdjustment-autoScalingScalingPolicyStepAdjustment scalingAdjustmentarg =- AutoScalingScalingPolicyStepAdjustment- { _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound = Nothing- , _autoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound = Nothing- , _autoScalingScalingPolicyStepAdjustmentScalingAdjustment = scalingAdjustmentarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-stepadjustments.html#cfn-autoscaling-scalingpolicy-stepadjustment-metricintervallowerbound-asspsaMetricIntervalLowerBound :: Lens' AutoScalingScalingPolicyStepAdjustment (Maybe (Val Double))-asspsaMetricIntervalLowerBound = lens _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound (\s a -> s { _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-stepadjustments.html#cfn-autoscaling-scalingpolicy-stepadjustment-metricintervalupperbound-asspsaMetricIntervalUpperBound :: Lens' AutoScalingScalingPolicyStepAdjustment (Maybe (Val Double))-asspsaMetricIntervalUpperBound = lens _autoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound (\s a -> s { _autoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-stepadjustments.html#cfn-autoscaling-scalingpolicy-stepadjustment-scalingadjustment-asspsaScalingAdjustment :: Lens' AutoScalingScalingPolicyStepAdjustment (Val Integer)-asspsaScalingAdjustment = lens _autoScalingScalingPolicyStepAdjustmentScalingAdjustment (\s a -> s { _autoScalingScalingPolicyStepAdjustmentScalingAdjustment = a })
@@ -1,63 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-targettrackingconfiguration.html--module Stratosphere.ResourceProperties.AutoScalingScalingPolicyTargetTrackingConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.AutoScalingScalingPolicyCustomizedMetricSpecification-import Stratosphere.ResourceProperties.AutoScalingScalingPolicyPredefinedMetricSpecification---- | Full data type definition for--- AutoScalingScalingPolicyTargetTrackingConfiguration. See--- 'autoScalingScalingPolicyTargetTrackingConfiguration' for a more--- convenient constructor.-data AutoScalingScalingPolicyTargetTrackingConfiguration =- AutoScalingScalingPolicyTargetTrackingConfiguration- { _autoScalingScalingPolicyTargetTrackingConfigurationCustomizedMetricSpecification :: Maybe AutoScalingScalingPolicyCustomizedMetricSpecification- , _autoScalingScalingPolicyTargetTrackingConfigurationDisableScaleIn :: Maybe (Val Bool)- , _autoScalingScalingPolicyTargetTrackingConfigurationPredefinedMetricSpecification :: Maybe AutoScalingScalingPolicyPredefinedMetricSpecification- , _autoScalingScalingPolicyTargetTrackingConfigurationTargetValue :: Val Double- } deriving (Show, Eq)--instance ToJSON AutoScalingScalingPolicyTargetTrackingConfiguration where- toJSON AutoScalingScalingPolicyTargetTrackingConfiguration{..} =- object $- catMaybes- [ fmap (("CustomizedMetricSpecification",) . toJSON) _autoScalingScalingPolicyTargetTrackingConfigurationCustomizedMetricSpecification- , fmap (("DisableScaleIn",) . toJSON) _autoScalingScalingPolicyTargetTrackingConfigurationDisableScaleIn- , fmap (("PredefinedMetricSpecification",) . toJSON) _autoScalingScalingPolicyTargetTrackingConfigurationPredefinedMetricSpecification- , (Just . ("TargetValue",) . toJSON) _autoScalingScalingPolicyTargetTrackingConfigurationTargetValue- ]---- | Constructor for 'AutoScalingScalingPolicyTargetTrackingConfiguration'--- containing required fields as arguments.-autoScalingScalingPolicyTargetTrackingConfiguration- :: Val Double -- ^ 'asspttcTargetValue'- -> AutoScalingScalingPolicyTargetTrackingConfiguration-autoScalingScalingPolicyTargetTrackingConfiguration targetValuearg =- AutoScalingScalingPolicyTargetTrackingConfiguration- { _autoScalingScalingPolicyTargetTrackingConfigurationCustomizedMetricSpecification = Nothing- , _autoScalingScalingPolicyTargetTrackingConfigurationDisableScaleIn = Nothing- , _autoScalingScalingPolicyTargetTrackingConfigurationPredefinedMetricSpecification = Nothing- , _autoScalingScalingPolicyTargetTrackingConfigurationTargetValue = targetValuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-targettrackingconfiguration.html#cfn-autoscaling-scalingpolicy-targettrackingconfiguration-customizedmetricspecification-asspttcCustomizedMetricSpecification :: Lens' AutoScalingScalingPolicyTargetTrackingConfiguration (Maybe AutoScalingScalingPolicyCustomizedMetricSpecification)-asspttcCustomizedMetricSpecification = lens _autoScalingScalingPolicyTargetTrackingConfigurationCustomizedMetricSpecification (\s a -> s { _autoScalingScalingPolicyTargetTrackingConfigurationCustomizedMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-targettrackingconfiguration.html#cfn-autoscaling-scalingpolicy-targettrackingconfiguration-disablescalein-asspttcDisableScaleIn :: Lens' AutoScalingScalingPolicyTargetTrackingConfiguration (Maybe (Val Bool))-asspttcDisableScaleIn = lens _autoScalingScalingPolicyTargetTrackingConfigurationDisableScaleIn (\s a -> s { _autoScalingScalingPolicyTargetTrackingConfigurationDisableScaleIn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-targettrackingconfiguration.html#cfn-autoscaling-scalingpolicy-targettrackingconfiguration-predefinedmetricspecification-asspttcPredefinedMetricSpecification :: Lens' AutoScalingScalingPolicyTargetTrackingConfiguration (Maybe AutoScalingScalingPolicyPredefinedMetricSpecification)-asspttcPredefinedMetricSpecification = lens _autoScalingScalingPolicyTargetTrackingConfigurationPredefinedMetricSpecification (\s a -> s { _autoScalingScalingPolicyTargetTrackingConfigurationPredefinedMetricSpecification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-autoscaling-scalingpolicy-targettrackingconfiguration.html#cfn-autoscaling-scalingpolicy-targettrackingconfiguration-targetvalue-asspttcTargetValue :: Lens' AutoScalingScalingPolicyTargetTrackingConfiguration (Val Double)-asspttcTargetValue = lens _autoScalingScalingPolicyTargetTrackingConfigurationTargetValue (\s a -> s { _autoScalingScalingPolicyTargetTrackingConfigurationTargetValue = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupplanresourcetype.html--module Stratosphere.ResourceProperties.BackupBackupPlanBackupPlanResourceType where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BackupBackupPlanBackupRuleResourceType---- | Full data type definition for BackupBackupPlanBackupPlanResourceType. See--- 'backupBackupPlanBackupPlanResourceType' for a more convenient--- constructor.-data BackupBackupPlanBackupPlanResourceType =- BackupBackupPlanBackupPlanResourceType- { _backupBackupPlanBackupPlanResourceTypeBackupPlanName :: Val Text- , _backupBackupPlanBackupPlanResourceTypeBackupPlanRule :: [BackupBackupPlanBackupRuleResourceType]- } deriving (Show, Eq)--instance ToJSON BackupBackupPlanBackupPlanResourceType where- toJSON BackupBackupPlanBackupPlanResourceType{..} =- object $- catMaybes- [ (Just . ("BackupPlanName",) . toJSON) _backupBackupPlanBackupPlanResourceTypeBackupPlanName- , (Just . ("BackupPlanRule",) . toJSON) _backupBackupPlanBackupPlanResourceTypeBackupPlanRule- ]---- | Constructor for 'BackupBackupPlanBackupPlanResourceType' containing--- required fields as arguments.-backupBackupPlanBackupPlanResourceType- :: Val Text -- ^ 'bbpbprtBackupPlanName'- -> [BackupBackupPlanBackupRuleResourceType] -- ^ 'bbpbprtBackupPlanRule'- -> BackupBackupPlanBackupPlanResourceType-backupBackupPlanBackupPlanResourceType backupPlanNamearg backupPlanRulearg =- BackupBackupPlanBackupPlanResourceType- { _backupBackupPlanBackupPlanResourceTypeBackupPlanName = backupPlanNamearg- , _backupBackupPlanBackupPlanResourceTypeBackupPlanRule = backupPlanRulearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupplanresourcetype.html#cfn-backup-backupplan-backupplanresourcetype-backupplanname-bbpbprtBackupPlanName :: Lens' BackupBackupPlanBackupPlanResourceType (Val Text)-bbpbprtBackupPlanName = lens _backupBackupPlanBackupPlanResourceTypeBackupPlanName (\s a -> s { _backupBackupPlanBackupPlanResourceTypeBackupPlanName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupplanresourcetype.html#cfn-backup-backupplan-backupplanresourcetype-backupplanrule-bbpbprtBackupPlanRule :: Lens' BackupBackupPlanBackupPlanResourceType [BackupBackupPlanBackupRuleResourceType]-bbpbprtBackupPlanRule = lens _backupBackupPlanBackupPlanResourceTypeBackupPlanRule (\s a -> s { _backupBackupPlanBackupPlanResourceTypeBackupPlanRule = a })
@@ -1,91 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html--module Stratosphere.ResourceProperties.BackupBackupPlanBackupRuleResourceType where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BackupBackupPlanCopyActionResourceType-import Stratosphere.ResourceProperties.BackupBackupPlanLifecycleResourceType---- | Full data type definition for BackupBackupPlanBackupRuleResourceType. See--- 'backupBackupPlanBackupRuleResourceType' for a more convenient--- constructor.-data BackupBackupPlanBackupRuleResourceType =- BackupBackupPlanBackupRuleResourceType- { _backupBackupPlanBackupRuleResourceTypeCompletionWindowMinutes :: Maybe (Val Double)- , _backupBackupPlanBackupRuleResourceTypeCopyActions :: Maybe [BackupBackupPlanCopyActionResourceType]- , _backupBackupPlanBackupRuleResourceTypeLifecycle :: Maybe BackupBackupPlanLifecycleResourceType- , _backupBackupPlanBackupRuleResourceTypeRecoveryPointTags :: Maybe Object- , _backupBackupPlanBackupRuleResourceTypeRuleName :: Val Text- , _backupBackupPlanBackupRuleResourceTypeScheduleExpression :: Maybe (Val Text)- , _backupBackupPlanBackupRuleResourceTypeStartWindowMinutes :: Maybe (Val Double)- , _backupBackupPlanBackupRuleResourceTypeTargetBackupVault :: Val Text- } deriving (Show, Eq)--instance ToJSON BackupBackupPlanBackupRuleResourceType where- toJSON BackupBackupPlanBackupRuleResourceType{..} =- object $- catMaybes- [ fmap (("CompletionWindowMinutes",) . toJSON) _backupBackupPlanBackupRuleResourceTypeCompletionWindowMinutes- , fmap (("CopyActions",) . toJSON) _backupBackupPlanBackupRuleResourceTypeCopyActions- , fmap (("Lifecycle",) . toJSON) _backupBackupPlanBackupRuleResourceTypeLifecycle- , fmap (("RecoveryPointTags",) . toJSON) _backupBackupPlanBackupRuleResourceTypeRecoveryPointTags- , (Just . ("RuleName",) . toJSON) _backupBackupPlanBackupRuleResourceTypeRuleName- , fmap (("ScheduleExpression",) . toJSON) _backupBackupPlanBackupRuleResourceTypeScheduleExpression- , fmap (("StartWindowMinutes",) . toJSON) _backupBackupPlanBackupRuleResourceTypeStartWindowMinutes- , (Just . ("TargetBackupVault",) . toJSON) _backupBackupPlanBackupRuleResourceTypeTargetBackupVault- ]---- | Constructor for 'BackupBackupPlanBackupRuleResourceType' containing--- required fields as arguments.-backupBackupPlanBackupRuleResourceType- :: Val Text -- ^ 'bbpbrrtRuleName'- -> Val Text -- ^ 'bbpbrrtTargetBackupVault'- -> BackupBackupPlanBackupRuleResourceType-backupBackupPlanBackupRuleResourceType ruleNamearg targetBackupVaultarg =- BackupBackupPlanBackupRuleResourceType- { _backupBackupPlanBackupRuleResourceTypeCompletionWindowMinutes = Nothing- , _backupBackupPlanBackupRuleResourceTypeCopyActions = Nothing- , _backupBackupPlanBackupRuleResourceTypeLifecycle = Nothing- , _backupBackupPlanBackupRuleResourceTypeRecoveryPointTags = Nothing- , _backupBackupPlanBackupRuleResourceTypeRuleName = ruleNamearg- , _backupBackupPlanBackupRuleResourceTypeScheduleExpression = Nothing- , _backupBackupPlanBackupRuleResourceTypeStartWindowMinutes = Nothing- , _backupBackupPlanBackupRuleResourceTypeTargetBackupVault = targetBackupVaultarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-completionwindowminutes-bbpbrrtCompletionWindowMinutes :: Lens' BackupBackupPlanBackupRuleResourceType (Maybe (Val Double))-bbpbrrtCompletionWindowMinutes = lens _backupBackupPlanBackupRuleResourceTypeCompletionWindowMinutes (\s a -> s { _backupBackupPlanBackupRuleResourceTypeCompletionWindowMinutes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-copyactions-bbpbrrtCopyActions :: Lens' BackupBackupPlanBackupRuleResourceType (Maybe [BackupBackupPlanCopyActionResourceType])-bbpbrrtCopyActions = lens _backupBackupPlanBackupRuleResourceTypeCopyActions (\s a -> s { _backupBackupPlanBackupRuleResourceTypeCopyActions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-lifecycle-bbpbrrtLifecycle :: Lens' BackupBackupPlanBackupRuleResourceType (Maybe BackupBackupPlanLifecycleResourceType)-bbpbrrtLifecycle = lens _backupBackupPlanBackupRuleResourceTypeLifecycle (\s a -> s { _backupBackupPlanBackupRuleResourceTypeLifecycle = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-recoverypointtags-bbpbrrtRecoveryPointTags :: Lens' BackupBackupPlanBackupRuleResourceType (Maybe Object)-bbpbrrtRecoveryPointTags = lens _backupBackupPlanBackupRuleResourceTypeRecoveryPointTags (\s a -> s { _backupBackupPlanBackupRuleResourceTypeRecoveryPointTags = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-rulename-bbpbrrtRuleName :: Lens' BackupBackupPlanBackupRuleResourceType (Val Text)-bbpbrrtRuleName = lens _backupBackupPlanBackupRuleResourceTypeRuleName (\s a -> s { _backupBackupPlanBackupRuleResourceTypeRuleName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-scheduleexpression-bbpbrrtScheduleExpression :: Lens' BackupBackupPlanBackupRuleResourceType (Maybe (Val Text))-bbpbrrtScheduleExpression = lens _backupBackupPlanBackupRuleResourceTypeScheduleExpression (\s a -> s { _backupBackupPlanBackupRuleResourceTypeScheduleExpression = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-startwindowminutes-bbpbrrtStartWindowMinutes :: Lens' BackupBackupPlanBackupRuleResourceType (Maybe (Val Double))-bbpbrrtStartWindowMinutes = lens _backupBackupPlanBackupRuleResourceTypeStartWindowMinutes (\s a -> s { _backupBackupPlanBackupRuleResourceTypeStartWindowMinutes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-backupruleresourcetype.html#cfn-backup-backupplan-backupruleresourcetype-targetbackupvault-bbpbrrtTargetBackupVault :: Lens' BackupBackupPlanBackupRuleResourceType (Val Text)-bbpbrrtTargetBackupVault = lens _backupBackupPlanBackupRuleResourceTypeTargetBackupVault (\s a -> s { _backupBackupPlanBackupRuleResourceTypeTargetBackupVault = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-copyactionresourcetype.html--module Stratosphere.ResourceProperties.BackupBackupPlanCopyActionResourceType where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BackupBackupPlanLifecycleResourceType---- | Full data type definition for BackupBackupPlanCopyActionResourceType. See--- 'backupBackupPlanCopyActionResourceType' for a more convenient--- constructor.-data BackupBackupPlanCopyActionResourceType =- BackupBackupPlanCopyActionResourceType- { _backupBackupPlanCopyActionResourceTypeDestinationBackupVaultArn :: Val Text- , _backupBackupPlanCopyActionResourceTypeLifecycle :: Maybe BackupBackupPlanLifecycleResourceType- } deriving (Show, Eq)--instance ToJSON BackupBackupPlanCopyActionResourceType where- toJSON BackupBackupPlanCopyActionResourceType{..} =- object $- catMaybes- [ (Just . ("DestinationBackupVaultArn",) . toJSON) _backupBackupPlanCopyActionResourceTypeDestinationBackupVaultArn- , fmap (("Lifecycle",) . toJSON) _backupBackupPlanCopyActionResourceTypeLifecycle- ]---- | Constructor for 'BackupBackupPlanCopyActionResourceType' containing--- required fields as arguments.-backupBackupPlanCopyActionResourceType- :: Val Text -- ^ 'bbpcartDestinationBackupVaultArn'- -> BackupBackupPlanCopyActionResourceType-backupBackupPlanCopyActionResourceType destinationBackupVaultArnarg =- BackupBackupPlanCopyActionResourceType- { _backupBackupPlanCopyActionResourceTypeDestinationBackupVaultArn = destinationBackupVaultArnarg- , _backupBackupPlanCopyActionResourceTypeLifecycle = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-copyactionresourcetype.html#cfn-backup-backupplan-copyactionresourcetype-destinationbackupvaultarn-bbpcartDestinationBackupVaultArn :: Lens' BackupBackupPlanCopyActionResourceType (Val Text)-bbpcartDestinationBackupVaultArn = lens _backupBackupPlanCopyActionResourceTypeDestinationBackupVaultArn (\s a -> s { _backupBackupPlanCopyActionResourceTypeDestinationBackupVaultArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-copyactionresourcetype.html#cfn-backup-backupplan-copyactionresourcetype-lifecycle-bbpcartLifecycle :: Lens' BackupBackupPlanCopyActionResourceType (Maybe BackupBackupPlanLifecycleResourceType)-bbpcartLifecycle = lens _backupBackupPlanCopyActionResourceTypeLifecycle (\s a -> s { _backupBackupPlanCopyActionResourceTypeLifecycle = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-lifecycleresourcetype.html--module Stratosphere.ResourceProperties.BackupBackupPlanLifecycleResourceType where--import Stratosphere.ResourceImports----- | Full data type definition for BackupBackupPlanLifecycleResourceType. See--- 'backupBackupPlanLifecycleResourceType' for a more convenient--- constructor.-data BackupBackupPlanLifecycleResourceType =- BackupBackupPlanLifecycleResourceType- { _backupBackupPlanLifecycleResourceTypeDeleteAfterDays :: Maybe (Val Double)- , _backupBackupPlanLifecycleResourceTypeMoveToColdStorageAfterDays :: Maybe (Val Double)- } deriving (Show, Eq)--instance ToJSON BackupBackupPlanLifecycleResourceType where- toJSON BackupBackupPlanLifecycleResourceType{..} =- object $- catMaybes- [ fmap (("DeleteAfterDays",) . toJSON) _backupBackupPlanLifecycleResourceTypeDeleteAfterDays- , fmap (("MoveToColdStorageAfterDays",) . toJSON) _backupBackupPlanLifecycleResourceTypeMoveToColdStorageAfterDays- ]---- | Constructor for 'BackupBackupPlanLifecycleResourceType' containing--- required fields as arguments.-backupBackupPlanLifecycleResourceType- :: BackupBackupPlanLifecycleResourceType-backupBackupPlanLifecycleResourceType =- BackupBackupPlanLifecycleResourceType- { _backupBackupPlanLifecycleResourceTypeDeleteAfterDays = Nothing- , _backupBackupPlanLifecycleResourceTypeMoveToColdStorageAfterDays = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-lifecycleresourcetype.html#cfn-backup-backupplan-lifecycleresourcetype-deleteafterdays-bbplrtDeleteAfterDays :: Lens' BackupBackupPlanLifecycleResourceType (Maybe (Val Double))-bbplrtDeleteAfterDays = lens _backupBackupPlanLifecycleResourceTypeDeleteAfterDays (\s a -> s { _backupBackupPlanLifecycleResourceTypeDeleteAfterDays = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupplan-lifecycleresourcetype.html#cfn-backup-backupplan-lifecycleresourcetype-movetocoldstorageafterdays-bbplrtMoveToColdStorageAfterDays :: Lens' BackupBackupPlanLifecycleResourceType (Maybe (Val Double))-bbplrtMoveToColdStorageAfterDays = lens _backupBackupPlanLifecycleResourceTypeMoveToColdStorageAfterDays (\s a -> s { _backupBackupPlanLifecycleResourceTypeMoveToColdStorageAfterDays = a })
@@ -1,63 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-backupselectionresourcetype.html--module Stratosphere.ResourceProperties.BackupBackupSelectionBackupSelectionResourceType where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BackupBackupSelectionConditionResourceType---- | Full data type definition for--- BackupBackupSelectionBackupSelectionResourceType. See--- 'backupBackupSelectionBackupSelectionResourceType' for a more convenient--- constructor.-data BackupBackupSelectionBackupSelectionResourceType =- BackupBackupSelectionBackupSelectionResourceType- { _backupBackupSelectionBackupSelectionResourceTypeIamRoleArn :: Val Text- , _backupBackupSelectionBackupSelectionResourceTypeListOfTags :: Maybe [BackupBackupSelectionConditionResourceType]- , _backupBackupSelectionBackupSelectionResourceTypeResources :: Maybe (ValList Text)- , _backupBackupSelectionBackupSelectionResourceTypeSelectionName :: Val Text- } deriving (Show, Eq)--instance ToJSON BackupBackupSelectionBackupSelectionResourceType where- toJSON BackupBackupSelectionBackupSelectionResourceType{..} =- object $- catMaybes- [ (Just . ("IamRoleArn",) . toJSON) _backupBackupSelectionBackupSelectionResourceTypeIamRoleArn- , fmap (("ListOfTags",) . toJSON) _backupBackupSelectionBackupSelectionResourceTypeListOfTags- , fmap (("Resources",) . toJSON) _backupBackupSelectionBackupSelectionResourceTypeResources- , (Just . ("SelectionName",) . toJSON) _backupBackupSelectionBackupSelectionResourceTypeSelectionName- ]---- | Constructor for 'BackupBackupSelectionBackupSelectionResourceType'--- containing required fields as arguments.-backupBackupSelectionBackupSelectionResourceType- :: Val Text -- ^ 'bbsbsrtIamRoleArn'- -> Val Text -- ^ 'bbsbsrtSelectionName'- -> BackupBackupSelectionBackupSelectionResourceType-backupBackupSelectionBackupSelectionResourceType iamRoleArnarg selectionNamearg =- BackupBackupSelectionBackupSelectionResourceType- { _backupBackupSelectionBackupSelectionResourceTypeIamRoleArn = iamRoleArnarg- , _backupBackupSelectionBackupSelectionResourceTypeListOfTags = Nothing- , _backupBackupSelectionBackupSelectionResourceTypeResources = Nothing- , _backupBackupSelectionBackupSelectionResourceTypeSelectionName = selectionNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-backupselectionresourcetype.html#cfn-backup-backupselection-backupselectionresourcetype-iamrolearn-bbsbsrtIamRoleArn :: Lens' BackupBackupSelectionBackupSelectionResourceType (Val Text)-bbsbsrtIamRoleArn = lens _backupBackupSelectionBackupSelectionResourceTypeIamRoleArn (\s a -> s { _backupBackupSelectionBackupSelectionResourceTypeIamRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-backupselectionresourcetype.html#cfn-backup-backupselection-backupselectionresourcetype-listoftags-bbsbsrtListOfTags :: Lens' BackupBackupSelectionBackupSelectionResourceType (Maybe [BackupBackupSelectionConditionResourceType])-bbsbsrtListOfTags = lens _backupBackupSelectionBackupSelectionResourceTypeListOfTags (\s a -> s { _backupBackupSelectionBackupSelectionResourceTypeListOfTags = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-backupselectionresourcetype.html#cfn-backup-backupselection-backupselectionresourcetype-resources-bbsbsrtResources :: Lens' BackupBackupSelectionBackupSelectionResourceType (Maybe (ValList Text))-bbsbsrtResources = lens _backupBackupSelectionBackupSelectionResourceTypeResources (\s a -> s { _backupBackupSelectionBackupSelectionResourceTypeResources = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-backupselectionresourcetype.html#cfn-backup-backupselection-backupselectionresourcetype-selectionname-bbsbsrtSelectionName :: Lens' BackupBackupSelectionBackupSelectionResourceType (Val Text)-bbsbsrtSelectionName = lens _backupBackupSelectionBackupSelectionResourceTypeSelectionName (\s a -> s { _backupBackupSelectionBackupSelectionResourceTypeSelectionName = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-conditionresourcetype.html--module Stratosphere.ResourceProperties.BackupBackupSelectionConditionResourceType where--import Stratosphere.ResourceImports----- | Full data type definition for BackupBackupSelectionConditionResourceType.--- See 'backupBackupSelectionConditionResourceType' for a more convenient--- constructor.-data BackupBackupSelectionConditionResourceType =- BackupBackupSelectionConditionResourceType- { _backupBackupSelectionConditionResourceTypeConditionKey :: Val Text- , _backupBackupSelectionConditionResourceTypeConditionType :: Val Text- , _backupBackupSelectionConditionResourceTypeConditionValue :: Val Text- } deriving (Show, Eq)--instance ToJSON BackupBackupSelectionConditionResourceType where- toJSON BackupBackupSelectionConditionResourceType{..} =- object $- catMaybes- [ (Just . ("ConditionKey",) . toJSON) _backupBackupSelectionConditionResourceTypeConditionKey- , (Just . ("ConditionType",) . toJSON) _backupBackupSelectionConditionResourceTypeConditionType- , (Just . ("ConditionValue",) . toJSON) _backupBackupSelectionConditionResourceTypeConditionValue- ]---- | Constructor for 'BackupBackupSelectionConditionResourceType' containing--- required fields as arguments.-backupBackupSelectionConditionResourceType- :: Val Text -- ^ 'bbscrtConditionKey'- -> Val Text -- ^ 'bbscrtConditionType'- -> Val Text -- ^ 'bbscrtConditionValue'- -> BackupBackupSelectionConditionResourceType-backupBackupSelectionConditionResourceType conditionKeyarg conditionTypearg conditionValuearg =- BackupBackupSelectionConditionResourceType- { _backupBackupSelectionConditionResourceTypeConditionKey = conditionKeyarg- , _backupBackupSelectionConditionResourceTypeConditionType = conditionTypearg- , _backupBackupSelectionConditionResourceTypeConditionValue = conditionValuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-conditionresourcetype.html#cfn-backup-backupselection-conditionresourcetype-conditionkey-bbscrtConditionKey :: Lens' BackupBackupSelectionConditionResourceType (Val Text)-bbscrtConditionKey = lens _backupBackupSelectionConditionResourceTypeConditionKey (\s a -> s { _backupBackupSelectionConditionResourceTypeConditionKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-conditionresourcetype.html#cfn-backup-backupselection-conditionresourcetype-conditiontype-bbscrtConditionType :: Lens' BackupBackupSelectionConditionResourceType (Val Text)-bbscrtConditionType = lens _backupBackupSelectionConditionResourceTypeConditionType (\s a -> s { _backupBackupSelectionConditionResourceTypeConditionType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupselection-conditionresourcetype.html#cfn-backup-backupselection-conditionresourcetype-conditionvalue-bbscrtConditionValue :: Lens' BackupBackupSelectionConditionResourceType (Val Text)-bbscrtConditionValue = lens _backupBackupSelectionConditionResourceTypeConditionValue (\s a -> s { _backupBackupSelectionConditionResourceTypeConditionValue = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupvault-notificationobjecttype.html--module Stratosphere.ResourceProperties.BackupBackupVaultNotificationObjectType where--import Stratosphere.ResourceImports----- | Full data type definition for BackupBackupVaultNotificationObjectType.--- See 'backupBackupVaultNotificationObjectType' for a more convenient--- constructor.-data BackupBackupVaultNotificationObjectType =- BackupBackupVaultNotificationObjectType- { _backupBackupVaultNotificationObjectTypeBackupVaultEvents :: ValList Text- , _backupBackupVaultNotificationObjectTypeSNSTopicArn :: Val Text- } deriving (Show, Eq)--instance ToJSON BackupBackupVaultNotificationObjectType where- toJSON BackupBackupVaultNotificationObjectType{..} =- object $- catMaybes- [ (Just . ("BackupVaultEvents",) . toJSON) _backupBackupVaultNotificationObjectTypeBackupVaultEvents- , (Just . ("SNSTopicArn",) . toJSON) _backupBackupVaultNotificationObjectTypeSNSTopicArn- ]---- | Constructor for 'BackupBackupVaultNotificationObjectType' containing--- required fields as arguments.-backupBackupVaultNotificationObjectType- :: ValList Text -- ^ 'bbvnotBackupVaultEvents'- -> Val Text -- ^ 'bbvnotSNSTopicArn'- -> BackupBackupVaultNotificationObjectType-backupBackupVaultNotificationObjectType backupVaultEventsarg sNSTopicArnarg =- BackupBackupVaultNotificationObjectType- { _backupBackupVaultNotificationObjectTypeBackupVaultEvents = backupVaultEventsarg- , _backupBackupVaultNotificationObjectTypeSNSTopicArn = sNSTopicArnarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupvault-notificationobjecttype.html#cfn-backup-backupvault-notificationobjecttype-backupvaultevents-bbvnotBackupVaultEvents :: Lens' BackupBackupVaultNotificationObjectType (ValList Text)-bbvnotBackupVaultEvents = lens _backupBackupVaultNotificationObjectTypeBackupVaultEvents (\s a -> s { _backupBackupVaultNotificationObjectTypeBackupVaultEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-backup-backupvault-notificationobjecttype.html#cfn-backup-backupvault-notificationobjecttype-snstopicarn-bbvnotSNSTopicArn :: Lens' BackupBackupVaultNotificationObjectType (Val Text)-bbvnotSNSTopicArn = lens _backupBackupVaultNotificationObjectTypeSNSTopicArn (\s a -> s { _backupBackupVaultNotificationObjectTypeSNSTopicArn = a })
@@ -1,150 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html--module Stratosphere.ResourceProperties.BatchComputeEnvironmentComputeResources where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BatchComputeEnvironmentLaunchTemplateSpecification---- | Full data type definition for BatchComputeEnvironmentComputeResources.--- See 'batchComputeEnvironmentComputeResources' for a more convenient--- constructor.-data BatchComputeEnvironmentComputeResources =- BatchComputeEnvironmentComputeResources- { _batchComputeEnvironmentComputeResourcesAllocationStrategy :: Maybe (Val Text)- , _batchComputeEnvironmentComputeResourcesBidPercentage :: Maybe (Val Integer)- , _batchComputeEnvironmentComputeResourcesDesiredvCpus :: Maybe (Val Integer)- , _batchComputeEnvironmentComputeResourcesEc2KeyPair :: Maybe (Val Text)- , _batchComputeEnvironmentComputeResourcesImageId :: Maybe (Val Text)- , _batchComputeEnvironmentComputeResourcesInstanceRole :: Val Text- , _batchComputeEnvironmentComputeResourcesInstanceTypes :: ValList Text- , _batchComputeEnvironmentComputeResourcesLaunchTemplate :: Maybe BatchComputeEnvironmentLaunchTemplateSpecification- , _batchComputeEnvironmentComputeResourcesMaxvCpus :: Val Integer- , _batchComputeEnvironmentComputeResourcesMinvCpus :: Val Integer- , _batchComputeEnvironmentComputeResourcesPlacementGroup :: Maybe (Val Text)- , _batchComputeEnvironmentComputeResourcesSecurityGroupIds :: Maybe (ValList Text)- , _batchComputeEnvironmentComputeResourcesSpotIamFleetRole :: Maybe (Val Text)- , _batchComputeEnvironmentComputeResourcesSubnets :: ValList Text- , _batchComputeEnvironmentComputeResourcesTags :: Maybe Object- , _batchComputeEnvironmentComputeResourcesType :: Val Text- } deriving (Show, Eq)--instance ToJSON BatchComputeEnvironmentComputeResources where- toJSON BatchComputeEnvironmentComputeResources{..} =- object $- catMaybes- [ fmap (("AllocationStrategy",) . toJSON) _batchComputeEnvironmentComputeResourcesAllocationStrategy- , fmap (("BidPercentage",) . toJSON) _batchComputeEnvironmentComputeResourcesBidPercentage- , fmap (("DesiredvCpus",) . toJSON) _batchComputeEnvironmentComputeResourcesDesiredvCpus- , fmap (("Ec2KeyPair",) . toJSON) _batchComputeEnvironmentComputeResourcesEc2KeyPair- , fmap (("ImageId",) . toJSON) _batchComputeEnvironmentComputeResourcesImageId- , (Just . ("InstanceRole",) . toJSON) _batchComputeEnvironmentComputeResourcesInstanceRole- , (Just . ("InstanceTypes",) . toJSON) _batchComputeEnvironmentComputeResourcesInstanceTypes- , fmap (("LaunchTemplate",) . toJSON) _batchComputeEnvironmentComputeResourcesLaunchTemplate- , (Just . ("MaxvCpus",) . toJSON) _batchComputeEnvironmentComputeResourcesMaxvCpus- , (Just . ("MinvCpus",) . toJSON) _batchComputeEnvironmentComputeResourcesMinvCpus- , fmap (("PlacementGroup",) . toJSON) _batchComputeEnvironmentComputeResourcesPlacementGroup- , fmap (("SecurityGroupIds",) . toJSON) _batchComputeEnvironmentComputeResourcesSecurityGroupIds- , fmap (("SpotIamFleetRole",) . toJSON) _batchComputeEnvironmentComputeResourcesSpotIamFleetRole- , (Just . ("Subnets",) . toJSON) _batchComputeEnvironmentComputeResourcesSubnets- , fmap (("Tags",) . toJSON) _batchComputeEnvironmentComputeResourcesTags- , (Just . ("Type",) . toJSON) _batchComputeEnvironmentComputeResourcesType- ]---- | Constructor for 'BatchComputeEnvironmentComputeResources' containing--- required fields as arguments.-batchComputeEnvironmentComputeResources- :: Val Text -- ^ 'bcecrInstanceRole'- -> ValList Text -- ^ 'bcecrInstanceTypes'- -> Val Integer -- ^ 'bcecrMaxvCpus'- -> Val Integer -- ^ 'bcecrMinvCpus'- -> ValList Text -- ^ 'bcecrSubnets'- -> Val Text -- ^ 'bcecrType'- -> BatchComputeEnvironmentComputeResources-batchComputeEnvironmentComputeResources instanceRolearg instanceTypesarg maxvCpusarg minvCpusarg subnetsarg typearg =- BatchComputeEnvironmentComputeResources- { _batchComputeEnvironmentComputeResourcesAllocationStrategy = Nothing- , _batchComputeEnvironmentComputeResourcesBidPercentage = Nothing- , _batchComputeEnvironmentComputeResourcesDesiredvCpus = Nothing- , _batchComputeEnvironmentComputeResourcesEc2KeyPair = Nothing- , _batchComputeEnvironmentComputeResourcesImageId = Nothing- , _batchComputeEnvironmentComputeResourcesInstanceRole = instanceRolearg- , _batchComputeEnvironmentComputeResourcesInstanceTypes = instanceTypesarg- , _batchComputeEnvironmentComputeResourcesLaunchTemplate = Nothing- , _batchComputeEnvironmentComputeResourcesMaxvCpus = maxvCpusarg- , _batchComputeEnvironmentComputeResourcesMinvCpus = minvCpusarg- , _batchComputeEnvironmentComputeResourcesPlacementGroup = Nothing- , _batchComputeEnvironmentComputeResourcesSecurityGroupIds = Nothing- , _batchComputeEnvironmentComputeResourcesSpotIamFleetRole = Nothing- , _batchComputeEnvironmentComputeResourcesSubnets = subnetsarg- , _batchComputeEnvironmentComputeResourcesTags = Nothing- , _batchComputeEnvironmentComputeResourcesType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-allocationstrategy-bcecrAllocationStrategy :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Text))-bcecrAllocationStrategy = lens _batchComputeEnvironmentComputeResourcesAllocationStrategy (\s a -> s { _batchComputeEnvironmentComputeResourcesAllocationStrategy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-bidpercentage-bcecrBidPercentage :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Integer))-bcecrBidPercentage = lens _batchComputeEnvironmentComputeResourcesBidPercentage (\s a -> s { _batchComputeEnvironmentComputeResourcesBidPercentage = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-desiredvcpus-bcecrDesiredvCpus :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Integer))-bcecrDesiredvCpus = lens _batchComputeEnvironmentComputeResourcesDesiredvCpus (\s a -> s { _batchComputeEnvironmentComputeResourcesDesiredvCpus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-ec2keypair-bcecrEc2KeyPair :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Text))-bcecrEc2KeyPair = lens _batchComputeEnvironmentComputeResourcesEc2KeyPair (\s a -> s { _batchComputeEnvironmentComputeResourcesEc2KeyPair = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-imageid-bcecrImageId :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Text))-bcecrImageId = lens _batchComputeEnvironmentComputeResourcesImageId (\s a -> s { _batchComputeEnvironmentComputeResourcesImageId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-instancerole-bcecrInstanceRole :: Lens' BatchComputeEnvironmentComputeResources (Val Text)-bcecrInstanceRole = lens _batchComputeEnvironmentComputeResourcesInstanceRole (\s a -> s { _batchComputeEnvironmentComputeResourcesInstanceRole = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-instancetypes-bcecrInstanceTypes :: Lens' BatchComputeEnvironmentComputeResources (ValList Text)-bcecrInstanceTypes = lens _batchComputeEnvironmentComputeResourcesInstanceTypes (\s a -> s { _batchComputeEnvironmentComputeResourcesInstanceTypes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-launchtemplate-bcecrLaunchTemplate :: Lens' BatchComputeEnvironmentComputeResources (Maybe BatchComputeEnvironmentLaunchTemplateSpecification)-bcecrLaunchTemplate = lens _batchComputeEnvironmentComputeResourcesLaunchTemplate (\s a -> s { _batchComputeEnvironmentComputeResourcesLaunchTemplate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-maxvcpus-bcecrMaxvCpus :: Lens' BatchComputeEnvironmentComputeResources (Val Integer)-bcecrMaxvCpus = lens _batchComputeEnvironmentComputeResourcesMaxvCpus (\s a -> s { _batchComputeEnvironmentComputeResourcesMaxvCpus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-minvcpus-bcecrMinvCpus :: Lens' BatchComputeEnvironmentComputeResources (Val Integer)-bcecrMinvCpus = lens _batchComputeEnvironmentComputeResourcesMinvCpus (\s a -> s { _batchComputeEnvironmentComputeResourcesMinvCpus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-placementgroup-bcecrPlacementGroup :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Text))-bcecrPlacementGroup = lens _batchComputeEnvironmentComputeResourcesPlacementGroup (\s a -> s { _batchComputeEnvironmentComputeResourcesPlacementGroup = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-securitygroupids-bcecrSecurityGroupIds :: Lens' BatchComputeEnvironmentComputeResources (Maybe (ValList Text))-bcecrSecurityGroupIds = lens _batchComputeEnvironmentComputeResourcesSecurityGroupIds (\s a -> s { _batchComputeEnvironmentComputeResourcesSecurityGroupIds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-spotiamfleetrole-bcecrSpotIamFleetRole :: Lens' BatchComputeEnvironmentComputeResources (Maybe (Val Text))-bcecrSpotIamFleetRole = lens _batchComputeEnvironmentComputeResourcesSpotIamFleetRole (\s a -> s { _batchComputeEnvironmentComputeResourcesSpotIamFleetRole = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-subnets-bcecrSubnets :: Lens' BatchComputeEnvironmentComputeResources (ValList Text)-bcecrSubnets = lens _batchComputeEnvironmentComputeResourcesSubnets (\s a -> s { _batchComputeEnvironmentComputeResourcesSubnets = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-tags-bcecrTags :: Lens' BatchComputeEnvironmentComputeResources (Maybe Object)-bcecrTags = lens _batchComputeEnvironmentComputeResourcesTags (\s a -> s { _batchComputeEnvironmentComputeResourcesTags = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-computeresources.html#cfn-batch-computeenvironment-computeresources-type-bcecrType :: Lens' BatchComputeEnvironmentComputeResources (Val Text)-bcecrType = lens _batchComputeEnvironmentComputeResourcesType (\s a -> s { _batchComputeEnvironmentComputeResourcesType = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-launchtemplatespecification.html--module Stratosphere.ResourceProperties.BatchComputeEnvironmentLaunchTemplateSpecification where--import Stratosphere.ResourceImports----- | Full data type definition for--- BatchComputeEnvironmentLaunchTemplateSpecification. See--- 'batchComputeEnvironmentLaunchTemplateSpecification' for a more--- convenient constructor.-data BatchComputeEnvironmentLaunchTemplateSpecification =- BatchComputeEnvironmentLaunchTemplateSpecification- { _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateId :: Maybe (Val Text)- , _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateName :: Maybe (Val Text)- , _batchComputeEnvironmentLaunchTemplateSpecificationVersion :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BatchComputeEnvironmentLaunchTemplateSpecification where- toJSON BatchComputeEnvironmentLaunchTemplateSpecification{..} =- object $- catMaybes- [ fmap (("LaunchTemplateId",) . toJSON) _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateId- , fmap (("LaunchTemplateName",) . toJSON) _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateName- , fmap (("Version",) . toJSON) _batchComputeEnvironmentLaunchTemplateSpecificationVersion- ]---- | Constructor for 'BatchComputeEnvironmentLaunchTemplateSpecification'--- containing required fields as arguments.-batchComputeEnvironmentLaunchTemplateSpecification- :: BatchComputeEnvironmentLaunchTemplateSpecification-batchComputeEnvironmentLaunchTemplateSpecification =- BatchComputeEnvironmentLaunchTemplateSpecification- { _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateId = Nothing- , _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateName = Nothing- , _batchComputeEnvironmentLaunchTemplateSpecificationVersion = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-launchtemplatespecification.html#cfn-batch-computeenvironment-launchtemplatespecification-launchtemplateid-bceltsLaunchTemplateId :: Lens' BatchComputeEnvironmentLaunchTemplateSpecification (Maybe (Val Text))-bceltsLaunchTemplateId = lens _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateId (\s a -> s { _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-launchtemplatespecification.html#cfn-batch-computeenvironment-launchtemplatespecification-launchtemplatename-bceltsLaunchTemplateName :: Lens' BatchComputeEnvironmentLaunchTemplateSpecification (Maybe (Val Text))-bceltsLaunchTemplateName = lens _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateName (\s a -> s { _batchComputeEnvironmentLaunchTemplateSpecificationLaunchTemplateName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-computeenvironment-launchtemplatespecification.html#cfn-batch-computeenvironment-launchtemplatespecification-version-bceltsVersion :: Lens' BatchComputeEnvironmentLaunchTemplateSpecification (Maybe (Val Text))-bceltsVersion = lens _batchComputeEnvironmentLaunchTemplateSpecificationVersion (\s a -> s { _batchComputeEnvironmentLaunchTemplateSpecificationVersion = a })
@@ -1,143 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html--module Stratosphere.ResourceProperties.BatchJobDefinitionContainerProperties where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BatchJobDefinitionEnvironment-import Stratosphere.ResourceProperties.BatchJobDefinitionLinuxParameters-import Stratosphere.ResourceProperties.BatchJobDefinitionMountPoints-import Stratosphere.ResourceProperties.BatchJobDefinitionResourceRequirement-import Stratosphere.ResourceProperties.BatchJobDefinitionUlimit-import Stratosphere.ResourceProperties.BatchJobDefinitionVolumes---- | Full data type definition for BatchJobDefinitionContainerProperties. See--- 'batchJobDefinitionContainerProperties' for a more convenient--- constructor.-data BatchJobDefinitionContainerProperties =- BatchJobDefinitionContainerProperties- { _batchJobDefinitionContainerPropertiesCommand :: Maybe (ValList Text)- , _batchJobDefinitionContainerPropertiesEnvironment :: Maybe [BatchJobDefinitionEnvironment]- , _batchJobDefinitionContainerPropertiesImage :: Val Text- , _batchJobDefinitionContainerPropertiesInstanceType :: Maybe (Val Text)- , _batchJobDefinitionContainerPropertiesJobRoleArn :: Maybe (Val Text)- , _batchJobDefinitionContainerPropertiesLinuxParameters :: Maybe BatchJobDefinitionLinuxParameters- , _batchJobDefinitionContainerPropertiesMemory :: Maybe (Val Integer)- , _batchJobDefinitionContainerPropertiesMountPoints :: Maybe [BatchJobDefinitionMountPoints]- , _batchJobDefinitionContainerPropertiesPrivileged :: Maybe (Val Bool)- , _batchJobDefinitionContainerPropertiesReadonlyRootFilesystem :: Maybe (Val Bool)- , _batchJobDefinitionContainerPropertiesResourceRequirements :: Maybe [BatchJobDefinitionResourceRequirement]- , _batchJobDefinitionContainerPropertiesUlimits :: Maybe [BatchJobDefinitionUlimit]- , _batchJobDefinitionContainerPropertiesUser :: Maybe (Val Text)- , _batchJobDefinitionContainerPropertiesVcpus :: Maybe (Val Integer)- , _batchJobDefinitionContainerPropertiesVolumes :: Maybe [BatchJobDefinitionVolumes]- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionContainerProperties where- toJSON BatchJobDefinitionContainerProperties{..} =- object $- catMaybes- [ fmap (("Command",) . toJSON) _batchJobDefinitionContainerPropertiesCommand- , fmap (("Environment",) . toJSON) _batchJobDefinitionContainerPropertiesEnvironment- , (Just . ("Image",) . toJSON) _batchJobDefinitionContainerPropertiesImage- , fmap (("InstanceType",) . toJSON) _batchJobDefinitionContainerPropertiesInstanceType- , fmap (("JobRoleArn",) . toJSON) _batchJobDefinitionContainerPropertiesJobRoleArn- , fmap (("LinuxParameters",) . toJSON) _batchJobDefinitionContainerPropertiesLinuxParameters- , fmap (("Memory",) . toJSON) _batchJobDefinitionContainerPropertiesMemory- , fmap (("MountPoints",) . toJSON) _batchJobDefinitionContainerPropertiesMountPoints- , fmap (("Privileged",) . toJSON) _batchJobDefinitionContainerPropertiesPrivileged- , fmap (("ReadonlyRootFilesystem",) . toJSON) _batchJobDefinitionContainerPropertiesReadonlyRootFilesystem- , fmap (("ResourceRequirements",) . toJSON) _batchJobDefinitionContainerPropertiesResourceRequirements- , fmap (("Ulimits",) . toJSON) _batchJobDefinitionContainerPropertiesUlimits- , fmap (("User",) . toJSON) _batchJobDefinitionContainerPropertiesUser- , fmap (("Vcpus",) . toJSON) _batchJobDefinitionContainerPropertiesVcpus- , fmap (("Volumes",) . toJSON) _batchJobDefinitionContainerPropertiesVolumes- ]---- | Constructor for 'BatchJobDefinitionContainerProperties' containing--- required fields as arguments.-batchJobDefinitionContainerProperties- :: Val Text -- ^ 'bjdcpImage'- -> BatchJobDefinitionContainerProperties-batchJobDefinitionContainerProperties imagearg =- BatchJobDefinitionContainerProperties- { _batchJobDefinitionContainerPropertiesCommand = Nothing- , _batchJobDefinitionContainerPropertiesEnvironment = Nothing- , _batchJobDefinitionContainerPropertiesImage = imagearg- , _batchJobDefinitionContainerPropertiesInstanceType = Nothing- , _batchJobDefinitionContainerPropertiesJobRoleArn = Nothing- , _batchJobDefinitionContainerPropertiesLinuxParameters = Nothing- , _batchJobDefinitionContainerPropertiesMemory = Nothing- , _batchJobDefinitionContainerPropertiesMountPoints = Nothing- , _batchJobDefinitionContainerPropertiesPrivileged = Nothing- , _batchJobDefinitionContainerPropertiesReadonlyRootFilesystem = Nothing- , _batchJobDefinitionContainerPropertiesResourceRequirements = Nothing- , _batchJobDefinitionContainerPropertiesUlimits = Nothing- , _batchJobDefinitionContainerPropertiesUser = Nothing- , _batchJobDefinitionContainerPropertiesVcpus = Nothing- , _batchJobDefinitionContainerPropertiesVolumes = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-command-bjdcpCommand :: Lens' BatchJobDefinitionContainerProperties (Maybe (ValList Text))-bjdcpCommand = lens _batchJobDefinitionContainerPropertiesCommand (\s a -> s { _batchJobDefinitionContainerPropertiesCommand = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-environment-bjdcpEnvironment :: Lens' BatchJobDefinitionContainerProperties (Maybe [BatchJobDefinitionEnvironment])-bjdcpEnvironment = lens _batchJobDefinitionContainerPropertiesEnvironment (\s a -> s { _batchJobDefinitionContainerPropertiesEnvironment = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-image-bjdcpImage :: Lens' BatchJobDefinitionContainerProperties (Val Text)-bjdcpImage = lens _batchJobDefinitionContainerPropertiesImage (\s a -> s { _batchJobDefinitionContainerPropertiesImage = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-instancetype-bjdcpInstanceType :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Text))-bjdcpInstanceType = lens _batchJobDefinitionContainerPropertiesInstanceType (\s a -> s { _batchJobDefinitionContainerPropertiesInstanceType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-jobrolearn-bjdcpJobRoleArn :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Text))-bjdcpJobRoleArn = lens _batchJobDefinitionContainerPropertiesJobRoleArn (\s a -> s { _batchJobDefinitionContainerPropertiesJobRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-linuxparameters-bjdcpLinuxParameters :: Lens' BatchJobDefinitionContainerProperties (Maybe BatchJobDefinitionLinuxParameters)-bjdcpLinuxParameters = lens _batchJobDefinitionContainerPropertiesLinuxParameters (\s a -> s { _batchJobDefinitionContainerPropertiesLinuxParameters = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-memory-bjdcpMemory :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Integer))-bjdcpMemory = lens _batchJobDefinitionContainerPropertiesMemory (\s a -> s { _batchJobDefinitionContainerPropertiesMemory = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-mountpoints-bjdcpMountPoints :: Lens' BatchJobDefinitionContainerProperties (Maybe [BatchJobDefinitionMountPoints])-bjdcpMountPoints = lens _batchJobDefinitionContainerPropertiesMountPoints (\s a -> s { _batchJobDefinitionContainerPropertiesMountPoints = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-privileged-bjdcpPrivileged :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Bool))-bjdcpPrivileged = lens _batchJobDefinitionContainerPropertiesPrivileged (\s a -> s { _batchJobDefinitionContainerPropertiesPrivileged = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-readonlyrootfilesystem-bjdcpReadonlyRootFilesystem :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Bool))-bjdcpReadonlyRootFilesystem = lens _batchJobDefinitionContainerPropertiesReadonlyRootFilesystem (\s a -> s { _batchJobDefinitionContainerPropertiesReadonlyRootFilesystem = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-resourcerequirements-bjdcpResourceRequirements :: Lens' BatchJobDefinitionContainerProperties (Maybe [BatchJobDefinitionResourceRequirement])-bjdcpResourceRequirements = lens _batchJobDefinitionContainerPropertiesResourceRequirements (\s a -> s { _batchJobDefinitionContainerPropertiesResourceRequirements = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-ulimits-bjdcpUlimits :: Lens' BatchJobDefinitionContainerProperties (Maybe [BatchJobDefinitionUlimit])-bjdcpUlimits = lens _batchJobDefinitionContainerPropertiesUlimits (\s a -> s { _batchJobDefinitionContainerPropertiesUlimits = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-user-bjdcpUser :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Text))-bjdcpUser = lens _batchJobDefinitionContainerPropertiesUser (\s a -> s { _batchJobDefinitionContainerPropertiesUser = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-vcpus-bjdcpVcpus :: Lens' BatchJobDefinitionContainerProperties (Maybe (Val Integer))-bjdcpVcpus = lens _batchJobDefinitionContainerPropertiesVcpus (\s a -> s { _batchJobDefinitionContainerPropertiesVcpus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties.html#cfn-batch-jobdefinition-containerproperties-volumes-bjdcpVolumes :: Lens' BatchJobDefinitionContainerProperties (Maybe [BatchJobDefinitionVolumes])-bjdcpVolumes = lens _batchJobDefinitionContainerPropertiesVolumes (\s a -> s { _batchJobDefinitionContainerPropertiesVolumes = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-device.html--module Stratosphere.ResourceProperties.BatchJobDefinitionDevice where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionDevice. See--- 'batchJobDefinitionDevice' for a more convenient constructor.-data BatchJobDefinitionDevice =- BatchJobDefinitionDevice- { _batchJobDefinitionDeviceContainerPath :: Maybe (Val Text)- , _batchJobDefinitionDeviceHostPath :: Maybe (Val Text)- , _batchJobDefinitionDevicePermissions :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionDevice where- toJSON BatchJobDefinitionDevice{..} =- object $- catMaybes- [ fmap (("ContainerPath",) . toJSON) _batchJobDefinitionDeviceContainerPath- , fmap (("HostPath",) . toJSON) _batchJobDefinitionDeviceHostPath- , fmap (("Permissions",) . toJSON) _batchJobDefinitionDevicePermissions- ]---- | Constructor for 'BatchJobDefinitionDevice' containing required fields as--- arguments.-batchJobDefinitionDevice- :: BatchJobDefinitionDevice-batchJobDefinitionDevice =- BatchJobDefinitionDevice- { _batchJobDefinitionDeviceContainerPath = Nothing- , _batchJobDefinitionDeviceHostPath = Nothing- , _batchJobDefinitionDevicePermissions = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-device.html#cfn-batch-jobdefinition-device-containerpath-bjddContainerPath :: Lens' BatchJobDefinitionDevice (Maybe (Val Text))-bjddContainerPath = lens _batchJobDefinitionDeviceContainerPath (\s a -> s { _batchJobDefinitionDeviceContainerPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-device.html#cfn-batch-jobdefinition-device-hostpath-bjddHostPath :: Lens' BatchJobDefinitionDevice (Maybe (Val Text))-bjddHostPath = lens _batchJobDefinitionDeviceHostPath (\s a -> s { _batchJobDefinitionDeviceHostPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-device.html#cfn-batch-jobdefinition-device-permissions-bjddPermissions :: Lens' BatchJobDefinitionDevice (Maybe (ValList Text))-bjddPermissions = lens _batchJobDefinitionDevicePermissions (\s a -> s { _batchJobDefinitionDevicePermissions = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-environment.html--module Stratosphere.ResourceProperties.BatchJobDefinitionEnvironment where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionEnvironment. See--- 'batchJobDefinitionEnvironment' for a more convenient constructor.-data BatchJobDefinitionEnvironment =- BatchJobDefinitionEnvironment- { _batchJobDefinitionEnvironmentName :: Maybe (Val Text)- , _batchJobDefinitionEnvironmentValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionEnvironment where- toJSON BatchJobDefinitionEnvironment{..} =- object $- catMaybes- [ fmap (("Name",) . toJSON) _batchJobDefinitionEnvironmentName- , fmap (("Value",) . toJSON) _batchJobDefinitionEnvironmentValue- ]---- | Constructor for 'BatchJobDefinitionEnvironment' containing required--- fields as arguments.-batchJobDefinitionEnvironment- :: BatchJobDefinitionEnvironment-batchJobDefinitionEnvironment =- BatchJobDefinitionEnvironment- { _batchJobDefinitionEnvironmentName = Nothing- , _batchJobDefinitionEnvironmentValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-environment.html#cfn-batch-jobdefinition-environment-name-bjdeName :: Lens' BatchJobDefinitionEnvironment (Maybe (Val Text))-bjdeName = lens _batchJobDefinitionEnvironmentName (\s a -> s { _batchJobDefinitionEnvironmentName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-environment.html#cfn-batch-jobdefinition-environment-value-bjdeValue :: Lens' BatchJobDefinitionEnvironment (Maybe (Val Text))-bjdeValue = lens _batchJobDefinitionEnvironmentValue (\s a -> s { _batchJobDefinitionEnvironmentValue = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties-linuxparameters.html--module Stratosphere.ResourceProperties.BatchJobDefinitionLinuxParameters where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BatchJobDefinitionDevice---- | Full data type definition for BatchJobDefinitionLinuxParameters. See--- 'batchJobDefinitionLinuxParameters' for a more convenient constructor.-data BatchJobDefinitionLinuxParameters =- BatchJobDefinitionLinuxParameters- { _batchJobDefinitionLinuxParametersDevices :: Maybe [BatchJobDefinitionDevice]- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionLinuxParameters where- toJSON BatchJobDefinitionLinuxParameters{..} =- object $- catMaybes- [ fmap (("Devices",) . toJSON) _batchJobDefinitionLinuxParametersDevices- ]---- | Constructor for 'BatchJobDefinitionLinuxParameters' containing required--- fields as arguments.-batchJobDefinitionLinuxParameters- :: BatchJobDefinitionLinuxParameters-batchJobDefinitionLinuxParameters =- BatchJobDefinitionLinuxParameters- { _batchJobDefinitionLinuxParametersDevices = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-containerproperties-linuxparameters.html#cfn-batch-jobdefinition-containerproperties-linuxparameters-devices-bjdlpDevices :: Lens' BatchJobDefinitionLinuxParameters (Maybe [BatchJobDefinitionDevice])-bjdlpDevices = lens _batchJobDefinitionLinuxParametersDevices (\s a -> s { _batchJobDefinitionLinuxParametersDevices = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-mountpoints.html--module Stratosphere.ResourceProperties.BatchJobDefinitionMountPoints where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionMountPoints. See--- 'batchJobDefinitionMountPoints' for a more convenient constructor.-data BatchJobDefinitionMountPoints =- BatchJobDefinitionMountPoints- { _batchJobDefinitionMountPointsContainerPath :: Maybe (Val Text)- , _batchJobDefinitionMountPointsReadOnly :: Maybe (Val Bool)- , _batchJobDefinitionMountPointsSourceVolume :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionMountPoints where- toJSON BatchJobDefinitionMountPoints{..} =- object $- catMaybes- [ fmap (("ContainerPath",) . toJSON) _batchJobDefinitionMountPointsContainerPath- , fmap (("ReadOnly",) . toJSON) _batchJobDefinitionMountPointsReadOnly- , fmap (("SourceVolume",) . toJSON) _batchJobDefinitionMountPointsSourceVolume- ]---- | Constructor for 'BatchJobDefinitionMountPoints' containing required--- fields as arguments.-batchJobDefinitionMountPoints- :: BatchJobDefinitionMountPoints-batchJobDefinitionMountPoints =- BatchJobDefinitionMountPoints- { _batchJobDefinitionMountPointsContainerPath = Nothing- , _batchJobDefinitionMountPointsReadOnly = Nothing- , _batchJobDefinitionMountPointsSourceVolume = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-mountpoints.html#cfn-batch-jobdefinition-mountpoints-containerpath-bjdmpContainerPath :: Lens' BatchJobDefinitionMountPoints (Maybe (Val Text))-bjdmpContainerPath = lens _batchJobDefinitionMountPointsContainerPath (\s a -> s { _batchJobDefinitionMountPointsContainerPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-mountpoints.html#cfn-batch-jobdefinition-mountpoints-readonly-bjdmpReadOnly :: Lens' BatchJobDefinitionMountPoints (Maybe (Val Bool))-bjdmpReadOnly = lens _batchJobDefinitionMountPointsReadOnly (\s a -> s { _batchJobDefinitionMountPointsReadOnly = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-mountpoints.html#cfn-batch-jobdefinition-mountpoints-sourcevolume-bjdmpSourceVolume :: Lens' BatchJobDefinitionMountPoints (Maybe (Val Text))-bjdmpSourceVolume = lens _batchJobDefinitionMountPointsSourceVolume (\s a -> s { _batchJobDefinitionMountPointsSourceVolume = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-nodeproperties.html--module Stratosphere.ResourceProperties.BatchJobDefinitionNodeProperties where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BatchJobDefinitionNodeRangeProperty---- | Full data type definition for BatchJobDefinitionNodeProperties. See--- 'batchJobDefinitionNodeProperties' for a more convenient constructor.-data BatchJobDefinitionNodeProperties =- BatchJobDefinitionNodeProperties- { _batchJobDefinitionNodePropertiesMainNode :: Val Integer- , _batchJobDefinitionNodePropertiesNodeRangeProperties :: [BatchJobDefinitionNodeRangeProperty]- , _batchJobDefinitionNodePropertiesNumNodes :: Val Integer- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionNodeProperties where- toJSON BatchJobDefinitionNodeProperties{..} =- object $- catMaybes- [ (Just . ("MainNode",) . toJSON) _batchJobDefinitionNodePropertiesMainNode- , (Just . ("NodeRangeProperties",) . toJSON) _batchJobDefinitionNodePropertiesNodeRangeProperties- , (Just . ("NumNodes",) . toJSON) _batchJobDefinitionNodePropertiesNumNodes- ]---- | Constructor for 'BatchJobDefinitionNodeProperties' containing required--- fields as arguments.-batchJobDefinitionNodeProperties- :: Val Integer -- ^ 'bjdnpMainNode'- -> [BatchJobDefinitionNodeRangeProperty] -- ^ 'bjdnpNodeRangeProperties'- -> Val Integer -- ^ 'bjdnpNumNodes'- -> BatchJobDefinitionNodeProperties-batchJobDefinitionNodeProperties mainNodearg nodeRangePropertiesarg numNodesarg =- BatchJobDefinitionNodeProperties- { _batchJobDefinitionNodePropertiesMainNode = mainNodearg- , _batchJobDefinitionNodePropertiesNodeRangeProperties = nodeRangePropertiesarg- , _batchJobDefinitionNodePropertiesNumNodes = numNodesarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-nodeproperties.html#cfn-batch-jobdefinition-nodeproperties-mainnode-bjdnpMainNode :: Lens' BatchJobDefinitionNodeProperties (Val Integer)-bjdnpMainNode = lens _batchJobDefinitionNodePropertiesMainNode (\s a -> s { _batchJobDefinitionNodePropertiesMainNode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-nodeproperties.html#cfn-batch-jobdefinition-nodeproperties-noderangeproperties-bjdnpNodeRangeProperties :: Lens' BatchJobDefinitionNodeProperties [BatchJobDefinitionNodeRangeProperty]-bjdnpNodeRangeProperties = lens _batchJobDefinitionNodePropertiesNodeRangeProperties (\s a -> s { _batchJobDefinitionNodePropertiesNodeRangeProperties = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-nodeproperties.html#cfn-batch-jobdefinition-nodeproperties-numnodes-bjdnpNumNodes :: Lens' BatchJobDefinitionNodeProperties (Val Integer)-bjdnpNumNodes = lens _batchJobDefinitionNodePropertiesNumNodes (\s a -> s { _batchJobDefinitionNodePropertiesNumNodes = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-noderangeproperty.html--module Stratosphere.ResourceProperties.BatchJobDefinitionNodeRangeProperty where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BatchJobDefinitionContainerProperties---- | Full data type definition for BatchJobDefinitionNodeRangeProperty. See--- 'batchJobDefinitionNodeRangeProperty' for a more convenient constructor.-data BatchJobDefinitionNodeRangeProperty =- BatchJobDefinitionNodeRangeProperty- { _batchJobDefinitionNodeRangePropertyContainer :: Maybe BatchJobDefinitionContainerProperties- , _batchJobDefinitionNodeRangePropertyTargetNodes :: Val Text- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionNodeRangeProperty where- toJSON BatchJobDefinitionNodeRangeProperty{..} =- object $- catMaybes- [ fmap (("Container",) . toJSON) _batchJobDefinitionNodeRangePropertyContainer- , (Just . ("TargetNodes",) . toJSON) _batchJobDefinitionNodeRangePropertyTargetNodes- ]---- | Constructor for 'BatchJobDefinitionNodeRangeProperty' containing required--- fields as arguments.-batchJobDefinitionNodeRangeProperty- :: Val Text -- ^ 'bjdnrpTargetNodes'- -> BatchJobDefinitionNodeRangeProperty-batchJobDefinitionNodeRangeProperty targetNodesarg =- BatchJobDefinitionNodeRangeProperty- { _batchJobDefinitionNodeRangePropertyContainer = Nothing- , _batchJobDefinitionNodeRangePropertyTargetNodes = targetNodesarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-noderangeproperty.html#cfn-batch-jobdefinition-noderangeproperty-container-bjdnrpContainer :: Lens' BatchJobDefinitionNodeRangeProperty (Maybe BatchJobDefinitionContainerProperties)-bjdnrpContainer = lens _batchJobDefinitionNodeRangePropertyContainer (\s a -> s { _batchJobDefinitionNodeRangePropertyContainer = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-noderangeproperty.html#cfn-batch-jobdefinition-noderangeproperty-targetnodes-bjdnrpTargetNodes :: Lens' BatchJobDefinitionNodeRangeProperty (Val Text)-bjdnrpTargetNodes = lens _batchJobDefinitionNodeRangePropertyTargetNodes (\s a -> s { _batchJobDefinitionNodeRangePropertyTargetNodes = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-resourcerequirement.html--module Stratosphere.ResourceProperties.BatchJobDefinitionResourceRequirement where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionResourceRequirement. See--- 'batchJobDefinitionResourceRequirement' for a more convenient--- constructor.-data BatchJobDefinitionResourceRequirement =- BatchJobDefinitionResourceRequirement- { _batchJobDefinitionResourceRequirementType :: Maybe (Val Text)- , _batchJobDefinitionResourceRequirementValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionResourceRequirement where- toJSON BatchJobDefinitionResourceRequirement{..} =- object $- catMaybes- [ fmap (("Type",) . toJSON) _batchJobDefinitionResourceRequirementType- , fmap (("Value",) . toJSON) _batchJobDefinitionResourceRequirementValue- ]---- | Constructor for 'BatchJobDefinitionResourceRequirement' containing--- required fields as arguments.-batchJobDefinitionResourceRequirement- :: BatchJobDefinitionResourceRequirement-batchJobDefinitionResourceRequirement =- BatchJobDefinitionResourceRequirement- { _batchJobDefinitionResourceRequirementType = Nothing- , _batchJobDefinitionResourceRequirementValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-resourcerequirement.html#cfn-batch-jobdefinition-resourcerequirement-type-bjdrrType :: Lens' BatchJobDefinitionResourceRequirement (Maybe (Val Text))-bjdrrType = lens _batchJobDefinitionResourceRequirementType (\s a -> s { _batchJobDefinitionResourceRequirementType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-resourcerequirement.html#cfn-batch-jobdefinition-resourcerequirement-value-bjdrrValue :: Lens' BatchJobDefinitionResourceRequirement (Maybe (Val Text))-bjdrrValue = lens _batchJobDefinitionResourceRequirementValue (\s a -> s { _batchJobDefinitionResourceRequirementValue = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-retrystrategy.html--module Stratosphere.ResourceProperties.BatchJobDefinitionRetryStrategy where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionRetryStrategy. See--- 'batchJobDefinitionRetryStrategy' for a more convenient constructor.-data BatchJobDefinitionRetryStrategy =- BatchJobDefinitionRetryStrategy- { _batchJobDefinitionRetryStrategyAttempts :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionRetryStrategy where- toJSON BatchJobDefinitionRetryStrategy{..} =- object $- catMaybes- [ fmap (("Attempts",) . toJSON) _batchJobDefinitionRetryStrategyAttempts- ]---- | Constructor for 'BatchJobDefinitionRetryStrategy' containing required--- fields as arguments.-batchJobDefinitionRetryStrategy- :: BatchJobDefinitionRetryStrategy-batchJobDefinitionRetryStrategy =- BatchJobDefinitionRetryStrategy- { _batchJobDefinitionRetryStrategyAttempts = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-retrystrategy.html#cfn-batch-jobdefinition-retrystrategy-attempts-bjdrsAttempts :: Lens' BatchJobDefinitionRetryStrategy (Maybe (Val Integer))-bjdrsAttempts = lens _batchJobDefinitionRetryStrategyAttempts (\s a -> s { _batchJobDefinitionRetryStrategyAttempts = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-timeout.html--module Stratosphere.ResourceProperties.BatchJobDefinitionTimeout where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionTimeout. See--- 'batchJobDefinitionTimeout' for a more convenient constructor.-data BatchJobDefinitionTimeout =- BatchJobDefinitionTimeout- { _batchJobDefinitionTimeoutAttemptDurationSeconds :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionTimeout where- toJSON BatchJobDefinitionTimeout{..} =- object $- catMaybes- [ fmap (("AttemptDurationSeconds",) . toJSON) _batchJobDefinitionTimeoutAttemptDurationSeconds- ]---- | Constructor for 'BatchJobDefinitionTimeout' containing required fields as--- arguments.-batchJobDefinitionTimeout- :: BatchJobDefinitionTimeout-batchJobDefinitionTimeout =- BatchJobDefinitionTimeout- { _batchJobDefinitionTimeoutAttemptDurationSeconds = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-timeout.html#cfn-batch-jobdefinition-timeout-attemptdurationseconds-bjdtAttemptDurationSeconds :: Lens' BatchJobDefinitionTimeout (Maybe (Val Integer))-bjdtAttemptDurationSeconds = lens _batchJobDefinitionTimeoutAttemptDurationSeconds (\s a -> s { _batchJobDefinitionTimeoutAttemptDurationSeconds = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-ulimit.html--module Stratosphere.ResourceProperties.BatchJobDefinitionUlimit where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionUlimit. See--- 'batchJobDefinitionUlimit' for a more convenient constructor.-data BatchJobDefinitionUlimit =- BatchJobDefinitionUlimit- { _batchJobDefinitionUlimitHardLimit :: Val Integer- , _batchJobDefinitionUlimitName :: Val Text- , _batchJobDefinitionUlimitSoftLimit :: Val Integer- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionUlimit where- toJSON BatchJobDefinitionUlimit{..} =- object $- catMaybes- [ (Just . ("HardLimit",) . toJSON) _batchJobDefinitionUlimitHardLimit- , (Just . ("Name",) . toJSON) _batchJobDefinitionUlimitName- , (Just . ("SoftLimit",) . toJSON) _batchJobDefinitionUlimitSoftLimit- ]---- | Constructor for 'BatchJobDefinitionUlimit' containing required fields as--- arguments.-batchJobDefinitionUlimit- :: Val Integer -- ^ 'bjduHardLimit'- -> Val Text -- ^ 'bjduName'- -> Val Integer -- ^ 'bjduSoftLimit'- -> BatchJobDefinitionUlimit-batchJobDefinitionUlimit hardLimitarg namearg softLimitarg =- BatchJobDefinitionUlimit- { _batchJobDefinitionUlimitHardLimit = hardLimitarg- , _batchJobDefinitionUlimitName = namearg- , _batchJobDefinitionUlimitSoftLimit = softLimitarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-ulimit.html#cfn-batch-jobdefinition-ulimit-hardlimit-bjduHardLimit :: Lens' BatchJobDefinitionUlimit (Val Integer)-bjduHardLimit = lens _batchJobDefinitionUlimitHardLimit (\s a -> s { _batchJobDefinitionUlimitHardLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-ulimit.html#cfn-batch-jobdefinition-ulimit-name-bjduName :: Lens' BatchJobDefinitionUlimit (Val Text)-bjduName = lens _batchJobDefinitionUlimitName (\s a -> s { _batchJobDefinitionUlimitName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-ulimit.html#cfn-batch-jobdefinition-ulimit-softlimit-bjduSoftLimit :: Lens' BatchJobDefinitionUlimit (Val Integer)-bjduSoftLimit = lens _batchJobDefinitionUlimitSoftLimit (\s a -> s { _batchJobDefinitionUlimitSoftLimit = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-volumes.html--module Stratosphere.ResourceProperties.BatchJobDefinitionVolumes where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BatchJobDefinitionVolumesHost---- | Full data type definition for BatchJobDefinitionVolumes. See--- 'batchJobDefinitionVolumes' for a more convenient constructor.-data BatchJobDefinitionVolumes =- BatchJobDefinitionVolumes- { _batchJobDefinitionVolumesHost :: Maybe BatchJobDefinitionVolumesHost- , _batchJobDefinitionVolumesName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionVolumes where- toJSON BatchJobDefinitionVolumes{..} =- object $- catMaybes- [ fmap (("Host",) . toJSON) _batchJobDefinitionVolumesHost- , fmap (("Name",) . toJSON) _batchJobDefinitionVolumesName- ]---- | Constructor for 'BatchJobDefinitionVolumes' containing required fields as--- arguments.-batchJobDefinitionVolumes- :: BatchJobDefinitionVolumes-batchJobDefinitionVolumes =- BatchJobDefinitionVolumes- { _batchJobDefinitionVolumesHost = Nothing- , _batchJobDefinitionVolumesName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-volumes.html#cfn-batch-jobdefinition-volumes-host-bjdvHost :: Lens' BatchJobDefinitionVolumes (Maybe BatchJobDefinitionVolumesHost)-bjdvHost = lens _batchJobDefinitionVolumesHost (\s a -> s { _batchJobDefinitionVolumesHost = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-volumes.html#cfn-batch-jobdefinition-volumes-name-bjdvName :: Lens' BatchJobDefinitionVolumes (Maybe (Val Text))-bjdvName = lens _batchJobDefinitionVolumesName (\s a -> s { _batchJobDefinitionVolumesName = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-volumeshost.html--module Stratosphere.ResourceProperties.BatchJobDefinitionVolumesHost where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobDefinitionVolumesHost. See--- 'batchJobDefinitionVolumesHost' for a more convenient constructor.-data BatchJobDefinitionVolumesHost =- BatchJobDefinitionVolumesHost- { _batchJobDefinitionVolumesHostSourcePath :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BatchJobDefinitionVolumesHost where- toJSON BatchJobDefinitionVolumesHost{..} =- object $- catMaybes- [ fmap (("SourcePath",) . toJSON) _batchJobDefinitionVolumesHostSourcePath- ]---- | Constructor for 'BatchJobDefinitionVolumesHost' containing required--- fields as arguments.-batchJobDefinitionVolumesHost- :: BatchJobDefinitionVolumesHost-batchJobDefinitionVolumesHost =- BatchJobDefinitionVolumesHost- { _batchJobDefinitionVolumesHostSourcePath = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobdefinition-volumeshost.html#cfn-batch-jobdefinition-volumeshost-sourcepath-bjdvhSourcePath :: Lens' BatchJobDefinitionVolumesHost (Maybe (Val Text))-bjdvhSourcePath = lens _batchJobDefinitionVolumesHostSourcePath (\s a -> s { _batchJobDefinitionVolumesHostSourcePath = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobqueue-computeenvironmentorder.html--module Stratosphere.ResourceProperties.BatchJobQueueComputeEnvironmentOrder where--import Stratosphere.ResourceImports----- | Full data type definition for BatchJobQueueComputeEnvironmentOrder. See--- 'batchJobQueueComputeEnvironmentOrder' for a more convenient constructor.-data BatchJobQueueComputeEnvironmentOrder =- BatchJobQueueComputeEnvironmentOrder- { _batchJobQueueComputeEnvironmentOrderComputeEnvironment :: Val Text- , _batchJobQueueComputeEnvironmentOrderOrder :: Val Integer- } deriving (Show, Eq)--instance ToJSON BatchJobQueueComputeEnvironmentOrder where- toJSON BatchJobQueueComputeEnvironmentOrder{..} =- object $- catMaybes- [ (Just . ("ComputeEnvironment",) . toJSON) _batchJobQueueComputeEnvironmentOrderComputeEnvironment- , (Just . ("Order",) . toJSON) _batchJobQueueComputeEnvironmentOrderOrder- ]---- | Constructor for 'BatchJobQueueComputeEnvironmentOrder' containing--- required fields as arguments.-batchJobQueueComputeEnvironmentOrder- :: Val Text -- ^ 'bjqceoComputeEnvironment'- -> Val Integer -- ^ 'bjqceoOrder'- -> BatchJobQueueComputeEnvironmentOrder-batchJobQueueComputeEnvironmentOrder computeEnvironmentarg orderarg =- BatchJobQueueComputeEnvironmentOrder- { _batchJobQueueComputeEnvironmentOrderComputeEnvironment = computeEnvironmentarg- , _batchJobQueueComputeEnvironmentOrderOrder = orderarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobqueue-computeenvironmentorder.html#cfn-batch-jobqueue-computeenvironmentorder-computeenvironment-bjqceoComputeEnvironment :: Lens' BatchJobQueueComputeEnvironmentOrder (Val Text)-bjqceoComputeEnvironment = lens _batchJobQueueComputeEnvironmentOrderComputeEnvironment (\s a -> s { _batchJobQueueComputeEnvironmentOrderComputeEnvironment = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobqueue-computeenvironmentorder.html#cfn-batch-jobqueue-computeenvironmentorder-order-bjqceoOrder :: Lens' BatchJobQueueComputeEnvironmentOrder (Val Integer)-bjqceoOrder = lens _batchJobQueueComputeEnvironmentOrderOrder (\s a -> s { _batchJobQueueComputeEnvironmentOrderOrder = a })
@@ -1,91 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html--module Stratosphere.ResourceProperties.BudgetsBudgetBudgetData where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BudgetsBudgetSpend-import Stratosphere.ResourceProperties.BudgetsBudgetCostTypes-import Stratosphere.ResourceProperties.BudgetsBudgetTimePeriod---- | Full data type definition for BudgetsBudgetBudgetData. See--- 'budgetsBudgetBudgetData' for a more convenient constructor.-data BudgetsBudgetBudgetData =- BudgetsBudgetBudgetData- { _budgetsBudgetBudgetDataBudgetLimit :: Maybe BudgetsBudgetSpend- , _budgetsBudgetBudgetDataBudgetName :: Maybe (Val Text)- , _budgetsBudgetBudgetDataBudgetType :: Val Text- , _budgetsBudgetBudgetDataCostFilters :: Maybe Object- , _budgetsBudgetBudgetDataCostTypes :: Maybe BudgetsBudgetCostTypes- , _budgetsBudgetBudgetDataPlannedBudgetLimits :: Maybe Object- , _budgetsBudgetBudgetDataTimePeriod :: Maybe BudgetsBudgetTimePeriod- , _budgetsBudgetBudgetDataTimeUnit :: Val Text- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetBudgetData where- toJSON BudgetsBudgetBudgetData{..} =- object $- catMaybes- [ fmap (("BudgetLimit",) . toJSON) _budgetsBudgetBudgetDataBudgetLimit- , fmap (("BudgetName",) . toJSON) _budgetsBudgetBudgetDataBudgetName- , (Just . ("BudgetType",) . toJSON) _budgetsBudgetBudgetDataBudgetType- , fmap (("CostFilters",) . toJSON) _budgetsBudgetBudgetDataCostFilters- , fmap (("CostTypes",) . toJSON) _budgetsBudgetBudgetDataCostTypes- , fmap (("PlannedBudgetLimits",) . toJSON) _budgetsBudgetBudgetDataPlannedBudgetLimits- , fmap (("TimePeriod",) . toJSON) _budgetsBudgetBudgetDataTimePeriod- , (Just . ("TimeUnit",) . toJSON) _budgetsBudgetBudgetDataTimeUnit- ]---- | Constructor for 'BudgetsBudgetBudgetData' containing required fields as--- arguments.-budgetsBudgetBudgetData- :: Val Text -- ^ 'bbbdBudgetType'- -> Val Text -- ^ 'bbbdTimeUnit'- -> BudgetsBudgetBudgetData-budgetsBudgetBudgetData budgetTypearg timeUnitarg =- BudgetsBudgetBudgetData- { _budgetsBudgetBudgetDataBudgetLimit = Nothing- , _budgetsBudgetBudgetDataBudgetName = Nothing- , _budgetsBudgetBudgetDataBudgetType = budgetTypearg- , _budgetsBudgetBudgetDataCostFilters = Nothing- , _budgetsBudgetBudgetDataCostTypes = Nothing- , _budgetsBudgetBudgetDataPlannedBudgetLimits = Nothing- , _budgetsBudgetBudgetDataTimePeriod = Nothing- , _budgetsBudgetBudgetDataTimeUnit = timeUnitarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-budgetlimit-bbbdBudgetLimit :: Lens' BudgetsBudgetBudgetData (Maybe BudgetsBudgetSpend)-bbbdBudgetLimit = lens _budgetsBudgetBudgetDataBudgetLimit (\s a -> s { _budgetsBudgetBudgetDataBudgetLimit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-budgetname-bbbdBudgetName :: Lens' BudgetsBudgetBudgetData (Maybe (Val Text))-bbbdBudgetName = lens _budgetsBudgetBudgetDataBudgetName (\s a -> s { _budgetsBudgetBudgetDataBudgetName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-budgettype-bbbdBudgetType :: Lens' BudgetsBudgetBudgetData (Val Text)-bbbdBudgetType = lens _budgetsBudgetBudgetDataBudgetType (\s a -> s { _budgetsBudgetBudgetDataBudgetType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-costfilters-bbbdCostFilters :: Lens' BudgetsBudgetBudgetData (Maybe Object)-bbbdCostFilters = lens _budgetsBudgetBudgetDataCostFilters (\s a -> s { _budgetsBudgetBudgetDataCostFilters = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-costtypes-bbbdCostTypes :: Lens' BudgetsBudgetBudgetData (Maybe BudgetsBudgetCostTypes)-bbbdCostTypes = lens _budgetsBudgetBudgetDataCostTypes (\s a -> s { _budgetsBudgetBudgetDataCostTypes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-plannedbudgetlimits-bbbdPlannedBudgetLimits :: Lens' BudgetsBudgetBudgetData (Maybe Object)-bbbdPlannedBudgetLimits = lens _budgetsBudgetBudgetDataPlannedBudgetLimits (\s a -> s { _budgetsBudgetBudgetDataPlannedBudgetLimits = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-timeperiod-bbbdTimePeriod :: Lens' BudgetsBudgetBudgetData (Maybe BudgetsBudgetTimePeriod)-bbbdTimePeriod = lens _budgetsBudgetBudgetDataTimePeriod (\s a -> s { _budgetsBudgetBudgetDataTimePeriod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-budgetdata.html#cfn-budgets-budget-budgetdata-timeunit-bbbdTimeUnit :: Lens' BudgetsBudgetBudgetData (Val Text)-bbbdTimeUnit = lens _budgetsBudgetBudgetDataTimeUnit (\s a -> s { _budgetsBudgetBudgetDataTimeUnit = a })
@@ -1,108 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html--module Stratosphere.ResourceProperties.BudgetsBudgetCostTypes where--import Stratosphere.ResourceImports----- | Full data type definition for BudgetsBudgetCostTypes. See--- 'budgetsBudgetCostTypes' for a more convenient constructor.-data BudgetsBudgetCostTypes =- BudgetsBudgetCostTypes- { _budgetsBudgetCostTypesIncludeCredit :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeDiscount :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeOtherSubscription :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeRecurring :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeRefund :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeSubscription :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeSupport :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeTax :: Maybe (Val Bool)- , _budgetsBudgetCostTypesIncludeUpfront :: Maybe (Val Bool)- , _budgetsBudgetCostTypesUseAmortized :: Maybe (Val Bool)- , _budgetsBudgetCostTypesUseBlended :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetCostTypes where- toJSON BudgetsBudgetCostTypes{..} =- object $- catMaybes- [ fmap (("IncludeCredit",) . toJSON) _budgetsBudgetCostTypesIncludeCredit- , fmap (("IncludeDiscount",) . toJSON) _budgetsBudgetCostTypesIncludeDiscount- , fmap (("IncludeOtherSubscription",) . toJSON) _budgetsBudgetCostTypesIncludeOtherSubscription- , fmap (("IncludeRecurring",) . toJSON) _budgetsBudgetCostTypesIncludeRecurring- , fmap (("IncludeRefund",) . toJSON) _budgetsBudgetCostTypesIncludeRefund- , fmap (("IncludeSubscription",) . toJSON) _budgetsBudgetCostTypesIncludeSubscription- , fmap (("IncludeSupport",) . toJSON) _budgetsBudgetCostTypesIncludeSupport- , fmap (("IncludeTax",) . toJSON) _budgetsBudgetCostTypesIncludeTax- , fmap (("IncludeUpfront",) . toJSON) _budgetsBudgetCostTypesIncludeUpfront- , fmap (("UseAmortized",) . toJSON) _budgetsBudgetCostTypesUseAmortized- , fmap (("UseBlended",) . toJSON) _budgetsBudgetCostTypesUseBlended- ]---- | Constructor for 'BudgetsBudgetCostTypes' containing required fields as--- arguments.-budgetsBudgetCostTypes- :: BudgetsBudgetCostTypes-budgetsBudgetCostTypes =- BudgetsBudgetCostTypes- { _budgetsBudgetCostTypesIncludeCredit = Nothing- , _budgetsBudgetCostTypesIncludeDiscount = Nothing- , _budgetsBudgetCostTypesIncludeOtherSubscription = Nothing- , _budgetsBudgetCostTypesIncludeRecurring = Nothing- , _budgetsBudgetCostTypesIncludeRefund = Nothing- , _budgetsBudgetCostTypesIncludeSubscription = Nothing- , _budgetsBudgetCostTypesIncludeSupport = Nothing- , _budgetsBudgetCostTypesIncludeTax = Nothing- , _budgetsBudgetCostTypesIncludeUpfront = Nothing- , _budgetsBudgetCostTypesUseAmortized = Nothing- , _budgetsBudgetCostTypesUseBlended = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includecredit-bbctIncludeCredit :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeCredit = lens _budgetsBudgetCostTypesIncludeCredit (\s a -> s { _budgetsBudgetCostTypesIncludeCredit = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includediscount-bbctIncludeDiscount :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeDiscount = lens _budgetsBudgetCostTypesIncludeDiscount (\s a -> s { _budgetsBudgetCostTypesIncludeDiscount = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includeothersubscription-bbctIncludeOtherSubscription :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeOtherSubscription = lens _budgetsBudgetCostTypesIncludeOtherSubscription (\s a -> s { _budgetsBudgetCostTypesIncludeOtherSubscription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includerecurring-bbctIncludeRecurring :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeRecurring = lens _budgetsBudgetCostTypesIncludeRecurring (\s a -> s { _budgetsBudgetCostTypesIncludeRecurring = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includerefund-bbctIncludeRefund :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeRefund = lens _budgetsBudgetCostTypesIncludeRefund (\s a -> s { _budgetsBudgetCostTypesIncludeRefund = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includesubscription-bbctIncludeSubscription :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeSubscription = lens _budgetsBudgetCostTypesIncludeSubscription (\s a -> s { _budgetsBudgetCostTypesIncludeSubscription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includesupport-bbctIncludeSupport :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeSupport = lens _budgetsBudgetCostTypesIncludeSupport (\s a -> s { _budgetsBudgetCostTypesIncludeSupport = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includetax-bbctIncludeTax :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeTax = lens _budgetsBudgetCostTypesIncludeTax (\s a -> s { _budgetsBudgetCostTypesIncludeTax = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-includeupfront-bbctIncludeUpfront :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctIncludeUpfront = lens _budgetsBudgetCostTypesIncludeUpfront (\s a -> s { _budgetsBudgetCostTypesIncludeUpfront = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-useamortized-bbctUseAmortized :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctUseAmortized = lens _budgetsBudgetCostTypesUseAmortized (\s a -> s { _budgetsBudgetCostTypesUseAmortized = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-costtypes.html#cfn-budgets-budget-costtypes-useblended-bbctUseBlended :: Lens' BudgetsBudgetCostTypes (Maybe (Val Bool))-bbctUseBlended = lens _budgetsBudgetCostTypesUseBlended (\s a -> s { _budgetsBudgetCostTypesUseBlended = a })
@@ -1,62 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notification.html--module Stratosphere.ResourceProperties.BudgetsBudgetNotification where--import Stratosphere.ResourceImports----- | Full data type definition for BudgetsBudgetNotification. See--- 'budgetsBudgetNotification' for a more convenient constructor.-data BudgetsBudgetNotification =- BudgetsBudgetNotification- { _budgetsBudgetNotificationComparisonOperator :: Val Text- , _budgetsBudgetNotificationNotificationType :: Val Text- , _budgetsBudgetNotificationThreshold :: Val Double- , _budgetsBudgetNotificationThresholdType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetNotification where- toJSON BudgetsBudgetNotification{..} =- object $- catMaybes- [ (Just . ("ComparisonOperator",) . toJSON) _budgetsBudgetNotificationComparisonOperator- , (Just . ("NotificationType",) . toJSON) _budgetsBudgetNotificationNotificationType- , (Just . ("Threshold",) . toJSON) _budgetsBudgetNotificationThreshold- , fmap (("ThresholdType",) . toJSON) _budgetsBudgetNotificationThresholdType- ]---- | Constructor for 'BudgetsBudgetNotification' containing required fields as--- arguments.-budgetsBudgetNotification- :: Val Text -- ^ 'bbnComparisonOperator'- -> Val Text -- ^ 'bbnNotificationType'- -> Val Double -- ^ 'bbnThreshold'- -> BudgetsBudgetNotification-budgetsBudgetNotification comparisonOperatorarg notificationTypearg thresholdarg =- BudgetsBudgetNotification- { _budgetsBudgetNotificationComparisonOperator = comparisonOperatorarg- , _budgetsBudgetNotificationNotificationType = notificationTypearg- , _budgetsBudgetNotificationThreshold = thresholdarg- , _budgetsBudgetNotificationThresholdType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notification.html#cfn-budgets-budget-notification-comparisonoperator-bbnComparisonOperator :: Lens' BudgetsBudgetNotification (Val Text)-bbnComparisonOperator = lens _budgetsBudgetNotificationComparisonOperator (\s a -> s { _budgetsBudgetNotificationComparisonOperator = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notification.html#cfn-budgets-budget-notification-notificationtype-bbnNotificationType :: Lens' BudgetsBudgetNotification (Val Text)-bbnNotificationType = lens _budgetsBudgetNotificationNotificationType (\s a -> s { _budgetsBudgetNotificationNotificationType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notification.html#cfn-budgets-budget-notification-threshold-bbnThreshold :: Lens' BudgetsBudgetNotification (Val Double)-bbnThreshold = lens _budgetsBudgetNotificationThreshold (\s a -> s { _budgetsBudgetNotificationThreshold = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notification.html#cfn-budgets-budget-notification-thresholdtype-bbnThresholdType :: Lens' BudgetsBudgetNotification (Maybe (Val Text))-bbnThresholdType = lens _budgetsBudgetNotificationThresholdType (\s a -> s { _budgetsBudgetNotificationThresholdType = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notificationwithsubscribers.html--module Stratosphere.ResourceProperties.BudgetsBudgetNotificationWithSubscribers where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.BudgetsBudgetNotification-import Stratosphere.ResourceProperties.BudgetsBudgetSubscriber---- | Full data type definition for BudgetsBudgetNotificationWithSubscribers.--- See 'budgetsBudgetNotificationWithSubscribers' for a more convenient--- constructor.-data BudgetsBudgetNotificationWithSubscribers =- BudgetsBudgetNotificationWithSubscribers- { _budgetsBudgetNotificationWithSubscribersNotification :: BudgetsBudgetNotification- , _budgetsBudgetNotificationWithSubscribersSubscribers :: [BudgetsBudgetSubscriber]- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetNotificationWithSubscribers where- toJSON BudgetsBudgetNotificationWithSubscribers{..} =- object $- catMaybes- [ (Just . ("Notification",) . toJSON) _budgetsBudgetNotificationWithSubscribersNotification- , (Just . ("Subscribers",) . toJSON) _budgetsBudgetNotificationWithSubscribersSubscribers- ]---- | Constructor for 'BudgetsBudgetNotificationWithSubscribers' containing--- required fields as arguments.-budgetsBudgetNotificationWithSubscribers- :: BudgetsBudgetNotification -- ^ 'bbnwsNotification'- -> [BudgetsBudgetSubscriber] -- ^ 'bbnwsSubscribers'- -> BudgetsBudgetNotificationWithSubscribers-budgetsBudgetNotificationWithSubscribers notificationarg subscribersarg =- BudgetsBudgetNotificationWithSubscribers- { _budgetsBudgetNotificationWithSubscribersNotification = notificationarg- , _budgetsBudgetNotificationWithSubscribersSubscribers = subscribersarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notificationwithsubscribers.html#cfn-budgets-budget-notificationwithsubscribers-notification-bbnwsNotification :: Lens' BudgetsBudgetNotificationWithSubscribers BudgetsBudgetNotification-bbnwsNotification = lens _budgetsBudgetNotificationWithSubscribersNotification (\s a -> s { _budgetsBudgetNotificationWithSubscribersNotification = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-notificationwithsubscribers.html#cfn-budgets-budget-notificationwithsubscribers-subscribers-bbnwsSubscribers :: Lens' BudgetsBudgetNotificationWithSubscribers [BudgetsBudgetSubscriber]-bbnwsSubscribers = lens _budgetsBudgetNotificationWithSubscribersSubscribers (\s a -> s { _budgetsBudgetNotificationWithSubscribersSubscribers = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-spend.html--module Stratosphere.ResourceProperties.BudgetsBudgetSpend where--import Stratosphere.ResourceImports----- | Full data type definition for BudgetsBudgetSpend. See--- 'budgetsBudgetSpend' for a more convenient constructor.-data BudgetsBudgetSpend =- BudgetsBudgetSpend- { _budgetsBudgetSpendAmount :: Val Double- , _budgetsBudgetSpendUnit :: Val Text- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetSpend where- toJSON BudgetsBudgetSpend{..} =- object $- catMaybes- [ (Just . ("Amount",) . toJSON) _budgetsBudgetSpendAmount- , (Just . ("Unit",) . toJSON) _budgetsBudgetSpendUnit- ]---- | Constructor for 'BudgetsBudgetSpend' containing required fields as--- arguments.-budgetsBudgetSpend- :: Val Double -- ^ 'bbsAmount'- -> Val Text -- ^ 'bbsUnit'- -> BudgetsBudgetSpend-budgetsBudgetSpend amountarg unitarg =- BudgetsBudgetSpend- { _budgetsBudgetSpendAmount = amountarg- , _budgetsBudgetSpendUnit = unitarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-spend.html#cfn-budgets-budget-spend-amount-bbsAmount :: Lens' BudgetsBudgetSpend (Val Double)-bbsAmount = lens _budgetsBudgetSpendAmount (\s a -> s { _budgetsBudgetSpendAmount = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-spend.html#cfn-budgets-budget-spend-unit-bbsUnit :: Lens' BudgetsBudgetSpend (Val Text)-bbsUnit = lens _budgetsBudgetSpendUnit (\s a -> s { _budgetsBudgetSpendUnit = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-subscriber.html--module Stratosphere.ResourceProperties.BudgetsBudgetSubscriber where--import Stratosphere.ResourceImports----- | Full data type definition for BudgetsBudgetSubscriber. See--- 'budgetsBudgetSubscriber' for a more convenient constructor.-data BudgetsBudgetSubscriber =- BudgetsBudgetSubscriber- { _budgetsBudgetSubscriberAddress :: Val Text- , _budgetsBudgetSubscriberSubscriptionType :: Val Text- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetSubscriber where- toJSON BudgetsBudgetSubscriber{..} =- object $- catMaybes- [ (Just . ("Address",) . toJSON) _budgetsBudgetSubscriberAddress- , (Just . ("SubscriptionType",) . toJSON) _budgetsBudgetSubscriberSubscriptionType- ]---- | Constructor for 'BudgetsBudgetSubscriber' containing required fields as--- arguments.-budgetsBudgetSubscriber- :: Val Text -- ^ 'bbsAddress'- -> Val Text -- ^ 'bbsSubscriptionType'- -> BudgetsBudgetSubscriber-budgetsBudgetSubscriber addressarg subscriptionTypearg =- BudgetsBudgetSubscriber- { _budgetsBudgetSubscriberAddress = addressarg- , _budgetsBudgetSubscriberSubscriptionType = subscriptionTypearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-subscriber.html#cfn-budgets-budget-subscriber-address-bbsAddress :: Lens' BudgetsBudgetSubscriber (Val Text)-bbsAddress = lens _budgetsBudgetSubscriberAddress (\s a -> s { _budgetsBudgetSubscriberAddress = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-subscriber.html#cfn-budgets-budget-subscriber-subscriptiontype-bbsSubscriptionType :: Lens' BudgetsBudgetSubscriber (Val Text)-bbsSubscriptionType = lens _budgetsBudgetSubscriberSubscriptionType (\s a -> s { _budgetsBudgetSubscriberSubscriptionType = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-timeperiod.html--module Stratosphere.ResourceProperties.BudgetsBudgetTimePeriod where--import Stratosphere.ResourceImports----- | Full data type definition for BudgetsBudgetTimePeriod. See--- 'budgetsBudgetTimePeriod' for a more convenient constructor.-data BudgetsBudgetTimePeriod =- BudgetsBudgetTimePeriod- { _budgetsBudgetTimePeriodEnd :: Maybe (Val Text)- , _budgetsBudgetTimePeriodStart :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON BudgetsBudgetTimePeriod where- toJSON BudgetsBudgetTimePeriod{..} =- object $- catMaybes- [ fmap (("End",) . toJSON) _budgetsBudgetTimePeriodEnd- , fmap (("Start",) . toJSON) _budgetsBudgetTimePeriodStart- ]---- | Constructor for 'BudgetsBudgetTimePeriod' containing required fields as--- arguments.-budgetsBudgetTimePeriod- :: BudgetsBudgetTimePeriod-budgetsBudgetTimePeriod =- BudgetsBudgetTimePeriod- { _budgetsBudgetTimePeriodEnd = Nothing- , _budgetsBudgetTimePeriodStart = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-timeperiod.html#cfn-budgets-budget-timeperiod-end-bbtpEnd :: Lens' BudgetsBudgetTimePeriod (Maybe (Val Text))-bbtpEnd = lens _budgetsBudgetTimePeriodEnd (\s a -> s { _budgetsBudgetTimePeriodEnd = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-budgets-budget-timeperiod.html#cfn-budgets-budget-timeperiod-start-bbtpStart :: Lens' BudgetsBudgetTimePeriod (Maybe (Val Text))-bbtpStart = lens _budgetsBudgetTimePeriodStart (\s a -> s { _budgetsBudgetTimePeriodStart = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-billingmode.html--module Stratosphere.ResourceProperties.CassandraTableBillingMode where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CassandraTableProvisionedThroughput---- | Full data type definition for CassandraTableBillingMode. See--- 'cassandraTableBillingMode' for a more convenient constructor.-data CassandraTableBillingMode =- CassandraTableBillingMode- { _cassandraTableBillingModeMode :: Val Text- , _cassandraTableBillingModeProvisionedThroughput :: Maybe CassandraTableProvisionedThroughput- } deriving (Show, Eq)--instance ToJSON CassandraTableBillingMode where- toJSON CassandraTableBillingMode{..} =- object $- catMaybes- [ (Just . ("Mode",) . toJSON) _cassandraTableBillingModeMode- , fmap (("ProvisionedThroughput",) . toJSON) _cassandraTableBillingModeProvisionedThroughput- ]---- | Constructor for 'CassandraTableBillingMode' containing required fields as--- arguments.-cassandraTableBillingMode- :: Val Text -- ^ 'ctbmMode'- -> CassandraTableBillingMode-cassandraTableBillingMode modearg =- CassandraTableBillingMode- { _cassandraTableBillingModeMode = modearg- , _cassandraTableBillingModeProvisionedThroughput = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-billingmode.html#cfn-cassandra-table-billingmode-mode-ctbmMode :: Lens' CassandraTableBillingMode (Val Text)-ctbmMode = lens _cassandraTableBillingModeMode (\s a -> s { _cassandraTableBillingModeMode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-billingmode.html#cfn-cassandra-table-billingmode-provisionedthroughput-ctbmProvisionedThroughput :: Lens' CassandraTableBillingMode (Maybe CassandraTableProvisionedThroughput)-ctbmProvisionedThroughput = lens _cassandraTableBillingModeProvisionedThroughput (\s a -> s { _cassandraTableBillingModeProvisionedThroughput = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-clusteringkeycolumn.html--module Stratosphere.ResourceProperties.CassandraTableClusteringKeyColumn where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CassandraTableColumn---- | Full data type definition for CassandraTableClusteringKeyColumn. See--- 'cassandraTableClusteringKeyColumn' for a more convenient constructor.-data CassandraTableClusteringKeyColumn =- CassandraTableClusteringKeyColumn- { _cassandraTableClusteringKeyColumnColumn :: CassandraTableColumn- , _cassandraTableClusteringKeyColumnOrderBy :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CassandraTableClusteringKeyColumn where- toJSON CassandraTableClusteringKeyColumn{..} =- object $- catMaybes- [ (Just . ("Column",) . toJSON) _cassandraTableClusteringKeyColumnColumn- , fmap (("OrderBy",) . toJSON) _cassandraTableClusteringKeyColumnOrderBy- ]---- | Constructor for 'CassandraTableClusteringKeyColumn' containing required--- fields as arguments.-cassandraTableClusteringKeyColumn- :: CassandraTableColumn -- ^ 'ctckcColumn'- -> CassandraTableClusteringKeyColumn-cassandraTableClusteringKeyColumn columnarg =- CassandraTableClusteringKeyColumn- { _cassandraTableClusteringKeyColumnColumn = columnarg- , _cassandraTableClusteringKeyColumnOrderBy = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-clusteringkeycolumn.html#cfn-cassandra-table-clusteringkeycolumn-column-ctckcColumn :: Lens' CassandraTableClusteringKeyColumn CassandraTableColumn-ctckcColumn = lens _cassandraTableClusteringKeyColumnColumn (\s a -> s { _cassandraTableClusteringKeyColumnColumn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-clusteringkeycolumn.html#cfn-cassandra-table-clusteringkeycolumn-orderby-ctckcOrderBy :: Lens' CassandraTableClusteringKeyColumn (Maybe (Val Text))-ctckcOrderBy = lens _cassandraTableClusteringKeyColumnOrderBy (\s a -> s { _cassandraTableClusteringKeyColumnOrderBy = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-column.html--module Stratosphere.ResourceProperties.CassandraTableColumn where--import Stratosphere.ResourceImports----- | Full data type definition for CassandraTableColumn. See--- 'cassandraTableColumn' for a more convenient constructor.-data CassandraTableColumn =- CassandraTableColumn- { _cassandraTableColumnColumnName :: Val Text- , _cassandraTableColumnColumnType :: Val Text- } deriving (Show, Eq)--instance ToJSON CassandraTableColumn where- toJSON CassandraTableColumn{..} =- object $- catMaybes- [ (Just . ("ColumnName",) . toJSON) _cassandraTableColumnColumnName- , (Just . ("ColumnType",) . toJSON) _cassandraTableColumnColumnType- ]---- | Constructor for 'CassandraTableColumn' containing required fields as--- arguments.-cassandraTableColumn- :: Val Text -- ^ 'ctcColumnName'- -> Val Text -- ^ 'ctcColumnType'- -> CassandraTableColumn-cassandraTableColumn columnNamearg columnTypearg =- CassandraTableColumn- { _cassandraTableColumnColumnName = columnNamearg- , _cassandraTableColumnColumnType = columnTypearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-column.html#cfn-cassandra-table-column-columnname-ctcColumnName :: Lens' CassandraTableColumn (Val Text)-ctcColumnName = lens _cassandraTableColumnColumnName (\s a -> s { _cassandraTableColumnColumnName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-column.html#cfn-cassandra-table-column-columntype-ctcColumnType :: Lens' CassandraTableColumn (Val Text)-ctcColumnType = lens _cassandraTableColumnColumnType (\s a -> s { _cassandraTableColumnColumnType = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-provisionedthroughput.html--module Stratosphere.ResourceProperties.CassandraTableProvisionedThroughput where--import Stratosphere.ResourceImports----- | Full data type definition for CassandraTableProvisionedThroughput. See--- 'cassandraTableProvisionedThroughput' for a more convenient constructor.-data CassandraTableProvisionedThroughput =- CassandraTableProvisionedThroughput- { _cassandraTableProvisionedThroughputReadCapacityUnits :: Val Integer- , _cassandraTableProvisionedThroughputWriteCapacityUnits :: Val Integer- } deriving (Show, Eq)--instance ToJSON CassandraTableProvisionedThroughput where- toJSON CassandraTableProvisionedThroughput{..} =- object $- catMaybes- [ (Just . ("ReadCapacityUnits",) . toJSON) _cassandraTableProvisionedThroughputReadCapacityUnits- , (Just . ("WriteCapacityUnits",) . toJSON) _cassandraTableProvisionedThroughputWriteCapacityUnits- ]---- | Constructor for 'CassandraTableProvisionedThroughput' containing required--- fields as arguments.-cassandraTableProvisionedThroughput- :: Val Integer -- ^ 'ctptReadCapacityUnits'- -> Val Integer -- ^ 'ctptWriteCapacityUnits'- -> CassandraTableProvisionedThroughput-cassandraTableProvisionedThroughput readCapacityUnitsarg writeCapacityUnitsarg =- CassandraTableProvisionedThroughput- { _cassandraTableProvisionedThroughputReadCapacityUnits = readCapacityUnitsarg- , _cassandraTableProvisionedThroughputWriteCapacityUnits = writeCapacityUnitsarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-provisionedthroughput.html#cfn-cassandra-table-provisionedthroughput-readcapacityunits-ctptReadCapacityUnits :: Lens' CassandraTableProvisionedThroughput (Val Integer)-ctptReadCapacityUnits = lens _cassandraTableProvisionedThroughputReadCapacityUnits (\s a -> s { _cassandraTableProvisionedThroughputReadCapacityUnits = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cassandra-table-provisionedthroughput.html#cfn-cassandra-table-provisionedthroughput-writecapacityunits-ctptWriteCapacityUnits :: Lens' CassandraTableProvisionedThroughput (Val Integer)-ctptWriteCapacityUnits = lens _cassandraTableProvisionedThroughputWriteCapacityUnits (\s a -> s { _cassandraTableProvisionedThroughputWriteCapacityUnits = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-certificatemanager-certificate-domainvalidationoption.html--module Stratosphere.ResourceProperties.CertificateManagerCertificateDomainValidationOption where--import Stratosphere.ResourceImports----- | Full data type definition for--- CertificateManagerCertificateDomainValidationOption. See--- 'certificateManagerCertificateDomainValidationOption' for a more--- convenient constructor.-data CertificateManagerCertificateDomainValidationOption =- CertificateManagerCertificateDomainValidationOption- { _certificateManagerCertificateDomainValidationOptionDomainName :: Val Text- , _certificateManagerCertificateDomainValidationOptionHostedZoneId :: Maybe (Val Text)- , _certificateManagerCertificateDomainValidationOptionValidationDomain :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CertificateManagerCertificateDomainValidationOption where- toJSON CertificateManagerCertificateDomainValidationOption{..} =- object $- catMaybes- [ (Just . ("DomainName",) . toJSON) _certificateManagerCertificateDomainValidationOptionDomainName- , fmap (("HostedZoneId",) . toJSON) _certificateManagerCertificateDomainValidationOptionHostedZoneId- , fmap (("ValidationDomain",) . toJSON) _certificateManagerCertificateDomainValidationOptionValidationDomain- ]---- | Constructor for 'CertificateManagerCertificateDomainValidationOption'--- containing required fields as arguments.-certificateManagerCertificateDomainValidationOption- :: Val Text -- ^ 'cmcdvoDomainName'- -> CertificateManagerCertificateDomainValidationOption-certificateManagerCertificateDomainValidationOption domainNamearg =- CertificateManagerCertificateDomainValidationOption- { _certificateManagerCertificateDomainValidationOptionDomainName = domainNamearg- , _certificateManagerCertificateDomainValidationOptionHostedZoneId = Nothing- , _certificateManagerCertificateDomainValidationOptionValidationDomain = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-certificatemanager-certificate-domainvalidationoption.html#cfn-certificatemanager-certificate-domainvalidationoptions-domainname-cmcdvoDomainName :: Lens' CertificateManagerCertificateDomainValidationOption (Val Text)-cmcdvoDomainName = lens _certificateManagerCertificateDomainValidationOptionDomainName (\s a -> s { _certificateManagerCertificateDomainValidationOptionDomainName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-certificatemanager-certificate-domainvalidationoption.html#cfn-certificatemanager-certificate-domainvalidationoption-hostedzoneid-cmcdvoHostedZoneId :: Lens' CertificateManagerCertificateDomainValidationOption (Maybe (Val Text))-cmcdvoHostedZoneId = lens _certificateManagerCertificateDomainValidationOptionHostedZoneId (\s a -> s { _certificateManagerCertificateDomainValidationOptionHostedZoneId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-certificatemanager-certificate-domainvalidationoption.html#cfn-certificatemanager-certificate-domainvalidationoption-validationdomain-cmcdvoValidationDomain :: Lens' CertificateManagerCertificateDomainValidationOption (Maybe (Val Text))-cmcdvoValidationDomain = lens _certificateManagerCertificateDomainValidationOptionValidationDomain (\s a -> s { _certificateManagerCertificateDomainValidationOptionValidationDomain = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloud9-environmentec2-repository.html--module Stratosphere.ResourceProperties.Cloud9EnvironmentEC2Repository where--import Stratosphere.ResourceImports----- | Full data type definition for Cloud9EnvironmentEC2Repository. See--- 'cloud9EnvironmentEC2Repository' for a more convenient constructor.-data Cloud9EnvironmentEC2Repository =- Cloud9EnvironmentEC2Repository- { _cloud9EnvironmentEC2RepositoryPathComponent :: Val Text- , _cloud9EnvironmentEC2RepositoryRepositoryUrl :: Val Text- } deriving (Show, Eq)--instance ToJSON Cloud9EnvironmentEC2Repository where- toJSON Cloud9EnvironmentEC2Repository{..} =- object $- catMaybes- [ (Just . ("PathComponent",) . toJSON) _cloud9EnvironmentEC2RepositoryPathComponent- , (Just . ("RepositoryUrl",) . toJSON) _cloud9EnvironmentEC2RepositoryRepositoryUrl- ]---- | Constructor for 'Cloud9EnvironmentEC2Repository' containing required--- fields as arguments.-cloud9EnvironmentEC2Repository- :: Val Text -- ^ 'ceecrPathComponent'- -> Val Text -- ^ 'ceecrRepositoryUrl'- -> Cloud9EnvironmentEC2Repository-cloud9EnvironmentEC2Repository pathComponentarg repositoryUrlarg =- Cloud9EnvironmentEC2Repository- { _cloud9EnvironmentEC2RepositoryPathComponent = pathComponentarg- , _cloud9EnvironmentEC2RepositoryRepositoryUrl = repositoryUrlarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloud9-environmentec2-repository.html#cfn-cloud9-environmentec2-repository-pathcomponent-ceecrPathComponent :: Lens' Cloud9EnvironmentEC2Repository (Val Text)-ceecrPathComponent = lens _cloud9EnvironmentEC2RepositoryPathComponent (\s a -> s { _cloud9EnvironmentEC2RepositoryPathComponent = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloud9-environmentec2-repository.html#cfn-cloud9-environmentec2-repository-repositoryurl-ceecrRepositoryUrl :: Lens' Cloud9EnvironmentEC2Repository (Val Text)-ceecrRepositoryUrl = lens _cloud9EnvironmentEC2RepositoryRepositoryUrl (\s a -> s { _cloud9EnvironmentEC2RepositoryRepositoryUrl = a })
@@ -1,76 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html--module Stratosphere.ResourceProperties.CloudFrontCachePolicyCachePolicyConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin---- | Full data type definition for CloudFrontCachePolicyCachePolicyConfig. See--- 'cloudFrontCachePolicyCachePolicyConfig' for a more convenient--- constructor.-data CloudFrontCachePolicyCachePolicyConfig =- CloudFrontCachePolicyCachePolicyConfig- { _cloudFrontCachePolicyCachePolicyConfigComment :: Maybe (Val Text)- , _cloudFrontCachePolicyCachePolicyConfigDefaultTTL :: Maybe (Val Double)- , _cloudFrontCachePolicyCachePolicyConfigMaxTTL :: Maybe (Val Double)- , _cloudFrontCachePolicyCachePolicyConfigMinTTL :: Val Double- , _cloudFrontCachePolicyCachePolicyConfigName :: Val Text- , _cloudFrontCachePolicyCachePolicyConfigParametersInCacheKeyAndForwardedToOrigin :: Maybe CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin- } deriving (Show, Eq)--instance ToJSON CloudFrontCachePolicyCachePolicyConfig where- toJSON CloudFrontCachePolicyCachePolicyConfig{..} =- object $- catMaybes- [ fmap (("Comment",) . toJSON) _cloudFrontCachePolicyCachePolicyConfigComment- , fmap (("DefaultTTL",) . toJSON) _cloudFrontCachePolicyCachePolicyConfigDefaultTTL- , fmap (("MaxTTL",) . toJSON) _cloudFrontCachePolicyCachePolicyConfigMaxTTL- , (Just . ("MinTTL",) . toJSON) _cloudFrontCachePolicyCachePolicyConfigMinTTL- , (Just . ("Name",) . toJSON) _cloudFrontCachePolicyCachePolicyConfigName- , fmap (("ParametersInCacheKeyAndForwardedToOrigin",) . toJSON) _cloudFrontCachePolicyCachePolicyConfigParametersInCacheKeyAndForwardedToOrigin- ]---- | Constructor for 'CloudFrontCachePolicyCachePolicyConfig' containing--- required fields as arguments.-cloudFrontCachePolicyCachePolicyConfig- :: Val Double -- ^ 'cfcpcpcMinTTL'- -> Val Text -- ^ 'cfcpcpcName'- -> CloudFrontCachePolicyCachePolicyConfig-cloudFrontCachePolicyCachePolicyConfig minTTLarg namearg =- CloudFrontCachePolicyCachePolicyConfig- { _cloudFrontCachePolicyCachePolicyConfigComment = Nothing- , _cloudFrontCachePolicyCachePolicyConfigDefaultTTL = Nothing- , _cloudFrontCachePolicyCachePolicyConfigMaxTTL = Nothing- , _cloudFrontCachePolicyCachePolicyConfigMinTTL = minTTLarg- , _cloudFrontCachePolicyCachePolicyConfigName = namearg- , _cloudFrontCachePolicyCachePolicyConfigParametersInCacheKeyAndForwardedToOrigin = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html#cfn-cloudfront-cachepolicy-cachepolicyconfig-comment-cfcpcpcComment :: Lens' CloudFrontCachePolicyCachePolicyConfig (Maybe (Val Text))-cfcpcpcComment = lens _cloudFrontCachePolicyCachePolicyConfigComment (\s a -> s { _cloudFrontCachePolicyCachePolicyConfigComment = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html#cfn-cloudfront-cachepolicy-cachepolicyconfig-defaultttl-cfcpcpcDefaultTTL :: Lens' CloudFrontCachePolicyCachePolicyConfig (Maybe (Val Double))-cfcpcpcDefaultTTL = lens _cloudFrontCachePolicyCachePolicyConfigDefaultTTL (\s a -> s { _cloudFrontCachePolicyCachePolicyConfigDefaultTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html#cfn-cloudfront-cachepolicy-cachepolicyconfig-maxttl-cfcpcpcMaxTTL :: Lens' CloudFrontCachePolicyCachePolicyConfig (Maybe (Val Double))-cfcpcpcMaxTTL = lens _cloudFrontCachePolicyCachePolicyConfigMaxTTL (\s a -> s { _cloudFrontCachePolicyCachePolicyConfigMaxTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html#cfn-cloudfront-cachepolicy-cachepolicyconfig-minttl-cfcpcpcMinTTL :: Lens' CloudFrontCachePolicyCachePolicyConfig (Val Double)-cfcpcpcMinTTL = lens _cloudFrontCachePolicyCachePolicyConfigMinTTL (\s a -> s { _cloudFrontCachePolicyCachePolicyConfigMinTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html#cfn-cloudfront-cachepolicy-cachepolicyconfig-name-cfcpcpcName :: Lens' CloudFrontCachePolicyCachePolicyConfig (Val Text)-cfcpcpcName = lens _cloudFrontCachePolicyCachePolicyConfigName (\s a -> s { _cloudFrontCachePolicyCachePolicyConfigName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cachepolicyconfig.html#cfn-cloudfront-cachepolicy-cachepolicyconfig-parametersincachekeyandforwardedtoorigin-cfcpcpcParametersInCacheKeyAndForwardedToOrigin :: Lens' CloudFrontCachePolicyCachePolicyConfig (Maybe CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin)-cfcpcpcParametersInCacheKeyAndForwardedToOrigin = lens _cloudFrontCachePolicyCachePolicyConfigParametersInCacheKeyAndForwardedToOrigin (\s a -> s { _cloudFrontCachePolicyCachePolicyConfigParametersInCacheKeyAndForwardedToOrigin = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cookiesconfig.html--module Stratosphere.ResourceProperties.CloudFrontCachePolicyCookiesConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontCachePolicyCookiesConfig. See--- 'cloudFrontCachePolicyCookiesConfig' for a more convenient constructor.-data CloudFrontCachePolicyCookiesConfig =- CloudFrontCachePolicyCookiesConfig- { _cloudFrontCachePolicyCookiesConfigCookieBehavior :: Val Text- , _cloudFrontCachePolicyCookiesConfigCookies :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontCachePolicyCookiesConfig where- toJSON CloudFrontCachePolicyCookiesConfig{..} =- object $- catMaybes- [ (Just . ("CookieBehavior",) . toJSON) _cloudFrontCachePolicyCookiesConfigCookieBehavior- , fmap (("Cookies",) . toJSON) _cloudFrontCachePolicyCookiesConfigCookies- ]---- | Constructor for 'CloudFrontCachePolicyCookiesConfig' containing required--- fields as arguments.-cloudFrontCachePolicyCookiesConfig- :: Val Text -- ^ 'cfcpccCookieBehavior'- -> CloudFrontCachePolicyCookiesConfig-cloudFrontCachePolicyCookiesConfig cookieBehaviorarg =- CloudFrontCachePolicyCookiesConfig- { _cloudFrontCachePolicyCookiesConfigCookieBehavior = cookieBehaviorarg- , _cloudFrontCachePolicyCookiesConfigCookies = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cookiesconfig.html#cfn-cloudfront-cachepolicy-cookiesconfig-cookiebehavior-cfcpccCookieBehavior :: Lens' CloudFrontCachePolicyCookiesConfig (Val Text)-cfcpccCookieBehavior = lens _cloudFrontCachePolicyCookiesConfigCookieBehavior (\s a -> s { _cloudFrontCachePolicyCookiesConfigCookieBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-cookiesconfig.html#cfn-cloudfront-cachepolicy-cookiesconfig-cookies-cfcpccCookies :: Lens' CloudFrontCachePolicyCookiesConfig (Maybe (ValList Text))-cfcpccCookies = lens _cloudFrontCachePolicyCookiesConfigCookies (\s a -> s { _cloudFrontCachePolicyCookiesConfigCookies = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-headersconfig.html--module Stratosphere.ResourceProperties.CloudFrontCachePolicyHeadersConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontCachePolicyHeadersConfig. See--- 'cloudFrontCachePolicyHeadersConfig' for a more convenient constructor.-data CloudFrontCachePolicyHeadersConfig =- CloudFrontCachePolicyHeadersConfig- { _cloudFrontCachePolicyHeadersConfigHeaderBehavior :: Val Text- , _cloudFrontCachePolicyHeadersConfigHeaders :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontCachePolicyHeadersConfig where- toJSON CloudFrontCachePolicyHeadersConfig{..} =- object $- catMaybes- [ (Just . ("HeaderBehavior",) . toJSON) _cloudFrontCachePolicyHeadersConfigHeaderBehavior- , fmap (("Headers",) . toJSON) _cloudFrontCachePolicyHeadersConfigHeaders- ]---- | Constructor for 'CloudFrontCachePolicyHeadersConfig' containing required--- fields as arguments.-cloudFrontCachePolicyHeadersConfig- :: Val Text -- ^ 'cfcphcHeaderBehavior'- -> CloudFrontCachePolicyHeadersConfig-cloudFrontCachePolicyHeadersConfig headerBehaviorarg =- CloudFrontCachePolicyHeadersConfig- { _cloudFrontCachePolicyHeadersConfigHeaderBehavior = headerBehaviorarg- , _cloudFrontCachePolicyHeadersConfigHeaders = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-headersconfig.html#cfn-cloudfront-cachepolicy-headersconfig-headerbehavior-cfcphcHeaderBehavior :: Lens' CloudFrontCachePolicyHeadersConfig (Val Text)-cfcphcHeaderBehavior = lens _cloudFrontCachePolicyHeadersConfigHeaderBehavior (\s a -> s { _cloudFrontCachePolicyHeadersConfigHeaderBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-headersconfig.html#cfn-cloudfront-cachepolicy-headersconfig-headers-cfcphcHeaders :: Lens' CloudFrontCachePolicyHeadersConfig (Maybe (ValList Text))-cfcphcHeaders = lens _cloudFrontCachePolicyHeadersConfigHeaders (\s a -> s { _cloudFrontCachePolicyHeadersConfigHeaders = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin.html--module Stratosphere.ResourceProperties.CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontCachePolicyCookiesConfig-import Stratosphere.ResourceProperties.CloudFrontCachePolicyHeadersConfig-import Stratosphere.ResourceProperties.CloudFrontCachePolicyQueryStringsConfig---- | Full data type definition for--- CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin. See--- 'cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin' for a--- more convenient constructor.-data CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin =- CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin- { _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginCookiesConfig :: CloudFrontCachePolicyCookiesConfig- , _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginEnableAcceptEncodingGzip :: Val Bool- , _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginHeadersConfig :: CloudFrontCachePolicyHeadersConfig- , _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginQueryStringsConfig :: CloudFrontCachePolicyQueryStringsConfig- } deriving (Show, Eq)--instance ToJSON CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin where- toJSON CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin{..} =- object $- catMaybes- [ (Just . ("CookiesConfig",) . toJSON) _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginCookiesConfig- , (Just . ("EnableAcceptEncodingGzip",) . toJSON) _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginEnableAcceptEncodingGzip- , (Just . ("HeadersConfig",) . toJSON) _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginHeadersConfig- , (Just . ("QueryStringsConfig",) . toJSON) _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginQueryStringsConfig- ]---- | Constructor for--- 'CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin'--- containing required fields as arguments.-cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin- :: CloudFrontCachePolicyCookiesConfig -- ^ 'cfcppickaftoCookiesConfig'- -> Val Bool -- ^ 'cfcppickaftoEnableAcceptEncodingGzip'- -> CloudFrontCachePolicyHeadersConfig -- ^ 'cfcppickaftoHeadersConfig'- -> CloudFrontCachePolicyQueryStringsConfig -- ^ 'cfcppickaftoQueryStringsConfig'- -> CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin-cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin cookiesConfigarg enableAcceptEncodingGziparg headersConfigarg queryStringsConfigarg =- CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin- { _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginCookiesConfig = cookiesConfigarg- , _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginEnableAcceptEncodingGzip = enableAcceptEncodingGziparg- , _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginHeadersConfig = headersConfigarg- , _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginQueryStringsConfig = queryStringsConfigarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin.html#cfn-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin-cookiesconfig-cfcppickaftoCookiesConfig :: Lens' CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin CloudFrontCachePolicyCookiesConfig-cfcppickaftoCookiesConfig = lens _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginCookiesConfig (\s a -> s { _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginCookiesConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin.html#cfn-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin-enableacceptencodinggzip-cfcppickaftoEnableAcceptEncodingGzip :: Lens' CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin (Val Bool)-cfcppickaftoEnableAcceptEncodingGzip = lens _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginEnableAcceptEncodingGzip (\s a -> s { _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginEnableAcceptEncodingGzip = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin.html#cfn-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin-headersconfig-cfcppickaftoHeadersConfig :: Lens' CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin CloudFrontCachePolicyHeadersConfig-cfcppickaftoHeadersConfig = lens _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginHeadersConfig (\s a -> s { _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginHeadersConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin.html#cfn-cloudfront-cachepolicy-parametersincachekeyandforwardedtoorigin-querystringsconfig-cfcppickaftoQueryStringsConfig :: Lens' CloudFrontCachePolicyParametersInCacheKeyAndForwardedToOrigin CloudFrontCachePolicyQueryStringsConfig-cfcppickaftoQueryStringsConfig = lens _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginQueryStringsConfig (\s a -> s { _cloudFrontCachePolicyParametersInCacheKeyAndForwardedToOriginQueryStringsConfig = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-querystringsconfig.html--module Stratosphere.ResourceProperties.CloudFrontCachePolicyQueryStringsConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontCachePolicyQueryStringsConfig.--- See 'cloudFrontCachePolicyQueryStringsConfig' for a more convenient--- constructor.-data CloudFrontCachePolicyQueryStringsConfig =- CloudFrontCachePolicyQueryStringsConfig- { _cloudFrontCachePolicyQueryStringsConfigQueryStringBehavior :: Val Text- , _cloudFrontCachePolicyQueryStringsConfigQueryStrings :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontCachePolicyQueryStringsConfig where- toJSON CloudFrontCachePolicyQueryStringsConfig{..} =- object $- catMaybes- [ (Just . ("QueryStringBehavior",) . toJSON) _cloudFrontCachePolicyQueryStringsConfigQueryStringBehavior- , fmap (("QueryStrings",) . toJSON) _cloudFrontCachePolicyQueryStringsConfigQueryStrings- ]---- | Constructor for 'CloudFrontCachePolicyQueryStringsConfig' containing--- required fields as arguments.-cloudFrontCachePolicyQueryStringsConfig- :: Val Text -- ^ 'cfcpqscQueryStringBehavior'- -> CloudFrontCachePolicyQueryStringsConfig-cloudFrontCachePolicyQueryStringsConfig queryStringBehaviorarg =- CloudFrontCachePolicyQueryStringsConfig- { _cloudFrontCachePolicyQueryStringsConfigQueryStringBehavior = queryStringBehaviorarg- , _cloudFrontCachePolicyQueryStringsConfigQueryStrings = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-querystringsconfig.html#cfn-cloudfront-cachepolicy-querystringsconfig-querystringbehavior-cfcpqscQueryStringBehavior :: Lens' CloudFrontCachePolicyQueryStringsConfig (Val Text)-cfcpqscQueryStringBehavior = lens _cloudFrontCachePolicyQueryStringsConfigQueryStringBehavior (\s a -> s { _cloudFrontCachePolicyQueryStringsConfigQueryStringBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cachepolicy-querystringsconfig.html#cfn-cloudfront-cachepolicy-querystringsconfig-querystrings-cfcpqscQueryStrings :: Lens' CloudFrontCachePolicyQueryStringsConfig (Maybe (ValList Text))-cfcpqscQueryStrings = lens _cloudFrontCachePolicyQueryStringsConfigQueryStrings (\s a -> s { _cloudFrontCachePolicyQueryStringsConfigQueryStrings = a })
@@ -1,43 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cloudfrontoriginaccessidentity-cloudfrontoriginaccessidentityconfig.html--module Stratosphere.ResourceProperties.CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig where--import Stratosphere.ResourceImports----- | Full data type definition for--- CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig.--- See--- 'cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig'--- for a more convenient constructor.-data CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig =- CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig- { _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfigComment :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig where- toJSON CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig{..} =- object $- catMaybes- [ (Just . ("Comment",) . toJSON) _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfigComment- ]---- | Constructor for--- 'CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig'--- containing required fields as arguments.-cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig- :: Val Text -- ^ 'cfcfoaicfoaicComment'- -> CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig-cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig commentarg =- CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig- { _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfigComment = commentarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-cloudfrontoriginaccessidentity-cloudfrontoriginaccessidentityconfig.html#cfn-cloudfront-cloudfrontoriginaccessidentity-cloudfrontoriginaccessidentityconfig-comment-cfcfoaicfoaicComment :: Lens' CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig (Val Text)-cfcfoaicfoaicComment = lens _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfigComment (\s a -> s { _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfigComment = a })
@@ -1,154 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html--module Stratosphere.ResourceProperties.CloudFrontDistributionCacheBehavior where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionForwardedValues-import Stratosphere.ResourceProperties.CloudFrontDistributionLambdaFunctionAssociation---- | Full data type definition for CloudFrontDistributionCacheBehavior. See--- 'cloudFrontDistributionCacheBehavior' for a more convenient constructor.-data CloudFrontDistributionCacheBehavior =- CloudFrontDistributionCacheBehavior- { _cloudFrontDistributionCacheBehaviorAllowedMethods :: Maybe (ValList Text)- , _cloudFrontDistributionCacheBehaviorCachePolicyId :: Maybe (Val Text)- , _cloudFrontDistributionCacheBehaviorCachedMethods :: Maybe (ValList Text)- , _cloudFrontDistributionCacheBehaviorCompress :: Maybe (Val Bool)- , _cloudFrontDistributionCacheBehaviorDefaultTTL :: Maybe (Val Double)- , _cloudFrontDistributionCacheBehaviorFieldLevelEncryptionId :: Maybe (Val Text)- , _cloudFrontDistributionCacheBehaviorForwardedValues :: Maybe CloudFrontDistributionForwardedValues- , _cloudFrontDistributionCacheBehaviorLambdaFunctionAssociations :: Maybe [CloudFrontDistributionLambdaFunctionAssociation]- , _cloudFrontDistributionCacheBehaviorMaxTTL :: Maybe (Val Double)- , _cloudFrontDistributionCacheBehaviorMinTTL :: Maybe (Val Double)- , _cloudFrontDistributionCacheBehaviorOriginRequestPolicyId :: Maybe (Val Text)- , _cloudFrontDistributionCacheBehaviorPathPattern :: Val Text- , _cloudFrontDistributionCacheBehaviorRealtimeLogConfigArn :: Maybe (Val Text)- , _cloudFrontDistributionCacheBehaviorSmoothStreaming :: Maybe (Val Bool)- , _cloudFrontDistributionCacheBehaviorTargetOriginId :: Val Text- , _cloudFrontDistributionCacheBehaviorTrustedSigners :: Maybe (ValList Text)- , _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionCacheBehavior where- toJSON CloudFrontDistributionCacheBehavior{..} =- object $- catMaybes- [ fmap (("AllowedMethods",) . toJSON) _cloudFrontDistributionCacheBehaviorAllowedMethods- , fmap (("CachePolicyId",) . toJSON) _cloudFrontDistributionCacheBehaviorCachePolicyId- , fmap (("CachedMethods",) . toJSON) _cloudFrontDistributionCacheBehaviorCachedMethods- , fmap (("Compress",) . toJSON) _cloudFrontDistributionCacheBehaviorCompress- , fmap (("DefaultTTL",) . toJSON) _cloudFrontDistributionCacheBehaviorDefaultTTL- , fmap (("FieldLevelEncryptionId",) . toJSON) _cloudFrontDistributionCacheBehaviorFieldLevelEncryptionId- , fmap (("ForwardedValues",) . toJSON) _cloudFrontDistributionCacheBehaviorForwardedValues- , fmap (("LambdaFunctionAssociations",) . toJSON) _cloudFrontDistributionCacheBehaviorLambdaFunctionAssociations- , fmap (("MaxTTL",) . toJSON) _cloudFrontDistributionCacheBehaviorMaxTTL- , fmap (("MinTTL",) . toJSON) _cloudFrontDistributionCacheBehaviorMinTTL- , fmap (("OriginRequestPolicyId",) . toJSON) _cloudFrontDistributionCacheBehaviorOriginRequestPolicyId- , (Just . ("PathPattern",) . toJSON) _cloudFrontDistributionCacheBehaviorPathPattern- , fmap (("RealtimeLogConfigArn",) . toJSON) _cloudFrontDistributionCacheBehaviorRealtimeLogConfigArn- , fmap (("SmoothStreaming",) . toJSON) _cloudFrontDistributionCacheBehaviorSmoothStreaming- , (Just . ("TargetOriginId",) . toJSON) _cloudFrontDistributionCacheBehaviorTargetOriginId- , fmap (("TrustedSigners",) . toJSON) _cloudFrontDistributionCacheBehaviorTrustedSigners- , (Just . ("ViewerProtocolPolicy",) . toJSON) _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy- ]---- | Constructor for 'CloudFrontDistributionCacheBehavior' containing required--- fields as arguments.-cloudFrontDistributionCacheBehavior- :: Val Text -- ^ 'cfdcbPathPattern'- -> Val Text -- ^ 'cfdcbTargetOriginId'- -> Val Text -- ^ 'cfdcbViewerProtocolPolicy'- -> CloudFrontDistributionCacheBehavior-cloudFrontDistributionCacheBehavior pathPatternarg targetOriginIdarg viewerProtocolPolicyarg =- CloudFrontDistributionCacheBehavior- { _cloudFrontDistributionCacheBehaviorAllowedMethods = Nothing- , _cloudFrontDistributionCacheBehaviorCachePolicyId = Nothing- , _cloudFrontDistributionCacheBehaviorCachedMethods = Nothing- , _cloudFrontDistributionCacheBehaviorCompress = Nothing- , _cloudFrontDistributionCacheBehaviorDefaultTTL = Nothing- , _cloudFrontDistributionCacheBehaviorFieldLevelEncryptionId = Nothing- , _cloudFrontDistributionCacheBehaviorForwardedValues = Nothing- , _cloudFrontDistributionCacheBehaviorLambdaFunctionAssociations = Nothing- , _cloudFrontDistributionCacheBehaviorMaxTTL = Nothing- , _cloudFrontDistributionCacheBehaviorMinTTL = Nothing- , _cloudFrontDistributionCacheBehaviorOriginRequestPolicyId = Nothing- , _cloudFrontDistributionCacheBehaviorPathPattern = pathPatternarg- , _cloudFrontDistributionCacheBehaviorRealtimeLogConfigArn = Nothing- , _cloudFrontDistributionCacheBehaviorSmoothStreaming = Nothing- , _cloudFrontDistributionCacheBehaviorTargetOriginId = targetOriginIdarg- , _cloudFrontDistributionCacheBehaviorTrustedSigners = Nothing- , _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy = viewerProtocolPolicyarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-allowedmethods-cfdcbAllowedMethods :: Lens' CloudFrontDistributionCacheBehavior (Maybe (ValList Text))-cfdcbAllowedMethods = lens _cloudFrontDistributionCacheBehaviorAllowedMethods (\s a -> s { _cloudFrontDistributionCacheBehaviorAllowedMethods = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-cachepolicyid-cfdcbCachePolicyId :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Text))-cfdcbCachePolicyId = lens _cloudFrontDistributionCacheBehaviorCachePolicyId (\s a -> s { _cloudFrontDistributionCacheBehaviorCachePolicyId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-cachedmethods-cfdcbCachedMethods :: Lens' CloudFrontDistributionCacheBehavior (Maybe (ValList Text))-cfdcbCachedMethods = lens _cloudFrontDistributionCacheBehaviorCachedMethods (\s a -> s { _cloudFrontDistributionCacheBehaviorCachedMethods = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-compress-cfdcbCompress :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Bool))-cfdcbCompress = lens _cloudFrontDistributionCacheBehaviorCompress (\s a -> s { _cloudFrontDistributionCacheBehaviorCompress = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-defaultttl-cfdcbDefaultTTL :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Double))-cfdcbDefaultTTL = lens _cloudFrontDistributionCacheBehaviorDefaultTTL (\s a -> s { _cloudFrontDistributionCacheBehaviorDefaultTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-fieldlevelencryptionid-cfdcbFieldLevelEncryptionId :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Text))-cfdcbFieldLevelEncryptionId = lens _cloudFrontDistributionCacheBehaviorFieldLevelEncryptionId (\s a -> s { _cloudFrontDistributionCacheBehaviorFieldLevelEncryptionId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-forwardedvalues-cfdcbForwardedValues :: Lens' CloudFrontDistributionCacheBehavior (Maybe CloudFrontDistributionForwardedValues)-cfdcbForwardedValues = lens _cloudFrontDistributionCacheBehaviorForwardedValues (\s a -> s { _cloudFrontDistributionCacheBehaviorForwardedValues = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-lambdafunctionassociations-cfdcbLambdaFunctionAssociations :: Lens' CloudFrontDistributionCacheBehavior (Maybe [CloudFrontDistributionLambdaFunctionAssociation])-cfdcbLambdaFunctionAssociations = lens _cloudFrontDistributionCacheBehaviorLambdaFunctionAssociations (\s a -> s { _cloudFrontDistributionCacheBehaviorLambdaFunctionAssociations = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-maxttl-cfdcbMaxTTL :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Double))-cfdcbMaxTTL = lens _cloudFrontDistributionCacheBehaviorMaxTTL (\s a -> s { _cloudFrontDistributionCacheBehaviorMaxTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-minttl-cfdcbMinTTL :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Double))-cfdcbMinTTL = lens _cloudFrontDistributionCacheBehaviorMinTTL (\s a -> s { _cloudFrontDistributionCacheBehaviorMinTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-originrequestpolicyid-cfdcbOriginRequestPolicyId :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Text))-cfdcbOriginRequestPolicyId = lens _cloudFrontDistributionCacheBehaviorOriginRequestPolicyId (\s a -> s { _cloudFrontDistributionCacheBehaviorOriginRequestPolicyId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-pathpattern-cfdcbPathPattern :: Lens' CloudFrontDistributionCacheBehavior (Val Text)-cfdcbPathPattern = lens _cloudFrontDistributionCacheBehaviorPathPattern (\s a -> s { _cloudFrontDistributionCacheBehaviorPathPattern = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-realtimelogconfigarn-cfdcbRealtimeLogConfigArn :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Text))-cfdcbRealtimeLogConfigArn = lens _cloudFrontDistributionCacheBehaviorRealtimeLogConfigArn (\s a -> s { _cloudFrontDistributionCacheBehaviorRealtimeLogConfigArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-smoothstreaming-cfdcbSmoothStreaming :: Lens' CloudFrontDistributionCacheBehavior (Maybe (Val Bool))-cfdcbSmoothStreaming = lens _cloudFrontDistributionCacheBehaviorSmoothStreaming (\s a -> s { _cloudFrontDistributionCacheBehaviorSmoothStreaming = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-targetoriginid-cfdcbTargetOriginId :: Lens' CloudFrontDistributionCacheBehavior (Val Text)-cfdcbTargetOriginId = lens _cloudFrontDistributionCacheBehaviorTargetOriginId (\s a -> s { _cloudFrontDistributionCacheBehaviorTargetOriginId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-trustedsigners-cfdcbTrustedSigners :: Lens' CloudFrontDistributionCacheBehavior (Maybe (ValList Text))-cfdcbTrustedSigners = lens _cloudFrontDistributionCacheBehaviorTrustedSigners (\s a -> s { _cloudFrontDistributionCacheBehaviorTrustedSigners = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cachebehavior.html#cfn-cloudfront-distribution-cachebehavior-viewerprotocolpolicy-cfdcbViewerProtocolPolicy :: Lens' CloudFrontDistributionCacheBehavior (Val Text)-cfdcbViewerProtocolPolicy = lens _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy (\s a -> s { _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cookies.html--module Stratosphere.ResourceProperties.CloudFrontDistributionCookies where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionCookies. See--- 'cloudFrontDistributionCookies' for a more convenient constructor.-data CloudFrontDistributionCookies =- CloudFrontDistributionCookies- { _cloudFrontDistributionCookiesForward :: Val Text- , _cloudFrontDistributionCookiesWhitelistedNames :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionCookies where- toJSON CloudFrontDistributionCookies{..} =- object $- catMaybes- [ (Just . ("Forward",) . toJSON) _cloudFrontDistributionCookiesForward- , fmap (("WhitelistedNames",) . toJSON) _cloudFrontDistributionCookiesWhitelistedNames- ]---- | Constructor for 'CloudFrontDistributionCookies' containing required--- fields as arguments.-cloudFrontDistributionCookies- :: Val Text -- ^ 'cfdcForward'- -> CloudFrontDistributionCookies-cloudFrontDistributionCookies forwardarg =- CloudFrontDistributionCookies- { _cloudFrontDistributionCookiesForward = forwardarg- , _cloudFrontDistributionCookiesWhitelistedNames = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cookies.html#cfn-cloudfront-distribution-cookies-forward-cfdcForward :: Lens' CloudFrontDistributionCookies (Val Text)-cfdcForward = lens _cloudFrontDistributionCookiesForward (\s a -> s { _cloudFrontDistributionCookiesForward = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-cookies.html#cfn-cloudfront-distribution-cookies-whitelistednames-cfdcWhitelistedNames :: Lens' CloudFrontDistributionCookies (Maybe (ValList Text))-cfdcWhitelistedNames = lens _cloudFrontDistributionCookiesWhitelistedNames (\s a -> s { _cloudFrontDistributionCookiesWhitelistedNames = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customerrorresponse.html--module Stratosphere.ResourceProperties.CloudFrontDistributionCustomErrorResponse where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionCustomErrorResponse.--- See 'cloudFrontDistributionCustomErrorResponse' for a more convenient--- constructor.-data CloudFrontDistributionCustomErrorResponse =- CloudFrontDistributionCustomErrorResponse- { _cloudFrontDistributionCustomErrorResponseErrorCachingMinTTL :: Maybe (Val Double)- , _cloudFrontDistributionCustomErrorResponseErrorCode :: Val Integer- , _cloudFrontDistributionCustomErrorResponseResponseCode :: Maybe (Val Integer)- , _cloudFrontDistributionCustomErrorResponseResponsePagePath :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionCustomErrorResponse where- toJSON CloudFrontDistributionCustomErrorResponse{..} =- object $- catMaybes- [ fmap (("ErrorCachingMinTTL",) . toJSON) _cloudFrontDistributionCustomErrorResponseErrorCachingMinTTL- , (Just . ("ErrorCode",) . toJSON) _cloudFrontDistributionCustomErrorResponseErrorCode- , fmap (("ResponseCode",) . toJSON) _cloudFrontDistributionCustomErrorResponseResponseCode- , fmap (("ResponsePagePath",) . toJSON) _cloudFrontDistributionCustomErrorResponseResponsePagePath- ]---- | Constructor for 'CloudFrontDistributionCustomErrorResponse' containing--- required fields as arguments.-cloudFrontDistributionCustomErrorResponse- :: Val Integer -- ^ 'cfdcerErrorCode'- -> CloudFrontDistributionCustomErrorResponse-cloudFrontDistributionCustomErrorResponse errorCodearg =- CloudFrontDistributionCustomErrorResponse- { _cloudFrontDistributionCustomErrorResponseErrorCachingMinTTL = Nothing- , _cloudFrontDistributionCustomErrorResponseErrorCode = errorCodearg- , _cloudFrontDistributionCustomErrorResponseResponseCode = Nothing- , _cloudFrontDistributionCustomErrorResponseResponsePagePath = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customerrorresponse.html#cfn-cloudfront-distribution-customerrorresponse-errorcachingminttl-cfdcerErrorCachingMinTTL :: Lens' CloudFrontDistributionCustomErrorResponse (Maybe (Val Double))-cfdcerErrorCachingMinTTL = lens _cloudFrontDistributionCustomErrorResponseErrorCachingMinTTL (\s a -> s { _cloudFrontDistributionCustomErrorResponseErrorCachingMinTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customerrorresponse.html#cfn-cloudfront-distribution-customerrorresponse-errorcode-cfdcerErrorCode :: Lens' CloudFrontDistributionCustomErrorResponse (Val Integer)-cfdcerErrorCode = lens _cloudFrontDistributionCustomErrorResponseErrorCode (\s a -> s { _cloudFrontDistributionCustomErrorResponseErrorCode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customerrorresponse.html#cfn-cloudfront-distribution-customerrorresponse-responsecode-cfdcerResponseCode :: Lens' CloudFrontDistributionCustomErrorResponse (Maybe (Val Integer))-cfdcerResponseCode = lens _cloudFrontDistributionCustomErrorResponseResponseCode (\s a -> s { _cloudFrontDistributionCustomErrorResponseResponseCode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customerrorresponse.html#cfn-cloudfront-distribution-customerrorresponse-responsepagepath-cfdcerResponsePagePath :: Lens' CloudFrontDistributionCustomErrorResponse (Maybe (Val Text))-cfdcerResponsePagePath = lens _cloudFrontDistributionCustomErrorResponseResponsePagePath (\s a -> s { _cloudFrontDistributionCustomErrorResponseResponsePagePath = a })
@@ -1,75 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html--module Stratosphere.ResourceProperties.CloudFrontDistributionCustomOriginConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionCustomOriginConfig.--- See 'cloudFrontDistributionCustomOriginConfig' for a more convenient--- constructor.-data CloudFrontDistributionCustomOriginConfig =- CloudFrontDistributionCustomOriginConfig- { _cloudFrontDistributionCustomOriginConfigHTTPPort :: Maybe (Val Integer)- , _cloudFrontDistributionCustomOriginConfigHTTPSPort :: Maybe (Val Integer)- , _cloudFrontDistributionCustomOriginConfigOriginKeepaliveTimeout :: Maybe (Val Integer)- , _cloudFrontDistributionCustomOriginConfigOriginProtocolPolicy :: Val Text- , _cloudFrontDistributionCustomOriginConfigOriginReadTimeout :: Maybe (Val Integer)- , _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionCustomOriginConfig where- toJSON CloudFrontDistributionCustomOriginConfig{..} =- object $- catMaybes- [ fmap (("HTTPPort",) . toJSON) _cloudFrontDistributionCustomOriginConfigHTTPPort- , fmap (("HTTPSPort",) . toJSON) _cloudFrontDistributionCustomOriginConfigHTTPSPort- , fmap (("OriginKeepaliveTimeout",) . toJSON) _cloudFrontDistributionCustomOriginConfigOriginKeepaliveTimeout- , (Just . ("OriginProtocolPolicy",) . toJSON) _cloudFrontDistributionCustomOriginConfigOriginProtocolPolicy- , fmap (("OriginReadTimeout",) . toJSON) _cloudFrontDistributionCustomOriginConfigOriginReadTimeout- , fmap (("OriginSSLProtocols",) . toJSON) _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols- ]---- | Constructor for 'CloudFrontDistributionCustomOriginConfig' containing--- required fields as arguments.-cloudFrontDistributionCustomOriginConfig- :: Val Text -- ^ 'cfdcocOriginProtocolPolicy'- -> CloudFrontDistributionCustomOriginConfig-cloudFrontDistributionCustomOriginConfig originProtocolPolicyarg =- CloudFrontDistributionCustomOriginConfig- { _cloudFrontDistributionCustomOriginConfigHTTPPort = Nothing- , _cloudFrontDistributionCustomOriginConfigHTTPSPort = Nothing- , _cloudFrontDistributionCustomOriginConfigOriginKeepaliveTimeout = Nothing- , _cloudFrontDistributionCustomOriginConfigOriginProtocolPolicy = originProtocolPolicyarg- , _cloudFrontDistributionCustomOriginConfigOriginReadTimeout = Nothing- , _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html#cfn-cloudfront-distribution-customoriginconfig-httpport-cfdcocHTTPPort :: Lens' CloudFrontDistributionCustomOriginConfig (Maybe (Val Integer))-cfdcocHTTPPort = lens _cloudFrontDistributionCustomOriginConfigHTTPPort (\s a -> s { _cloudFrontDistributionCustomOriginConfigHTTPPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html#cfn-cloudfront-distribution-customoriginconfig-httpsport-cfdcocHTTPSPort :: Lens' CloudFrontDistributionCustomOriginConfig (Maybe (Val Integer))-cfdcocHTTPSPort = lens _cloudFrontDistributionCustomOriginConfigHTTPSPort (\s a -> s { _cloudFrontDistributionCustomOriginConfigHTTPSPort = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html#cfn-cloudfront-distribution-customoriginconfig-originkeepalivetimeout-cfdcocOriginKeepaliveTimeout :: Lens' CloudFrontDistributionCustomOriginConfig (Maybe (Val Integer))-cfdcocOriginKeepaliveTimeout = lens _cloudFrontDistributionCustomOriginConfigOriginKeepaliveTimeout (\s a -> s { _cloudFrontDistributionCustomOriginConfigOriginKeepaliveTimeout = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html#cfn-cloudfront-distribution-customoriginconfig-originprotocolpolicy-cfdcocOriginProtocolPolicy :: Lens' CloudFrontDistributionCustomOriginConfig (Val Text)-cfdcocOriginProtocolPolicy = lens _cloudFrontDistributionCustomOriginConfigOriginProtocolPolicy (\s a -> s { _cloudFrontDistributionCustomOriginConfigOriginProtocolPolicy = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html#cfn-cloudfront-distribution-customoriginconfig-originreadtimeout-cfdcocOriginReadTimeout :: Lens' CloudFrontDistributionCustomOriginConfig (Maybe (Val Integer))-cfdcocOriginReadTimeout = lens _cloudFrontDistributionCustomOriginConfigOriginReadTimeout (\s a -> s { _cloudFrontDistributionCustomOriginConfigOriginReadTimeout = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-customoriginconfig.html#cfn-cloudfront-distribution-customoriginconfig-originsslprotocols-cfdcocOriginSSLProtocols :: Lens' CloudFrontDistributionCustomOriginConfig (Maybe (ValList Text))-cfdcocOriginSSLProtocols = lens _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols (\s a -> s { _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols = a })
@@ -1,147 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html--module Stratosphere.ResourceProperties.CloudFrontDistributionDefaultCacheBehavior where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionForwardedValues-import Stratosphere.ResourceProperties.CloudFrontDistributionLambdaFunctionAssociation---- | Full data type definition for CloudFrontDistributionDefaultCacheBehavior.--- See 'cloudFrontDistributionDefaultCacheBehavior' for a more convenient--- constructor.-data CloudFrontDistributionDefaultCacheBehavior =- CloudFrontDistributionDefaultCacheBehavior- { _cloudFrontDistributionDefaultCacheBehaviorAllowedMethods :: Maybe (ValList Text)- , _cloudFrontDistributionDefaultCacheBehaviorCachePolicyId :: Maybe (Val Text)- , _cloudFrontDistributionDefaultCacheBehaviorCachedMethods :: Maybe (ValList Text)- , _cloudFrontDistributionDefaultCacheBehaviorCompress :: Maybe (Val Bool)- , _cloudFrontDistributionDefaultCacheBehaviorDefaultTTL :: Maybe (Val Double)- , _cloudFrontDistributionDefaultCacheBehaviorFieldLevelEncryptionId :: Maybe (Val Text)- , _cloudFrontDistributionDefaultCacheBehaviorForwardedValues :: Maybe CloudFrontDistributionForwardedValues- , _cloudFrontDistributionDefaultCacheBehaviorLambdaFunctionAssociations :: Maybe [CloudFrontDistributionLambdaFunctionAssociation]- , _cloudFrontDistributionDefaultCacheBehaviorMaxTTL :: Maybe (Val Double)- , _cloudFrontDistributionDefaultCacheBehaviorMinTTL :: Maybe (Val Double)- , _cloudFrontDistributionDefaultCacheBehaviorOriginRequestPolicyId :: Maybe (Val Text)- , _cloudFrontDistributionDefaultCacheBehaviorRealtimeLogConfigArn :: Maybe (Val Text)- , _cloudFrontDistributionDefaultCacheBehaviorSmoothStreaming :: Maybe (Val Bool)- , _cloudFrontDistributionDefaultCacheBehaviorTargetOriginId :: Val Text- , _cloudFrontDistributionDefaultCacheBehaviorTrustedSigners :: Maybe (ValList Text)- , _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionDefaultCacheBehavior where- toJSON CloudFrontDistributionDefaultCacheBehavior{..} =- object $- catMaybes- [ fmap (("AllowedMethods",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorAllowedMethods- , fmap (("CachePolicyId",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorCachePolicyId- , fmap (("CachedMethods",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorCachedMethods- , fmap (("Compress",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorCompress- , fmap (("DefaultTTL",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorDefaultTTL- , fmap (("FieldLevelEncryptionId",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorFieldLevelEncryptionId- , fmap (("ForwardedValues",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorForwardedValues- , fmap (("LambdaFunctionAssociations",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorLambdaFunctionAssociations- , fmap (("MaxTTL",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorMaxTTL- , fmap (("MinTTL",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorMinTTL- , fmap (("OriginRequestPolicyId",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorOriginRequestPolicyId- , fmap (("RealtimeLogConfigArn",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorRealtimeLogConfigArn- , fmap (("SmoothStreaming",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorSmoothStreaming- , (Just . ("TargetOriginId",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorTargetOriginId- , fmap (("TrustedSigners",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorTrustedSigners- , (Just . ("ViewerProtocolPolicy",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy- ]---- | Constructor for 'CloudFrontDistributionDefaultCacheBehavior' containing--- required fields as arguments.-cloudFrontDistributionDefaultCacheBehavior- :: Val Text -- ^ 'cfddcbTargetOriginId'- -> Val Text -- ^ 'cfddcbViewerProtocolPolicy'- -> CloudFrontDistributionDefaultCacheBehavior-cloudFrontDistributionDefaultCacheBehavior targetOriginIdarg viewerProtocolPolicyarg =- CloudFrontDistributionDefaultCacheBehavior- { _cloudFrontDistributionDefaultCacheBehaviorAllowedMethods = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorCachePolicyId = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorCachedMethods = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorCompress = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorDefaultTTL = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorFieldLevelEncryptionId = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorForwardedValues = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorLambdaFunctionAssociations = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorMaxTTL = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorMinTTL = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorOriginRequestPolicyId = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorRealtimeLogConfigArn = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorSmoothStreaming = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorTargetOriginId = targetOriginIdarg- , _cloudFrontDistributionDefaultCacheBehaviorTrustedSigners = Nothing- , _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy = viewerProtocolPolicyarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-allowedmethods-cfddcbAllowedMethods :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (ValList Text))-cfddcbAllowedMethods = lens _cloudFrontDistributionDefaultCacheBehaviorAllowedMethods (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorAllowedMethods = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-cachepolicyid-cfddcbCachePolicyId :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Text))-cfddcbCachePolicyId = lens _cloudFrontDistributionDefaultCacheBehaviorCachePolicyId (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorCachePolicyId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-cachedmethods-cfddcbCachedMethods :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (ValList Text))-cfddcbCachedMethods = lens _cloudFrontDistributionDefaultCacheBehaviorCachedMethods (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorCachedMethods = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-compress-cfddcbCompress :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Bool))-cfddcbCompress = lens _cloudFrontDistributionDefaultCacheBehaviorCompress (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorCompress = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-defaultttl-cfddcbDefaultTTL :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Double))-cfddcbDefaultTTL = lens _cloudFrontDistributionDefaultCacheBehaviorDefaultTTL (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorDefaultTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-fieldlevelencryptionid-cfddcbFieldLevelEncryptionId :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Text))-cfddcbFieldLevelEncryptionId = lens _cloudFrontDistributionDefaultCacheBehaviorFieldLevelEncryptionId (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorFieldLevelEncryptionId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-forwardedvalues-cfddcbForwardedValues :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe CloudFrontDistributionForwardedValues)-cfddcbForwardedValues = lens _cloudFrontDistributionDefaultCacheBehaviorForwardedValues (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorForwardedValues = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-lambdafunctionassociations-cfddcbLambdaFunctionAssociations :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe [CloudFrontDistributionLambdaFunctionAssociation])-cfddcbLambdaFunctionAssociations = lens _cloudFrontDistributionDefaultCacheBehaviorLambdaFunctionAssociations (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorLambdaFunctionAssociations = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-maxttl-cfddcbMaxTTL :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Double))-cfddcbMaxTTL = lens _cloudFrontDistributionDefaultCacheBehaviorMaxTTL (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorMaxTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-minttl-cfddcbMinTTL :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Double))-cfddcbMinTTL = lens _cloudFrontDistributionDefaultCacheBehaviorMinTTL (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorMinTTL = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-originrequestpolicyid-cfddcbOriginRequestPolicyId :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Text))-cfddcbOriginRequestPolicyId = lens _cloudFrontDistributionDefaultCacheBehaviorOriginRequestPolicyId (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorOriginRequestPolicyId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-realtimelogconfigarn-cfddcbRealtimeLogConfigArn :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Text))-cfddcbRealtimeLogConfigArn = lens _cloudFrontDistributionDefaultCacheBehaviorRealtimeLogConfigArn (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorRealtimeLogConfigArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-smoothstreaming-cfddcbSmoothStreaming :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (Val Bool))-cfddcbSmoothStreaming = lens _cloudFrontDistributionDefaultCacheBehaviorSmoothStreaming (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorSmoothStreaming = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-targetoriginid-cfddcbTargetOriginId :: Lens' CloudFrontDistributionDefaultCacheBehavior (Val Text)-cfddcbTargetOriginId = lens _cloudFrontDistributionDefaultCacheBehaviorTargetOriginId (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorTargetOriginId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-trustedsigners-cfddcbTrustedSigners :: Lens' CloudFrontDistributionDefaultCacheBehavior (Maybe (ValList Text))-cfddcbTrustedSigners = lens _cloudFrontDistributionDefaultCacheBehaviorTrustedSigners (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorTrustedSigners = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-defaultcachebehavior.html#cfn-cloudfront-distribution-defaultcachebehavior-viewerprotocolpolicy-cfddcbViewerProtocolPolicy :: Lens' CloudFrontDistributionDefaultCacheBehavior (Val Text)-cfddcbViewerProtocolPolicy = lens _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy (\s a -> s { _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy = a })
@@ -1,152 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html--module Stratosphere.ResourceProperties.CloudFrontDistributionDistributionConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionCacheBehavior-import Stratosphere.ResourceProperties.CloudFrontDistributionCustomErrorResponse-import Stratosphere.ResourceProperties.CloudFrontDistributionDefaultCacheBehavior-import Stratosphere.ResourceProperties.CloudFrontDistributionLogging-import Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroups-import Stratosphere.ResourceProperties.CloudFrontDistributionOrigin-import Stratosphere.ResourceProperties.CloudFrontDistributionRestrictions-import Stratosphere.ResourceProperties.CloudFrontDistributionViewerCertificate---- | Full data type definition for CloudFrontDistributionDistributionConfig.--- See 'cloudFrontDistributionDistributionConfig' for a more convenient--- constructor.-data CloudFrontDistributionDistributionConfig =- CloudFrontDistributionDistributionConfig- { _cloudFrontDistributionDistributionConfigAliases :: Maybe (ValList Text)- , _cloudFrontDistributionDistributionConfigCacheBehaviors :: Maybe [CloudFrontDistributionCacheBehavior]- , _cloudFrontDistributionDistributionConfigComment :: Maybe (Val Text)- , _cloudFrontDistributionDistributionConfigCustomErrorResponses :: Maybe [CloudFrontDistributionCustomErrorResponse]- , _cloudFrontDistributionDistributionConfigDefaultCacheBehavior :: Maybe CloudFrontDistributionDefaultCacheBehavior- , _cloudFrontDistributionDistributionConfigDefaultRootObject :: Maybe (Val Text)- , _cloudFrontDistributionDistributionConfigEnabled :: Val Bool- , _cloudFrontDistributionDistributionConfigHttpVersion :: Maybe (Val Text)- , _cloudFrontDistributionDistributionConfigIPV6Enabled :: Maybe (Val Bool)- , _cloudFrontDistributionDistributionConfigLogging :: Maybe CloudFrontDistributionLogging- , _cloudFrontDistributionDistributionConfigOriginGroups :: Maybe CloudFrontDistributionOriginGroups- , _cloudFrontDistributionDistributionConfigOrigins :: Maybe [CloudFrontDistributionOrigin]- , _cloudFrontDistributionDistributionConfigPriceClass :: Maybe (Val Text)- , _cloudFrontDistributionDistributionConfigRestrictions :: Maybe CloudFrontDistributionRestrictions- , _cloudFrontDistributionDistributionConfigViewerCertificate :: Maybe CloudFrontDistributionViewerCertificate- , _cloudFrontDistributionDistributionConfigWebACLId :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionDistributionConfig where- toJSON CloudFrontDistributionDistributionConfig{..} =- object $- catMaybes- [ fmap (("Aliases",) . toJSON) _cloudFrontDistributionDistributionConfigAliases- , fmap (("CacheBehaviors",) . toJSON) _cloudFrontDistributionDistributionConfigCacheBehaviors- , fmap (("Comment",) . toJSON) _cloudFrontDistributionDistributionConfigComment- , fmap (("CustomErrorResponses",) . toJSON) _cloudFrontDistributionDistributionConfigCustomErrorResponses- , fmap (("DefaultCacheBehavior",) . toJSON) _cloudFrontDistributionDistributionConfigDefaultCacheBehavior- , fmap (("DefaultRootObject",) . toJSON) _cloudFrontDistributionDistributionConfigDefaultRootObject- , (Just . ("Enabled",) . toJSON) _cloudFrontDistributionDistributionConfigEnabled- , fmap (("HttpVersion",) . toJSON) _cloudFrontDistributionDistributionConfigHttpVersion- , fmap (("IPV6Enabled",) . toJSON) _cloudFrontDistributionDistributionConfigIPV6Enabled- , fmap (("Logging",) . toJSON) _cloudFrontDistributionDistributionConfigLogging- , fmap (("OriginGroups",) . toJSON) _cloudFrontDistributionDistributionConfigOriginGroups- , fmap (("Origins",) . toJSON) _cloudFrontDistributionDistributionConfigOrigins- , fmap (("PriceClass",) . toJSON) _cloudFrontDistributionDistributionConfigPriceClass- , fmap (("Restrictions",) . toJSON) _cloudFrontDistributionDistributionConfigRestrictions- , fmap (("ViewerCertificate",) . toJSON) _cloudFrontDistributionDistributionConfigViewerCertificate- , fmap (("WebACLId",) . toJSON) _cloudFrontDistributionDistributionConfigWebACLId- ]---- | Constructor for 'CloudFrontDistributionDistributionConfig' containing--- required fields as arguments.-cloudFrontDistributionDistributionConfig- :: Val Bool -- ^ 'cfddcEnabled'- -> CloudFrontDistributionDistributionConfig-cloudFrontDistributionDistributionConfig enabledarg =- CloudFrontDistributionDistributionConfig- { _cloudFrontDistributionDistributionConfigAliases = Nothing- , _cloudFrontDistributionDistributionConfigCacheBehaviors = Nothing- , _cloudFrontDistributionDistributionConfigComment = Nothing- , _cloudFrontDistributionDistributionConfigCustomErrorResponses = Nothing- , _cloudFrontDistributionDistributionConfigDefaultCacheBehavior = Nothing- , _cloudFrontDistributionDistributionConfigDefaultRootObject = Nothing- , _cloudFrontDistributionDistributionConfigEnabled = enabledarg- , _cloudFrontDistributionDistributionConfigHttpVersion = Nothing- , _cloudFrontDistributionDistributionConfigIPV6Enabled = Nothing- , _cloudFrontDistributionDistributionConfigLogging = Nothing- , _cloudFrontDistributionDistributionConfigOriginGroups = Nothing- , _cloudFrontDistributionDistributionConfigOrigins = Nothing- , _cloudFrontDistributionDistributionConfigPriceClass = Nothing- , _cloudFrontDistributionDistributionConfigRestrictions = Nothing- , _cloudFrontDistributionDistributionConfigViewerCertificate = Nothing- , _cloudFrontDistributionDistributionConfigWebACLId = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-aliases-cfddcAliases :: Lens' CloudFrontDistributionDistributionConfig (Maybe (ValList Text))-cfddcAliases = lens _cloudFrontDistributionDistributionConfigAliases (\s a -> s { _cloudFrontDistributionDistributionConfigAliases = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-cachebehaviors-cfddcCacheBehaviors :: Lens' CloudFrontDistributionDistributionConfig (Maybe [CloudFrontDistributionCacheBehavior])-cfddcCacheBehaviors = lens _cloudFrontDistributionDistributionConfigCacheBehaviors (\s a -> s { _cloudFrontDistributionDistributionConfigCacheBehaviors = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-comment-cfddcComment :: Lens' CloudFrontDistributionDistributionConfig (Maybe (Val Text))-cfddcComment = lens _cloudFrontDistributionDistributionConfigComment (\s a -> s { _cloudFrontDistributionDistributionConfigComment = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-customerrorresponses-cfddcCustomErrorResponses :: Lens' CloudFrontDistributionDistributionConfig (Maybe [CloudFrontDistributionCustomErrorResponse])-cfddcCustomErrorResponses = lens _cloudFrontDistributionDistributionConfigCustomErrorResponses (\s a -> s { _cloudFrontDistributionDistributionConfigCustomErrorResponses = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-defaultcachebehavior-cfddcDefaultCacheBehavior :: Lens' CloudFrontDistributionDistributionConfig (Maybe CloudFrontDistributionDefaultCacheBehavior)-cfddcDefaultCacheBehavior = lens _cloudFrontDistributionDistributionConfigDefaultCacheBehavior (\s a -> s { _cloudFrontDistributionDistributionConfigDefaultCacheBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-defaultrootobject-cfddcDefaultRootObject :: Lens' CloudFrontDistributionDistributionConfig (Maybe (Val Text))-cfddcDefaultRootObject = lens _cloudFrontDistributionDistributionConfigDefaultRootObject (\s a -> s { _cloudFrontDistributionDistributionConfigDefaultRootObject = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-enabled-cfddcEnabled :: Lens' CloudFrontDistributionDistributionConfig (Val Bool)-cfddcEnabled = lens _cloudFrontDistributionDistributionConfigEnabled (\s a -> s { _cloudFrontDistributionDistributionConfigEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-httpversion-cfddcHttpVersion :: Lens' CloudFrontDistributionDistributionConfig (Maybe (Val Text))-cfddcHttpVersion = lens _cloudFrontDistributionDistributionConfigHttpVersion (\s a -> s { _cloudFrontDistributionDistributionConfigHttpVersion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-ipv6enabled-cfddcIPV6Enabled :: Lens' CloudFrontDistributionDistributionConfig (Maybe (Val Bool))-cfddcIPV6Enabled = lens _cloudFrontDistributionDistributionConfigIPV6Enabled (\s a -> s { _cloudFrontDistributionDistributionConfigIPV6Enabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-logging-cfddcLogging :: Lens' CloudFrontDistributionDistributionConfig (Maybe CloudFrontDistributionLogging)-cfddcLogging = lens _cloudFrontDistributionDistributionConfigLogging (\s a -> s { _cloudFrontDistributionDistributionConfigLogging = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-origingroups-cfddcOriginGroups :: Lens' CloudFrontDistributionDistributionConfig (Maybe CloudFrontDistributionOriginGroups)-cfddcOriginGroups = lens _cloudFrontDistributionDistributionConfigOriginGroups (\s a -> s { _cloudFrontDistributionDistributionConfigOriginGroups = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-origins-cfddcOrigins :: Lens' CloudFrontDistributionDistributionConfig (Maybe [CloudFrontDistributionOrigin])-cfddcOrigins = lens _cloudFrontDistributionDistributionConfigOrigins (\s a -> s { _cloudFrontDistributionDistributionConfigOrigins = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-priceclass-cfddcPriceClass :: Lens' CloudFrontDistributionDistributionConfig (Maybe (Val Text))-cfddcPriceClass = lens _cloudFrontDistributionDistributionConfigPriceClass (\s a -> s { _cloudFrontDistributionDistributionConfigPriceClass = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-restrictions-cfddcRestrictions :: Lens' CloudFrontDistributionDistributionConfig (Maybe CloudFrontDistributionRestrictions)-cfddcRestrictions = lens _cloudFrontDistributionDistributionConfigRestrictions (\s a -> s { _cloudFrontDistributionDistributionConfigRestrictions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-viewercertificate-cfddcViewerCertificate :: Lens' CloudFrontDistributionDistributionConfig (Maybe CloudFrontDistributionViewerCertificate)-cfddcViewerCertificate = lens _cloudFrontDistributionDistributionConfigViewerCertificate (\s a -> s { _cloudFrontDistributionDistributionConfigViewerCertificate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-distributionconfig.html#cfn-cloudfront-distribution-distributionconfig-webaclid-cfddcWebACLId :: Lens' CloudFrontDistributionDistributionConfig (Maybe (Val Text))-cfddcWebACLId = lens _cloudFrontDistributionDistributionConfigWebACLId (\s a -> s { _cloudFrontDistributionDistributionConfigWebACLId = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-forwardedvalues.html--module Stratosphere.ResourceProperties.CloudFrontDistributionForwardedValues where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionCookies---- | Full data type definition for CloudFrontDistributionForwardedValues. See--- 'cloudFrontDistributionForwardedValues' for a more convenient--- constructor.-data CloudFrontDistributionForwardedValues =- CloudFrontDistributionForwardedValues- { _cloudFrontDistributionForwardedValuesCookies :: Maybe CloudFrontDistributionCookies- , _cloudFrontDistributionForwardedValuesHeaders :: Maybe (ValList Text)- , _cloudFrontDistributionForwardedValuesQueryString :: Val Bool- , _cloudFrontDistributionForwardedValuesQueryStringCacheKeys :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionForwardedValues where- toJSON CloudFrontDistributionForwardedValues{..} =- object $- catMaybes- [ fmap (("Cookies",) . toJSON) _cloudFrontDistributionForwardedValuesCookies- , fmap (("Headers",) . toJSON) _cloudFrontDistributionForwardedValuesHeaders- , (Just . ("QueryString",) . toJSON) _cloudFrontDistributionForwardedValuesQueryString- , fmap (("QueryStringCacheKeys",) . toJSON) _cloudFrontDistributionForwardedValuesQueryStringCacheKeys- ]---- | Constructor for 'CloudFrontDistributionForwardedValues' containing--- required fields as arguments.-cloudFrontDistributionForwardedValues- :: Val Bool -- ^ 'cfdfvQueryString'- -> CloudFrontDistributionForwardedValues-cloudFrontDistributionForwardedValues queryStringarg =- CloudFrontDistributionForwardedValues- { _cloudFrontDistributionForwardedValuesCookies = Nothing- , _cloudFrontDistributionForwardedValuesHeaders = Nothing- , _cloudFrontDistributionForwardedValuesQueryString = queryStringarg- , _cloudFrontDistributionForwardedValuesQueryStringCacheKeys = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-forwardedvalues.html#cfn-cloudfront-distribution-forwardedvalues-cookies-cfdfvCookies :: Lens' CloudFrontDistributionForwardedValues (Maybe CloudFrontDistributionCookies)-cfdfvCookies = lens _cloudFrontDistributionForwardedValuesCookies (\s a -> s { _cloudFrontDistributionForwardedValuesCookies = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-forwardedvalues.html#cfn-cloudfront-distribution-forwardedvalues-headers-cfdfvHeaders :: Lens' CloudFrontDistributionForwardedValues (Maybe (ValList Text))-cfdfvHeaders = lens _cloudFrontDistributionForwardedValuesHeaders (\s a -> s { _cloudFrontDistributionForwardedValuesHeaders = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-forwardedvalues.html#cfn-cloudfront-distribution-forwardedvalues-querystring-cfdfvQueryString :: Lens' CloudFrontDistributionForwardedValues (Val Bool)-cfdfvQueryString = lens _cloudFrontDistributionForwardedValuesQueryString (\s a -> s { _cloudFrontDistributionForwardedValuesQueryString = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-forwardedvalues.html#cfn-cloudfront-distribution-forwardedvalues-querystringcachekeys-cfdfvQueryStringCacheKeys :: Lens' CloudFrontDistributionForwardedValues (Maybe (ValList Text))-cfdfvQueryStringCacheKeys = lens _cloudFrontDistributionForwardedValuesQueryStringCacheKeys (\s a -> s { _cloudFrontDistributionForwardedValuesQueryStringCacheKeys = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-georestriction.html--module Stratosphere.ResourceProperties.CloudFrontDistributionGeoRestriction where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionGeoRestriction. See--- 'cloudFrontDistributionGeoRestriction' for a more convenient constructor.-data CloudFrontDistributionGeoRestriction =- CloudFrontDistributionGeoRestriction- { _cloudFrontDistributionGeoRestrictionLocations :: Maybe (ValList Text)- , _cloudFrontDistributionGeoRestrictionRestrictionType :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionGeoRestriction where- toJSON CloudFrontDistributionGeoRestriction{..} =- object $- catMaybes- [ fmap (("Locations",) . toJSON) _cloudFrontDistributionGeoRestrictionLocations- , (Just . ("RestrictionType",) . toJSON) _cloudFrontDistributionGeoRestrictionRestrictionType- ]---- | Constructor for 'CloudFrontDistributionGeoRestriction' containing--- required fields as arguments.-cloudFrontDistributionGeoRestriction- :: Val Text -- ^ 'cfdgrRestrictionType'- -> CloudFrontDistributionGeoRestriction-cloudFrontDistributionGeoRestriction restrictionTypearg =- CloudFrontDistributionGeoRestriction- { _cloudFrontDistributionGeoRestrictionLocations = Nothing- , _cloudFrontDistributionGeoRestrictionRestrictionType = restrictionTypearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-georestriction.html#cfn-cloudfront-distribution-georestriction-locations-cfdgrLocations :: Lens' CloudFrontDistributionGeoRestriction (Maybe (ValList Text))-cfdgrLocations = lens _cloudFrontDistributionGeoRestrictionLocations (\s a -> s { _cloudFrontDistributionGeoRestrictionLocations = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-georestriction.html#cfn-cloudfront-distribution-georestriction-restrictiontype-cfdgrRestrictionType :: Lens' CloudFrontDistributionGeoRestriction (Val Text)-cfdgrRestrictionType = lens _cloudFrontDistributionGeoRestrictionRestrictionType (\s a -> s { _cloudFrontDistributionGeoRestrictionRestrictionType = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-lambdafunctionassociation.html--module Stratosphere.ResourceProperties.CloudFrontDistributionLambdaFunctionAssociation where--import Stratosphere.ResourceImports----- | Full data type definition for--- CloudFrontDistributionLambdaFunctionAssociation. See--- 'cloudFrontDistributionLambdaFunctionAssociation' for a more convenient--- constructor.-data CloudFrontDistributionLambdaFunctionAssociation =- CloudFrontDistributionLambdaFunctionAssociation- { _cloudFrontDistributionLambdaFunctionAssociationEventType :: Maybe (Val Text)- , _cloudFrontDistributionLambdaFunctionAssociationIncludeBody :: Maybe (Val Bool)- , _cloudFrontDistributionLambdaFunctionAssociationLambdaFunctionARN :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionLambdaFunctionAssociation where- toJSON CloudFrontDistributionLambdaFunctionAssociation{..} =- object $- catMaybes- [ fmap (("EventType",) . toJSON) _cloudFrontDistributionLambdaFunctionAssociationEventType- , fmap (("IncludeBody",) . toJSON) _cloudFrontDistributionLambdaFunctionAssociationIncludeBody- , fmap (("LambdaFunctionARN",) . toJSON) _cloudFrontDistributionLambdaFunctionAssociationLambdaFunctionARN- ]---- | Constructor for 'CloudFrontDistributionLambdaFunctionAssociation'--- containing required fields as arguments.-cloudFrontDistributionLambdaFunctionAssociation- :: CloudFrontDistributionLambdaFunctionAssociation-cloudFrontDistributionLambdaFunctionAssociation =- CloudFrontDistributionLambdaFunctionAssociation- { _cloudFrontDistributionLambdaFunctionAssociationEventType = Nothing- , _cloudFrontDistributionLambdaFunctionAssociationIncludeBody = Nothing- , _cloudFrontDistributionLambdaFunctionAssociationLambdaFunctionARN = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-lambdafunctionassociation.html#cfn-cloudfront-distribution-lambdafunctionassociation-eventtype-cfdlfaEventType :: Lens' CloudFrontDistributionLambdaFunctionAssociation (Maybe (Val Text))-cfdlfaEventType = lens _cloudFrontDistributionLambdaFunctionAssociationEventType (\s a -> s { _cloudFrontDistributionLambdaFunctionAssociationEventType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-lambdafunctionassociation.html#cfn-cloudfront-distribution-lambdafunctionassociation-includebody-cfdlfaIncludeBody :: Lens' CloudFrontDistributionLambdaFunctionAssociation (Maybe (Val Bool))-cfdlfaIncludeBody = lens _cloudFrontDistributionLambdaFunctionAssociationIncludeBody (\s a -> s { _cloudFrontDistributionLambdaFunctionAssociationIncludeBody = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-lambdafunctionassociation.html#cfn-cloudfront-distribution-lambdafunctionassociation-lambdafunctionarn-cfdlfaLambdaFunctionARN :: Lens' CloudFrontDistributionLambdaFunctionAssociation (Maybe (Val Text))-cfdlfaLambdaFunctionARN = lens _cloudFrontDistributionLambdaFunctionAssociationLambdaFunctionARN (\s a -> s { _cloudFrontDistributionLambdaFunctionAssociationLambdaFunctionARN = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-logging.html--module Stratosphere.ResourceProperties.CloudFrontDistributionLogging where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionLogging. See--- 'cloudFrontDistributionLogging' for a more convenient constructor.-data CloudFrontDistributionLogging =- CloudFrontDistributionLogging- { _cloudFrontDistributionLoggingBucket :: Val Text- , _cloudFrontDistributionLoggingIncludeCookies :: Maybe (Val Bool)- , _cloudFrontDistributionLoggingPrefix :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionLogging where- toJSON CloudFrontDistributionLogging{..} =- object $- catMaybes- [ (Just . ("Bucket",) . toJSON) _cloudFrontDistributionLoggingBucket- , fmap (("IncludeCookies",) . toJSON) _cloudFrontDistributionLoggingIncludeCookies- , fmap (("Prefix",) . toJSON) _cloudFrontDistributionLoggingPrefix- ]---- | Constructor for 'CloudFrontDistributionLogging' containing required--- fields as arguments.-cloudFrontDistributionLogging- :: Val Text -- ^ 'cfdlBucket'- -> CloudFrontDistributionLogging-cloudFrontDistributionLogging bucketarg =- CloudFrontDistributionLogging- { _cloudFrontDistributionLoggingBucket = bucketarg- , _cloudFrontDistributionLoggingIncludeCookies = Nothing- , _cloudFrontDistributionLoggingPrefix = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-logging.html#cfn-cloudfront-distribution-logging-bucket-cfdlBucket :: Lens' CloudFrontDistributionLogging (Val Text)-cfdlBucket = lens _cloudFrontDistributionLoggingBucket (\s a -> s { _cloudFrontDistributionLoggingBucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-logging.html#cfn-cloudfront-distribution-logging-includecookies-cfdlIncludeCookies :: Lens' CloudFrontDistributionLogging (Maybe (Val Bool))-cfdlIncludeCookies = lens _cloudFrontDistributionLoggingIncludeCookies (\s a -> s { _cloudFrontDistributionLoggingIncludeCookies = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-logging.html#cfn-cloudfront-distribution-logging-prefix-cfdlPrefix :: Lens' CloudFrontDistributionLogging (Maybe (Val Text))-cfdlPrefix = lens _cloudFrontDistributionLoggingPrefix (\s a -> s { _cloudFrontDistributionLoggingPrefix = a })
@@ -1,91 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOrigin where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionCustomOriginConfig-import Stratosphere.ResourceProperties.CloudFrontDistributionOriginCustomHeader-import Stratosphere.ResourceProperties.CloudFrontDistributionS3OriginConfig---- | Full data type definition for CloudFrontDistributionOrigin. See--- 'cloudFrontDistributionOrigin' for a more convenient constructor.-data CloudFrontDistributionOrigin =- CloudFrontDistributionOrigin- { _cloudFrontDistributionOriginConnectionAttempts :: Maybe (Val Integer)- , _cloudFrontDistributionOriginConnectionTimeout :: Maybe (Val Integer)- , _cloudFrontDistributionOriginCustomOriginConfig :: Maybe CloudFrontDistributionCustomOriginConfig- , _cloudFrontDistributionOriginDomainName :: Val Text- , _cloudFrontDistributionOriginId :: Val Text- , _cloudFrontDistributionOriginOriginCustomHeaders :: Maybe [CloudFrontDistributionOriginCustomHeader]- , _cloudFrontDistributionOriginOriginPath :: Maybe (Val Text)- , _cloudFrontDistributionOriginS3OriginConfig :: Maybe CloudFrontDistributionS3OriginConfig- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOrigin where- toJSON CloudFrontDistributionOrigin{..} =- object $- catMaybes- [ fmap (("ConnectionAttempts",) . toJSON) _cloudFrontDistributionOriginConnectionAttempts- , fmap (("ConnectionTimeout",) . toJSON) _cloudFrontDistributionOriginConnectionTimeout- , fmap (("CustomOriginConfig",) . toJSON) _cloudFrontDistributionOriginCustomOriginConfig- , (Just . ("DomainName",) . toJSON) _cloudFrontDistributionOriginDomainName- , (Just . ("Id",) . toJSON) _cloudFrontDistributionOriginId- , fmap (("OriginCustomHeaders",) . toJSON) _cloudFrontDistributionOriginOriginCustomHeaders- , fmap (("OriginPath",) . toJSON) _cloudFrontDistributionOriginOriginPath- , fmap (("S3OriginConfig",) . toJSON) _cloudFrontDistributionOriginS3OriginConfig- ]---- | Constructor for 'CloudFrontDistributionOrigin' containing required fields--- as arguments.-cloudFrontDistributionOrigin- :: Val Text -- ^ 'cfdoDomainName'- -> Val Text -- ^ 'cfdoId'- -> CloudFrontDistributionOrigin-cloudFrontDistributionOrigin domainNamearg idarg =- CloudFrontDistributionOrigin- { _cloudFrontDistributionOriginConnectionAttempts = Nothing- , _cloudFrontDistributionOriginConnectionTimeout = Nothing- , _cloudFrontDistributionOriginCustomOriginConfig = Nothing- , _cloudFrontDistributionOriginDomainName = domainNamearg- , _cloudFrontDistributionOriginId = idarg- , _cloudFrontDistributionOriginOriginCustomHeaders = Nothing- , _cloudFrontDistributionOriginOriginPath = Nothing- , _cloudFrontDistributionOriginS3OriginConfig = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-connectionattempts-cfdoConnectionAttempts :: Lens' CloudFrontDistributionOrigin (Maybe (Val Integer))-cfdoConnectionAttempts = lens _cloudFrontDistributionOriginConnectionAttempts (\s a -> s { _cloudFrontDistributionOriginConnectionAttempts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-connectiontimeout-cfdoConnectionTimeout :: Lens' CloudFrontDistributionOrigin (Maybe (Val Integer))-cfdoConnectionTimeout = lens _cloudFrontDistributionOriginConnectionTimeout (\s a -> s { _cloudFrontDistributionOriginConnectionTimeout = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-customoriginconfig-cfdoCustomOriginConfig :: Lens' CloudFrontDistributionOrigin (Maybe CloudFrontDistributionCustomOriginConfig)-cfdoCustomOriginConfig = lens _cloudFrontDistributionOriginCustomOriginConfig (\s a -> s { _cloudFrontDistributionOriginCustomOriginConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-domainname-cfdoDomainName :: Lens' CloudFrontDistributionOrigin (Val Text)-cfdoDomainName = lens _cloudFrontDistributionOriginDomainName (\s a -> s { _cloudFrontDistributionOriginDomainName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-id-cfdoId :: Lens' CloudFrontDistributionOrigin (Val Text)-cfdoId = lens _cloudFrontDistributionOriginId (\s a -> s { _cloudFrontDistributionOriginId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-origincustomheaders-cfdoOriginCustomHeaders :: Lens' CloudFrontDistributionOrigin (Maybe [CloudFrontDistributionOriginCustomHeader])-cfdoOriginCustomHeaders = lens _cloudFrontDistributionOriginOriginCustomHeaders (\s a -> s { _cloudFrontDistributionOriginOriginCustomHeaders = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-originpath-cfdoOriginPath :: Lens' CloudFrontDistributionOrigin (Maybe (Val Text))-cfdoOriginPath = lens _cloudFrontDistributionOriginOriginPath (\s a -> s { _cloudFrontDistributionOriginOriginPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origin.html#cfn-cloudfront-distribution-origin-s3originconfig-cfdoS3OriginConfig :: Lens' CloudFrontDistributionOrigin (Maybe CloudFrontDistributionS3OriginConfig)-cfdoS3OriginConfig = lens _cloudFrontDistributionOriginS3OriginConfig (\s a -> s { _cloudFrontDistributionOriginS3OriginConfig = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origincustomheader.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOriginCustomHeader where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionOriginCustomHeader.--- See 'cloudFrontDistributionOriginCustomHeader' for a more convenient--- constructor.-data CloudFrontDistributionOriginCustomHeader =- CloudFrontDistributionOriginCustomHeader- { _cloudFrontDistributionOriginCustomHeaderHeaderName :: Val Text- , _cloudFrontDistributionOriginCustomHeaderHeaderValue :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOriginCustomHeader where- toJSON CloudFrontDistributionOriginCustomHeader{..} =- object $- catMaybes- [ (Just . ("HeaderName",) . toJSON) _cloudFrontDistributionOriginCustomHeaderHeaderName- , (Just . ("HeaderValue",) . toJSON) _cloudFrontDistributionOriginCustomHeaderHeaderValue- ]---- | Constructor for 'CloudFrontDistributionOriginCustomHeader' containing--- required fields as arguments.-cloudFrontDistributionOriginCustomHeader- :: Val Text -- ^ 'cfdochHeaderName'- -> Val Text -- ^ 'cfdochHeaderValue'- -> CloudFrontDistributionOriginCustomHeader-cloudFrontDistributionOriginCustomHeader headerNamearg headerValuearg =- CloudFrontDistributionOriginCustomHeader- { _cloudFrontDistributionOriginCustomHeaderHeaderName = headerNamearg- , _cloudFrontDistributionOriginCustomHeaderHeaderValue = headerValuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origincustomheader.html#cfn-cloudfront-distribution-origincustomheader-headername-cfdochHeaderName :: Lens' CloudFrontDistributionOriginCustomHeader (Val Text)-cfdochHeaderName = lens _cloudFrontDistributionOriginCustomHeaderHeaderName (\s a -> s { _cloudFrontDistributionOriginCustomHeaderHeaderName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origincustomheader.html#cfn-cloudfront-distribution-origincustomheader-headervalue-cfdochHeaderValue :: Lens' CloudFrontDistributionOriginCustomHeader (Val Text)-cfdochHeaderValue = lens _cloudFrontDistributionOriginCustomHeaderHeaderValue (\s a -> s { _cloudFrontDistributionOriginCustomHeaderHeaderValue = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroup.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroup where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroupFailoverCriteria-import Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroupMembers---- | Full data type definition for CloudFrontDistributionOriginGroup. See--- 'cloudFrontDistributionOriginGroup' for a more convenient constructor.-data CloudFrontDistributionOriginGroup =- CloudFrontDistributionOriginGroup- { _cloudFrontDistributionOriginGroupFailoverCriteria :: CloudFrontDistributionOriginGroupFailoverCriteria- , _cloudFrontDistributionOriginGroupId :: Val Text- , _cloudFrontDistributionOriginGroupMembers :: CloudFrontDistributionOriginGroupMembers- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOriginGroup where- toJSON CloudFrontDistributionOriginGroup{..} =- object $- catMaybes- [ (Just . ("FailoverCriteria",) . toJSON) _cloudFrontDistributionOriginGroupFailoverCriteria- , (Just . ("Id",) . toJSON) _cloudFrontDistributionOriginGroupId- , (Just . ("Members",) . toJSON) _cloudFrontDistributionOriginGroupMembers- ]---- | Constructor for 'CloudFrontDistributionOriginGroup' containing required--- fields as arguments.-cloudFrontDistributionOriginGroup- :: CloudFrontDistributionOriginGroupFailoverCriteria -- ^ 'cfdogFailoverCriteria'- -> Val Text -- ^ 'cfdogId'- -> CloudFrontDistributionOriginGroupMembers -- ^ 'cfdogMembers'- -> CloudFrontDistributionOriginGroup-cloudFrontDistributionOriginGroup failoverCriteriaarg idarg membersarg =- CloudFrontDistributionOriginGroup- { _cloudFrontDistributionOriginGroupFailoverCriteria = failoverCriteriaarg- , _cloudFrontDistributionOriginGroupId = idarg- , _cloudFrontDistributionOriginGroupMembers = membersarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroup.html#cfn-cloudfront-distribution-origingroup-failovercriteria-cfdogFailoverCriteria :: Lens' CloudFrontDistributionOriginGroup CloudFrontDistributionOriginGroupFailoverCriteria-cfdogFailoverCriteria = lens _cloudFrontDistributionOriginGroupFailoverCriteria (\s a -> s { _cloudFrontDistributionOriginGroupFailoverCriteria = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroup.html#cfn-cloudfront-distribution-origingroup-id-cfdogId :: Lens' CloudFrontDistributionOriginGroup (Val Text)-cfdogId = lens _cloudFrontDistributionOriginGroupId (\s a -> s { _cloudFrontDistributionOriginGroupId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroup.html#cfn-cloudfront-distribution-origingroup-members-cfdogMembers :: Lens' CloudFrontDistributionOriginGroup CloudFrontDistributionOriginGroupMembers-cfdogMembers = lens _cloudFrontDistributionOriginGroupMembers (\s a -> s { _cloudFrontDistributionOriginGroupMembers = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupfailovercriteria.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroupFailoverCriteria where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionStatusCodes---- | Full data type definition for--- CloudFrontDistributionOriginGroupFailoverCriteria. See--- 'cloudFrontDistributionOriginGroupFailoverCriteria' for a more convenient--- constructor.-data CloudFrontDistributionOriginGroupFailoverCriteria =- CloudFrontDistributionOriginGroupFailoverCriteria- { _cloudFrontDistributionOriginGroupFailoverCriteriaStatusCodes :: CloudFrontDistributionStatusCodes- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOriginGroupFailoverCriteria where- toJSON CloudFrontDistributionOriginGroupFailoverCriteria{..} =- object $- catMaybes- [ (Just . ("StatusCodes",) . toJSON) _cloudFrontDistributionOriginGroupFailoverCriteriaStatusCodes- ]---- | Constructor for 'CloudFrontDistributionOriginGroupFailoverCriteria'--- containing required fields as arguments.-cloudFrontDistributionOriginGroupFailoverCriteria- :: CloudFrontDistributionStatusCodes -- ^ 'cfdogfcStatusCodes'- -> CloudFrontDistributionOriginGroupFailoverCriteria-cloudFrontDistributionOriginGroupFailoverCriteria statusCodesarg =- CloudFrontDistributionOriginGroupFailoverCriteria- { _cloudFrontDistributionOriginGroupFailoverCriteriaStatusCodes = statusCodesarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupfailovercriteria.html#cfn-cloudfront-distribution-origingroupfailovercriteria-statuscodes-cfdogfcStatusCodes :: Lens' CloudFrontDistributionOriginGroupFailoverCriteria CloudFrontDistributionStatusCodes-cfdogfcStatusCodes = lens _cloudFrontDistributionOriginGroupFailoverCriteriaStatusCodes (\s a -> s { _cloudFrontDistributionOriginGroupFailoverCriteriaStatusCodes = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupmember.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroupMember where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionOriginGroupMember.--- See 'cloudFrontDistributionOriginGroupMember' for a more convenient--- constructor.-data CloudFrontDistributionOriginGroupMember =- CloudFrontDistributionOriginGroupMember- { _cloudFrontDistributionOriginGroupMemberOriginId :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOriginGroupMember where- toJSON CloudFrontDistributionOriginGroupMember{..} =- object $- catMaybes- [ (Just . ("OriginId",) . toJSON) _cloudFrontDistributionOriginGroupMemberOriginId- ]---- | Constructor for 'CloudFrontDistributionOriginGroupMember' containing--- required fields as arguments.-cloudFrontDistributionOriginGroupMember- :: Val Text -- ^ 'cfdogmOriginId'- -> CloudFrontDistributionOriginGroupMember-cloudFrontDistributionOriginGroupMember originIdarg =- CloudFrontDistributionOriginGroupMember- { _cloudFrontDistributionOriginGroupMemberOriginId = originIdarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupmember.html#cfn-cloudfront-distribution-origingroupmember-originid-cfdogmOriginId :: Lens' CloudFrontDistributionOriginGroupMember (Val Text)-cfdogmOriginId = lens _cloudFrontDistributionOriginGroupMemberOriginId (\s a -> s { _cloudFrontDistributionOriginGroupMemberOriginId = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupmembers.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroupMembers where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroupMember---- | Full data type definition for CloudFrontDistributionOriginGroupMembers.--- See 'cloudFrontDistributionOriginGroupMembers' for a more convenient--- constructor.-data CloudFrontDistributionOriginGroupMembers =- CloudFrontDistributionOriginGroupMembers- { _cloudFrontDistributionOriginGroupMembersItems :: [CloudFrontDistributionOriginGroupMember]- , _cloudFrontDistributionOriginGroupMembersQuantity :: Val Integer- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOriginGroupMembers where- toJSON CloudFrontDistributionOriginGroupMembers{..} =- object $- catMaybes- [ (Just . ("Items",) . toJSON) _cloudFrontDistributionOriginGroupMembersItems- , (Just . ("Quantity",) . toJSON) _cloudFrontDistributionOriginGroupMembersQuantity- ]---- | Constructor for 'CloudFrontDistributionOriginGroupMembers' containing--- required fields as arguments.-cloudFrontDistributionOriginGroupMembers- :: [CloudFrontDistributionOriginGroupMember] -- ^ 'cfdogmItems'- -> Val Integer -- ^ 'cfdogmQuantity'- -> CloudFrontDistributionOriginGroupMembers-cloudFrontDistributionOriginGroupMembers itemsarg quantityarg =- CloudFrontDistributionOriginGroupMembers- { _cloudFrontDistributionOriginGroupMembersItems = itemsarg- , _cloudFrontDistributionOriginGroupMembersQuantity = quantityarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupmembers.html#cfn-cloudfront-distribution-origingroupmembers-items-cfdogmItems :: Lens' CloudFrontDistributionOriginGroupMembers [CloudFrontDistributionOriginGroupMember]-cfdogmItems = lens _cloudFrontDistributionOriginGroupMembersItems (\s a -> s { _cloudFrontDistributionOriginGroupMembersItems = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroupmembers.html#cfn-cloudfront-distribution-origingroupmembers-quantity-cfdogmQuantity :: Lens' CloudFrontDistributionOriginGroupMembers (Val Integer)-cfdogmQuantity = lens _cloudFrontDistributionOriginGroupMembersQuantity (\s a -> s { _cloudFrontDistributionOriginGroupMembersQuantity = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroups.html--module Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroups where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionOriginGroup---- | Full data type definition for CloudFrontDistributionOriginGroups. See--- 'cloudFrontDistributionOriginGroups' for a more convenient constructor.-data CloudFrontDistributionOriginGroups =- CloudFrontDistributionOriginGroups- { _cloudFrontDistributionOriginGroupsItems :: Maybe [CloudFrontDistributionOriginGroup]- , _cloudFrontDistributionOriginGroupsQuantity :: Val Integer- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionOriginGroups where- toJSON CloudFrontDistributionOriginGroups{..} =- object $- catMaybes- [ fmap (("Items",) . toJSON) _cloudFrontDistributionOriginGroupsItems- , (Just . ("Quantity",) . toJSON) _cloudFrontDistributionOriginGroupsQuantity- ]---- | Constructor for 'CloudFrontDistributionOriginGroups' containing required--- fields as arguments.-cloudFrontDistributionOriginGroups- :: Val Integer -- ^ 'cfdogQuantity'- -> CloudFrontDistributionOriginGroups-cloudFrontDistributionOriginGroups quantityarg =- CloudFrontDistributionOriginGroups- { _cloudFrontDistributionOriginGroupsItems = Nothing- , _cloudFrontDistributionOriginGroupsQuantity = quantityarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroups.html#cfn-cloudfront-distribution-origingroups-items-cfdogItems :: Lens' CloudFrontDistributionOriginGroups (Maybe [CloudFrontDistributionOriginGroup])-cfdogItems = lens _cloudFrontDistributionOriginGroupsItems (\s a -> s { _cloudFrontDistributionOriginGroupsItems = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-origingroups.html#cfn-cloudfront-distribution-origingroups-quantity-cfdogQuantity :: Lens' CloudFrontDistributionOriginGroups (Val Integer)-cfdogQuantity = lens _cloudFrontDistributionOriginGroupsQuantity (\s a -> s { _cloudFrontDistributionOriginGroupsQuantity = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-restrictions.html--module Stratosphere.ResourceProperties.CloudFrontDistributionRestrictions where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontDistributionGeoRestriction---- | Full data type definition for CloudFrontDistributionRestrictions. See--- 'cloudFrontDistributionRestrictions' for a more convenient constructor.-data CloudFrontDistributionRestrictions =- CloudFrontDistributionRestrictions- { _cloudFrontDistributionRestrictionsGeoRestriction :: CloudFrontDistributionGeoRestriction- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionRestrictions where- toJSON CloudFrontDistributionRestrictions{..} =- object $- catMaybes- [ (Just . ("GeoRestriction",) . toJSON) _cloudFrontDistributionRestrictionsGeoRestriction- ]---- | Constructor for 'CloudFrontDistributionRestrictions' containing required--- fields as arguments.-cloudFrontDistributionRestrictions- :: CloudFrontDistributionGeoRestriction -- ^ 'cfdrGeoRestriction'- -> CloudFrontDistributionRestrictions-cloudFrontDistributionRestrictions geoRestrictionarg =- CloudFrontDistributionRestrictions- { _cloudFrontDistributionRestrictionsGeoRestriction = geoRestrictionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-restrictions.html#cfn-cloudfront-distribution-restrictions-georestriction-cfdrGeoRestriction :: Lens' CloudFrontDistributionRestrictions CloudFrontDistributionGeoRestriction-cfdrGeoRestriction = lens _cloudFrontDistributionRestrictionsGeoRestriction (\s a -> s { _cloudFrontDistributionRestrictionsGeoRestriction = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-s3originconfig.html--module Stratosphere.ResourceProperties.CloudFrontDistributionS3OriginConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionS3OriginConfig. See--- 'cloudFrontDistributionS3OriginConfig' for a more convenient constructor.-data CloudFrontDistributionS3OriginConfig =- CloudFrontDistributionS3OriginConfig- { _cloudFrontDistributionS3OriginConfigOriginAccessIdentity :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionS3OriginConfig where- toJSON CloudFrontDistributionS3OriginConfig{..} =- object $- catMaybes- [ fmap (("OriginAccessIdentity",) . toJSON) _cloudFrontDistributionS3OriginConfigOriginAccessIdentity- ]---- | Constructor for 'CloudFrontDistributionS3OriginConfig' containing--- required fields as arguments.-cloudFrontDistributionS3OriginConfig- :: CloudFrontDistributionS3OriginConfig-cloudFrontDistributionS3OriginConfig =- CloudFrontDistributionS3OriginConfig- { _cloudFrontDistributionS3OriginConfigOriginAccessIdentity = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-s3originconfig.html#cfn-cloudfront-distribution-s3originconfig-originaccessidentity-cfdsocOriginAccessIdentity :: Lens' CloudFrontDistributionS3OriginConfig (Maybe (Val Text))-cfdsocOriginAccessIdentity = lens _cloudFrontDistributionS3OriginConfigOriginAccessIdentity (\s a -> s { _cloudFrontDistributionS3OriginConfigOriginAccessIdentity = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-statuscodes.html--module Stratosphere.ResourceProperties.CloudFrontDistributionStatusCodes where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionStatusCodes. See--- 'cloudFrontDistributionStatusCodes' for a more convenient constructor.-data CloudFrontDistributionStatusCodes =- CloudFrontDistributionStatusCodes- { _cloudFrontDistributionStatusCodesItems :: ValList Integer- , _cloudFrontDistributionStatusCodesQuantity :: Val Integer- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionStatusCodes where- toJSON CloudFrontDistributionStatusCodes{..} =- object $- catMaybes- [ (Just . ("Items",) . toJSON) _cloudFrontDistributionStatusCodesItems- , (Just . ("Quantity",) . toJSON) _cloudFrontDistributionStatusCodesQuantity- ]---- | Constructor for 'CloudFrontDistributionStatusCodes' containing required--- fields as arguments.-cloudFrontDistributionStatusCodes- :: ValList Integer -- ^ 'cfdscItems'- -> Val Integer -- ^ 'cfdscQuantity'- -> CloudFrontDistributionStatusCodes-cloudFrontDistributionStatusCodes itemsarg quantityarg =- CloudFrontDistributionStatusCodes- { _cloudFrontDistributionStatusCodesItems = itemsarg- , _cloudFrontDistributionStatusCodesQuantity = quantityarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-statuscodes.html#cfn-cloudfront-distribution-statuscodes-items-cfdscItems :: Lens' CloudFrontDistributionStatusCodes (ValList Integer)-cfdscItems = lens _cloudFrontDistributionStatusCodesItems (\s a -> s { _cloudFrontDistributionStatusCodesItems = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-statuscodes.html#cfn-cloudfront-distribution-statuscodes-quantity-cfdscQuantity :: Lens' CloudFrontDistributionStatusCodes (Val Integer)-cfdscQuantity = lens _cloudFrontDistributionStatusCodesQuantity (\s a -> s { _cloudFrontDistributionStatusCodesQuantity = a })
@@ -1,67 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-viewercertificate.html--module Stratosphere.ResourceProperties.CloudFrontDistributionViewerCertificate where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontDistributionViewerCertificate.--- See 'cloudFrontDistributionViewerCertificate' for a more convenient--- constructor.-data CloudFrontDistributionViewerCertificate =- CloudFrontDistributionViewerCertificate- { _cloudFrontDistributionViewerCertificateAcmCertificateArn :: Maybe (Val Text)- , _cloudFrontDistributionViewerCertificateCloudFrontDefaultCertificate :: Maybe (Val Bool)- , _cloudFrontDistributionViewerCertificateIamCertificateId :: Maybe (Val Text)- , _cloudFrontDistributionViewerCertificateMinimumProtocolVersion :: Maybe (Val Text)- , _cloudFrontDistributionViewerCertificateSslSupportMethod :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontDistributionViewerCertificate where- toJSON CloudFrontDistributionViewerCertificate{..} =- object $- catMaybes- [ fmap (("AcmCertificateArn",) . toJSON) _cloudFrontDistributionViewerCertificateAcmCertificateArn- , fmap (("CloudFrontDefaultCertificate",) . toJSON) _cloudFrontDistributionViewerCertificateCloudFrontDefaultCertificate- , fmap (("IamCertificateId",) . toJSON) _cloudFrontDistributionViewerCertificateIamCertificateId- , fmap (("MinimumProtocolVersion",) . toJSON) _cloudFrontDistributionViewerCertificateMinimumProtocolVersion- , fmap (("SslSupportMethod",) . toJSON) _cloudFrontDistributionViewerCertificateSslSupportMethod- ]---- | Constructor for 'CloudFrontDistributionViewerCertificate' containing--- required fields as arguments.-cloudFrontDistributionViewerCertificate- :: CloudFrontDistributionViewerCertificate-cloudFrontDistributionViewerCertificate =- CloudFrontDistributionViewerCertificate- { _cloudFrontDistributionViewerCertificateAcmCertificateArn = Nothing- , _cloudFrontDistributionViewerCertificateCloudFrontDefaultCertificate = Nothing- , _cloudFrontDistributionViewerCertificateIamCertificateId = Nothing- , _cloudFrontDistributionViewerCertificateMinimumProtocolVersion = Nothing- , _cloudFrontDistributionViewerCertificateSslSupportMethod = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-viewercertificate.html#cfn-cloudfront-distribution-viewercertificate-acmcertificatearn-cfdvcAcmCertificateArn :: Lens' CloudFrontDistributionViewerCertificate (Maybe (Val Text))-cfdvcAcmCertificateArn = lens _cloudFrontDistributionViewerCertificateAcmCertificateArn (\s a -> s { _cloudFrontDistributionViewerCertificateAcmCertificateArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-viewercertificate.html#cfn-cloudfront-distribution-viewercertificate-cloudfrontdefaultcertificate-cfdvcCloudFrontDefaultCertificate :: Lens' CloudFrontDistributionViewerCertificate (Maybe (Val Bool))-cfdvcCloudFrontDefaultCertificate = lens _cloudFrontDistributionViewerCertificateCloudFrontDefaultCertificate (\s a -> s { _cloudFrontDistributionViewerCertificateCloudFrontDefaultCertificate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-viewercertificate.html#cfn-cloudfront-distribution-viewercertificate-iamcertificateid-cfdvcIamCertificateId :: Lens' CloudFrontDistributionViewerCertificate (Maybe (Val Text))-cfdvcIamCertificateId = lens _cloudFrontDistributionViewerCertificateIamCertificateId (\s a -> s { _cloudFrontDistributionViewerCertificateIamCertificateId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-viewercertificate.html#cfn-cloudfront-distribution-viewercertificate-minimumprotocolversion-cfdvcMinimumProtocolVersion :: Lens' CloudFrontDistributionViewerCertificate (Maybe (Val Text))-cfdvcMinimumProtocolVersion = lens _cloudFrontDistributionViewerCertificateMinimumProtocolVersion (\s a -> s { _cloudFrontDistributionViewerCertificateMinimumProtocolVersion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-distribution-viewercertificate.html#cfn-cloudfront-distribution-viewercertificate-sslsupportmethod-cfdvcSslSupportMethod :: Lens' CloudFrontDistributionViewerCertificate (Maybe (Val Text))-cfdvcSslSupportMethod = lens _cloudFrontDistributionViewerCertificateSslSupportMethod (\s a -> s { _cloudFrontDistributionViewerCertificateSslSupportMethod = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-cookiesconfig.html--module Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyCookiesConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontOriginRequestPolicyCookiesConfig.--- See 'cloudFrontOriginRequestPolicyCookiesConfig' for a more convenient--- constructor.-data CloudFrontOriginRequestPolicyCookiesConfig =- CloudFrontOriginRequestPolicyCookiesConfig- { _cloudFrontOriginRequestPolicyCookiesConfigCookieBehavior :: Val Text- , _cloudFrontOriginRequestPolicyCookiesConfigCookies :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontOriginRequestPolicyCookiesConfig where- toJSON CloudFrontOriginRequestPolicyCookiesConfig{..} =- object $- catMaybes- [ (Just . ("CookieBehavior",) . toJSON) _cloudFrontOriginRequestPolicyCookiesConfigCookieBehavior- , fmap (("Cookies",) . toJSON) _cloudFrontOriginRequestPolicyCookiesConfigCookies- ]---- | Constructor for 'CloudFrontOriginRequestPolicyCookiesConfig' containing--- required fields as arguments.-cloudFrontOriginRequestPolicyCookiesConfig- :: Val Text -- ^ 'cforpccCookieBehavior'- -> CloudFrontOriginRequestPolicyCookiesConfig-cloudFrontOriginRequestPolicyCookiesConfig cookieBehaviorarg =- CloudFrontOriginRequestPolicyCookiesConfig- { _cloudFrontOriginRequestPolicyCookiesConfigCookieBehavior = cookieBehaviorarg- , _cloudFrontOriginRequestPolicyCookiesConfigCookies = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-cookiesconfig.html#cfn-cloudfront-originrequestpolicy-cookiesconfig-cookiebehavior-cforpccCookieBehavior :: Lens' CloudFrontOriginRequestPolicyCookiesConfig (Val Text)-cforpccCookieBehavior = lens _cloudFrontOriginRequestPolicyCookiesConfigCookieBehavior (\s a -> s { _cloudFrontOriginRequestPolicyCookiesConfigCookieBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-cookiesconfig.html#cfn-cloudfront-originrequestpolicy-cookiesconfig-cookies-cforpccCookies :: Lens' CloudFrontOriginRequestPolicyCookiesConfig (Maybe (ValList Text))-cforpccCookies = lens _cloudFrontOriginRequestPolicyCookiesConfigCookies (\s a -> s { _cloudFrontOriginRequestPolicyCookiesConfigCookies = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-headersconfig.html--module Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyHeadersConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontOriginRequestPolicyHeadersConfig.--- See 'cloudFrontOriginRequestPolicyHeadersConfig' for a more convenient--- constructor.-data CloudFrontOriginRequestPolicyHeadersConfig =- CloudFrontOriginRequestPolicyHeadersConfig- { _cloudFrontOriginRequestPolicyHeadersConfigHeaderBehavior :: Val Text- , _cloudFrontOriginRequestPolicyHeadersConfigHeaders :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontOriginRequestPolicyHeadersConfig where- toJSON CloudFrontOriginRequestPolicyHeadersConfig{..} =- object $- catMaybes- [ (Just . ("HeaderBehavior",) . toJSON) _cloudFrontOriginRequestPolicyHeadersConfigHeaderBehavior- , fmap (("Headers",) . toJSON) _cloudFrontOriginRequestPolicyHeadersConfigHeaders- ]---- | Constructor for 'CloudFrontOriginRequestPolicyHeadersConfig' containing--- required fields as arguments.-cloudFrontOriginRequestPolicyHeadersConfig- :: Val Text -- ^ 'cforphcHeaderBehavior'- -> CloudFrontOriginRequestPolicyHeadersConfig-cloudFrontOriginRequestPolicyHeadersConfig headerBehaviorarg =- CloudFrontOriginRequestPolicyHeadersConfig- { _cloudFrontOriginRequestPolicyHeadersConfigHeaderBehavior = headerBehaviorarg- , _cloudFrontOriginRequestPolicyHeadersConfigHeaders = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-headersconfig.html#cfn-cloudfront-originrequestpolicy-headersconfig-headerbehavior-cforphcHeaderBehavior :: Lens' CloudFrontOriginRequestPolicyHeadersConfig (Val Text)-cforphcHeaderBehavior = lens _cloudFrontOriginRequestPolicyHeadersConfigHeaderBehavior (\s a -> s { _cloudFrontOriginRequestPolicyHeadersConfigHeaderBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-headersconfig.html#cfn-cloudfront-originrequestpolicy-headersconfig-headers-cforphcHeaders :: Lens' CloudFrontOriginRequestPolicyHeadersConfig (Maybe (ValList Text))-cforphcHeaders = lens _cloudFrontOriginRequestPolicyHeadersConfigHeaders (\s a -> s { _cloudFrontOriginRequestPolicyHeadersConfigHeaders = a })
@@ -1,74 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-originrequestpolicyconfig.html--module Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyOriginRequestPolicyConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyCookiesConfig-import Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyHeadersConfig-import Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyQueryStringsConfig---- | Full data type definition for--- CloudFrontOriginRequestPolicyOriginRequestPolicyConfig. See--- 'cloudFrontOriginRequestPolicyOriginRequestPolicyConfig' for a more--- convenient constructor.-data CloudFrontOriginRequestPolicyOriginRequestPolicyConfig =- CloudFrontOriginRequestPolicyOriginRequestPolicyConfig- { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigComment :: Maybe (Val Text)- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigCookiesConfig :: CloudFrontOriginRequestPolicyCookiesConfig- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigHeadersConfig :: CloudFrontOriginRequestPolicyHeadersConfig- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigName :: Val Text- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigQueryStringsConfig :: CloudFrontOriginRequestPolicyQueryStringsConfig- } deriving (Show, Eq)--instance ToJSON CloudFrontOriginRequestPolicyOriginRequestPolicyConfig where- toJSON CloudFrontOriginRequestPolicyOriginRequestPolicyConfig{..} =- object $- catMaybes- [ fmap (("Comment",) . toJSON) _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigComment- , (Just . ("CookiesConfig",) . toJSON) _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigCookiesConfig- , (Just . ("HeadersConfig",) . toJSON) _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigHeadersConfig- , (Just . ("Name",) . toJSON) _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigName- , (Just . ("QueryStringsConfig",) . toJSON) _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigQueryStringsConfig- ]---- | Constructor for 'CloudFrontOriginRequestPolicyOriginRequestPolicyConfig'--- containing required fields as arguments.-cloudFrontOriginRequestPolicyOriginRequestPolicyConfig- :: CloudFrontOriginRequestPolicyCookiesConfig -- ^ 'cforporpcCookiesConfig'- -> CloudFrontOriginRequestPolicyHeadersConfig -- ^ 'cforporpcHeadersConfig'- -> Val Text -- ^ 'cforporpcName'- -> CloudFrontOriginRequestPolicyQueryStringsConfig -- ^ 'cforporpcQueryStringsConfig'- -> CloudFrontOriginRequestPolicyOriginRequestPolicyConfig-cloudFrontOriginRequestPolicyOriginRequestPolicyConfig cookiesConfigarg headersConfigarg namearg queryStringsConfigarg =- CloudFrontOriginRequestPolicyOriginRequestPolicyConfig- { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigComment = Nothing- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigCookiesConfig = cookiesConfigarg- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigHeadersConfig = headersConfigarg- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigName = namearg- , _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigQueryStringsConfig = queryStringsConfigarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-originrequestpolicyconfig.html#cfn-cloudfront-originrequestpolicy-originrequestpolicyconfig-comment-cforporpcComment :: Lens' CloudFrontOriginRequestPolicyOriginRequestPolicyConfig (Maybe (Val Text))-cforporpcComment = lens _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigComment (\s a -> s { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigComment = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-originrequestpolicyconfig.html#cfn-cloudfront-originrequestpolicy-originrequestpolicyconfig-cookiesconfig-cforporpcCookiesConfig :: Lens' CloudFrontOriginRequestPolicyOriginRequestPolicyConfig CloudFrontOriginRequestPolicyCookiesConfig-cforporpcCookiesConfig = lens _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigCookiesConfig (\s a -> s { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigCookiesConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-originrequestpolicyconfig.html#cfn-cloudfront-originrequestpolicy-originrequestpolicyconfig-headersconfig-cforporpcHeadersConfig :: Lens' CloudFrontOriginRequestPolicyOriginRequestPolicyConfig CloudFrontOriginRequestPolicyHeadersConfig-cforporpcHeadersConfig = lens _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigHeadersConfig (\s a -> s { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigHeadersConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-originrequestpolicyconfig.html#cfn-cloudfront-originrequestpolicy-originrequestpolicyconfig-name-cforporpcName :: Lens' CloudFrontOriginRequestPolicyOriginRequestPolicyConfig (Val Text)-cforporpcName = lens _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigName (\s a -> s { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-originrequestpolicyconfig.html#cfn-cloudfront-originrequestpolicy-originrequestpolicyconfig-querystringsconfig-cforporpcQueryStringsConfig :: Lens' CloudFrontOriginRequestPolicyOriginRequestPolicyConfig CloudFrontOriginRequestPolicyQueryStringsConfig-cforporpcQueryStringsConfig = lens _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigQueryStringsConfig (\s a -> s { _cloudFrontOriginRequestPolicyOriginRequestPolicyConfigQueryStringsConfig = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-querystringsconfig.html--module Stratosphere.ResourceProperties.CloudFrontOriginRequestPolicyQueryStringsConfig where--import Stratosphere.ResourceImports----- | Full data type definition for--- CloudFrontOriginRequestPolicyQueryStringsConfig. See--- 'cloudFrontOriginRequestPolicyQueryStringsConfig' for a more convenient--- constructor.-data CloudFrontOriginRequestPolicyQueryStringsConfig =- CloudFrontOriginRequestPolicyQueryStringsConfig- { _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStringBehavior :: Val Text- , _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStrings :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudFrontOriginRequestPolicyQueryStringsConfig where- toJSON CloudFrontOriginRequestPolicyQueryStringsConfig{..} =- object $- catMaybes- [ (Just . ("QueryStringBehavior",) . toJSON) _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStringBehavior- , fmap (("QueryStrings",) . toJSON) _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStrings- ]---- | Constructor for 'CloudFrontOriginRequestPolicyQueryStringsConfig'--- containing required fields as arguments.-cloudFrontOriginRequestPolicyQueryStringsConfig- :: Val Text -- ^ 'cforpqscQueryStringBehavior'- -> CloudFrontOriginRequestPolicyQueryStringsConfig-cloudFrontOriginRequestPolicyQueryStringsConfig queryStringBehaviorarg =- CloudFrontOriginRequestPolicyQueryStringsConfig- { _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStringBehavior = queryStringBehaviorarg- , _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStrings = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-querystringsconfig.html#cfn-cloudfront-originrequestpolicy-querystringsconfig-querystringbehavior-cforpqscQueryStringBehavior :: Lens' CloudFrontOriginRequestPolicyQueryStringsConfig (Val Text)-cforpqscQueryStringBehavior = lens _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStringBehavior (\s a -> s { _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStringBehavior = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-originrequestpolicy-querystringsconfig.html#cfn-cloudfront-originrequestpolicy-querystringsconfig-querystrings-cforpqscQueryStrings :: Lens' CloudFrontOriginRequestPolicyQueryStringsConfig (Maybe (ValList Text))-cforpqscQueryStrings = lens _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStrings (\s a -> s { _cloudFrontOriginRequestPolicyQueryStringsConfigQueryStrings = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-realtimelogconfig-endpoint.html--module Stratosphere.ResourceProperties.CloudFrontRealtimeLogConfigEndPoint where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontRealtimeLogConfigKinesisStreamConfig---- | Full data type definition for CloudFrontRealtimeLogConfigEndPoint. See--- 'cloudFrontRealtimeLogConfigEndPoint' for a more convenient constructor.-data CloudFrontRealtimeLogConfigEndPoint =- CloudFrontRealtimeLogConfigEndPoint- { _cloudFrontRealtimeLogConfigEndPointKinesisStreamConfig :: CloudFrontRealtimeLogConfigKinesisStreamConfig- , _cloudFrontRealtimeLogConfigEndPointStreamType :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontRealtimeLogConfigEndPoint where- toJSON CloudFrontRealtimeLogConfigEndPoint{..} =- object $- catMaybes- [ (Just . ("KinesisStreamConfig",) . toJSON) _cloudFrontRealtimeLogConfigEndPointKinesisStreamConfig- , (Just . ("StreamType",) . toJSON) _cloudFrontRealtimeLogConfigEndPointStreamType- ]---- | Constructor for 'CloudFrontRealtimeLogConfigEndPoint' containing required--- fields as arguments.-cloudFrontRealtimeLogConfigEndPoint- :: CloudFrontRealtimeLogConfigKinesisStreamConfig -- ^ 'cfrlcepKinesisStreamConfig'- -> Val Text -- ^ 'cfrlcepStreamType'- -> CloudFrontRealtimeLogConfigEndPoint-cloudFrontRealtimeLogConfigEndPoint kinesisStreamConfigarg streamTypearg =- CloudFrontRealtimeLogConfigEndPoint- { _cloudFrontRealtimeLogConfigEndPointKinesisStreamConfig = kinesisStreamConfigarg- , _cloudFrontRealtimeLogConfigEndPointStreamType = streamTypearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-realtimelogconfig-endpoint.html#cfn-cloudfront-realtimelogconfig-endpoint-kinesisstreamconfig-cfrlcepKinesisStreamConfig :: Lens' CloudFrontRealtimeLogConfigEndPoint CloudFrontRealtimeLogConfigKinesisStreamConfig-cfrlcepKinesisStreamConfig = lens _cloudFrontRealtimeLogConfigEndPointKinesisStreamConfig (\s a -> s { _cloudFrontRealtimeLogConfigEndPointKinesisStreamConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-realtimelogconfig-endpoint.html#cfn-cloudfront-realtimelogconfig-endpoint-streamtype-cfrlcepStreamType :: Lens' CloudFrontRealtimeLogConfigEndPoint (Val Text)-cfrlcepStreamType = lens _cloudFrontRealtimeLogConfigEndPointStreamType (\s a -> s { _cloudFrontRealtimeLogConfigEndPointStreamType = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-realtimelogconfig-kinesisstreamconfig.html--module Stratosphere.ResourceProperties.CloudFrontRealtimeLogConfigKinesisStreamConfig where--import Stratosphere.ResourceImports----- | Full data type definition for--- CloudFrontRealtimeLogConfigKinesisStreamConfig. See--- 'cloudFrontRealtimeLogConfigKinesisStreamConfig' for a more convenient--- constructor.-data CloudFrontRealtimeLogConfigKinesisStreamConfig =- CloudFrontRealtimeLogConfigKinesisStreamConfig- { _cloudFrontRealtimeLogConfigKinesisStreamConfigRoleArn :: Val Text- , _cloudFrontRealtimeLogConfigKinesisStreamConfigStreamArn :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontRealtimeLogConfigKinesisStreamConfig where- toJSON CloudFrontRealtimeLogConfigKinesisStreamConfig{..} =- object $- catMaybes- [ (Just . ("RoleArn",) . toJSON) _cloudFrontRealtimeLogConfigKinesisStreamConfigRoleArn- , (Just . ("StreamArn",) . toJSON) _cloudFrontRealtimeLogConfigKinesisStreamConfigStreamArn- ]---- | Constructor for 'CloudFrontRealtimeLogConfigKinesisStreamConfig'--- containing required fields as arguments.-cloudFrontRealtimeLogConfigKinesisStreamConfig- :: Val Text -- ^ 'cfrlckscRoleArn'- -> Val Text -- ^ 'cfrlckscStreamArn'- -> CloudFrontRealtimeLogConfigKinesisStreamConfig-cloudFrontRealtimeLogConfigKinesisStreamConfig roleArnarg streamArnarg =- CloudFrontRealtimeLogConfigKinesisStreamConfig- { _cloudFrontRealtimeLogConfigKinesisStreamConfigRoleArn = roleArnarg- , _cloudFrontRealtimeLogConfigKinesisStreamConfigStreamArn = streamArnarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-realtimelogconfig-kinesisstreamconfig.html#cfn-cloudfront-realtimelogconfig-kinesisstreamconfig-rolearn-cfrlckscRoleArn :: Lens' CloudFrontRealtimeLogConfigKinesisStreamConfig (Val Text)-cfrlckscRoleArn = lens _cloudFrontRealtimeLogConfigKinesisStreamConfigRoleArn (\s a -> s { _cloudFrontRealtimeLogConfigKinesisStreamConfigRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-realtimelogconfig-kinesisstreamconfig.html#cfn-cloudfront-realtimelogconfig-kinesisstreamconfig-streamarn-cfrlckscStreamArn :: Lens' CloudFrontRealtimeLogConfigKinesisStreamConfig (Val Text)-cfrlckscStreamArn = lens _cloudFrontRealtimeLogConfigKinesisStreamConfigStreamArn (\s a -> s { _cloudFrontRealtimeLogConfigKinesisStreamConfigStreamArn = a })
@@ -1,56 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-logging.html--module Stratosphere.ResourceProperties.CloudFrontStreamingDistributionLogging where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontStreamingDistributionLogging. See--- 'cloudFrontStreamingDistributionLogging' for a more convenient--- constructor.-data CloudFrontStreamingDistributionLogging =- CloudFrontStreamingDistributionLogging- { _cloudFrontStreamingDistributionLoggingBucket :: Val Text- , _cloudFrontStreamingDistributionLoggingEnabled :: Val Bool- , _cloudFrontStreamingDistributionLoggingPrefix :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontStreamingDistributionLogging where- toJSON CloudFrontStreamingDistributionLogging{..} =- object $- catMaybes- [ (Just . ("Bucket",) . toJSON) _cloudFrontStreamingDistributionLoggingBucket- , (Just . ("Enabled",) . toJSON) _cloudFrontStreamingDistributionLoggingEnabled- , (Just . ("Prefix",) . toJSON) _cloudFrontStreamingDistributionLoggingPrefix- ]---- | Constructor for 'CloudFrontStreamingDistributionLogging' containing--- required fields as arguments.-cloudFrontStreamingDistributionLogging- :: Val Text -- ^ 'cfsdlBucket'- -> Val Bool -- ^ 'cfsdlEnabled'- -> Val Text -- ^ 'cfsdlPrefix'- -> CloudFrontStreamingDistributionLogging-cloudFrontStreamingDistributionLogging bucketarg enabledarg prefixarg =- CloudFrontStreamingDistributionLogging- { _cloudFrontStreamingDistributionLoggingBucket = bucketarg- , _cloudFrontStreamingDistributionLoggingEnabled = enabledarg- , _cloudFrontStreamingDistributionLoggingPrefix = prefixarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-logging.html#cfn-cloudfront-streamingdistribution-logging-bucket-cfsdlBucket :: Lens' CloudFrontStreamingDistributionLogging (Val Text)-cfsdlBucket = lens _cloudFrontStreamingDistributionLoggingBucket (\s a -> s { _cloudFrontStreamingDistributionLoggingBucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-logging.html#cfn-cloudfront-streamingdistribution-logging-enabled-cfsdlEnabled :: Lens' CloudFrontStreamingDistributionLogging (Val Bool)-cfsdlEnabled = lens _cloudFrontStreamingDistributionLoggingEnabled (\s a -> s { _cloudFrontStreamingDistributionLoggingEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-logging.html#cfn-cloudfront-streamingdistribution-logging-prefix-cfsdlPrefix :: Lens' CloudFrontStreamingDistributionLogging (Val Text)-cfsdlPrefix = lens _cloudFrontStreamingDistributionLoggingPrefix (\s a -> s { _cloudFrontStreamingDistributionLoggingPrefix = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-s3origin.html--module Stratosphere.ResourceProperties.CloudFrontStreamingDistributionS3Origin where--import Stratosphere.ResourceImports----- | Full data type definition for CloudFrontStreamingDistributionS3Origin.--- See 'cloudFrontStreamingDistributionS3Origin' for a more convenient--- constructor.-data CloudFrontStreamingDistributionS3Origin =- CloudFrontStreamingDistributionS3Origin- { _cloudFrontStreamingDistributionS3OriginDomainName :: Val Text- , _cloudFrontStreamingDistributionS3OriginOriginAccessIdentity :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudFrontStreamingDistributionS3Origin where- toJSON CloudFrontStreamingDistributionS3Origin{..} =- object $- catMaybes- [ (Just . ("DomainName",) . toJSON) _cloudFrontStreamingDistributionS3OriginDomainName- , (Just . ("OriginAccessIdentity",) . toJSON) _cloudFrontStreamingDistributionS3OriginOriginAccessIdentity- ]---- | Constructor for 'CloudFrontStreamingDistributionS3Origin' containing--- required fields as arguments.-cloudFrontStreamingDistributionS3Origin- :: Val Text -- ^ 'cfsdsoDomainName'- -> Val Text -- ^ 'cfsdsoOriginAccessIdentity'- -> CloudFrontStreamingDistributionS3Origin-cloudFrontStreamingDistributionS3Origin domainNamearg originAccessIdentityarg =- CloudFrontStreamingDistributionS3Origin- { _cloudFrontStreamingDistributionS3OriginDomainName = domainNamearg- , _cloudFrontStreamingDistributionS3OriginOriginAccessIdentity = originAccessIdentityarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-s3origin.html#cfn-cloudfront-streamingdistribution-s3origin-domainname-cfsdsoDomainName :: Lens' CloudFrontStreamingDistributionS3Origin (Val Text)-cfsdsoDomainName = lens _cloudFrontStreamingDistributionS3OriginDomainName (\s a -> s { _cloudFrontStreamingDistributionS3OriginDomainName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-s3origin.html#cfn-cloudfront-streamingdistribution-s3origin-originaccessidentity-cfsdsoOriginAccessIdentity :: Lens' CloudFrontStreamingDistributionS3Origin (Val Text)-cfsdsoOriginAccessIdentity = lens _cloudFrontStreamingDistributionS3OriginOriginAccessIdentity (\s a -> s { _cloudFrontStreamingDistributionS3OriginOriginAccessIdentity = a })
@@ -1,89 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html--module Stratosphere.ResourceProperties.CloudFrontStreamingDistributionStreamingDistributionConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudFrontStreamingDistributionLogging-import Stratosphere.ResourceProperties.CloudFrontStreamingDistributionS3Origin-import Stratosphere.ResourceProperties.CloudFrontStreamingDistributionTrustedSigners---- | Full data type definition for--- CloudFrontStreamingDistributionStreamingDistributionConfig. See--- 'cloudFrontStreamingDistributionStreamingDistributionConfig' for a more--- convenient constructor.-data CloudFrontStreamingDistributionStreamingDistributionConfig =- CloudFrontStreamingDistributionStreamingDistributionConfig- { _cloudFrontStreamingDistributionStreamingDistributionConfigAliases :: Maybe (ValList Text)- , _cloudFrontStreamingDistributionStreamingDistributionConfigComment :: Val Text- , _cloudFrontStreamingDistributionStreamingDistributionConfigEnabled :: Val Bool- , _cloudFrontStreamingDistributionStreamingDistributionConfigLogging :: Maybe CloudFrontStreamingDistributionLogging- , _cloudFrontStreamingDistributionStreamingDistributionConfigPriceClass :: Maybe (Val Text)- , _cloudFrontStreamingDistributionStreamingDistributionConfigS3Origin :: CloudFrontStreamingDistributionS3Origin- , _cloudFrontStreamingDistributionStreamingDistributionConfigTrustedSigners :: CloudFrontStreamingDistributionTrustedSigners- } deriving (Show, Eq)--instance ToJSON CloudFrontStreamingDistributionStreamingDistributionConfig where- toJSON CloudFrontStreamingDistributionStreamingDistributionConfig{..} =- object $- catMaybes- [ fmap (("Aliases",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigAliases- , (Just . ("Comment",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigComment- , (Just . ("Enabled",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigEnabled- , fmap (("Logging",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigLogging- , fmap (("PriceClass",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigPriceClass- , (Just . ("S3Origin",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigS3Origin- , (Just . ("TrustedSigners",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigTrustedSigners- ]---- | Constructor for--- 'CloudFrontStreamingDistributionStreamingDistributionConfig' containing--- required fields as arguments.-cloudFrontStreamingDistributionStreamingDistributionConfig- :: Val Text -- ^ 'cfsdsdcComment'- -> Val Bool -- ^ 'cfsdsdcEnabled'- -> CloudFrontStreamingDistributionS3Origin -- ^ 'cfsdsdcS3Origin'- -> CloudFrontStreamingDistributionTrustedSigners -- ^ 'cfsdsdcTrustedSigners'- -> CloudFrontStreamingDistributionStreamingDistributionConfig-cloudFrontStreamingDistributionStreamingDistributionConfig commentarg enabledarg s3Originarg trustedSignersarg =- CloudFrontStreamingDistributionStreamingDistributionConfig- { _cloudFrontStreamingDistributionStreamingDistributionConfigAliases = Nothing- , _cloudFrontStreamingDistributionStreamingDistributionConfigComment = commentarg- , _cloudFrontStreamingDistributionStreamingDistributionConfigEnabled = enabledarg- , _cloudFrontStreamingDistributionStreamingDistributionConfigLogging = Nothing- , _cloudFrontStreamingDistributionStreamingDistributionConfigPriceClass = Nothing- , _cloudFrontStreamingDistributionStreamingDistributionConfigS3Origin = s3Originarg- , _cloudFrontStreamingDistributionStreamingDistributionConfigTrustedSigners = trustedSignersarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-aliases-cfsdsdcAliases :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig (Maybe (ValList Text))-cfsdsdcAliases = lens _cloudFrontStreamingDistributionStreamingDistributionConfigAliases (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigAliases = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-comment-cfsdsdcComment :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig (Val Text)-cfsdsdcComment = lens _cloudFrontStreamingDistributionStreamingDistributionConfigComment (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigComment = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-enabled-cfsdsdcEnabled :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig (Val Bool)-cfsdsdcEnabled = lens _cloudFrontStreamingDistributionStreamingDistributionConfigEnabled (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-logging-cfsdsdcLogging :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig (Maybe CloudFrontStreamingDistributionLogging)-cfsdsdcLogging = lens _cloudFrontStreamingDistributionStreamingDistributionConfigLogging (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigLogging = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-priceclass-cfsdsdcPriceClass :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig (Maybe (Val Text))-cfsdsdcPriceClass = lens _cloudFrontStreamingDistributionStreamingDistributionConfigPriceClass (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigPriceClass = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-s3origin-cfsdsdcS3Origin :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig CloudFrontStreamingDistributionS3Origin-cfsdsdcS3Origin = lens _cloudFrontStreamingDistributionStreamingDistributionConfigS3Origin (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigS3Origin = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-streamingdistributionconfig.html#cfn-cloudfront-streamingdistribution-streamingdistributionconfig-trustedsigners-cfsdsdcTrustedSigners :: Lens' CloudFrontStreamingDistributionStreamingDistributionConfig CloudFrontStreamingDistributionTrustedSigners-cfsdsdcTrustedSigners = lens _cloudFrontStreamingDistributionStreamingDistributionConfigTrustedSigners (\s a -> s { _cloudFrontStreamingDistributionStreamingDistributionConfigTrustedSigners = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-trustedsigners.html--module Stratosphere.ResourceProperties.CloudFrontStreamingDistributionTrustedSigners where--import Stratosphere.ResourceImports----- | Full data type definition for--- CloudFrontStreamingDistributionTrustedSigners. See--- 'cloudFrontStreamingDistributionTrustedSigners' for a more convenient--- constructor.-data CloudFrontStreamingDistributionTrustedSigners =- CloudFrontStreamingDistributionTrustedSigners- { _cloudFrontStreamingDistributionTrustedSignersAwsAccountNumbers :: Maybe (ValList Text)- , _cloudFrontStreamingDistributionTrustedSignersEnabled :: Val Bool- } deriving (Show, Eq)--instance ToJSON CloudFrontStreamingDistributionTrustedSigners where- toJSON CloudFrontStreamingDistributionTrustedSigners{..} =- object $- catMaybes- [ fmap (("AwsAccountNumbers",) . toJSON) _cloudFrontStreamingDistributionTrustedSignersAwsAccountNumbers- , (Just . ("Enabled",) . toJSON) _cloudFrontStreamingDistributionTrustedSignersEnabled- ]---- | Constructor for 'CloudFrontStreamingDistributionTrustedSigners'--- containing required fields as arguments.-cloudFrontStreamingDistributionTrustedSigners- :: Val Bool -- ^ 'cfsdtsEnabled'- -> CloudFrontStreamingDistributionTrustedSigners-cloudFrontStreamingDistributionTrustedSigners enabledarg =- CloudFrontStreamingDistributionTrustedSigners- { _cloudFrontStreamingDistributionTrustedSignersAwsAccountNumbers = Nothing- , _cloudFrontStreamingDistributionTrustedSignersEnabled = enabledarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-trustedsigners.html#cfn-cloudfront-streamingdistribution-trustedsigners-awsaccountnumbers-cfsdtsAwsAccountNumbers :: Lens' CloudFrontStreamingDistributionTrustedSigners (Maybe (ValList Text))-cfsdtsAwsAccountNumbers = lens _cloudFrontStreamingDistributionTrustedSignersAwsAccountNumbers (\s a -> s { _cloudFrontStreamingDistributionTrustedSignersAwsAccountNumbers = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudfront-streamingdistribution-trustedsigners.html#cfn-cloudfront-streamingdistribution-trustedsigners-enabled-cfsdtsEnabled :: Lens' CloudFrontStreamingDistributionTrustedSigners (Val Bool)-cfsdtsEnabled = lens _cloudFrontStreamingDistributionTrustedSignersEnabled (\s a -> s { _cloudFrontStreamingDistributionTrustedSignersEnabled = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-dataresource.html--module Stratosphere.ResourceProperties.CloudTrailTrailDataResource where--import Stratosphere.ResourceImports----- | Full data type definition for CloudTrailTrailDataResource. See--- 'cloudTrailTrailDataResource' for a more convenient constructor.-data CloudTrailTrailDataResource =- CloudTrailTrailDataResource- { _cloudTrailTrailDataResourceType :: Val Text- , _cloudTrailTrailDataResourceValues :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CloudTrailTrailDataResource where- toJSON CloudTrailTrailDataResource{..} =- object $- catMaybes- [ (Just . ("Type",) . toJSON) _cloudTrailTrailDataResourceType- , fmap (("Values",) . toJSON) _cloudTrailTrailDataResourceValues- ]---- | Constructor for 'CloudTrailTrailDataResource' containing required fields--- as arguments.-cloudTrailTrailDataResource- :: Val Text -- ^ 'cttdrType'- -> CloudTrailTrailDataResource-cloudTrailTrailDataResource typearg =- CloudTrailTrailDataResource- { _cloudTrailTrailDataResourceType = typearg- , _cloudTrailTrailDataResourceValues = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-dataresource.html#cfn-cloudtrail-trail-dataresource-type-cttdrType :: Lens' CloudTrailTrailDataResource (Val Text)-cttdrType = lens _cloudTrailTrailDataResourceType (\s a -> s { _cloudTrailTrailDataResourceType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-dataresource.html#cfn-cloudtrail-trail-dataresource-values-cttdrValues :: Lens' CloudTrailTrailDataResource (Maybe (ValList Text))-cttdrValues = lens _cloudTrailTrailDataResourceValues (\s a -> s { _cloudTrailTrailDataResourceValues = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-eventselector.html--module Stratosphere.ResourceProperties.CloudTrailTrailEventSelector where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudTrailTrailDataResource---- | Full data type definition for CloudTrailTrailEventSelector. See--- 'cloudTrailTrailEventSelector' for a more convenient constructor.-data CloudTrailTrailEventSelector =- CloudTrailTrailEventSelector- { _cloudTrailTrailEventSelectorDataResources :: Maybe [CloudTrailTrailDataResource]- , _cloudTrailTrailEventSelectorIncludeManagementEvents :: Maybe (Val Bool)- , _cloudTrailTrailEventSelectorReadWriteType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudTrailTrailEventSelector where- toJSON CloudTrailTrailEventSelector{..} =- object $- catMaybes- [ fmap (("DataResources",) . toJSON) _cloudTrailTrailEventSelectorDataResources- , fmap (("IncludeManagementEvents",) . toJSON) _cloudTrailTrailEventSelectorIncludeManagementEvents- , fmap (("ReadWriteType",) . toJSON) _cloudTrailTrailEventSelectorReadWriteType- ]---- | Constructor for 'CloudTrailTrailEventSelector' containing required fields--- as arguments.-cloudTrailTrailEventSelector- :: CloudTrailTrailEventSelector-cloudTrailTrailEventSelector =- CloudTrailTrailEventSelector- { _cloudTrailTrailEventSelectorDataResources = Nothing- , _cloudTrailTrailEventSelectorIncludeManagementEvents = Nothing- , _cloudTrailTrailEventSelectorReadWriteType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-eventselector.html#cfn-cloudtrail-trail-eventselector-dataresources-cttesDataResources :: Lens' CloudTrailTrailEventSelector (Maybe [CloudTrailTrailDataResource])-cttesDataResources = lens _cloudTrailTrailEventSelectorDataResources (\s a -> s { _cloudTrailTrailEventSelectorDataResources = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-eventselector.html#cfn-cloudtrail-trail-eventselector-includemanagementevents-cttesIncludeManagementEvents :: Lens' CloudTrailTrailEventSelector (Maybe (Val Bool))-cttesIncludeManagementEvents = lens _cloudTrailTrailEventSelectorIncludeManagementEvents (\s a -> s { _cloudTrailTrailEventSelectorIncludeManagementEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudtrail-trail-eventselector.html#cfn-cloudtrail-trail-eventselector-readwritetype-cttesReadWriteType :: Lens' CloudTrailTrailEventSelector (Maybe (Val Text))-cttesReadWriteType = lens _cloudTrailTrailEventSelectorReadWriteType (\s a -> s { _cloudTrailTrailEventSelectorReadWriteType = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cw-dimension.html--module Stratosphere.ResourceProperties.CloudWatchAlarmDimension where--import Stratosphere.ResourceImports----- | Full data type definition for CloudWatchAlarmDimension. See--- 'cloudWatchAlarmDimension' for a more convenient constructor.-data CloudWatchAlarmDimension =- CloudWatchAlarmDimension- { _cloudWatchAlarmDimensionName :: Val Text- , _cloudWatchAlarmDimensionValue :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudWatchAlarmDimension where- toJSON CloudWatchAlarmDimension{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _cloudWatchAlarmDimensionName- , (Just . ("Value",) . toJSON) _cloudWatchAlarmDimensionValue- ]---- | Constructor for 'CloudWatchAlarmDimension' containing required fields as--- arguments.-cloudWatchAlarmDimension- :: Val Text -- ^ 'cwadName'- -> Val Text -- ^ 'cwadValue'- -> CloudWatchAlarmDimension-cloudWatchAlarmDimension namearg valuearg =- CloudWatchAlarmDimension- { _cloudWatchAlarmDimensionName = namearg- , _cloudWatchAlarmDimensionValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cw-dimension.html#cfn-cloudwatch-alarm-dimension-name-cwadName :: Lens' CloudWatchAlarmDimension (Val Text)-cwadName = lens _cloudWatchAlarmDimensionName (\s a -> s { _cloudWatchAlarmDimensionName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cw-dimension.html#cfn-cloudwatch-alarm-dimension-value-cwadValue :: Lens' CloudWatchAlarmDimension (Val Text)-cwadValue = lens _cloudWatchAlarmDimensionValue (\s a -> s { _cloudWatchAlarmDimensionValue = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metric.html--module Stratosphere.ResourceProperties.CloudWatchAlarmMetric where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudWatchAlarmDimension---- | Full data type definition for CloudWatchAlarmMetric. See--- 'cloudWatchAlarmMetric' for a more convenient constructor.-data CloudWatchAlarmMetric =- CloudWatchAlarmMetric- { _cloudWatchAlarmMetricDimensions :: Maybe [CloudWatchAlarmDimension]- , _cloudWatchAlarmMetricMetricName :: Maybe (Val Text)- , _cloudWatchAlarmMetricNamespace :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudWatchAlarmMetric where- toJSON CloudWatchAlarmMetric{..} =- object $- catMaybes- [ fmap (("Dimensions",) . toJSON) _cloudWatchAlarmMetricDimensions- , fmap (("MetricName",) . toJSON) _cloudWatchAlarmMetricMetricName- , fmap (("Namespace",) . toJSON) _cloudWatchAlarmMetricNamespace- ]---- | Constructor for 'CloudWatchAlarmMetric' containing required fields as--- arguments.-cloudWatchAlarmMetric- :: CloudWatchAlarmMetric-cloudWatchAlarmMetric =- CloudWatchAlarmMetric- { _cloudWatchAlarmMetricDimensions = Nothing- , _cloudWatchAlarmMetricMetricName = Nothing- , _cloudWatchAlarmMetricNamespace = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metric.html#cfn-cloudwatch-alarm-metric-dimensions-cwamDimensions :: Lens' CloudWatchAlarmMetric (Maybe [CloudWatchAlarmDimension])-cwamDimensions = lens _cloudWatchAlarmMetricDimensions (\s a -> s { _cloudWatchAlarmMetricDimensions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metric.html#cfn-cloudwatch-alarm-metric-metricname-cwamMetricName :: Lens' CloudWatchAlarmMetric (Maybe (Val Text))-cwamMetricName = lens _cloudWatchAlarmMetricMetricName (\s a -> s { _cloudWatchAlarmMetricMetricName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metric.html#cfn-cloudwatch-alarm-metric-namespace-cwamNamespace :: Lens' CloudWatchAlarmMetric (Maybe (Val Text))-cwamNamespace = lens _cloudWatchAlarmMetricNamespace (\s a -> s { _cloudWatchAlarmMetricNamespace = a })
@@ -1,74 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html--module Stratosphere.ResourceProperties.CloudWatchAlarmMetricDataQuery where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudWatchAlarmMetricStat---- | Full data type definition for CloudWatchAlarmMetricDataQuery. See--- 'cloudWatchAlarmMetricDataQuery' for a more convenient constructor.-data CloudWatchAlarmMetricDataQuery =- CloudWatchAlarmMetricDataQuery- { _cloudWatchAlarmMetricDataQueryExpression :: Maybe (Val Text)- , _cloudWatchAlarmMetricDataQueryId :: Val Text- , _cloudWatchAlarmMetricDataQueryLabel :: Maybe (Val Text)- , _cloudWatchAlarmMetricDataQueryMetricStat :: Maybe CloudWatchAlarmMetricStat- , _cloudWatchAlarmMetricDataQueryPeriod :: Maybe (Val Integer)- , _cloudWatchAlarmMetricDataQueryReturnData :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON CloudWatchAlarmMetricDataQuery where- toJSON CloudWatchAlarmMetricDataQuery{..} =- object $- catMaybes- [ fmap (("Expression",) . toJSON) _cloudWatchAlarmMetricDataQueryExpression- , (Just . ("Id",) . toJSON) _cloudWatchAlarmMetricDataQueryId- , fmap (("Label",) . toJSON) _cloudWatchAlarmMetricDataQueryLabel- , fmap (("MetricStat",) . toJSON) _cloudWatchAlarmMetricDataQueryMetricStat- , fmap (("Period",) . toJSON) _cloudWatchAlarmMetricDataQueryPeriod- , fmap (("ReturnData",) . toJSON) _cloudWatchAlarmMetricDataQueryReturnData- ]---- | Constructor for 'CloudWatchAlarmMetricDataQuery' containing required--- fields as arguments.-cloudWatchAlarmMetricDataQuery- :: Val Text -- ^ 'cwamdqId'- -> CloudWatchAlarmMetricDataQuery-cloudWatchAlarmMetricDataQuery idarg =- CloudWatchAlarmMetricDataQuery- { _cloudWatchAlarmMetricDataQueryExpression = Nothing- , _cloudWatchAlarmMetricDataQueryId = idarg- , _cloudWatchAlarmMetricDataQueryLabel = Nothing- , _cloudWatchAlarmMetricDataQueryMetricStat = Nothing- , _cloudWatchAlarmMetricDataQueryPeriod = Nothing- , _cloudWatchAlarmMetricDataQueryReturnData = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html#cfn-cloudwatch-alarm-metricdataquery-expression-cwamdqExpression :: Lens' CloudWatchAlarmMetricDataQuery (Maybe (Val Text))-cwamdqExpression = lens _cloudWatchAlarmMetricDataQueryExpression (\s a -> s { _cloudWatchAlarmMetricDataQueryExpression = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html#cfn-cloudwatch-alarm-metricdataquery-id-cwamdqId :: Lens' CloudWatchAlarmMetricDataQuery (Val Text)-cwamdqId = lens _cloudWatchAlarmMetricDataQueryId (\s a -> s { _cloudWatchAlarmMetricDataQueryId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html#cfn-cloudwatch-alarm-metricdataquery-label-cwamdqLabel :: Lens' CloudWatchAlarmMetricDataQuery (Maybe (Val Text))-cwamdqLabel = lens _cloudWatchAlarmMetricDataQueryLabel (\s a -> s { _cloudWatchAlarmMetricDataQueryLabel = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html#cfn-cloudwatch-alarm-metricdataquery-metricstat-cwamdqMetricStat :: Lens' CloudWatchAlarmMetricDataQuery (Maybe CloudWatchAlarmMetricStat)-cwamdqMetricStat = lens _cloudWatchAlarmMetricDataQueryMetricStat (\s a -> s { _cloudWatchAlarmMetricDataQueryMetricStat = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html#cfn-cloudwatch-alarm-metricdataquery-period-cwamdqPeriod :: Lens' CloudWatchAlarmMetricDataQuery (Maybe (Val Integer))-cwamdqPeriod = lens _cloudWatchAlarmMetricDataQueryPeriod (\s a -> s { _cloudWatchAlarmMetricDataQueryPeriod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricdataquery.html#cfn-cloudwatch-alarm-metricdataquery-returndata-cwamdqReturnData :: Lens' CloudWatchAlarmMetricDataQuery (Maybe (Val Bool))-cwamdqReturnData = lens _cloudWatchAlarmMetricDataQueryReturnData (\s a -> s { _cloudWatchAlarmMetricDataQueryReturnData = a })
@@ -1,62 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricstat.html--module Stratosphere.ResourceProperties.CloudWatchAlarmMetricStat where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudWatchAlarmMetric---- | Full data type definition for CloudWatchAlarmMetricStat. See--- 'cloudWatchAlarmMetricStat' for a more convenient constructor.-data CloudWatchAlarmMetricStat =- CloudWatchAlarmMetricStat- { _cloudWatchAlarmMetricStatMetric :: CloudWatchAlarmMetric- , _cloudWatchAlarmMetricStatPeriod :: Val Integer- , _cloudWatchAlarmMetricStatStat :: Val Text- , _cloudWatchAlarmMetricStatUnit :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudWatchAlarmMetricStat where- toJSON CloudWatchAlarmMetricStat{..} =- object $- catMaybes- [ (Just . ("Metric",) . toJSON) _cloudWatchAlarmMetricStatMetric- , (Just . ("Period",) . toJSON) _cloudWatchAlarmMetricStatPeriod- , (Just . ("Stat",) . toJSON) _cloudWatchAlarmMetricStatStat- , fmap (("Unit",) . toJSON) _cloudWatchAlarmMetricStatUnit- ]---- | Constructor for 'CloudWatchAlarmMetricStat' containing required fields as--- arguments.-cloudWatchAlarmMetricStat- :: CloudWatchAlarmMetric -- ^ 'cwamsMetric'- -> Val Integer -- ^ 'cwamsPeriod'- -> Val Text -- ^ 'cwamsStat'- -> CloudWatchAlarmMetricStat-cloudWatchAlarmMetricStat metricarg periodarg statarg =- CloudWatchAlarmMetricStat- { _cloudWatchAlarmMetricStatMetric = metricarg- , _cloudWatchAlarmMetricStatPeriod = periodarg- , _cloudWatchAlarmMetricStatStat = statarg- , _cloudWatchAlarmMetricStatUnit = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricstat.html#cfn-cloudwatch-alarm-metricstat-metric-cwamsMetric :: Lens' CloudWatchAlarmMetricStat CloudWatchAlarmMetric-cwamsMetric = lens _cloudWatchAlarmMetricStatMetric (\s a -> s { _cloudWatchAlarmMetricStatMetric = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricstat.html#cfn-cloudwatch-alarm-metricstat-period-cwamsPeriod :: Lens' CloudWatchAlarmMetricStat (Val Integer)-cwamsPeriod = lens _cloudWatchAlarmMetricStatPeriod (\s a -> s { _cloudWatchAlarmMetricStatPeriod = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricstat.html#cfn-cloudwatch-alarm-metricstat-stat-cwamsStat :: Lens' CloudWatchAlarmMetricStat (Val Text)-cwamsStat = lens _cloudWatchAlarmMetricStatStat (\s a -> s { _cloudWatchAlarmMetricStatStat = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-alarm-metricstat.html#cfn-cloudwatch-alarm-metricstat-unit-cwamsUnit :: Lens' CloudWatchAlarmMetricStat (Maybe (Val Text))-cwamsUnit = lens _cloudWatchAlarmMetricStatUnit (\s a -> s { _cloudWatchAlarmMetricStatUnit = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-configuration.html--module Stratosphere.ResourceProperties.CloudWatchAnomalyDetectorConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CloudWatchAnomalyDetectorRange---- | Full data type definition for CloudWatchAnomalyDetectorConfiguration. See--- 'cloudWatchAnomalyDetectorConfiguration' for a more convenient--- constructor.-data CloudWatchAnomalyDetectorConfiguration =- CloudWatchAnomalyDetectorConfiguration- { _cloudWatchAnomalyDetectorConfigurationExcludedTimeRanges :: Maybe [CloudWatchAnomalyDetectorRange]- , _cloudWatchAnomalyDetectorConfigurationMetricTimeZone :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CloudWatchAnomalyDetectorConfiguration where- toJSON CloudWatchAnomalyDetectorConfiguration{..} =- object $- catMaybes- [ fmap (("ExcludedTimeRanges",) . toJSON) _cloudWatchAnomalyDetectorConfigurationExcludedTimeRanges- , fmap (("MetricTimeZone",) . toJSON) _cloudWatchAnomalyDetectorConfigurationMetricTimeZone- ]---- | Constructor for 'CloudWatchAnomalyDetectorConfiguration' containing--- required fields as arguments.-cloudWatchAnomalyDetectorConfiguration- :: CloudWatchAnomalyDetectorConfiguration-cloudWatchAnomalyDetectorConfiguration =- CloudWatchAnomalyDetectorConfiguration- { _cloudWatchAnomalyDetectorConfigurationExcludedTimeRanges = Nothing- , _cloudWatchAnomalyDetectorConfigurationMetricTimeZone = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-configuration.html#cfn-cloudwatch-anomalydetector-configuration-excludedtimeranges-cwadcExcludedTimeRanges :: Lens' CloudWatchAnomalyDetectorConfiguration (Maybe [CloudWatchAnomalyDetectorRange])-cwadcExcludedTimeRanges = lens _cloudWatchAnomalyDetectorConfigurationExcludedTimeRanges (\s a -> s { _cloudWatchAnomalyDetectorConfigurationExcludedTimeRanges = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-configuration.html#cfn-cloudwatch-anomalydetector-configuration-metrictimezone-cwadcMetricTimeZone :: Lens' CloudWatchAnomalyDetectorConfiguration (Maybe (Val Text))-cwadcMetricTimeZone = lens _cloudWatchAnomalyDetectorConfigurationMetricTimeZone (\s a -> s { _cloudWatchAnomalyDetectorConfigurationMetricTimeZone = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-dimension.html--module Stratosphere.ResourceProperties.CloudWatchAnomalyDetectorDimension where--import Stratosphere.ResourceImports----- | Full data type definition for CloudWatchAnomalyDetectorDimension. See--- 'cloudWatchAnomalyDetectorDimension' for a more convenient constructor.-data CloudWatchAnomalyDetectorDimension =- CloudWatchAnomalyDetectorDimension- { _cloudWatchAnomalyDetectorDimensionName :: Val Text- , _cloudWatchAnomalyDetectorDimensionValue :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudWatchAnomalyDetectorDimension where- toJSON CloudWatchAnomalyDetectorDimension{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _cloudWatchAnomalyDetectorDimensionName- , (Just . ("Value",) . toJSON) _cloudWatchAnomalyDetectorDimensionValue- ]---- | Constructor for 'CloudWatchAnomalyDetectorDimension' containing required--- fields as arguments.-cloudWatchAnomalyDetectorDimension- :: Val Text -- ^ 'cwaddName'- -> Val Text -- ^ 'cwaddValue'- -> CloudWatchAnomalyDetectorDimension-cloudWatchAnomalyDetectorDimension namearg valuearg =- CloudWatchAnomalyDetectorDimension- { _cloudWatchAnomalyDetectorDimensionName = namearg- , _cloudWatchAnomalyDetectorDimensionValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-dimension.html#cfn-cloudwatch-anomalydetector-dimension-name-cwaddName :: Lens' CloudWatchAnomalyDetectorDimension (Val Text)-cwaddName = lens _cloudWatchAnomalyDetectorDimensionName (\s a -> s { _cloudWatchAnomalyDetectorDimensionName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-dimension.html#cfn-cloudwatch-anomalydetector-dimension-value-cwaddValue :: Lens' CloudWatchAnomalyDetectorDimension (Val Text)-cwaddValue = lens _cloudWatchAnomalyDetectorDimensionValue (\s a -> s { _cloudWatchAnomalyDetectorDimensionValue = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-range.html--module Stratosphere.ResourceProperties.CloudWatchAnomalyDetectorRange where--import Stratosphere.ResourceImports----- | Full data type definition for CloudWatchAnomalyDetectorRange. See--- 'cloudWatchAnomalyDetectorRange' for a more convenient constructor.-data CloudWatchAnomalyDetectorRange =- CloudWatchAnomalyDetectorRange- { _cloudWatchAnomalyDetectorRangeEndTime :: Val Text- , _cloudWatchAnomalyDetectorRangeStartTime :: Val Text- } deriving (Show, Eq)--instance ToJSON CloudWatchAnomalyDetectorRange where- toJSON CloudWatchAnomalyDetectorRange{..} =- object $- catMaybes- [ (Just . ("EndTime",) . toJSON) _cloudWatchAnomalyDetectorRangeEndTime- , (Just . ("StartTime",) . toJSON) _cloudWatchAnomalyDetectorRangeStartTime- ]---- | Constructor for 'CloudWatchAnomalyDetectorRange' containing required--- fields as arguments.-cloudWatchAnomalyDetectorRange- :: Val Text -- ^ 'cwadrEndTime'- -> Val Text -- ^ 'cwadrStartTime'- -> CloudWatchAnomalyDetectorRange-cloudWatchAnomalyDetectorRange endTimearg startTimearg =- CloudWatchAnomalyDetectorRange- { _cloudWatchAnomalyDetectorRangeEndTime = endTimearg- , _cloudWatchAnomalyDetectorRangeStartTime = startTimearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-range.html#cfn-cloudwatch-anomalydetector-range-endtime-cwadrEndTime :: Lens' CloudWatchAnomalyDetectorRange (Val Text)-cwadrEndTime = lens _cloudWatchAnomalyDetectorRangeEndTime (\s a -> s { _cloudWatchAnomalyDetectorRangeEndTime = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cloudwatch-anomalydetector-range.html#cfn-cloudwatch-anomalydetector-range-starttime-cwadrStartTime :: Lens' CloudWatchAnomalyDetectorRange (Val Text)-cwadrStartTime = lens _cloudWatchAnomalyDetectorRangeStartTime (\s a -> s { _cloudWatchAnomalyDetectorRangeStartTime = a })
@@ -1,95 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html--module Stratosphere.ResourceProperties.CodeBuildProjectArtifacts where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectArtifacts. See--- 'codeBuildProjectArtifacts' for a more convenient constructor.-data CodeBuildProjectArtifacts =- CodeBuildProjectArtifacts- { _codeBuildProjectArtifactsArtifactIdentifier :: Maybe (Val Text)- , _codeBuildProjectArtifactsEncryptionDisabled :: Maybe (Val Bool)- , _codeBuildProjectArtifactsLocation :: Maybe (Val Text)- , _codeBuildProjectArtifactsName :: Maybe (Val Text)- , _codeBuildProjectArtifactsNamespaceType :: Maybe (Val Text)- , _codeBuildProjectArtifactsOverrideArtifactName :: Maybe (Val Bool)- , _codeBuildProjectArtifactsPackaging :: Maybe (Val Text)- , _codeBuildProjectArtifactsPath :: Maybe (Val Text)- , _codeBuildProjectArtifactsType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectArtifacts where- toJSON CodeBuildProjectArtifacts{..} =- object $- catMaybes- [ fmap (("ArtifactIdentifier",) . toJSON) _codeBuildProjectArtifactsArtifactIdentifier- , fmap (("EncryptionDisabled",) . toJSON) _codeBuildProjectArtifactsEncryptionDisabled- , fmap (("Location",) . toJSON) _codeBuildProjectArtifactsLocation- , fmap (("Name",) . toJSON) _codeBuildProjectArtifactsName- , fmap (("NamespaceType",) . toJSON) _codeBuildProjectArtifactsNamespaceType- , fmap (("OverrideArtifactName",) . toJSON) _codeBuildProjectArtifactsOverrideArtifactName- , fmap (("Packaging",) . toJSON) _codeBuildProjectArtifactsPackaging- , fmap (("Path",) . toJSON) _codeBuildProjectArtifactsPath- , (Just . ("Type",) . toJSON) _codeBuildProjectArtifactsType- ]---- | Constructor for 'CodeBuildProjectArtifacts' containing required fields as--- arguments.-codeBuildProjectArtifacts- :: Val Text -- ^ 'cbpaType'- -> CodeBuildProjectArtifacts-codeBuildProjectArtifacts typearg =- CodeBuildProjectArtifacts- { _codeBuildProjectArtifactsArtifactIdentifier = Nothing- , _codeBuildProjectArtifactsEncryptionDisabled = Nothing- , _codeBuildProjectArtifactsLocation = Nothing- , _codeBuildProjectArtifactsName = Nothing- , _codeBuildProjectArtifactsNamespaceType = Nothing- , _codeBuildProjectArtifactsOverrideArtifactName = Nothing- , _codeBuildProjectArtifactsPackaging = Nothing- , _codeBuildProjectArtifactsPath = Nothing- , _codeBuildProjectArtifactsType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-artifactidentifier-cbpaArtifactIdentifier :: Lens' CodeBuildProjectArtifacts (Maybe (Val Text))-cbpaArtifactIdentifier = lens _codeBuildProjectArtifactsArtifactIdentifier (\s a -> s { _codeBuildProjectArtifactsArtifactIdentifier = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-encryptiondisabled-cbpaEncryptionDisabled :: Lens' CodeBuildProjectArtifacts (Maybe (Val Bool))-cbpaEncryptionDisabled = lens _codeBuildProjectArtifactsEncryptionDisabled (\s a -> s { _codeBuildProjectArtifactsEncryptionDisabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-location-cbpaLocation :: Lens' CodeBuildProjectArtifacts (Maybe (Val Text))-cbpaLocation = lens _codeBuildProjectArtifactsLocation (\s a -> s { _codeBuildProjectArtifactsLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-name-cbpaName :: Lens' CodeBuildProjectArtifacts (Maybe (Val Text))-cbpaName = lens _codeBuildProjectArtifactsName (\s a -> s { _codeBuildProjectArtifactsName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-namespacetype-cbpaNamespaceType :: Lens' CodeBuildProjectArtifacts (Maybe (Val Text))-cbpaNamespaceType = lens _codeBuildProjectArtifactsNamespaceType (\s a -> s { _codeBuildProjectArtifactsNamespaceType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-overrideartifactname-cbpaOverrideArtifactName :: Lens' CodeBuildProjectArtifacts (Maybe (Val Bool))-cbpaOverrideArtifactName = lens _codeBuildProjectArtifactsOverrideArtifactName (\s a -> s { _codeBuildProjectArtifactsOverrideArtifactName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-packaging-cbpaPackaging :: Lens' CodeBuildProjectArtifacts (Maybe (Val Text))-cbpaPackaging = lens _codeBuildProjectArtifactsPackaging (\s a -> s { _codeBuildProjectArtifactsPackaging = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-path-cbpaPath :: Lens' CodeBuildProjectArtifacts (Maybe (Val Text))-cbpaPath = lens _codeBuildProjectArtifactsPath (\s a -> s { _codeBuildProjectArtifactsPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-artifacts.html#cfn-codebuild-project-artifacts-type-cbpaType :: Lens' CodeBuildProjectArtifacts (Val Text)-cbpaType = lens _codeBuildProjectArtifactsType (\s a -> s { _codeBuildProjectArtifactsType = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-batchrestrictions.html--module Stratosphere.ResourceProperties.CodeBuildProjectBatchRestrictions where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectBatchRestrictions. See--- 'codeBuildProjectBatchRestrictions' for a more convenient constructor.-data CodeBuildProjectBatchRestrictions =- CodeBuildProjectBatchRestrictions- { _codeBuildProjectBatchRestrictionsComputeTypesAllowed :: Maybe (ValList Text)- , _codeBuildProjectBatchRestrictionsMaximumBuildsAllowed :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectBatchRestrictions where- toJSON CodeBuildProjectBatchRestrictions{..} =- object $- catMaybes- [ fmap (("ComputeTypesAllowed",) . toJSON) _codeBuildProjectBatchRestrictionsComputeTypesAllowed- , fmap (("MaximumBuildsAllowed",) . toJSON) _codeBuildProjectBatchRestrictionsMaximumBuildsAllowed- ]---- | Constructor for 'CodeBuildProjectBatchRestrictions' containing required--- fields as arguments.-codeBuildProjectBatchRestrictions- :: CodeBuildProjectBatchRestrictions-codeBuildProjectBatchRestrictions =- CodeBuildProjectBatchRestrictions- { _codeBuildProjectBatchRestrictionsComputeTypesAllowed = Nothing- , _codeBuildProjectBatchRestrictionsMaximumBuildsAllowed = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-batchrestrictions.html#cfn-codebuild-project-batchrestrictions-computetypesallowed-cbpbrComputeTypesAllowed :: Lens' CodeBuildProjectBatchRestrictions (Maybe (ValList Text))-cbpbrComputeTypesAllowed = lens _codeBuildProjectBatchRestrictionsComputeTypesAllowed (\s a -> s { _codeBuildProjectBatchRestrictionsComputeTypesAllowed = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-batchrestrictions.html#cfn-codebuild-project-batchrestrictions-maximumbuildsallowed-cbpbrMaximumBuildsAllowed :: Lens' CodeBuildProjectBatchRestrictions (Maybe (Val Integer))-cbpbrMaximumBuildsAllowed = lens _codeBuildProjectBatchRestrictionsMaximumBuildsAllowed (\s a -> s { _codeBuildProjectBatchRestrictionsMaximumBuildsAllowed = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-buildstatusconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectBuildStatusConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectBuildStatusConfig. See--- 'codeBuildProjectBuildStatusConfig' for a more convenient constructor.-data CodeBuildProjectBuildStatusConfig =- CodeBuildProjectBuildStatusConfig- { _codeBuildProjectBuildStatusConfigContext :: Maybe (Val Text)- , _codeBuildProjectBuildStatusConfigTargetUrl :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectBuildStatusConfig where- toJSON CodeBuildProjectBuildStatusConfig{..} =- object $- catMaybes- [ fmap (("Context",) . toJSON) _codeBuildProjectBuildStatusConfigContext- , fmap (("TargetUrl",) . toJSON) _codeBuildProjectBuildStatusConfigTargetUrl- ]---- | Constructor for 'CodeBuildProjectBuildStatusConfig' containing required--- fields as arguments.-codeBuildProjectBuildStatusConfig- :: CodeBuildProjectBuildStatusConfig-codeBuildProjectBuildStatusConfig =- CodeBuildProjectBuildStatusConfig- { _codeBuildProjectBuildStatusConfigContext = Nothing- , _codeBuildProjectBuildStatusConfigTargetUrl = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-buildstatusconfig.html#cfn-codebuild-project-buildstatusconfig-context-cbpbscContext :: Lens' CodeBuildProjectBuildStatusConfig (Maybe (Val Text))-cbpbscContext = lens _codeBuildProjectBuildStatusConfigContext (\s a -> s { _codeBuildProjectBuildStatusConfigContext = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-buildstatusconfig.html#cfn-codebuild-project-buildstatusconfig-targeturl-cbpbscTargetUrl :: Lens' CodeBuildProjectBuildStatusConfig (Maybe (Val Text))-cbpbscTargetUrl = lens _codeBuildProjectBuildStatusConfigTargetUrl (\s a -> s { _codeBuildProjectBuildStatusConfigTargetUrl = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-cloudwatchlogsconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectCloudWatchLogsConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectCloudWatchLogsConfig. See--- 'codeBuildProjectCloudWatchLogsConfig' for a more convenient constructor.-data CodeBuildProjectCloudWatchLogsConfig =- CodeBuildProjectCloudWatchLogsConfig- { _codeBuildProjectCloudWatchLogsConfigGroupName :: Maybe (Val Text)- , _codeBuildProjectCloudWatchLogsConfigStatus :: Val Text- , _codeBuildProjectCloudWatchLogsConfigStreamName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectCloudWatchLogsConfig where- toJSON CodeBuildProjectCloudWatchLogsConfig{..} =- object $- catMaybes- [ fmap (("GroupName",) . toJSON) _codeBuildProjectCloudWatchLogsConfigGroupName- , (Just . ("Status",) . toJSON) _codeBuildProjectCloudWatchLogsConfigStatus- , fmap (("StreamName",) . toJSON) _codeBuildProjectCloudWatchLogsConfigStreamName- ]---- | Constructor for 'CodeBuildProjectCloudWatchLogsConfig' containing--- required fields as arguments.-codeBuildProjectCloudWatchLogsConfig- :: Val Text -- ^ 'cbpcwlcStatus'- -> CodeBuildProjectCloudWatchLogsConfig-codeBuildProjectCloudWatchLogsConfig statusarg =- CodeBuildProjectCloudWatchLogsConfig- { _codeBuildProjectCloudWatchLogsConfigGroupName = Nothing- , _codeBuildProjectCloudWatchLogsConfigStatus = statusarg- , _codeBuildProjectCloudWatchLogsConfigStreamName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-cloudwatchlogsconfig.html#cfn-codebuild-project-cloudwatchlogsconfig-groupname-cbpcwlcGroupName :: Lens' CodeBuildProjectCloudWatchLogsConfig (Maybe (Val Text))-cbpcwlcGroupName = lens _codeBuildProjectCloudWatchLogsConfigGroupName (\s a -> s { _codeBuildProjectCloudWatchLogsConfigGroupName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-cloudwatchlogsconfig.html#cfn-codebuild-project-cloudwatchlogsconfig-status-cbpcwlcStatus :: Lens' CodeBuildProjectCloudWatchLogsConfig (Val Text)-cbpcwlcStatus = lens _codeBuildProjectCloudWatchLogsConfigStatus (\s a -> s { _codeBuildProjectCloudWatchLogsConfigStatus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-cloudwatchlogsconfig.html#cfn-codebuild-project-cloudwatchlogsconfig-streamname-cbpcwlcStreamName :: Lens' CodeBuildProjectCloudWatchLogsConfig (Maybe (Val Text))-cbpcwlcStreamName = lens _codeBuildProjectCloudWatchLogsConfigStreamName (\s a -> s { _codeBuildProjectCloudWatchLogsConfigStreamName = a })
@@ -1,91 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html--module Stratosphere.ResourceProperties.CodeBuildProjectEnvironment where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeBuildProjectEnvironmentVariable-import Stratosphere.ResourceProperties.CodeBuildProjectRegistryCredential---- | Full data type definition for CodeBuildProjectEnvironment. See--- 'codeBuildProjectEnvironment' for a more convenient constructor.-data CodeBuildProjectEnvironment =- CodeBuildProjectEnvironment- { _codeBuildProjectEnvironmentCertificate :: Maybe (Val Text)- , _codeBuildProjectEnvironmentComputeType :: Val Text- , _codeBuildProjectEnvironmentEnvironmentVariables :: Maybe [CodeBuildProjectEnvironmentVariable]- , _codeBuildProjectEnvironmentImage :: Val Text- , _codeBuildProjectEnvironmentImagePullCredentialsType :: Maybe (Val Text)- , _codeBuildProjectEnvironmentPrivilegedMode :: Maybe (Val Bool)- , _codeBuildProjectEnvironmentRegistryCredential :: Maybe CodeBuildProjectRegistryCredential- , _codeBuildProjectEnvironmentType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectEnvironment where- toJSON CodeBuildProjectEnvironment{..} =- object $- catMaybes- [ fmap (("Certificate",) . toJSON) _codeBuildProjectEnvironmentCertificate- , (Just . ("ComputeType",) . toJSON) _codeBuildProjectEnvironmentComputeType- , fmap (("EnvironmentVariables",) . toJSON) _codeBuildProjectEnvironmentEnvironmentVariables- , (Just . ("Image",) . toJSON) _codeBuildProjectEnvironmentImage- , fmap (("ImagePullCredentialsType",) . toJSON) _codeBuildProjectEnvironmentImagePullCredentialsType- , fmap (("PrivilegedMode",) . toJSON) _codeBuildProjectEnvironmentPrivilegedMode- , fmap (("RegistryCredential",) . toJSON) _codeBuildProjectEnvironmentRegistryCredential- , (Just . ("Type",) . toJSON) _codeBuildProjectEnvironmentType- ]---- | Constructor for 'CodeBuildProjectEnvironment' containing required fields--- as arguments.-codeBuildProjectEnvironment- :: Val Text -- ^ 'cbpeComputeType'- -> Val Text -- ^ 'cbpeImage'- -> Val Text -- ^ 'cbpeType'- -> CodeBuildProjectEnvironment-codeBuildProjectEnvironment computeTypearg imagearg typearg =- CodeBuildProjectEnvironment- { _codeBuildProjectEnvironmentCertificate = Nothing- , _codeBuildProjectEnvironmentComputeType = computeTypearg- , _codeBuildProjectEnvironmentEnvironmentVariables = Nothing- , _codeBuildProjectEnvironmentImage = imagearg- , _codeBuildProjectEnvironmentImagePullCredentialsType = Nothing- , _codeBuildProjectEnvironmentPrivilegedMode = Nothing- , _codeBuildProjectEnvironmentRegistryCredential = Nothing- , _codeBuildProjectEnvironmentType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-certificate-cbpeCertificate :: Lens' CodeBuildProjectEnvironment (Maybe (Val Text))-cbpeCertificate = lens _codeBuildProjectEnvironmentCertificate (\s a -> s { _codeBuildProjectEnvironmentCertificate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-computetype-cbpeComputeType :: Lens' CodeBuildProjectEnvironment (Val Text)-cbpeComputeType = lens _codeBuildProjectEnvironmentComputeType (\s a -> s { _codeBuildProjectEnvironmentComputeType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-environmentvariables-cbpeEnvironmentVariables :: Lens' CodeBuildProjectEnvironment (Maybe [CodeBuildProjectEnvironmentVariable])-cbpeEnvironmentVariables = lens _codeBuildProjectEnvironmentEnvironmentVariables (\s a -> s { _codeBuildProjectEnvironmentEnvironmentVariables = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-image-cbpeImage :: Lens' CodeBuildProjectEnvironment (Val Text)-cbpeImage = lens _codeBuildProjectEnvironmentImage (\s a -> s { _codeBuildProjectEnvironmentImage = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-imagepullcredentialstype-cbpeImagePullCredentialsType :: Lens' CodeBuildProjectEnvironment (Maybe (Val Text))-cbpeImagePullCredentialsType = lens _codeBuildProjectEnvironmentImagePullCredentialsType (\s a -> s { _codeBuildProjectEnvironmentImagePullCredentialsType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-privilegedmode-cbpePrivilegedMode :: Lens' CodeBuildProjectEnvironment (Maybe (Val Bool))-cbpePrivilegedMode = lens _codeBuildProjectEnvironmentPrivilegedMode (\s a -> s { _codeBuildProjectEnvironmentPrivilegedMode = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-registrycredential-cbpeRegistryCredential :: Lens' CodeBuildProjectEnvironment (Maybe CodeBuildProjectRegistryCredential)-cbpeRegistryCredential = lens _codeBuildProjectEnvironmentRegistryCredential (\s a -> s { _codeBuildProjectEnvironmentRegistryCredential = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environment.html#cfn-codebuild-project-environment-type-cbpeType :: Lens' CodeBuildProjectEnvironment (Val Text)-cbpeType = lens _codeBuildProjectEnvironmentType (\s a -> s { _codeBuildProjectEnvironmentType = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environmentvariable.html--module Stratosphere.ResourceProperties.CodeBuildProjectEnvironmentVariable where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectEnvironmentVariable. See--- 'codeBuildProjectEnvironmentVariable' for a more convenient constructor.-data CodeBuildProjectEnvironmentVariable =- CodeBuildProjectEnvironmentVariable- { _codeBuildProjectEnvironmentVariableName :: Val Text- , _codeBuildProjectEnvironmentVariableType :: Maybe (Val Text)- , _codeBuildProjectEnvironmentVariableValue :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectEnvironmentVariable where- toJSON CodeBuildProjectEnvironmentVariable{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _codeBuildProjectEnvironmentVariableName- , fmap (("Type",) . toJSON) _codeBuildProjectEnvironmentVariableType- , (Just . ("Value",) . toJSON) _codeBuildProjectEnvironmentVariableValue- ]---- | Constructor for 'CodeBuildProjectEnvironmentVariable' containing required--- fields as arguments.-codeBuildProjectEnvironmentVariable- :: Val Text -- ^ 'cbpevName'- -> Val Text -- ^ 'cbpevValue'- -> CodeBuildProjectEnvironmentVariable-codeBuildProjectEnvironmentVariable namearg valuearg =- CodeBuildProjectEnvironmentVariable- { _codeBuildProjectEnvironmentVariableName = namearg- , _codeBuildProjectEnvironmentVariableType = Nothing- , _codeBuildProjectEnvironmentVariableValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environmentvariable.html#cfn-codebuild-project-environmentvariable-name-cbpevName :: Lens' CodeBuildProjectEnvironmentVariable (Val Text)-cbpevName = lens _codeBuildProjectEnvironmentVariableName (\s a -> s { _codeBuildProjectEnvironmentVariableName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environmentvariable.html#cfn-codebuild-project-environmentvariable-type-cbpevType :: Lens' CodeBuildProjectEnvironmentVariable (Maybe (Val Text))-cbpevType = lens _codeBuildProjectEnvironmentVariableType (\s a -> s { _codeBuildProjectEnvironmentVariableType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-environmentvariable.html#cfn-codebuild-project-environmentvariable-value-cbpevValue :: Lens' CodeBuildProjectEnvironmentVariable (Val Text)-cbpevValue = lens _codeBuildProjectEnvironmentVariableValue (\s a -> s { _codeBuildProjectEnvironmentVariableValue = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-gitsubmodulesconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectGitSubmodulesConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectGitSubmodulesConfig. See--- 'codeBuildProjectGitSubmodulesConfig' for a more convenient constructor.-data CodeBuildProjectGitSubmodulesConfig =- CodeBuildProjectGitSubmodulesConfig- { _codeBuildProjectGitSubmodulesConfigFetchSubmodules :: Val Bool- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectGitSubmodulesConfig where- toJSON CodeBuildProjectGitSubmodulesConfig{..} =- object $- catMaybes- [ (Just . ("FetchSubmodules",) . toJSON) _codeBuildProjectGitSubmodulesConfigFetchSubmodules- ]---- | Constructor for 'CodeBuildProjectGitSubmodulesConfig' containing required--- fields as arguments.-codeBuildProjectGitSubmodulesConfig- :: Val Bool -- ^ 'cbpgscFetchSubmodules'- -> CodeBuildProjectGitSubmodulesConfig-codeBuildProjectGitSubmodulesConfig fetchSubmodulesarg =- CodeBuildProjectGitSubmodulesConfig- { _codeBuildProjectGitSubmodulesConfigFetchSubmodules = fetchSubmodulesarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-gitsubmodulesconfig.html#cfn-codebuild-project-gitsubmodulesconfig-fetchsubmodules-cbpgscFetchSubmodules :: Lens' CodeBuildProjectGitSubmodulesConfig (Val Bool)-cbpgscFetchSubmodules = lens _codeBuildProjectGitSubmodulesConfigFetchSubmodules (\s a -> s { _codeBuildProjectGitSubmodulesConfigFetchSubmodules = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-logsconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectLogsConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeBuildProjectCloudWatchLogsConfig-import Stratosphere.ResourceProperties.CodeBuildProjectS3LogsConfig---- | Full data type definition for CodeBuildProjectLogsConfig. See--- 'codeBuildProjectLogsConfig' for a more convenient constructor.-data CodeBuildProjectLogsConfig =- CodeBuildProjectLogsConfig- { _codeBuildProjectLogsConfigCloudWatchLogs :: Maybe CodeBuildProjectCloudWatchLogsConfig- , _codeBuildProjectLogsConfigS3Logs :: Maybe CodeBuildProjectS3LogsConfig- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectLogsConfig where- toJSON CodeBuildProjectLogsConfig{..} =- object $- catMaybes- [ fmap (("CloudWatchLogs",) . toJSON) _codeBuildProjectLogsConfigCloudWatchLogs- , fmap (("S3Logs",) . toJSON) _codeBuildProjectLogsConfigS3Logs- ]---- | Constructor for 'CodeBuildProjectLogsConfig' containing required fields--- as arguments.-codeBuildProjectLogsConfig- :: CodeBuildProjectLogsConfig-codeBuildProjectLogsConfig =- CodeBuildProjectLogsConfig- { _codeBuildProjectLogsConfigCloudWatchLogs = Nothing- , _codeBuildProjectLogsConfigS3Logs = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-logsconfig.html#cfn-codebuild-project-logsconfig-cloudwatchlogs-cbplcCloudWatchLogs :: Lens' CodeBuildProjectLogsConfig (Maybe CodeBuildProjectCloudWatchLogsConfig)-cbplcCloudWatchLogs = lens _codeBuildProjectLogsConfigCloudWatchLogs (\s a -> s { _codeBuildProjectLogsConfigCloudWatchLogs = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-logsconfig.html#cfn-codebuild-project-logsconfig-s3logs-cbplcS3Logs :: Lens' CodeBuildProjectLogsConfig (Maybe CodeBuildProjectS3LogsConfig)-cbplcS3Logs = lens _codeBuildProjectLogsConfigS3Logs (\s a -> s { _codeBuildProjectLogsConfigS3Logs = a })
@@ -1,60 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectbuildbatchconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectProjectBuildBatchConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeBuildProjectBatchRestrictions---- | Full data type definition for CodeBuildProjectProjectBuildBatchConfig.--- See 'codeBuildProjectProjectBuildBatchConfig' for a more convenient--- constructor.-data CodeBuildProjectProjectBuildBatchConfig =- CodeBuildProjectProjectBuildBatchConfig- { _codeBuildProjectProjectBuildBatchConfigCombineArtifacts :: Maybe (Val Bool)- , _codeBuildProjectProjectBuildBatchConfigRestrictions :: Maybe CodeBuildProjectBatchRestrictions- , _codeBuildProjectProjectBuildBatchConfigServiceRole :: Maybe (Val Text)- , _codeBuildProjectProjectBuildBatchConfigTimeoutInMins :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectProjectBuildBatchConfig where- toJSON CodeBuildProjectProjectBuildBatchConfig{..} =- object $- catMaybes- [ fmap (("CombineArtifacts",) . toJSON) _codeBuildProjectProjectBuildBatchConfigCombineArtifacts- , fmap (("Restrictions",) . toJSON) _codeBuildProjectProjectBuildBatchConfigRestrictions- , fmap (("ServiceRole",) . toJSON) _codeBuildProjectProjectBuildBatchConfigServiceRole- , fmap (("TimeoutInMins",) . toJSON) _codeBuildProjectProjectBuildBatchConfigTimeoutInMins- ]---- | Constructor for 'CodeBuildProjectProjectBuildBatchConfig' containing--- required fields as arguments.-codeBuildProjectProjectBuildBatchConfig- :: CodeBuildProjectProjectBuildBatchConfig-codeBuildProjectProjectBuildBatchConfig =- CodeBuildProjectProjectBuildBatchConfig- { _codeBuildProjectProjectBuildBatchConfigCombineArtifacts = Nothing- , _codeBuildProjectProjectBuildBatchConfigRestrictions = Nothing- , _codeBuildProjectProjectBuildBatchConfigServiceRole = Nothing- , _codeBuildProjectProjectBuildBatchConfigTimeoutInMins = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectbuildbatchconfig.html#cfn-codebuild-project-projectbuildbatchconfig-combineartifacts-cbppbbcCombineArtifacts :: Lens' CodeBuildProjectProjectBuildBatchConfig (Maybe (Val Bool))-cbppbbcCombineArtifacts = lens _codeBuildProjectProjectBuildBatchConfigCombineArtifacts (\s a -> s { _codeBuildProjectProjectBuildBatchConfigCombineArtifacts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectbuildbatchconfig.html#cfn-codebuild-project-projectbuildbatchconfig-restrictions-cbppbbcRestrictions :: Lens' CodeBuildProjectProjectBuildBatchConfig (Maybe CodeBuildProjectBatchRestrictions)-cbppbbcRestrictions = lens _codeBuildProjectProjectBuildBatchConfigRestrictions (\s a -> s { _codeBuildProjectProjectBuildBatchConfigRestrictions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectbuildbatchconfig.html#cfn-codebuild-project-projectbuildbatchconfig-servicerole-cbppbbcServiceRole :: Lens' CodeBuildProjectProjectBuildBatchConfig (Maybe (Val Text))-cbppbbcServiceRole = lens _codeBuildProjectProjectBuildBatchConfigServiceRole (\s a -> s { _codeBuildProjectProjectBuildBatchConfigServiceRole = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectbuildbatchconfig.html#cfn-codebuild-project-projectbuildbatchconfig-timeoutinmins-cbppbbcTimeoutInMins :: Lens' CodeBuildProjectProjectBuildBatchConfig (Maybe (Val Integer))-cbppbbcTimeoutInMins = lens _codeBuildProjectProjectBuildBatchConfigTimeoutInMins (\s a -> s { _codeBuildProjectProjectBuildBatchConfigTimeoutInMins = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectcache.html--module Stratosphere.ResourceProperties.CodeBuildProjectProjectCache where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectProjectCache. See--- 'codeBuildProjectProjectCache' for a more convenient constructor.-data CodeBuildProjectProjectCache =- CodeBuildProjectProjectCache- { _codeBuildProjectProjectCacheLocation :: Maybe (Val Text)- , _codeBuildProjectProjectCacheModes :: Maybe (ValList Text)- , _codeBuildProjectProjectCacheType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectProjectCache where- toJSON CodeBuildProjectProjectCache{..} =- object $- catMaybes- [ fmap (("Location",) . toJSON) _codeBuildProjectProjectCacheLocation- , fmap (("Modes",) . toJSON) _codeBuildProjectProjectCacheModes- , (Just . ("Type",) . toJSON) _codeBuildProjectProjectCacheType- ]---- | Constructor for 'CodeBuildProjectProjectCache' containing required fields--- as arguments.-codeBuildProjectProjectCache- :: Val Text -- ^ 'cbppcType'- -> CodeBuildProjectProjectCache-codeBuildProjectProjectCache typearg =- CodeBuildProjectProjectCache- { _codeBuildProjectProjectCacheLocation = Nothing- , _codeBuildProjectProjectCacheModes = Nothing- , _codeBuildProjectProjectCacheType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectcache.html#cfn-codebuild-project-projectcache-location-cbppcLocation :: Lens' CodeBuildProjectProjectCache (Maybe (Val Text))-cbppcLocation = lens _codeBuildProjectProjectCacheLocation (\s a -> s { _codeBuildProjectProjectCacheLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectcache.html#cfn-codebuild-project-projectcache-modes-cbppcModes :: Lens' CodeBuildProjectProjectCache (Maybe (ValList Text))-cbppcModes = lens _codeBuildProjectProjectCacheModes (\s a -> s { _codeBuildProjectProjectCacheModes = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectcache.html#cfn-codebuild-project-projectcache-type-cbppcType :: Lens' CodeBuildProjectProjectCache (Val Text)-cbppcType = lens _codeBuildProjectProjectCacheType (\s a -> s { _codeBuildProjectProjectCacheType = a })
@@ -1,71 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html--module Stratosphere.ResourceProperties.CodeBuildProjectProjectFileSystemLocation where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectProjectFileSystemLocation.--- See 'codeBuildProjectProjectFileSystemLocation' for a more convenient--- constructor.-data CodeBuildProjectProjectFileSystemLocation =- CodeBuildProjectProjectFileSystemLocation- { _codeBuildProjectProjectFileSystemLocationIdentifier :: Val Text- , _codeBuildProjectProjectFileSystemLocationLocation :: Val Text- , _codeBuildProjectProjectFileSystemLocationMountOptions :: Maybe (Val Text)- , _codeBuildProjectProjectFileSystemLocationMountPoint :: Val Text- , _codeBuildProjectProjectFileSystemLocationType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectProjectFileSystemLocation where- toJSON CodeBuildProjectProjectFileSystemLocation{..} =- object $- catMaybes- [ (Just . ("Identifier",) . toJSON) _codeBuildProjectProjectFileSystemLocationIdentifier- , (Just . ("Location",) . toJSON) _codeBuildProjectProjectFileSystemLocationLocation- , fmap (("MountOptions",) . toJSON) _codeBuildProjectProjectFileSystemLocationMountOptions- , (Just . ("MountPoint",) . toJSON) _codeBuildProjectProjectFileSystemLocationMountPoint- , (Just . ("Type",) . toJSON) _codeBuildProjectProjectFileSystemLocationType- ]---- | Constructor for 'CodeBuildProjectProjectFileSystemLocation' containing--- required fields as arguments.-codeBuildProjectProjectFileSystemLocation- :: Val Text -- ^ 'cbppfslIdentifier'- -> Val Text -- ^ 'cbppfslLocation'- -> Val Text -- ^ 'cbppfslMountPoint'- -> Val Text -- ^ 'cbppfslType'- -> CodeBuildProjectProjectFileSystemLocation-codeBuildProjectProjectFileSystemLocation identifierarg locationarg mountPointarg typearg =- CodeBuildProjectProjectFileSystemLocation- { _codeBuildProjectProjectFileSystemLocationIdentifier = identifierarg- , _codeBuildProjectProjectFileSystemLocationLocation = locationarg- , _codeBuildProjectProjectFileSystemLocationMountOptions = Nothing- , _codeBuildProjectProjectFileSystemLocationMountPoint = mountPointarg- , _codeBuildProjectProjectFileSystemLocationType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-identifier-cbppfslIdentifier :: Lens' CodeBuildProjectProjectFileSystemLocation (Val Text)-cbppfslIdentifier = lens _codeBuildProjectProjectFileSystemLocationIdentifier (\s a -> s { _codeBuildProjectProjectFileSystemLocationIdentifier = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-location-cbppfslLocation :: Lens' CodeBuildProjectProjectFileSystemLocation (Val Text)-cbppfslLocation = lens _codeBuildProjectProjectFileSystemLocationLocation (\s a -> s { _codeBuildProjectProjectFileSystemLocationLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-mountoptions-cbppfslMountOptions :: Lens' CodeBuildProjectProjectFileSystemLocation (Maybe (Val Text))-cbppfslMountOptions = lens _codeBuildProjectProjectFileSystemLocationMountOptions (\s a -> s { _codeBuildProjectProjectFileSystemLocationMountOptions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-mountpoint-cbppfslMountPoint :: Lens' CodeBuildProjectProjectFileSystemLocation (Val Text)-cbppfslMountPoint = lens _codeBuildProjectProjectFileSystemLocationMountPoint (\s a -> s { _codeBuildProjectProjectFileSystemLocationMountPoint = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-type-cbppfslType :: Lens' CodeBuildProjectProjectFileSystemLocation (Val Text)-cbppfslType = lens _codeBuildProjectProjectFileSystemLocationType (\s a -> s { _codeBuildProjectProjectFileSystemLocationType = a })
@@ -1,46 +0,0 @@-{-# 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 })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projecttriggers.html--module Stratosphere.ResourceProperties.CodeBuildProjectProjectTriggers where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectProjectTriggers. See--- 'codeBuildProjectProjectTriggers' for a more convenient constructor.-data CodeBuildProjectProjectTriggers =- CodeBuildProjectProjectTriggers- { _codeBuildProjectProjectTriggersWebhook :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectProjectTriggers where- toJSON CodeBuildProjectProjectTriggers{..} =- object $- catMaybes- [ fmap (("Webhook",) . toJSON) _codeBuildProjectProjectTriggersWebhook- ]---- | Constructor for 'CodeBuildProjectProjectTriggers' containing required--- fields as arguments.-codeBuildProjectProjectTriggers- :: CodeBuildProjectProjectTriggers-codeBuildProjectProjectTriggers =- CodeBuildProjectProjectTriggers- { _codeBuildProjectProjectTriggersWebhook = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projecttriggers.html#cfn-codebuild-project-projecttriggers-webhook-cbpptWebhook :: Lens' CodeBuildProjectProjectTriggers (Maybe (Val Bool))-cbpptWebhook = lens _codeBuildProjectProjectTriggersWebhook (\s a -> s { _codeBuildProjectProjectTriggersWebhook = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-registrycredential.html--module Stratosphere.ResourceProperties.CodeBuildProjectRegistryCredential where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectRegistryCredential. See--- 'codeBuildProjectRegistryCredential' for a more convenient constructor.-data CodeBuildProjectRegistryCredential =- CodeBuildProjectRegistryCredential- { _codeBuildProjectRegistryCredentialCredential :: Val Text- , _codeBuildProjectRegistryCredentialCredentialProvider :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectRegistryCredential where- toJSON CodeBuildProjectRegistryCredential{..} =- object $- catMaybes- [ (Just . ("Credential",) . toJSON) _codeBuildProjectRegistryCredentialCredential- , (Just . ("CredentialProvider",) . toJSON) _codeBuildProjectRegistryCredentialCredentialProvider- ]---- | Constructor for 'CodeBuildProjectRegistryCredential' containing required--- fields as arguments.-codeBuildProjectRegistryCredential- :: Val Text -- ^ 'cbprcCredential'- -> Val Text -- ^ 'cbprcCredentialProvider'- -> CodeBuildProjectRegistryCredential-codeBuildProjectRegistryCredential credentialarg credentialProviderarg =- CodeBuildProjectRegistryCredential- { _codeBuildProjectRegistryCredentialCredential = credentialarg- , _codeBuildProjectRegistryCredentialCredentialProvider = credentialProviderarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-registrycredential.html#cfn-codebuild-project-registrycredential-credential-cbprcCredential :: Lens' CodeBuildProjectRegistryCredential (Val Text)-cbprcCredential = lens _codeBuildProjectRegistryCredentialCredential (\s a -> s { _codeBuildProjectRegistryCredentialCredential = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-registrycredential.html#cfn-codebuild-project-registrycredential-credentialprovider-cbprcCredentialProvider :: Lens' CodeBuildProjectRegistryCredential (Val Text)-cbprcCredentialProvider = lens _codeBuildProjectRegistryCredentialCredentialProvider (\s a -> s { _codeBuildProjectRegistryCredentialCredentialProvider = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-s3logsconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectS3LogsConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectS3LogsConfig. See--- 'codeBuildProjectS3LogsConfig' for a more convenient constructor.-data CodeBuildProjectS3LogsConfig =- CodeBuildProjectS3LogsConfig- { _codeBuildProjectS3LogsConfigEncryptionDisabled :: Maybe (Val Bool)- , _codeBuildProjectS3LogsConfigLocation :: Maybe (Val Text)- , _codeBuildProjectS3LogsConfigStatus :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectS3LogsConfig where- toJSON CodeBuildProjectS3LogsConfig{..} =- object $- catMaybes- [ fmap (("EncryptionDisabled",) . toJSON) _codeBuildProjectS3LogsConfigEncryptionDisabled- , fmap (("Location",) . toJSON) _codeBuildProjectS3LogsConfigLocation- , (Just . ("Status",) . toJSON) _codeBuildProjectS3LogsConfigStatus- ]---- | Constructor for 'CodeBuildProjectS3LogsConfig' containing required fields--- as arguments.-codeBuildProjectS3LogsConfig- :: Val Text -- ^ 'cbpslcStatus'- -> CodeBuildProjectS3LogsConfig-codeBuildProjectS3LogsConfig statusarg =- CodeBuildProjectS3LogsConfig- { _codeBuildProjectS3LogsConfigEncryptionDisabled = Nothing- , _codeBuildProjectS3LogsConfigLocation = Nothing- , _codeBuildProjectS3LogsConfigStatus = statusarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-s3logsconfig.html#cfn-codebuild-project-s3logsconfig-encryptiondisabled-cbpslcEncryptionDisabled :: Lens' CodeBuildProjectS3LogsConfig (Maybe (Val Bool))-cbpslcEncryptionDisabled = lens _codeBuildProjectS3LogsConfigEncryptionDisabled (\s a -> s { _codeBuildProjectS3LogsConfigEncryptionDisabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-s3logsconfig.html#cfn-codebuild-project-s3logsconfig-location-cbpslcLocation :: Lens' CodeBuildProjectS3LogsConfig (Maybe (Val Text))-cbpslcLocation = lens _codeBuildProjectS3LogsConfigLocation (\s a -> s { _codeBuildProjectS3LogsConfigLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-s3logsconfig.html#cfn-codebuild-project-s3logsconfig-status-cbpslcStatus :: Lens' CodeBuildProjectS3LogsConfig (Val Text)-cbpslcStatus = lens _codeBuildProjectS3LogsConfigStatus (\s a -> s { _codeBuildProjectS3LogsConfigStatus = a })
@@ -1,104 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html--module Stratosphere.ResourceProperties.CodeBuildProjectSource where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeBuildProjectSourceAuth-import Stratosphere.ResourceProperties.CodeBuildProjectBuildStatusConfig-import Stratosphere.ResourceProperties.CodeBuildProjectGitSubmodulesConfig---- | Full data type definition for CodeBuildProjectSource. See--- 'codeBuildProjectSource' for a more convenient constructor.-data CodeBuildProjectSource =- CodeBuildProjectSource- { _codeBuildProjectSourceAuth :: Maybe CodeBuildProjectSourceAuth- , _codeBuildProjectSourceBuildSpec :: Maybe (Val Text)- , _codeBuildProjectSourceBuildStatusConfig :: Maybe CodeBuildProjectBuildStatusConfig- , _codeBuildProjectSourceGitCloneDepth :: Maybe (Val Integer)- , _codeBuildProjectSourceGitSubmodulesConfig :: Maybe CodeBuildProjectGitSubmodulesConfig- , _codeBuildProjectSourceInsecureSsl :: Maybe (Val Bool)- , _codeBuildProjectSourceLocation :: Maybe (Val Text)- , _codeBuildProjectSourceReportBuildStatus :: Maybe (Val Bool)- , _codeBuildProjectSourceSourceIdentifier :: Maybe (Val Text)- , _codeBuildProjectSourceType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectSource where- toJSON CodeBuildProjectSource{..} =- object $- catMaybes- [ fmap (("Auth",) . toJSON) _codeBuildProjectSourceAuth- , fmap (("BuildSpec",) . toJSON) _codeBuildProjectSourceBuildSpec- , fmap (("BuildStatusConfig",) . toJSON) _codeBuildProjectSourceBuildStatusConfig- , fmap (("GitCloneDepth",) . toJSON) _codeBuildProjectSourceGitCloneDepth- , fmap (("GitSubmodulesConfig",) . toJSON) _codeBuildProjectSourceGitSubmodulesConfig- , fmap (("InsecureSsl",) . toJSON) _codeBuildProjectSourceInsecureSsl- , fmap (("Location",) . toJSON) _codeBuildProjectSourceLocation- , fmap (("ReportBuildStatus",) . toJSON) _codeBuildProjectSourceReportBuildStatus- , fmap (("SourceIdentifier",) . toJSON) _codeBuildProjectSourceSourceIdentifier- , (Just . ("Type",) . toJSON) _codeBuildProjectSourceType- ]---- | Constructor for 'CodeBuildProjectSource' containing required fields as--- arguments.-codeBuildProjectSource- :: Val Text -- ^ 'cbpsType'- -> CodeBuildProjectSource-codeBuildProjectSource typearg =- CodeBuildProjectSource- { _codeBuildProjectSourceAuth = Nothing- , _codeBuildProjectSourceBuildSpec = Nothing- , _codeBuildProjectSourceBuildStatusConfig = Nothing- , _codeBuildProjectSourceGitCloneDepth = Nothing- , _codeBuildProjectSourceGitSubmodulesConfig = Nothing- , _codeBuildProjectSourceInsecureSsl = Nothing- , _codeBuildProjectSourceLocation = Nothing- , _codeBuildProjectSourceReportBuildStatus = Nothing- , _codeBuildProjectSourceSourceIdentifier = Nothing- , _codeBuildProjectSourceType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-auth-cbpsAuth :: Lens' CodeBuildProjectSource (Maybe CodeBuildProjectSourceAuth)-cbpsAuth = lens _codeBuildProjectSourceAuth (\s a -> s { _codeBuildProjectSourceAuth = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-buildspec-cbpsBuildSpec :: Lens' CodeBuildProjectSource (Maybe (Val Text))-cbpsBuildSpec = lens _codeBuildProjectSourceBuildSpec (\s a -> s { _codeBuildProjectSourceBuildSpec = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-buildstatusconfig-cbpsBuildStatusConfig :: Lens' CodeBuildProjectSource (Maybe CodeBuildProjectBuildStatusConfig)-cbpsBuildStatusConfig = lens _codeBuildProjectSourceBuildStatusConfig (\s a -> s { _codeBuildProjectSourceBuildStatusConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-gitclonedepth-cbpsGitCloneDepth :: Lens' CodeBuildProjectSource (Maybe (Val Integer))-cbpsGitCloneDepth = lens _codeBuildProjectSourceGitCloneDepth (\s a -> s { _codeBuildProjectSourceGitCloneDepth = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-gitsubmodulesconfig-cbpsGitSubmodulesConfig :: Lens' CodeBuildProjectSource (Maybe CodeBuildProjectGitSubmodulesConfig)-cbpsGitSubmodulesConfig = lens _codeBuildProjectSourceGitSubmodulesConfig (\s a -> s { _codeBuildProjectSourceGitSubmodulesConfig = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-insecuressl-cbpsInsecureSsl :: Lens' CodeBuildProjectSource (Maybe (Val Bool))-cbpsInsecureSsl = lens _codeBuildProjectSourceInsecureSsl (\s a -> s { _codeBuildProjectSourceInsecureSsl = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-location-cbpsLocation :: Lens' CodeBuildProjectSource (Maybe (Val Text))-cbpsLocation = lens _codeBuildProjectSourceLocation (\s a -> s { _codeBuildProjectSourceLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-reportbuildstatus-cbpsReportBuildStatus :: Lens' CodeBuildProjectSource (Maybe (Val Bool))-cbpsReportBuildStatus = lens _codeBuildProjectSourceReportBuildStatus (\s a -> s { _codeBuildProjectSourceReportBuildStatus = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-sourceidentifier-cbpsSourceIdentifier :: Lens' CodeBuildProjectSource (Maybe (Val Text))-cbpsSourceIdentifier = lens _codeBuildProjectSourceSourceIdentifier (\s a -> s { _codeBuildProjectSourceSourceIdentifier = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-source.html#cfn-codebuild-project-source-type-cbpsType :: Lens' CodeBuildProjectSource (Val Text)-cbpsType = lens _codeBuildProjectSourceType (\s a -> s { _codeBuildProjectSourceType = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-sourceauth.html--module Stratosphere.ResourceProperties.CodeBuildProjectSourceAuth where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectSourceAuth. See--- 'codeBuildProjectSourceAuth' for a more convenient constructor.-data CodeBuildProjectSourceAuth =- CodeBuildProjectSourceAuth- { _codeBuildProjectSourceAuthResource :: Maybe (Val Text)- , _codeBuildProjectSourceAuthType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectSourceAuth where- toJSON CodeBuildProjectSourceAuth{..} =- object $- catMaybes- [ fmap (("Resource",) . toJSON) _codeBuildProjectSourceAuthResource- , (Just . ("Type",) . toJSON) _codeBuildProjectSourceAuthType- ]---- | Constructor for 'CodeBuildProjectSourceAuth' containing required fields--- as arguments.-codeBuildProjectSourceAuth- :: Val Text -- ^ 'cbpsaType'- -> CodeBuildProjectSourceAuth-codeBuildProjectSourceAuth typearg =- CodeBuildProjectSourceAuth- { _codeBuildProjectSourceAuthResource = Nothing- , _codeBuildProjectSourceAuthType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-sourceauth.html#cfn-codebuild-project-sourceauth-resource-cbpsaResource :: Lens' CodeBuildProjectSourceAuth (Maybe (Val Text))-cbpsaResource = lens _codeBuildProjectSourceAuthResource (\s a -> s { _codeBuildProjectSourceAuthResource = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-sourceauth.html#cfn-codebuild-project-sourceauth-type-cbpsaType :: Lens' CodeBuildProjectSourceAuth (Val Text)-cbpsaType = lens _codeBuildProjectSourceAuthType (\s a -> s { _codeBuildProjectSourceAuthType = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-vpcconfig.html--module Stratosphere.ResourceProperties.CodeBuildProjectVpcConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectVpcConfig. See--- 'codeBuildProjectVpcConfig' for a more convenient constructor.-data CodeBuildProjectVpcConfig =- CodeBuildProjectVpcConfig- { _codeBuildProjectVpcConfigSecurityGroupIds :: Maybe (ValList Text)- , _codeBuildProjectVpcConfigSubnets :: Maybe (ValList Text)- , _codeBuildProjectVpcConfigVpcId :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectVpcConfig where- toJSON CodeBuildProjectVpcConfig{..} =- object $- catMaybes- [ fmap (("SecurityGroupIds",) . toJSON) _codeBuildProjectVpcConfigSecurityGroupIds- , fmap (("Subnets",) . toJSON) _codeBuildProjectVpcConfigSubnets- , fmap (("VpcId",) . toJSON) _codeBuildProjectVpcConfigVpcId- ]---- | Constructor for 'CodeBuildProjectVpcConfig' containing required fields as--- arguments.-codeBuildProjectVpcConfig- :: CodeBuildProjectVpcConfig-codeBuildProjectVpcConfig =- CodeBuildProjectVpcConfig- { _codeBuildProjectVpcConfigSecurityGroupIds = Nothing- , _codeBuildProjectVpcConfigSubnets = Nothing- , _codeBuildProjectVpcConfigVpcId = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-vpcconfig.html#cfn-codebuild-project-vpcconfig-securitygroupids-cbpvcSecurityGroupIds :: Lens' CodeBuildProjectVpcConfig (Maybe (ValList Text))-cbpvcSecurityGroupIds = lens _codeBuildProjectVpcConfigSecurityGroupIds (\s a -> s { _codeBuildProjectVpcConfigSecurityGroupIds = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-vpcconfig.html#cfn-codebuild-project-vpcconfig-subnets-cbpvcSubnets :: Lens' CodeBuildProjectVpcConfig (Maybe (ValList Text))-cbpvcSubnets = lens _codeBuildProjectVpcConfigSubnets (\s a -> s { _codeBuildProjectVpcConfigSubnets = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-vpcconfig.html#cfn-codebuild-project-vpcconfig-vpcid-cbpvcVpcId :: Lens' CodeBuildProjectVpcConfig (Maybe (Val Text))-cbpvcVpcId = lens _codeBuildProjectVpcConfigVpcId (\s a -> s { _codeBuildProjectVpcConfigVpcId = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-webhookfilter.html--module Stratosphere.ResourceProperties.CodeBuildProjectWebhookFilter where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildProjectWebhookFilter. See--- 'codeBuildProjectWebhookFilter' for a more convenient constructor.-data CodeBuildProjectWebhookFilter =- CodeBuildProjectWebhookFilter- { _codeBuildProjectWebhookFilterExcludeMatchedPattern :: Maybe (Val Bool)- , _codeBuildProjectWebhookFilterPattern :: Val Text- , _codeBuildProjectWebhookFilterType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeBuildProjectWebhookFilter where- toJSON CodeBuildProjectWebhookFilter{..} =- object $- catMaybes- [ fmap (("ExcludeMatchedPattern",) . toJSON) _codeBuildProjectWebhookFilterExcludeMatchedPattern- , (Just . ("Pattern",) . toJSON) _codeBuildProjectWebhookFilterPattern- , (Just . ("Type",) . toJSON) _codeBuildProjectWebhookFilterType- ]---- | Constructor for 'CodeBuildProjectWebhookFilter' containing required--- fields as arguments.-codeBuildProjectWebhookFilter- :: Val Text -- ^ 'cbpwfPattern'- -> Val Text -- ^ 'cbpwfType'- -> CodeBuildProjectWebhookFilter-codeBuildProjectWebhookFilter patternarg typearg =- CodeBuildProjectWebhookFilter- { _codeBuildProjectWebhookFilterExcludeMatchedPattern = Nothing- , _codeBuildProjectWebhookFilterPattern = patternarg- , _codeBuildProjectWebhookFilterType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-webhookfilter.html#cfn-codebuild-project-webhookfilter-excludematchedpattern-cbpwfExcludeMatchedPattern :: Lens' CodeBuildProjectWebhookFilter (Maybe (Val Bool))-cbpwfExcludeMatchedPattern = lens _codeBuildProjectWebhookFilterExcludeMatchedPattern (\s a -> s { _codeBuildProjectWebhookFilterExcludeMatchedPattern = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-webhookfilter.html#cfn-codebuild-project-webhookfilter-pattern-cbpwfPattern :: Lens' CodeBuildProjectWebhookFilter (Val Text)-cbpwfPattern = lens _codeBuildProjectWebhookFilterPattern (\s a -> s { _codeBuildProjectWebhookFilterPattern = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-webhookfilter.html#cfn-codebuild-project-webhookfilter-type-cbpwfType :: Lens' CodeBuildProjectWebhookFilter (Val Text)-cbpwfType = lens _codeBuildProjectWebhookFilterType (\s a -> s { _codeBuildProjectWebhookFilterType = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-reportexportconfig.html--module Stratosphere.ResourceProperties.CodeBuildReportGroupReportExportConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeBuildReportGroupS3ReportExportConfig---- | Full data type definition for CodeBuildReportGroupReportExportConfig. See--- 'codeBuildReportGroupReportExportConfig' for a more convenient--- constructor.-data CodeBuildReportGroupReportExportConfig =- CodeBuildReportGroupReportExportConfig- { _codeBuildReportGroupReportExportConfigExportConfigType :: Val Text- , _codeBuildReportGroupReportExportConfigS3Destination :: Maybe CodeBuildReportGroupS3ReportExportConfig- } deriving (Show, Eq)--instance ToJSON CodeBuildReportGroupReportExportConfig where- toJSON CodeBuildReportGroupReportExportConfig{..} =- object $- catMaybes- [ (Just . ("ExportConfigType",) . toJSON) _codeBuildReportGroupReportExportConfigExportConfigType- , fmap (("S3Destination",) . toJSON) _codeBuildReportGroupReportExportConfigS3Destination- ]---- | Constructor for 'CodeBuildReportGroupReportExportConfig' containing--- required fields as arguments.-codeBuildReportGroupReportExportConfig- :: Val Text -- ^ 'cbrgrecExportConfigType'- -> CodeBuildReportGroupReportExportConfig-codeBuildReportGroupReportExportConfig exportConfigTypearg =- CodeBuildReportGroupReportExportConfig- { _codeBuildReportGroupReportExportConfigExportConfigType = exportConfigTypearg- , _codeBuildReportGroupReportExportConfigS3Destination = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-reportexportconfig.html#cfn-codebuild-reportgroup-reportexportconfig-exportconfigtype-cbrgrecExportConfigType :: Lens' CodeBuildReportGroupReportExportConfig (Val Text)-cbrgrecExportConfigType = lens _codeBuildReportGroupReportExportConfigExportConfigType (\s a -> s { _codeBuildReportGroupReportExportConfigExportConfigType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-reportexportconfig.html#cfn-codebuild-reportgroup-reportexportconfig-s3destination-cbrgrecS3Destination :: Lens' CodeBuildReportGroupReportExportConfig (Maybe CodeBuildReportGroupS3ReportExportConfig)-cbrgrecS3Destination = lens _codeBuildReportGroupReportExportConfigS3Destination (\s a -> s { _codeBuildReportGroupReportExportConfigS3Destination = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-s3reportexportconfig.html--module Stratosphere.ResourceProperties.CodeBuildReportGroupS3ReportExportConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeBuildReportGroupS3ReportExportConfig.--- See 'codeBuildReportGroupS3ReportExportConfig' for a more convenient--- constructor.-data CodeBuildReportGroupS3ReportExportConfig =- CodeBuildReportGroupS3ReportExportConfig- { _codeBuildReportGroupS3ReportExportConfigBucket :: Val Text- , _codeBuildReportGroupS3ReportExportConfigEncryptionDisabled :: Maybe (Val Bool)- , _codeBuildReportGroupS3ReportExportConfigEncryptionKey :: Maybe (Val Text)- , _codeBuildReportGroupS3ReportExportConfigPackaging :: Maybe (Val Text)- , _codeBuildReportGroupS3ReportExportConfigPath :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeBuildReportGroupS3ReportExportConfig where- toJSON CodeBuildReportGroupS3ReportExportConfig{..} =- object $- catMaybes- [ (Just . ("Bucket",) . toJSON) _codeBuildReportGroupS3ReportExportConfigBucket- , fmap (("EncryptionDisabled",) . toJSON) _codeBuildReportGroupS3ReportExportConfigEncryptionDisabled- , fmap (("EncryptionKey",) . toJSON) _codeBuildReportGroupS3ReportExportConfigEncryptionKey- , fmap (("Packaging",) . toJSON) _codeBuildReportGroupS3ReportExportConfigPackaging- , fmap (("Path",) . toJSON) _codeBuildReportGroupS3ReportExportConfigPath- ]---- | Constructor for 'CodeBuildReportGroupS3ReportExportConfig' containing--- required fields as arguments.-codeBuildReportGroupS3ReportExportConfig- :: Val Text -- ^ 'cbrgsrecBucket'- -> CodeBuildReportGroupS3ReportExportConfig-codeBuildReportGroupS3ReportExportConfig bucketarg =- CodeBuildReportGroupS3ReportExportConfig- { _codeBuildReportGroupS3ReportExportConfigBucket = bucketarg- , _codeBuildReportGroupS3ReportExportConfigEncryptionDisabled = Nothing- , _codeBuildReportGroupS3ReportExportConfigEncryptionKey = Nothing- , _codeBuildReportGroupS3ReportExportConfigPackaging = Nothing- , _codeBuildReportGroupS3ReportExportConfigPath = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-s3reportexportconfig.html#cfn-codebuild-reportgroup-s3reportexportconfig-bucket-cbrgsrecBucket :: Lens' CodeBuildReportGroupS3ReportExportConfig (Val Text)-cbrgsrecBucket = lens _codeBuildReportGroupS3ReportExportConfigBucket (\s a -> s { _codeBuildReportGroupS3ReportExportConfigBucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-s3reportexportconfig.html#cfn-codebuild-reportgroup-s3reportexportconfig-encryptiondisabled-cbrgsrecEncryptionDisabled :: Lens' CodeBuildReportGroupS3ReportExportConfig (Maybe (Val Bool))-cbrgsrecEncryptionDisabled = lens _codeBuildReportGroupS3ReportExportConfigEncryptionDisabled (\s a -> s { _codeBuildReportGroupS3ReportExportConfigEncryptionDisabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-s3reportexportconfig.html#cfn-codebuild-reportgroup-s3reportexportconfig-encryptionkey-cbrgsrecEncryptionKey :: Lens' CodeBuildReportGroupS3ReportExportConfig (Maybe (Val Text))-cbrgsrecEncryptionKey = lens _codeBuildReportGroupS3ReportExportConfigEncryptionKey (\s a -> s { _codeBuildReportGroupS3ReportExportConfigEncryptionKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-s3reportexportconfig.html#cfn-codebuild-reportgroup-s3reportexportconfig-packaging-cbrgsrecPackaging :: Lens' CodeBuildReportGroupS3ReportExportConfig (Maybe (Val Text))-cbrgsrecPackaging = lens _codeBuildReportGroupS3ReportExportConfigPackaging (\s a -> s { _codeBuildReportGroupS3ReportExportConfigPackaging = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-reportgroup-s3reportexportconfig.html#cfn-codebuild-reportgroup-s3reportexportconfig-path-cbrgsrecPath :: Lens' CodeBuildReportGroupS3ReportExportConfig (Maybe (Val Text))-cbrgsrecPath = lens _codeBuildReportGroupS3ReportExportConfigPath (\s a -> s { _codeBuildReportGroupS3ReportExportConfigPath = a })
@@ -1,46 +0,0 @@-{-# 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- { _codeCommitRepositoryCodeBranchName :: Maybe (Val Text)- , _codeCommitRepositoryCodeS3 :: CodeCommitRepositoryS3- } deriving (Show, Eq)--instance ToJSON CodeCommitRepositoryCode where- toJSON CodeCommitRepositoryCode{..} =- object $- catMaybes- [ fmap (("BranchName",) . toJSON) _codeCommitRepositoryCodeBranchName- , (Just . ("S3",) . toJSON) _codeCommitRepositoryCodeS3- ]---- | Constructor for 'CodeCommitRepositoryCode' containing required fields as--- arguments.-codeCommitRepositoryCode- :: CodeCommitRepositoryS3 -- ^ 'ccrcS3'- -> CodeCommitRepositoryCode-codeCommitRepositoryCode s3arg =- CodeCommitRepositoryCode- { _codeCommitRepositoryCodeBranchName = Nothing- , _codeCommitRepositoryCodeS3 = s3arg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-code.html#cfn-codecommit-repository-code-branchname-ccrcBranchName :: Lens' CodeCommitRepositoryCode (Maybe (Val Text))-ccrcBranchName = lens _codeCommitRepositoryCodeBranchName (\s a -> s { _codeCommitRepositoryCodeBranchName = a })---- | 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 })
@@ -1,70 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-repositorytrigger.html--module Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger where--import Stratosphere.ResourceImports----- | Full data type definition for CodeCommitRepositoryRepositoryTrigger. See--- 'codeCommitRepositoryRepositoryTrigger' for a more convenient--- constructor.-data CodeCommitRepositoryRepositoryTrigger =- CodeCommitRepositoryRepositoryTrigger- { _codeCommitRepositoryRepositoryTriggerBranches :: Maybe (ValList Text)- , _codeCommitRepositoryRepositoryTriggerCustomData :: Maybe (Val Text)- , _codeCommitRepositoryRepositoryTriggerDestinationArn :: Val Text- , _codeCommitRepositoryRepositoryTriggerEvents :: ValList Text- , _codeCommitRepositoryRepositoryTriggerName :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeCommitRepositoryRepositoryTrigger where- toJSON CodeCommitRepositoryRepositoryTrigger{..} =- object $- catMaybes- [ fmap (("Branches",) . toJSON) _codeCommitRepositoryRepositoryTriggerBranches- , fmap (("CustomData",) . toJSON) _codeCommitRepositoryRepositoryTriggerCustomData- , (Just . ("DestinationArn",) . toJSON) _codeCommitRepositoryRepositoryTriggerDestinationArn- , (Just . ("Events",) . toJSON) _codeCommitRepositoryRepositoryTriggerEvents- , (Just . ("Name",) . toJSON) _codeCommitRepositoryRepositoryTriggerName- ]---- | Constructor for 'CodeCommitRepositoryRepositoryTrigger' containing--- required fields as arguments.-codeCommitRepositoryRepositoryTrigger- :: Val Text -- ^ 'ccrrtDestinationArn'- -> ValList Text -- ^ 'ccrrtEvents'- -> Val Text -- ^ 'ccrrtName'- -> CodeCommitRepositoryRepositoryTrigger-codeCommitRepositoryRepositoryTrigger destinationArnarg eventsarg namearg =- CodeCommitRepositoryRepositoryTrigger- { _codeCommitRepositoryRepositoryTriggerBranches = Nothing- , _codeCommitRepositoryRepositoryTriggerCustomData = Nothing- , _codeCommitRepositoryRepositoryTriggerDestinationArn = destinationArnarg- , _codeCommitRepositoryRepositoryTriggerEvents = eventsarg- , _codeCommitRepositoryRepositoryTriggerName = namearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-repositorytrigger.html#cfn-codecommit-repository-repositorytrigger-branches-ccrrtBranches :: Lens' CodeCommitRepositoryRepositoryTrigger (Maybe (ValList Text))-ccrrtBranches = lens _codeCommitRepositoryRepositoryTriggerBranches (\s a -> s { _codeCommitRepositoryRepositoryTriggerBranches = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-repositorytrigger.html#cfn-codecommit-repository-repositorytrigger-customdata-ccrrtCustomData :: Lens' CodeCommitRepositoryRepositoryTrigger (Maybe (Val Text))-ccrrtCustomData = lens _codeCommitRepositoryRepositoryTriggerCustomData (\s a -> s { _codeCommitRepositoryRepositoryTriggerCustomData = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-repositorytrigger.html#cfn-codecommit-repository-repositorytrigger-destinationarn-ccrrtDestinationArn :: Lens' CodeCommitRepositoryRepositoryTrigger (Val Text)-ccrrtDestinationArn = lens _codeCommitRepositoryRepositoryTriggerDestinationArn (\s a -> s { _codeCommitRepositoryRepositoryTriggerDestinationArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-repositorytrigger.html#cfn-codecommit-repository-repositorytrigger-events-ccrrtEvents :: Lens' CodeCommitRepositoryRepositoryTrigger (ValList Text)-ccrrtEvents = lens _codeCommitRepositoryRepositoryTriggerEvents (\s a -> s { _codeCommitRepositoryRepositoryTriggerEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-repositorytrigger.html#cfn-codecommit-repository-repositorytrigger-name-ccrrtName :: Lens' CodeCommitRepositoryRepositoryTrigger (Val Text)-ccrrtName = lens _codeCommitRepositoryRepositoryTriggerName (\s a -> s { _codeCommitRepositoryRepositoryTriggerName = a })
@@ -1,54 +0,0 @@-{-# 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 })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentconfig-minimumhealthyhosts.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentConfigMinimumHealthyHosts where--import Stratosphere.ResourceImports----- | Full data type definition for--- CodeDeployDeploymentConfigMinimumHealthyHosts. See--- 'codeDeployDeploymentConfigMinimumHealthyHosts' for a more convenient--- constructor.-data CodeDeployDeploymentConfigMinimumHealthyHosts =- CodeDeployDeploymentConfigMinimumHealthyHosts- { _codeDeployDeploymentConfigMinimumHealthyHostsType :: Val Text- , _codeDeployDeploymentConfigMinimumHealthyHostsValue :: Val Integer- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentConfigMinimumHealthyHosts where- toJSON CodeDeployDeploymentConfigMinimumHealthyHosts{..} =- object $- catMaybes- [ (Just . ("Type",) . toJSON) _codeDeployDeploymentConfigMinimumHealthyHostsType- , (Just . ("Value",) . toJSON) _codeDeployDeploymentConfigMinimumHealthyHostsValue- ]---- | Constructor for 'CodeDeployDeploymentConfigMinimumHealthyHosts'--- containing required fields as arguments.-codeDeployDeploymentConfigMinimumHealthyHosts- :: Val Text -- ^ 'cddcmhhType'- -> Val Integer -- ^ 'cddcmhhValue'- -> CodeDeployDeploymentConfigMinimumHealthyHosts-codeDeployDeploymentConfigMinimumHealthyHosts typearg valuearg =- CodeDeployDeploymentConfigMinimumHealthyHosts- { _codeDeployDeploymentConfigMinimumHealthyHostsType = typearg- , _codeDeployDeploymentConfigMinimumHealthyHostsValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentconfig-minimumhealthyhosts.html#cfn-codedeploy-deploymentconfig-minimumhealthyhosts-type-cddcmhhType :: Lens' CodeDeployDeploymentConfigMinimumHealthyHosts (Val Text)-cddcmhhType = lens _codeDeployDeploymentConfigMinimumHealthyHostsType (\s a -> s { _codeDeployDeploymentConfigMinimumHealthyHostsType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentconfig-minimumhealthyhosts.html#cfn-codedeploy-deploymentconfig-minimumhealthyhosts-value-cddcmhhValue :: Lens' CodeDeployDeploymentConfigMinimumHealthyHosts (Val Integer)-cddcmhhValue = lens _codeDeployDeploymentConfigMinimumHealthyHostsValue (\s a -> s { _codeDeployDeploymentConfigMinimumHealthyHostsValue = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-alarm.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarm where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupAlarm. See--- 'codeDeployDeploymentGroupAlarm' for a more convenient constructor.-data CodeDeployDeploymentGroupAlarm =- CodeDeployDeploymentGroupAlarm- { _codeDeployDeploymentGroupAlarmName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupAlarm where- toJSON CodeDeployDeploymentGroupAlarm{..} =- object $- catMaybes- [ fmap (("Name",) . toJSON) _codeDeployDeploymentGroupAlarmName- ]---- | Constructor for 'CodeDeployDeploymentGroupAlarm' containing required--- fields as arguments.-codeDeployDeploymentGroupAlarm- :: CodeDeployDeploymentGroupAlarm-codeDeployDeploymentGroupAlarm =- CodeDeployDeploymentGroupAlarm- { _codeDeployDeploymentGroupAlarmName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-alarm.html#cfn-codedeploy-deploymentgroup-alarm-name-cddgaName :: Lens' CodeDeployDeploymentGroupAlarm (Maybe (Val Text))-cddgaName = lens _codeDeployDeploymentGroupAlarmName (\s a -> s { _codeDeployDeploymentGroupAlarmName = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-alarmconfiguration.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarmConfiguration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAlarm---- | Full data type definition for--- CodeDeployDeploymentGroupAlarmConfiguration. See--- 'codeDeployDeploymentGroupAlarmConfiguration' for a more convenient--- constructor.-data CodeDeployDeploymentGroupAlarmConfiguration =- CodeDeployDeploymentGroupAlarmConfiguration- { _codeDeployDeploymentGroupAlarmConfigurationAlarms :: Maybe [CodeDeployDeploymentGroupAlarm]- , _codeDeployDeploymentGroupAlarmConfigurationEnabled :: Maybe (Val Bool)- , _codeDeployDeploymentGroupAlarmConfigurationIgnorePollAlarmFailure :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupAlarmConfiguration where- toJSON CodeDeployDeploymentGroupAlarmConfiguration{..} =- object $- catMaybes- [ fmap (("Alarms",) . toJSON) _codeDeployDeploymentGroupAlarmConfigurationAlarms- , fmap (("Enabled",) . toJSON) _codeDeployDeploymentGroupAlarmConfigurationEnabled- , fmap (("IgnorePollAlarmFailure",) . toJSON) _codeDeployDeploymentGroupAlarmConfigurationIgnorePollAlarmFailure- ]---- | Constructor for 'CodeDeployDeploymentGroupAlarmConfiguration' containing--- required fields as arguments.-codeDeployDeploymentGroupAlarmConfiguration- :: CodeDeployDeploymentGroupAlarmConfiguration-codeDeployDeploymentGroupAlarmConfiguration =- CodeDeployDeploymentGroupAlarmConfiguration- { _codeDeployDeploymentGroupAlarmConfigurationAlarms = Nothing- , _codeDeployDeploymentGroupAlarmConfigurationEnabled = Nothing- , _codeDeployDeploymentGroupAlarmConfigurationIgnorePollAlarmFailure = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-alarmconfiguration.html#cfn-codedeploy-deploymentgroup-alarmconfiguration-alarms-cddgacAlarms :: Lens' CodeDeployDeploymentGroupAlarmConfiguration (Maybe [CodeDeployDeploymentGroupAlarm])-cddgacAlarms = lens _codeDeployDeploymentGroupAlarmConfigurationAlarms (\s a -> s { _codeDeployDeploymentGroupAlarmConfigurationAlarms = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-alarmconfiguration.html#cfn-codedeploy-deploymentgroup-alarmconfiguration-enabled-cddgacEnabled :: Lens' CodeDeployDeploymentGroupAlarmConfiguration (Maybe (Val Bool))-cddgacEnabled = lens _codeDeployDeploymentGroupAlarmConfigurationEnabled (\s a -> s { _codeDeployDeploymentGroupAlarmConfigurationEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-alarmconfiguration.html#cfn-codedeploy-deploymentgroup-alarmconfiguration-ignorepollalarmfailure-cddgacIgnorePollAlarmFailure :: Lens' CodeDeployDeploymentGroupAlarmConfiguration (Maybe (Val Bool))-cddgacIgnorePollAlarmFailure = lens _codeDeployDeploymentGroupAlarmConfigurationIgnorePollAlarmFailure (\s a -> s { _codeDeployDeploymentGroupAlarmConfigurationIgnorePollAlarmFailure = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-autorollbackconfiguration.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupAutoRollbackConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for--- CodeDeployDeploymentGroupAutoRollbackConfiguration. See--- 'codeDeployDeploymentGroupAutoRollbackConfiguration' for a more--- convenient constructor.-data CodeDeployDeploymentGroupAutoRollbackConfiguration =- CodeDeployDeploymentGroupAutoRollbackConfiguration- { _codeDeployDeploymentGroupAutoRollbackConfigurationEnabled :: Maybe (Val Bool)- , _codeDeployDeploymentGroupAutoRollbackConfigurationEvents :: Maybe (ValList Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupAutoRollbackConfiguration where- toJSON CodeDeployDeploymentGroupAutoRollbackConfiguration{..} =- object $- catMaybes- [ fmap (("Enabled",) . toJSON) _codeDeployDeploymentGroupAutoRollbackConfigurationEnabled- , fmap (("Events",) . toJSON) _codeDeployDeploymentGroupAutoRollbackConfigurationEvents- ]---- | Constructor for 'CodeDeployDeploymentGroupAutoRollbackConfiguration'--- containing required fields as arguments.-codeDeployDeploymentGroupAutoRollbackConfiguration- :: CodeDeployDeploymentGroupAutoRollbackConfiguration-codeDeployDeploymentGroupAutoRollbackConfiguration =- CodeDeployDeploymentGroupAutoRollbackConfiguration- { _codeDeployDeploymentGroupAutoRollbackConfigurationEnabled = Nothing- , _codeDeployDeploymentGroupAutoRollbackConfigurationEvents = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-autorollbackconfiguration.html#cfn-codedeploy-deploymentgroup-autorollbackconfiguration-enabled-cddgarcEnabled :: Lens' CodeDeployDeploymentGroupAutoRollbackConfiguration (Maybe (Val Bool))-cddgarcEnabled = lens _codeDeployDeploymentGroupAutoRollbackConfigurationEnabled (\s a -> s { _codeDeployDeploymentGroupAutoRollbackConfigurationEnabled = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-autorollbackconfiguration.html#cfn-codedeploy-deploymentgroup-autorollbackconfiguration-events-cddgarcEvents :: Lens' CodeDeployDeploymentGroupAutoRollbackConfiguration (Maybe (ValList Text))-cddgarcEvents = lens _codeDeployDeploymentGroupAutoRollbackConfigurationEvents (\s a -> s { _codeDeployDeploymentGroupAutoRollbackConfigurationEvents = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupDeployment where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevisionLocation---- | Full data type definition for CodeDeployDeploymentGroupDeployment. See--- 'codeDeployDeploymentGroupDeployment' for a more convenient constructor.-data CodeDeployDeploymentGroupDeployment =- CodeDeployDeploymentGroupDeployment- { _codeDeployDeploymentGroupDeploymentDescription :: Maybe (Val Text)- , _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures :: Maybe (Val Bool)- , _codeDeployDeploymentGroupDeploymentRevision :: CodeDeployDeploymentGroupRevisionLocation- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupDeployment where- toJSON CodeDeployDeploymentGroupDeployment{..} =- object $- catMaybes- [ fmap (("Description",) . toJSON) _codeDeployDeploymentGroupDeploymentDescription- , fmap (("IgnoreApplicationStopFailures",) . toJSON) _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures- , (Just . ("Revision",) . toJSON) _codeDeployDeploymentGroupDeploymentRevision- ]---- | Constructor for 'CodeDeployDeploymentGroupDeployment' containing required--- fields as arguments.-codeDeployDeploymentGroupDeployment- :: CodeDeployDeploymentGroupRevisionLocation -- ^ 'cddgdRevision'- -> CodeDeployDeploymentGroupDeployment-codeDeployDeploymentGroupDeployment revisionarg =- CodeDeployDeploymentGroupDeployment- { _codeDeployDeploymentGroupDeploymentDescription = Nothing- , _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures = Nothing- , _codeDeployDeploymentGroupDeploymentRevision = revisionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment.html#cfn-properties-codedeploy-deploymentgroup-deployment-description-cddgdDescription :: Lens' CodeDeployDeploymentGroupDeployment (Maybe (Val Text))-cddgdDescription = lens _codeDeployDeploymentGroupDeploymentDescription (\s a -> s { _codeDeployDeploymentGroupDeploymentDescription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment.html#cfn-properties-codedeploy-deploymentgroup-deployment-ignoreapplicationstopfailures-cddgdIgnoreApplicationStopFailures :: Lens' CodeDeployDeploymentGroupDeployment (Maybe (Val Bool))-cddgdIgnoreApplicationStopFailures = lens _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures (\s a -> s { _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-cddgdRevision :: Lens' CodeDeployDeploymentGroupDeployment CodeDeployDeploymentGroupRevisionLocation-cddgdRevision = lens _codeDeployDeploymentGroupDeploymentRevision (\s a -> s { _codeDeployDeploymentGroupDeploymentRevision = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deploymentstyle.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupDeploymentStyle where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupDeploymentStyle.--- See 'codeDeployDeploymentGroupDeploymentStyle' for a more convenient--- constructor.-data CodeDeployDeploymentGroupDeploymentStyle =- CodeDeployDeploymentGroupDeploymentStyle- { _codeDeployDeploymentGroupDeploymentStyleDeploymentOption :: Maybe (Val Text)- , _codeDeployDeploymentGroupDeploymentStyleDeploymentType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupDeploymentStyle where- toJSON CodeDeployDeploymentGroupDeploymentStyle{..} =- object $- catMaybes- [ fmap (("DeploymentOption",) . toJSON) _codeDeployDeploymentGroupDeploymentStyleDeploymentOption- , fmap (("DeploymentType",) . toJSON) _codeDeployDeploymentGroupDeploymentStyleDeploymentType- ]---- | Constructor for 'CodeDeployDeploymentGroupDeploymentStyle' containing--- required fields as arguments.-codeDeployDeploymentGroupDeploymentStyle- :: CodeDeployDeploymentGroupDeploymentStyle-codeDeployDeploymentGroupDeploymentStyle =- CodeDeployDeploymentGroupDeploymentStyle- { _codeDeployDeploymentGroupDeploymentStyleDeploymentOption = Nothing- , _codeDeployDeploymentGroupDeploymentStyleDeploymentType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deploymentstyle.html#cfn-codedeploy-deploymentgroup-deploymentstyle-deploymentoption-cddgdsDeploymentOption :: Lens' CodeDeployDeploymentGroupDeploymentStyle (Maybe (Val Text))-cddgdsDeploymentOption = lens _codeDeployDeploymentGroupDeploymentStyleDeploymentOption (\s a -> s { _codeDeployDeploymentGroupDeploymentStyleDeploymentOption = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deploymentstyle.html#cfn-codedeploy-deploymentgroup-deploymentstyle-deploymenttype-cddgdsDeploymentType :: Lens' CodeDeployDeploymentGroupDeploymentStyle (Maybe (Val Text))-cddgdsDeploymentType = lens _codeDeployDeploymentGroupDeploymentStyleDeploymentType (\s a -> s { _codeDeployDeploymentGroupDeploymentStyleDeploymentType = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilter.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagFilter where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupEC2TagFilter. See--- 'codeDeployDeploymentGroupEC2TagFilter' for a more convenient--- constructor.-data CodeDeployDeploymentGroupEC2TagFilter =- CodeDeployDeploymentGroupEC2TagFilter- { _codeDeployDeploymentGroupEC2TagFilterKey :: Maybe (Val Text)- , _codeDeployDeploymentGroupEC2TagFilterType :: Maybe (Val Text)- , _codeDeployDeploymentGroupEC2TagFilterValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupEC2TagFilter where- toJSON CodeDeployDeploymentGroupEC2TagFilter{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _codeDeployDeploymentGroupEC2TagFilterKey- , fmap (("Type",) . toJSON) _codeDeployDeploymentGroupEC2TagFilterType- , fmap (("Value",) . toJSON) _codeDeployDeploymentGroupEC2TagFilterValue- ]---- | Constructor for 'CodeDeployDeploymentGroupEC2TagFilter' containing--- required fields as arguments.-codeDeployDeploymentGroupEC2TagFilter- :: CodeDeployDeploymentGroupEC2TagFilter-codeDeployDeploymentGroupEC2TagFilter =- CodeDeployDeploymentGroupEC2TagFilter- { _codeDeployDeploymentGroupEC2TagFilterKey = Nothing- , _codeDeployDeploymentGroupEC2TagFilterType = Nothing- , _codeDeployDeploymentGroupEC2TagFilterValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilter.html#cfn-codedeploy-deploymentgroup-ec2tagfilter-key-cddgectfKey :: Lens' CodeDeployDeploymentGroupEC2TagFilter (Maybe (Val Text))-cddgectfKey = lens _codeDeployDeploymentGroupEC2TagFilterKey (\s a -> s { _codeDeployDeploymentGroupEC2TagFilterKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilter.html#cfn-codedeploy-deploymentgroup-ec2tagfilter-type-cddgectfType :: Lens' CodeDeployDeploymentGroupEC2TagFilter (Maybe (Val Text))-cddgectfType = lens _codeDeployDeploymentGroupEC2TagFilterType (\s a -> s { _codeDeployDeploymentGroupEC2TagFilterType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilter.html#cfn-codedeploy-deploymentgroup-ec2tagfilter-value-cddgectfValue :: Lens' CodeDeployDeploymentGroupEC2TagFilter (Maybe (Val Text))-cddgectfValue = lens _codeDeployDeploymentGroupEC2TagFilterValue (\s a -> s { _codeDeployDeploymentGroupEC2TagFilterValue = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagset.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagSet where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagSetListObject---- | Full data type definition for CodeDeployDeploymentGroupEC2TagSet. See--- 'codeDeployDeploymentGroupEC2TagSet' for a more convenient constructor.-data CodeDeployDeploymentGroupEC2TagSet =- CodeDeployDeploymentGroupEC2TagSet- { _codeDeployDeploymentGroupEC2TagSetEc2TagSetList :: Maybe [CodeDeployDeploymentGroupEC2TagSetListObject]- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupEC2TagSet where- toJSON CodeDeployDeploymentGroupEC2TagSet{..} =- object $- catMaybes- [ fmap (("Ec2TagSetList",) . toJSON) _codeDeployDeploymentGroupEC2TagSetEc2TagSetList- ]---- | Constructor for 'CodeDeployDeploymentGroupEC2TagSet' containing required--- fields as arguments.-codeDeployDeploymentGroupEC2TagSet- :: CodeDeployDeploymentGroupEC2TagSet-codeDeployDeploymentGroupEC2TagSet =- CodeDeployDeploymentGroupEC2TagSet- { _codeDeployDeploymentGroupEC2TagSetEc2TagSetList = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagset.html#cfn-codedeploy-deploymentgroup-ec2tagset-ec2tagsetlist-cddgectsEc2TagSetList :: Lens' CodeDeployDeploymentGroupEC2TagSet (Maybe [CodeDeployDeploymentGroupEC2TagSetListObject])-cddgectsEc2TagSetList = lens _codeDeployDeploymentGroupEC2TagSetEc2TagSetList (\s a -> s { _codeDeployDeploymentGroupEC2TagSetEc2TagSetList = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagsetlistobject.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagSetListObject where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagFilter---- | Full data type definition for--- CodeDeployDeploymentGroupEC2TagSetListObject. See--- 'codeDeployDeploymentGroupEC2TagSetListObject' for a more convenient--- constructor.-data CodeDeployDeploymentGroupEC2TagSetListObject =- CodeDeployDeploymentGroupEC2TagSetListObject- { _codeDeployDeploymentGroupEC2TagSetListObjectEc2TagGroup :: Maybe [CodeDeployDeploymentGroupEC2TagFilter]- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupEC2TagSetListObject where- toJSON CodeDeployDeploymentGroupEC2TagSetListObject{..} =- object $- catMaybes- [ fmap (("Ec2TagGroup",) . toJSON) _codeDeployDeploymentGroupEC2TagSetListObjectEc2TagGroup- ]---- | Constructor for 'CodeDeployDeploymentGroupEC2TagSetListObject' containing--- required fields as arguments.-codeDeployDeploymentGroupEC2TagSetListObject- :: CodeDeployDeploymentGroupEC2TagSetListObject-codeDeployDeploymentGroupEC2TagSetListObject =- CodeDeployDeploymentGroupEC2TagSetListObject- { _codeDeployDeploymentGroupEC2TagSetListObjectEc2TagGroup = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagsetlistobject.html#cfn-codedeploy-deploymentgroup-ec2tagsetlistobject-ec2taggroup-cddgectsloEc2TagGroup :: Lens' CodeDeployDeploymentGroupEC2TagSetListObject (Maybe [CodeDeployDeploymentGroupEC2TagFilter])-cddgectsloEc2TagGroup = lens _codeDeployDeploymentGroupEC2TagSetListObjectEc2TagGroup (\s a -> s { _codeDeployDeploymentGroupEC2TagSetListObjectEc2TagGroup = a })
@@ -1,38 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-elbinfo.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupELBInfo where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupELBInfo. See--- 'codeDeployDeploymentGroupELBInfo' for a more convenient constructor.-data CodeDeployDeploymentGroupELBInfo =- CodeDeployDeploymentGroupELBInfo- { _codeDeployDeploymentGroupELBInfoName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupELBInfo where- toJSON CodeDeployDeploymentGroupELBInfo{..} =- object $- catMaybes- [ fmap (("Name",) . toJSON) _codeDeployDeploymentGroupELBInfoName- ]---- | Constructor for 'CodeDeployDeploymentGroupELBInfo' containing required--- fields as arguments.-codeDeployDeploymentGroupELBInfo- :: CodeDeployDeploymentGroupELBInfo-codeDeployDeploymentGroupELBInfo =- CodeDeployDeploymentGroupELBInfo- { _codeDeployDeploymentGroupELBInfoName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-elbinfo.html#cfn-codedeploy-deploymentgroup-elbinfo-name-cddgelbiName :: Lens' CodeDeployDeploymentGroupELBInfo (Maybe (Val Text))-cddgelbiName = lens _codeDeployDeploymentGroupELBInfoName (\s a -> s { _codeDeployDeploymentGroupELBInfoName = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-githublocation.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupGitHubLocation where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupGitHubLocation.--- See 'codeDeployDeploymentGroupGitHubLocation' for a more convenient--- constructor.-data CodeDeployDeploymentGroupGitHubLocation =- CodeDeployDeploymentGroupGitHubLocation- { _codeDeployDeploymentGroupGitHubLocationCommitId :: Val Text- , _codeDeployDeploymentGroupGitHubLocationRepository :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupGitHubLocation where- toJSON CodeDeployDeploymentGroupGitHubLocation{..} =- object $- catMaybes- [ (Just . ("CommitId",) . toJSON) _codeDeployDeploymentGroupGitHubLocationCommitId- , (Just . ("Repository",) . toJSON) _codeDeployDeploymentGroupGitHubLocationRepository- ]---- | Constructor for 'CodeDeployDeploymentGroupGitHubLocation' containing--- required fields as arguments.-codeDeployDeploymentGroupGitHubLocation- :: Val Text -- ^ 'cddgghlCommitId'- -> Val Text -- ^ 'cddgghlRepository'- -> CodeDeployDeploymentGroupGitHubLocation-codeDeployDeploymentGroupGitHubLocation commitIdarg repositoryarg =- CodeDeployDeploymentGroupGitHubLocation- { _codeDeployDeploymentGroupGitHubLocationCommitId = commitIdarg- , _codeDeployDeploymentGroupGitHubLocationRepository = repositoryarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-githublocation.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-githublocation-commitid-cddgghlCommitId :: Lens' CodeDeployDeploymentGroupGitHubLocation (Val Text)-cddgghlCommitId = lens _codeDeployDeploymentGroupGitHubLocationCommitId (\s a -> s { _codeDeployDeploymentGroupGitHubLocationCommitId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-githublocation.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-githublocation-repository-cddgghlRepository :: Lens' CodeDeployDeploymentGroupGitHubLocation (Val Text)-cddgghlRepository = lens _codeDeployDeploymentGroupGitHubLocationRepository (\s a -> s { _codeDeployDeploymentGroupGitHubLocationRepository = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-loadbalancerinfo.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupLoadBalancerInfo where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupELBInfo-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTargetGroupInfo---- | Full data type definition for CodeDeployDeploymentGroupLoadBalancerInfo.--- See 'codeDeployDeploymentGroupLoadBalancerInfo' for a more convenient--- constructor.-data CodeDeployDeploymentGroupLoadBalancerInfo =- CodeDeployDeploymentGroupLoadBalancerInfo- { _codeDeployDeploymentGroupLoadBalancerInfoElbInfoList :: Maybe [CodeDeployDeploymentGroupELBInfo]- , _codeDeployDeploymentGroupLoadBalancerInfoTargetGroupInfoList :: Maybe [CodeDeployDeploymentGroupTargetGroupInfo]- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupLoadBalancerInfo where- toJSON CodeDeployDeploymentGroupLoadBalancerInfo{..} =- object $- catMaybes- [ fmap (("ElbInfoList",) . toJSON) _codeDeployDeploymentGroupLoadBalancerInfoElbInfoList- , fmap (("TargetGroupInfoList",) . toJSON) _codeDeployDeploymentGroupLoadBalancerInfoTargetGroupInfoList- ]---- | Constructor for 'CodeDeployDeploymentGroupLoadBalancerInfo' containing--- required fields as arguments.-codeDeployDeploymentGroupLoadBalancerInfo- :: CodeDeployDeploymentGroupLoadBalancerInfo-codeDeployDeploymentGroupLoadBalancerInfo =- CodeDeployDeploymentGroupLoadBalancerInfo- { _codeDeployDeploymentGroupLoadBalancerInfoElbInfoList = Nothing- , _codeDeployDeploymentGroupLoadBalancerInfoTargetGroupInfoList = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-loadbalancerinfo.html#cfn-codedeploy-deploymentgroup-loadbalancerinfo-elbinfolist-cddglbiElbInfoList :: Lens' CodeDeployDeploymentGroupLoadBalancerInfo (Maybe [CodeDeployDeploymentGroupELBInfo])-cddglbiElbInfoList = lens _codeDeployDeploymentGroupLoadBalancerInfoElbInfoList (\s a -> s { _codeDeployDeploymentGroupLoadBalancerInfoElbInfoList = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-loadbalancerinfo.html#cfn-codedeploy-deploymentgroup-loadbalancerinfo-targetgroupinfolist-cddglbiTargetGroupInfoList :: Lens' CodeDeployDeploymentGroupLoadBalancerInfo (Maybe [CodeDeployDeploymentGroupTargetGroupInfo])-cddglbiTargetGroupInfoList = lens _codeDeployDeploymentGroupLoadBalancerInfoTargetGroupInfoList (\s a -> s { _codeDeployDeploymentGroupLoadBalancerInfoTargetGroupInfoList = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisestagset.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesTagSet where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesTagSetListObject---- | Full data type definition for CodeDeployDeploymentGroupOnPremisesTagSet.--- See 'codeDeployDeploymentGroupOnPremisesTagSet' for a more convenient--- constructor.-data CodeDeployDeploymentGroupOnPremisesTagSet =- CodeDeployDeploymentGroupOnPremisesTagSet- { _codeDeployDeploymentGroupOnPremisesTagSetOnPremisesTagSetList :: Maybe [CodeDeployDeploymentGroupOnPremisesTagSetListObject]- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupOnPremisesTagSet where- toJSON CodeDeployDeploymentGroupOnPremisesTagSet{..} =- object $- catMaybes- [ fmap (("OnPremisesTagSetList",) . toJSON) _codeDeployDeploymentGroupOnPremisesTagSetOnPremisesTagSetList- ]---- | Constructor for 'CodeDeployDeploymentGroupOnPremisesTagSet' containing--- required fields as arguments.-codeDeployDeploymentGroupOnPremisesTagSet- :: CodeDeployDeploymentGroupOnPremisesTagSet-codeDeployDeploymentGroupOnPremisesTagSet =- CodeDeployDeploymentGroupOnPremisesTagSet- { _codeDeployDeploymentGroupOnPremisesTagSetOnPremisesTagSetList = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisestagset.html#cfn-codedeploy-deploymentgroup-onpremisestagset-onpremisestagsetlist-cddgoptsOnPremisesTagSetList :: Lens' CodeDeployDeploymentGroupOnPremisesTagSet (Maybe [CodeDeployDeploymentGroupOnPremisesTagSetListObject])-cddgoptsOnPremisesTagSetList = lens _codeDeployDeploymentGroupOnPremisesTagSetOnPremisesTagSetList (\s a -> s { _codeDeployDeploymentGroupOnPremisesTagSetOnPremisesTagSetList = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisestagsetlistobject.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesTagSetListObject where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTagFilter---- | Full data type definition for--- CodeDeployDeploymentGroupOnPremisesTagSetListObject. See--- 'codeDeployDeploymentGroupOnPremisesTagSetListObject' for a more--- convenient constructor.-data CodeDeployDeploymentGroupOnPremisesTagSetListObject =- CodeDeployDeploymentGroupOnPremisesTagSetListObject- { _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup :: Maybe [CodeDeployDeploymentGroupTagFilter]- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupOnPremisesTagSetListObject where- toJSON CodeDeployDeploymentGroupOnPremisesTagSetListObject{..} =- object $- catMaybes- [ fmap (("OnPremisesTagGroup",) . toJSON) _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup- ]---- | Constructor for 'CodeDeployDeploymentGroupOnPremisesTagSetListObject'--- containing required fields as arguments.-codeDeployDeploymentGroupOnPremisesTagSetListObject- :: CodeDeployDeploymentGroupOnPremisesTagSetListObject-codeDeployDeploymentGroupOnPremisesTagSetListObject =- CodeDeployDeploymentGroupOnPremisesTagSetListObject- { _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisestagsetlistobject.html#cfn-codedeploy-deploymentgroup-onpremisestagsetlistobject-onpremisestaggroup-cddgoptsloOnPremisesTagGroup :: Lens' CodeDeployDeploymentGroupOnPremisesTagSetListObject (Maybe [CodeDeployDeploymentGroupTagFilter])-cddgoptsloOnPremisesTagGroup = lens _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup (\s a -> s { _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevisionLocation where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupGitHubLocation-import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupS3Location---- | Full data type definition for CodeDeployDeploymentGroupRevisionLocation.--- See 'codeDeployDeploymentGroupRevisionLocation' for a more convenient--- constructor.-data CodeDeployDeploymentGroupRevisionLocation =- CodeDeployDeploymentGroupRevisionLocation- { _codeDeployDeploymentGroupRevisionLocationGitHubLocation :: Maybe CodeDeployDeploymentGroupGitHubLocation- , _codeDeployDeploymentGroupRevisionLocationRevisionType :: Maybe (Val Text)- , _codeDeployDeploymentGroupRevisionLocationS3Location :: Maybe CodeDeployDeploymentGroupS3Location- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupRevisionLocation where- toJSON CodeDeployDeploymentGroupRevisionLocation{..} =- object $- catMaybes- [ fmap (("GitHubLocation",) . toJSON) _codeDeployDeploymentGroupRevisionLocationGitHubLocation- , fmap (("RevisionType",) . toJSON) _codeDeployDeploymentGroupRevisionLocationRevisionType- , fmap (("S3Location",) . toJSON) _codeDeployDeploymentGroupRevisionLocationS3Location- ]---- | Constructor for 'CodeDeployDeploymentGroupRevisionLocation' containing--- required fields as arguments.-codeDeployDeploymentGroupRevisionLocation- :: CodeDeployDeploymentGroupRevisionLocation-codeDeployDeploymentGroupRevisionLocation =- CodeDeployDeploymentGroupRevisionLocation- { _codeDeployDeploymentGroupRevisionLocationGitHubLocation = Nothing- , _codeDeployDeploymentGroupRevisionLocationRevisionType = Nothing- , _codeDeployDeploymentGroupRevisionLocationS3Location = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-githublocation-cddgrlGitHubLocation :: Lens' CodeDeployDeploymentGroupRevisionLocation (Maybe CodeDeployDeploymentGroupGitHubLocation)-cddgrlGitHubLocation = lens _codeDeployDeploymentGroupRevisionLocationGitHubLocation (\s a -> s { _codeDeployDeploymentGroupRevisionLocationGitHubLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-revisiontype-cddgrlRevisionType :: Lens' CodeDeployDeploymentGroupRevisionLocation (Maybe (Val Text))-cddgrlRevisionType = lens _codeDeployDeploymentGroupRevisionLocationRevisionType (\s a -> s { _codeDeployDeploymentGroupRevisionLocationRevisionType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-cddgrlS3Location :: Lens' CodeDeployDeploymentGroupRevisionLocation (Maybe CodeDeployDeploymentGroupS3Location)-cddgrlS3Location = lens _codeDeployDeploymentGroupRevisionLocationS3Location (\s a -> s { _codeDeployDeploymentGroupRevisionLocationS3Location = a })
@@ -1,68 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupS3Location where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupS3Location. See--- 'codeDeployDeploymentGroupS3Location' for a more convenient constructor.-data CodeDeployDeploymentGroupS3Location =- CodeDeployDeploymentGroupS3Location- { _codeDeployDeploymentGroupS3LocationBucket :: Val Text- , _codeDeployDeploymentGroupS3LocationBundleType :: Maybe (Val Text)- , _codeDeployDeploymentGroupS3LocationETag :: Maybe (Val Text)- , _codeDeployDeploymentGroupS3LocationKey :: Val Text- , _codeDeployDeploymentGroupS3LocationVersion :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupS3Location where- toJSON CodeDeployDeploymentGroupS3Location{..} =- object $- catMaybes- [ (Just . ("Bucket",) . toJSON) _codeDeployDeploymentGroupS3LocationBucket- , fmap (("BundleType",) . toJSON) _codeDeployDeploymentGroupS3LocationBundleType- , fmap (("ETag",) . toJSON) _codeDeployDeploymentGroupS3LocationETag- , (Just . ("Key",) . toJSON) _codeDeployDeploymentGroupS3LocationKey- , fmap (("Version",) . toJSON) _codeDeployDeploymentGroupS3LocationVersion- ]---- | Constructor for 'CodeDeployDeploymentGroupS3Location' containing required--- fields as arguments.-codeDeployDeploymentGroupS3Location- :: Val Text -- ^ 'cddgslBucket'- -> Val Text -- ^ 'cddgslKey'- -> CodeDeployDeploymentGroupS3Location-codeDeployDeploymentGroupS3Location bucketarg keyarg =- CodeDeployDeploymentGroupS3Location- { _codeDeployDeploymentGroupS3LocationBucket = bucketarg- , _codeDeployDeploymentGroupS3LocationBundleType = Nothing- , _codeDeployDeploymentGroupS3LocationETag = Nothing- , _codeDeployDeploymentGroupS3LocationKey = keyarg- , _codeDeployDeploymentGroupS3LocationVersion = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-bucket-cddgslBucket :: Lens' CodeDeployDeploymentGroupS3Location (Val Text)-cddgslBucket = lens _codeDeployDeploymentGroupS3LocationBucket (\s a -> s { _codeDeployDeploymentGroupS3LocationBucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-bundletype-cddgslBundleType :: Lens' CodeDeployDeploymentGroupS3Location (Maybe (Val Text))-cddgslBundleType = lens _codeDeployDeploymentGroupS3LocationBundleType (\s a -> s { _codeDeployDeploymentGroupS3LocationBundleType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-etag-cddgslETag :: Lens' CodeDeployDeploymentGroupS3Location (Maybe (Val Text))-cddgslETag = lens _codeDeployDeploymentGroupS3LocationETag (\s a -> s { _codeDeployDeploymentGroupS3LocationETag = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-key-cddgslKey :: Lens' CodeDeployDeploymentGroupS3Location (Val Text)-cddgslKey = lens _codeDeployDeploymentGroupS3LocationKey (\s a -> s { _codeDeployDeploymentGroupS3LocationKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-value-cddgslVersion :: Lens' CodeDeployDeploymentGroupS3Location (Maybe (Val Text))-cddgslVersion = lens _codeDeployDeploymentGroupS3LocationVersion (\s a -> s { _codeDeployDeploymentGroupS3LocationVersion = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-tagfilter.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTagFilter where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupTagFilter. See--- 'codeDeployDeploymentGroupTagFilter' for a more convenient constructor.-data CodeDeployDeploymentGroupTagFilter =- CodeDeployDeploymentGroupTagFilter- { _codeDeployDeploymentGroupTagFilterKey :: Maybe (Val Text)- , _codeDeployDeploymentGroupTagFilterType :: Maybe (Val Text)- , _codeDeployDeploymentGroupTagFilterValue :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupTagFilter where- toJSON CodeDeployDeploymentGroupTagFilter{..} =- object $- catMaybes- [ fmap (("Key",) . toJSON) _codeDeployDeploymentGroupTagFilterKey- , fmap (("Type",) . toJSON) _codeDeployDeploymentGroupTagFilterType- , fmap (("Value",) . toJSON) _codeDeployDeploymentGroupTagFilterValue- ]---- | Constructor for 'CodeDeployDeploymentGroupTagFilter' containing required--- fields as arguments.-codeDeployDeploymentGroupTagFilter- :: CodeDeployDeploymentGroupTagFilter-codeDeployDeploymentGroupTagFilter =- CodeDeployDeploymentGroupTagFilter- { _codeDeployDeploymentGroupTagFilterKey = Nothing- , _codeDeployDeploymentGroupTagFilterType = Nothing- , _codeDeployDeploymentGroupTagFilterValue = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-tagfilter.html#cfn-codedeploy-deploymentgroup-tagfilter-key-cddgtfKey :: Lens' CodeDeployDeploymentGroupTagFilter (Maybe (Val Text))-cddgtfKey = lens _codeDeployDeploymentGroupTagFilterKey (\s a -> s { _codeDeployDeploymentGroupTagFilterKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-tagfilter.html#cfn-codedeploy-deploymentgroup-tagfilter-type-cddgtfType :: Lens' CodeDeployDeploymentGroupTagFilter (Maybe (Val Text))-cddgtfType = lens _codeDeployDeploymentGroupTagFilterType (\s a -> s { _codeDeployDeploymentGroupTagFilterType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-tagfilter.html#cfn-codedeploy-deploymentgroup-tagfilter-value-cddgtfValue :: Lens' CodeDeployDeploymentGroupTagFilter (Maybe (Val Text))-cddgtfValue = lens _codeDeployDeploymentGroupTagFilterValue (\s a -> s { _codeDeployDeploymentGroupTagFilterValue = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-targetgroupinfo.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTargetGroupInfo where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupTargetGroupInfo.--- See 'codeDeployDeploymentGroupTargetGroupInfo' for a more convenient--- constructor.-data CodeDeployDeploymentGroupTargetGroupInfo =- CodeDeployDeploymentGroupTargetGroupInfo- { _codeDeployDeploymentGroupTargetGroupInfoName :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupTargetGroupInfo where- toJSON CodeDeployDeploymentGroupTargetGroupInfo{..} =- object $- catMaybes- [ fmap (("Name",) . toJSON) _codeDeployDeploymentGroupTargetGroupInfoName- ]---- | Constructor for 'CodeDeployDeploymentGroupTargetGroupInfo' containing--- required fields as arguments.-codeDeployDeploymentGroupTargetGroupInfo- :: CodeDeployDeploymentGroupTargetGroupInfo-codeDeployDeploymentGroupTargetGroupInfo =- CodeDeployDeploymentGroupTargetGroupInfo- { _codeDeployDeploymentGroupTargetGroupInfoName = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-targetgroupinfo.html#cfn-codedeploy-deploymentgroup-targetgroupinfo-name-cddgtgiName :: Lens' CodeDeployDeploymentGroupTargetGroupInfo (Maybe (Val Text))-cddgtgiName = lens _codeDeployDeploymentGroupTargetGroupInfoName (\s a -> s { _codeDeployDeploymentGroupTargetGroupInfoName = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-triggerconfig.html--module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTriggerConfig where--import Stratosphere.ResourceImports----- | Full data type definition for CodeDeployDeploymentGroupTriggerConfig. See--- 'codeDeployDeploymentGroupTriggerConfig' for a more convenient--- constructor.-data CodeDeployDeploymentGroupTriggerConfig =- CodeDeployDeploymentGroupTriggerConfig- { _codeDeployDeploymentGroupTriggerConfigTriggerEvents :: Maybe (ValList Text)- , _codeDeployDeploymentGroupTriggerConfigTriggerName :: Maybe (Val Text)- , _codeDeployDeploymentGroupTriggerConfigTriggerTargetArn :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeDeployDeploymentGroupTriggerConfig where- toJSON CodeDeployDeploymentGroupTriggerConfig{..} =- object $- catMaybes- [ fmap (("TriggerEvents",) . toJSON) _codeDeployDeploymentGroupTriggerConfigTriggerEvents- , fmap (("TriggerName",) . toJSON) _codeDeployDeploymentGroupTriggerConfigTriggerName- , fmap (("TriggerTargetArn",) . toJSON) _codeDeployDeploymentGroupTriggerConfigTriggerTargetArn- ]---- | Constructor for 'CodeDeployDeploymentGroupTriggerConfig' containing--- required fields as arguments.-codeDeployDeploymentGroupTriggerConfig- :: CodeDeployDeploymentGroupTriggerConfig-codeDeployDeploymentGroupTriggerConfig =- CodeDeployDeploymentGroupTriggerConfig- { _codeDeployDeploymentGroupTriggerConfigTriggerEvents = Nothing- , _codeDeployDeploymentGroupTriggerConfigTriggerName = Nothing- , _codeDeployDeploymentGroupTriggerConfigTriggerTargetArn = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-triggerconfig.html#cfn-codedeploy-deploymentgroup-triggerconfig-triggerevents-cddgtcTriggerEvents :: Lens' CodeDeployDeploymentGroupTriggerConfig (Maybe (ValList Text))-cddgtcTriggerEvents = lens _codeDeployDeploymentGroupTriggerConfigTriggerEvents (\s a -> s { _codeDeployDeploymentGroupTriggerConfigTriggerEvents = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-triggerconfig.html#cfn-codedeploy-deploymentgroup-triggerconfig-triggername-cddgtcTriggerName :: Lens' CodeDeployDeploymentGroupTriggerConfig (Maybe (Val Text))-cddgtcTriggerName = lens _codeDeployDeploymentGroupTriggerConfigTriggerName (\s a -> s { _codeDeployDeploymentGroupTriggerConfigTriggerName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-triggerconfig.html#cfn-codedeploy-deploymentgroup-triggerconfig-triggertargetarn-cddgtcTriggerTargetArn :: Lens' CodeDeployDeploymentGroupTriggerConfig (Maybe (Val Text))-cddgtcTriggerTargetArn = lens _codeDeployDeploymentGroupTriggerConfigTriggerTargetArn (\s a -> s { _codeDeployDeploymentGroupTriggerConfigTriggerTargetArn = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codeguruprofiler-profilinggroup-channel.html--module Stratosphere.ResourceProperties.CodeGuruProfilerProfilingGroupChannel where--import Stratosphere.ResourceImports----- | Full data type definition for CodeGuruProfilerProfilingGroupChannel. See--- 'codeGuruProfilerProfilingGroupChannel' for a more convenient--- constructor.-data CodeGuruProfilerProfilingGroupChannel =- CodeGuruProfilerProfilingGroupChannel- { _codeGuruProfilerProfilingGroupChannelchannelId :: Maybe (Val Text)- , _codeGuruProfilerProfilingGroupChannelchannelUri :: Val Text- } deriving (Show, Eq)--instance ToJSON CodeGuruProfilerProfilingGroupChannel where- toJSON CodeGuruProfilerProfilingGroupChannel{..} =- object $- catMaybes- [ fmap (("channelId",) . toJSON) _codeGuruProfilerProfilingGroupChannelchannelId- , (Just . ("channelUri",) . toJSON) _codeGuruProfilerProfilingGroupChannelchannelUri- ]---- | Constructor for 'CodeGuruProfilerProfilingGroupChannel' containing--- required fields as arguments.-codeGuruProfilerProfilingGroupChannel- :: Val Text -- ^ 'cgppgcchannelUri'- -> CodeGuruProfilerProfilingGroupChannel-codeGuruProfilerProfilingGroupChannel channelUriarg =- CodeGuruProfilerProfilingGroupChannel- { _codeGuruProfilerProfilingGroupChannelchannelId = Nothing- , _codeGuruProfilerProfilingGroupChannelchannelUri = channelUriarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codeguruprofiler-profilinggroup-channel.html#cfn-codeguruprofiler-profilinggroup-channel-channelid-cgppgcchannelId :: Lens' CodeGuruProfilerProfilingGroupChannel (Maybe (Val Text))-cgppgcchannelId = lens _codeGuruProfilerProfilingGroupChannelchannelId (\s a -> s { _codeGuruProfilerProfilingGroupChannelchannelId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codeguruprofiler-profilinggroup-channel.html#cfn-codeguruprofiler-profilinggroup-channel-channeluri-cgppgcchannelUri :: Lens' CodeGuruProfilerProfilingGroupChannel (Val Text)-cgppgcchannelUri = lens _codeGuruProfilerProfilingGroupChannelchannelUri (\s a -> s { _codeGuruProfilerProfilingGroupChannelchannelUri = a })
@@ -1,49 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-artifactdetails.html--module Stratosphere.ResourceProperties.CodePipelineCustomActionTypeArtifactDetails where--import Stratosphere.ResourceImports----- | Full data type definition for--- CodePipelineCustomActionTypeArtifactDetails. See--- 'codePipelineCustomActionTypeArtifactDetails' for a more convenient--- constructor.-data CodePipelineCustomActionTypeArtifactDetails =- CodePipelineCustomActionTypeArtifactDetails- { _codePipelineCustomActionTypeArtifactDetailsMaximumCount :: Val Integer- , _codePipelineCustomActionTypeArtifactDetailsMinimumCount :: Val Integer- } deriving (Show, Eq)--instance ToJSON CodePipelineCustomActionTypeArtifactDetails where- toJSON CodePipelineCustomActionTypeArtifactDetails{..} =- object $- catMaybes- [ (Just . ("MaximumCount",) . toJSON) _codePipelineCustomActionTypeArtifactDetailsMaximumCount- , (Just . ("MinimumCount",) . toJSON) _codePipelineCustomActionTypeArtifactDetailsMinimumCount- ]---- | Constructor for 'CodePipelineCustomActionTypeArtifactDetails' containing--- required fields as arguments.-codePipelineCustomActionTypeArtifactDetails- :: Val Integer -- ^ 'cpcatadMaximumCount'- -> Val Integer -- ^ 'cpcatadMinimumCount'- -> CodePipelineCustomActionTypeArtifactDetails-codePipelineCustomActionTypeArtifactDetails maximumCountarg minimumCountarg =- CodePipelineCustomActionTypeArtifactDetails- { _codePipelineCustomActionTypeArtifactDetailsMaximumCount = maximumCountarg- , _codePipelineCustomActionTypeArtifactDetailsMinimumCount = minimumCountarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-artifactdetails.html#cfn-codepipeline-customactiontype-artifactdetails-maximumcount-cpcatadMaximumCount :: Lens' CodePipelineCustomActionTypeArtifactDetails (Val Integer)-cpcatadMaximumCount = lens _codePipelineCustomActionTypeArtifactDetailsMaximumCount (\s a -> s { _codePipelineCustomActionTypeArtifactDetailsMaximumCount = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-artifactdetails.html#cfn-codepipeline-customactiontype-artifactdetails-minimumcount-cpcatadMinimumCount :: Lens' CodePipelineCustomActionTypeArtifactDetails (Val Integer)-cpcatadMinimumCount = lens _codePipelineCustomActionTypeArtifactDetailsMinimumCount (\s a -> s { _codePipelineCustomActionTypeArtifactDetailsMinimumCount = a })
@@ -1,86 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html--module Stratosphere.ResourceProperties.CodePipelineCustomActionTypeConfigurationProperties where--import Stratosphere.ResourceImports----- | Full data type definition for--- CodePipelineCustomActionTypeConfigurationProperties. See--- 'codePipelineCustomActionTypeConfigurationProperties' for a more--- convenient constructor.-data CodePipelineCustomActionTypeConfigurationProperties =- CodePipelineCustomActionTypeConfigurationProperties- { _codePipelineCustomActionTypeConfigurationPropertiesDescription :: Maybe (Val Text)- , _codePipelineCustomActionTypeConfigurationPropertiesKey :: Val Bool- , _codePipelineCustomActionTypeConfigurationPropertiesName :: Val Text- , _codePipelineCustomActionTypeConfigurationPropertiesQueryable :: Maybe (Val Bool)- , _codePipelineCustomActionTypeConfigurationPropertiesRequired :: Val Bool- , _codePipelineCustomActionTypeConfigurationPropertiesSecret :: Val Bool- , _codePipelineCustomActionTypeConfigurationPropertiesType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodePipelineCustomActionTypeConfigurationProperties where- toJSON CodePipelineCustomActionTypeConfigurationProperties{..} =- object $- catMaybes- [ fmap (("Description",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesDescription- , (Just . ("Key",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesKey- , (Just . ("Name",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesName- , fmap (("Queryable",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesQueryable- , (Just . ("Required",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesRequired- , (Just . ("Secret",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesSecret- , fmap (("Type",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesType- ]---- | Constructor for 'CodePipelineCustomActionTypeConfigurationProperties'--- containing required fields as arguments.-codePipelineCustomActionTypeConfigurationProperties- :: Val Bool -- ^ 'cpcatcpKey'- -> Val Text -- ^ 'cpcatcpName'- -> Val Bool -- ^ 'cpcatcpRequired'- -> Val Bool -- ^ 'cpcatcpSecret'- -> CodePipelineCustomActionTypeConfigurationProperties-codePipelineCustomActionTypeConfigurationProperties keyarg namearg requiredarg secretarg =- CodePipelineCustomActionTypeConfigurationProperties- { _codePipelineCustomActionTypeConfigurationPropertiesDescription = Nothing- , _codePipelineCustomActionTypeConfigurationPropertiesKey = keyarg- , _codePipelineCustomActionTypeConfigurationPropertiesName = namearg- , _codePipelineCustomActionTypeConfigurationPropertiesQueryable = Nothing- , _codePipelineCustomActionTypeConfigurationPropertiesRequired = requiredarg- , _codePipelineCustomActionTypeConfigurationPropertiesSecret = secretarg- , _codePipelineCustomActionTypeConfigurationPropertiesType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-description-cpcatcpDescription :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Maybe (Val Text))-cpcatcpDescription = lens _codePipelineCustomActionTypeConfigurationPropertiesDescription (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesDescription = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-key-cpcatcpKey :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Val Bool)-cpcatcpKey = lens _codePipelineCustomActionTypeConfigurationPropertiesKey (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-name-cpcatcpName :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Val Text)-cpcatcpName = lens _codePipelineCustomActionTypeConfigurationPropertiesName (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-queryable-cpcatcpQueryable :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Maybe (Val Bool))-cpcatcpQueryable = lens _codePipelineCustomActionTypeConfigurationPropertiesQueryable (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesQueryable = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-required-cpcatcpRequired :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Val Bool)-cpcatcpRequired = lens _codePipelineCustomActionTypeConfigurationPropertiesRequired (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesRequired = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-secret-cpcatcpSecret :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Val Bool)-cpcatcpSecret = lens _codePipelineCustomActionTypeConfigurationPropertiesSecret (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesSecret = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-configurationproperties.html#cfn-codepipeline-customactiontype-configurationproperties-type-cpcatcpType :: Lens' CodePipelineCustomActionTypeConfigurationProperties (Maybe (Val Text))-cpcatcpType = lens _codePipelineCustomActionTypeConfigurationPropertiesType (\s a -> s { _codePipelineCustomActionTypeConfigurationPropertiesType = a })
@@ -1,59 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-settings.html--module Stratosphere.ResourceProperties.CodePipelineCustomActionTypeSettings where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelineCustomActionTypeSettings. See--- 'codePipelineCustomActionTypeSettings' for a more convenient constructor.-data CodePipelineCustomActionTypeSettings =- CodePipelineCustomActionTypeSettings- { _codePipelineCustomActionTypeSettingsEntityUrlTemplate :: Maybe (Val Text)- , _codePipelineCustomActionTypeSettingsExecutionUrlTemplate :: Maybe (Val Text)- , _codePipelineCustomActionTypeSettingsRevisionUrlTemplate :: Maybe (Val Text)- , _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodePipelineCustomActionTypeSettings where- toJSON CodePipelineCustomActionTypeSettings{..} =- object $- catMaybes- [ fmap (("EntityUrlTemplate",) . toJSON) _codePipelineCustomActionTypeSettingsEntityUrlTemplate- , fmap (("ExecutionUrlTemplate",) . toJSON) _codePipelineCustomActionTypeSettingsExecutionUrlTemplate- , fmap (("RevisionUrlTemplate",) . toJSON) _codePipelineCustomActionTypeSettingsRevisionUrlTemplate- , fmap (("ThirdPartyConfigurationUrl",) . toJSON) _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl- ]---- | Constructor for 'CodePipelineCustomActionTypeSettings' containing--- required fields as arguments.-codePipelineCustomActionTypeSettings- :: CodePipelineCustomActionTypeSettings-codePipelineCustomActionTypeSettings =- CodePipelineCustomActionTypeSettings- { _codePipelineCustomActionTypeSettingsEntityUrlTemplate = Nothing- , _codePipelineCustomActionTypeSettingsExecutionUrlTemplate = Nothing- , _codePipelineCustomActionTypeSettingsRevisionUrlTemplate = Nothing- , _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-settings.html#cfn-codepipeline-customactiontype-settings-entityurltemplate-cpcatsEntityUrlTemplate :: Lens' CodePipelineCustomActionTypeSettings (Maybe (Val Text))-cpcatsEntityUrlTemplate = lens _codePipelineCustomActionTypeSettingsEntityUrlTemplate (\s a -> s { _codePipelineCustomActionTypeSettingsEntityUrlTemplate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-settings.html#cfn-codepipeline-customactiontype-settings-executionurltemplate-cpcatsExecutionUrlTemplate :: Lens' CodePipelineCustomActionTypeSettings (Maybe (Val Text))-cpcatsExecutionUrlTemplate = lens _codePipelineCustomActionTypeSettingsExecutionUrlTemplate (\s a -> s { _codePipelineCustomActionTypeSettingsExecutionUrlTemplate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-settings.html#cfn-codepipeline-customactiontype-settings-revisionurltemplate-cpcatsRevisionUrlTemplate :: Lens' CodePipelineCustomActionTypeSettings (Maybe (Val Text))-cpcatsRevisionUrlTemplate = lens _codePipelineCustomActionTypeSettingsRevisionUrlTemplate (\s a -> s { _codePipelineCustomActionTypeSettingsRevisionUrlTemplate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-customactiontype-settings.html#cfn-codepipeline-customactiontype-settings-thirdpartyconfigurationurl-cpcatsThirdPartyConfigurationUrl :: Lens' CodePipelineCustomActionTypeSettings (Maybe (Val Text))-cpcatsThirdPartyConfigurationUrl = lens _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl (\s a -> s { _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl = a })
@@ -1,99 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html--module Stratosphere.ResourceProperties.CodePipelinePipelineActionDeclaration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodePipelinePipelineActionTypeId-import Stratosphere.ResourceProperties.CodePipelinePipelineInputArtifact-import Stratosphere.ResourceProperties.CodePipelinePipelineOutputArtifact---- | Full data type definition for CodePipelinePipelineActionDeclaration. See--- 'codePipelinePipelineActionDeclaration' for a more convenient--- constructor.-data CodePipelinePipelineActionDeclaration =- CodePipelinePipelineActionDeclaration- { _codePipelinePipelineActionDeclarationActionTypeId :: CodePipelinePipelineActionTypeId- , _codePipelinePipelineActionDeclarationConfiguration :: Maybe Object- , _codePipelinePipelineActionDeclarationInputArtifacts :: Maybe [CodePipelinePipelineInputArtifact]- , _codePipelinePipelineActionDeclarationName :: Val Text- , _codePipelinePipelineActionDeclarationNamespace :: Maybe (Val Text)- , _codePipelinePipelineActionDeclarationOutputArtifacts :: Maybe [CodePipelinePipelineOutputArtifact]- , _codePipelinePipelineActionDeclarationRegion :: Maybe (Val Text)- , _codePipelinePipelineActionDeclarationRoleArn :: Maybe (Val Text)- , _codePipelinePipelineActionDeclarationRunOrder :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineActionDeclaration where- toJSON CodePipelinePipelineActionDeclaration{..} =- object $- catMaybes- [ (Just . ("ActionTypeId",) . toJSON) _codePipelinePipelineActionDeclarationActionTypeId- , fmap (("Configuration",) . toJSON) _codePipelinePipelineActionDeclarationConfiguration- , fmap (("InputArtifacts",) . toJSON) _codePipelinePipelineActionDeclarationInputArtifacts- , (Just . ("Name",) . toJSON) _codePipelinePipelineActionDeclarationName- , fmap (("Namespace",) . toJSON) _codePipelinePipelineActionDeclarationNamespace- , fmap (("OutputArtifacts",) . toJSON) _codePipelinePipelineActionDeclarationOutputArtifacts- , fmap (("Region",) . toJSON) _codePipelinePipelineActionDeclarationRegion- , fmap (("RoleArn",) . toJSON) _codePipelinePipelineActionDeclarationRoleArn- , fmap (("RunOrder",) . toJSON) _codePipelinePipelineActionDeclarationRunOrder- ]---- | Constructor for 'CodePipelinePipelineActionDeclaration' containing--- required fields as arguments.-codePipelinePipelineActionDeclaration- :: CodePipelinePipelineActionTypeId -- ^ 'cppadActionTypeId'- -> Val Text -- ^ 'cppadName'- -> CodePipelinePipelineActionDeclaration-codePipelinePipelineActionDeclaration actionTypeIdarg namearg =- CodePipelinePipelineActionDeclaration- { _codePipelinePipelineActionDeclarationActionTypeId = actionTypeIdarg- , _codePipelinePipelineActionDeclarationConfiguration = Nothing- , _codePipelinePipelineActionDeclarationInputArtifacts = Nothing- , _codePipelinePipelineActionDeclarationName = namearg- , _codePipelinePipelineActionDeclarationNamespace = Nothing- , _codePipelinePipelineActionDeclarationOutputArtifacts = Nothing- , _codePipelinePipelineActionDeclarationRegion = Nothing- , _codePipelinePipelineActionDeclarationRoleArn = Nothing- , _codePipelinePipelineActionDeclarationRunOrder = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-actiontypeid-cppadActionTypeId :: Lens' CodePipelinePipelineActionDeclaration CodePipelinePipelineActionTypeId-cppadActionTypeId = lens _codePipelinePipelineActionDeclarationActionTypeId (\s a -> s { _codePipelinePipelineActionDeclarationActionTypeId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-configuration-cppadConfiguration :: Lens' CodePipelinePipelineActionDeclaration (Maybe Object)-cppadConfiguration = lens _codePipelinePipelineActionDeclarationConfiguration (\s a -> s { _codePipelinePipelineActionDeclarationConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-inputartifacts-cppadInputArtifacts :: Lens' CodePipelinePipelineActionDeclaration (Maybe [CodePipelinePipelineInputArtifact])-cppadInputArtifacts = lens _codePipelinePipelineActionDeclarationInputArtifacts (\s a -> s { _codePipelinePipelineActionDeclarationInputArtifacts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-name-cppadName :: Lens' CodePipelinePipelineActionDeclaration (Val Text)-cppadName = lens _codePipelinePipelineActionDeclarationName (\s a -> s { _codePipelinePipelineActionDeclarationName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-actiondeclaration-namespace-cppadNamespace :: Lens' CodePipelinePipelineActionDeclaration (Maybe (Val Text))-cppadNamespace = lens _codePipelinePipelineActionDeclarationNamespace (\s a -> s { _codePipelinePipelineActionDeclarationNamespace = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-outputartifacts-cppadOutputArtifacts :: Lens' CodePipelinePipelineActionDeclaration (Maybe [CodePipelinePipelineOutputArtifact])-cppadOutputArtifacts = lens _codePipelinePipelineActionDeclarationOutputArtifacts (\s a -> s { _codePipelinePipelineActionDeclarationOutputArtifacts = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-region-cppadRegion :: Lens' CodePipelinePipelineActionDeclaration (Maybe (Val Text))-cppadRegion = lens _codePipelinePipelineActionDeclarationRegion (\s a -> s { _codePipelinePipelineActionDeclarationRegion = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-rolearn-cppadRoleArn :: Lens' CodePipelinePipelineActionDeclaration (Maybe (Val Text))-cppadRoleArn = lens _codePipelinePipelineActionDeclarationRoleArn (\s a -> s { _codePipelinePipelineActionDeclarationRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions.html#cfn-codepipeline-pipeline-stages-actions-runorder-cppadRunOrder :: Lens' CodePipelinePipelineActionDeclaration (Maybe (Val Integer))-cppadRunOrder = lens _codePipelinePipelineActionDeclarationRunOrder (\s a -> s { _codePipelinePipelineActionDeclarationRunOrder = a })
@@ -1,63 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-actiontypeid.html--module Stratosphere.ResourceProperties.CodePipelinePipelineActionTypeId where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelinePipelineActionTypeId. See--- 'codePipelinePipelineActionTypeId' for a more convenient constructor.-data CodePipelinePipelineActionTypeId =- CodePipelinePipelineActionTypeId- { _codePipelinePipelineActionTypeIdCategory :: Val Text- , _codePipelinePipelineActionTypeIdOwner :: Val Text- , _codePipelinePipelineActionTypeIdProvider :: Val Text- , _codePipelinePipelineActionTypeIdVersion :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineActionTypeId where- toJSON CodePipelinePipelineActionTypeId{..} =- object $- catMaybes- [ (Just . ("Category",) . toJSON) _codePipelinePipelineActionTypeIdCategory- , (Just . ("Owner",) . toJSON) _codePipelinePipelineActionTypeIdOwner- , (Just . ("Provider",) . toJSON) _codePipelinePipelineActionTypeIdProvider- , (Just . ("Version",) . toJSON) _codePipelinePipelineActionTypeIdVersion- ]---- | Constructor for 'CodePipelinePipelineActionTypeId' containing required--- fields as arguments.-codePipelinePipelineActionTypeId- :: Val Text -- ^ 'cppatiCategory'- -> Val Text -- ^ 'cppatiOwner'- -> Val Text -- ^ 'cppatiProvider'- -> Val Text -- ^ 'cppatiVersion'- -> CodePipelinePipelineActionTypeId-codePipelinePipelineActionTypeId categoryarg ownerarg providerarg versionarg =- CodePipelinePipelineActionTypeId- { _codePipelinePipelineActionTypeIdCategory = categoryarg- , _codePipelinePipelineActionTypeIdOwner = ownerarg- , _codePipelinePipelineActionTypeIdProvider = providerarg- , _codePipelinePipelineActionTypeIdVersion = versionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-actiontypeid.html#cfn-codepipeline-pipeline-stages-actions-actiontypeid-category-cppatiCategory :: Lens' CodePipelinePipelineActionTypeId (Val Text)-cppatiCategory = lens _codePipelinePipelineActionTypeIdCategory (\s a -> s { _codePipelinePipelineActionTypeIdCategory = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-actiontypeid.html#cfn-codepipeline-pipeline-stages-actions-actiontypeid-owner-cppatiOwner :: Lens' CodePipelinePipelineActionTypeId (Val Text)-cppatiOwner = lens _codePipelinePipelineActionTypeIdOwner (\s a -> s { _codePipelinePipelineActionTypeIdOwner = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-actiontypeid.html#cfn-codepipeline-pipeline-stages-actions-actiontypeid-provider-cppatiProvider :: Lens' CodePipelinePipelineActionTypeId (Val Text)-cppatiProvider = lens _codePipelinePipelineActionTypeIdProvider (\s a -> s { _codePipelinePipelineActionTypeIdProvider = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-actiontypeid.html#cfn-codepipeline-pipeline-stages-actions-actiontypeid-version-cppatiVersion :: Lens' CodePipelinePipelineActionTypeId (Val Text)-cppatiVersion = lens _codePipelinePipelineActionTypeIdVersion (\s a -> s { _codePipelinePipelineActionTypeIdVersion = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore.html--module Stratosphere.ResourceProperties.CodePipelinePipelineArtifactStore where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodePipelinePipelineEncryptionKey---- | Full data type definition for CodePipelinePipelineArtifactStore. See--- 'codePipelinePipelineArtifactStore' for a more convenient constructor.-data CodePipelinePipelineArtifactStore =- CodePipelinePipelineArtifactStore- { _codePipelinePipelineArtifactStoreEncryptionKey :: Maybe CodePipelinePipelineEncryptionKey- , _codePipelinePipelineArtifactStoreLocation :: Val Text- , _codePipelinePipelineArtifactStoreType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineArtifactStore where- toJSON CodePipelinePipelineArtifactStore{..} =- object $- catMaybes- [ fmap (("EncryptionKey",) . toJSON) _codePipelinePipelineArtifactStoreEncryptionKey- , (Just . ("Location",) . toJSON) _codePipelinePipelineArtifactStoreLocation- , (Just . ("Type",) . toJSON) _codePipelinePipelineArtifactStoreType- ]---- | Constructor for 'CodePipelinePipelineArtifactStore' containing required--- fields as arguments.-codePipelinePipelineArtifactStore- :: Val Text -- ^ 'cppasLocation'- -> Val Text -- ^ 'cppasType'- -> CodePipelinePipelineArtifactStore-codePipelinePipelineArtifactStore locationarg typearg =- CodePipelinePipelineArtifactStore- { _codePipelinePipelineArtifactStoreEncryptionKey = Nothing- , _codePipelinePipelineArtifactStoreLocation = locationarg- , _codePipelinePipelineArtifactStoreType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore.html#cfn-codepipeline-pipeline-artifactstore-encryptionkey-cppasEncryptionKey :: Lens' CodePipelinePipelineArtifactStore (Maybe CodePipelinePipelineEncryptionKey)-cppasEncryptionKey = lens _codePipelinePipelineArtifactStoreEncryptionKey (\s a -> s { _codePipelinePipelineArtifactStoreEncryptionKey = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore.html#cfn-codepipeline-pipeline-artifactstore-location-cppasLocation :: Lens' CodePipelinePipelineArtifactStore (Val Text)-cppasLocation = lens _codePipelinePipelineArtifactStoreLocation (\s a -> s { _codePipelinePipelineArtifactStoreLocation = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore.html#cfn-codepipeline-pipeline-artifactstore-type-cppasType :: Lens' CodePipelinePipelineArtifactStore (Val Text)-cppasType = lens _codePipelinePipelineArtifactStoreType (\s a -> s { _codePipelinePipelineArtifactStoreType = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstoremap.html--module Stratosphere.ResourceProperties.CodePipelinePipelineArtifactStoreMap where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodePipelinePipelineArtifactStore---- | Full data type definition for CodePipelinePipelineArtifactStoreMap. See--- 'codePipelinePipelineArtifactStoreMap' for a more convenient constructor.-data CodePipelinePipelineArtifactStoreMap =- CodePipelinePipelineArtifactStoreMap- { _codePipelinePipelineArtifactStoreMapArtifactStore :: CodePipelinePipelineArtifactStore- , _codePipelinePipelineArtifactStoreMapRegion :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineArtifactStoreMap where- toJSON CodePipelinePipelineArtifactStoreMap{..} =- object $- catMaybes- [ (Just . ("ArtifactStore",) . toJSON) _codePipelinePipelineArtifactStoreMapArtifactStore- , (Just . ("Region",) . toJSON) _codePipelinePipelineArtifactStoreMapRegion- ]---- | Constructor for 'CodePipelinePipelineArtifactStoreMap' containing--- required fields as arguments.-codePipelinePipelineArtifactStoreMap- :: CodePipelinePipelineArtifactStore -- ^ 'cppasmArtifactStore'- -> Val Text -- ^ 'cppasmRegion'- -> CodePipelinePipelineArtifactStoreMap-codePipelinePipelineArtifactStoreMap artifactStorearg regionarg =- CodePipelinePipelineArtifactStoreMap- { _codePipelinePipelineArtifactStoreMapArtifactStore = artifactStorearg- , _codePipelinePipelineArtifactStoreMapRegion = regionarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstoremap.html#cfn-codepipeline-pipeline-artifactstoremap-artifactstore-cppasmArtifactStore :: Lens' CodePipelinePipelineArtifactStoreMap CodePipelinePipelineArtifactStore-cppasmArtifactStore = lens _codePipelinePipelineArtifactStoreMapArtifactStore (\s a -> s { _codePipelinePipelineArtifactStoreMapArtifactStore = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstoremap.html#cfn-codepipeline-pipeline-artifactstoremap-region-cppasmRegion :: Lens' CodePipelinePipelineArtifactStoreMap (Val Text)-cppasmRegion = lens _codePipelinePipelineArtifactStoreMapRegion (\s a -> s { _codePipelinePipelineArtifactStoreMapRegion = a })
@@ -1,48 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-blockers.html--module Stratosphere.ResourceProperties.CodePipelinePipelineBlockerDeclaration where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelinePipelineBlockerDeclaration. See--- 'codePipelinePipelineBlockerDeclaration' for a more convenient--- constructor.-data CodePipelinePipelineBlockerDeclaration =- CodePipelinePipelineBlockerDeclaration- { _codePipelinePipelineBlockerDeclarationName :: Val Text- , _codePipelinePipelineBlockerDeclarationType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineBlockerDeclaration where- toJSON CodePipelinePipelineBlockerDeclaration{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _codePipelinePipelineBlockerDeclarationName- , (Just . ("Type",) . toJSON) _codePipelinePipelineBlockerDeclarationType- ]---- | Constructor for 'CodePipelinePipelineBlockerDeclaration' containing--- required fields as arguments.-codePipelinePipelineBlockerDeclaration- :: Val Text -- ^ 'cppbdName'- -> Val Text -- ^ 'cppbdType'- -> CodePipelinePipelineBlockerDeclaration-codePipelinePipelineBlockerDeclaration namearg typearg =- CodePipelinePipelineBlockerDeclaration- { _codePipelinePipelineBlockerDeclarationName = namearg- , _codePipelinePipelineBlockerDeclarationType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-blockers.html#cfn-codepipeline-pipeline-stages-blockers-name-cppbdName :: Lens' CodePipelinePipelineBlockerDeclaration (Val Text)-cppbdName = lens _codePipelinePipelineBlockerDeclarationName (\s a -> s { _codePipelinePipelineBlockerDeclarationName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-blockers.html#cfn-codepipeline-pipeline-stages-blockers-type-cppbdType :: Lens' CodePipelinePipelineBlockerDeclaration (Val Text)-cppbdType = lens _codePipelinePipelineBlockerDeclarationType (\s a -> s { _codePipelinePipelineBlockerDeclarationType = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore-encryptionkey.html--module Stratosphere.ResourceProperties.CodePipelinePipelineEncryptionKey where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelinePipelineEncryptionKey. See--- 'codePipelinePipelineEncryptionKey' for a more convenient constructor.-data CodePipelinePipelineEncryptionKey =- CodePipelinePipelineEncryptionKey- { _codePipelinePipelineEncryptionKeyId :: Val Text- , _codePipelinePipelineEncryptionKeyType :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineEncryptionKey where- toJSON CodePipelinePipelineEncryptionKey{..} =- object $- catMaybes- [ (Just . ("Id",) . toJSON) _codePipelinePipelineEncryptionKeyId- , (Just . ("Type",) . toJSON) _codePipelinePipelineEncryptionKeyType- ]---- | Constructor for 'CodePipelinePipelineEncryptionKey' containing required--- fields as arguments.-codePipelinePipelineEncryptionKey- :: Val Text -- ^ 'cppekId'- -> Val Text -- ^ 'cppekType'- -> CodePipelinePipelineEncryptionKey-codePipelinePipelineEncryptionKey idarg typearg =- CodePipelinePipelineEncryptionKey- { _codePipelinePipelineEncryptionKeyId = idarg- , _codePipelinePipelineEncryptionKeyType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore-encryptionkey.html#cfn-codepipeline-pipeline-artifactstore-encryptionkey-id-cppekId :: Lens' CodePipelinePipelineEncryptionKey (Val Text)-cppekId = lens _codePipelinePipelineEncryptionKeyId (\s a -> s { _codePipelinePipelineEncryptionKeyId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-artifactstore-encryptionkey.html#cfn-codepipeline-pipeline-artifactstore-encryptionkey-type-cppekType :: Lens' CodePipelinePipelineEncryptionKey (Val Text)-cppekType = lens _codePipelinePipelineEncryptionKeyType (\s a -> s { _codePipelinePipelineEncryptionKeyType = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-inputartifacts.html--module Stratosphere.ResourceProperties.CodePipelinePipelineInputArtifact where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelinePipelineInputArtifact. See--- 'codePipelinePipelineInputArtifact' for a more convenient constructor.-data CodePipelinePipelineInputArtifact =- CodePipelinePipelineInputArtifact- { _codePipelinePipelineInputArtifactName :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineInputArtifact where- toJSON CodePipelinePipelineInputArtifact{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _codePipelinePipelineInputArtifactName- ]---- | Constructor for 'CodePipelinePipelineInputArtifact' containing required--- fields as arguments.-codePipelinePipelineInputArtifact- :: Val Text -- ^ 'cppiaName'- -> CodePipelinePipelineInputArtifact-codePipelinePipelineInputArtifact namearg =- CodePipelinePipelineInputArtifact- { _codePipelinePipelineInputArtifactName = namearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-inputartifacts.html#cfn-codepipeline-pipeline-stages-actions-inputartifacts-name-cppiaName :: Lens' CodePipelinePipelineInputArtifact (Val Text)-cppiaName = lens _codePipelinePipelineInputArtifactName (\s a -> s { _codePipelinePipelineInputArtifactName = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-outputartifacts.html--module Stratosphere.ResourceProperties.CodePipelinePipelineOutputArtifact where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelinePipelineOutputArtifact. See--- 'codePipelinePipelineOutputArtifact' for a more convenient constructor.-data CodePipelinePipelineOutputArtifact =- CodePipelinePipelineOutputArtifact- { _codePipelinePipelineOutputArtifactName :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineOutputArtifact where- toJSON CodePipelinePipelineOutputArtifact{..} =- object $- catMaybes- [ (Just . ("Name",) . toJSON) _codePipelinePipelineOutputArtifactName- ]---- | Constructor for 'CodePipelinePipelineOutputArtifact' containing required--- fields as arguments.-codePipelinePipelineOutputArtifact- :: Val Text -- ^ 'cppoaName'- -> CodePipelinePipelineOutputArtifact-codePipelinePipelineOutputArtifact namearg =- CodePipelinePipelineOutputArtifact- { _codePipelinePipelineOutputArtifactName = namearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages-actions-outputartifacts.html#cfn-codepipeline-pipeline-stages-actions-outputartifacts-name-cppoaName :: Lens' CodePipelinePipelineOutputArtifact (Val Text)-cppoaName = lens _codePipelinePipelineOutputArtifactName (\s a -> s { _codePipelinePipelineOutputArtifactName = a })
@@ -1,55 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages.html--module Stratosphere.ResourceProperties.CodePipelinePipelineStageDeclaration where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodePipelinePipelineActionDeclaration-import Stratosphere.ResourceProperties.CodePipelinePipelineBlockerDeclaration---- | Full data type definition for CodePipelinePipelineStageDeclaration. See--- 'codePipelinePipelineStageDeclaration' for a more convenient constructor.-data CodePipelinePipelineStageDeclaration =- CodePipelinePipelineStageDeclaration- { _codePipelinePipelineStageDeclarationActions :: [CodePipelinePipelineActionDeclaration]- , _codePipelinePipelineStageDeclarationBlockers :: Maybe [CodePipelinePipelineBlockerDeclaration]- , _codePipelinePipelineStageDeclarationName :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineStageDeclaration where- toJSON CodePipelinePipelineStageDeclaration{..} =- object $- catMaybes- [ (Just . ("Actions",) . toJSON) _codePipelinePipelineStageDeclarationActions- , fmap (("Blockers",) . toJSON) _codePipelinePipelineStageDeclarationBlockers- , (Just . ("Name",) . toJSON) _codePipelinePipelineStageDeclarationName- ]---- | Constructor for 'CodePipelinePipelineStageDeclaration' containing--- required fields as arguments.-codePipelinePipelineStageDeclaration- :: [CodePipelinePipelineActionDeclaration] -- ^ 'cppsdActions'- -> Val Text -- ^ 'cppsdName'- -> CodePipelinePipelineStageDeclaration-codePipelinePipelineStageDeclaration actionsarg namearg =- CodePipelinePipelineStageDeclaration- { _codePipelinePipelineStageDeclarationActions = actionsarg- , _codePipelinePipelineStageDeclarationBlockers = Nothing- , _codePipelinePipelineStageDeclarationName = namearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages.html#cfn-codepipeline-pipeline-stages-actions-cppsdActions :: Lens' CodePipelinePipelineStageDeclaration [CodePipelinePipelineActionDeclaration]-cppsdActions = lens _codePipelinePipelineStageDeclarationActions (\s a -> s { _codePipelinePipelineStageDeclarationActions = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages.html#cfn-codepipeline-pipeline-stages-blockers-cppsdBlockers :: Lens' CodePipelinePipelineStageDeclaration (Maybe [CodePipelinePipelineBlockerDeclaration])-cppsdBlockers = lens _codePipelinePipelineStageDeclarationBlockers (\s a -> s { _codePipelinePipelineStageDeclarationBlockers = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-stages.html#cfn-codepipeline-pipeline-stages-name-cppsdName :: Lens' CodePipelinePipelineStageDeclaration (Val Text)-cppsdName = lens _codePipelinePipelineStageDeclarationName (\s a -> s { _codePipelinePipelineStageDeclarationName = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-disableinboundstagetransitions.html--module Stratosphere.ResourceProperties.CodePipelinePipelineStageTransition where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelinePipelineStageTransition. See--- 'codePipelinePipelineStageTransition' for a more convenient constructor.-data CodePipelinePipelineStageTransition =- CodePipelinePipelineStageTransition- { _codePipelinePipelineStageTransitionReason :: Val Text- , _codePipelinePipelineStageTransitionStageName :: Val Text- } deriving (Show, Eq)--instance ToJSON CodePipelinePipelineStageTransition where- toJSON CodePipelinePipelineStageTransition{..} =- object $- catMaybes- [ (Just . ("Reason",) . toJSON) _codePipelinePipelineStageTransitionReason- , (Just . ("StageName",) . toJSON) _codePipelinePipelineStageTransitionStageName- ]---- | Constructor for 'CodePipelinePipelineStageTransition' containing required--- fields as arguments.-codePipelinePipelineStageTransition- :: Val Text -- ^ 'cppstReason'- -> Val Text -- ^ 'cppstStageName'- -> CodePipelinePipelineStageTransition-codePipelinePipelineStageTransition reasonarg stageNamearg =- CodePipelinePipelineStageTransition- { _codePipelinePipelineStageTransitionReason = reasonarg- , _codePipelinePipelineStageTransitionStageName = stageNamearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-disableinboundstagetransitions.html#cfn-codepipeline-pipeline-disableinboundstagetransitions-reason-cppstReason :: Lens' CodePipelinePipelineStageTransition (Val Text)-cppstReason = lens _codePipelinePipelineStageTransitionReason (\s a -> s { _codePipelinePipelineStageTransitionReason = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-disableinboundstagetransitions.html#cfn-codepipeline-pipeline-disableinboundstagetransitions-stagename-cppstStageName :: Lens' CodePipelinePipelineStageTransition (Val Text)-cppstStageName = lens _codePipelinePipelineStageTransitionStageName (\s a -> s { _codePipelinePipelineStageTransitionStageName = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-webhook-webhookauthconfiguration.html--module Stratosphere.ResourceProperties.CodePipelineWebhookWebhookAuthConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for--- CodePipelineWebhookWebhookAuthConfiguration. See--- 'codePipelineWebhookWebhookAuthConfiguration' for a more convenient--- constructor.-data CodePipelineWebhookWebhookAuthConfiguration =- CodePipelineWebhookWebhookAuthConfiguration- { _codePipelineWebhookWebhookAuthConfigurationAllowedIPRange :: Maybe (Val Text)- , _codePipelineWebhookWebhookAuthConfigurationSecretToken :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodePipelineWebhookWebhookAuthConfiguration where- toJSON CodePipelineWebhookWebhookAuthConfiguration{..} =- object $- catMaybes- [ fmap (("AllowedIPRange",) . toJSON) _codePipelineWebhookWebhookAuthConfigurationAllowedIPRange- , fmap (("SecretToken",) . toJSON) _codePipelineWebhookWebhookAuthConfigurationSecretToken- ]---- | Constructor for 'CodePipelineWebhookWebhookAuthConfiguration' containing--- required fields as arguments.-codePipelineWebhookWebhookAuthConfiguration- :: CodePipelineWebhookWebhookAuthConfiguration-codePipelineWebhookWebhookAuthConfiguration =- CodePipelineWebhookWebhookAuthConfiguration- { _codePipelineWebhookWebhookAuthConfigurationAllowedIPRange = Nothing- , _codePipelineWebhookWebhookAuthConfigurationSecretToken = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-webhook-webhookauthconfiguration.html#cfn-codepipeline-webhook-webhookauthconfiguration-allowediprange-cpwwacAllowedIPRange :: Lens' CodePipelineWebhookWebhookAuthConfiguration (Maybe (Val Text))-cpwwacAllowedIPRange = lens _codePipelineWebhookWebhookAuthConfigurationAllowedIPRange (\s a -> s { _codePipelineWebhookWebhookAuthConfigurationAllowedIPRange = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-webhook-webhookauthconfiguration.html#cfn-codepipeline-webhook-webhookauthconfiguration-secrettoken-cpwwacSecretToken :: Lens' CodePipelineWebhookWebhookAuthConfiguration (Maybe (Val Text))-cpwwacSecretToken = lens _codePipelineWebhookWebhookAuthConfigurationSecretToken (\s a -> s { _codePipelineWebhookWebhookAuthConfigurationSecretToken = a })
@@ -1,46 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-webhook-webhookfilterrule.html--module Stratosphere.ResourceProperties.CodePipelineWebhookWebhookFilterRule where--import Stratosphere.ResourceImports----- | Full data type definition for CodePipelineWebhookWebhookFilterRule. See--- 'codePipelineWebhookWebhookFilterRule' for a more convenient constructor.-data CodePipelineWebhookWebhookFilterRule =- CodePipelineWebhookWebhookFilterRule- { _codePipelineWebhookWebhookFilterRuleJsonPath :: Val Text- , _codePipelineWebhookWebhookFilterRuleMatchEquals :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodePipelineWebhookWebhookFilterRule where- toJSON CodePipelineWebhookWebhookFilterRule{..} =- object $- catMaybes- [ (Just . ("JsonPath",) . toJSON) _codePipelineWebhookWebhookFilterRuleJsonPath- , fmap (("MatchEquals",) . toJSON) _codePipelineWebhookWebhookFilterRuleMatchEquals- ]---- | Constructor for 'CodePipelineWebhookWebhookFilterRule' containing--- required fields as arguments.-codePipelineWebhookWebhookFilterRule- :: Val Text -- ^ 'cpwwfrJsonPath'- -> CodePipelineWebhookWebhookFilterRule-codePipelineWebhookWebhookFilterRule jsonPatharg =- CodePipelineWebhookWebhookFilterRule- { _codePipelineWebhookWebhookFilterRuleJsonPath = jsonPatharg- , _codePipelineWebhookWebhookFilterRuleMatchEquals = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-webhook-webhookfilterrule.html#cfn-codepipeline-webhook-webhookfilterrule-jsonpath-cpwwfrJsonPath :: Lens' CodePipelineWebhookWebhookFilterRule (Val Text)-cpwwfrJsonPath = lens _codePipelineWebhookWebhookFilterRuleJsonPath (\s a -> s { _codePipelineWebhookWebhookFilterRuleJsonPath = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-webhook-webhookfilterrule.html#cfn-codepipeline-webhook-webhookfilterrule-matchequals-cpwwfrMatchEquals :: Lens' CodePipelineWebhookWebhookFilterRule (Maybe (Val Text))-cpwwfrMatchEquals = lens _codePipelineWebhookWebhookFilterRuleMatchEquals (\s a -> s { _codePipelineWebhookWebhookFilterRuleMatchEquals = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestar-githubrepository-code.html--module Stratosphere.ResourceProperties.CodeStarGitHubRepositoryCode where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CodeStarGitHubRepositoryS3---- | Full data type definition for CodeStarGitHubRepositoryCode. See--- 'codeStarGitHubRepositoryCode' for a more convenient constructor.-data CodeStarGitHubRepositoryCode =- CodeStarGitHubRepositoryCode- { _codeStarGitHubRepositoryCodeS3 :: CodeStarGitHubRepositoryS3- } deriving (Show, Eq)--instance ToJSON CodeStarGitHubRepositoryCode where- toJSON CodeStarGitHubRepositoryCode{..} =- object $- catMaybes- [ (Just . ("S3",) . toJSON) _codeStarGitHubRepositoryCodeS3- ]---- | Constructor for 'CodeStarGitHubRepositoryCode' containing required fields--- as arguments.-codeStarGitHubRepositoryCode- :: CodeStarGitHubRepositoryS3 -- ^ 'csghrcS3'- -> CodeStarGitHubRepositoryCode-codeStarGitHubRepositoryCode s3arg =- CodeStarGitHubRepositoryCode- { _codeStarGitHubRepositoryCodeS3 = s3arg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestar-githubrepository-code.html#cfn-codestar-githubrepository-code-s3-csghrcS3 :: Lens' CodeStarGitHubRepositoryCode CodeStarGitHubRepositoryS3-csghrcS3 = lens _codeStarGitHubRepositoryCodeS3 (\s a -> s { _codeStarGitHubRepositoryCodeS3 = a })
@@ -1,54 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestar-githubrepository-s3.html--module Stratosphere.ResourceProperties.CodeStarGitHubRepositoryS3 where--import Stratosphere.ResourceImports----- | Full data type definition for CodeStarGitHubRepositoryS3. See--- 'codeStarGitHubRepositoryS3' for a more convenient constructor.-data CodeStarGitHubRepositoryS3 =- CodeStarGitHubRepositoryS3- { _codeStarGitHubRepositoryS3Bucket :: Val Text- , _codeStarGitHubRepositoryS3Key :: Val Text- , _codeStarGitHubRepositoryS3ObjectVersion :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeStarGitHubRepositoryS3 where- toJSON CodeStarGitHubRepositoryS3{..} =- object $- catMaybes- [ (Just . ("Bucket",) . toJSON) _codeStarGitHubRepositoryS3Bucket- , (Just . ("Key",) . toJSON) _codeStarGitHubRepositoryS3Key- , fmap (("ObjectVersion",) . toJSON) _codeStarGitHubRepositoryS3ObjectVersion- ]---- | Constructor for 'CodeStarGitHubRepositoryS3' containing required fields--- as arguments.-codeStarGitHubRepositoryS3- :: Val Text -- ^ 'csghrsBucket'- -> Val Text -- ^ 'csghrsKey'- -> CodeStarGitHubRepositoryS3-codeStarGitHubRepositoryS3 bucketarg keyarg =- CodeStarGitHubRepositoryS3- { _codeStarGitHubRepositoryS3Bucket = bucketarg- , _codeStarGitHubRepositoryS3Key = keyarg- , _codeStarGitHubRepositoryS3ObjectVersion = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestar-githubrepository-s3.html#cfn-codestar-githubrepository-s3-bucket-csghrsBucket :: Lens' CodeStarGitHubRepositoryS3 (Val Text)-csghrsBucket = lens _codeStarGitHubRepositoryS3Bucket (\s a -> s { _codeStarGitHubRepositoryS3Bucket = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestar-githubrepository-s3.html#cfn-codestar-githubrepository-s3-key-csghrsKey :: Lens' CodeStarGitHubRepositoryS3 (Val Text)-csghrsKey = lens _codeStarGitHubRepositoryS3Key (\s a -> s { _codeStarGitHubRepositoryS3Key = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestar-githubrepository-s3.html#cfn-codestar-githubrepository-s3-objectversion-csghrsObjectVersion :: Lens' CodeStarGitHubRepositoryS3 (Maybe (Val Text))-csghrsObjectVersion = lens _codeStarGitHubRepositoryS3ObjectVersion (\s a -> s { _codeStarGitHubRepositoryS3ObjectVersion = a })
@@ -1,47 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestarnotifications-notificationrule-target.html--module Stratosphere.ResourceProperties.CodeStarNotificationsNotificationRuleTarget where--import Stratosphere.ResourceImports----- | Full data type definition for--- CodeStarNotificationsNotificationRuleTarget. See--- 'codeStarNotificationsNotificationRuleTarget' for a more convenient--- constructor.-data CodeStarNotificationsNotificationRuleTarget =- CodeStarNotificationsNotificationRuleTarget- { _codeStarNotificationsNotificationRuleTargetTargetAddress :: Maybe (Val Text)- , _codeStarNotificationsNotificationRuleTargetTargetType :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CodeStarNotificationsNotificationRuleTarget where- toJSON CodeStarNotificationsNotificationRuleTarget{..} =- object $- catMaybes- [ fmap (("TargetAddress",) . toJSON) _codeStarNotificationsNotificationRuleTargetTargetAddress- , fmap (("TargetType",) . toJSON) _codeStarNotificationsNotificationRuleTargetTargetType- ]---- | Constructor for 'CodeStarNotificationsNotificationRuleTarget' containing--- required fields as arguments.-codeStarNotificationsNotificationRuleTarget- :: CodeStarNotificationsNotificationRuleTarget-codeStarNotificationsNotificationRuleTarget =- CodeStarNotificationsNotificationRuleTarget- { _codeStarNotificationsNotificationRuleTargetTargetAddress = Nothing- , _codeStarNotificationsNotificationRuleTargetTargetType = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestarnotifications-notificationrule-target.html#cfn-codestarnotifications-notificationrule-target-targetaddress-csnnrtTargetAddress :: Lens' CodeStarNotificationsNotificationRuleTarget (Maybe (Val Text))-csnnrtTargetAddress = lens _codeStarNotificationsNotificationRuleTargetTargetAddress (\s a -> s { _codeStarNotificationsNotificationRuleTargetTargetAddress = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codestarnotifications-notificationrule-target.html#cfn-codestarnotifications-notificationrule-target-targettype-csnnrtTargetType :: Lens' CodeStarNotificationsNotificationRuleTarget (Maybe (Val Text))-csnnrtTargetType = lens _codeStarNotificationsNotificationRuleTargetTargetType (\s a -> s { _codeStarNotificationsNotificationRuleTargetTargetType = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitoidentityprovider.html--module Stratosphere.ResourceProperties.CognitoIdentityPoolCognitoIdentityProvider where--import Stratosphere.ResourceImports----- | Full data type definition for CognitoIdentityPoolCognitoIdentityProvider.--- See 'cognitoIdentityPoolCognitoIdentityProvider' for a more convenient--- constructor.-data CognitoIdentityPoolCognitoIdentityProvider =- CognitoIdentityPoolCognitoIdentityProvider- { _cognitoIdentityPoolCognitoIdentityProviderClientId :: Maybe (Val Text)- , _cognitoIdentityPoolCognitoIdentityProviderProviderName :: Maybe (Val Text)- , _cognitoIdentityPoolCognitoIdentityProviderServerSideTokenCheck :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON CognitoIdentityPoolCognitoIdentityProvider where- toJSON CognitoIdentityPoolCognitoIdentityProvider{..} =- object $- catMaybes- [ fmap (("ClientId",) . toJSON) _cognitoIdentityPoolCognitoIdentityProviderClientId- , fmap (("ProviderName",) . toJSON) _cognitoIdentityPoolCognitoIdentityProviderProviderName- , fmap (("ServerSideTokenCheck",) . toJSON) _cognitoIdentityPoolCognitoIdentityProviderServerSideTokenCheck- ]---- | Constructor for 'CognitoIdentityPoolCognitoIdentityProvider' containing--- required fields as arguments.-cognitoIdentityPoolCognitoIdentityProvider- :: CognitoIdentityPoolCognitoIdentityProvider-cognitoIdentityPoolCognitoIdentityProvider =- CognitoIdentityPoolCognitoIdentityProvider- { _cognitoIdentityPoolCognitoIdentityProviderClientId = Nothing- , _cognitoIdentityPoolCognitoIdentityProviderProviderName = Nothing- , _cognitoIdentityPoolCognitoIdentityProviderServerSideTokenCheck = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitoidentityprovider.html#cfn-cognito-identitypool-cognitoidentityprovider-clientid-cipcipClientId :: Lens' CognitoIdentityPoolCognitoIdentityProvider (Maybe (Val Text))-cipcipClientId = lens _cognitoIdentityPoolCognitoIdentityProviderClientId (\s a -> s { _cognitoIdentityPoolCognitoIdentityProviderClientId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitoidentityprovider.html#cfn-cognito-identitypool-cognitoidentityprovider-providername-cipcipProviderName :: Lens' CognitoIdentityPoolCognitoIdentityProvider (Maybe (Val Text))-cipcipProviderName = lens _cognitoIdentityPoolCognitoIdentityProviderProviderName (\s a -> s { _cognitoIdentityPoolCognitoIdentityProviderProviderName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitoidentityprovider.html#cfn-cognito-identitypool-cognitoidentityprovider-serversidetokencheck-cipcipServerSideTokenCheck :: Lens' CognitoIdentityPoolCognitoIdentityProvider (Maybe (Val Bool))-cipcipServerSideTokenCheck = lens _cognitoIdentityPoolCognitoIdentityProviderServerSideTokenCheck (\s a -> s { _cognitoIdentityPoolCognitoIdentityProviderServerSideTokenCheck = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitostreams.html--module Stratosphere.ResourceProperties.CognitoIdentityPoolCognitoStreams where--import Stratosphere.ResourceImports----- | Full data type definition for CognitoIdentityPoolCognitoStreams. See--- 'cognitoIdentityPoolCognitoStreams' for a more convenient constructor.-data CognitoIdentityPoolCognitoStreams =- CognitoIdentityPoolCognitoStreams- { _cognitoIdentityPoolCognitoStreamsRoleArn :: Maybe (Val Text)- , _cognitoIdentityPoolCognitoStreamsStreamName :: Maybe (Val Text)- , _cognitoIdentityPoolCognitoStreamsStreamingStatus :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CognitoIdentityPoolCognitoStreams where- toJSON CognitoIdentityPoolCognitoStreams{..} =- object $- catMaybes- [ fmap (("RoleArn",) . toJSON) _cognitoIdentityPoolCognitoStreamsRoleArn- , fmap (("StreamName",) . toJSON) _cognitoIdentityPoolCognitoStreamsStreamName- , fmap (("StreamingStatus",) . toJSON) _cognitoIdentityPoolCognitoStreamsStreamingStatus- ]---- | Constructor for 'CognitoIdentityPoolCognitoStreams' containing required--- fields as arguments.-cognitoIdentityPoolCognitoStreams- :: CognitoIdentityPoolCognitoStreams-cognitoIdentityPoolCognitoStreams =- CognitoIdentityPoolCognitoStreams- { _cognitoIdentityPoolCognitoStreamsRoleArn = Nothing- , _cognitoIdentityPoolCognitoStreamsStreamName = Nothing- , _cognitoIdentityPoolCognitoStreamsStreamingStatus = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitostreams.html#cfn-cognito-identitypool-cognitostreams-rolearn-cipcsRoleArn :: Lens' CognitoIdentityPoolCognitoStreams (Maybe (Val Text))-cipcsRoleArn = lens _cognitoIdentityPoolCognitoStreamsRoleArn (\s a -> s { _cognitoIdentityPoolCognitoStreamsRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitostreams.html#cfn-cognito-identitypool-cognitostreams-streamname-cipcsStreamName :: Lens' CognitoIdentityPoolCognitoStreams (Maybe (Val Text))-cipcsStreamName = lens _cognitoIdentityPoolCognitoStreamsStreamName (\s a -> s { _cognitoIdentityPoolCognitoStreamsStreamName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-cognitostreams.html#cfn-cognito-identitypool-cognitostreams-streamingstatus-cipcsStreamingStatus :: Lens' CognitoIdentityPoolCognitoStreams (Maybe (Val Text))-cipcsStreamingStatus = lens _cognitoIdentityPoolCognitoStreamsStreamingStatus (\s a -> s { _cognitoIdentityPoolCognitoStreamsStreamingStatus = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-pushsync.html--module Stratosphere.ResourceProperties.CognitoIdentityPoolPushSync where--import Stratosphere.ResourceImports----- | Full data type definition for CognitoIdentityPoolPushSync. See--- 'cognitoIdentityPoolPushSync' for a more convenient constructor.-data CognitoIdentityPoolPushSync =- CognitoIdentityPoolPushSync- { _cognitoIdentityPoolPushSyncApplicationArns :: Maybe (ValList Text)- , _cognitoIdentityPoolPushSyncRoleArn :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CognitoIdentityPoolPushSync where- toJSON CognitoIdentityPoolPushSync{..} =- object $- catMaybes- [ fmap (("ApplicationArns",) . toJSON) _cognitoIdentityPoolPushSyncApplicationArns- , fmap (("RoleArn",) . toJSON) _cognitoIdentityPoolPushSyncRoleArn- ]---- | Constructor for 'CognitoIdentityPoolPushSync' containing required fields--- as arguments.-cognitoIdentityPoolPushSync- :: CognitoIdentityPoolPushSync-cognitoIdentityPoolPushSync =- CognitoIdentityPoolPushSync- { _cognitoIdentityPoolPushSyncApplicationArns = Nothing- , _cognitoIdentityPoolPushSyncRoleArn = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-pushsync.html#cfn-cognito-identitypool-pushsync-applicationarns-cippsApplicationArns :: Lens' CognitoIdentityPoolPushSync (Maybe (ValList Text))-cippsApplicationArns = lens _cognitoIdentityPoolPushSyncApplicationArns (\s a -> s { _cognitoIdentityPoolPushSyncApplicationArns = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypool-pushsync.html#cfn-cognito-identitypool-pushsync-rolearn-cippsRoleArn :: Lens' CognitoIdentityPoolPushSync (Maybe (Val Text))-cippsRoleArn = lens _cognitoIdentityPoolPushSyncRoleArn (\s a -> s { _cognitoIdentityPoolPushSyncRoleArn = a })
@@ -1,65 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-mappingrule.html--module Stratosphere.ResourceProperties.CognitoIdentityPoolRoleAttachmentMappingRule where--import Stratosphere.ResourceImports----- | Full data type definition for--- CognitoIdentityPoolRoleAttachmentMappingRule. See--- 'cognitoIdentityPoolRoleAttachmentMappingRule' for a more convenient--- constructor.-data CognitoIdentityPoolRoleAttachmentMappingRule =- CognitoIdentityPoolRoleAttachmentMappingRule- { _cognitoIdentityPoolRoleAttachmentMappingRuleClaim :: Val Text- , _cognitoIdentityPoolRoleAttachmentMappingRuleMatchType :: Val Text- , _cognitoIdentityPoolRoleAttachmentMappingRuleRoleARN :: Val Text- , _cognitoIdentityPoolRoleAttachmentMappingRuleValue :: Val Text- } deriving (Show, Eq)--instance ToJSON CognitoIdentityPoolRoleAttachmentMappingRule where- toJSON CognitoIdentityPoolRoleAttachmentMappingRule{..} =- object $- catMaybes- [ (Just . ("Claim",) . toJSON) _cognitoIdentityPoolRoleAttachmentMappingRuleClaim- , (Just . ("MatchType",) . toJSON) _cognitoIdentityPoolRoleAttachmentMappingRuleMatchType- , (Just . ("RoleARN",) . toJSON) _cognitoIdentityPoolRoleAttachmentMappingRuleRoleARN- , (Just . ("Value",) . toJSON) _cognitoIdentityPoolRoleAttachmentMappingRuleValue- ]---- | Constructor for 'CognitoIdentityPoolRoleAttachmentMappingRule' containing--- required fields as arguments.-cognitoIdentityPoolRoleAttachmentMappingRule- :: Val Text -- ^ 'cipramrClaim'- -> Val Text -- ^ 'cipramrMatchType'- -> Val Text -- ^ 'cipramrRoleARN'- -> Val Text -- ^ 'cipramrValue'- -> CognitoIdentityPoolRoleAttachmentMappingRule-cognitoIdentityPoolRoleAttachmentMappingRule claimarg matchTypearg roleARNarg valuearg =- CognitoIdentityPoolRoleAttachmentMappingRule- { _cognitoIdentityPoolRoleAttachmentMappingRuleClaim = claimarg- , _cognitoIdentityPoolRoleAttachmentMappingRuleMatchType = matchTypearg- , _cognitoIdentityPoolRoleAttachmentMappingRuleRoleARN = roleARNarg- , _cognitoIdentityPoolRoleAttachmentMappingRuleValue = valuearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-mappingrule.html#cfn-cognito-identitypoolroleattachment-mappingrule-claim-cipramrClaim :: Lens' CognitoIdentityPoolRoleAttachmentMappingRule (Val Text)-cipramrClaim = lens _cognitoIdentityPoolRoleAttachmentMappingRuleClaim (\s a -> s { _cognitoIdentityPoolRoleAttachmentMappingRuleClaim = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-mappingrule.html#cfn-cognito-identitypoolroleattachment-mappingrule-matchtype-cipramrMatchType :: Lens' CognitoIdentityPoolRoleAttachmentMappingRule (Val Text)-cipramrMatchType = lens _cognitoIdentityPoolRoleAttachmentMappingRuleMatchType (\s a -> s { _cognitoIdentityPoolRoleAttachmentMappingRuleMatchType = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-mappingrule.html#cfn-cognito-identitypoolroleattachment-mappingrule-rolearn-cipramrRoleARN :: Lens' CognitoIdentityPoolRoleAttachmentMappingRule (Val Text)-cipramrRoleARN = lens _cognitoIdentityPoolRoleAttachmentMappingRuleRoleARN (\s a -> s { _cognitoIdentityPoolRoleAttachmentMappingRuleRoleARN = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-mappingrule.html#cfn-cognito-identitypoolroleattachment-mappingrule-value-cipramrValue :: Lens' CognitoIdentityPoolRoleAttachmentMappingRule (Val Text)-cipramrValue = lens _cognitoIdentityPoolRoleAttachmentMappingRuleValue (\s a -> s { _cognitoIdentityPoolRoleAttachmentMappingRuleValue = a })
@@ -1,62 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html--module Stratosphere.ResourceProperties.CognitoIdentityPoolRoleAttachmentRoleMapping where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CognitoIdentityPoolRoleAttachmentRulesConfigurationType---- | Full data type definition for--- CognitoIdentityPoolRoleAttachmentRoleMapping. See--- 'cognitoIdentityPoolRoleAttachmentRoleMapping' for a more convenient--- constructor.-data CognitoIdentityPoolRoleAttachmentRoleMapping =- CognitoIdentityPoolRoleAttachmentRoleMapping- { _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution :: Maybe (Val Text)- , _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider :: Maybe (Val Text)- , _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration :: Maybe CognitoIdentityPoolRoleAttachmentRulesConfigurationType- , _cognitoIdentityPoolRoleAttachmentRoleMappingType :: Val Text- } deriving (Show, Eq)--instance ToJSON CognitoIdentityPoolRoleAttachmentRoleMapping where- toJSON CognitoIdentityPoolRoleAttachmentRoleMapping{..} =- object $- catMaybes- [ fmap (("AmbiguousRoleResolution",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution- , fmap (("IdentityProvider",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider- , fmap (("RulesConfiguration",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration- , (Just . ("Type",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingType- ]---- | Constructor for 'CognitoIdentityPoolRoleAttachmentRoleMapping' containing--- required fields as arguments.-cognitoIdentityPoolRoleAttachmentRoleMapping- :: Val Text -- ^ 'ciprarmType'- -> CognitoIdentityPoolRoleAttachmentRoleMapping-cognitoIdentityPoolRoleAttachmentRoleMapping typearg =- CognitoIdentityPoolRoleAttachmentRoleMapping- { _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution = Nothing- , _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider = Nothing- , _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration = Nothing- , _cognitoIdentityPoolRoleAttachmentRoleMappingType = typearg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-ambiguousroleresolution-ciprarmAmbiguousRoleResolution :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Maybe (Val Text))-ciprarmAmbiguousRoleResolution = lens _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution (\s a -> s { _cognitoIdentityPoolRoleAttachmentRoleMappingAmbiguousRoleResolution = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-identityprovider-ciprarmIdentityProvider :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Maybe (Val Text))-ciprarmIdentityProvider = lens _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider (\s a -> s { _cognitoIdentityPoolRoleAttachmentRoleMappingIdentityProvider = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-rulesconfiguration-ciprarmRulesConfiguration :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Maybe CognitoIdentityPoolRoleAttachmentRulesConfigurationType)-ciprarmRulesConfiguration = lens _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration (\s a -> s { _cognitoIdentityPoolRoleAttachmentRoleMappingRulesConfiguration = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rolemapping.html#cfn-cognito-identitypoolroleattachment-rolemapping-type-ciprarmType :: Lens' CognitoIdentityPoolRoleAttachmentRoleMapping (Val Text)-ciprarmType = lens _cognitoIdentityPoolRoleAttachmentRoleMappingType (\s a -> s { _cognitoIdentityPoolRoleAttachmentRoleMappingType = a })
@@ -1,41 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rulesconfigurationtype.html--module Stratosphere.ResourceProperties.CognitoIdentityPoolRoleAttachmentRulesConfigurationType where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CognitoIdentityPoolRoleAttachmentMappingRule---- | Full data type definition for--- CognitoIdentityPoolRoleAttachmentRulesConfigurationType. See--- 'cognitoIdentityPoolRoleAttachmentRulesConfigurationType' for a more--- convenient constructor.-data CognitoIdentityPoolRoleAttachmentRulesConfigurationType =- CognitoIdentityPoolRoleAttachmentRulesConfigurationType- { _cognitoIdentityPoolRoleAttachmentRulesConfigurationTypeRules :: [CognitoIdentityPoolRoleAttachmentMappingRule]- } deriving (Show, Eq)--instance ToJSON CognitoIdentityPoolRoleAttachmentRulesConfigurationType where- toJSON CognitoIdentityPoolRoleAttachmentRulesConfigurationType{..} =- object $- catMaybes- [ (Just . ("Rules",) . toJSON) _cognitoIdentityPoolRoleAttachmentRulesConfigurationTypeRules- ]---- | Constructor for 'CognitoIdentityPoolRoleAttachmentRulesConfigurationType'--- containing required fields as arguments.-cognitoIdentityPoolRoleAttachmentRulesConfigurationType- :: [CognitoIdentityPoolRoleAttachmentMappingRule] -- ^ 'ciprarctRules'- -> CognitoIdentityPoolRoleAttachmentRulesConfigurationType-cognitoIdentityPoolRoleAttachmentRulesConfigurationType rulesarg =- CognitoIdentityPoolRoleAttachmentRulesConfigurationType- { _cognitoIdentityPoolRoleAttachmentRulesConfigurationTypeRules = rulesarg- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-identitypoolroleattachment-rulesconfigurationtype.html#cfn-cognito-identitypoolroleattachment-rulesconfigurationtype-rules-ciprarctRules :: Lens' CognitoIdentityPoolRoleAttachmentRulesConfigurationType [CognitoIdentityPoolRoleAttachmentMappingRule]-ciprarctRules = lens _cognitoIdentityPoolRoleAttachmentRulesConfigurationTypeRules (\s a -> s { _cognitoIdentityPoolRoleAttachmentRulesConfigurationTypeRules = a })
@@ -1,39 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-accountrecoverysetting.html--module Stratosphere.ResourceProperties.CognitoUserPoolAccountRecoverySetting where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CognitoUserPoolRecoveryOption---- | Full data type definition for CognitoUserPoolAccountRecoverySetting. See--- 'cognitoUserPoolAccountRecoverySetting' for a more convenient--- constructor.-data CognitoUserPoolAccountRecoverySetting =- CognitoUserPoolAccountRecoverySetting- { _cognitoUserPoolAccountRecoverySettingRecoveryMechanisms :: Maybe [CognitoUserPoolRecoveryOption]- } deriving (Show, Eq)--instance ToJSON CognitoUserPoolAccountRecoverySetting where- toJSON CognitoUserPoolAccountRecoverySetting{..} =- object $- catMaybes- [ fmap (("RecoveryMechanisms",) . toJSON) _cognitoUserPoolAccountRecoverySettingRecoveryMechanisms- ]---- | Constructor for 'CognitoUserPoolAccountRecoverySetting' containing--- required fields as arguments.-cognitoUserPoolAccountRecoverySetting- :: CognitoUserPoolAccountRecoverySetting-cognitoUserPoolAccountRecoverySetting =- CognitoUserPoolAccountRecoverySetting- { _cognitoUserPoolAccountRecoverySettingRecoveryMechanisms = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-accountrecoverysetting.html#cfn-cognito-userpool-accountrecoverysetting-recoverymechanisms-cuparsRecoveryMechanisms :: Lens' CognitoUserPoolAccountRecoverySetting (Maybe [CognitoUserPoolRecoveryOption])-cuparsRecoveryMechanisms = lens _cognitoUserPoolAccountRecoverySettingRecoveryMechanisms (\s a -> s { _cognitoUserPoolAccountRecoverySettingRecoveryMechanisms = a })
@@ -1,52 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-admincreateuserconfig.html--module Stratosphere.ResourceProperties.CognitoUserPoolAdminCreateUserConfig where--import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.CognitoUserPoolInviteMessageTemplate---- | Full data type definition for CognitoUserPoolAdminCreateUserConfig. See--- 'cognitoUserPoolAdminCreateUserConfig' for a more convenient constructor.-data CognitoUserPoolAdminCreateUserConfig =- CognitoUserPoolAdminCreateUserConfig- { _cognitoUserPoolAdminCreateUserConfigAllowAdminCreateUserOnly :: Maybe (Val Bool)- , _cognitoUserPoolAdminCreateUserConfigInviteMessageTemplate :: Maybe CognitoUserPoolInviteMessageTemplate- , _cognitoUserPoolAdminCreateUserConfigUnusedAccountValidityDays :: Maybe (Val Integer)- } deriving (Show, Eq)--instance ToJSON CognitoUserPoolAdminCreateUserConfig where- toJSON CognitoUserPoolAdminCreateUserConfig{..} =- object $- catMaybes- [ fmap (("AllowAdminCreateUserOnly",) . toJSON) _cognitoUserPoolAdminCreateUserConfigAllowAdminCreateUserOnly- , fmap (("InviteMessageTemplate",) . toJSON) _cognitoUserPoolAdminCreateUserConfigInviteMessageTemplate- , fmap (("UnusedAccountValidityDays",) . toJSON) _cognitoUserPoolAdminCreateUserConfigUnusedAccountValidityDays- ]---- | Constructor for 'CognitoUserPoolAdminCreateUserConfig' containing--- required fields as arguments.-cognitoUserPoolAdminCreateUserConfig- :: CognitoUserPoolAdminCreateUserConfig-cognitoUserPoolAdminCreateUserConfig =- CognitoUserPoolAdminCreateUserConfig- { _cognitoUserPoolAdminCreateUserConfigAllowAdminCreateUserOnly = Nothing- , _cognitoUserPoolAdminCreateUserConfigInviteMessageTemplate = Nothing- , _cognitoUserPoolAdminCreateUserConfigUnusedAccountValidityDays = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-admincreateuserconfig.html#cfn-cognito-userpool-admincreateuserconfig-allowadmincreateuseronly-cupacucAllowAdminCreateUserOnly :: Lens' CognitoUserPoolAdminCreateUserConfig (Maybe (Val Bool))-cupacucAllowAdminCreateUserOnly = lens _cognitoUserPoolAdminCreateUserConfigAllowAdminCreateUserOnly (\s a -> s { _cognitoUserPoolAdminCreateUserConfigAllowAdminCreateUserOnly = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-admincreateuserconfig.html#cfn-cognito-userpool-admincreateuserconfig-invitemessagetemplate-cupacucInviteMessageTemplate :: Lens' CognitoUserPoolAdminCreateUserConfig (Maybe CognitoUserPoolInviteMessageTemplate)-cupacucInviteMessageTemplate = lens _cognitoUserPoolAdminCreateUserConfigInviteMessageTemplate (\s a -> s { _cognitoUserPoolAdminCreateUserConfigInviteMessageTemplate = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-admincreateuserconfig.html#cfn-cognito-userpool-admincreateuserconfig-unusedaccountvaliditydays-cupacucUnusedAccountValidityDays :: Lens' CognitoUserPoolAdminCreateUserConfig (Maybe (Val Integer))-cupacucUnusedAccountValidityDays = lens _cognitoUserPoolAdminCreateUserConfigUnusedAccountValidityDays (\s a -> s { _cognitoUserPoolAdminCreateUserConfigUnusedAccountValidityDays = a })
@@ -1,61 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-analyticsconfiguration.html--module Stratosphere.ResourceProperties.CognitoUserPoolClientAnalyticsConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for--- CognitoUserPoolClientAnalyticsConfiguration. See--- 'cognitoUserPoolClientAnalyticsConfiguration' for a more convenient--- constructor.-data CognitoUserPoolClientAnalyticsConfiguration =- CognitoUserPoolClientAnalyticsConfiguration- { _cognitoUserPoolClientAnalyticsConfigurationApplicationId :: Maybe (Val Text)- , _cognitoUserPoolClientAnalyticsConfigurationExternalId :: Maybe (Val Text)- , _cognitoUserPoolClientAnalyticsConfigurationRoleArn :: Maybe (Val Text)- , _cognitoUserPoolClientAnalyticsConfigurationUserDataShared :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON CognitoUserPoolClientAnalyticsConfiguration where- toJSON CognitoUserPoolClientAnalyticsConfiguration{..} =- object $- catMaybes- [ fmap (("ApplicationId",) . toJSON) _cognitoUserPoolClientAnalyticsConfigurationApplicationId- , fmap (("ExternalId",) . toJSON) _cognitoUserPoolClientAnalyticsConfigurationExternalId- , fmap (("RoleArn",) . toJSON) _cognitoUserPoolClientAnalyticsConfigurationRoleArn- , fmap (("UserDataShared",) . toJSON) _cognitoUserPoolClientAnalyticsConfigurationUserDataShared- ]---- | Constructor for 'CognitoUserPoolClientAnalyticsConfiguration' containing--- required fields as arguments.-cognitoUserPoolClientAnalyticsConfiguration- :: CognitoUserPoolClientAnalyticsConfiguration-cognitoUserPoolClientAnalyticsConfiguration =- CognitoUserPoolClientAnalyticsConfiguration- { _cognitoUserPoolClientAnalyticsConfigurationApplicationId = Nothing- , _cognitoUserPoolClientAnalyticsConfigurationExternalId = Nothing- , _cognitoUserPoolClientAnalyticsConfigurationRoleArn = Nothing- , _cognitoUserPoolClientAnalyticsConfigurationUserDataShared = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-analyticsconfiguration.html#cfn-cognito-userpoolclient-analyticsconfiguration-applicationid-cupcacApplicationId :: Lens' CognitoUserPoolClientAnalyticsConfiguration (Maybe (Val Text))-cupcacApplicationId = lens _cognitoUserPoolClientAnalyticsConfigurationApplicationId (\s a -> s { _cognitoUserPoolClientAnalyticsConfigurationApplicationId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-analyticsconfiguration.html#cfn-cognito-userpoolclient-analyticsconfiguration-externalid-cupcacExternalId :: Lens' CognitoUserPoolClientAnalyticsConfiguration (Maybe (Val Text))-cupcacExternalId = lens _cognitoUserPoolClientAnalyticsConfigurationExternalId (\s a -> s { _cognitoUserPoolClientAnalyticsConfigurationExternalId = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-analyticsconfiguration.html#cfn-cognito-userpoolclient-analyticsconfiguration-rolearn-cupcacRoleArn :: Lens' CognitoUserPoolClientAnalyticsConfiguration (Maybe (Val Text))-cupcacRoleArn = lens _cognitoUserPoolClientAnalyticsConfigurationRoleArn (\s a -> s { _cognitoUserPoolClientAnalyticsConfigurationRoleArn = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-analyticsconfiguration.html#cfn-cognito-userpoolclient-analyticsconfiguration-userdatashared-cupcacUserDataShared :: Lens' CognitoUserPoolClientAnalyticsConfiguration (Maybe (Val Bool))-cupcacUserDataShared = lens _cognitoUserPoolClientAnalyticsConfigurationUserDataShared (\s a -> s { _cognitoUserPoolClientAnalyticsConfigurationUserDataShared = a })
@@ -1,53 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-tokenvalidityunits.html--module Stratosphere.ResourceProperties.CognitoUserPoolClientTokenValidityUnits where--import Stratosphere.ResourceImports----- | Full data type definition for CognitoUserPoolClientTokenValidityUnits.--- See 'cognitoUserPoolClientTokenValidityUnits' for a more convenient--- constructor.-data CognitoUserPoolClientTokenValidityUnits =- CognitoUserPoolClientTokenValidityUnits- { _cognitoUserPoolClientTokenValidityUnitsAccessToken :: Maybe (Val Text)- , _cognitoUserPoolClientTokenValidityUnitsIdToken :: Maybe (Val Text)- , _cognitoUserPoolClientTokenValidityUnitsRefreshToken :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CognitoUserPoolClientTokenValidityUnits where- toJSON CognitoUserPoolClientTokenValidityUnits{..} =- object $- catMaybes- [ fmap (("AccessToken",) . toJSON) _cognitoUserPoolClientTokenValidityUnitsAccessToken- , fmap (("IdToken",) . toJSON) _cognitoUserPoolClientTokenValidityUnitsIdToken- , fmap (("RefreshToken",) . toJSON) _cognitoUserPoolClientTokenValidityUnitsRefreshToken- ]---- | Constructor for 'CognitoUserPoolClientTokenValidityUnits' containing--- required fields as arguments.-cognitoUserPoolClientTokenValidityUnits- :: CognitoUserPoolClientTokenValidityUnits-cognitoUserPoolClientTokenValidityUnits =- CognitoUserPoolClientTokenValidityUnits- { _cognitoUserPoolClientTokenValidityUnitsAccessToken = Nothing- , _cognitoUserPoolClientTokenValidityUnitsIdToken = Nothing- , _cognitoUserPoolClientTokenValidityUnitsRefreshToken = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-tokenvalidityunits.html#cfn-cognito-userpoolclient-tokenvalidityunits-accesstoken-cupctvuAccessToken :: Lens' CognitoUserPoolClientTokenValidityUnits (Maybe (Val Text))-cupctvuAccessToken = lens _cognitoUserPoolClientTokenValidityUnitsAccessToken (\s a -> s { _cognitoUserPoolClientTokenValidityUnitsAccessToken = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-tokenvalidityunits.html#cfn-cognito-userpoolclient-tokenvalidityunits-idtoken-cupctvuIdToken :: Lens' CognitoUserPoolClientTokenValidityUnits (Maybe (Val Text))-cupctvuIdToken = lens _cognitoUserPoolClientTokenValidityUnitsIdToken (\s a -> s { _cognitoUserPoolClientTokenValidityUnitsIdToken = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpoolclient-tokenvalidityunits.html#cfn-cognito-userpoolclient-tokenvalidityunits-refreshtoken-cupctvuRefreshToken :: Lens' CognitoUserPoolClientTokenValidityUnits (Maybe (Val Text))-cupctvuRefreshToken = lens _cognitoUserPoolClientTokenValidityUnitsRefreshToken (\s a -> s { _cognitoUserPoolClientTokenValidityUnitsRefreshToken = a })
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-deviceconfiguration.html--module Stratosphere.ResourceProperties.CognitoUserPoolDeviceConfiguration where--import Stratosphere.ResourceImports----- | Full data type definition for CognitoUserPoolDeviceConfiguration. See--- 'cognitoUserPoolDeviceConfiguration' for a more convenient constructor.-data CognitoUserPoolDeviceConfiguration =- CognitoUserPoolDeviceConfiguration- { _cognitoUserPoolDeviceConfigurationChallengeRequiredOnNewDevice :: Maybe (Val Bool)- , _cognitoUserPoolDeviceConfigurationDeviceOnlyRememberedOnUserPrompt :: Maybe (Val Bool)- } deriving (Show, Eq)--instance ToJSON CognitoUserPoolDeviceConfiguration where- toJSON CognitoUserPoolDeviceConfiguration{..} =- object $- catMaybes- [ fmap (("ChallengeRequiredOnNewDevice",) . toJSON) _cognitoUserPoolDeviceConfigurationChallengeRequiredOnNewDevice- , fmap (("DeviceOnlyRememberedOnUserPrompt",) . toJSON) _cognitoUserPoolDeviceConfigurationDeviceOnlyRememberedOnUserPrompt- ]---- | Constructor for 'CognitoUserPoolDeviceConfiguration' containing required--- fields as arguments.-cognitoUserPoolDeviceConfiguration- :: CognitoUserPoolDeviceConfiguration-cognitoUserPoolDeviceConfiguration =- CognitoUserPoolDeviceConfiguration- { _cognitoUserPoolDeviceConfigurationChallengeRequiredOnNewDevice = Nothing- , _cognitoUserPoolDeviceConfigurationDeviceOnlyRememberedOnUserPrompt = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-deviceconfiguration.html#cfn-cognito-userpool-deviceconfiguration-challengerequiredonnewdevice-cupdcChallengeRequiredOnNewDevice :: Lens' CognitoUserPoolDeviceConfiguration (Maybe (Val Bool))-cupdcChallengeRequiredOnNewDevice = lens _cognitoUserPoolDeviceConfigurationChallengeRequiredOnNewDevice (\s a -> s { _cognitoUserPoolDeviceConfigurationChallengeRequiredOnNewDevice = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpool-deviceconfiguration.html#cfn-cognito-userpool-deviceconfiguration-deviceonlyrememberedonuserprompt-cupdcDeviceOnlyRememberedOnUserPrompt :: Lens' CognitoUserPoolDeviceConfiguration (Maybe (Val Bool))-cupdcDeviceOnlyRememberedOnUserPrompt = lens _cognitoUserPoolDeviceConfigurationDeviceOnlyRememberedOnUserPrompt (\s a -> s { _cognitoUserPoolDeviceConfigurationDeviceOnlyRememberedOnUserPrompt = a })
@@ -1,40 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpooldomain-customdomainconfigtype.html--module Stratosphere.ResourceProperties.CognitoUserPoolDomainCustomDomainConfigType where--import Stratosphere.ResourceImports----- | Full data type definition for--- CognitoUserPoolDomainCustomDomainConfigType. See--- 'cognitoUserPoolDomainCustomDomainConfigType' for a more convenient--- constructor.-data CognitoUserPoolDomainCustomDomainConfigType =- CognitoUserPoolDomainCustomDomainConfigType- { _cognitoUserPoolDomainCustomDomainConfigTypeCertificateArn :: Maybe (Val Text)- } deriving (Show, Eq)--instance ToJSON CognitoUserPoolDomainCustomDomainConfigType where- toJSON CognitoUserPoolDomainCustomDomainConfigType{..} =- object $- catMaybes- [ fmap (("CertificateArn",) . toJSON) _cognitoUserPoolDomainCustomDomainConfigTypeCertificateArn- ]---- | Constructor for 'CognitoUserPoolDomainCustomDomainConfigType' containing--- required fields as arguments.-cognitoUserPoolDomainCustomDomainConfigType- :: CognitoUserPoolDomainCustomDomainConfigType-cognitoUserPoolDomainCustomDomainConfigType =- CognitoUserPoolDomainCustomDomainConfigType- { _cognitoUserPoolDomainCustomDomainConfigTypeCertificateArn = Nothing- }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cognito-userpooldomain-customdomainconfigtype.html#cfn-cognito-userpooldomain-customdomainconfigtype-certificatearn-cupdcdctCertificateArn :: Lens' CognitoUserPoolDomainCustomDomainConfigType (Maybe (Val Text))-cupdcdctCertificateArn = lens _cognitoUserPoolDomainCustomDomainConfigTypeCertificateArn (\s a -> s { _cognitoUserPoolDomainCustomDomainConfigTypeCertificateArn = a })
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff
file too large to diff