{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.ApplicationAutoScaling.Types.ScalingPolicy -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.ApplicationAutoScaling.Types.ScalingPolicy where import Amazonka.ApplicationAutoScaling.Types.Alarm import Amazonka.ApplicationAutoScaling.Types.PolicyType import Amazonka.ApplicationAutoScaling.Types.ScalableDimension import Amazonka.ApplicationAutoScaling.Types.ServiceNamespace import Amazonka.ApplicationAutoScaling.Types.StepScalingPolicyConfiguration import Amazonka.ApplicationAutoScaling.Types.TargetTrackingScalingPolicyConfiguration import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude -- | Represents a scaling policy to use with Application Auto Scaling. -- -- For more information about configuring scaling policies for a specific -- service, see -- <https://docs.aws.amazon.com/autoscaling/application/userguide/integrated-services-list.html Amazon Web Services services that you can use with Application Auto Scaling> -- in the /Application Auto Scaling User Guide/. -- -- /See:/ 'newScalingPolicy' smart constructor. data ScalingPolicy = ScalingPolicy' { -- | The CloudWatch alarms associated with the scaling policy. ScalingPolicy -> Maybe [Alarm] alarms :: Prelude.Maybe [Alarm], -- | A step scaling policy. ScalingPolicy -> Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration :: Prelude.Maybe StepScalingPolicyConfiguration, -- | A target tracking scaling policy. ScalingPolicy -> Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration :: Prelude.Maybe TargetTrackingScalingPolicyConfiguration, -- | The Amazon Resource Name (ARN) of the scaling policy. ScalingPolicy -> Text policyARN :: Prelude.Text, -- | The name of the scaling policy. ScalingPolicy -> Text policyName :: Prelude.Text, -- | The namespace of the Amazon Web Services service that provides the -- resource, or a @custom-resource@. ScalingPolicy -> ServiceNamespace serviceNamespace :: ServiceNamespace, -- | The identifier of the resource associated with the scaling policy. This -- string consists of the resource type and unique identifier. -- -- - ECS service - The resource type is @service@ and the unique -- identifier is the cluster name and service name. Example: -- @service\/default\/sample-webapp@. -- -- - Spot Fleet - The resource type is @spot-fleet-request@ and the -- unique identifier is the Spot Fleet request ID. Example: -- @spot-fleet-request\/sfr-73fbd2ce-aa30-494c-8788-1cee4EXAMPLE@. -- -- - EMR cluster - The resource type is @instancegroup@ and the unique -- identifier is the cluster ID and instance group ID. Example: -- @instancegroup\/j-2EEZNYKUA1NTV\/ig-1791Y4E1L8YI0@. -- -- - AppStream 2.0 fleet - The resource type is @fleet@ and the unique -- identifier is the fleet name. Example: @fleet\/sample-fleet@. -- -- - DynamoDB table - The resource type is @table@ and the unique -- identifier is the table name. Example: @table\/my-table@. -- -- - DynamoDB global secondary index - The resource type is @index@ and -- the unique identifier is the index name. Example: -- @table\/my-table\/index\/my-table-index@. -- -- - Aurora DB cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:my-db-cluster@. -- -- - SageMaker endpoint variant - The resource type is @variant@ and the -- unique identifier is the resource ID. Example: -- @endpoint\/my-end-point\/variant\/KMeansClustering@. -- -- - Custom resources are not supported with a resource type. This -- parameter must specify the @OutputValue@ from the CloudFormation -- template stack used to access the resources. The unique identifier -- is defined by the service provider. More information is available in -- our -- <https://github.com/aws/aws-auto-scaling-custom-resource GitHub repository>. -- -- - Amazon Comprehend document classification endpoint - The resource -- type and unique identifier are specified using the endpoint ARN. -- Example: -- @arn:aws:comprehend:us-west-2:123456789012:document-classifier-endpoint\/EXAMPLE@. -- -- - Amazon Comprehend entity recognizer endpoint - The resource type and -- unique identifier are specified using the endpoint ARN. Example: -- @arn:aws:comprehend:us-west-2:123456789012:entity-recognizer-endpoint\/EXAMPLE@. -- -- - Lambda provisioned concurrency - The resource type is @function@ and -- the unique identifier is the function name with a function version -- or alias name suffix that is not @$LATEST@. Example: -- @function:my-function:prod@ or @function:my-function:1@. -- -- - Amazon Keyspaces table - The resource type is @table@ and the unique -- identifier is the table name. Example: -- @keyspace\/mykeyspace\/table\/mytable@. -- -- - Amazon MSK cluster - The resource type and unique identifier are -- specified using the cluster ARN. Example: -- @arn:aws:kafka:us-east-1:123456789012:cluster\/demo-cluster-1\/6357e0b2-0e6a-4b86-a0b4-70df934c2e31-5@. -- -- - Amazon ElastiCache replication group - The resource type is -- @replication-group@ and the unique identifier is the replication -- group name. Example: @replication-group\/mycluster@. -- -- - Neptune cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:mycluster@. ScalingPolicy -> Text resourceId :: Prelude.Text, -- | The scalable dimension. This string consists of the service namespace, -- resource type, and scaling property. -- -- - @ecs:service:DesiredCount@ - The desired task count of an ECS -- service. -- -- - @elasticmapreduce:instancegroup:InstanceCount@ - The instance count -- of an EMR Instance Group. -- -- - @ec2:spot-fleet-request:TargetCapacity@ - The target capacity of a -- Spot Fleet. -- -- - @appstream:fleet:DesiredCapacity@ - The desired capacity of an -- AppStream 2.0 fleet. -- -- - @dynamodb:table:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB table. -- -- - @dynamodb:table:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB table. -- -- - @dynamodb:index:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB global secondary index. -- -- - @dynamodb:index:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB global secondary index. -- -- - @rds:cluster:ReadReplicaCount@ - The count of Aurora Replicas in an -- Aurora DB cluster. Available for Aurora MySQL-compatible edition and -- Aurora PostgreSQL-compatible edition. -- -- - @sagemaker:variant:DesiredInstanceCount@ - The number of EC2 -- instances for a SageMaker model endpoint variant. -- -- - @custom-resource:ResourceType:Property@ - The scalable dimension for -- a custom resource provided by your own application or service. -- -- - @comprehend:document-classifier-endpoint:DesiredInferenceUnits@ - -- The number of inference units for an Amazon Comprehend document -- classification endpoint. -- -- - @comprehend:entity-recognizer-endpoint:DesiredInferenceUnits@ - The -- number of inference units for an Amazon Comprehend entity recognizer -- endpoint. -- -- - @lambda:function:ProvisionedConcurrency@ - The provisioned -- concurrency for a Lambda function. -- -- - @cassandra:table:ReadCapacityUnits@ - The provisioned read capacity -- for an Amazon Keyspaces table. -- -- - @cassandra:table:WriteCapacityUnits@ - The provisioned write -- capacity for an Amazon Keyspaces table. -- -- - @kafka:broker-storage:VolumeSize@ - The provisioned volume size (in -- GiB) for brokers in an Amazon MSK cluster. -- -- - @elasticache:replication-group:NodeGroups@ - The number of node -- groups for an Amazon ElastiCache replication group. -- -- - @elasticache:replication-group:Replicas@ - The number of replicas -- per node group for an Amazon ElastiCache replication group. -- -- - @neptune:cluster:ReadReplicaCount@ - The count of read replicas in -- an Amazon Neptune DB cluster. ScalingPolicy -> ScalableDimension scalableDimension :: ScalableDimension, -- | The scaling policy type. -- -- The following policy types are supported: -- -- @TargetTrackingScaling@—Not supported for Amazon EMR -- -- @StepScaling@—Not supported for DynamoDB, Amazon Comprehend, Lambda, -- Amazon Keyspaces, Amazon MSK, Amazon ElastiCache, or Neptune. ScalingPolicy -> PolicyType policyType :: PolicyType, -- | The Unix timestamp for when the scaling policy was created. ScalingPolicy -> POSIX creationTime :: Data.POSIX } deriving (ScalingPolicy -> ScalingPolicy -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: ScalingPolicy -> ScalingPolicy -> Bool $c/= :: ScalingPolicy -> ScalingPolicy -> Bool == :: ScalingPolicy -> ScalingPolicy -> Bool $c== :: ScalingPolicy -> ScalingPolicy -> Bool Prelude.Eq, ReadPrec [ScalingPolicy] ReadPrec ScalingPolicy Int -> ReadS ScalingPolicy ReadS [ScalingPolicy] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [ScalingPolicy] $creadListPrec :: ReadPrec [ScalingPolicy] readPrec :: ReadPrec ScalingPolicy $creadPrec :: ReadPrec ScalingPolicy readList :: ReadS [ScalingPolicy] $creadList :: ReadS [ScalingPolicy] readsPrec :: Int -> ReadS ScalingPolicy $creadsPrec :: Int -> ReadS ScalingPolicy Prelude.Read, Int -> ScalingPolicy -> ShowS [ScalingPolicy] -> ShowS ScalingPolicy -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [ScalingPolicy] -> ShowS $cshowList :: [ScalingPolicy] -> ShowS show :: ScalingPolicy -> String $cshow :: ScalingPolicy -> String showsPrec :: Int -> ScalingPolicy -> ShowS $cshowsPrec :: Int -> ScalingPolicy -> ShowS Prelude.Show, forall x. Rep ScalingPolicy x -> ScalingPolicy forall x. ScalingPolicy -> Rep ScalingPolicy x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep ScalingPolicy x -> ScalingPolicy $cfrom :: forall x. ScalingPolicy -> Rep ScalingPolicy x Prelude.Generic) -- | -- Create a value of 'ScalingPolicy' with all optional fields omitted. -- -- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'alarms', 'scalingPolicy_alarms' - The CloudWatch alarms associated with the scaling policy. -- -- 'stepScalingPolicyConfiguration', 'scalingPolicy_stepScalingPolicyConfiguration' - A step scaling policy. -- -- 'targetTrackingScalingPolicyConfiguration', 'scalingPolicy_targetTrackingScalingPolicyConfiguration' - A target tracking scaling policy. -- -- 'policyARN', 'scalingPolicy_policyARN' - The Amazon Resource Name (ARN) of the scaling policy. -- -- 'policyName', 'scalingPolicy_policyName' - The name of the scaling policy. -- -- 'serviceNamespace', 'scalingPolicy_serviceNamespace' - The namespace of the Amazon Web Services service that provides the -- resource, or a @custom-resource@. -- -- 'resourceId', 'scalingPolicy_resourceId' - The identifier of the resource associated with the scaling policy. This -- string consists of the resource type and unique identifier. -- -- - ECS service - The resource type is @service@ and the unique -- identifier is the cluster name and service name. Example: -- @service\/default\/sample-webapp@. -- -- - Spot Fleet - The resource type is @spot-fleet-request@ and the -- unique identifier is the Spot Fleet request ID. Example: -- @spot-fleet-request\/sfr-73fbd2ce-aa30-494c-8788-1cee4EXAMPLE@. -- -- - EMR cluster - The resource type is @instancegroup@ and the unique -- identifier is the cluster ID and instance group ID. Example: -- @instancegroup\/j-2EEZNYKUA1NTV\/ig-1791Y4E1L8YI0@. -- -- - AppStream 2.0 fleet - The resource type is @fleet@ and the unique -- identifier is the fleet name. Example: @fleet\/sample-fleet@. -- -- - DynamoDB table - The resource type is @table@ and the unique -- identifier is the table name. Example: @table\/my-table@. -- -- - DynamoDB global secondary index - The resource type is @index@ and -- the unique identifier is the index name. Example: -- @table\/my-table\/index\/my-table-index@. -- -- - Aurora DB cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:my-db-cluster@. -- -- - SageMaker endpoint variant - The resource type is @variant@ and the -- unique identifier is the resource ID. Example: -- @endpoint\/my-end-point\/variant\/KMeansClustering@. -- -- - Custom resources are not supported with a resource type. This -- parameter must specify the @OutputValue@ from the CloudFormation -- template stack used to access the resources. The unique identifier -- is defined by the service provider. More information is available in -- our -- <https://github.com/aws/aws-auto-scaling-custom-resource GitHub repository>. -- -- - Amazon Comprehend document classification endpoint - The resource -- type and unique identifier are specified using the endpoint ARN. -- Example: -- @arn:aws:comprehend:us-west-2:123456789012:document-classifier-endpoint\/EXAMPLE@. -- -- - Amazon Comprehend entity recognizer endpoint - The resource type and -- unique identifier are specified using the endpoint ARN. Example: -- @arn:aws:comprehend:us-west-2:123456789012:entity-recognizer-endpoint\/EXAMPLE@. -- -- - Lambda provisioned concurrency - The resource type is @function@ and -- the unique identifier is the function name with a function version -- or alias name suffix that is not @$LATEST@. Example: -- @function:my-function:prod@ or @function:my-function:1@. -- -- - Amazon Keyspaces table - The resource type is @table@ and the unique -- identifier is the table name. Example: -- @keyspace\/mykeyspace\/table\/mytable@. -- -- - Amazon MSK cluster - The resource type and unique identifier are -- specified using the cluster ARN. Example: -- @arn:aws:kafka:us-east-1:123456789012:cluster\/demo-cluster-1\/6357e0b2-0e6a-4b86-a0b4-70df934c2e31-5@. -- -- - Amazon ElastiCache replication group - The resource type is -- @replication-group@ and the unique identifier is the replication -- group name. Example: @replication-group\/mycluster@. -- -- - Neptune cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:mycluster@. -- -- 'scalableDimension', 'scalingPolicy_scalableDimension' - The scalable dimension. This string consists of the service namespace, -- resource type, and scaling property. -- -- - @ecs:service:DesiredCount@ - The desired task count of an ECS -- service. -- -- - @elasticmapreduce:instancegroup:InstanceCount@ - The instance count -- of an EMR Instance Group. -- -- - @ec2:spot-fleet-request:TargetCapacity@ - The target capacity of a -- Spot Fleet. -- -- - @appstream:fleet:DesiredCapacity@ - The desired capacity of an -- AppStream 2.0 fleet. -- -- - @dynamodb:table:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB table. -- -- - @dynamodb:table:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB table. -- -- - @dynamodb:index:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB global secondary index. -- -- - @dynamodb:index:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB global secondary index. -- -- - @rds:cluster:ReadReplicaCount@ - The count of Aurora Replicas in an -- Aurora DB cluster. Available for Aurora MySQL-compatible edition and -- Aurora PostgreSQL-compatible edition. -- -- - @sagemaker:variant:DesiredInstanceCount@ - The number of EC2 -- instances for a SageMaker model endpoint variant. -- -- - @custom-resource:ResourceType:Property@ - The scalable dimension for -- a custom resource provided by your own application or service. -- -- - @comprehend:document-classifier-endpoint:DesiredInferenceUnits@ - -- The number of inference units for an Amazon Comprehend document -- classification endpoint. -- -- - @comprehend:entity-recognizer-endpoint:DesiredInferenceUnits@ - The -- number of inference units for an Amazon Comprehend entity recognizer -- endpoint. -- -- - @lambda:function:ProvisionedConcurrency@ - The provisioned -- concurrency for a Lambda function. -- -- - @cassandra:table:ReadCapacityUnits@ - The provisioned read capacity -- for an Amazon Keyspaces table. -- -- - @cassandra:table:WriteCapacityUnits@ - The provisioned write -- capacity for an Amazon Keyspaces table. -- -- - @kafka:broker-storage:VolumeSize@ - The provisioned volume size (in -- GiB) for brokers in an Amazon MSK cluster. -- -- - @elasticache:replication-group:NodeGroups@ - The number of node -- groups for an Amazon ElastiCache replication group. -- -- - @elasticache:replication-group:Replicas@ - The number of replicas -- per node group for an Amazon ElastiCache replication group. -- -- - @neptune:cluster:ReadReplicaCount@ - The count of read replicas in -- an Amazon Neptune DB cluster. -- -- 'policyType', 'scalingPolicy_policyType' - The scaling policy type. -- -- The following policy types are supported: -- -- @TargetTrackingScaling@—Not supported for Amazon EMR -- -- @StepScaling@—Not supported for DynamoDB, Amazon Comprehend, Lambda, -- Amazon Keyspaces, Amazon MSK, Amazon ElastiCache, or Neptune. -- -- 'creationTime', 'scalingPolicy_creationTime' - The Unix timestamp for when the scaling policy was created. newScalingPolicy :: -- | 'policyARN' Prelude.Text -> -- | 'policyName' Prelude.Text -> -- | 'serviceNamespace' ServiceNamespace -> -- | 'resourceId' Prelude.Text -> -- | 'scalableDimension' ScalableDimension -> -- | 'policyType' PolicyType -> -- | 'creationTime' Prelude.UTCTime -> ScalingPolicy newScalingPolicy :: Text -> Text -> ServiceNamespace -> Text -> ScalableDimension -> PolicyType -> UTCTime -> ScalingPolicy newScalingPolicy Text pPolicyARN_ Text pPolicyName_ ServiceNamespace pServiceNamespace_ Text pResourceId_ ScalableDimension pScalableDimension_ PolicyType pPolicyType_ UTCTime pCreationTime_ = ScalingPolicy' { $sel:alarms:ScalingPolicy' :: Maybe [Alarm] alarms = forall a. Maybe a Prelude.Nothing, $sel:stepScalingPolicyConfiguration:ScalingPolicy' :: Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration = forall a. Maybe a Prelude.Nothing, $sel:targetTrackingScalingPolicyConfiguration:ScalingPolicy' :: Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration = forall a. Maybe a Prelude.Nothing, $sel:policyARN:ScalingPolicy' :: Text policyARN = Text pPolicyARN_, $sel:policyName:ScalingPolicy' :: Text policyName = Text pPolicyName_, $sel:serviceNamespace:ScalingPolicy' :: ServiceNamespace serviceNamespace = ServiceNamespace pServiceNamespace_, $sel:resourceId:ScalingPolicy' :: Text resourceId = Text pResourceId_, $sel:scalableDimension:ScalingPolicy' :: ScalableDimension scalableDimension = ScalableDimension pScalableDimension_, $sel:policyType:ScalingPolicy' :: PolicyType policyType = PolicyType pPolicyType_, $sel:creationTime:ScalingPolicy' :: POSIX creationTime = forall (a :: Format). Iso' (Time a) UTCTime Data._Time forall t b. AReview t b -> b -> t Lens.# UTCTime pCreationTime_ } -- | The CloudWatch alarms associated with the scaling policy. scalingPolicy_alarms :: Lens.Lens' ScalingPolicy (Prelude.Maybe [Alarm]) scalingPolicy_alarms :: Lens' ScalingPolicy (Maybe [Alarm]) scalingPolicy_alarms = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {Maybe [Alarm] alarms :: Maybe [Alarm] $sel:alarms:ScalingPolicy' :: ScalingPolicy -> Maybe [Alarm] alarms} -> Maybe [Alarm] alarms) (\s :: ScalingPolicy s@ScalingPolicy' {} Maybe [Alarm] a -> ScalingPolicy s {$sel:alarms:ScalingPolicy' :: Maybe [Alarm] alarms = Maybe [Alarm] a} :: ScalingPolicy) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b. (Functor f, Functor g) => AnIso s t a b -> Iso (f s) (g t) (f a) (g b) Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b Lens.coerced -- | A step scaling policy. scalingPolicy_stepScalingPolicyConfiguration :: Lens.Lens' ScalingPolicy (Prelude.Maybe StepScalingPolicyConfiguration) scalingPolicy_stepScalingPolicyConfiguration :: Lens' ScalingPolicy (Maybe StepScalingPolicyConfiguration) scalingPolicy_stepScalingPolicyConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration :: Maybe StepScalingPolicyConfiguration $sel:stepScalingPolicyConfiguration:ScalingPolicy' :: ScalingPolicy -> Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration} -> Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration) (\s :: ScalingPolicy s@ScalingPolicy' {} Maybe StepScalingPolicyConfiguration a -> ScalingPolicy s {$sel:stepScalingPolicyConfiguration:ScalingPolicy' :: Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration = Maybe StepScalingPolicyConfiguration a} :: ScalingPolicy) -- | A target tracking scaling policy. scalingPolicy_targetTrackingScalingPolicyConfiguration :: Lens.Lens' ScalingPolicy (Prelude.Maybe TargetTrackingScalingPolicyConfiguration) scalingPolicy_targetTrackingScalingPolicyConfiguration :: Lens' ScalingPolicy (Maybe TargetTrackingScalingPolicyConfiguration) scalingPolicy_targetTrackingScalingPolicyConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration :: Maybe TargetTrackingScalingPolicyConfiguration $sel:targetTrackingScalingPolicyConfiguration:ScalingPolicy' :: ScalingPolicy -> Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration} -> Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration) (\s :: ScalingPolicy s@ScalingPolicy' {} Maybe TargetTrackingScalingPolicyConfiguration a -> ScalingPolicy s {$sel:targetTrackingScalingPolicyConfiguration:ScalingPolicy' :: Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration = Maybe TargetTrackingScalingPolicyConfiguration a} :: ScalingPolicy) -- | The Amazon Resource Name (ARN) of the scaling policy. scalingPolicy_policyARN :: Lens.Lens' ScalingPolicy Prelude.Text scalingPolicy_policyARN :: Lens' ScalingPolicy Text scalingPolicy_policyARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {Text policyARN :: Text $sel:policyARN:ScalingPolicy' :: ScalingPolicy -> Text policyARN} -> Text policyARN) (\s :: ScalingPolicy s@ScalingPolicy' {} Text a -> ScalingPolicy s {$sel:policyARN:ScalingPolicy' :: Text policyARN = Text a} :: ScalingPolicy) -- | The name of the scaling policy. scalingPolicy_policyName :: Lens.Lens' ScalingPolicy Prelude.Text scalingPolicy_policyName :: Lens' ScalingPolicy Text scalingPolicy_policyName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {Text policyName :: Text $sel:policyName:ScalingPolicy' :: ScalingPolicy -> Text policyName} -> Text policyName) (\s :: ScalingPolicy s@ScalingPolicy' {} Text a -> ScalingPolicy s {$sel:policyName:ScalingPolicy' :: Text policyName = Text a} :: ScalingPolicy) -- | The namespace of the Amazon Web Services service that provides the -- resource, or a @custom-resource@. scalingPolicy_serviceNamespace :: Lens.Lens' ScalingPolicy ServiceNamespace scalingPolicy_serviceNamespace :: Lens' ScalingPolicy ServiceNamespace scalingPolicy_serviceNamespace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {ServiceNamespace serviceNamespace :: ServiceNamespace $sel:serviceNamespace:ScalingPolicy' :: ScalingPolicy -> ServiceNamespace serviceNamespace} -> ServiceNamespace serviceNamespace) (\s :: ScalingPolicy s@ScalingPolicy' {} ServiceNamespace a -> ScalingPolicy s {$sel:serviceNamespace:ScalingPolicy' :: ServiceNamespace serviceNamespace = ServiceNamespace a} :: ScalingPolicy) -- | The identifier of the resource associated with the scaling policy. This -- string consists of the resource type and unique identifier. -- -- - ECS service - The resource type is @service@ and the unique -- identifier is the cluster name and service name. Example: -- @service\/default\/sample-webapp@. -- -- - Spot Fleet - The resource type is @spot-fleet-request@ and the -- unique identifier is the Spot Fleet request ID. Example: -- @spot-fleet-request\/sfr-73fbd2ce-aa30-494c-8788-1cee4EXAMPLE@. -- -- - EMR cluster - The resource type is @instancegroup@ and the unique -- identifier is the cluster ID and instance group ID. Example: -- @instancegroup\/j-2EEZNYKUA1NTV\/ig-1791Y4E1L8YI0@. -- -- - AppStream 2.0 fleet - The resource type is @fleet@ and the unique -- identifier is the fleet name. Example: @fleet\/sample-fleet@. -- -- - DynamoDB table - The resource type is @table@ and the unique -- identifier is the table name. Example: @table\/my-table@. -- -- - DynamoDB global secondary index - The resource type is @index@ and -- the unique identifier is the index name. Example: -- @table\/my-table\/index\/my-table-index@. -- -- - Aurora DB cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:my-db-cluster@. -- -- - SageMaker endpoint variant - The resource type is @variant@ and the -- unique identifier is the resource ID. Example: -- @endpoint\/my-end-point\/variant\/KMeansClustering@. -- -- - Custom resources are not supported with a resource type. This -- parameter must specify the @OutputValue@ from the CloudFormation -- template stack used to access the resources. The unique identifier -- is defined by the service provider. More information is available in -- our -- <https://github.com/aws/aws-auto-scaling-custom-resource GitHub repository>. -- -- - Amazon Comprehend document classification endpoint - The resource -- type and unique identifier are specified using the endpoint ARN. -- Example: -- @arn:aws:comprehend:us-west-2:123456789012:document-classifier-endpoint\/EXAMPLE@. -- -- - Amazon Comprehend entity recognizer endpoint - The resource type and -- unique identifier are specified using the endpoint ARN. Example: -- @arn:aws:comprehend:us-west-2:123456789012:entity-recognizer-endpoint\/EXAMPLE@. -- -- - Lambda provisioned concurrency - The resource type is @function@ and -- the unique identifier is the function name with a function version -- or alias name suffix that is not @$LATEST@. Example: -- @function:my-function:prod@ or @function:my-function:1@. -- -- - Amazon Keyspaces table - The resource type is @table@ and the unique -- identifier is the table name. Example: -- @keyspace\/mykeyspace\/table\/mytable@. -- -- - Amazon MSK cluster - The resource type and unique identifier are -- specified using the cluster ARN. Example: -- @arn:aws:kafka:us-east-1:123456789012:cluster\/demo-cluster-1\/6357e0b2-0e6a-4b86-a0b4-70df934c2e31-5@. -- -- - Amazon ElastiCache replication group - The resource type is -- @replication-group@ and the unique identifier is the replication -- group name. Example: @replication-group\/mycluster@. -- -- - Neptune cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:mycluster@. scalingPolicy_resourceId :: Lens.Lens' ScalingPolicy Prelude.Text scalingPolicy_resourceId :: Lens' ScalingPolicy Text scalingPolicy_resourceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {Text resourceId :: Text $sel:resourceId:ScalingPolicy' :: ScalingPolicy -> Text resourceId} -> Text resourceId) (\s :: ScalingPolicy s@ScalingPolicy' {} Text a -> ScalingPolicy s {$sel:resourceId:ScalingPolicy' :: Text resourceId = Text a} :: ScalingPolicy) -- | The scalable dimension. This string consists of the service namespace, -- resource type, and scaling property. -- -- - @ecs:service:DesiredCount@ - The desired task count of an ECS -- service. -- -- - @elasticmapreduce:instancegroup:InstanceCount@ - The instance count -- of an EMR Instance Group. -- -- - @ec2:spot-fleet-request:TargetCapacity@ - The target capacity of a -- Spot Fleet. -- -- - @appstream:fleet:DesiredCapacity@ - The desired capacity of an -- AppStream 2.0 fleet. -- -- - @dynamodb:table:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB table. -- -- - @dynamodb:table:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB table. -- -- - @dynamodb:index:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB global secondary index. -- -- - @dynamodb:index:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB global secondary index. -- -- - @rds:cluster:ReadReplicaCount@ - The count of Aurora Replicas in an -- Aurora DB cluster. Available for Aurora MySQL-compatible edition and -- Aurora PostgreSQL-compatible edition. -- -- - @sagemaker:variant:DesiredInstanceCount@ - The number of EC2 -- instances for a SageMaker model endpoint variant. -- -- - @custom-resource:ResourceType:Property@ - The scalable dimension for -- a custom resource provided by your own application or service. -- -- - @comprehend:document-classifier-endpoint:DesiredInferenceUnits@ - -- The number of inference units for an Amazon Comprehend document -- classification endpoint. -- -- - @comprehend:entity-recognizer-endpoint:DesiredInferenceUnits@ - The -- number of inference units for an Amazon Comprehend entity recognizer -- endpoint. -- -- - @lambda:function:ProvisionedConcurrency@ - The provisioned -- concurrency for a Lambda function. -- -- - @cassandra:table:ReadCapacityUnits@ - The provisioned read capacity -- for an Amazon Keyspaces table. -- -- - @cassandra:table:WriteCapacityUnits@ - The provisioned write -- capacity for an Amazon Keyspaces table. -- -- - @kafka:broker-storage:VolumeSize@ - The provisioned volume size (in -- GiB) for brokers in an Amazon MSK cluster. -- -- - @elasticache:replication-group:NodeGroups@ - The number of node -- groups for an Amazon ElastiCache replication group. -- -- - @elasticache:replication-group:Replicas@ - The number of replicas -- per node group for an Amazon ElastiCache replication group. -- -- - @neptune:cluster:ReadReplicaCount@ - The count of read replicas in -- an Amazon Neptune DB cluster. scalingPolicy_scalableDimension :: Lens.Lens' ScalingPolicy ScalableDimension scalingPolicy_scalableDimension :: Lens' ScalingPolicy ScalableDimension scalingPolicy_scalableDimension = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {ScalableDimension scalableDimension :: ScalableDimension $sel:scalableDimension:ScalingPolicy' :: ScalingPolicy -> ScalableDimension scalableDimension} -> ScalableDimension scalableDimension) (\s :: ScalingPolicy s@ScalingPolicy' {} ScalableDimension a -> ScalingPolicy s {$sel:scalableDimension:ScalingPolicy' :: ScalableDimension scalableDimension = ScalableDimension a} :: ScalingPolicy) -- | The scaling policy type. -- -- The following policy types are supported: -- -- @TargetTrackingScaling@—Not supported for Amazon EMR -- -- @StepScaling@—Not supported for DynamoDB, Amazon Comprehend, Lambda, -- Amazon Keyspaces, Amazon MSK, Amazon ElastiCache, or Neptune. scalingPolicy_policyType :: Lens.Lens' ScalingPolicy PolicyType scalingPolicy_policyType :: Lens' ScalingPolicy PolicyType scalingPolicy_policyType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {PolicyType policyType :: PolicyType $sel:policyType:ScalingPolicy' :: ScalingPolicy -> PolicyType policyType} -> PolicyType policyType) (\s :: ScalingPolicy s@ScalingPolicy' {} PolicyType a -> ScalingPolicy s {$sel:policyType:ScalingPolicy' :: PolicyType policyType = PolicyType a} :: ScalingPolicy) -- | The Unix timestamp for when the scaling policy was created. scalingPolicy_creationTime :: Lens.Lens' ScalingPolicy Prelude.UTCTime scalingPolicy_creationTime :: Lens' ScalingPolicy UTCTime scalingPolicy_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\ScalingPolicy' {POSIX creationTime :: POSIX $sel:creationTime:ScalingPolicy' :: ScalingPolicy -> POSIX creationTime} -> POSIX creationTime) (\s :: ScalingPolicy s@ScalingPolicy' {} POSIX a -> ScalingPolicy s {$sel:creationTime:ScalingPolicy' :: POSIX creationTime = POSIX a} :: ScalingPolicy) forall b c a. (b -> c) -> (a -> b) -> a -> c Prelude.. forall (a :: Format). Iso' (Time a) UTCTime Data._Time instance Data.FromJSON ScalingPolicy where parseJSON :: Value -> Parser ScalingPolicy parseJSON = forall a. String -> (Object -> Parser a) -> Value -> Parser a Data.withObject String "ScalingPolicy" ( \Object x -> Maybe [Alarm] -> Maybe StepScalingPolicyConfiguration -> Maybe TargetTrackingScalingPolicyConfiguration -> Text -> Text -> ServiceNamespace -> Text -> ScalableDimension -> PolicyType -> POSIX -> ScalingPolicy ScalingPolicy' forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Alarms" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "StepScalingPolicyConfiguration") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> ( Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "TargetTrackingScalingPolicyConfiguration" ) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "PolicyARN") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "PolicyName") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "ServiceNamespace") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "ResourceId") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "ScalableDimension") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "PolicyType") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser a Data..: Key "CreationTime") ) instance Prelude.Hashable ScalingPolicy where hashWithSalt :: Int -> ScalingPolicy -> Int hashWithSalt Int _salt ScalingPolicy' {Maybe [Alarm] Maybe StepScalingPolicyConfiguration Maybe TargetTrackingScalingPolicyConfiguration Text POSIX PolicyType ScalableDimension ServiceNamespace creationTime :: POSIX policyType :: PolicyType scalableDimension :: ScalableDimension resourceId :: Text serviceNamespace :: ServiceNamespace policyName :: Text policyARN :: Text targetTrackingScalingPolicyConfiguration :: Maybe TargetTrackingScalingPolicyConfiguration stepScalingPolicyConfiguration :: Maybe StepScalingPolicyConfiguration alarms :: Maybe [Alarm] $sel:creationTime:ScalingPolicy' :: ScalingPolicy -> POSIX $sel:policyType:ScalingPolicy' :: ScalingPolicy -> PolicyType $sel:scalableDimension:ScalingPolicy' :: ScalingPolicy -> ScalableDimension $sel:resourceId:ScalingPolicy' :: ScalingPolicy -> Text $sel:serviceNamespace:ScalingPolicy' :: ScalingPolicy -> ServiceNamespace $sel:policyName:ScalingPolicy' :: ScalingPolicy -> Text $sel:policyARN:ScalingPolicy' :: ScalingPolicy -> Text $sel:targetTrackingScalingPolicyConfiguration:ScalingPolicy' :: ScalingPolicy -> Maybe TargetTrackingScalingPolicyConfiguration $sel:stepScalingPolicyConfiguration:ScalingPolicy' :: ScalingPolicy -> Maybe StepScalingPolicyConfiguration $sel:alarms:ScalingPolicy' :: ScalingPolicy -> Maybe [Alarm] ..} = Int _salt forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe [Alarm] alarms forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text policyARN forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text policyName forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` ServiceNamespace serviceNamespace forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text resourceId forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` ScalableDimension scalableDimension forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` PolicyType policyType forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` POSIX creationTime instance Prelude.NFData ScalingPolicy where rnf :: ScalingPolicy -> () rnf ScalingPolicy' {Maybe [Alarm] Maybe StepScalingPolicyConfiguration Maybe TargetTrackingScalingPolicyConfiguration Text POSIX PolicyType ScalableDimension ServiceNamespace creationTime :: POSIX policyType :: PolicyType scalableDimension :: ScalableDimension resourceId :: Text serviceNamespace :: ServiceNamespace policyName :: Text policyARN :: Text targetTrackingScalingPolicyConfiguration :: Maybe TargetTrackingScalingPolicyConfiguration stepScalingPolicyConfiguration :: Maybe StepScalingPolicyConfiguration alarms :: Maybe [Alarm] $sel:creationTime:ScalingPolicy' :: ScalingPolicy -> POSIX $sel:policyType:ScalingPolicy' :: ScalingPolicy -> PolicyType $sel:scalableDimension:ScalingPolicy' :: ScalingPolicy -> ScalableDimension $sel:resourceId:ScalingPolicy' :: ScalingPolicy -> Text $sel:serviceNamespace:ScalingPolicy' :: ScalingPolicy -> ServiceNamespace $sel:policyName:ScalingPolicy' :: ScalingPolicy -> Text $sel:policyARN:ScalingPolicy' :: ScalingPolicy -> Text $sel:targetTrackingScalingPolicyConfiguration:ScalingPolicy' :: ScalingPolicy -> Maybe TargetTrackingScalingPolicyConfiguration $sel:stepScalingPolicyConfiguration:ScalingPolicy' :: ScalingPolicy -> Maybe StepScalingPolicyConfiguration $sel:alarms:ScalingPolicy' :: ScalingPolicy -> Maybe [Alarm] ..} = forall a. NFData a => a -> () Prelude.rnf Maybe [Alarm] alarms seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe StepScalingPolicyConfiguration stepScalingPolicyConfiguration seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe TargetTrackingScalingPolicyConfiguration targetTrackingScalingPolicyConfiguration seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text policyARN seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text policyName seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf ServiceNamespace serviceNamespace seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text resourceId seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf ScalableDimension scalableDimension seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf PolicyType policyType seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf POSIX creationTime