Regenerating all services

amazonka-autoscaling/amazonka-autoscaling.cabal

@@ -111,4 +111,5 @@ test-suite amazonka-autoscaling-test
         , lens
         , tasty
         , tasty-hunit
+        , text
         , time

amazonka-autoscaling/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs

@@ -20,7 +20,7 @@
 --
 -- If you exceed your maximum limit of Auto Scaling groups, which by
 -- default is 20 per region, the call fails. For information about viewing
--- and updating these limits, see DescribeAccountLimits.
+-- and updating this limit, see DescribeAccountLimits.
 --
 -- For more information, see
 -- <http://docs.aws.amazon.com/AutoScaling/latest/DeveloperGuide/AutoScalingGroup.html Auto Scaling Groups>
@@ -190,16 +190,16 @@ casgVPCZoneIdentifier = lens _casgVPCZoneIdentifier (\ s a -> s{_casgVPCZoneIden
 -- | The amount of time, in seconds, after a scaling activity completes
 -- before another scaling activity can start.
 --
--- If @DefaultCooldown@ is not specified, the default value is 300. For
--- more information, see
+-- If this parameter is not specified, the default value is 300. For more
+-- information, see
 -- <http://docs.aws.amazon.com/AutoScaling/latest/DeveloperGuide/Cooldown.html Understanding Auto Scaling Cooldowns>
 -- in the /Auto Scaling Developer Guide/.
 casgDefaultCooldown :: Lens' CreateAutoScalingGroup (Maybe Int)
 casgDefaultCooldown = lens _casgDefaultCooldown (\ s a -> s{_casgDefaultCooldown = a});
 
 -- | The number of EC2 instances that should be running in the group. This
--- value must be greater than or equal to the minimum size of the group and
--- less than or equal to the maximum size of the group.
+-- number must be greater than or equal to the minimum size of the group
+-- and less than or equal to the maximum size of the group.
 casgDesiredCapacity :: Lens' CreateAutoScalingGroup (Maybe Int)
 casgDesiredCapacity = lens _casgDesiredCapacity (\ s a -> s{_casgDesiredCapacity = a});
 

amazonka-autoscaling/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs

@@ -20,7 +20,7 @@
 --
 -- If you exceed your maximum limit of launch configurations, which by
 -- default is 100 per region, the call fails. For information about viewing
--- and updating these limits, see DescribeAccountLimits.
+-- and updating this limit, see DescribeAccountLimits.
 --
 -- For more information, see
 -- <http://docs.aws.amazon.com/AutoScaling/latest/DeveloperGuide/LaunchConfiguration.html Launch Configurations>
@@ -223,7 +223,7 @@ clcKeyName = lens _clcKeyName (\ s a -> s{_clcKeyName = a});
 
 -- | The IDs of one or more security groups for the VPC specified in
 -- @ClassicLinkVPCId@. This parameter is required if @ClassicLinkVPCId@ is
--- specified, and cannot be used otherwise. For more information, see
+-- specified, and is not supported otherwise. For more information, see
 -- <http://docs.aws.amazon.com/AWSEC2/latest/UserGuide/vpc-classiclink.html ClassicLink>
 -- in the /Amazon Elastic Compute Cloud User Guide/.
 clcClassicLinkVPCSecurityGroups :: Lens' CreateLaunchConfiguration [Text]
@@ -266,7 +266,7 @@ clcUserData :: Lens' CreateLaunchConfiguration (Maybe Text)
 clcUserData = lens _clcUserData (\ s a -> s{_clcUserData = a});
 
 -- | The ID of a ClassicLink-enabled VPC to link your EC2-Classic instances
--- to. This parameter can only be used if you are launching EC2-Classic
+-- to. This parameter is supported only if you are launching EC2-Classic
 -- instances. For more information, see
 -- <http://docs.aws.amazon.com/AWSEC2/latest/UserGuide/vpc-classiclink.html ClassicLink>
 -- in the /Amazon Elastic Compute Cloud User Guide/.

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribePolicies.hs

@@ -30,6 +30,7 @@ module Network.AWS.AutoScaling.DescribePolicies
     , descNextToken
     , descMaxRecords
     , descAutoScalingGroupName
+    , descPolicyTypes
 
     -- * Response
     , DescribePoliciesResponse
@@ -58,11 +59,14 @@ import           Network.AWS.Response
 -- * 'descMaxRecords'
 --
 -- * 'descAutoScalingGroupName'
+--
+-- * 'descPolicyTypes'
 data DescribePolicies = DescribePolicies'
     { _descPolicyNames          :: !(Maybe [Text])
     , _descNextToken            :: !(Maybe Text)
     , _descMaxRecords           :: !(Maybe Int)
     , _descAutoScalingGroupName :: !(Maybe Text)
+    , _descPolicyTypes          :: !(Maybe [Text])
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
 -- | 'DescribePolicies' smart constructor.
@@ -73,6 +77,7 @@ describePolicies =
     , _descNextToken = Nothing
     , _descMaxRecords = Nothing
     , _descAutoScalingGroupName = Nothing
+    , _descPolicyTypes = Nothing
     }
 
 -- | One or more policy names or policy ARNs to be described. If you omit
@@ -95,6 +100,11 @@ descMaxRecords = lens _descMaxRecords (\ s a -> s{_descMaxRecords = a});
 descAutoScalingGroupName :: Lens' DescribePolicies (Maybe Text)
 descAutoScalingGroupName = lens _descAutoScalingGroupName (\ s a -> s{_descAutoScalingGroupName = a});
 
+-- | One or more policy types. Valid values are @SimpleScaling@ and
+-- @StepScaling@.
+descPolicyTypes :: Lens' DescribePolicies [Text]
+descPolicyTypes = lens _descPolicyTypes (\ s a -> s{_descPolicyTypes = a}) . _Default;
+
 instance AWSPager DescribePolicies where
         page rq rs
           | stop (rs ^. dprNextToken) = Nothing
@@ -130,7 +140,9 @@ instance ToQuery DescribePolicies where
                  toQuery (toQueryList "member" <$> _descPolicyNames),
                "NextToken" =: _descNextToken,
                "MaxRecords" =: _descMaxRecords,
-               "AutoScalingGroupName" =: _descAutoScalingGroupName]
+               "AutoScalingGroupName" =: _descAutoScalingGroupName,
+               "PolicyTypes" =:
+                 toQuery (toQueryList "member" <$> _descPolicyTypes)]
 
 -- | /See:/ 'describePoliciesResponse' smart constructor.
 --

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs

@@ -91,12 +91,11 @@ dsa1MaxRecords = lens _dsa1MaxRecords (\ s a -> s{_dsa1MaxRecords = a});
 dsa1AutoScalingGroupName :: Lens' DescribeScalingActivities (Maybe Text)
 dsa1AutoScalingGroupName = lens _dsa1AutoScalingGroupName (\ s a -> s{_dsa1AutoScalingGroupName = a});
 
--- | A list containing the activity IDs of the desired scaling activities. If
--- this list is omitted, all activities are described. If an
--- @AutoScalingGroupName@ is provided, the results are limited to that
--- group. The list of requested activities cannot contain more than 50
--- items. If unknown activities are requested, they are ignored with no
--- error.
+-- | The activity IDs of the desired scaling activities. If this list is
+-- omitted, all activities are described. If the @AutoScalingGroupName@
+-- parameter is provided, the results are limited to that group. The list
+-- of requested activities cannot contain more than 50 items. If unknown
+-- activities are requested, they are ignored with no error.
 dsa1ActivityIds :: Lens' DescribeScalingActivities [Text]
 dsa1ActivityIds = lens _dsa1ActivityIds (\ s a -> s{_dsa1ActivityIds = a}) . _Default;
 

amazonka-autoscaling/gen/Network/AWS/AutoScaling/ExecutePolicy.hs

@@ -27,7 +27,9 @@ module Network.AWS.AutoScaling.ExecutePolicy
     , executePolicy
     -- ** Request lenses
     , epHonorCooldown
+    , epMetricValue
     , epAutoScalingGroupName
+    , epBreachThreshold
     , epPolicyName
 
     -- * Response
@@ -47,12 +49,18 @@ import           Network.AWS.Response
 --
 -- * 'epHonorCooldown'
 --
+-- * 'epMetricValue'
+--
 -- * 'epAutoScalingGroupName'
 --
+-- * 'epBreachThreshold'
+--
 -- * 'epPolicyName'
 data ExecutePolicy = ExecutePolicy'
     { _epHonorCooldown        :: !(Maybe Bool)
+    , _epMetricValue          :: !(Maybe Double)
     , _epAutoScalingGroupName :: !(Maybe Text)
+    , _epBreachThreshold      :: !(Maybe Double)
     , _epPolicyName           :: !Text
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
@@ -61,28 +69,49 @@ executePolicy :: Text -> ExecutePolicy
 executePolicy pPolicyName =
     ExecutePolicy'
     { _epHonorCooldown = Nothing
+    , _epMetricValue = Nothing
     , _epAutoScalingGroupName = Nothing
+    , _epBreachThreshold = Nothing
     , _epPolicyName = pPolicyName
     }
 
--- | Set to @True@ if you want Auto Scaling to wait for the cooldown period
--- associated with the Auto Scaling group to complete before executing the
--- policy.
+-- | If this parameter is true, Auto Scaling waits for the cooldown period to
+-- complete before executing the policy. Otherwise, Auto Scaling executes
+-- the policy without waiting for the cooldown period to complete.
 --
--- Set to @False@ if you want Auto Scaling to circumvent the cooldown
--- period associated with the Auto Scaling group and execute the policy
--- before the cooldown period ends.
+-- This parameter is not supported if the policy type is @StepScaling@.
 --
 -- For more information, see
 -- <http://docs.aws.amazon.com/AutoScaling/latest/DeveloperGuide/Cooldown.html Understanding Auto Scaling Cooldowns>
 -- in the /Auto Scaling Developer Guide/.
 epHonorCooldown :: Lens' ExecutePolicy (Maybe Bool)
 epHonorCooldown = lens _epHonorCooldown (\ s a -> s{_epHonorCooldown = a});
 
+-- | The metric value to compare to @BreachThreshold@. This enables you to
+-- execute a policy of type @StepScaling@ and determine which step
+-- adjustment to use. For example, if the breach threshold is 50 and you
+-- want to use a step adjustment with a lower bound of 0 and an upper bound
+-- of 10, you can set the metric value to 59.
+--
+-- If you specify a metric value that doesn\'t correspond to a step
+-- adjustment for the policy, the call returns an error.
+--
+-- This parameter is required if the policy type is @StepScaling@ and not
+-- supported otherwise.
+epMetricValue :: Lens' ExecutePolicy (Maybe Double)
+epMetricValue = lens _epMetricValue (\ s a -> s{_epMetricValue = a});
+
 -- | The name or Amazon Resource Name (ARN) of the Auto Scaling group.
 epAutoScalingGroupName :: Lens' ExecutePolicy (Maybe Text)
 epAutoScalingGroupName = lens _epAutoScalingGroupName (\ s a -> s{_epAutoScalingGroupName = a});
 
+-- | The breach threshold for the alarm.
+--
+-- This parameter is required if the policy type is @StepScaling@ and not
+-- supported otherwise.
+epBreachThreshold :: Lens' ExecutePolicy (Maybe Double)
+epBreachThreshold = lens _epBreachThreshold (\ s a -> s{_epBreachThreshold = a});
+
 -- | The name or ARN of the policy.
 epPolicyName :: Lens' ExecutePolicy Text
 epPolicyName = lens _epPolicyName (\ s a -> s{_epPolicyName = a});
@@ -105,7 +134,9 @@ instance ToQuery ExecutePolicy where
               ["Action" =: ("ExecutePolicy" :: ByteString),
                "Version" =: ("2011-01-01" :: ByteString),
                "HonorCooldown" =: _epHonorCooldown,
+               "MetricValue" =: _epMetricValue,
                "AutoScalingGroupName" =: _epAutoScalingGroupName,
+               "BreachThreshold" =: _epBreachThreshold,
                "PolicyName" =: _epPolicyName]
 
 -- | /See:/ 'executePolicyResponse' smart constructor.

amazonka-autoscaling/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs

@@ -42,6 +42,12 @@
 -- <http://docs.aws.amazon.com/AutoScaling/latest/DeveloperGuide/AutoScalingTerminatingState.html Auto Scaling Terminating State>
 -- in the /Auto Scaling Developer Guide/.
 --
+-- If you exceed your maximum limit of lifecycle hooks, which by default is
+-- 50 per region, the call fails. For information about updating this
+-- limit, see
+-- <http://docs.aws.amazon.com/general/latest/gr/aws_service_limits.html AWS Service Limits>
+-- in the /Amazon Web Services General Reference/.
+--
 -- <http://docs.aws.amazon.com/AutoScaling/latest/APIReference/API_PutLifecycleHook.html>
 module Network.AWS.AutoScaling.PutLifecycleHook
     (