diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ ## Version -`1.3.7` +`1.4.0` ## Description @@ -21,7 +21,7 @@ Load Balancing services. Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-autoscaling) -and the [AWS API Reference](http://docs.aws.amazon.com/AutoScaling/latest/APIReference/Welcome.html). +and the [AWS API Reference](https://aws.amazon.com/documentation/). The types from this library are intended to be used with [amazonka](http://hackage.haskell.org/package/amazonka), which provides mechanisms for specifying AuthN/AuthZ information and sending requests. diff --git a/amazonka-autoscaling.cabal b/amazonka-autoscaling.cabal --- a/amazonka-autoscaling.cabal +++ b/amazonka-autoscaling.cabal @@ -1,5 +1,5 @@ name: amazonka-autoscaling -version: 1.3.7 +version: 1.4.0 synopsis: Amazon Auto Scaling SDK. homepage: https://github.com/brendanhay/amazonka bug-reports: https://github.com/brendanhay/amazonka/issues @@ -7,7 +7,7 @@ license-file: LICENSE author: Brendan Hay maintainer: Brendan Hay -copyright: Copyright (c) 2013-2015 Brendan Hay +copyright: Copyright (c) 2013-2016 Brendan Hay category: Network, AWS, Cloud, Distributed Computing build-type: Simple cabal-version: >= 1.10 @@ -31,7 +31,7 @@ such as or . . - See "Network.AWS.AutoScaling" and the + See "Network.AWS.AutoScaling" or to get started. source-repository head @@ -103,7 +103,7 @@ , Network.AWS.AutoScaling.Types.Sum build-depends: - amazonka-core == 1.3.7.* + amazonka-core == 1.4.0.* , base >= 4.7 && < 5 test-suite amazonka-autoscaling-test @@ -123,9 +123,9 @@ , Test.AWS.AutoScaling.Internal build-depends: - amazonka-core == 1.3.7.* - , amazonka-test == 1.3.7.* - , amazonka-autoscaling == 1.3.7.* + amazonka-core == 1.4.0.* + , amazonka-test == 1.4.0.* + , amazonka-autoscaling == 1.4.0.* , base , bytestring , tasty diff --git a/gen/Network/AWS/AutoScaling.hs b/gen/Network/AWS/AutoScaling.hs --- a/gen/Network/AWS/AutoScaling.hs +++ b/gen/Network/AWS/AutoScaling.hs @@ -5,7 +5,7 @@ -- | -- Module : Network.AWS.AutoScaling --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -17,8 +17,6 @@ -- instances based on user-defined policies, schedules, and health checks. -- Use this service in conjunction with the Amazon CloudWatch and Elastic -- Load Balancing services. --- --- /See:/ module Network.AWS.AutoScaling ( -- * Service Configuration diff --git a/gen/Network/AWS/AutoScaling/AttachInstances.hs b/gen/Network/AWS/AutoScaling/AttachInstances.hs --- a/gen/Network/AWS/AutoScaling/AttachInstances.hs +++ b/gen/Network/AWS/AutoScaling/AttachInstances.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.AttachInstances --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -28,8 +28,6 @@ -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for AttachInstances. module Network.AWS.AutoScaling.AttachInstances ( -- * Creating a Request @@ -73,7 +71,7 @@ , _aiAutoScalingGroupName = pAutoScalingGroupName_ } --- | One or more EC2 instance IDs. +-- | One or more instance IDs. aiInstanceIds :: Lens' AttachInstances [Text] aiInstanceIds = lens _aiInstanceIds (\ s a -> s{_aiInstanceIds = a}) . _Default . _Coerce; @@ -85,6 +83,8 @@ type Rs AttachInstances = AttachInstancesResponse request = postQuery autoScaling response = receiveNull AttachInstancesResponse' + +instance Hashable AttachInstances instance ToHeaders AttachInstances where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs b/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs --- a/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs +++ b/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.AttachLoadBalancers --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,14 +21,12 @@ -- Attaches one or more load balancers to the specified Auto Scaling group. -- -- To describe the load balancers for an Auto Scaling group, use --- DescribeLoadBalancers. To detach the load balancer from the Auto Scaling --- group, use DetachLoadBalancers. +-- < DescribeLoadBalancers>. To detach the load balancer from the Auto +-- Scaling group, use < DetachLoadBalancers>. -- -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for AttachLoadBalancers. module Network.AWS.AutoScaling.AttachLoadBalancers ( -- * Creating a Request @@ -89,6 +87,8 @@ = receiveXMLWrapper "AttachLoadBalancersResult" (\ s h x -> AttachLoadBalancersResponse' <$> (pure (fromEnum s))) + +instance Hashable AttachLoadBalancers instance ToHeaders AttachLoadBalancers where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs b/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs --- a/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs +++ b/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs @@ -12,44 +12,45 @@ -- | -- Module : Network.AWS.AutoScaling.CompleteLifecycleAction --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Completes the lifecycle action for the associated token initiated under --- the given lifecycle hook with the specified result. +-- Completes the lifecycle action for the specified token or instance with +-- the specified result. -- --- This operation is a part of the basic sequence for adding a lifecycle --- hook to an Auto Scaling group: +-- This step is a part of the procedure for adding a lifecycle hook to an +-- Auto Scaling group: -- --- 1. Create a notification target. A target can be either an Amazon SQS --- queue or an Amazon SNS topic. --- 2. Create an IAM role. This role allows Auto Scaling to publish --- lifecycle notifications to the designated SQS queue or SNS topic. --- 3. Create the lifecycle hook. You can create a hook that acts when --- instances launch or when instances terminate. --- 4. If necessary, record the lifecycle action heartbeat to keep the --- instance in a pending state. --- 5. __Complete the lifecycle action__. +-- 1. (Optional) Create a Lambda function and a rule that allows +-- CloudWatch Events to invoke your Lambda function when Auto Scaling +-- launches or terminates instances. +-- 2. (Optional) Create a notification target and an IAM role. The target +-- can be either an Amazon SQS queue or an Amazon SNS topic. The role +-- allows Auto Scaling to publish lifecycle notifications to the +-- target. +-- 3. Create the lifecycle hook. Specify whether the hook is used when the +-- instances launch or terminate. +-- 4. If you need more time, record the lifecycle action heartbeat to keep +-- the instance in a pending state. +-- 5. __If you finish before the timeout period ends, complete the +-- lifecycle action.__ -- -- For more information, see --- --- and --- +-- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for CompleteLifecycleAction. module Network.AWS.AutoScaling.CompleteLifecycleAction ( -- * Creating a Request completeLifecycleAction , CompleteLifecycleAction -- * Request Lenses + , claInstanceId + , claLifecycleActionToken , claLifecycleHookName , claAutoScalingGroupName - , claLifecycleActionToken , claLifecycleActionResult -- * Destructuring the Response @@ -68,9 +69,10 @@ -- | /See:/ 'completeLifecycleAction' smart constructor. data CompleteLifecycleAction = CompleteLifecycleAction' - { _claLifecycleHookName :: !Text + { _claInstanceId :: !(Maybe Text) + , _claLifecycleActionToken :: !(Maybe Text) + , _claLifecycleHookName :: !Text , _claAutoScalingGroupName :: !Text - , _claLifecycleActionToken :: !Text , _claLifecycleActionResult :: !Text } deriving (Eq,Read,Show,Data,Typeable,Generic) @@ -78,27 +80,40 @@ -- -- Use one of the following lenses to modify other fields as desired: -- +-- * 'claInstanceId' +-- +-- * 'claLifecycleActionToken' +-- -- * 'claLifecycleHookName' -- -- * 'claAutoScalingGroupName' -- --- * 'claLifecycleActionToken' --- -- * 'claLifecycleActionResult' completeLifecycleAction :: Text -- ^ 'claLifecycleHookName' -> Text -- ^ 'claAutoScalingGroupName' - -> Text -- ^ 'claLifecycleActionToken' -> Text -- ^ 'claLifecycleActionResult' -> CompleteLifecycleAction -completeLifecycleAction pLifecycleHookName_ pAutoScalingGroupName_ pLifecycleActionToken_ pLifecycleActionResult_ = +completeLifecycleAction pLifecycleHookName_ pAutoScalingGroupName_ pLifecycleActionResult_ = CompleteLifecycleAction' - { _claLifecycleHookName = pLifecycleHookName_ + { _claInstanceId = Nothing + , _claLifecycleActionToken = Nothing + , _claLifecycleHookName = pLifecycleHookName_ , _claAutoScalingGroupName = pAutoScalingGroupName_ - , _claLifecycleActionToken = pLifecycleActionToken_ , _claLifecycleActionResult = pLifecycleActionResult_ } +-- | The ID of the instance. +claInstanceId :: Lens' CompleteLifecycleAction (Maybe Text) +claInstanceId = lens _claInstanceId (\ s a -> s{_claInstanceId = a}); + +-- | A universally unique identifier (UUID) that identifies a specific +-- lifecycle action associated with an instance. Auto Scaling sends this +-- token to the notification target you specified when you created the +-- lifecycle hook. +claLifecycleActionToken :: Lens' CompleteLifecycleAction (Maybe Text) +claLifecycleActionToken = lens _claLifecycleActionToken (\ s a -> s{_claLifecycleActionToken = a}); + -- | The name of the lifecycle hook. claLifecycleHookName :: Lens' CompleteLifecycleAction Text claLifecycleHookName = lens _claLifecycleHookName (\ s a -> s{_claLifecycleHookName = a}); @@ -107,13 +122,6 @@ claAutoScalingGroupName :: Lens' CompleteLifecycleAction Text claAutoScalingGroupName = lens _claAutoScalingGroupName (\ s a -> s{_claAutoScalingGroupName = a}); --- | A universally unique identifier (UUID) that identifies a specific --- lifecycle action associated with an instance. Auto Scaling sends this --- token to the notification target you specified when you created the --- lifecycle hook. -claLifecycleActionToken :: Lens' CompleteLifecycleAction Text -claLifecycleActionToken = lens _claLifecycleActionToken (\ s a -> s{_claLifecycleActionToken = a}); - -- | The action for the group to take. This parameter can be either -- 'CONTINUE' or 'ABANDON'. claLifecycleActionResult :: Lens' CompleteLifecycleAction Text @@ -129,6 +137,8 @@ CompleteLifecycleActionResponse' <$> (pure (fromEnum s))) +instance Hashable CompleteLifecycleAction + instance ToHeaders CompleteLifecycleAction where toHeaders = const mempty @@ -141,9 +151,10 @@ ["Action" =: ("CompleteLifecycleAction" :: ByteString), "Version" =: ("2011-01-01" :: ByteString), + "InstanceId" =: _claInstanceId, + "LifecycleActionToken" =: _claLifecycleActionToken, "LifecycleHookName" =: _claLifecycleHookName, "AutoScalingGroupName" =: _claAutoScalingGroupName, - "LifecycleActionToken" =: _claLifecycleActionToken, "LifecycleActionResult" =: _claLifecycleActionResult] -- | /See:/ 'completeLifecycleActionResponse' smart constructor. diff --git a/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs --- a/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs +++ b/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.CreateAutoScalingGroup --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -22,13 +22,11 @@ -- -- 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 this limit, see DescribeAccountLimits. +-- and updating this limit, see < DescribeAccountLimits>. -- -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for CreateAutoScalingGroup. module Network.AWS.AutoScaling.CreateAutoScalingGroup ( -- * Creating a Request @@ -144,9 +142,9 @@ , _casgMaxSize = pMaxSize_ } --- | The ID of the EC2 instance used to create a launch configuration for the --- group. Alternatively, use the 'LaunchConfigurationName' parameter to --- specify a launch configuration instead of an EC2 instance. +-- | The ID of the instance used to create a launch configuration for the +-- group. Alternatively, specify a launch configuration instead of an EC2 +-- instance. -- -- When you specify an ID of an instance, Auto Scaling creates a new launch -- configuration and associates it with the group. This launch @@ -154,7 +152,7 @@ -- the exception of the block device mapping. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. casgInstanceId :: Lens' CreateAutoScalingGroup (Maybe Text) casgInstanceId = lens _casgInstanceId (\ s a -> s{_casgInstanceId = a}); @@ -164,7 +162,7 @@ -- listed. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. casgTerminationPolicies :: Lens' CreateAutoScalingGroup [Text] casgTerminationPolicies = lens _casgTerminationPolicies (\ s a -> s{_casgTerminationPolicies = a}) . _Default . _Coerce; @@ -177,7 +175,7 @@ -- This parameter is required if you are adding an 'ELB' health check. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. casgHealthCheckGracePeriod :: Lens' CreateAutoScalingGroup (Maybe Int) casgHealthCheckGracePeriod = lens _casgHealthCheckGracePeriod (\ s a -> s{_casgHealthCheckGracePeriod = a}); @@ -195,7 +193,7 @@ -- specified. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. casgVPCZoneIdentifier :: Lens' CreateAutoScalingGroup (Maybe Text) casgVPCZoneIdentifier = lens _casgVPCZoneIdentifier (\ s a -> s{_casgVPCZoneIdentifier = a}); @@ -204,13 +202,13 @@ -- before another scaling activity can start. The default is 300. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. casgDefaultCooldown :: Lens' CreateAutoScalingGroup (Maybe Int) casgDefaultCooldown = lens _casgDefaultCooldown (\ s a -> s{_casgDefaultCooldown = a}); -- | One or more Availability Zones for the group. This parameter is optional --- if you specify subnets using the 'VPCZoneIdentifier' parameter. +-- if you specify one or more subnets. casgAvailabilityZones :: Lens' CreateAutoScalingGroup (Maybe (NonEmpty Text)) casgAvailabilityZones = lens _casgAvailabilityZones (\ s a -> s{_casgAvailabilityZones = a}) . mapping _List1; @@ -220,9 +218,8 @@ casgDesiredCapacity :: Lens' CreateAutoScalingGroup (Maybe Int) casgDesiredCapacity = lens _casgDesiredCapacity (\ s a -> s{_casgDesiredCapacity = a}); --- | The name of the launch configuration. Alternatively, use the --- 'InstanceId' parameter to specify an EC2 instance instead of a launch --- configuration. +-- | The name of the launch configuration. Alternatively, specify an EC2 +-- instance instead of a launch configuration. casgLaunchConfigurationName :: Lens' CreateAutoScalingGroup (Maybe Text) casgLaunchConfigurationName = lens _casgLaunchConfigurationName (\ s a -> s{_casgLaunchConfigurationName = a}); @@ -246,15 +243,12 @@ -- | One or more load balancers. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. casgLoadBalancerNames :: Lens' CreateAutoScalingGroup [Text] casgLoadBalancerNames = lens _casgLoadBalancerNames (\ s a -> s{_casgLoadBalancerNames = a}) . _Default . _Coerce; --- | The tag to be created or updated. Each tag should be defined by its --- resource type, resource ID, key, value, and a propagate flag. Valid --- values: key=/value/, value=/value/, propagate=/true/ or /false/. Value --- and propagate are optional parameters. +-- | One or more tags. -- -- For more information, see -- @@ -281,6 +275,8 @@ request = postQuery autoScaling response = receiveNull CreateAutoScalingGroupResponse' + +instance Hashable CreateAutoScalingGroup instance ToHeaders CreateAutoScalingGroup where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs b/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs --- a/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs +++ b/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.CreateLaunchConfiguration --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -22,13 +22,11 @@ -- -- 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 this limit, see DescribeAccountLimits. +-- and updating this limit, see < DescribeAccountLimits>. -- -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for CreateLaunchConfiguration. module Network.AWS.AutoScaling.CreateLaunchConfiguration ( -- * Creating a Request @@ -152,7 +150,7 @@ , _clcLaunchConfigurationName = pLaunchConfigurationName_ } --- | The ID of the EC2 instance to use to create the launch configuration. +-- | The ID of the instance to use to create the launch configuration. -- -- The new launch configuration derives attributes from the instance, with -- the exception of the block device mapping. @@ -169,12 +167,11 @@ -- | Used for groups that launch instances into a virtual private cloud -- (VPC). Specifies whether to assign a public IP address to each instance. -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. -- --- If you specify a value for this parameter, be sure to specify at least --- one subnet using the /VPCZoneIdentifier/ parameter when you create your --- group. +-- If you specify this parameter, be sure to specify at least one subnet +-- when you create your group. -- -- Default: If the instance is launched into a default subnet, the default -- is 'true'. If the instance is launched into a nondefault subnet, the @@ -202,7 +199,7 @@ -- | The maximum hourly price to be paid for any Spot Instance launched to -- fulfill the request. Spot Instances are launched when the price you -- specify exceeds the current Spot market price. For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. clcSpotPrice :: Lens' CreateLaunchConfiguration (Maybe Text) clcSpotPrice = lens _clcSpotPrice (\ s a -> s{_clcSpotPrice = a}); @@ -214,7 +211,7 @@ -- every minute and your account is charged a fee. When you disable -- detailed monitoring, by specifying 'False', CloudWatch generates metrics -- every 5 minutes. For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. clcInstanceMonitoring :: Lens' CreateLaunchConfiguration (Maybe InstanceMonitoring) clcInstanceMonitoring = lens _clcInstanceMonitoring (\ s a -> s{_clcInstanceMonitoring = a}); @@ -225,9 +222,10 @@ clcKeyName :: Lens' CreateLaunchConfiguration (Maybe Text) 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 is not supported otherwise. For more information, see +-- | The IDs of one or more security groups for the specified +-- ClassicLink-enabled VPC. This parameter is required if you specify a +-- ClassicLink-enabled VPC, and is not supported otherwise. For more +-- information, see -- -- in the /Amazon Elastic Compute Cloud User Guide/. clcClassicLinkVPCSecurityGroups :: Lens' CreateLaunchConfiguration [Text] @@ -263,9 +261,6 @@ -- information, see -- -- in the /Amazon Elastic Compute Cloud User Guide/. --- --- At this time, launch configurations don\'t support compressed (zipped) --- user data files. clcUserData :: Lens' CreateLaunchConfiguration (Maybe Text) clcUserData = lens _clcUserData (\ s a -> s{_clcUserData = a}); @@ -303,12 +298,11 @@ -- launch Dedicated Instances into a shared tenancy VPC (VPC with instance -- placement tenancy attribute set to 'default'). -- --- If you specify a value for this parameter, be sure to specify at least --- one subnet using the /VPCZoneIdentifier/ parameter when you create your --- group. +-- If you specify this parameter, be sure to specify at least one subnet +-- when you create your group. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. -- -- Valid values: 'default' | 'dedicated' @@ -333,6 +327,8 @@ request = postQuery autoScaling response = receiveNull CreateLaunchConfigurationResponse' + +instance Hashable CreateLaunchConfiguration instance ToHeaders CreateLaunchConfiguration where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs b/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs --- a/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs +++ b/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.CreateOrUpdateTags --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -20,13 +20,6 @@ -- -- Creates or updates tags for the specified Auto Scaling group. -- --- A tag is defined by its resource ID, resource type, key, value, and --- propagate flag. The value and the propagate flag are optional --- parameters. The only supported resource type is 'auto-scaling-group', --- and the resource ID must be the name of the group. The --- 'PropagateAtLaunch' flag determines whether the tag is added to --- instances launched in the group. Valid values are 'true' or 'false'. --- -- When you specify a tag with a key that already exists, the operation -- overwrites the previous tag definition, and you do not get an error -- message. @@ -34,8 +27,6 @@ -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for CreateOrUpdateTags. module Network.AWS.AutoScaling.CreateOrUpdateTags ( -- * Creating a Request @@ -82,6 +73,8 @@ CreateOrUpdateTagsResponse request = postQuery autoScaling response = receiveNull CreateOrUpdateTagsResponse' + +instance Hashable CreateOrUpdateTags instance ToHeaders CreateOrUpdateTags where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs --- a/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs +++ b/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DeleteAutoScalingGroup --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -28,15 +28,13 @@ -- action. -- -- To remove instances from the Auto Scaling group before deleting it, call --- DetachInstances with the list of instances and the option to decrement --- the desired capacity so that Auto Scaling does not launch replacement --- instances. +-- < DetachInstances> with the list of instances and the option to +-- decrement the desired capacity so that Auto Scaling does not launch +-- replacement instances. -- -- To terminate all instances before deleting the Auto Scaling group, call --- UpdateAutoScalingGroup and set the minimum size and desired capacity of --- the Auto Scaling group to zero. --- --- /See:/ for DeleteAutoScalingGroup. +-- < UpdateAutoScalingGroup> and set the minimum size and desired capacity +-- of the Auto Scaling group to zero. module Network.AWS.AutoScaling.DeleteAutoScalingGroup ( -- * Creating a Request @@ -97,6 +95,8 @@ request = postQuery autoScaling response = receiveNull DeleteAutoScalingGroupResponse' + +instance Hashable DeleteAutoScalingGroup instance ToHeaders DeleteAutoScalingGroup where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs b/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs --- a/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs +++ b/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DeleteLaunchConfiguration --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- The launch configuration must not be attached to an Auto Scaling group. -- When this call completes, the launch configuration is no longer -- available for use. --- --- /See:/ for DeleteLaunchConfiguration. module Network.AWS.AutoScaling.DeleteLaunchConfiguration ( -- * Creating a Request @@ -73,6 +71,8 @@ request = postQuery autoScaling response = receiveNull DeleteLaunchConfigurationResponse' + +instance Hashable DeleteLaunchConfiguration instance ToHeaders DeleteLaunchConfiguration where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs b/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs --- a/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs +++ b/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DeleteLifecycleHook --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- If there are any outstanding lifecycle actions, they are completed first -- ('ABANDON' for launching instances, 'CONTINUE' for terminating -- instances). --- --- /See:/ for DeleteLifecycleHook. module Network.AWS.AutoScaling.DeleteLifecycleHook ( -- * Creating a Request @@ -87,6 +85,8 @@ = receiveXMLWrapper "DeleteLifecycleHookResult" (\ s h x -> DeleteLifecycleHookResponse' <$> (pure (fromEnum s))) + +instance Hashable DeleteLifecycleHook instance ToHeaders DeleteLifecycleHook where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs b/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs --- a/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs +++ b/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DeleteNotificationConfiguration --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Deletes the specified notification. --- --- /See:/ for DeleteNotificationConfiguration. module Network.AWS.AutoScaling.DeleteNotificationConfiguration ( -- * Creating a Request @@ -82,6 +80,8 @@ response = receiveNull DeleteNotificationConfigurationResponse' + +instance Hashable DeleteNotificationConfiguration instance ToHeaders DeleteNotificationConfiguration where diff --git a/gen/Network/AWS/AutoScaling/DeletePolicy.hs b/gen/Network/AWS/AutoScaling/DeletePolicy.hs --- a/gen/Network/AWS/AutoScaling/DeletePolicy.hs +++ b/gen/Network/AWS/AutoScaling/DeletePolicy.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DeletePolicy --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -22,8 +22,6 @@ -- -- Deleting a policy deletes the underlying alarm action, but does not -- delete the alarm, even if it no longer has an associated action. --- --- /See:/ for DeletePolicy. module Network.AWS.AutoScaling.DeletePolicy ( -- * Creating a Request @@ -81,6 +79,8 @@ type Rs DeletePolicy = DeletePolicyResponse request = postQuery autoScaling response = receiveNull DeletePolicyResponse' + +instance Hashable DeletePolicy instance ToHeaders DeletePolicy where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs b/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs --- a/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs +++ b/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DeleteScheduledAction --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Deletes the specified scheduled action. --- --- /See:/ for DeleteScheduledAction. module Network.AWS.AutoScaling.DeleteScheduledAction ( -- * Creating a Request @@ -77,6 +75,8 @@ DeleteScheduledActionResponse request = postQuery autoScaling response = receiveNull DeleteScheduledActionResponse' + +instance Hashable DeleteScheduledAction instance ToHeaders DeleteScheduledAction where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DeleteTags.hs b/gen/Network/AWS/AutoScaling/DeleteTags.hs --- a/gen/Network/AWS/AutoScaling/DeleteTags.hs +++ b/gen/Network/AWS/AutoScaling/DeleteTags.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DeleteTags --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Deletes the specified tags. --- --- /See:/ for DeleteTags. module Network.AWS.AutoScaling.DeleteTags ( -- * Creating a Request @@ -58,10 +56,7 @@ { _dtTags = mempty } --- | Each tag should be defined by its resource type, resource ID, key, --- value, and a propagate flag. Valid values are: Resource type = --- /auto-scaling-group/, Resource ID = /AutoScalingGroupName/, key=/value/, --- value=/value/, propagate=/true/ or /false/. +-- | One or more tags. dtTags :: Lens' DeleteTags [Tag] dtTags = lens _dtTags (\ s a -> s{_dtTags = a}) . _Coerce; @@ -69,6 +64,8 @@ type Rs DeleteTags = DeleteTagsResponse request = postQuery autoScaling response = receiveNull DeleteTagsResponse' + +instance Hashable DeleteTags instance ToHeaders DeleteTags where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs b/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs --- a/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs +++ b/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeAccountLimits --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- For information about requesting an increase in these limits, see -- -- in the /Amazon Web Services General Reference/. --- --- /See:/ for DescribeAccountLimits. module Network.AWS.AutoScaling.DescribeAccountLimits ( -- * Creating a Request @@ -73,6 +71,8 @@ <*> (x .@? "MaxNumberOfAutoScalingGroups") <*> (x .@? "MaxNumberOfLaunchConfigurations") <*> (pure (fromEnum s))) + +instance Hashable DescribeAccountLimits instance ToHeaders DescribeAccountLimits where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs b/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs --- a/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs +++ b/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeAdjustmentTypes --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Describes the policy adjustment types for use with PutScalingPolicy. --- --- /See:/ for DescribeAdjustmentTypes. +-- Describes the policy adjustment types for use with < PutScalingPolicy>. module Network.AWS.AutoScaling.DescribeAdjustmentTypes ( -- * Creating a Request @@ -64,6 +62,8 @@ (x .@? "AdjustmentTypes" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeAdjustmentTypes instance ToHeaders DescribeAdjustmentTypes where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs b/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs --- a/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs +++ b/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeAutoScalingGroups --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,8 +21,6 @@ -- Describes one or more Auto Scaling groups. If a list of names is not -- provided, the call describes all Auto Scaling groups. -- --- /See:/ for DescribeAutoScalingGroups. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeAutoScalingGroups ( @@ -107,6 +105,8 @@ (x .@? "NextToken") <*> (pure (fromEnum s)) <*> (x .@? "AutoScalingGroups" .!@ mempty >>= parseXMLList "member")) + +instance Hashable DescribeAutoScalingGroups instance ToHeaders DescribeAutoScalingGroups where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs b/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs --- a/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs +++ b/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeAutoScalingInstances --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,8 +21,6 @@ -- Describes one or more Auto Scaling instances. If a list is not provided, -- the call describes all instances. -- --- /See:/ for DescribeAutoScalingInstances. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeAutoScalingInstances ( @@ -81,9 +79,9 @@ dasiNextToken :: Lens' DescribeAutoScalingInstances (Maybe Text) dasiNextToken = lens _dasiNextToken (\ s a -> s{_dasiNextToken = a}); --- | One or more Auto Scaling instances to describe, up to 50 instances. If --- you omit this parameter, all Auto Scaling instances are described. If --- you specify an ID that does not exist, it is ignored with no error. +-- | The instances to describe; up to 50 instance IDs. If you omit this +-- parameter, all Auto Scaling instances are described. If you specify an +-- ID that does not exist, it is ignored with no error. dasiInstanceIds :: Lens' DescribeAutoScalingInstances [Text] dasiInstanceIds = lens _dasiInstanceIds (\ s a -> s{_dasiInstanceIds = a}) . _Default . _Coerce; @@ -112,6 +110,8 @@ (x .@? "AutoScalingInstances" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeAutoScalingInstances instance ToHeaders DescribeAutoScalingInstances where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs b/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs --- a/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs +++ b/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeAutoScalingNotificationTypes --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Describes the notification types that are supported by Auto Scaling. --- --- /See:/ for DescribeAutoScalingNotificationTypes. module Network.AWS.AutoScaling.DescribeAutoScalingNotificationTypes ( -- * Creating a Request @@ -66,6 +64,9 @@ (x .@? "AutoScalingNotificationTypes" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable + DescribeAutoScalingNotificationTypes instance ToHeaders DescribeAutoScalingNotificationTypes where diff --git a/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs b/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs --- a/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs +++ b/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeLaunchConfigurations --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,8 +21,6 @@ -- Describes one or more launch configurations. If you omit the list of -- names, then the call describes all launch configurations. -- --- /See:/ for DescribeLaunchConfigurations. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeLaunchConfigurations ( @@ -110,6 +108,8 @@ (x .@? "NextToken") <*> (pure (fromEnum s)) <*> (x .@? "LaunchConfigurations" .!@ mempty >>= parseXMLList "member")) + +instance Hashable DescribeLaunchConfigurations instance ToHeaders DescribeLaunchConfigurations where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs b/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs --- a/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs +++ b/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeLifecycleHookTypes --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Describes the available types of lifecycle hooks. --- --- /See:/ for DescribeLifecycleHookTypes. module Network.AWS.AutoScaling.DescribeLifecycleHookTypes ( -- * Creating a Request @@ -65,6 +63,8 @@ (x .@? "LifecycleHookTypes" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeLifecycleHookTypes instance ToHeaders DescribeLifecycleHookTypes where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs b/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs --- a/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs +++ b/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeLifecycleHooks --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Describes the lifecycle hooks for the specified Auto Scaling group. --- --- /See:/ for DescribeLifecycleHooks. module Network.AWS.AutoScaling.DescribeLifecycleHooks ( -- * Creating a Request @@ -86,6 +84,8 @@ (x .@? "LifecycleHooks" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeLifecycleHooks instance ToHeaders DescribeLifecycleHooks where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs b/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs --- a/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs +++ b/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeLoadBalancers --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Describes the load balancers for the specified Auto Scaling group. --- --- /See:/ for DescribeLoadBalancers. module Network.AWS.AutoScaling.DescribeLoadBalancers ( -- * Creating a Request @@ -98,6 +96,8 @@ may (parseXMLList "member")) <*> (x .@? "NextToken") <*> (pure (fromEnum s))) + +instance Hashable DescribeLoadBalancers instance ToHeaders DescribeLoadBalancers where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs b/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs --- a/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs +++ b/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeMetricCollectionTypes --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -22,9 +22,7 @@ -- -- Note that the 'GroupStandbyInstances' metric is not returned by default. -- You must explicitly request this metric when calling --- EnableMetricsCollection. --- --- /See:/ for DescribeMetricCollectionTypes. +-- < EnableMetricsCollection>. module Network.AWS.AutoScaling.DescribeMetricCollectionTypes ( -- * Creating a Request @@ -74,6 +72,8 @@ (x .@? "Granularities" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeMetricCollectionTypes instance ToHeaders DescribeMetricCollectionTypes where diff --git a/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs b/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs --- a/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs +++ b/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeNotificationConfigurations --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,8 +21,6 @@ -- Describes the notification actions associated with the specified Auto -- Scaling group. -- --- /See:/ for DescribeNotificationConfigurations. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeNotificationConfigurations ( @@ -111,6 +109,8 @@ (x .@? "NextToken") <*> (pure (fromEnum s)) <*> (x .@? "NotificationConfigurations" .!@ mempty >>= parseXMLList "member")) + +instance Hashable DescribeNotificationConfigurations instance ToHeaders DescribeNotificationConfigurations where diff --git a/gen/Network/AWS/AutoScaling/DescribePolicies.hs b/gen/Network/AWS/AutoScaling/DescribePolicies.hs --- a/gen/Network/AWS/AutoScaling/DescribePolicies.hs +++ b/gen/Network/AWS/AutoScaling/DescribePolicies.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribePolicies --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -20,8 +20,6 @@ -- -- Describes the policies for the specified Auto Scaling group. -- --- /See:/ for DescribePolicies. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribePolicies ( @@ -128,6 +126,8 @@ (x .@? "ScalingPolicies" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribePolicies instance ToHeaders DescribePolicies where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs b/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs --- a/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs +++ b/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeScalingActivities --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- from the past six weeks. Activities are sorted by the start time. -- Activities still in progress appear first on the list. -- --- /See:/ for DescribeScalingActivities. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeScalingActivities ( @@ -97,10 +95,10 @@ desMaxRecords = lens _desMaxRecords (\ s a -> s{_desMaxRecords = a}); -- | 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. +-- omitted, all activities are described. If you specify an Auto Scaling +-- group, 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. desActivityIds :: Lens' DescribeScalingActivities [Text] desActivityIds = lens _desActivityIds (\ s a -> s{_desActivityIds = a}) . _Default . _Coerce; @@ -122,6 +120,8 @@ (x .@? "NextToken") <*> (pure (fromEnum s)) <*> (x .@? "Activities" .!@ mempty >>= parseXMLList "member")) + +instance Hashable DescribeScalingActivities instance ToHeaders DescribeScalingActivities where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs b/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs --- a/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs +++ b/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs @@ -12,16 +12,14 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeScalingProcessTypes --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Describes the scaling process types for use with ResumeProcesses and --- SuspendProcesses. --- --- /See:/ for DescribeScalingProcessTypes. +-- Describes the scaling process types for use with < ResumeProcesses> and +-- < SuspendProcesses>. module Network.AWS.AutoScaling.DescribeScalingProcessTypes ( -- * Creating a Request @@ -66,6 +64,8 @@ (x .@? "Processes" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeScalingProcessTypes instance ToHeaders DescribeScalingProcessTypes where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs b/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs --- a/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs +++ b/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeScheduledActions --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -20,9 +20,7 @@ -- -- Describes the actions scheduled for your Auto Scaling group that -- haven\'t run. To describe the actions that have already run, use --- DescribeScalingActivities. --- --- /See:/ for DescribeScheduledActions. +-- < DescribeScalingActivities>. -- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeScheduledActions @@ -121,8 +119,7 @@ -- -- You can describe up to a maximum of 50 instances with a single call. If -- there are more items to return, the call returns a token. To get the --- next set of items, repeat the call with the returned token in the --- 'NextToken' parameter. +-- next set of items, repeat the call with the returned token. dsasScheduledActionNames :: Lens' DescribeScheduledActions [Text] dsasScheduledActionNames = lens _dsasScheduledActionNames (\ s a -> s{_dsasScheduledActionNames = a}) . _Default . _Coerce; @@ -146,6 +143,8 @@ may (parseXMLList "member")) <*> (x .@? "NextToken") <*> (pure (fromEnum s))) + +instance Hashable DescribeScheduledActions instance ToHeaders DescribeScheduledActions where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DescribeTags.hs b/gen/Network/AWS/AutoScaling/DescribeTags.hs --- a/gen/Network/AWS/AutoScaling/DescribeTags.hs +++ b/gen/Network/AWS/AutoScaling/DescribeTags.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeTags --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -29,8 +29,6 @@ -- for a particular tag only if it matches all the filters. If there\'s no -- match, no special message is returned. -- --- /See:/ for DescribeTags. --- -- This operation returns paginated results. module Network.AWS.AutoScaling.DescribeTags ( @@ -116,6 +114,8 @@ may (parseXMLList "member")) <*> (pure (fromEnum s))) +instance Hashable DescribeTags + instance ToHeaders DescribeTags where toHeaders = const mempty @@ -163,7 +163,7 @@ dtrsNextToken :: Lens' DescribeTagsResponse (Maybe Text) dtrsNextToken = lens _dtrsNextToken (\ s a -> s{_dtrsNextToken = a}); --- | The tags. +-- | One or more tags. dtrsTags :: Lens' DescribeTagsResponse [TagDescription] dtrsTags = lens _dtrsTags (\ s a -> s{_dtrsTags = a}) . _Default . _Coerce; diff --git a/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs b/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs --- a/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs +++ b/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.DescribeTerminationPolicyTypes --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Describes the termination policies supported by Auto Scaling. --- --- /See:/ for DescribeTerminationPolicyTypes. module Network.AWS.AutoScaling.DescribeTerminationPolicyTypes ( -- * Creating a Request @@ -66,6 +64,8 @@ (x .@? "TerminationPolicyTypes" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DescribeTerminationPolicyTypes instance ToHeaders DescribeTerminationPolicyTypes where diff --git a/gen/Network/AWS/AutoScaling/DetachInstances.hs b/gen/Network/AWS/AutoScaling/DetachInstances.hs --- a/gen/Network/AWS/AutoScaling/DetachInstances.hs +++ b/gen/Network/AWS/AutoScaling/DetachInstances.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DetachInstances --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -29,8 +29,6 @@ -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for DetachInstances. module Network.AWS.AutoScaling.DetachInstances ( -- * Creating a Request @@ -106,6 +104,8 @@ (x .@? "Activities" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable DetachInstances instance ToHeaders DetachInstances where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs b/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs --- a/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs +++ b/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DetachLoadBalancers --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -24,9 +24,7 @@ -- When you detach a load balancer, it enters the 'Removing' state while -- deregistering the instances in the group. When all instances are -- deregistered, then you can no longer describe the load balancer using --- DescribeLoadBalancers. Note that the instances remain running. --- --- /See:/ for DetachLoadBalancers. +-- < DescribeLoadBalancers>. Note that the instances remain running. module Network.AWS.AutoScaling.DetachLoadBalancers ( -- * Creating a Request @@ -87,6 +85,8 @@ = receiveXMLWrapper "DetachLoadBalancersResult" (\ s h x -> DetachLoadBalancersResponse' <$> (pure (fromEnum s))) + +instance Hashable DetachLoadBalancers instance ToHeaders DetachLoadBalancers where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs b/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs --- a/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs +++ b/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.DisableMetricsCollection --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -20,8 +20,6 @@ -- -- Disables monitoring of the specified metrics for the specified Auto -- Scaling group. --- --- /See:/ for DisableMetricsCollection. module Network.AWS.AutoScaling.DisableMetricsCollection ( -- * Creating a Request @@ -97,6 +95,8 @@ request = postQuery autoScaling response = receiveNull DisableMetricsCollectionResponse' + +instance Hashable DisableMetricsCollection instance ToHeaders DisableMetricsCollection where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs b/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs --- a/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs +++ b/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.EnableMetricsCollection --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- -- You can only enable metrics collection if 'InstanceMonitoring' in the -- launch configuration for the group is set to 'True'. --- --- /See:/ for EnableMetricsCollection. module Network.AWS.AutoScaling.EnableMetricsCollection ( -- * Creating a Request @@ -113,6 +111,8 @@ request = postQuery autoScaling response = receiveNull EnableMetricsCollectionResponse' + +instance Hashable EnableMetricsCollection instance ToHeaders EnableMetricsCollection where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/EnterStandby.hs b/gen/Network/AWS/AutoScaling/EnterStandby.hs --- a/gen/Network/AWS/AutoScaling/EnterStandby.hs +++ b/gen/Network/AWS/AutoScaling/EnterStandby.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.EnterStandby --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,10 +21,8 @@ -- Moves the specified instances into 'Standby' mode. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for EnterStandby. module Network.AWS.AutoScaling.EnterStandby ( -- * Creating a Request @@ -103,6 +101,8 @@ (x .@? "Activities" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable EnterStandby instance ToHeaders EnterStandby where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/ExecutePolicy.hs b/gen/Network/AWS/AutoScaling/ExecutePolicy.hs --- a/gen/Network/AWS/AutoScaling/ExecutePolicy.hs +++ b/gen/Network/AWS/AutoScaling/ExecutePolicy.hs @@ -12,15 +12,13 @@ -- | -- Module : Network.AWS.AutoScaling.ExecutePolicy --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Executes the specified policy. --- --- /See:/ for ExecutePolicy. module Network.AWS.AutoScaling.ExecutePolicy ( -- * Creating a Request @@ -86,7 +84,7 @@ -- This parameter is not supported if the policy type is 'StepScaling'. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. epHonorCooldown :: Lens' ExecutePolicy (Maybe Bool) epHonorCooldown = lens _epHonorCooldown (\ s a -> s{_epHonorCooldown = a}); @@ -124,6 +122,8 @@ type Rs ExecutePolicy = ExecutePolicyResponse request = postQuery autoScaling response = receiveNull ExecutePolicyResponse' + +instance Hashable ExecutePolicy instance ToHeaders ExecutePolicy where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/ExitStandby.hs b/gen/Network/AWS/AutoScaling/ExitStandby.hs --- a/gen/Network/AWS/AutoScaling/ExitStandby.hs +++ b/gen/Network/AWS/AutoScaling/ExitStandby.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.ExitStandby --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -21,10 +21,8 @@ -- Moves the specified instances out of 'Standby' mode. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for ExitStandby. module Network.AWS.AutoScaling.ExitStandby ( -- * Creating a Request @@ -89,6 +87,8 @@ (x .@? "Activities" .!@ mempty >>= may (parseXMLList "member")) <*> (pure (fromEnum s))) + +instance Hashable ExitStandby instance ToHeaders ExitStandby where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs b/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs --- a/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs +++ b/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.PutLifecycleHook --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -25,23 +25,25 @@ -- on an instance that is not actively in service; for example, either when -- the instance launches or before the instance terminates. -- --- This operation is a part of the basic sequence for adding a lifecycle --- hook to an Auto Scaling group: +-- This step is a part of the procedure for adding a lifecycle hook to an +-- Auto Scaling group: -- --- 1. Create a notification target. A target can be either an Amazon SQS --- queue or an Amazon SNS topic. --- 2. Create an IAM role. This role allows Auto Scaling to publish --- lifecycle notifications to the designated SQS queue or SNS topic. --- 3. __Create the lifecycle hook. You can create a hook that acts when --- instances launch or when instances terminate.__ --- 4. If necessary, record the lifecycle action heartbeat to keep the --- instance in a pending state. --- 5. Complete the lifecycle action. +-- 1. (Optional) Create a Lambda function and a rule that allows +-- CloudWatch Events to invoke your Lambda function when Auto Scaling +-- launches or terminates instances. +-- 2. (Optional) Create a notification target and an IAM role. The target +-- can be either an Amazon SQS queue or an Amazon SNS topic. The role +-- allows Auto Scaling to publish lifecycle notifications to the +-- target. +-- 3. __Create the lifecycle hook. Specify whether the hook is used when +-- the instances launch or terminate.__ +-- 4. If you need more time, record the lifecycle action heartbeat to keep +-- the instance in a pending state. +-- 5. If you finish before the timeout period ends, complete the lifecycle +-- action. -- -- For more information, see --- --- and --- +-- -- in the /Auto Scaling Developer Guide/. -- -- If you exceed your maximum limit of lifecycle hooks, which by default is @@ -49,8 +51,6 @@ -- limit, see -- -- in the /Amazon Web Services General Reference/. --- --- /See:/ for PutLifecycleHook. module Network.AWS.AutoScaling.PutLifecycleHook ( -- * Creating a Request @@ -128,17 +128,16 @@ } -- | Defines the action the Auto Scaling group should take when the lifecycle --- hook timeout elapses or if an unexpected failure occurs. The value for --- this parameter can be either 'CONTINUE' or 'ABANDON'. The default value --- for this parameter is 'ABANDON'. +-- hook timeout elapses or if an unexpected failure occurs. This parameter +-- can be either 'CONTINUE' or 'ABANDON'. The default value is 'ABANDON'. plhDefaultResult :: Lens' PutLifecycleHook (Maybe Text) plhDefaultResult = lens _plhDefaultResult (\ s a -> s{_plhDefaultResult = a}); -- | The amount of time, in seconds, that can elapse before the lifecycle -- hook times out. When the lifecycle hook times out, Auto Scaling performs --- the action defined in the 'DefaultResult' parameter. You can prevent the --- lifecycle hook from timing out by calling --- RecordLifecycleActionHeartbeat. The default is 3600 seconds (1 hour). +-- the default action. You can prevent the lifecycle hook from timing out +-- by calling < RecordLifecycleActionHeartbeat>. The default is 3600 +-- seconds (1 hour). plhHeartbeatTimeout :: Lens' PutLifecycleHook (Maybe Int) plhHeartbeatTimeout = lens _plhHeartbeatTimeout (\ s a -> s{_plhHeartbeatTimeout = a}); @@ -149,33 +148,32 @@ -- | The ARN of the notification target that Auto Scaling will use to notify -- you when an instance is in the transition state for the lifecycle hook. --- This ARN target can be either an SQS queue or an SNS topic. --- --- This parameter is required for new lifecycle hooks, but optional when --- updating existing hooks. +-- This target can be either an SQS queue or an SNS topic. If you specify +-- an empty string, this overrides the current ARN. -- --- The notification message sent to the target will include: +-- The notification messages sent to the target include the following +-- information: -- --- - __LifecycleActionToken__. The Lifecycle action token. --- - __AccountId__. The user account ID. -- - __AutoScalingGroupName__. The name of the Auto Scaling group. --- - __LifecycleHookName__. The lifecycle hook name. +-- - __AccountId__. The AWS account ID. +-- - __LifecycleTransition__. The lifecycle hook type. +-- - __LifecycleActionToken__. The lifecycle action token. -- - __EC2InstanceId__. The EC2 instance ID. --- - __LifecycleTransition__. The lifecycle transition. --- - __NotificationMetadata__. The notification metadata. +-- - __LifecycleHookName__. The name of the lifecycle hook. +-- - __NotificationMetadata__. User-defined information. -- -- This operation uses the JSON format when sending notifications to an -- Amazon SQS queue, and an email key\/value pair format when sending -- notifications to an Amazon SNS topic. -- --- When you call this operation, a test message is sent to the notification --- target. This test message contains an additional key\/value pair: --- 'Event:autoscaling:TEST_NOTIFICATION'. +-- When you specify a notification target, Auto Scaling sends it a test +-- message. Test messages contains the following additional key\/value +-- pair: '\"Event\": \"autoscaling:TEST_NOTIFICATION\"'. plhNotificationTargetARN :: Lens' PutLifecycleHook (Maybe Text) plhNotificationTargetARN = lens _plhNotificationTargetARN (\ s a -> s{_plhNotificationTargetARN = a}); -- | The instance state to which you want to attach the lifecycle hook. For a --- list of lifecycle hook types, see DescribeLifecycleHookTypes. +-- list of lifecycle hook types, see < DescribeLifecycleHookTypes>. -- -- This parameter is required for new lifecycle hooks, but optional when -- updating existing hooks. @@ -206,6 +204,8 @@ = receiveXMLWrapper "PutLifecycleHookResult" (\ s h x -> PutLifecycleHookResponse' <$> (pure (fromEnum s))) + +instance Hashable PutLifecycleHook instance ToHeaders PutLifecycleHook where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs b/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs --- a/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs +++ b/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.PutNotificationConfiguration --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -27,8 +27,6 @@ -- in the /Auto Scaling Developer Guide/. -- -- This configuration overwrites an existing configuration. --- --- /See:/ for PutNotificationConfiguration. module Network.AWS.AutoScaling.PutNotificationConfiguration ( -- * Creating a Request @@ -89,7 +87,7 @@ -- | The type of event that will cause the notification to be sent. For -- details about notification types supported by Auto Scaling, see --- DescribeAutoScalingNotificationTypes. +-- < DescribeAutoScalingNotificationTypes>. pncNotificationTypes :: Lens' PutNotificationConfiguration [Text] pncNotificationTypes = lens _pncNotificationTypes (\ s a -> s{_pncNotificationTypes = a}) . _Coerce; @@ -100,6 +98,8 @@ request = postQuery autoScaling response = receiveNull PutNotificationConfigurationResponse' + +instance Hashable PutNotificationConfiguration instance ToHeaders PutNotificationConfiguration where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs b/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs --- a/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs +++ b/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.PutScalingPolicy --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -28,8 +28,6 @@ -- limit, see -- -- in the /Amazon Web Services General Reference/. --- --- /See:/ for PutScalingPolicy. module Network.AWS.AutoScaling.PutScalingPolicy ( -- * Creating a Request @@ -166,7 +164,7 @@ -- 'SimpleScaling'. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. pspCooldown :: Lens' PutScalingPolicy (Maybe Int) pspCooldown = lens _pspCooldown (\ s a -> s{_pspCooldown = a}); @@ -211,6 +209,8 @@ (\ s h x -> PutScalingPolicyResponse' <$> (x .@? "PolicyARN") <*> (pure (fromEnum s))) + +instance Hashable PutScalingPolicy instance ToHeaders PutScalingPolicy where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs b/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs --- a/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs +++ b/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.PutScheduledUpdateGroupAction --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -26,8 +26,6 @@ -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for PutScheduledUpdateGroupAction. module Network.AWS.AutoScaling.PutScheduledUpdateGroupAction ( -- * Creating a Request @@ -118,10 +116,7 @@ psugaStartTime :: Lens' PutScheduledUpdateGroupAction (Maybe UTCTime) psugaStartTime = lens _psugaStartTime (\ s a -> s{_psugaStartTime = a}) . mapping _Time; --- | This parameter is deprecated; use 'StartTime' instead. --- --- The time for this action to start. If both 'Time' and 'StartTime' are --- specified, their values must be identical. +-- | This parameter is deprecated. psugaTime :: Lens' PutScheduledUpdateGroupAction (Maybe UTCTime) psugaTime = lens _psugaTime (\ s a -> s{_psugaTime = a}) . mapping _Time; @@ -165,6 +160,8 @@ request = postQuery autoScaling response = receiveNull PutScheduledUpdateGroupActionResponse' + +instance Hashable PutScheduledUpdateGroupAction instance ToHeaders PutScheduledUpdateGroupAction where diff --git a/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs b/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs --- a/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs +++ b/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs @@ -12,45 +12,46 @@ -- | -- Module : Network.AWS.AutoScaling.RecordLifecycleActionHeartbeat --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Records a heartbeat for the lifecycle action associated with a specific --- token. This extends the timeout by the length of time defined by the --- 'HeartbeatTimeout' parameter of PutLifecycleHook. +-- Records a heartbeat for the lifecycle action associated with the +-- specified token or instance. This extends the timeout by the length of +-- time defined using < PutLifecycleHook>. -- --- This operation is a part of the basic sequence for adding a lifecycle --- hook to an Auto Scaling group: +-- This step is a part of the procedure for adding a lifecycle hook to an +-- Auto Scaling group: -- --- 1. Create a notification target. A target can be either an Amazon SQS --- queue or an Amazon SNS topic. --- 2. Create an IAM role. This role allows Auto Scaling to publish --- lifecycle notifications to the designated SQS queue or SNS topic. --- 3. Create the lifecycle hook. You can create a hook that acts when --- instances launch or when instances terminate. --- 4. __If necessary, record the lifecycle action heartbeat to keep the --- instance in a pending state.__ --- 5. Complete the lifecycle action. +-- 1. (Optional) Create a Lambda function and a rule that allows +-- CloudWatch Events to invoke your Lambda function when Auto Scaling +-- launches or terminates instances. +-- 2. (Optional) Create a notification target and an IAM role. The target +-- can be either an Amazon SQS queue or an Amazon SNS topic. The role +-- allows Auto Scaling to publish lifecycle notifications to the +-- target. +-- 3. Create the lifecycle hook. Specify whether the hook is used when the +-- instances launch or terminate. +-- 4. __If you need more time, record the lifecycle action heartbeat to +-- keep the instance in a pending state.__ +-- 5. If you finish before the timeout period ends, complete the lifecycle +-- action. -- -- For more information, see --- --- and --- +-- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for RecordLifecycleActionHeartbeat. module Network.AWS.AutoScaling.RecordLifecycleActionHeartbeat ( -- * Creating a Request recordLifecycleActionHeartbeat , RecordLifecycleActionHeartbeat -- * Request Lenses + , rlahInstanceId + , rlahLifecycleActionToken , rlahLifecycleHookName , rlahAutoScalingGroupName - , rlahLifecycleActionToken -- * Destructuring the Response , recordLifecycleActionHeartbeatResponse @@ -68,32 +69,45 @@ -- | /See:/ 'recordLifecycleActionHeartbeat' smart constructor. data RecordLifecycleActionHeartbeat = RecordLifecycleActionHeartbeat' - { _rlahLifecycleHookName :: !Text + { _rlahInstanceId :: !(Maybe Text) + , _rlahLifecycleActionToken :: !(Maybe Text) + , _rlahLifecycleHookName :: !Text , _rlahAutoScalingGroupName :: !Text - , _rlahLifecycleActionToken :: !Text } deriving (Eq,Read,Show,Data,Typeable,Generic) -- | Creates a value of 'RecordLifecycleActionHeartbeat' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- +-- * 'rlahInstanceId' +-- +-- * 'rlahLifecycleActionToken' +-- -- * 'rlahLifecycleHookName' -- -- * 'rlahAutoScalingGroupName' --- --- * 'rlahLifecycleActionToken' recordLifecycleActionHeartbeat :: Text -- ^ 'rlahLifecycleHookName' -> Text -- ^ 'rlahAutoScalingGroupName' - -> Text -- ^ 'rlahLifecycleActionToken' -> RecordLifecycleActionHeartbeat -recordLifecycleActionHeartbeat pLifecycleHookName_ pAutoScalingGroupName_ pLifecycleActionToken_ = +recordLifecycleActionHeartbeat pLifecycleHookName_ pAutoScalingGroupName_ = RecordLifecycleActionHeartbeat' - { _rlahLifecycleHookName = pLifecycleHookName_ + { _rlahInstanceId = Nothing + , _rlahLifecycleActionToken = Nothing + , _rlahLifecycleHookName = pLifecycleHookName_ , _rlahAutoScalingGroupName = pAutoScalingGroupName_ - , _rlahLifecycleActionToken = pLifecycleActionToken_ } +-- | The ID of the instance. +rlahInstanceId :: Lens' RecordLifecycleActionHeartbeat (Maybe Text) +rlahInstanceId = lens _rlahInstanceId (\ s a -> s{_rlahInstanceId = a}); + +-- | A token that uniquely identifies a specific lifecycle action associated +-- with an instance. Auto Scaling sends this token to the notification +-- target you specified when you created the lifecycle hook. +rlahLifecycleActionToken :: Lens' RecordLifecycleActionHeartbeat (Maybe Text) +rlahLifecycleActionToken = lens _rlahLifecycleActionToken (\ s a -> s{_rlahLifecycleActionToken = a}); + -- | The name of the lifecycle hook. rlahLifecycleHookName :: Lens' RecordLifecycleActionHeartbeat Text rlahLifecycleHookName = lens _rlahLifecycleHookName (\ s a -> s{_rlahLifecycleHookName = a}); @@ -102,12 +116,6 @@ rlahAutoScalingGroupName :: Lens' RecordLifecycleActionHeartbeat Text rlahAutoScalingGroupName = lens _rlahAutoScalingGroupName (\ s a -> s{_rlahAutoScalingGroupName = a}); --- | A token that uniquely identifies a specific lifecycle action associated --- with an instance. Auto Scaling sends this token to the notification --- target you specified when you created the lifecycle hook. -rlahLifecycleActionToken :: Lens' RecordLifecycleActionHeartbeat Text -rlahLifecycleActionToken = lens _rlahLifecycleActionToken (\ s a -> s{_rlahLifecycleActionToken = a}); - instance AWSRequest RecordLifecycleActionHeartbeat where type Rs RecordLifecycleActionHeartbeat = @@ -120,6 +128,8 @@ RecordLifecycleActionHeartbeatResponse' <$> (pure (fromEnum s))) +instance Hashable RecordLifecycleActionHeartbeat + instance ToHeaders RecordLifecycleActionHeartbeat where toHeaders = const mempty @@ -133,9 +143,10 @@ ["Action" =: ("RecordLifecycleActionHeartbeat" :: ByteString), "Version" =: ("2011-01-01" :: ByteString), + "InstanceId" =: _rlahInstanceId, + "LifecycleActionToken" =: _rlahLifecycleActionToken, "LifecycleHookName" =: _rlahLifecycleHookName, - "AutoScalingGroupName" =: _rlahAutoScalingGroupName, - "LifecycleActionToken" =: _rlahLifecycleActionToken] + "AutoScalingGroupName" =: _rlahAutoScalingGroupName] -- | /See:/ 'recordLifecycleActionHeartbeatResponse' smart constructor. newtype RecordLifecycleActionHeartbeatResponse = RecordLifecycleActionHeartbeatResponse' diff --git a/gen/Network/AWS/AutoScaling/ResumeProcesses.hs b/gen/Network/AWS/AutoScaling/ResumeProcesses.hs --- a/gen/Network/AWS/AutoScaling/ResumeProcesses.hs +++ b/gen/Network/AWS/AutoScaling/ResumeProcesses.hs @@ -12,20 +12,18 @@ -- | -- Module : Network.AWS.AutoScaling.ResumeProcesses --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Resumes the specified suspended Auto Scaling processes for the specified --- Auto Scaling group. To resume specific processes, use the --- 'ScalingProcesses' parameter. To resume all processes, omit the --- 'ScalingProcesses' parameter. For more information, see --- --- in the /Auto Scaling Developer Guide/. +-- Resumes the specified suspended Auto Scaling processes, or all suspended +-- process, for the specified Auto Scaling group. -- --- /See:/ for ResumeProcesses. +-- For more information, see +-- +-- in the /Auto Scaling Developer Guide/. module Network.AWS.AutoScaling.ResumeProcesses ( -- * Creating a Request @@ -98,6 +96,8 @@ type Rs ResumeProcesses = ResumeProcessesResponse request = postQuery autoScaling response = receiveNull ResumeProcessesResponse' + +instance Hashable ResumeProcesses instance ToHeaders ResumeProcesses where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs b/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs --- a/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs +++ b/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.SetDesiredCapacity --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- For more information about desired capacity, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for SetDesiredCapacity. module Network.AWS.AutoScaling.SetDesiredCapacity ( -- * Creating a Request @@ -96,6 +94,8 @@ SetDesiredCapacityResponse request = postQuery autoScaling response = receiveNull SetDesiredCapacityResponse' + +instance Hashable SetDesiredCapacity instance ToHeaders SetDesiredCapacity where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs b/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs --- a/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs +++ b/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.SetInstanceHealth --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for SetInstanceHealth. module Network.AWS.AutoScaling.SetInstanceHealth ( -- * Creating a Request @@ -79,12 +77,12 @@ -- will respect the grace period. Set this to 'False', if you do not want -- the call to respect the grace period associated with the group. -- --- For more information, see the 'HealthCheckGracePeriod' parameter --- description for CreateAutoScalingGroup. +-- For more information, see the description of the health check grace +-- period for < CreateAutoScalingGroup>. sihShouldRespectGracePeriod :: Lens' SetInstanceHealth (Maybe Bool) sihShouldRespectGracePeriod = lens _sihShouldRespectGracePeriod (\ s a -> s{_sihShouldRespectGracePeriod = a}); --- | The ID of the EC2 instance. +-- | The ID of the instance. sihInstanceId :: Lens' SetInstanceHealth Text sihInstanceId = lens _sihInstanceId (\ s a -> s{_sihInstanceId = a}); @@ -99,6 +97,8 @@ type Rs SetInstanceHealth = SetInstanceHealthResponse request = postQuery autoScaling response = receiveNull SetInstanceHealthResponse' + +instance Hashable SetInstanceHealth instance ToHeaders SetInstanceHealth where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs b/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs --- a/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs +++ b/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.SetInstanceProtection --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- For more information, see -- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for SetInstanceProtection. module Network.AWS.AutoScaling.SetInstanceProtection ( -- * Creating a Request @@ -98,6 +96,8 @@ (\ s h x -> SetInstanceProtectionResponse' <$> (pure (fromEnum s))) + +instance Hashable SetInstanceProtection instance ToHeaders SetInstanceProtection where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/SuspendProcesses.hs b/gen/Network/AWS/AutoScaling/SuspendProcesses.hs --- a/gen/Network/AWS/AutoScaling/SuspendProcesses.hs +++ b/gen/Network/AWS/AutoScaling/SuspendProcesses.hs @@ -12,27 +12,23 @@ -- | -- Module : Network.AWS.AutoScaling.SuspendProcesses --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Suspends the specified Auto Scaling processes for the specified Auto --- Scaling group. To suspend specific processes, use the 'ScalingProcesses' --- parameter. To suspend all processes, omit the 'ScalingProcesses' --- parameter. +-- Suspends the specified Auto Scaling processes, or all processes, for the +-- specified Auto Scaling group. -- -- Note that if you suspend either the 'Launch' or 'Terminate' process -- types, it can prevent other process types from functioning properly. -- --- To resume processes that have been suspended, use ResumeProcesses. +-- To resume processes that have been suspended, use < ResumeProcesses>. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. --- --- /See:/ for SuspendProcesses. module Network.AWS.AutoScaling.SuspendProcesses ( -- * Creating a Request @@ -105,6 +101,8 @@ type Rs SuspendProcesses = SuspendProcessesResponse request = postQuery autoScaling response = receiveNull SuspendProcessesResponse' + +instance Hashable SuspendProcesses instance ToHeaders SuspendProcesses where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs --- a/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs +++ b/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.TerminateInstanceInAutoScalingGroup --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -23,8 +23,6 @@ -- -- This call simply makes a termination request. The instance is not -- terminated immediately. --- --- /See:/ for TerminateInstanceInAutoScalingGroup. module Network.AWS.AutoScaling.TerminateInstanceInAutoScalingGroup ( -- * Creating a Request @@ -72,7 +70,7 @@ , _tiiasgShouldDecrementDesiredCapacity = pShouldDecrementDesiredCapacity_ } --- | The ID of the EC2 instance. +-- | The ID of the instance. tiiasgInstanceId :: Lens' TerminateInstanceInAutoScalingGroup Text tiiasgInstanceId = lens _tiiasgInstanceId (\ s a -> s{_tiiasgInstanceId = a}); @@ -92,6 +90,8 @@ (\ s h x -> TerminateInstanceInAutoScalingGroupResponse' <$> (x .@? "Activity") <*> (pure (fromEnum s))) + +instance Hashable TerminateInstanceInAutoScalingGroup instance ToHeaders TerminateInstanceInAutoScalingGroup where diff --git a/gen/Network/AWS/AutoScaling/Types.hs b/gen/Network/AWS/AutoScaling/Types.hs --- a/gen/Network/AWS/AutoScaling/Types.hs +++ b/gen/Network/AWS/AutoScaling/Types.hs @@ -4,7 +4,7 @@ -- | -- Module : Network.AWS.AutoScaling.Types --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -297,6 +297,7 @@ , _retryCheck = check } check e + | has (hasStatus 429) e = Just "too_many_requests" | has (hasCode "ThrottlingException" . hasStatus 400) e = Just "throttling_exception" | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling" @@ -312,7 +313,7 @@ -- | You have already reached a limit for your Auto Scaling resources (for -- example, groups, launch configurations, or lifecycle hooks). For more --- information, see DescribeAccountLimits. +-- information, see < DescribeAccountLimits>. _LimitExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _LimitExceededFault = _ServiceError . hasStatus 400 . hasCode "LimitExceeded" diff --git a/gen/Network/AWS/AutoScaling/Types/Product.hs b/gen/Network/AWS/AutoScaling/Types/Product.hs --- a/gen/Network/AWS/AutoScaling/Types/Product.hs +++ b/gen/Network/AWS/AutoScaling/Types/Product.hs @@ -9,7 +9,7 @@ -- | -- Module : Network.AWS.AutoScaling.Types.Product --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -136,6 +136,8 @@ <*> (x .@ "StartTime") <*> (x .@ "StatusCode") +instance Hashable Activity + -- | Describes a policy adjustment type. -- -- For more information, see @@ -168,6 +170,8 @@ parseXML x = AdjustmentType' <$> (x .@? "AdjustmentType") +instance Hashable AdjustmentType + -- | Describes an alarm. -- -- /See:/ 'alarm' smart constructor. @@ -204,6 +208,8 @@ = Alarm' <$> (x .@? "AlarmName") <*> (x .@? "AlarmARN") +instance Hashable Alarm + -- | Describes an Auto Scaling group. -- -- /See:/ 'autoScalingGroup' smart constructor. @@ -311,7 +317,7 @@ , _asgCreatedTime = _Time # pCreatedTime_ } --- | The current state of the group when DeleteAutoScalingGroup is in +-- | The current state of the group when < DeleteAutoScalingGroup> is in -- progress. asgStatus :: Lens' AutoScalingGroup (Maybe Text) asgStatus = lens _asgStatus (\ s a -> s{_asgStatus = a}); @@ -445,6 +451,8 @@ <*> (x .@ "HealthCheckType") <*> (x .@ "CreatedTime") +instance Hashable AutoScalingGroup + -- | Describes an EC2 instance associated with an Auto Scaling group. -- -- /See:/ 'autoScalingInstanceDetails' smart constructor. @@ -508,7 +516,7 @@ asidAvailabilityZone = lens _asidAvailabilityZone (\ s a -> s{_asidAvailabilityZone = a}); -- | The lifecycle state for the instance. For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. asidLifecycleState :: Lens' AutoScalingInstanceDetails Text asidLifecycleState = lens _asidLifecycleState (\ s a -> s{_asidLifecycleState = a}); @@ -538,6 +546,8 @@ <*> (x .@ "LaunchConfigurationName") <*> (x .@ "ProtectedFromScaleIn") +instance Hashable AutoScalingInstanceDetails + -- | Describes a block device mapping. -- -- /See:/ 'blockDeviceMapping' smart constructor. @@ -598,6 +608,8 @@ (x .@? "Ebs") <*> (x .@ "DeviceName") +instance Hashable BlockDeviceMapping + instance ToQuery BlockDeviceMapping where toQuery BlockDeviceMapping'{..} = mconcat @@ -644,29 +656,26 @@ , _ebsSnapshotId = Nothing } --- | Indicates whether to delete the volume on instance termination. +-- | Indicates whether the volume is deleted on instance termination. -- -- Default: 'true' ebsDeleteOnTermination :: Lens' EBS (Maybe Bool) ebsDeleteOnTermination = lens _ebsDeleteOnTermination (\ s a -> s{_ebsDeleteOnTermination = a}); --- | The volume size, in gigabytes. --- --- Valid values: If the volume type is 'io1', the minimum size of the --- volume is 10 GiB. If you specify 'SnapshotId' and 'VolumeSize', --- 'VolumeSize' must be equal to or larger than the size of the snapshot. +-- | The volume size, in GiB. For 'standard' volumes, specify a value from 1 +-- to 1,024. For 'io1' volumes, specify a value from 4 to 16,384. For 'gp2' +-- volumes, specify a value from 1 to 16,384. If you specify a snapshot, +-- the volume size must be equal to or larger than the snapshot size. -- -- Default: If you create a volume from a snapshot and you don\'t specify a --- volume size, the default is the size of the snapshot. --- --- Required: Required when the volume type is 'io1'. +-- volume size, the default is the snapshot size. ebsVolumeSize :: Lens' EBS (Maybe Natural) ebsVolumeSize = lens _ebsVolumeSize (\ s a -> s{_ebsVolumeSize = a}) . mapping _Nat; --- | For Provisioned IOPS (SSD) volumes only. The number of I\/O operations --- per second (IOPS) to provision for the volume. +-- | The number of I\/O operations per second (IOPS) to provision for the +-- volume. -- --- Default: None +-- Constraint: Required when the volume type is 'io1'. ebsIOPS :: Lens' EBS (Maybe Natural) ebsIOPS = lens _ebsIOPS (\ s a -> s{_ebsIOPS = a}) . mapping _Nat; @@ -681,9 +690,11 @@ ebsEncrypted :: Lens' EBS (Maybe Bool) ebsEncrypted = lens _ebsEncrypted (\ s a -> s{_ebsEncrypted = a}); --- | The volume type. +-- | The volume type. For more information, see +-- +-- in the /Amazon Elastic Compute Cloud User Guide/. -- --- Valid values: 'standard | io1 | gp2' +-- Valid values: 'standard' | 'io1' | 'gp2' -- -- Default: 'standard' ebsVolumeType :: Lens' EBS (Maybe Text) @@ -703,6 +714,8 @@ <*> (x .@? "VolumeType") <*> (x .@? "SnapshotId") +instance Hashable EBS + instance ToQuery EBS where toQuery EBS'{..} = mconcat @@ -765,6 +778,8 @@ = EnabledMetric' <$> (x .@? "Granularity") <*> (x .@? "Metric") +instance Hashable EnabledMetric + -- | Describes a filter. -- -- /See:/ 'filter'' smart constructor. @@ -798,6 +813,8 @@ fName :: Lens' Filter Text fName = lens _fName (\ s a -> s{_fName = a}); +instance Hashable Filter + instance ToQuery Filter where toQuery Filter'{..} = mconcat @@ -866,7 +883,9 @@ iLifecycleState :: Lens' Instance LifecycleState iLifecycleState = lens _iLifecycleState (\ s a -> s{_iLifecycleState = a}); --- | The health status of the instance. +-- | The health status of the instance. \"Healthy\" means that the instance +-- is healthy and should remain in service. \"Unhealthy\" means that the +-- instance is unhealthy and Auto Scaling should terminate and replace it. iHealthStatus :: Lens' Instance Text iHealthStatus = lens _iHealthStatus (\ s a -> s{_iHealthStatus = a}); @@ -885,6 +904,8 @@ <*> (x .@ "HealthStatus") <*> (x .@ "ProtectedFromScaleIn") +instance Hashable Instance + -- | Describes whether instance monitoring is enabled. -- -- /See:/ 'instanceMonitoring' smart constructor. @@ -912,6 +933,8 @@ parseXML x = InstanceMonitoring' <$> (x .@? "Enabled") +instance Hashable InstanceMonitoring + instance ToQuery InstanceMonitoring where toQuery InstanceMonitoring'{..} = mconcat ["Enabled" =: _imEnabled] @@ -1034,8 +1057,9 @@ lcKeyName = lens _lcKeyName (\ s a -> s{_lcKeyName = 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 +-- 'ClassicLinkVPCId'. This parameter is required if you specify a +-- ClassicLink-enabled VPC, and cannot be used otherwise. For more +-- information, see -- -- in the /Amazon Elastic Compute Cloud User Guide/. lcClassicLinkVPCSecurityGroups :: Lens' LaunchConfiguration [Text] @@ -1130,6 +1154,8 @@ <*> (x .@ "InstanceType") <*> (x .@ "CreatedTime") +instance Hashable LaunchConfiguration + -- | Describes a lifecycle hook, which tells Auto Scaling that you want to -- perform an action when an instance launches or terminates. When you have -- a lifecycle hook in place, the Auto Scaling group will either: @@ -1140,9 +1166,7 @@ -- terminated -- -- For more information, see --- --- and --- +-- -- in the /Auto Scaling Developer Guide/. -- -- /See:/ 'lifecycleHook' smart constructor. @@ -1206,9 +1230,9 @@ -- | The maximum time, in seconds, that can elapse before the lifecycle hook -- times out. The default is 3600 seconds (1 hour). When the lifecycle hook --- times out, Auto Scaling performs the action defined in the --- 'DefaultResult' parameter. You can prevent the lifecycle hook from --- timing out by calling RecordLifecycleActionHeartbeat. +-- times out, Auto Scaling performs the default action. You can prevent the +-- lifecycle hook from timing out by calling +-- < RecordLifecycleActionHeartbeat>. lhHeartbeatTimeout :: Lens' LifecycleHook (Maybe Int) lhHeartbeatTimeout = lens _lhHeartbeatTimeout (\ s a -> s{_lhHeartbeatTimeout = a}); @@ -1244,7 +1268,7 @@ -- | The state of the EC2 instance to which you want to attach the lifecycle -- hook. For a list of lifecycle hook types, see --- DescribeLifecycleHookTypes. +-- < DescribeLifecycleHookTypes>. lhLifecycleTransition :: Lens' LifecycleHook (Maybe Text) lhLifecycleTransition = lens _lhLifecycleTransition (\ s a -> s{_lhLifecycleTransition = a}); @@ -1266,6 +1290,8 @@ <*> (x .@? "LifecycleTransition") <*> (x .@? "RoleARN") +instance Hashable LifecycleHook + -- | Describes the state of a load balancer. -- -- /See:/ 'loadBalancerState' smart constructor. @@ -1317,6 +1343,8 @@ = LoadBalancerState' <$> (x .@? "State") <*> (x .@? "LoadBalancerName") +instance Hashable LoadBalancerState + -- | Describes a metric. -- -- /See:/ 'metricCollectionType' smart constructor. @@ -1361,6 +1389,8 @@ parseXML x = MetricCollectionType' <$> (x .@? "Metric") +instance Hashable MetricCollectionType + -- | Describes a granularity of a metric. -- -- /See:/ 'metricGranularityType' smart constructor. @@ -1388,6 +1418,8 @@ parseXML x = MetricGranularityType' <$> (x .@? "Granularity") +instance Hashable MetricGranularityType + -- | Describes a notification. -- -- /See:/ 'notificationConfiguration' smart constructor. @@ -1445,6 +1477,8 @@ (x .@? "TopicARN") <*> (x .@? "AutoScalingGroupName") <*> (x .@? "NotificationType") +instance Hashable NotificationConfiguration + -- | Describes a process type. -- -- For more information, see @@ -1493,6 +1527,8 @@ instance FromXML ProcessType where parseXML x = ProcessType' <$> (x .@ "ProcessName") +instance Hashable ProcessType + -- | Describes a scaling policy. -- -- /See:/ 'scalingPolicy' smart constructor. @@ -1645,6 +1681,8 @@ <*> (x .@? "MetricAggregationType") <*> (x .@? "MinAdjustmentMagnitude") +instance Hashable ScalingPolicy + -- | /See:/ 'scalingProcessQuery' smart constructor. data ScalingProcessQuery = ScalingProcessQuery' { _spqScalingProcesses :: !(Maybe [Text]) @@ -1692,6 +1730,8 @@ spqAutoScalingGroupName :: Lens' ScalingProcessQuery Text spqAutoScalingGroupName = lens _spqAutoScalingGroupName (\ s a -> s{_spqAutoScalingGroupName = a}); +instance Hashable ScalingProcessQuery + instance ToQuery ScalingProcessQuery where toQuery ScalingProcessQuery'{..} = mconcat @@ -1767,7 +1807,7 @@ sugaStartTime :: Lens' ScheduledUpdateGroupAction (Maybe UTCTime) sugaStartTime = lens _sugaStartTime (\ s a -> s{_sugaStartTime = a}) . mapping _Time; --- | This parameter is deprecated; use 'StartTime' instead. +-- | This parameter is deprecated. sugaTime :: Lens' ScheduledUpdateGroupAction (Maybe UTCTime) sugaTime = lens _sugaTime (\ s a -> s{_sugaTime = a}) . mapping _Time; @@ -1813,6 +1853,8 @@ <*> (x .@? "AutoScalingGroupName") <*> (x .@? "EndTime") +instance Hashable ScheduledUpdateGroupAction + -- | Describes an adjustment based on the difference between the value of the -- aggregated CloudWatch metric and the breach threshold that you\'ve -- defined for the alarm. @@ -1903,6 +1945,8 @@ (x .@? "MetricIntervalUpperBound") <*> (x .@ "ScalingAdjustment") +instance Hashable StepAdjustment + instance ToQuery StepAdjustment where toQuery StepAdjustment'{..} = mconcat @@ -1913,7 +1957,7 @@ "ScalingAdjustment" =: _saScalingAdjustment] -- | Describes an Auto Scaling process that has been suspended. For more --- information, see ProcessType. +-- information, see < ProcessType>. -- -- /See:/ 'suspendedProcess' smart constructor. data SuspendedProcess = SuspendedProcess' @@ -1949,6 +1993,8 @@ = SuspendedProcess' <$> (x .@? "ProcessName") <*> (x .@? "SuspensionReason") +instance Hashable SuspendedProcess + -- | Describes a tag for an Auto Scaling group. -- -- /See:/ 'tag' smart constructor. @@ -2010,6 +2056,8 @@ tagValue :: Lens' Tag Text tagValue = lens _tagValue (\ s a -> s{_tagValue = a}); +instance Hashable Tag + instance ToQuery Tag where toQuery Tag'{..} = mconcat @@ -2086,3 +2134,5 @@ (x .@ "Key") <*> (x .@ "PropagateAtLaunch") <*> (x .@ "Value") + +instance Hashable TagDescription diff --git a/gen/Network/AWS/AutoScaling/Types/Sum.hs b/gen/Network/AWS/AutoScaling/Types/Sum.hs --- a/gen/Network/AWS/AutoScaling/Types/Sum.hs +++ b/gen/Network/AWS/AutoScaling/Types/Sum.hs @@ -9,7 +9,7 @@ -- | -- Module : Network.AWS.AutoScaling.Types.Sum --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated diff --git a/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs --- a/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs +++ b/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs @@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.AutoScaling.UpdateAutoScalingGroup --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated @@ -24,7 +24,7 @@ -- 'InstanceMonitoring' set to 'False', you must first disable the -- collection of group metrics. Otherwise, you will get an error. If you -- have previously enabled the collection of group metrics, you can disable --- it using DisableMetricsCollection. +-- it using < DisableMetricsCollection>. -- -- The new settings are registered upon the completion of this call. Any -- launch configuration settings take effect on any triggers after this @@ -35,18 +35,16 @@ -- -- - If you specify a new value for 'MinSize' without specifying a value -- for 'DesiredCapacity', and the new 'MinSize' is larger than the --- current size of the group, we implicitly call SetDesiredCapacity to --- set the size of the group to the new value of 'MinSize'. +-- current size of the group, we implicitly call < SetDesiredCapacity> +-- to set the size of the group to the new value of 'MinSize'. -- -- - If you specify a new value for 'MaxSize' without specifying a value -- for 'DesiredCapacity', and the new 'MaxSize' is smaller than the --- current size of the group, we implicitly call SetDesiredCapacity to --- set the size of the group to the new value of 'MaxSize'. +-- current size of the group, we implicitly call < SetDesiredCapacity> +-- to set the size of the group to the new value of 'MaxSize'. -- -- - All other optional parameters are left unchanged if not specified. -- --- --- /See:/ for UpdateAutoScalingGroup. module Network.AWS.AutoScaling.UpdateAutoScalingGroup ( -- * Creating a Request @@ -150,7 +148,7 @@ -- order that they are listed. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. uasgTerminationPolicies :: Lens' UpdateAutoScalingGroup [Text] uasgTerminationPolicies = lens _uasgTerminationPolicies (\ s a -> s{_uasgTerminationPolicies = a}) . _Default . _Coerce; @@ -160,7 +158,7 @@ -- default is 300. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. uasgHealthCheckGracePeriod :: Lens' UpdateAutoScalingGroup (Maybe Int) uasgHealthCheckGracePeriod = lens _uasgHealthCheckGracePeriod (\ s a -> s{_uasgHealthCheckGracePeriod = a}); @@ -178,7 +176,7 @@ -- 'AvailabilityZones'. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. uasgVPCZoneIdentifier :: Lens' UpdateAutoScalingGroup (Maybe Text) uasgVPCZoneIdentifier = lens _uasgVPCZoneIdentifier (\ s a -> s{_uasgVPCZoneIdentifier = a}); @@ -187,7 +185,7 @@ -- before another scaling activity can start. The default is 300. -- -- For more information, see --- +-- -- in the /Auto Scaling Developer Guide/. uasgDefaultCooldown :: Lens' UpdateAutoScalingGroup (Maybe Int) uasgDefaultCooldown = lens _uasgDefaultCooldown (\ s a -> s{_uasgDefaultCooldown = a}); @@ -236,6 +234,8 @@ request = postQuery autoScaling response = receiveNull UpdateAutoScalingGroupResponse' + +instance Hashable UpdateAutoScalingGroup instance ToHeaders UpdateAutoScalingGroup where toHeaders = const mempty diff --git a/gen/Network/AWS/AutoScaling/Waiters.hs b/gen/Network/AWS/AutoScaling/Waiters.hs --- a/gen/Network/AWS/AutoScaling/Waiters.hs +++ b/gen/Network/AWS/AutoScaling/Waiters.hs @@ -7,7 +7,7 @@ -- | -- Module : Network.AWS.AutoScaling.Waiters --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated diff --git a/test/Main.hs b/test/Main.hs --- a/test/Main.hs +++ b/test/Main.hs @@ -2,7 +2,7 @@ -- | -- Module : Main --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated diff --git a/test/Test/AWS/AutoScaling.hs b/test/Test/AWS/AutoScaling.hs --- a/test/Test/AWS/AutoScaling.hs +++ b/test/Test/AWS/AutoScaling.hs @@ -1,7 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} -- Module : Test.AWS.AutoScaling --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : This Source Code Form is subject to the terms of -- the Mozilla Public License, v. 2.0. -- A copy of the MPL can be found in the LICENSE file or diff --git a/test/Test/AWS/AutoScaling/Internal.hs b/test/Test/AWS/AutoScaling/Internal.hs --- a/test/Test/AWS/AutoScaling/Internal.hs +++ b/test/Test/AWS/AutoScaling/Internal.hs @@ -2,7 +2,7 @@ {-# OPTIONS_GHC -fno-warn-unused-imports #-} -- Module : Test.AWS.AutoScaling.Internal --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : This Source Code Form is subject to the terms of -- the Mozilla Public License, v. 2.0. -- A copy of the MPL can be found in the LICENSE file or diff --git a/test/Test/AWS/Gen/AutoScaling.hs b/test/Test/AWS/Gen/AutoScaling.hs --- a/test/Test/AWS/Gen/AutoScaling.hs +++ b/test/Test/AWS/Gen/AutoScaling.hs @@ -5,7 +5,7 @@ -- | -- Module : Test.AWS.Gen.AutoScaling --- Copyright : (c) 2013-2015 Brendan Hay +-- Copyright : (c) 2013-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated