amazonka-elb 1.4.4 → 1.4.5

raw patch · 35 files changed

+624/−419 lines, 35 filesdep ~amazonka-coredep ~amazonka-elbdep ~amazonka-testPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core, amazonka-elb, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +9/−16
• amazonka-elb.cabal +12/−22
• gen/Network/AWS/ELB.hs +9/−4
• gen/Network/AWS/ELB/AddTags.hs +12/−6
• gen/Network/AWS/ELB/ApplySecurityGroupsToLoadBalancer.hs +12/−6
• gen/Network/AWS/ELB/AttachLoadBalancerToSubnets.hs +12/−6
• gen/Network/AWS/ELB/ConfigureHealthCheck.hs +12/−6
• gen/Network/AWS/ELB/CreateAppCookieStickinessPolicy.hs +14/−8
• gen/Network/AWS/ELB/CreateLBCookieStickinessPolicy.hs +13/−7
• gen/Network/AWS/ELB/CreateLoadBalancer.hs +25/−33
• gen/Network/AWS/ELB/CreateLoadBalancerListeners.hs +11/−5
• gen/Network/AWS/ELB/CreateLoadBalancerPolicy.hs +13/−7
• gen/Network/AWS/ELB/DeleteLoadBalancer.hs +10/−4
• gen/Network/AWS/ELB/DeleteLoadBalancerListeners.hs +10/−4
• gen/Network/AWS/ELB/DeleteLoadBalancerPolicy.hs +10/−4
• gen/Network/AWS/ELB/DeregisterInstancesFromLoadBalancer.hs +13/−7
• gen/Network/AWS/ELB/DescribeInstanceHealth.hs +11/−5
• gen/Network/AWS/ELB/DescribeLoadBalancerAttributes.hs +10/−4
• gen/Network/AWS/ELB/DescribeLoadBalancerPolicies.hs +12/−6
• gen/Network/AWS/ELB/DescribeLoadBalancerPolicyTypes.hs +11/−5
• gen/Network/AWS/ELB/DescribeLoadBalancers.hs +13/−7
• gen/Network/AWS/ELB/DescribeTags.hs +10/−4
• gen/Network/AWS/ELB/DetachLoadBalancerFromSubnets.hs +12/−6
• gen/Network/AWS/ELB/DisableAvailabilityZonesForLoadBalancer.hs +13/−7
• gen/Network/AWS/ELB/EnableAvailabilityZonesForLoadBalancer.hs +12/−6
• gen/Network/AWS/ELB/ModifyLoadBalancerAttributes.hs +19/−12
• gen/Network/AWS/ELB/RegisterInstancesWithLoadBalancer.hs +15/−9
• gen/Network/AWS/ELB/RemoveTags.hs +10/−4
• gen/Network/AWS/ELB/SetLoadBalancerListenerSSLCertificate.hs +13/−7
• gen/Network/AWS/ELB/SetLoadBalancerPoliciesForBackendServer.hs +14/−8
• gen/Network/AWS/ELB/SetLoadBalancerPoliciesOfListener.hs +13/−7
• gen/Network/AWS/ELB/Types.hs +43/−1
• gen/Network/AWS/ELB/Types/Product.hs +155/−176
• gen/Network/AWS/ELB/Types/Sum.hs +1/−0
• src/Network/AWS/ELB/Internal.hs +40/−0

@@ -8,34 +8,27 @@  ## Version -`1.4.4`+`1.4.5`   ## Description -Elastic Load Balancing--A load balancer distributes incoming traffic across your EC2 instances. This enables you to increase the availability of your application. The load balancer also monitors the health of its registered instances and ensures that it routes traffic only to healthy instances. You configure your load balancer to accept incoming traffic by specifying one or more listeners, which are configured with a protocol and port number for connections from clients to the load balancer and a protocol and port number for connections from the load balancer to the instances.--Elastic Load Balancing supports two types of load balancers: Classic load balancers and Application load balancers (new). A Classic load balancer makes routing and load balancing decisions either at the transport layer (TCP\/SSL) or the application layer (HTTP\/HTTPS), and supports either EC2-Classic or a VPC. An Application load balancer makes routing and load balancing decisions at the application layer (HTTP\/HTTPS), supports path-based routing, and can route requests to one or more ports on each EC2 instance or container instance in your virtual private cloud (VPC). For more information, see the .--This reference covers the 2012-06-01 API, which supports Classic load balancers. The 2015-12-01 API supports Application load balancers.--To get started, create a load balancer with one or more listeners using < CreateLoadBalancer>. Register your instances with the load balancer using < RegisterInstancesWithLoadBalancer>.--All Elastic Load Balancing operations are /idempotent/, which means that they complete at most one time. If you repeat an operation, it succeeds with a 200 OK response code.- Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-elb) 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.+which provides mechanisms for specifying AuthN/AuthZ information, sending requests,+and receiving responses. -Use of lenses is required for constructing and manipulating types.-This is due to the amount of nesting of AWS types and transparency regarding+Lenses are used for constructing and manipulating types,+due to the depth of nesting of AWS types and transparency regarding de/serialisation into more palatable Haskell values. The provided lenses should be compatible with any of the major lens libraries [lens](http://hackage.haskell.org/package/lens) or [lens-family-core](http://hackage.haskell.org/package/lens-family-core).++See [Network.AWS.ELB](http://hackage.haskell.org/package/amazonka-elb/docs/Network-AWS-ELB.html)+or [the AWS documentation](https://aws.amazon.com/documentation/) to get started.+  ## Contribute 

@@ -1,5 +1,5 @@ name:                  amazonka-elb-version:               1.4.4+version:               1.4.5 synopsis:              Amazon Elastic Load Balancing SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -13,30 +13,19 @@ cabal-version:         >= 1.10 extra-source-files:    README.md fixture/*.yaml fixture/*.proto src/.gitkeep description:-    Elastic Load Balancing--    A load balancer distributes incoming traffic across your EC2 instances. This enables you to increase the availability of your application. The load balancer also monitors the health of its registered instances and ensures that it routes traffic only to healthy instances. You configure your load balancer to accept incoming traffic by specifying one or more listeners, which are configured with a protocol and port number for connections from clients to the load balancer and a protocol and port number for connections from the load balancer to the instances.--    Elastic Load Balancing supports two types of load balancers: Classic load balancers and Application load balancers (new). A Classic load balancer makes routing and load balancing decisions either at the transport layer (TCP\/SSL) or the application layer (HTTP\/HTTPS), and supports either EC2-Classic or a VPC. An Application load balancer makes routing and load balancing decisions at the application layer (HTTP\/HTTPS), supports path-based routing, and can route requests to one or more ports on each EC2 instance or container instance in your virtual private cloud (VPC). For more information, see the .--    This reference covers the 2012-06-01 API, which supports Classic load balancers. The 2015-12-01 API supports Application load balancers.--    To get started, create a load balancer with one or more listeners using < CreateLoadBalancer>. Register your instances with the load balancer using < RegisterInstancesWithLoadBalancer>.--    All Elastic Load Balancing operations are /idempotent/, which means that they complete at most one time. If you repeat an operation, it succeeds with a 200 OK response code.-    .     The types from this library are intended to be used with     <http://hackage.haskell.org/package/amazonka amazonka>, which provides-    mechanisms for specifying AuthN/AuthZ information and sending requests.+    mechanisms for specifying AuthN/AuthZ information, sending requests,+    and receiving responses.     .-    Use of lenses is required for constructing and manipulating types.-    This is due to the amount of nesting of AWS types and transparency regarding+    Lenses are used for constructing and manipulating types,+    due to the depth of nesting of AWS types and transparency regarding     de/serialisation into more palatable Haskell values.     The provided lenses should be compatible with any of the major lens libraries     such as <http://hackage.haskell.org/package/lens lens> or     <http://hackage.haskell.org/package/lens-family-core lens-family-core>.     .-    See "Network.AWS.ELB" or <https://aws.amazon.com/documentation/ the AWS Documentation>+    See "Network.AWS.ELB" or <https://aws.amazon.com/documentation/ the AWS documentation>     to get started.  source-repository head@@ -83,11 +72,12 @@         , Network.AWS.ELB.Waiters      other-modules:-          Network.AWS.ELB.Types.Product+          Network.AWS.ELB.Internal+        , Network.AWS.ELB.Types.Product         , Network.AWS.ELB.Types.Sum      build-depends:-          amazonka-core == 1.4.4.*+          amazonka-core == 1.4.5.*         , base          >= 4.7     && < 5  test-suite amazonka-elb-test@@ -107,9 +97,9 @@         , Test.AWS.ELB.Internal      build-depends:-          amazonka-core == 1.4.4.*-        , amazonka-test == 1.4.4.*-        , amazonka-elb == 1.4.4.*+          amazonka-core == 1.4.5.*+        , amazonka-test == 1.4.5.*+        , amazonka-elb == 1.4.5.*         , base         , bytestring         , tasty

@@ -11,17 +11,18 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Elastic Load Balancing+-- __Elastic Load Balancing__ -- -- A load balancer distributes incoming traffic across your EC2 instances. This enables you to increase the availability of your application. The load balancer also monitors the health of its registered instances and ensures that it routes traffic only to healthy instances. You configure your load balancer to accept incoming traffic by specifying one or more listeners, which are configured with a protocol and port number for connections from clients to the load balancer and a protocol and port number for connections from the load balancer to the instances. ----- Elastic Load Balancing supports two types of load balancers: Classic load balancers and Application load balancers (new). A Classic load balancer makes routing and load balancing decisions either at the transport layer (TCP\/SSL) or the application layer (HTTP\/HTTPS), and supports either EC2-Classic or a VPC. An Application load balancer makes routing and load balancing decisions at the application layer (HTTP\/HTTPS), supports path-based routing, and can route requests to one or more ports on each EC2 instance or container instance in your virtual private cloud (VPC). For more information, see the .+-- Elastic Load Balancing supports two types of load balancers: Classic load balancers and Application load balancers (new). A Classic load balancer makes routing and load balancing decisions either at the transport layer (TCP/SSL) or the application layer (HTTP/HTTPS), and supports either EC2-Classic or a VPC. An Application load balancer makes routing and load balancing decisions at the application layer (HTTP/HTTPS), supports path-based routing, and can route requests to one or more ports on each EC2 instance or container instance in your virtual private cloud (VPC). For more information, see the . -- -- This reference covers the 2012-06-01 API, which supports Classic load balancers. The 2015-12-01 API supports Application load balancers. ----- To get started, create a load balancer with one or more listeners using < CreateLoadBalancer>. Register your instances with the load balancer using < RegisterInstancesWithLoadBalancer>.+-- To get started, create a load balancer with one or more listeners using 'CreateLoadBalancer' . Register your instances with the load balancer using 'RegisterInstancesWithLoadBalancer' . ----- All Elastic Load Balancing operations are /idempotent/, which means that they complete at most one time. If you repeat an operation, it succeeds with a 200 OK response code.+-- All Elastic Load Balancing operations are /idempotent/ , which means that they complete at most one time. If you repeat an operation, it succeeds with a 200 OK response code.+-- module Network.AWS.ELB     (     -- * Service Configuration@@ -185,6 +186,9 @@      -- * Types +    -- ** Common+    , module Network.AWS.ELB.Internal+     -- ** AccessLog     , AccessLog     , accessLog@@ -387,6 +391,7 @@ import           Network.AWS.ELB.DetachLoadBalancerFromSubnets import           Network.AWS.ELB.DisableAvailabilityZonesForLoadBalancer import           Network.AWS.ELB.EnableAvailabilityZonesForLoadBalancer+import           Network.AWS.ELB.Internal import           Network.AWS.ELB.ModifyLoadBalancerAttributes import           Network.AWS.ELB.RegisterInstancesWithLoadBalancer import           Network.AWS.ELB.RemoveTags

@@ -20,9 +20,11 @@ -- -- Adds the specified tags to the specified load balancer. Each load balancer can have a maximum of 10 tags. ----- Each tag consists of a key and an optional value. If a tag with the same key is already associated with the load balancer, 'AddTags' updates its value. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/add-remove-tags.html Tag Your Classic Load Balancer> in the /Classic Load Balancers Guide/.+-- Each tag consists of a key and an optional value. If a tag with the same key is already associated with the load balancer, @AddTags@ updates its value.+--+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/add-remove-tags.html Tag Your Classic Load Balancer> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.AddTags     (     -- * Creating a Request@@ -48,6 +50,8 @@  -- | Contains the parameters for AddTags. --+--+-- -- /See:/ 'addTags' smart constructor. data AddTags = AddTags'     { _atLoadBalancerNames :: ![Text]@@ -58,9 +62,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'atLoadBalancerNames'+-- * 'atLoadBalancerNames' - The name of the load balancer. You can specify one load balancer only. ----- * 'atTags'+-- * 'atTags' - The tags. addTags     :: NonEmpty Tag -- ^ 'atTags'     -> AddTags@@ -106,6 +110,8 @@  -- | Contains the output of AddTags. --+--+-- -- /See:/ 'addTagsResponse' smart constructor. newtype AddTagsResponse = AddTagsResponse'     { _atrsResponseStatus :: Int@@ -115,7 +121,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'atrsResponseStatus'+-- * 'atrsResponseStatus' - -- | The response status code. addTagsResponse     :: Int -- ^ 'atrsResponseStatus'     -> AddTagsResponse@@ -124,7 +130,7 @@     { _atrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. atrsResponseStatus :: Lens' AddTagsResponse Int atrsResponseStatus = lens _atrsResponseStatus (\ s a -> s{_atrsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Associates one or more security groups with your load balancer in a virtual private cloud (VPC). The specified security groups override the previously associated security groups. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-security-groups.html#elb-vpc-security-groups Security Groups for Load Balancers in a VPC> in the /Classic Load Balancers Guide/.+--+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-security-groups.html#elb-vpc-security-groups Security Groups for Load Balancers in a VPC> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.ApplySecurityGroupsToLoadBalancer     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for ApplySecurityGroupsToLoadBalancer. --+--+-- -- /See:/ 'applySecurityGroupsToLoadBalancer' smart constructor. data ApplySecurityGroupsToLoadBalancer = ApplySecurityGroupsToLoadBalancer'     { _asgtlbLoadBalancerName :: !Text@@ -57,9 +61,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'asgtlbLoadBalancerName'+-- * 'asgtlbLoadBalancerName' - The name of the load balancer. ----- * 'asgtlbSecurityGroups'+-- * 'asgtlbSecurityGroups' - The IDs of the security groups to associate with the load balancer. Note that you cannot specify the name of the security group. applySecurityGroupsToLoadBalancer     :: Text -- ^ 'asgtlbLoadBalancerName'     -> ApplySecurityGroupsToLoadBalancer@@ -116,6 +120,8 @@  -- | Contains the output of ApplySecurityGroupsToLoadBalancer. --+--+-- -- /See:/ 'applySecurityGroupsToLoadBalancerResponse' smart constructor. data ApplySecurityGroupsToLoadBalancerResponse = ApplySecurityGroupsToLoadBalancerResponse'     { _asgtlbrsSecurityGroups :: !(Maybe [Text])@@ -126,9 +132,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'asgtlbrsSecurityGroups'+-- * 'asgtlbrsSecurityGroups' - The IDs of the security groups associated with the load balancer. ----- * 'asgtlbrsResponseStatus'+-- * 'asgtlbrsResponseStatus' - -- | The response status code. applySecurityGroupsToLoadBalancerResponse     :: Int -- ^ 'asgtlbrsResponseStatus'     -> ApplySecurityGroupsToLoadBalancerResponse@@ -142,7 +148,7 @@ asgtlbrsSecurityGroups :: Lens' ApplySecurityGroupsToLoadBalancerResponse [Text] asgtlbrsSecurityGroups = lens _asgtlbrsSecurityGroups (\ s a -> s{_asgtlbrsSecurityGroups = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. asgtlbrsResponseStatus :: Lens' ApplySecurityGroupsToLoadBalancerResponse Int asgtlbrsResponseStatus = lens _asgtlbrsResponseStatus (\ s a -> s{_asgtlbrsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Adds one or more subnets to the set of configured subnets for the specified load balancer. ----- The load balancer evenly distributes requests across all registered subnets. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-manage-subnets.html Add or Remove Subnets for Your Load Balancer in a VPC> in the /Classic Load Balancers Guide/.+--+-- The load balancer evenly distributes requests across all registered subnets. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-manage-subnets.html Add or Remove Subnets for Your Load Balancer in a VPC> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.AttachLoadBalancerToSubnets     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for AttachLoaBalancerToSubnets. --+--+-- -- /See:/ 'attachLoadBalancerToSubnets' smart constructor. data AttachLoadBalancerToSubnets = AttachLoadBalancerToSubnets'     { _albtsLoadBalancerName :: !Text@@ -57,9 +61,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'albtsLoadBalancerName'+-- * 'albtsLoadBalancerName' - The name of the load balancer. ----- * 'albtsSubnets'+-- * 'albtsSubnets' - The IDs of the subnets to add. You can add only one subnet per Availability Zone. attachLoadBalancerToSubnets     :: Text -- ^ 'albtsLoadBalancerName'     -> AttachLoadBalancerToSubnets@@ -111,6 +115,8 @@  -- | Contains the output of AttachLoadBalancerToSubnets. --+--+-- -- /See:/ 'attachLoadBalancerToSubnetsResponse' smart constructor. data AttachLoadBalancerToSubnetsResponse = AttachLoadBalancerToSubnetsResponse'     { _albtsrsSubnets        :: !(Maybe [Text])@@ -121,9 +127,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'albtsrsSubnets'+-- * 'albtsrsSubnets' - The IDs of the subnets attached to the load balancer. ----- * 'albtsrsResponseStatus'+-- * 'albtsrsResponseStatus' - -- | The response status code. attachLoadBalancerToSubnetsResponse     :: Int -- ^ 'albtsrsResponseStatus'     -> AttachLoadBalancerToSubnetsResponse@@ -137,7 +143,7 @@ albtsrsSubnets :: Lens' AttachLoadBalancerToSubnetsResponse [Text] albtsrsSubnets = lens _albtsrsSubnets (\ s a -> s{_albtsrsSubnets = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. albtsrsResponseStatus :: Lens' AttachLoadBalancerToSubnetsResponse Int albtsrsResponseStatus = lens _albtsrsResponseStatus (\ s a -> s{_albtsrsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Specifies the health check settings to use when evaluating the health state of your EC2 instances. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-healthchecks.html Configure Health Checks for Your Load Balancer> in the /Classic Load Balancers Guide/.+--+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-healthchecks.html Configure Health Checks for Your Load Balancer> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.ConfigureHealthCheck     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for ConfigureHealthCheck. --+--+-- -- /See:/ 'configureHealthCheck' smart constructor. data ConfigureHealthCheck = ConfigureHealthCheck'     { _chcLoadBalancerName :: !Text@@ -57,9 +61,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'chcLoadBalancerName'+-- * 'chcLoadBalancerName' - The name of the load balancer. ----- * 'chcHealthCheck'+-- * 'chcHealthCheck' - The configuration information. configureHealthCheck     :: Text -- ^ 'chcLoadBalancerName'     -> HealthCheck -- ^ 'chcHealthCheck'@@ -108,6 +112,8 @@  -- | Contains the output of ConfigureHealthCheck. --+--+-- -- /See:/ 'configureHealthCheckResponse' smart constructor. data ConfigureHealthCheckResponse = ConfigureHealthCheckResponse'     { _chcrsHealthCheck    :: !(Maybe HealthCheck)@@ -118,9 +124,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'chcrsHealthCheck'+-- * 'chcrsHealthCheck' - The updated health check. ----- * 'chcrsResponseStatus'+-- * 'chcrsResponseStatus' - -- | The response status code. configureHealthCheckResponse     :: Int -- ^ 'chcrsResponseStatus'     -> ConfigureHealthCheckResponse@@ -134,7 +140,7 @@ chcrsHealthCheck :: Lens' ConfigureHealthCheckResponse (Maybe HealthCheck) chcrsHealthCheck = lens _chcrsHealthCheck (\ s a -> s{_chcrsHealthCheck = a}); --- | The response status code.+-- | -- | The response status code. chcrsResponseStatus :: Lens' ConfigureHealthCheckResponse Int chcrsResponseStatus = lens _chcrsResponseStatus (\ s a -> s{_chcrsResponseStatus = a}); 

@@ -18,13 +18,15 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Generates a stickiness policy with sticky session lifetimes that follow that of an application-generated cookie. This policy can be associated only with HTTP\/HTTPS listeners.+-- Generates a stickiness policy with sticky session lifetimes that follow that of an application-generated cookie. This policy can be associated only with HTTP/HTTPS listeners. ----- This policy is similar to the policy created by < CreateLBCookieStickinessPolicy>, except that the lifetime of the special Elastic Load Balancing cookie, 'AWSELB', follows the lifetime of the application-generated cookie specified in the policy configuration. The load balancer only inserts a new stickiness cookie when the application response includes a new application cookie. --+-- This policy is similar to the policy created by 'CreateLBCookieStickinessPolicy' , except that the lifetime of the special Elastic Load Balancing cookie, @AWSELB@ , follows the lifetime of the application-generated cookie specified in the policy configuration. The load balancer only inserts a new stickiness cookie when the application response includes a new application cookie.+-- -- If the application cookie is explicitly removed or expires, the session stops being sticky until a new application cookie is issued. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-application Application-Controlled Session Stickiness> in the /Classic Load Balancers Guide/.+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-application Application-Controlled Session Stickiness> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.CreateAppCookieStickinessPolicy     (     -- * Creating a Request@@ -51,6 +53,8 @@  -- | Contains the parameters for CreateAppCookieStickinessPolicy. --+--+-- -- /See:/ 'createAppCookieStickinessPolicy' smart constructor. data CreateAppCookieStickinessPolicy = CreateAppCookieStickinessPolicy'     { _cacspLoadBalancerName :: !Text@@ -62,11 +66,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cacspLoadBalancerName'+-- * 'cacspLoadBalancerName' - The name of the load balancer. ----- * 'cacspPolicyName'+-- * 'cacspPolicyName' - The name of the policy being created. Policy names must consist of alphanumeric characters and dashes (-). This name must be unique within the set of policies for this load balancer. ----- * 'cacspCookieName'+-- * 'cacspCookieName' - The name of the application cookie used for stickiness. createAppCookieStickinessPolicy     :: Text -- ^ 'cacspLoadBalancerName'     -> Text -- ^ 'cacspPolicyName'@@ -127,6 +131,8 @@  -- | Contains the output for CreateAppCookieStickinessPolicy. --+--+-- -- /See:/ 'createAppCookieStickinessPolicyResponse' smart constructor. newtype CreateAppCookieStickinessPolicyResponse = CreateAppCookieStickinessPolicyResponse'     { _cacsprsResponseStatus :: Int@@ -136,7 +142,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cacsprsResponseStatus'+-- * 'cacsprsResponseStatus' - -- | The response status code. createAppCookieStickinessPolicyResponse     :: Int -- ^ 'cacsprsResponseStatus'     -> CreateAppCookieStickinessPolicyResponse@@ -145,7 +151,7 @@     { _cacsprsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. cacsprsResponseStatus :: Lens' CreateAppCookieStickinessPolicyResponse Int cacsprsResponseStatus = lens _cacsprsResponseStatus (\ s a -> s{_cacsprsResponseStatus = a}); 

@@ -18,13 +18,15 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Generates a stickiness policy with sticky session lifetimes controlled by the lifetime of the browser (user-agent) or a specified expiration period. This policy can be associated only with HTTP\/HTTPS listeners.+-- Generates a stickiness policy with sticky session lifetimes controlled by the lifetime of the browser (user-agent) or a specified expiration period. This policy can be associated only with HTTP/HTTPS listeners. --+-- -- When a load balancer implements this policy, the load balancer uses a special cookie to track the instance for each request. When the load balancer receives a request, it first checks to see if this cookie is present in the request. If so, the load balancer sends the request to the application server specified in the cookie. If not, the load balancer sends the request to a server that is chosen based on the existing load-balancing algorithm. -- -- A cookie is inserted into the response for binding subsequent requests from the same user to that server. The validity of the cookie is based on the cookie expiration time, which is specified in the policy configuration. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-duration Duration-Based Session Stickiness> in the /Classic Load Balancers Guide/.+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-duration Duration-Based Session Stickiness> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.CreateLBCookieStickinessPolicy     (     -- * Creating a Request@@ -51,6 +53,8 @@  -- | Contains the parameters for CreateLBCookieStickinessPolicy. --+--+-- -- /See:/ 'createLBCookieStickinessPolicy' smart constructor. data CreateLBCookieStickinessPolicy = CreateLBCookieStickinessPolicy'     { _clbcspCookieExpirationPeriod :: !(Maybe Integer)@@ -62,11 +66,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clbcspCookieExpirationPeriod'+-- * 'clbcspCookieExpirationPeriod' - The time period, in seconds, after which the cookie should be considered stale. If you do not specify this parameter, the default value is 0, which indicates that the sticky session should last for the duration of the browser session. ----- * 'clbcspLoadBalancerName'+-- * 'clbcspLoadBalancerName' - The name of the load balancer. ----- * 'clbcspPolicyName'+-- * 'clbcspPolicyName' - The name of the policy being created. Policy names must consist of alphanumeric characters and dashes (-). This name must be unique within the set of policies for this load balancer. createLBCookieStickinessPolicy     :: Text -- ^ 'clbcspLoadBalancerName'     -> Text -- ^ 'clbcspPolicyName'@@ -126,6 +130,8 @@  -- | Contains the output for CreateLBCookieStickinessPolicy. --+--+-- -- /See:/ 'createLBCookieStickinessPolicyResponse' smart constructor. newtype CreateLBCookieStickinessPolicyResponse = CreateLBCookieStickinessPolicyResponse'     { _clbcsprsResponseStatus :: Int@@ -135,7 +141,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clbcsprsResponseStatus'+-- * 'clbcsprsResponseStatus' - -- | The response status code. createLBCookieStickinessPolicyResponse     :: Int -- ^ 'clbcsprsResponseStatus'     -> CreateLBCookieStickinessPolicyResponse@@ -144,7 +150,7 @@     { _clbcsprsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. clbcsprsResponseStatus :: Lens' CreateLBCookieStickinessPolicyResponse Int clbcsprsResponseStatus = lens _clbcsprsResponseStatus (\ s a -> s{_clbcsprsResponseStatus = a}); 

@@ -20,11 +20,13 @@ -- -- Creates a Classic load balancer. ----- You can add listeners, security groups, subnets, and tags when you create your load balancer, or you can add them later using < CreateLoadBalancerListeners>, < ApplySecurityGroupsToLoadBalancer>, < AttachLoadBalancerToSubnets>, and < AddTags>. ----- To describe your current load balancers, see < DescribeLoadBalancers>. When you are finished with a load balancer, you can delete it using < DeleteLoadBalancer>.+-- You can add listeners, security groups, subnets, and tags when you create your load balancer, or you can add them later using 'CreateLoadBalancerListeners' , 'ApplySecurityGroupsToLoadBalancer' , 'AttachLoadBalancerToSubnets' , and 'AddTags' . ----- You can create up to 20 load balancers per region per account. You can request an increase for the number of load balancers for your account. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-limits.html Limits for Your Classic Load Balancer> in the /Classic Load Balancers Guide/.+-- To describe your current load balancers, see 'DescribeLoadBalancers' . When you are finished with a load balancer, you can delete it using 'DeleteLoadBalancer' .+--+-- You can create up to 20 load balancers per region per account. You can request an increase for the number of load balancers for your account. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-limits.html Limits for Your Classic Load Balancer> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.CreateLoadBalancer     (     -- * Creating a Request@@ -56,6 +58,8 @@  -- | Contains the parameters for CreateLoadBalancer. --+--+-- -- /See:/ 'createLoadBalancer' smart constructor. data CreateLoadBalancer = CreateLoadBalancer'     { _clbSecurityGroups    :: !(Maybe [Text])@@ -71,19 +75,19 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clbSecurityGroups'+-- * 'clbSecurityGroups' - The IDs of the security groups to assign to the load balancer. ----- * 'clbSubnets'+-- * 'clbSubnets' - The IDs of the subnets in your VPC to attach to the load balancer. Specify one subnet per Availability Zone specified in @AvailabilityZones@ . ----- * 'clbAvailabilityZones'+-- * 'clbAvailabilityZones' - One or more Availability Zones from the same region as the load balancer. You must specify at least one Availability Zone. You can add more Availability Zones after you create the load balancer using 'EnableAvailabilityZonesForLoadBalancer' . ----- * 'clbScheme'+-- * 'clbScheme' - The type of a load balancer. Valid only for load balancers in a VPC. By default, Elastic Load Balancing creates an Internet-facing load balancer with a DNS name that resolves to public IP addresses. For more information about Internet-facing and Internal load balancers, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/userguide/how-elastic-load-balancing-works.html#load-balancer-scheme Load Balancer Scheme> in the /Elastic Load Balancing User Guide/ . Specify @internal@ to create a load balancer with a DNS name that resolves to private IP addresses. ----- * 'clbTags'+-- * 'clbTags' - A list of tags to assign to the load balancer. For more information about tagging your load balancer, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/add-remove-tags.html Tag Your Classic Load Balancer> in the /Classic Load Balancers Guide/ . ----- * 'clbLoadBalancerName'+-- * 'clbLoadBalancerName' - The name of the load balancer. This name must be unique within your set of load balancers for the region, must have a maximum of 32 characters, must contain only alphanumeric characters or hyphens, and cannot begin or end with a hyphen. ----- * 'clbListeners'+-- * 'clbListeners' - The listeners. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/ . createLoadBalancer     :: Text -- ^ 'clbLoadBalancerName'     -> CreateLoadBalancer@@ -102,41 +106,27 @@ clbSecurityGroups :: Lens' CreateLoadBalancer [Text] clbSecurityGroups = lens _clbSecurityGroups (\ s a -> s{_clbSecurityGroups = a}) . _Default . _Coerce; --- | The IDs of the subnets in your VPC to attach to the load balancer. Specify one subnet per Availability Zone specified in 'AvailabilityZones'.+-- | The IDs of the subnets in your VPC to attach to the load balancer. Specify one subnet per Availability Zone specified in @AvailabilityZones@ . clbSubnets :: Lens' CreateLoadBalancer [Text] clbSubnets = lens _clbSubnets (\ s a -> s{_clbSubnets = a}) . _Default . _Coerce; --- | One or more Availability Zones from the same region as the load balancer.------ You must specify at least one Availability Zone.------ You can add more Availability Zones after you create the load balancer using < EnableAvailabilityZonesForLoadBalancer>.+-- | One or more Availability Zones from the same region as the load balancer. You must specify at least one Availability Zone. You can add more Availability Zones after you create the load balancer using 'EnableAvailabilityZonesForLoadBalancer' . clbAvailabilityZones :: Lens' CreateLoadBalancer [Text] clbAvailabilityZones = lens _clbAvailabilityZones (\ s a -> s{_clbAvailabilityZones = a}) . _Default . _Coerce; --- | The type of a load balancer. Valid only for load balancers in a VPC.------ By default, Elastic Load Balancing creates an Internet-facing load balancer with a DNS name that resolves to public IP addresses. For more information about Internet-facing and Internal load balancers, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/userguide/how-elastic-load-balancing-works.html#load-balancer-scheme Load Balancer Scheme> in the /Elastic Load Balancing User Guide/.------ Specify 'internal' to create a load balancer with a DNS name that resolves to private IP addresses.+-- | The type of a load balancer. Valid only for load balancers in a VPC. By default, Elastic Load Balancing creates an Internet-facing load balancer with a DNS name that resolves to public IP addresses. For more information about Internet-facing and Internal load balancers, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/userguide/how-elastic-load-balancing-works.html#load-balancer-scheme Load Balancer Scheme> in the /Elastic Load Balancing User Guide/ . Specify @internal@ to create a load balancer with a DNS name that resolves to private IP addresses. clbScheme :: Lens' CreateLoadBalancer (Maybe Text) clbScheme = lens _clbScheme (\ s a -> s{_clbScheme = a}); --- | A list of tags to assign to the load balancer.------ For more information about tagging your load balancer, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/add-remove-tags.html Tag Your Classic Load Balancer> in the /Classic Load Balancers Guide/.+-- | A list of tags to assign to the load balancer. For more information about tagging your load balancer, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/add-remove-tags.html Tag Your Classic Load Balancer> in the /Classic Load Balancers Guide/ . clbTags :: Lens' CreateLoadBalancer (Maybe (NonEmpty Tag)) clbTags = lens _clbTags (\ s a -> s{_clbTags = a}) . mapping _List1; --- | The name of the load balancer.------ This name must be unique within your set of load balancers for the region, must have a maximum of 32 characters, must contain only alphanumeric characters or hyphens, and cannot begin or end with a hyphen.+-- | The name of the load balancer. This name must be unique within your set of load balancers for the region, must have a maximum of 32 characters, must contain only alphanumeric characters or hyphens, and cannot begin or end with a hyphen. clbLoadBalancerName :: Lens' CreateLoadBalancer Text clbLoadBalancerName = lens _clbLoadBalancerName (\ s a -> s{_clbLoadBalancerName = a}); --- | The listeners.------ For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/.+-- | The listeners. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/ . clbListeners :: Lens' CreateLoadBalancer [Listener] clbListeners = lens _clbListeners (\ s a -> s{_clbListeners = a}) . _Coerce; @@ -181,6 +171,8 @@  -- | Contains the output for CreateLoadBalancer. --+--+-- -- /See:/ 'createLoadBalancerResponse' smart constructor. data CreateLoadBalancerResponse = CreateLoadBalancerResponse'     { _clbrsDNSName        :: !(Maybe Text)@@ -191,9 +183,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clbrsDNSName'+-- * 'clbrsDNSName' - The DNS name of the load balancer. ----- * 'clbrsResponseStatus'+-- * 'clbrsResponseStatus' - -- | The response status code. createLoadBalancerResponse     :: Int -- ^ 'clbrsResponseStatus'     -> CreateLoadBalancerResponse@@ -207,7 +199,7 @@ clbrsDNSName :: Lens' CreateLoadBalancerResponse (Maybe Text) clbrsDNSName = lens _clbrsDNSName (\ s a -> s{_clbrsDNSName = a}); --- | The response status code.+-- | -- | The response status code. clbrsResponseStatus :: Lens' CreateLoadBalancerResponse Int clbrsResponseStatus = lens _clbrsResponseStatus (\ s a -> s{_clbrsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Creates one or more listeners for the specified load balancer. If a listener with the specified port does not already exist, it is created; otherwise, the properties of the new listener must match the properties of the existing listener. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/.+--+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.CreateLoadBalancerListeners     (     -- * Creating a Request@@ -46,6 +48,8 @@  -- | Contains the parameters for CreateLoadBalancerListeners. --+--+-- -- /See:/ 'createLoadBalancerListeners' smart constructor. data CreateLoadBalancerListeners = CreateLoadBalancerListeners'     { _clblLoadBalancerName :: !Text@@ -56,9 +60,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clblLoadBalancerName'+-- * 'clblLoadBalancerName' - The name of the load balancer. ----- * 'clblListeners'+-- * 'clblListeners' - The listeners. createLoadBalancerListeners     :: Text -- ^ 'clblLoadBalancerName'     -> CreateLoadBalancerListeners@@ -108,6 +112,8 @@  -- | Contains the parameters for CreateLoadBalancerListener. --+--+-- -- /See:/ 'createLoadBalancerListenersResponse' smart constructor. newtype CreateLoadBalancerListenersResponse = CreateLoadBalancerListenersResponse'     { _clblrsResponseStatus :: Int@@ -117,7 +123,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clblrsResponseStatus'+-- * 'clblrsResponseStatus' - -- | The response status code. createLoadBalancerListenersResponse     :: Int -- ^ 'clblrsResponseStatus'     -> CreateLoadBalancerListenersResponse@@ -126,7 +132,7 @@     { _clblrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. clblrsResponseStatus :: Lens' CreateLoadBalancerListenersResponse Int clblrsResponseStatus = lens _clblrsResponseStatus (\ s a -> s{_clblrsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Creates a policy with the specified attributes for the specified load balancer. --+-- -- Policies are settings that are saved for your load balancer and that can be applied to the listener or the application server, depending on the policy type.+-- module Network.AWS.ELB.CreateLoadBalancerPolicy     (     -- * Creating a Request@@ -48,6 +50,8 @@  -- | Contains the parameters for CreateLoadBalancerPolicy. --+--+-- -- /See:/ 'createLoadBalancerPolicy' smart constructor. data CreateLoadBalancerPolicy = CreateLoadBalancerPolicy'     { _clbpPolicyAttributes :: !(Maybe [PolicyAttribute])@@ -60,13 +64,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clbpPolicyAttributes'+-- * 'clbpPolicyAttributes' - The policy attributes. ----- * 'clbpLoadBalancerName'+-- * 'clbpLoadBalancerName' - The name of the load balancer. ----- * 'clbpPolicyName'+-- * 'clbpPolicyName' - The name of the load balancer policy to be created. This name must be unique within the set of policies for this load balancer. ----- * 'clbpPolicyTypeName'+-- * 'clbpPolicyTypeName' - The name of the base policy type. To get the list of policy types, use 'DescribeLoadBalancerPolicyTypes' . createLoadBalancerPolicy     :: Text -- ^ 'clbpLoadBalancerName'     -> Text -- ^ 'clbpPolicyName'@@ -92,7 +96,7 @@ clbpPolicyName :: Lens' CreateLoadBalancerPolicy Text clbpPolicyName = lens _clbpPolicyName (\ s a -> s{_clbpPolicyName = a}); --- | The name of the base policy type. To get the list of policy types, use < DescribeLoadBalancerPolicyTypes>.+-- | The name of the base policy type. To get the list of policy types, use 'DescribeLoadBalancerPolicyTypes' . clbpPolicyTypeName :: Lens' CreateLoadBalancerPolicy Text clbpPolicyTypeName = lens _clbpPolicyTypeName (\ s a -> s{_clbpPolicyTypeName = a}); @@ -131,6 +135,8 @@  -- | Contains the output of CreateLoadBalancerPolicy. --+--+-- -- /See:/ 'createLoadBalancerPolicyResponse' smart constructor. newtype CreateLoadBalancerPolicyResponse = CreateLoadBalancerPolicyResponse'     { _clbprsResponseStatus :: Int@@ -140,7 +146,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'clbprsResponseStatus'+-- * 'clbprsResponseStatus' - -- | The response status code. createLoadBalancerPolicyResponse     :: Int -- ^ 'clbprsResponseStatus'     -> CreateLoadBalancerPolicyResponse@@ -149,7 +155,7 @@     { _clbprsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. clbprsResponseStatus :: Lens' CreateLoadBalancerPolicyResponse Int clbprsResponseStatus = lens _clbprsResponseStatus (\ s a -> s{_clbprsResponseStatus = a}); 

@@ -20,9 +20,11 @@ -- -- Deletes the specified load balancer. --+-- -- If you are attempting to recreate a load balancer, you must reconfigure all settings. The DNS name associated with a deleted load balancer are no longer usable. The name and associated DNS record of the deleted load balancer no longer exist and traffic sent to any of its IP addresses is no longer delivered to your instances. ----- If the load balancer does not exist or has already been deleted, the call to 'DeleteLoadBalancer' still succeeds.+-- If the load balancer does not exist or has already been deleted, the call to @DeleteLoadBalancer@ still succeeds.+-- module Network.AWS.ELB.DeleteLoadBalancer     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for DeleteLoadBalancer. --+--+-- -- /See:/ 'deleteLoadBalancer' smart constructor. newtype DeleteLoadBalancer = DeleteLoadBalancer'     { _dlbLoadBalancerName :: Text@@ -56,7 +60,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbLoadBalancerName'+-- * 'dlbLoadBalancerName' - The name of the load balancer. deleteLoadBalancer     :: Text -- ^ 'dlbLoadBalancerName'     -> DeleteLoadBalancer@@ -97,6 +101,8 @@  -- | Contains the output of DeleteLoadBalancer. --+--+-- -- /See:/ 'deleteLoadBalancerResponse' smart constructor. newtype DeleteLoadBalancerResponse = DeleteLoadBalancerResponse'     { _drsResponseStatus :: Int@@ -106,7 +112,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'drsResponseStatus'+-- * 'drsResponseStatus' - -- | The response status code. deleteLoadBalancerResponse     :: Int -- ^ 'drsResponseStatus'     -> DeleteLoadBalancerResponse@@ -115,7 +121,7 @@     { _drsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. drsResponseStatus :: Lens' DeleteLoadBalancerResponse Int drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a}); 

@@ -19,6 +19,8 @@ -- Portability : non-portable (GHC extensions) -- -- Deletes the specified listeners from the specified load balancer.+--+-- module Network.AWS.ELB.DeleteLoadBalancerListeners     (     -- * Creating a Request@@ -44,6 +46,8 @@  -- | Contains the parameters for DeleteLoadBalancerListeners. --+--+-- -- /See:/ 'deleteLoadBalancerListeners' smart constructor. data DeleteLoadBalancerListeners = DeleteLoadBalancerListeners'     { _dlblLoadBalancerName  :: !Text@@ -54,9 +58,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlblLoadBalancerName'+-- * 'dlblLoadBalancerName' - The name of the load balancer. ----- * 'dlblLoadBalancerPorts'+-- * 'dlblLoadBalancerPorts' - The client port numbers of the listeners. deleteLoadBalancerListeners     :: Text -- ^ 'dlblLoadBalancerName'     -> DeleteLoadBalancerListeners@@ -107,6 +111,8 @@  -- | Contains the output of DeleteLoadBalancerListeners. --+--+-- -- /See:/ 'deleteLoadBalancerListenersResponse' smart constructor. newtype DeleteLoadBalancerListenersResponse = DeleteLoadBalancerListenersResponse'     { _dlblrsResponseStatus :: Int@@ -116,7 +122,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlblrsResponseStatus'+-- * 'dlblrsResponseStatus' - -- | The response status code. deleteLoadBalancerListenersResponse     :: Int -- ^ 'dlblrsResponseStatus'     -> DeleteLoadBalancerListenersResponse@@ -125,7 +131,7 @@     { _dlblrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. dlblrsResponseStatus :: Lens' DeleteLoadBalancerListenersResponse Int dlblrsResponseStatus = lens _dlblrsResponseStatus (\ s a -> s{_dlblrsResponseStatus = a}); 

@@ -19,6 +19,8 @@ -- Portability : non-portable (GHC extensions) -- -- Deletes the specified policy from the specified load balancer. This policy must not be enabled for any listeners.+--+-- module Network.AWS.ELB.DeleteLoadBalancerPolicy     (     -- * Creating a Request@@ -44,6 +46,8 @@  -- | Contains the parameters for DeleteLoadBalancerPolicy. --+--+-- -- /See:/ 'deleteLoadBalancerPolicy' smart constructor. data DeleteLoadBalancerPolicy = DeleteLoadBalancerPolicy'     { _dLoadBalancerName :: !Text@@ -54,9 +58,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dLoadBalancerName'+-- * 'dLoadBalancerName' - The name of the load balancer. ----- * 'dPolicyName'+-- * 'dPolicyName' - The name of the policy. deleteLoadBalancerPolicy     :: Text -- ^ 'dLoadBalancerName'     -> Text -- ^ 'dPolicyName'@@ -106,6 +110,8 @@  -- | Contains the output of DeleteLoadBalancerPolicy. --+--+-- -- /See:/ 'deleteLoadBalancerPolicyResponse' smart constructor. newtype DeleteLoadBalancerPolicyResponse = DeleteLoadBalancerPolicyResponse'     { _delrsResponseStatus :: Int@@ -115,7 +121,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'delrsResponseStatus'+-- * 'delrsResponseStatus' - -- | The response status code. deleteLoadBalancerPolicyResponse     :: Int -- ^ 'delrsResponseStatus'     -> DeleteLoadBalancerPolicyResponse@@ -124,7 +130,7 @@     { _delrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. delrsResponseStatus :: Lens' DeleteLoadBalancerPolicyResponse Int delrsResponseStatus = lens _delrsResponseStatus (\ s a -> s{_delrsResponseStatus = a}); 

@@ -20,9 +20,11 @@ -- -- Deregisters the specified instances from the specified load balancer. After the instance is deregistered, it no longer receives traffic from the load balancer. ----- You can use < DescribeLoadBalancers> to verify that the instance is deregistered from the load balancer. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-deregister-register-instances.html Register or De-Register EC2 Instances> in the /Classic Load Balancers Guide/.+-- You can use 'DescribeLoadBalancers' to verify that the instance is deregistered from the load balancer.+--+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-deregister-register-instances.html Register or De-Register EC2 Instances> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.DeregisterInstancesFromLoadBalancer     (     -- * Creating a Request@@ -49,6 +51,8 @@  -- | Contains the parameters for DeregisterInstancesFromLoadBalancer. --+--+-- -- /See:/ 'deregisterInstancesFromLoadBalancer' smart constructor. data DeregisterInstancesFromLoadBalancer = DeregisterInstancesFromLoadBalancer'     { _diflbLoadBalancerName :: !Text@@ -59,9 +63,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'diflbLoadBalancerName'+-- * 'diflbLoadBalancerName' - The name of the load balancer. ----- * 'diflbInstances'+-- * 'diflbInstances' - The IDs of the instances. deregisterInstancesFromLoadBalancer     :: Text -- ^ 'diflbLoadBalancerName'     -> DeregisterInstancesFromLoadBalancer@@ -118,6 +122,8 @@  -- | Contains the output of DeregisterInstancesFromLoadBalancer. --+--+-- -- /See:/ 'deregisterInstancesFromLoadBalancerResponse' smart constructor. data DeregisterInstancesFromLoadBalancerResponse = DeregisterInstancesFromLoadBalancerResponse'     { _diflbrsInstances      :: !(Maybe [Instance])@@ -128,9 +134,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'diflbrsInstances'+-- * 'diflbrsInstances' - The remaining instances registered with the load balancer. ----- * 'diflbrsResponseStatus'+-- * 'diflbrsResponseStatus' - -- | The response status code. deregisterInstancesFromLoadBalancerResponse     :: Int -- ^ 'diflbrsResponseStatus'     -> DeregisterInstancesFromLoadBalancerResponse@@ -144,7 +150,7 @@ diflbrsInstances :: Lens' DeregisterInstancesFromLoadBalancerResponse [Instance] diflbrsInstances = lens _diflbrsInstances (\ s a -> s{_diflbrsInstances = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. diflbrsResponseStatus :: Lens' DeregisterInstancesFromLoadBalancerResponse Int diflbrsResponseStatus = lens _diflbrsResponseStatus (\ s a -> s{_diflbrsResponseStatus = a}); 

@@ -19,6 +19,8 @@ -- Portability : non-portable (GHC extensions) -- -- Describes the state of the specified instances with respect to the specified load balancer. If no instances are specified, the call describes the state of all instances that are currently registered with the load balancer. If instances are specified, their state is returned even if they are no longer registered with the load balancer. The state of terminated instances is not returned.+--+-- module Network.AWS.ELB.DescribeInstanceHealth     (     -- * Creating a Request@@ -45,6 +47,8 @@  -- | Contains the parameters for DescribeInstanceHealth. --+--+-- -- /See:/ 'describeInstanceHealth' smart constructor. data DescribeInstanceHealth = DescribeInstanceHealth'     { _dihInstances        :: !(Maybe [Instance])@@ -55,9 +59,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dihInstances'+-- * 'dihInstances' - The IDs of the instances. ----- * 'dihLoadBalancerName'+-- * 'dihLoadBalancerName' - The name of the load balancer. describeInstanceHealth     :: Text -- ^ 'dihLoadBalancerName'     -> DescribeInstanceHealth@@ -109,6 +113,8 @@  -- | Contains the output for DescribeInstanceHealth. --+--+-- -- /See:/ 'describeInstanceHealthResponse' smart constructor. data DescribeInstanceHealthResponse = DescribeInstanceHealthResponse'     { _dihrsInstanceStates :: !(Maybe [InstanceState])@@ -119,9 +125,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dihrsInstanceStates'+-- * 'dihrsInstanceStates' - Information about the health of the instances. ----- * 'dihrsResponseStatus'+-- * 'dihrsResponseStatus' - -- | The response status code. describeInstanceHealthResponse     :: Int -- ^ 'dihrsResponseStatus'     -> DescribeInstanceHealthResponse@@ -135,7 +141,7 @@ dihrsInstanceStates :: Lens' DescribeInstanceHealthResponse [InstanceState] dihrsInstanceStates = lens _dihrsInstanceStates (\ s a -> s{_dihrsInstanceStates = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. dihrsResponseStatus :: Lens' DescribeInstanceHealthResponse Int dihrsResponseStatus = lens _dihrsResponseStatus (\ s a -> s{_dihrsResponseStatus = a}); 

@@ -19,6 +19,8 @@ -- Portability : non-portable (GHC extensions) -- -- Describes the attributes for the specified load balancer.+--+-- module Network.AWS.ELB.DescribeLoadBalancerAttributes     (     -- * Creating a Request@@ -44,6 +46,8 @@  -- | Contains the parameters for DescribeLoadBalancerAttributes. --+--+-- -- /See:/ 'describeLoadBalancerAttributes' smart constructor. newtype DescribeLoadBalancerAttributes = DescribeLoadBalancerAttributes'     { _dlbaLoadBalancerName :: Text@@ -53,7 +57,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbaLoadBalancerName'+-- * 'dlbaLoadBalancerName' - The name of the load balancer. describeLoadBalancerAttributes     :: Text -- ^ 'dlbaLoadBalancerName'     -> DescribeLoadBalancerAttributes@@ -100,6 +104,8 @@  -- | Contains the output of DescribeLoadBalancerAttributes. --+--+-- -- /See:/ 'describeLoadBalancerAttributesResponse' smart constructor. data DescribeLoadBalancerAttributesResponse = DescribeLoadBalancerAttributesResponse'     { _dlbarsLoadBalancerAttributes :: !(Maybe LoadBalancerAttributes)@@ -110,9 +116,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbarsLoadBalancerAttributes'+-- * 'dlbarsLoadBalancerAttributes' - Information about the load balancer attributes. ----- * 'dlbarsResponseStatus'+-- * 'dlbarsResponseStatus' - -- | The response status code. describeLoadBalancerAttributesResponse     :: Int -- ^ 'dlbarsResponseStatus'     -> DescribeLoadBalancerAttributesResponse@@ -126,7 +132,7 @@ dlbarsLoadBalancerAttributes :: Lens' DescribeLoadBalancerAttributesResponse (Maybe LoadBalancerAttributes) dlbarsLoadBalancerAttributes = lens _dlbarsLoadBalancerAttributes (\ s a -> s{_dlbarsLoadBalancerAttributes = a}); --- | The response status code.+-- | -- | The response status code. dlbarsResponseStatus :: Lens' DescribeLoadBalancerAttributesResponse Int dlbarsResponseStatus = lens _dlbarsResponseStatus (\ s a -> s{_dlbarsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Describes the specified policies. ----- If you specify a load balancer name, the action returns the descriptions of all policies created for the load balancer. If you specify a policy name associated with your load balancer, the action returns the description of that policy. If you don\'t specify a load balancer name, the action returns descriptions of the specified sample policies, or descriptions of all sample policies. The names of the sample policies have the 'ELBSample-' prefix.+--+-- If you specify a load balancer name, the action returns the descriptions of all policies created for the load balancer. If you specify a policy name associated with your load balancer, the action returns the description of that policy. If you don't specify a load balancer name, the action returns descriptions of the specified sample policies, or descriptions of all sample policies. The names of the sample policies have the @ELBSample-@ prefix.+-- module Network.AWS.ELB.DescribeLoadBalancerPolicies     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for DescribeLoadBalancerPolicies. --+--+-- -- /See:/ 'describeLoadBalancerPolicies' smart constructor. data DescribeLoadBalancerPolicies = DescribeLoadBalancerPolicies'     { _dlbpPolicyNames      :: !(Maybe [Text])@@ -57,9 +61,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbpPolicyNames'+-- * 'dlbpPolicyNames' - The names of the policies. ----- * 'dlbpLoadBalancerName'+-- * 'dlbpLoadBalancerName' - The name of the load balancer. describeLoadBalancerPolicies     :: DescribeLoadBalancerPolicies describeLoadBalancerPolicies =@@ -112,6 +116,8 @@  -- | Contains the output of DescribeLoadBalancerPolicies. --+--+-- -- /See:/ 'describeLoadBalancerPoliciesResponse' smart constructor. data DescribeLoadBalancerPoliciesResponse = DescribeLoadBalancerPoliciesResponse'     { _dlbprsPolicyDescriptions :: !(Maybe [PolicyDescription])@@ -122,9 +128,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbprsPolicyDescriptions'+-- * 'dlbprsPolicyDescriptions' - Information about the policies. ----- * 'dlbprsResponseStatus'+-- * 'dlbprsResponseStatus' - -- | The response status code. describeLoadBalancerPoliciesResponse     :: Int -- ^ 'dlbprsResponseStatus'     -> DescribeLoadBalancerPoliciesResponse@@ -138,7 +144,7 @@ dlbprsPolicyDescriptions :: Lens' DescribeLoadBalancerPoliciesResponse [PolicyDescription] dlbprsPolicyDescriptions = lens _dlbprsPolicyDescriptions (\ s a -> s{_dlbprsPolicyDescriptions = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. dlbprsResponseStatus :: Lens' DescribeLoadBalancerPoliciesResponse Int dlbprsResponseStatus = lens _dlbprsResponseStatus (\ s a -> s{_dlbprsResponseStatus = a}); 

@@ -20,9 +20,11 @@ -- -- Describes the specified load balancer policy types or all load balancer policy types. --+-- -- The description of each type indicates how it can be used. For example, some policies can be used only with layer 7 listeners, some policies can be used only with layer 4 listeners, and some policies can be used only with your EC2 instances. ----- You can use < CreateLoadBalancerPolicy> to create a policy configuration for any of these policy types. Then, depending on the policy type, use either < SetLoadBalancerPoliciesOfListener> or < SetLoadBalancerPoliciesForBackendServer> to set the policy.+-- You can use 'CreateLoadBalancerPolicy' to create a policy configuration for any of these policy types. Then, depending on the policy type, use either 'SetLoadBalancerPoliciesOfListener' or 'SetLoadBalancerPoliciesForBackendServer' to set the policy.+-- module Network.AWS.ELB.DescribeLoadBalancerPolicyTypes     (     -- * Creating a Request@@ -48,6 +50,8 @@  -- | Contains the parameters for DescribeLoadBalancerPolicyTypes. --+--+-- -- /See:/ 'describeLoadBalancerPolicyTypes' smart constructor. newtype DescribeLoadBalancerPolicyTypes = DescribeLoadBalancerPolicyTypes'     { _dlbptPolicyTypeNames :: Maybe [Text]@@ -57,7 +61,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbptPolicyTypeNames'+-- * 'dlbptPolicyTypeNames' - The names of the policy types. If no names are specified, describes all policy types defined by Elastic Load Balancing. describeLoadBalancerPolicyTypes     :: DescribeLoadBalancerPolicyTypes describeLoadBalancerPolicyTypes =@@ -107,6 +111,8 @@  -- | Contains the output of DescribeLoadBalancerPolicyTypes. --+--+-- -- /See:/ 'describeLoadBalancerPolicyTypesResponse' smart constructor. data DescribeLoadBalancerPolicyTypesResponse = DescribeLoadBalancerPolicyTypesResponse'     { _dlbptrsPolicyTypeDescriptions :: !(Maybe [PolicyTypeDescription])@@ -117,9 +123,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbptrsPolicyTypeDescriptions'+-- * 'dlbptrsPolicyTypeDescriptions' - Information about the policy types. ----- * 'dlbptrsResponseStatus'+-- * 'dlbptrsResponseStatus' - -- | The response status code. describeLoadBalancerPolicyTypesResponse     :: Int -- ^ 'dlbptrsResponseStatus'     -> DescribeLoadBalancerPolicyTypesResponse@@ -133,7 +139,7 @@ dlbptrsPolicyTypeDescriptions :: Lens' DescribeLoadBalancerPolicyTypesResponse [PolicyTypeDescription] dlbptrsPolicyTypeDescriptions = lens _dlbptrsPolicyTypeDescriptions (\ s a -> s{_dlbptrsPolicyTypeDescriptions = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. dlbptrsResponseStatus :: Lens' DescribeLoadBalancerPolicyTypesResponse Int dlbptrsResponseStatus = lens _dlbptrsResponseStatus (\ s a -> s{_dlbptrsResponseStatus = a}); 

@@ -20,6 +20,8 @@ -- -- Describes the specified the load balancers. If no load balancers are specified, the call describes all of your load balancers. --+--+-- -- This operation returns paginated results. module Network.AWS.ELB.DescribeLoadBalancers     (@@ -50,6 +52,8 @@  -- | Contains the parameters for DescribeLoadBalancers. --+--+-- -- /See:/ 'describeLoadBalancers' smart constructor. data DescribeLoadBalancers = DescribeLoadBalancers'     { _dlbMarker            :: !(Maybe Text)@@ -61,11 +65,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbMarker'+-- * 'dlbMarker' - The marker for the next set of results. (You received this marker from a previous call.) ----- * 'dlbPageSize'+-- * 'dlbPageSize' - The maximum number of results to return with this call (a number from 1 to 400). The default is 400. ----- * 'dlbLoadBalancerNames'+-- * 'dlbLoadBalancerNames' - The names of the load balancers. describeLoadBalancers     :: DescribeLoadBalancers describeLoadBalancers =@@ -130,6 +134,8 @@  -- | Contains the parameters for DescribeLoadBalancers. --+--+-- -- /See:/ 'describeLoadBalancersResponse' smart constructor. data DescribeLoadBalancersResponse = DescribeLoadBalancersResponse'     { _dlbrsLoadBalancerDescriptions :: !(Maybe [LoadBalancerDescription])@@ -141,11 +147,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbrsLoadBalancerDescriptions'+-- * 'dlbrsLoadBalancerDescriptions' - Information about the load balancers. ----- * 'dlbrsNextMarker'+-- * 'dlbrsNextMarker' - The marker to use when requesting the next set of results. If there are no additional results, the string is empty. ----- * 'dlbrsResponseStatus'+-- * 'dlbrsResponseStatus' - -- | The response status code. describeLoadBalancersResponse     :: Int -- ^ 'dlbrsResponseStatus'     -> DescribeLoadBalancersResponse@@ -164,7 +170,7 @@ dlbrsNextMarker :: Lens' DescribeLoadBalancersResponse (Maybe Text) dlbrsNextMarker = lens _dlbrsNextMarker (\ s a -> s{_dlbrsNextMarker = a}); --- | The response status code.+-- | -- | The response status code. dlbrsResponseStatus :: Lens' DescribeLoadBalancersResponse Int dlbrsResponseStatus = lens _dlbrsResponseStatus (\ s a -> s{_dlbrsResponseStatus = a}); 

@@ -19,6 +19,8 @@ -- Portability : non-portable (GHC extensions) -- -- Describes the tags associated with the specified load balancers.+--+-- module Network.AWS.ELB.DescribeTags     (     -- * Creating a Request@@ -44,6 +46,8 @@  -- | Contains the parameters for DescribeTags. --+--+-- -- /See:/ 'describeTags' smart constructor. newtype DescribeTags = DescribeTags'     { _dtLoadBalancerNames :: List1 Text@@ -53,7 +57,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dtLoadBalancerNames'+-- * 'dtLoadBalancerNames' - The names of the load balancers. describeTags     :: NonEmpty Text -- ^ 'dtLoadBalancerNames'     -> DescribeTags@@ -97,6 +101,8 @@  -- | Contains the output for DescribeTags. --+--+-- -- /See:/ 'describeTagsResponse' smart constructor. data DescribeTagsResponse = DescribeTagsResponse'     { _dtrsTagDescriptions :: !(Maybe [TagDescription])@@ -107,9 +113,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dtrsTagDescriptions'+-- * 'dtrsTagDescriptions' - Information about the tags. ----- * 'dtrsResponseStatus'+-- * 'dtrsResponseStatus' - -- | The response status code. describeTagsResponse     :: Int -- ^ 'dtrsResponseStatus'     -> DescribeTagsResponse@@ -123,7 +129,7 @@ dtrsTagDescriptions :: Lens' DescribeTagsResponse [TagDescription] dtrsTagDescriptions = lens _dtrsTagDescriptions (\ s a -> s{_dtrsTagDescriptions = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. dtrsResponseStatus :: Lens' DescribeTagsResponse Int dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a}); 

@@ -20,7 +20,9 @@ -- -- Removes the specified subnets from the set of configured subnets for the load balancer. ----- After a subnet is removed, all EC2 instances registered with the load balancer in the removed subnet go into the 'OutOfService' state. Then, the load balancer balances the traffic among the remaining routable subnets.+--+-- After a subnet is removed, all EC2 instances registered with the load balancer in the removed subnet go into the @OutOfService@ state. Then, the load balancer balances the traffic among the remaining routable subnets.+-- module Network.AWS.ELB.DetachLoadBalancerFromSubnets     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for DetachLoadBalancerFromSubnets. --+--+-- -- /See:/ 'detachLoadBalancerFromSubnets' smart constructor. data DetachLoadBalancerFromSubnets = DetachLoadBalancerFromSubnets'     { _dlbfsLoadBalancerName :: !Text@@ -57,9 +61,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbfsLoadBalancerName'+-- * 'dlbfsLoadBalancerName' - The name of the load balancer. ----- * 'dlbfsSubnets'+-- * 'dlbfsSubnets' - The IDs of the subnets. detachLoadBalancerFromSubnets     :: Text -- ^ 'dlbfsLoadBalancerName'     -> DetachLoadBalancerFromSubnets@@ -113,6 +117,8 @@  -- | Contains the output of DetachLoadBalancerFromSubnets. --+--+-- -- /See:/ 'detachLoadBalancerFromSubnetsResponse' smart constructor. data DetachLoadBalancerFromSubnetsResponse = DetachLoadBalancerFromSubnetsResponse'     { _dlbfsrsSubnets        :: !(Maybe [Text])@@ -123,9 +129,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dlbfsrsSubnets'+-- * 'dlbfsrsSubnets' - The IDs of the remaining subnets for the load balancer. ----- * 'dlbfsrsResponseStatus'+-- * 'dlbfsrsResponseStatus' - -- | The response status code. detachLoadBalancerFromSubnetsResponse     :: Int -- ^ 'dlbfsrsResponseStatus'     -> DetachLoadBalancerFromSubnetsResponse@@ -139,7 +145,7 @@ dlbfsrsSubnets :: Lens' DetachLoadBalancerFromSubnetsResponse [Text] dlbfsrsSubnets = lens _dlbfsrsSubnets (\ s a -> s{_dlbfsrsSubnets = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. dlbfsrsResponseStatus :: Lens' DetachLoadBalancerFromSubnetsResponse Int dlbfsrsResponseStatus = lens _dlbfsrsResponseStatus (\ s a -> s{_dlbfsrsResponseStatus = a}); 

@@ -20,9 +20,11 @@ -- -- Removes the specified Availability Zones from the set of Availability Zones for the specified load balancer. ----- There must be at least one Availability Zone registered with a load balancer at all times. After an Availability Zone is removed, all instances registered with the load balancer that are in the removed Availability Zone go into the 'OutOfService' state. Then, the load balancer attempts to equally balance the traffic among its remaining Availability Zones. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-az.html Add or Remove Availability Zones> in the /Classic Load Balancers Guide/.+-- There must be at least one Availability Zone registered with a load balancer at all times. After an Availability Zone is removed, all instances registered with the load balancer that are in the removed Availability Zone go into the @OutOfService@ state. Then, the load balancer attempts to equally balance the traffic among its remaining Availability Zones.+--+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-az.html Add or Remove Availability Zones> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.DisableAvailabilityZonesForLoadBalancer     (     -- * Creating a Request@@ -49,6 +51,8 @@  -- | Contains the parameters for DisableAvailabilityZonesForLoadBalancer. --+--+-- -- /See:/ 'disableAvailabilityZonesForLoadBalancer' smart constructor. data DisableAvailabilityZonesForLoadBalancer = DisableAvailabilityZonesForLoadBalancer'     { _dazflbLoadBalancerName  :: !Text@@ -59,9 +63,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dazflbLoadBalancerName'+-- * 'dazflbLoadBalancerName' - The name of the load balancer. ----- * 'dazflbAvailabilityZones'+-- * 'dazflbAvailabilityZones' - The Availability Zones. disableAvailabilityZonesForLoadBalancer     :: Text -- ^ 'dazflbLoadBalancerName'     -> DisableAvailabilityZonesForLoadBalancer@@ -121,6 +125,8 @@  -- | Contains the output for DisableAvailabilityZonesForLoadBalancer. --+--+-- -- /See:/ 'disableAvailabilityZonesForLoadBalancerResponse' smart constructor. data DisableAvailabilityZonesForLoadBalancerResponse = DisableAvailabilityZonesForLoadBalancerResponse'     { _dazflbrsAvailabilityZones :: !(Maybe [Text])@@ -131,9 +137,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dazflbrsAvailabilityZones'+-- * 'dazflbrsAvailabilityZones' - The remaining Availability Zones for the load balancer. ----- * 'dazflbrsResponseStatus'+-- * 'dazflbrsResponseStatus' - -- | The response status code. disableAvailabilityZonesForLoadBalancerResponse     :: Int -- ^ 'dazflbrsResponseStatus'     -> DisableAvailabilityZonesForLoadBalancerResponse@@ -147,7 +153,7 @@ dazflbrsAvailabilityZones :: Lens' DisableAvailabilityZonesForLoadBalancerResponse [Text] dazflbrsAvailabilityZones = lens _dazflbrsAvailabilityZones (\ s a -> s{_dazflbrsAvailabilityZones = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. dazflbrsResponseStatus :: Lens' DisableAvailabilityZonesForLoadBalancerResponse Int dazflbrsResponseStatus = lens _dazflbrsResponseStatus (\ s a -> s{_dazflbrsResponseStatus = a}); 

@@ -20,9 +20,11 @@ -- -- Adds the specified Availability Zones to the set of Availability Zones for the specified load balancer. --+-- -- The load balancer evenly distributes requests across all its registered Availability Zones that contain instances. ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-az.html Add or Remove Availability Zones> in the /Classic Load Balancers Guide/.+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-az.html Add or Remove Availability Zones> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.EnableAvailabilityZonesForLoadBalancer     (     -- * Creating a Request@@ -49,6 +51,8 @@  -- | Contains the parameters for EnableAvailabilityZonesForLoadBalancer. --+--+-- -- /See:/ 'enableAvailabilityZonesForLoadBalancer' smart constructor. data EnableAvailabilityZonesForLoadBalancer = EnableAvailabilityZonesForLoadBalancer'     { _eazflbLoadBalancerName  :: !Text@@ -59,9 +63,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'eazflbLoadBalancerName'+-- * 'eazflbLoadBalancerName' - The name of the load balancer. ----- * 'eazflbAvailabilityZones'+-- * 'eazflbAvailabilityZones' - The Availability Zones. These must be in the same region as the load balancer. enableAvailabilityZonesForLoadBalancer     :: Text -- ^ 'eazflbLoadBalancerName'     -> EnableAvailabilityZonesForLoadBalancer@@ -121,6 +125,8 @@  -- | Contains the output of EnableAvailabilityZonesForLoadBalancer. --+--+-- -- /See:/ 'enableAvailabilityZonesForLoadBalancerResponse' smart constructor. data EnableAvailabilityZonesForLoadBalancerResponse = EnableAvailabilityZonesForLoadBalancerResponse'     { _eazflbrsAvailabilityZones :: !(Maybe [Text])@@ -131,9 +137,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'eazflbrsAvailabilityZones'+-- * 'eazflbrsAvailabilityZones' - The updated list of Availability Zones for the load balancer. ----- * 'eazflbrsResponseStatus'+-- * 'eazflbrsResponseStatus' - -- | The response status code. enableAvailabilityZonesForLoadBalancerResponse     :: Int -- ^ 'eazflbrsResponseStatus'     -> EnableAvailabilityZonesForLoadBalancerResponse@@ -147,7 +153,7 @@ eazflbrsAvailabilityZones :: Lens' EnableAvailabilityZonesForLoadBalancerResponse [Text] eazflbrsAvailabilityZones = lens _eazflbrsAvailabilityZones (\ s a -> s{_eazflbrsAvailabilityZones = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. eazflbrsResponseStatus :: Lens' EnableAvailabilityZonesForLoadBalancerResponse Int eazflbrsResponseStatus = lens _eazflbrsResponseStatus (\ s a -> s{_eazflbrsResponseStatus = a}); 

@@ -20,18 +20,21 @@ -- -- Modifies the attributes of the specified load balancer. ----- You can modify the load balancer attributes, such as 'AccessLogs', 'ConnectionDraining', and 'CrossZoneLoadBalancing' by either enabling or disabling them. Or, you can modify the load balancer attribute 'ConnectionSettings' by specifying an idle connection timeout value for your load balancer. ----- For more information, see the following in the /Classic Load Balancers Guide/:+-- You can modify the load balancer attributes, such as @AccessLogs@ , @ConnectionDraining@ , and @CrossZoneLoadBalancing@ by either enabling or disabling them. Or, you can modify the load balancer attribute @ConnectionSettings@ by specifying an idle connection timeout value for your load balancer. ----- -   <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-crosszone-lb.html Cross-Zone Load Balancing>+-- For more information, see the following in the /Classic Load Balancers Guide/ : ----- -   <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-conn-drain.html Connection Draining>+--     * <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-crosszone-lb.html Cross-Zone Load Balancing> ----- -   <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/access-log-collection.html Access Logs>+--     * <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-conn-drain.html Connection Draining> ----- -   <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-idle-timeout.html Idle Connection Timeout>+--     * <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/access-log-collection.html Access Logs> --+--     * <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-idle-timeout.html Idle Connection Timeout>+--+--+-- module Network.AWS.ELB.ModifyLoadBalancerAttributes     (     -- * Creating a Request@@ -59,6 +62,8 @@  -- | Contains the parameters for ModifyLoadBalancerAttributes. --+--+-- -- /See:/ 'modifyLoadBalancerAttributes' smart constructor. data ModifyLoadBalancerAttributes = ModifyLoadBalancerAttributes'     { _mlbaLoadBalancerName       :: !Text@@ -69,9 +74,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'mlbaLoadBalancerName'+-- * 'mlbaLoadBalancerName' - The name of the load balancer. ----- * 'mlbaLoadBalancerAttributes'+-- * 'mlbaLoadBalancerAttributes' - The attributes of the load balancer. modifyLoadBalancerAttributes     :: Text -- ^ 'mlbaLoadBalancerName'     -> LoadBalancerAttributes -- ^ 'mlbaLoadBalancerAttributes'@@ -126,6 +131,8 @@  -- | Contains the output of ModifyLoadBalancerAttributes. --+--+-- -- /See:/ 'modifyLoadBalancerAttributesResponse' smart constructor. data ModifyLoadBalancerAttributesResponse = ModifyLoadBalancerAttributesResponse'     { _mlbarsLoadBalancerName       :: !(Maybe Text)@@ -137,11 +144,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'mlbarsLoadBalancerName'+-- * 'mlbarsLoadBalancerName' - The name of the load balancer. ----- * 'mlbarsLoadBalancerAttributes'+-- * 'mlbarsLoadBalancerAttributes' - Undocumented member. ----- * 'mlbarsResponseStatus'+-- * 'mlbarsResponseStatus' - -- | The response status code. modifyLoadBalancerAttributesResponse     :: Int -- ^ 'mlbarsResponseStatus'     -> ModifyLoadBalancerAttributesResponse@@ -160,7 +167,7 @@ mlbarsLoadBalancerAttributes :: Lens' ModifyLoadBalancerAttributesResponse (Maybe LoadBalancerAttributes) mlbarsLoadBalancerAttributes = lens _mlbarsLoadBalancerAttributes (\ s a -> s{_mlbarsLoadBalancerAttributes = a}); --- | The response status code.+-- | -- | The response status code. mlbarsResponseStatus :: Lens' ModifyLoadBalancerAttributesResponse Int mlbarsResponseStatus = lens _mlbarsResponseStatus (\ s a -> s{_mlbarsResponseStatus = a}); 

@@ -20,15 +20,17 @@ -- -- Adds the specified instances to the specified load balancer. --+-- -- The instance must be a running instance in the same network as the load balancer (EC2-Classic or the same VPC). If you have EC2-Classic instances and a load balancer in a VPC with ClassicLink enabled, you can link the EC2-Classic instances to that VPC and then register the linked EC2-Classic instances with the load balancer in the VPC. ----- Note that 'RegisterInstanceWithLoadBalancer' completes when the request has been registered. Instance registration takes a little time to complete. To check the state of the registered instances, use < DescribeLoadBalancers> or < DescribeInstanceHealth>.+-- Note that @RegisterInstanceWithLoadBalancer@ completes when the request has been registered. Instance registration takes a little time to complete. To check the state of the registered instances, use 'DescribeLoadBalancers' or 'DescribeInstanceHealth' . ----- After the instance is registered, it starts receiving traffic and requests from the load balancer. Any instance that is not in one of the Availability Zones registered for the load balancer is moved to the 'OutOfService' state. If an Availability Zone is added to the load balancer later, any instances registered with the load balancer move to the 'InService' state.+-- After the instance is registered, it starts receiving traffic and requests from the load balancer. Any instance that is not in one of the Availability Zones registered for the load balancer is moved to the @OutOfService@ state. If an Availability Zone is added to the load balancer later, any instances registered with the load balancer move to the @InService@ state. ----- To deregister instances from a load balancer, use < DeregisterInstancesFromLoadBalancer>.+-- To deregister instances from a load balancer, use 'DeregisterInstancesFromLoadBalancer' . ----- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-deregister-register-instances.html Register or De-Register EC2 Instances> in the /Classic Load Balancers Guide/.+-- For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-deregister-register-instances.html Register or De-Register EC2 Instances> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.RegisterInstancesWithLoadBalancer     (     -- * Creating a Request@@ -55,6 +57,8 @@  -- | Contains the parameters for RegisterInstancesWithLoadBalancer. --+--+-- -- /See:/ 'registerInstancesWithLoadBalancer' smart constructor. data RegisterInstancesWithLoadBalancer = RegisterInstancesWithLoadBalancer'     { _riwlbLoadBalancerName :: !Text@@ -65,9 +69,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'riwlbLoadBalancerName'+-- * 'riwlbLoadBalancerName' - The name of the load balancer. ----- * 'riwlbInstances'+-- * 'riwlbInstances' - The IDs of the instances. registerInstancesWithLoadBalancer     :: Text -- ^ 'riwlbLoadBalancerName'     -> RegisterInstancesWithLoadBalancer@@ -123,6 +127,8 @@  -- | Contains the output of RegisterInstancesWithLoadBalancer. --+--+-- -- /See:/ 'registerInstancesWithLoadBalancerResponse' smart constructor. data RegisterInstancesWithLoadBalancerResponse = RegisterInstancesWithLoadBalancerResponse'     { _riwlbrsInstances      :: !(Maybe [Instance])@@ -133,9 +139,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'riwlbrsInstances'+-- * 'riwlbrsInstances' - The updated list of instances for the load balancer. ----- * 'riwlbrsResponseStatus'+-- * 'riwlbrsResponseStatus' - -- | The response status code. registerInstancesWithLoadBalancerResponse     :: Int -- ^ 'riwlbrsResponseStatus'     -> RegisterInstancesWithLoadBalancerResponse@@ -149,7 +155,7 @@ riwlbrsInstances :: Lens' RegisterInstancesWithLoadBalancerResponse [Instance] riwlbrsInstances = lens _riwlbrsInstances (\ s a -> s{_riwlbrsInstances = a}) . _Default . _Coerce; --- | The response status code.+-- | -- | The response status code. riwlbrsResponseStatus :: Lens' RegisterInstancesWithLoadBalancerResponse Int riwlbrsResponseStatus = lens _riwlbrsResponseStatus (\ s a -> s{_riwlbrsResponseStatus = a}); 

@@ -19,6 +19,8 @@ -- Portability : non-portable (GHC extensions) -- -- Removes one or more tags from the specified load balancer.+--+-- module Network.AWS.ELB.RemoveTags     (     -- * Creating a Request@@ -44,6 +46,8 @@  -- | Contains the parameters for RemoveTags. --+--+-- -- /See:/ 'removeTags' smart constructor. data RemoveTags = RemoveTags'     { _rtLoadBalancerNames :: ![Text]@@ -54,9 +58,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'rtLoadBalancerNames'+-- * 'rtLoadBalancerNames' - The name of the load balancer. You can specify a maximum of one load balancer name. ----- * 'rtTags'+-- * 'rtTags' - The list of tag keys to remove. removeTags     :: NonEmpty TagKeyOnly -- ^ 'rtTags'     -> RemoveTags@@ -103,6 +107,8 @@  -- | Contains the output of RemoveTags. --+--+-- -- /See:/ 'removeTagsResponse' smart constructor. newtype RemoveTagsResponse = RemoveTagsResponse'     { _rtrsResponseStatus :: Int@@ -112,7 +118,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'rtrsResponseStatus'+-- * 'rtrsResponseStatus' - -- | The response status code. removeTagsResponse     :: Int -- ^ 'rtrsResponseStatus'     -> RemoveTagsResponse@@ -121,7 +127,7 @@     { _rtrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. rtrsResponseStatus :: Lens' RemoveTagsResponse Int rtrsResponseStatus = lens _rtrsResponseStatus (\ s a -> s{_rtrsResponseStatus = a}); 

@@ -18,9 +18,11 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Sets the certificate that terminates the specified listener\'s SSL connections. The specified certificate replaces any prior certificate that was used on the same load balancer and port.+-- Sets the certificate that terminates the specified listener's SSL connections. The specified certificate replaces any prior certificate that was used on the same load balancer and port. ----- For more information about updating your SSL certificate, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-update-ssl-cert.html Replace the SSL Certificate for Your Load Balancer> in the /Classic Load Balancers Guide/.+--+-- For more information about updating your SSL certificate, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-update-ssl-cert.html Replace the SSL Certificate for Your Load Balancer> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.SetLoadBalancerListenerSSLCertificate     (     -- * Creating a Request@@ -47,6 +49,8 @@  -- | Contains the parameters for SetLoadBalancerListenerSSLCertificate. --+--+-- -- /See:/ 'setLoadBalancerListenerSSLCertificate' smart constructor. data SetLoadBalancerListenerSSLCertificate = SetLoadBalancerListenerSSLCertificate'     { _slblscLoadBalancerName :: !Text@@ -58,11 +62,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'slblscLoadBalancerName'+-- * 'slblscLoadBalancerName' - The name of the load balancer. ----- * 'slblscLoadBalancerPort'+-- * 'slblscLoadBalancerPort' - The port that uses the specified SSL certificate. ----- * 'slblscSSLCertificateId'+-- * 'slblscSSLCertificateId' - The Amazon Resource Name (ARN) of the SSL certificate. setLoadBalancerListenerSSLCertificate     :: Text -- ^ 'slblscLoadBalancerName'     -> Int -- ^ 'slblscLoadBalancerPort'@@ -126,6 +130,8 @@  -- | Contains the output of SetLoadBalancerListenerSSLCertificate. --+--+-- -- /See:/ 'setLoadBalancerListenerSSLCertificateResponse' smart constructor. newtype SetLoadBalancerListenerSSLCertificateResponse = SetLoadBalancerListenerSSLCertificateResponse'     { _slblscrsResponseStatus :: Int@@ -135,7 +141,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'slblscrsResponseStatus'+-- * 'slblscrsResponseStatus' - -- | The response status code. setLoadBalancerListenerSSLCertificateResponse     :: Int -- ^ 'slblscrsResponseStatus'     -> SetLoadBalancerListenerSSLCertificateResponse@@ -144,7 +150,7 @@     { _slblscrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. slblscrsResponseStatus :: Lens' SetLoadBalancerListenerSSLCertificateResponse Int slblscrsResponseStatus = lens _slblscrsResponseStatus (\ s a -> s{_slblscrsResponseStatus = a}); 

@@ -20,11 +20,13 @@ -- -- Replaces the set of policies associated with the specified port on which the EC2 instance is listening with a new set of policies. At this time, only the back-end server authentication policy type can be applied to the instance ports; this policy type is composed of multiple public key policies. ----- Each time you use 'SetLoadBalancerPoliciesForBackendServer' to enable the policies, use the 'PolicyNames' parameter to list the policies that you want to enable. ----- You can use < DescribeLoadBalancers> or < DescribeLoadBalancerPolicies> to verify that the policy is associated with the EC2 instance.+-- Each time you use @SetLoadBalancerPoliciesForBackendServer@ to enable the policies, use the @PolicyNames@ parameter to list the policies that you want to enable. ----- For more information about enabling back-end instance authentication, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-create-https-ssl-load-balancer.html#configure_backendauth_clt Configure Back-end Instance Authentication> in the /Classic Load Balancers Guide/. For more information about Proxy Protocol, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-proxy-protocol.html Configure Proxy Protocol Support> in the /Classic Load Balancers Guide/.+-- You can use 'DescribeLoadBalancers' or 'DescribeLoadBalancerPolicies' to verify that the policy is associated with the EC2 instance.+--+-- For more information about enabling back-end instance authentication, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-create-https-ssl-load-balancer.html#configure_backendauth_clt Configure Back-end Instance Authentication> in the /Classic Load Balancers Guide/ . For more information about Proxy Protocol, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-proxy-protocol.html Configure Proxy Protocol Support> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.SetLoadBalancerPoliciesForBackendServer     (     -- * Creating a Request@@ -51,6 +53,8 @@  -- | Contains the parameters for SetLoadBalancerPoliciesForBackendServer. --+--+-- -- /See:/ 'setLoadBalancerPoliciesForBackendServer' smart constructor. data SetLoadBalancerPoliciesForBackendServer = SetLoadBalancerPoliciesForBackendServer'     { _slbpfbsLoadBalancerName :: !Text@@ -62,11 +66,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'slbpfbsLoadBalancerName'+-- * 'slbpfbsLoadBalancerName' - The name of the load balancer. ----- * 'slbpfbsInstancePort'+-- * 'slbpfbsInstancePort' - The port number associated with the EC2 instance. ----- * 'slbpfbsPolicyNames'+-- * 'slbpfbsPolicyNames' - The names of the policies. If the list is empty, then all current polices are removed from the EC2 instance. setLoadBalancerPoliciesForBackendServer     :: Text -- ^ 'slbpfbsLoadBalancerName'     -> Int -- ^ 'slbpfbsInstancePort'@@ -131,6 +135,8 @@  -- | Contains the output of SetLoadBalancerPoliciesForBackendServer. --+--+-- -- /See:/ 'setLoadBalancerPoliciesForBackendServerResponse' smart constructor. newtype SetLoadBalancerPoliciesForBackendServerResponse = SetLoadBalancerPoliciesForBackendServerResponse'     { _slbpfbsrsResponseStatus :: Int@@ -140,7 +146,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'slbpfbsrsResponseStatus'+-- * 'slbpfbsrsResponseStatus' - -- | The response status code. setLoadBalancerPoliciesForBackendServerResponse     :: Int -- ^ 'slbpfbsrsResponseStatus'     -> SetLoadBalancerPoliciesForBackendServerResponse@@ -149,7 +155,7 @@     { _slbpfbsrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. slbpfbsrsResponseStatus :: Lens' SetLoadBalancerPoliciesForBackendServerResponse Int slbpfbsrsResponseStatus = lens _slbpfbsrsResponseStatus (\ s a -> s{_slbpfbsrsResponseStatus = a}); 

@@ -20,9 +20,11 @@ -- -- Replaces the current set of policies for the specified load balancer port with the specified set of policies. ----- To enable back-end server authentication, use < SetLoadBalancerPoliciesForBackendServer>. ----- For more information about setting policies, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/ssl-config-update.html Update the SSL Negotiation Configuration>, <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-duration Duration-Based Session Stickiness>, and <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-application Application-Controlled Session Stickiness> in the /Classic Load Balancers Guide/.+-- To enable back-end server authentication, use 'SetLoadBalancerPoliciesForBackendServer' .+--+-- For more information about setting policies, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/ssl-config-update.html Update the SSL Negotiation Configuration> , <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-duration Duration-Based Session Stickiness> , and <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-sticky-sessions.html#enable-sticky-sessions-application Application-Controlled Session Stickiness> in the /Classic Load Balancers Guide/ .+-- module Network.AWS.ELB.SetLoadBalancerPoliciesOfListener     (     -- * Creating a Request@@ -49,6 +51,8 @@  -- | Contains the parameters for SetLoadBalancePoliciesOfListener. --+--+-- -- /See:/ 'setLoadBalancerPoliciesOfListener' smart constructor. data SetLoadBalancerPoliciesOfListener = SetLoadBalancerPoliciesOfListener'     { _slbpolLoadBalancerName :: !Text@@ -60,11 +64,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'slbpolLoadBalancerName'+-- * 'slbpolLoadBalancerName' - The name of the load balancer. ----- * 'slbpolLoadBalancerPort'+-- * 'slbpolLoadBalancerPort' - The external port of the load balancer. ----- * 'slbpolPolicyNames'+-- * 'slbpolPolicyNames' - The names of the policies. This list must include all policies to be enabled. If you omit a policy that is currently enabled, it is disabled. If the list is empty, all current policies are disabled. setLoadBalancerPoliciesOfListener     :: Text -- ^ 'slbpolLoadBalancerName'     -> Int -- ^ 'slbpolLoadBalancerPort'@@ -126,6 +130,8 @@  -- | Contains the output of SetLoadBalancePoliciesOfListener. --+--+-- -- /See:/ 'setLoadBalancerPoliciesOfListenerResponse' smart constructor. newtype SetLoadBalancerPoliciesOfListenerResponse = SetLoadBalancerPoliciesOfListenerResponse'     { _slbpolrsResponseStatus :: Int@@ -135,7 +141,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'slbpolrsResponseStatus'+-- * 'slbpolrsResponseStatus' - -- | The response status code. setLoadBalancerPoliciesOfListenerResponse     :: Int -- ^ 'slbpolrsResponseStatus'     -> SetLoadBalancerPoliciesOfListenerResponse@@ -144,7 +150,7 @@     { _slbpolrsResponseStatus = pResponseStatus_     } --- | The response status code.+-- | -- | The response status code. slbpolrsResponseStatus :: Lens' SetLoadBalancerPoliciesOfListenerResponse Int slbpolrsResponseStatus = lens _slbpolrsResponseStatus (\ s a -> s{_slbpolrsResponseStatus = a}); 

@@ -38,6 +38,9 @@     , _TooManyPoliciesException     , _CertificateNotFoundException +    -- * Re-exported Types+    , module Network.AWS.ELB.Internal+     -- * AccessLog     , AccessLog     , accessLog@@ -218,13 +221,14 @@     , tkoKey     ) where +import           Network.AWS.ELB.Internal import           Network.AWS.ELB.Types.Product import           Network.AWS.ELB.Types.Sum import           Network.AWS.Lens import           Network.AWS.Prelude import           Network.AWS.Sign.V4 --- | API version '2012-06-01' of the Amazon Elastic Load Balancing SDK configuration.+-- | API version @2012-06-01@ of the Amazon Elastic Load Balancing SDK configuration. elb :: Service elb =     Service@@ -259,55 +263,77 @@       | otherwise = Nothing  -- | One or more of the specified policies do not exist.+--+-- _PolicyNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _PolicyNotFoundException =     _ServiceError . hasStatus 400 . hasCode "PolicyNotFound"  -- | The specified load balancer does not exist.+--+-- _AccessPointNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _AccessPointNotFoundException =     _ServiceError . hasStatus 400 . hasCode "LoadBalancerNotFound"  -- | A policy with the specified name already exists for this load balancer.+--+-- _DuplicatePolicyNameException :: AsError a => Getting (First ServiceError) a ServiceError _DuplicatePolicyNameException =     _ServiceError . hasStatus 400 . hasCode "DuplicatePolicyName"  -- | The requested configuration change is not valid.+--+-- _InvalidConfigurationRequestException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidConfigurationRequestException =     _ServiceError . hasStatus 409 . hasCode "InvalidConfigurationRequest"  -- | One or more of the specified subnets do not exist.+--+-- _SubnetNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _SubnetNotFoundException =     _ServiceError . hasStatus 400 . hasCode "SubnetNotFound"  -- | The specified load balancer attribute does not exist.+--+-- _LoadBalancerAttributeNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _LoadBalancerAttributeNotFoundException =     _ServiceError . hasStatus 400 . hasCode "LoadBalancerAttributeNotFound"  -- | The specified VPC has no associated Internet gateway.+--+-- _InvalidSubnetException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidSubnetException =     _ServiceError . hasStatus 400 . hasCode "InvalidSubnet"  -- | A tag key was specified more than once.+--+-- _DuplicateTagKeysException :: AsError a => Getting (First ServiceError) a ServiceError _DuplicateTagKeysException =     _ServiceError . hasStatus 400 . hasCode "DuplicateTagKeys"  -- | A listener already exists for the specified load balancer name and port, but with a different instance port, protocol, or SSL certificate.+--+-- _DuplicateListenerException :: AsError a => Getting (First ServiceError) a ServiceError _DuplicateListenerException =     _ServiceError . hasStatus 400 . hasCode "DuplicateListener"  -- | The quota for the number of tags that can be assigned to a load balancer has been reached.+--+-- _TooManyTagsException :: AsError a => Getting (First ServiceError) a ServiceError _TooManyTagsException = _ServiceError . hasStatus 400 . hasCode "TooManyTags"  -- | One or more of the specified policy types do not exist.+--+-- _PolicyTypeNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _PolicyTypeNotFoundException =     _ServiceError . hasStatus 400 . hasCode "PolicyTypeNotFound"@@ -318,21 +344,29 @@     _ServiceError . hasStatus 400 . hasCode "UnsupportedProtocol"  -- | The specified load balancer name already exists for this account.+--+-- _DuplicateAccessPointNameException :: AsError a => Getting (First ServiceError) a ServiceError _DuplicateAccessPointNameException =     _ServiceError . hasStatus 400 . hasCode "DuplicateLoadBalancerName"  -- | One or more of the specified security groups do not exist.+--+-- _InvalidSecurityGroupException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidSecurityGroupException =     _ServiceError . hasStatus 400 . hasCode "InvalidSecurityGroup"  -- | The load balancer does not have a listener configured at the specified port.+--+-- _ListenerNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _ListenerNotFoundException =     _ServiceError . hasStatus 400 . hasCode "ListenerNotFound"  -- | The specified endpoint is not valid.+--+-- _InvalidEndPointException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidEndPointException =     _ServiceError . hasStatus 400 . hasCode "InvalidInstance"@@ -343,21 +377,29 @@     _ServiceError . hasStatus 400 . hasCode "DependencyThrottle"  -- | The specified value for the schema is not valid. You can only specify a scheme for load balancers in a VPC.+--+-- _InvalidSchemeException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidSchemeException =     _ServiceError . hasStatus 400 . hasCode "InvalidScheme"  -- | The quota for the number of load balancers has been reached.+--+-- _TooManyAccessPointsException :: AsError a => Getting (First ServiceError) a ServiceError _TooManyAccessPointsException =     _ServiceError . hasStatus 400 . hasCode "TooManyLoadBalancers"  -- | The quota for the number of policies for this load balancer has been reached.+--+-- _TooManyPoliciesException :: AsError a => Getting (First ServiceError) a ServiceError _TooManyPoliciesException =     _ServiceError . hasStatus 400 . hasCode "TooManyPolicies"  -- | The specified ARN does not refer to a valid SSL certificate in AWS Identity and Access Management (IAM) or AWS Certificate Manager (ACM). Note that if you recently uploaded the certificate to IAM, this error might indicate that the certificate is not fully available yet.+--+-- _CertificateNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError _CertificateNotFoundException =     _ServiceError . hasStatus 400 . hasCode "CertificateNotFound"

@@ -17,12 +17,15 @@ -- module Network.AWS.ELB.Types.Product where +import           Network.AWS.ELB.Internal import           Network.AWS.ELB.Types.Sum import           Network.AWS.Lens import           Network.AWS.Prelude --- | Information about the 'AccessLog' attribute.+-- | Information about the @AccessLog@ attribute. --+--+-- -- /See:/ 'accessLog' smart constructor. data AccessLog = AccessLog'     { _alEmitInterval   :: !(Maybe Int)@@ -35,13 +38,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'alEmitInterval'+-- * 'alEmitInterval' - The interval for publishing the access logs. You can specify an interval of either 5 minutes or 60 minutes. Default: 60 minutes ----- * 'alS3BucketPrefix'+-- * 'alS3BucketPrefix' - The logical hierarchy you created for your Amazon S3 bucket, for example @my-bucket-prefix/prod@ . If the prefix is not provided, the log is placed at the root level of the bucket. ----- * 'alS3BucketName'+-- * 'alS3BucketName' - The name of the Amazon S3 bucket where the access logs are stored. ----- * 'alEnabled'+-- * 'alEnabled' - Specifies whether access logs are enabled for the load balancer. accessLog     :: Bool -- ^ 'alEnabled'     -> AccessLog@@ -53,13 +56,11 @@     , _alEnabled = pEnabled_     } --- | The interval for publishing the access logs. You can specify an interval of either 5 minutes or 60 minutes.------ Default: 60 minutes+-- | The interval for publishing the access logs. You can specify an interval of either 5 minutes or 60 minutes. Default: 60 minutes alEmitInterval :: Lens' AccessLog (Maybe Int) alEmitInterval = lens _alEmitInterval (\ s a -> s{_alEmitInterval = a}); --- | The logical hierarchy you created for your Amazon S3 bucket, for example 'my-bucket-prefix\/prod'. If the prefix is not provided, the log is placed at the root level of the bucket.+-- | The logical hierarchy you created for your Amazon S3 bucket, for example @my-bucket-prefix/prod@ . If the prefix is not provided, the log is placed at the root level of the bucket. alS3BucketPrefix :: Lens' AccessLog (Maybe Text) alS3BucketPrefix = lens _alS3BucketPrefix (\ s a -> s{_alS3BucketPrefix = a}); @@ -92,6 +93,8 @@  -- | This data type is reserved. --+--+-- -- /See:/ 'additionalAttribute' smart constructor. data AdditionalAttribute = AdditionalAttribute'     { _aaValue :: !(Maybe Text)@@ -102,9 +105,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'aaValue'+-- * 'aaValue' - This parameter is reserved. ----- * 'aaKey'+-- * 'aaKey' - This parameter is reserved. additionalAttribute     :: AdditionalAttribute additionalAttribute =@@ -136,6 +139,8 @@  -- | Information about a policy for application-controlled session stickiness. --+--+-- -- /See:/ 'appCookieStickinessPolicy' smart constructor. data AppCookieStickinessPolicy = AppCookieStickinessPolicy'     { _acspPolicyName :: !(Maybe Text)@@ -146,9 +151,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'acspPolicyName'+-- * 'acspPolicyName' - The mnemonic name for the policy being created. The name must be unique within a set of policies for this load balancer. ----- * 'acspCookieName'+-- * 'acspCookieName' - The name of the application cookie used for stickiness. appCookieStickinessPolicy     :: AppCookieStickinessPolicy appCookieStickinessPolicy =@@ -176,6 +181,8 @@  -- | Information about the configuration of an EC2 instance. --+--+-- -- /See:/ 'backendServerDescription' smart constructor. data BackendServerDescription = BackendServerDescription'     { _bsdPolicyNames  :: !(Maybe [Text])@@ -186,9 +193,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'bsdPolicyNames'+-- * 'bsdPolicyNames' - The names of the policies enabled for the EC2 instance. ----- * 'bsdInstancePort'+-- * 'bsdInstancePort' - The port on which the EC2 instance is listening. backendServerDescription     :: BackendServerDescription backendServerDescription =@@ -216,8 +223,10 @@  instance NFData BackendServerDescription --- | Information about the 'ConnectionDraining' attribute.+-- | Information about the @ConnectionDraining@ attribute. --+--+-- -- /See:/ 'connectionDraining' smart constructor. data ConnectionDraining = ConnectionDraining'     { _cdTimeout :: !(Maybe Int)@@ -228,9 +237,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cdTimeout'+-- * 'cdTimeout' - The maximum time, in seconds, to keep the existing connections open before deregistering the instances. ----- * 'cdEnabled'+-- * 'cdEnabled' - Specifies whether connection draining is enabled for the load balancer. connectionDraining     :: Bool -- ^ 'cdEnabled'     -> ConnectionDraining@@ -262,8 +271,10 @@           = mconcat               ["Timeout" =: _cdTimeout, "Enabled" =: _cdEnabled] --- | Information about the 'ConnectionSettings' attribute.+-- | Information about the @ConnectionSettings@ attribute. --+--+-- -- /See:/ 'connectionSettings' smart constructor. newtype ConnectionSettings = ConnectionSettings'     { _csIdleTimeout :: Nat@@ -273,7 +284,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'csIdleTimeout'+-- * 'csIdleTimeout' - The time, in seconds, that the connection is allowed to be idle (no data has been sent over the connection) before it is closed by the load balancer. connectionSettings     :: Natural -- ^ 'csIdleTimeout'     -> ConnectionSettings@@ -298,8 +309,10 @@         toQuery ConnectionSettings'{..}           = mconcat ["IdleTimeout" =: _csIdleTimeout] --- | Information about the 'CrossZoneLoadBalancing' attribute.+-- | Information about the @CrossZoneLoadBalancing@ attribute. --+--+-- -- /See:/ 'crossZoneLoadBalancing' smart constructor. newtype CrossZoneLoadBalancing = CrossZoneLoadBalancing'     { _czlbEnabled :: Bool@@ -309,7 +322,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'czlbEnabled'+-- * 'czlbEnabled' - Specifies whether cross-zone load balancing is enabled for the load balancer. crossZoneLoadBalancing     :: Bool -- ^ 'czlbEnabled'     -> CrossZoneLoadBalancing@@ -336,6 +349,8 @@  -- | Information about a health check. --+--+-- -- /See:/ 'healthCheck' smart constructor. data HealthCheck = HealthCheck'     { _hcTarget             :: !Text@@ -349,15 +364,15 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'hcTarget'+-- * 'hcTarget' - The instance being checked. The protocol is either TCP, HTTP, HTTPS, or SSL. The range of valid ports is one (1) through 65535. TCP is the default, specified as a TCP: port pair, for example "TCP:5000". In this case, a health check simply attempts to open a TCP connection to the instance on the specified port. Failure to connect within the configured timeout is considered unhealthy. SSL is also specified as SSL: port pair, for example, SSL:5000. For HTTP/HTTPS, you must include a ping path in the string. HTTP is specified as a HTTP:port;/;PathToPing; grouping, for example "HTTP:80/weather/us/wa/seattle". In this case, a HTTP GET request is issued to the instance on the given port and path. Any answer other than "200 OK" within the timeout period is considered unhealthy. The total length of the HTTP ping target must be 1024 16-bit Unicode characters or less. ----- * 'hcInterval'+-- * 'hcInterval' - The approximate interval, in seconds, between health checks of an individual instance. ----- * 'hcTimeout'+-- * 'hcTimeout' - The amount of time, in seconds, during which no response means a failed health check. This value must be less than the @Interval@ value. ----- * 'hcUnhealthyThreshold'+-- * 'hcUnhealthyThreshold' - The number of consecutive health check failures required before moving the instance to the @Unhealthy@ state. ----- * 'hcHealthyThreshold'+-- * 'hcHealthyThreshold' - The number of consecutive health checks successes required before moving the instance to the @Healthy@ state. healthCheck     :: Text -- ^ 'hcTarget'     -> Natural -- ^ 'hcInterval'@@ -374,15 +389,7 @@     , _hcHealthyThreshold = _Nat # pHealthyThreshold_     } --- | The instance being checked. The protocol is either TCP, HTTP, HTTPS, or SSL. The range of valid ports is one (1) through 65535.------ TCP is the default, specified as a TCP: port pair, for example \"TCP:5000\". In this case, a health check simply attempts to open a TCP connection to the instance on the specified port. Failure to connect within the configured timeout is considered unhealthy.------ SSL is also specified as SSL: port pair, for example, SSL:5000.------ For HTTP\/HTTPS, you must include a ping path in the string. HTTP is specified as a HTTP:port;\/;PathToPing; grouping, for example \"HTTP:80\/weather\/us\/wa\/seattle\". In this case, a HTTP GET request is issued to the instance on the given port and path. Any answer other than \"200 OK\" within the timeout period is considered unhealthy.------ The total length of the HTTP ping target must be 1024 16-bit Unicode characters or less.+-- | The instance being checked. The protocol is either TCP, HTTP, HTTPS, or SSL. The range of valid ports is one (1) through 65535. TCP is the default, specified as a TCP: port pair, for example "TCP:5000". In this case, a health check simply attempts to open a TCP connection to the instance on the specified port. Failure to connect within the configured timeout is considered unhealthy. SSL is also specified as SSL: port pair, for example, SSL:5000. For HTTP/HTTPS, you must include a ping path in the string. HTTP is specified as a HTTP:port;/;PathToPing; grouping, for example "HTTP:80/weather/us/wa/seattle". In this case, a HTTP GET request is issued to the instance on the given port and path. Any answer other than "200 OK" within the timeout period is considered unhealthy. The total length of the HTTP ping target must be 1024 16-bit Unicode characters or less. hcTarget :: Lens' HealthCheck Text hcTarget = lens _hcTarget (\ s a -> s{_hcTarget = a}); @@ -390,17 +397,15 @@ hcInterval :: Lens' HealthCheck Natural hcInterval = lens _hcInterval (\ s a -> s{_hcInterval = a}) . _Nat; --- | The amount of time, in seconds, during which no response means a failed health check.------ This value must be less than the 'Interval' value.+-- | The amount of time, in seconds, during which no response means a failed health check. This value must be less than the @Interval@ value. hcTimeout :: Lens' HealthCheck Natural hcTimeout = lens _hcTimeout (\ s a -> s{_hcTimeout = a}) . _Nat; --- | The number of consecutive health check failures required before moving the instance to the 'Unhealthy' state.+-- | The number of consecutive health check failures required before moving the instance to the @Unhealthy@ state. hcUnhealthyThreshold :: Lens' HealthCheck Natural hcUnhealthyThreshold = lens _hcUnhealthyThreshold (\ s a -> s{_hcUnhealthyThreshold = a}) . _Nat; --- | The number of consecutive health checks successes required before moving the instance to the 'Healthy' state.+-- | The number of consecutive health checks successes required before moving the instance to the @Healthy@ state. hcHealthyThreshold :: Lens' HealthCheck Natural hcHealthyThreshold = lens _hcHealthyThreshold (\ s a -> s{_hcHealthyThreshold = a}) . _Nat; @@ -426,6 +431,8 @@  -- | The ID of an EC2 instance. --+--+-- -- /See:/ 'instance'' smart constructor. newtype Instance = Instance'     { _iInstanceId :: Maybe Text@@ -435,7 +442,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'iInstanceId'+-- * 'iInstanceId' - The instance ID. instance'     :: Instance instance' =@@ -460,6 +467,8 @@  -- | Information about the state of an EC2 instance. --+--+-- -- /See:/ 'instanceState' smart constructor. data InstanceState = InstanceState'     { _isInstanceId  :: !(Maybe Text)@@ -472,13 +481,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'isInstanceId'+-- * 'isInstanceId' - The ID of the instance. ----- * 'isState'+-- * 'isState' - The current state of the instance. Valid values: @InService@ | @OutOfService@ | @Unknown@ ----- * 'isReasonCode'+-- * 'isReasonCode' - Information about the cause of @OutOfService@ instances. Specifically, whether the cause is Elastic Load Balancing or the instance. Valid values: @ELB@ | @Instance@ | @N/A@ ----- * 'isDescription'+-- * 'isDescription' - A description of the instance state. This string can contain one or more of the following messages.     * @N/A@      * @A transient error occurred. Please try again later.@      * @Instance has failed at least the UnhealthyThreshold number of health checks consecutively.@      * @Instance has not passed the configured HealthyThreshold number of health checks consecutively.@      * @Instance registration is still in progress.@      * @Instance is in the EC2 Availability Zone for which LoadBalancer is not configured to route traffic to.@      * @Instance is not currently registered with the LoadBalancer.@      * @Instance deregistration currently in progress.@      * @Disable Availability Zone is currently in progress.@      * @Instance is in pending state.@      * @Instance is in stopped state.@      * @Instance is in terminated state.@ instanceState     :: InstanceState instanceState =@@ -493,44 +502,15 @@ isInstanceId :: Lens' InstanceState (Maybe Text) isInstanceId = lens _isInstanceId (\ s a -> s{_isInstanceId = a}); --- | The current state of the instance.------ Valid values: 'InService' | 'OutOfService' | 'Unknown'+-- | The current state of the instance. Valid values: @InService@ | @OutOfService@ | @Unknown@ isState :: Lens' InstanceState (Maybe Text) isState = lens _isState (\ s a -> s{_isState = a}); --- | Information about the cause of 'OutOfService' instances. Specifically, whether the cause is Elastic Load Balancing or the instance.------ Valid values: 'ELB' | 'Instance' | 'N\/A'+-- | Information about the cause of @OutOfService@ instances. Specifically, whether the cause is Elastic Load Balancing or the instance. Valid values: @ELB@ | @Instance@ | @N/A@ isReasonCode :: Lens' InstanceState (Maybe Text) isReasonCode = lens _isReasonCode (\ s a -> s{_isReasonCode = a}); --- | A description of the instance state. This string can contain one or more of the following messages.------ -   'N\/A'------ -   'A transient error occurred. Please try again later.'------ -   'Instance has failed at least the UnhealthyThreshold number of health checks consecutively.'------ -   'Instance has not passed the configured HealthyThreshold number of health checks consecutively.'------ -   'Instance registration is still in progress.'------ -   'Instance is in the EC2 Availability Zone for which LoadBalancer is not configured to route traffic to.'------ -   'Instance is not currently registered with the LoadBalancer.'------ -   'Instance deregistration currently in progress.'------ -   'Disable Availability Zone is currently in progress.'------ -   'Instance is in pending state.'------ -   'Instance is in stopped state.'------ -   'Instance is in terminated state.'---+-- | A description of the instance state. This string can contain one or more of the following messages.     * @N/A@      * @A transient error occurred. Please try again later.@      * @Instance has failed at least the UnhealthyThreshold number of health checks consecutively.@      * @Instance has not passed the configured HealthyThreshold number of health checks consecutively.@      * @Instance registration is still in progress.@      * @Instance is in the EC2 Availability Zone for which LoadBalancer is not configured to route traffic to.@      * @Instance is not currently registered with the LoadBalancer.@      * @Instance deregistration currently in progress.@      * @Disable Availability Zone is currently in progress.@      * @Instance is in pending state.@      * @Instance is in stopped state.@      * @Instance is in terminated state.@ isDescription :: Lens' InstanceState (Maybe Text) isDescription = lens _isDescription (\ s a -> s{_isDescription = a}); @@ -547,6 +527,8 @@  -- | Information about a policy for duration-based session stickiness. --+--+-- -- /See:/ 'lBCookieStickinessPolicy' smart constructor. data LBCookieStickinessPolicy = LBCookieStickinessPolicy'     { _lbcspPolicyName             :: !(Maybe Text)@@ -557,9 +539,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'lbcspPolicyName'+-- * 'lbcspPolicyName' - The name of the policy. This name must be unique within the set of policies for this load balancer. ----- * 'lbcspCookieExpirationPeriod'+-- * 'lbcspCookieExpirationPeriod' - The time period, in seconds, after which the cookie should be considered stale. If this parameter is not specified, the stickiness session lasts for the duration of the browser session. lBCookieStickinessPolicy     :: LBCookieStickinessPolicy lBCookieStickinessPolicy =@@ -588,8 +570,10 @@  -- | Information about a listener. ----- For information about the protocols and the ports supported by Elastic Load Balancing, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/. --+-- For information about the protocols and the ports supported by Elastic Load Balancing, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/elb-listener-config.html Listeners for Your Classic Load Balancer> in the /Classic Load Balancers Guide/ .+--+-- -- /See:/ 'listener' smart constructor. data Listener = Listener'     { _lInstanceProtocol :: !(Maybe Text)@@ -603,15 +587,15 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'lInstanceProtocol'+-- * 'lInstanceProtocol' - The protocol to use for routing traffic to instances: HTTP, HTTPS, TCP, or SSL. If the front-end protocol is HTTP, HTTPS, TCP, or SSL, @InstanceProtocol@ must be at the same protocol. If there is another listener with the same @InstancePort@ whose @InstanceProtocol@ is secure, (HTTPS or SSL), the listener's @InstanceProtocol@ must also be secure. If there is another listener with the same @InstancePort@ whose @InstanceProtocol@ is HTTP or TCP, the listener's @InstanceProtocol@ must be HTTP or TCP. ----- * 'lSSLCertificateId'+-- * 'lSSLCertificateId' - The Amazon Resource Name (ARN) of the server certificate. ----- * 'lProtocol'+-- * 'lProtocol' - The load balancer transport protocol to use for routing: HTTP, HTTPS, TCP, or SSL. ----- * 'lLoadBalancerPort'+-- * 'lLoadBalancerPort' - The port on which the load balancer is listening. On EC2-VPC, you can specify any port from the range 1-65535. On EC2-Classic, you can specify any port from the following list: 25, 80, 443, 465, 587, 1024-65535. ----- * 'lInstancePort'+-- * 'lInstancePort' - The port on which the instance is listening. listener     :: Text -- ^ 'lProtocol'     -> Int -- ^ 'lLoadBalancerPort'@@ -626,13 +610,7 @@     , _lInstancePort = _Nat # pInstancePort_     } --- | The protocol to use for routing traffic to instances: HTTP, HTTPS, TCP, or SSL.------ If the front-end protocol is HTTP, HTTPS, TCP, or SSL, 'InstanceProtocol' must be at the same protocol.------ If there is another listener with the same 'InstancePort' whose 'InstanceProtocol' is secure, (HTTPS or SSL), the listener\'s 'InstanceProtocol' must also be secure.------ If there is another listener with the same 'InstancePort' whose 'InstanceProtocol' is HTTP or TCP, the listener\'s 'InstanceProtocol' must be HTTP or TCP.+-- | The protocol to use for routing traffic to instances: HTTP, HTTPS, TCP, or SSL. If the front-end protocol is HTTP, HTTPS, TCP, or SSL, @InstanceProtocol@ must be at the same protocol. If there is another listener with the same @InstancePort@ whose @InstanceProtocol@ is secure, (HTTPS or SSL), the listener's @InstanceProtocol@ must also be secure. If there is another listener with the same @InstancePort@ whose @InstanceProtocol@ is HTTP or TCP, the listener's @InstanceProtocol@ must be HTTP or TCP. lInstanceProtocol :: Lens' Listener (Maybe Text) lInstanceProtocol = lens _lInstanceProtocol (\ s a -> s{_lInstanceProtocol = a}); @@ -676,6 +654,8 @@  -- | The policies enabled for a listener. --+--+-- -- /See:/ 'listenerDescription' smart constructor. data ListenerDescription = ListenerDescription'     { _ldPolicyNames :: !(Maybe [Text])@@ -686,9 +666,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ldPolicyNames'+-- * 'ldPolicyNames' - The policies. If there are no policies enabled, the list is empty. ----- * 'ldListener'+-- * 'ldListener' - Undocumented member. listenerDescription     :: ListenerDescription listenerDescription =@@ -718,6 +698,8 @@  -- | The attributes for a load balancer. --+--+-- -- /See:/ 'loadBalancerAttributes' smart constructor. data LoadBalancerAttributes = LoadBalancerAttributes'     { _lbaCrossZoneLoadBalancing :: !(Maybe CrossZoneLoadBalancing)@@ -731,15 +713,15 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'lbaCrossZoneLoadBalancing'+-- * 'lbaCrossZoneLoadBalancing' - If enabled, the load balancer routes the request traffic evenly across all instances regardless of the Availability Zones. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-crosszone-lb.html Configure Cross-Zone Load Balancing> in the /Classic Load Balancers Guide/ . ----- * 'lbaAccessLog'+-- * 'lbaAccessLog' - If enabled, the load balancer captures detailed information of all requests and delivers the information to the Amazon S3 bucket that you specify. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-access-logs.html Enable Access Logs> in the /Classic Load Balancers Guide/ . ----- * 'lbaAdditionalAttributes'+-- * 'lbaAdditionalAttributes' - This parameter is reserved. ----- * 'lbaConnectionSettings'+-- * 'lbaConnectionSettings' - If enabled, the load balancer allows the connections to remain idle (no data is sent over the connection) for the specified duration. By default, Elastic Load Balancing maintains a 60-second idle connection timeout for both front-end and back-end connections of your load balancer. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-idle-timeout.html Configure Idle Connection Timeout> in the /Classic Load Balancers Guide/ . ----- * 'lbaConnectionDraining'+-- * 'lbaConnectionDraining' - If enabled, the load balancer allows existing requests to complete before the load balancer shifts traffic away from a deregistered or unhealthy instance. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-conn-drain.html Configure Connection Draining> in the /Classic Load Balancers Guide/ . loadBalancerAttributes     :: LoadBalancerAttributes loadBalancerAttributes =@@ -751,15 +733,11 @@     , _lbaConnectionDraining = Nothing     } --- | If enabled, the load balancer routes the request traffic evenly across all instances regardless of the Availability Zones.------ For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-crosszone-lb.html Configure Cross-Zone Load Balancing> in the /Classic Load Balancers Guide/.+-- | If enabled, the load balancer routes the request traffic evenly across all instances regardless of the Availability Zones. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-disable-crosszone-lb.html Configure Cross-Zone Load Balancing> in the /Classic Load Balancers Guide/ . lbaCrossZoneLoadBalancing :: Lens' LoadBalancerAttributes (Maybe CrossZoneLoadBalancing) lbaCrossZoneLoadBalancing = lens _lbaCrossZoneLoadBalancing (\ s a -> s{_lbaCrossZoneLoadBalancing = a}); --- | If enabled, the load balancer captures detailed information of all requests and delivers the information to the Amazon S3 bucket that you specify.------ For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-access-logs.html Enable Access Logs> in the /Classic Load Balancers Guide/.+-- | If enabled, the load balancer captures detailed information of all requests and delivers the information to the Amazon S3 bucket that you specify. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-access-logs.html Enable Access Logs> in the /Classic Load Balancers Guide/ . lbaAccessLog :: Lens' LoadBalancerAttributes (Maybe AccessLog) lbaAccessLog = lens _lbaAccessLog (\ s a -> s{_lbaAccessLog = a}); @@ -767,15 +745,11 @@ lbaAdditionalAttributes :: Lens' LoadBalancerAttributes [AdditionalAttribute] lbaAdditionalAttributes = lens _lbaAdditionalAttributes (\ s a -> s{_lbaAdditionalAttributes = a}) . _Default . _Coerce; --- | If enabled, the load balancer allows the connections to remain idle (no data is sent over the connection) for the specified duration.------ By default, Elastic Load Balancing maintains a 60-second idle connection timeout for both front-end and back-end connections of your load balancer. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-idle-timeout.html Configure Idle Connection Timeout> in the /Classic Load Balancers Guide/.+-- | If enabled, the load balancer allows the connections to remain idle (no data is sent over the connection) for the specified duration. By default, Elastic Load Balancing maintains a 60-second idle connection timeout for both front-end and back-end connections of your load balancer. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-idle-timeout.html Configure Idle Connection Timeout> in the /Classic Load Balancers Guide/ . lbaConnectionSettings :: Lens' LoadBalancerAttributes (Maybe ConnectionSettings) lbaConnectionSettings = lens _lbaConnectionSettings (\ s a -> s{_lbaConnectionSettings = a}); --- | If enabled, the load balancer allows existing requests to complete before the load balancer shifts traffic away from a deregistered or unhealthy instance.------ For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-conn-drain.html Configure Connection Draining> in the /Classic Load Balancers Guide/.+-- | If enabled, the load balancer allows existing requests to complete before the load balancer shifts traffic away from a deregistered or unhealthy instance. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/config-conn-drain.html Configure Connection Draining> in the /Classic Load Balancers Guide/ . lbaConnectionDraining :: Lens' LoadBalancerAttributes (Maybe ConnectionDraining) lbaConnectionDraining = lens _lbaConnectionDraining (\ s a -> s{_lbaConnectionDraining = a}); @@ -808,6 +782,8 @@  -- | Information about a load balancer. --+--+-- -- /See:/ 'loadBalancerDescription' smart constructor. data LoadBalancerDescription = LoadBalancerDescription'     { _lbdSourceSecurityGroup       :: !(Maybe SourceSecurityGroup)@@ -832,37 +808,37 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'lbdSourceSecurityGroup'+-- * 'lbdSourceSecurityGroup' - The security group for the load balancer, which you can use as part of your inbound rules for your registered instances. To only allow traffic from load balancers, add a security group rule that specifies this source security group as the inbound source. ----- * 'lbdCanonicalHostedZoneName'+-- * 'lbdCanonicalHostedZoneName' - The DNS name of the load balancer. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/using-domain-names-with-elb.html Configure a Custom Domain Name> in the /Classic Load Balancers Guide/ . ----- * 'lbdSecurityGroups'+-- * 'lbdSecurityGroups' - The security groups for the load balancer. Valid only for load balancers in a VPC. ----- * 'lbdHealthCheck'+-- * 'lbdHealthCheck' - Information about the health checks conducted on the load balancer. ----- * 'lbdLoadBalancerName'+-- * 'lbdLoadBalancerName' - The name of the load balancer. ----- * 'lbdCreatedTime'+-- * 'lbdCreatedTime' - The date and time the load balancer was created. ----- * 'lbdVPCId'+-- * 'lbdVPCId' - The ID of the VPC for the load balancer. ----- * 'lbdSubnets'+-- * 'lbdSubnets' - The IDs of the subnets for the load balancer. ----- * 'lbdAvailabilityZones'+-- * 'lbdAvailabilityZones' - The Availability Zones for the load balancer. ----- * 'lbdBackendServerDescriptions'+-- * 'lbdBackendServerDescriptions' - Information about your EC2 instances. ----- * 'lbdCanonicalHostedZoneNameId'+-- * 'lbdCanonicalHostedZoneNameId' - The ID of the Amazon Route 53 hosted zone for the load balancer. ----- * 'lbdInstances'+-- * 'lbdInstances' - The IDs of the instances for the load balancer. ----- * 'lbdScheme'+-- * 'lbdScheme' - The type of load balancer. Valid only for load balancers in a VPC. If @Scheme@ is @internet-facing@ , the load balancer has a public DNS name that resolves to a public IP address. If @Scheme@ is @internal@ , the load balancer has a public DNS name that resolves to a private IP address. ----- * 'lbdListenerDescriptions'+-- * 'lbdListenerDescriptions' - The listeners for the load balancer. ----- * 'lbdDNSName'+-- * 'lbdDNSName' - The DNS name of the load balancer. ----- * 'lbdPolicies'+-- * 'lbdPolicies' - The policies defined for the load balancer. loadBalancerDescription     :: LoadBalancerDescription loadBalancerDescription =@@ -889,9 +865,7 @@ lbdSourceSecurityGroup :: Lens' LoadBalancerDescription (Maybe SourceSecurityGroup) lbdSourceSecurityGroup = lens _lbdSourceSecurityGroup (\ s a -> s{_lbdSourceSecurityGroup = a}); --- | The DNS name of the load balancer.------ For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/using-domain-names-with-elb.html Configure a Custom Domain Name> in the /Classic Load Balancers Guide/.+-- | The DNS name of the load balancer. For more information, see <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/using-domain-names-with-elb.html Configure a Custom Domain Name> in the /Classic Load Balancers Guide/ . lbdCanonicalHostedZoneName :: Lens' LoadBalancerDescription (Maybe Text) lbdCanonicalHostedZoneName = lens _lbdCanonicalHostedZoneName (\ s a -> s{_lbdCanonicalHostedZoneName = a}); @@ -935,11 +909,7 @@ lbdInstances :: Lens' LoadBalancerDescription [Instance] lbdInstances = lens _lbdInstances (\ s a -> s{_lbdInstances = a}) . _Default . _Coerce; --- | The type of load balancer. Valid only for load balancers in a VPC.------ If 'Scheme' is 'internet-facing', the load balancer has a public DNS name that resolves to a public IP address.------ If 'Scheme' is 'internal', the load balancer has a public DNS name that resolves to a private IP address.+-- | The type of load balancer. Valid only for load balancers in a VPC. If @Scheme@ is @internet-facing@ , the load balancer has a public DNS name that resolves to a public IP address. If @Scheme@ is @internal@ , the load balancer has a public DNS name that resolves to a private IP address. lbdScheme :: Lens' LoadBalancerDescription (Maybe Text) lbdScheme = lens _lbdScheme (\ s a -> s{_lbdScheme = a}); @@ -993,6 +963,8 @@  -- | The policies for a load balancer. --+--+-- -- /See:/ 'policies' smart constructor. data Policies = Policies'     { _pOtherPolicies               :: !(Maybe [Text])@@ -1004,11 +976,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'pOtherPolicies'+-- * 'pOtherPolicies' - The policies other than the stickiness policies. ----- * 'pLBCookieStickinessPolicies'+-- * 'pLBCookieStickinessPolicies' - The stickiness policies created using 'CreateLBCookieStickinessPolicy' . ----- * 'pAppCookieStickinessPolicies'+-- * 'pAppCookieStickinessPolicies' - The stickiness policies created using 'CreateAppCookieStickinessPolicy' . policies     :: Policies policies =@@ -1022,11 +994,11 @@ pOtherPolicies :: Lens' Policies [Text] pOtherPolicies = lens _pOtherPolicies (\ s a -> s{_pOtherPolicies = a}) . _Default . _Coerce; --- | The stickiness policies created using < CreateLBCookieStickinessPolicy>.+-- | The stickiness policies created using 'CreateLBCookieStickinessPolicy' . pLBCookieStickinessPolicies :: Lens' Policies [LBCookieStickinessPolicy] pLBCookieStickinessPolicies = lens _pLBCookieStickinessPolicies (\ s a -> s{_pLBCookieStickinessPolicies = a}) . _Default . _Coerce; --- | The stickiness policies created using < CreateAppCookieStickinessPolicy>.+-- | The stickiness policies created using 'CreateAppCookieStickinessPolicy' . pAppCookieStickinessPolicies :: Lens' Policies [AppCookieStickinessPolicy] pAppCookieStickinessPolicies = lens _pAppCookieStickinessPolicies (\ s a -> s{_pAppCookieStickinessPolicies = a}) . _Default . _Coerce; @@ -1048,6 +1020,8 @@  -- | Information about a policy attribute. --+--+-- -- /See:/ 'policyAttribute' smart constructor. data PolicyAttribute = PolicyAttribute'     { _paAttributeValue :: !(Maybe Text)@@ -1058,9 +1032,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'paAttributeValue'+-- * 'paAttributeValue' - The value of the attribute. ----- * 'paAttributeName'+-- * 'paAttributeName' - The name of the attribute. policyAttribute     :: PolicyAttribute policyAttribute =@@ -1089,6 +1063,8 @@  -- | Information about a policy attribute. --+--+-- -- /See:/ 'policyAttributeDescription' smart constructor. data PolicyAttributeDescription = PolicyAttributeDescription'     { _padAttributeValue :: !(Maybe Text)@@ -1099,9 +1075,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'padAttributeValue'+-- * 'padAttributeValue' - The value of the attribute. ----- * 'padAttributeName'+-- * 'padAttributeName' - The name of the attribute. policyAttributeDescription     :: PolicyAttributeDescription policyAttributeDescription =@@ -1129,6 +1105,8 @@  -- | Information about a policy attribute type. --+--+-- -- /See:/ 'policyAttributeTypeDescription' smart constructor. data PolicyAttributeTypeDescription = PolicyAttributeTypeDescription'     { _patdAttributeType :: !(Maybe Text)@@ -1142,15 +1120,15 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'patdAttributeType'+-- * 'patdAttributeType' - The type of the attribute. For example, @Boolean@ or @Integer@ . ----- * 'patdCardinality'+-- * 'patdCardinality' - The cardinality of the attribute. Valid values:     * ONE(1) : Single value required     * ZERO_OR_ONE(0..1) : Up to one value is allowed     * ZERO_OR_MORE(0..*) : Optional. Multiple values are allowed     * ONE_OR_MORE(1..*0) : Required. Multiple values are allowed ----- * 'patdDefaultValue'+-- * 'patdDefaultValue' - The default value of the attribute, if applicable. ----- * 'patdAttributeName'+-- * 'patdAttributeName' - The name of the attribute. ----- * 'patdDescription'+-- * 'patdDescription' - A description of the attribute. policyAttributeTypeDescription     :: PolicyAttributeTypeDescription policyAttributeTypeDescription =@@ -1162,22 +1140,11 @@     , _patdDescription = Nothing     } --- | The type of the attribute. For example, 'Boolean' or 'Integer'.+-- | The type of the attribute. For example, @Boolean@ or @Integer@ . patdAttributeType :: Lens' PolicyAttributeTypeDescription (Maybe Text) patdAttributeType = lens _patdAttributeType (\ s a -> s{_patdAttributeType = a}); --- | The cardinality of the attribute.------ Valid values:------ -   ONE(1) : Single value required------ -   ZERO_OR_ONE(0..1) : Up to one value is allowed------ -   ZERO_OR_MORE(0..*) : Optional. Multiple values are allowed------ -   ONE_OR_MORE(1..*0) : Required. Multiple values are allowed---+-- | The cardinality of the attribute. Valid values:     * ONE(1) : Single value required     * ZERO_OR_ONE(0..1) : Up to one value is allowed     * ZERO_OR_MORE(0..*) : Optional. Multiple values are allowed     * ONE_OR_MORE(1..*0) : Required. Multiple values are allowed patdCardinality :: Lens' PolicyAttributeTypeDescription (Maybe Text) patdCardinality = lens _patdCardinality (\ s a -> s{_patdCardinality = a}); @@ -1207,6 +1174,8 @@  -- | Information about a policy. --+--+-- -- /See:/ 'policyDescription' smart constructor. data PolicyDescription = PolicyDescription'     { _pdPolicyName                  :: !(Maybe Text)@@ -1218,11 +1187,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'pdPolicyName'+-- * 'pdPolicyName' - The name of the policy. ----- * 'pdPolicyAttributeDescriptions'+-- * 'pdPolicyAttributeDescriptions' - The policy attributes. ----- * 'pdPolicyTypeName'+-- * 'pdPolicyTypeName' - The name of the policy type. policyDescription     :: PolicyDescription policyDescription =@@ -1258,6 +1227,8 @@  -- | Information about a policy type. --+--+-- -- /See:/ 'policyTypeDescription' smart constructor. data PolicyTypeDescription = PolicyTypeDescription'     { _ptdPolicyTypeName                  :: !(Maybe Text)@@ -1269,11 +1240,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ptdPolicyTypeName'+-- * 'ptdPolicyTypeName' - The name of the policy type. ----- * 'ptdDescription'+-- * 'ptdDescription' - A description of the policy type. ----- * 'ptdPolicyAttributeTypeDescriptions'+-- * 'ptdPolicyAttributeTypeDescriptions' - The description of the policy attributes associated with the policies defined by Elastic Load Balancing. policyTypeDescription     :: PolicyTypeDescription policyTypeDescription =@@ -1309,6 +1280,8 @@  -- | Information about a source security group. --+--+-- -- /See:/ 'sourceSecurityGroup' smart constructor. data SourceSecurityGroup = SourceSecurityGroup'     { _ssgOwnerAlias :: !(Maybe Text)@@ -1319,9 +1292,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ssgOwnerAlias'+-- * 'ssgOwnerAlias' - The owner of the security group. ----- * 'ssgGroupName'+-- * 'ssgGroupName' - The name of the security group. sourceSecurityGroup     :: SourceSecurityGroup sourceSecurityGroup =@@ -1349,6 +1322,8 @@  -- | Information about a tag. --+--+-- -- /See:/ 'tag' smart constructor. data Tag = Tag'     { _tagValue :: !(Maybe Text)@@ -1359,9 +1334,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'tagValue'+-- * 'tagValue' - The value of the tag. ----- * 'tagKey'+-- * 'tagKey' - The key of the tag. tag     :: Text -- ^ 'tagKey'     -> Tag@@ -1393,6 +1368,8 @@  -- | The tags associated with a load balancer. --+--+-- -- /See:/ 'tagDescription' smart constructor. data TagDescription = TagDescription'     { _tdLoadBalancerName :: !(Maybe Text)@@ -1403,9 +1380,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'tdLoadBalancerName'+-- * 'tdLoadBalancerName' - The name of the load balancer. ----- * 'tdTags'+-- * 'tdTags' - The tags. tagDescription     :: TagDescription tagDescription =@@ -1435,6 +1412,8 @@  -- | The key of a tag. --+--+-- -- /See:/ 'tagKeyOnly' smart constructor. newtype TagKeyOnly = TagKeyOnly'     { _tkoKey :: Maybe Text@@ -1444,7 +1423,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'tkoKey'+-- * 'tkoKey' - The name of the key. tagKeyOnly     :: TagKeyOnly tagKeyOnly =

@@ -17,4 +17,5 @@ -- module Network.AWS.ELB.Types.Sum where +import           Network.AWS.ELB.Internal import           Network.AWS.Prelude

@@ -0,0 +1,40 @@+{-# LANGUAGE LambdaCase        #-}+{-# LANGUAGE OverloadedStrings #-}++{-# OPTIONS_GHC -Wall -Werror #-}++-- |+-- Module      : Network.AWS.ELB.Internal+-- Copyright   : (c) 2013-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : experimental+-- Portability : non-portable (GHC extensions)+--+module Network.AWS.ELB.Internal+    ( getAccountId+    ) where++import Network.AWS.Prelude++-- | This account identifier is used when attaching a policy to your S3 bucket+-- allowing ELB to upload and write access logs.+--+-- /See:/ <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-access-logs.html#attach-bucket-policy Attach a Policy to Your S3 Bucket>.+getAccountId :: Region -> Text+getAccountId = \case+    NorthVirginia   -> "127311923021"+    Ohio            -> "033677994240"+    NorthCalifornia -> "027434742980"+    Oregon          -> "797873946194"+    Tokyo           -> "582318560864"+    Seoul           -> "600734575887"+    Mumbai          -> "718504428378"+    Singapore       -> "114774131450"+    Sydney          -> "783225319266"+    Ireland         -> "156460612806"+    Frankfurt       -> "054676820928"+    SaoPaulo        -> "507241528517"+    GovCloud        -> "048591011584"+    GovCloudFIPS    -> "048591011584"+    Beijing         -> "638102146993"