summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrendanHay <>2016-03-21 07:11:00 (GMT)
committerhdiff <hdiff@hdiff.luite.com>2016-03-21 07:11:00 (GMT)
commit8245ebc3aa4bb75bdaeda3c4462fc3e52810be96 (patch)
tree3f74878e01de7c18beecb6373676b78d11ebf22e
parentde012775bbdb18a03cd39a2b1538e470fa60b5bd (diff)
version 1.4.01.4.0
-rw-r--r--README.md49
-rw-r--r--amazonka-codedeploy.cabal62
-rw-r--r--fixture/BatchGetApplicationRevisions.yaml0
-rw-r--r--fixture/BatchGetApplicationRevisionsResponse.proto0
-rw-r--r--fixture/BatchGetDeploymentGroups.yaml0
-rw-r--r--fixture/BatchGetDeploymentGroupsResponse.proto0
-rw-r--r--fixture/BatchGetDeploymentInstances.yaml0
-rw-r--r--fixture/BatchGetDeploymentInstancesResponse.proto0
-rw-r--r--gen/Network/AWS/CodeDeploy.hs90
-rw-r--r--gen/Network/AWS/CodeDeploy/AddTagsToOnPremisesInstances.hs15
-rw-r--r--gen/Network/AWS/CodeDeploy/BatchGetApplicationRevisions.hs168
-rw-r--r--gen/Network/AWS/CodeDeploy/BatchGetApplications.hs9
-rw-r--r--gen/Network/AWS/CodeDeploy/BatchGetDeploymentGroups.hs157
-rw-r--r--gen/Network/AWS/CodeDeploy/BatchGetDeploymentInstances.hs155
-rw-r--r--gen/Network/AWS/CodeDeploy/BatchGetDeployments.hs9
-rw-r--r--gen/Network/AWS/CodeDeploy/BatchGetOnPremisesInstances.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/CreateApplication.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/CreateDeployment.hs32
-rw-r--r--gen/Network/AWS/CodeDeploy/CreateDeploymentConfig.hs22
-rw-r--r--gen/Network/AWS/CodeDeploy/CreateDeploymentGroup.hs127
-rw-r--r--gen/Network/AWS/CodeDeploy/DeleteApplication.hs10
-rw-r--r--gen/Network/AWS/CodeDeploy/DeleteDeploymentConfig.hs12
-rw-r--r--gen/Network/AWS/CodeDeploy/DeleteDeploymentGroup.hs12
-rw-r--r--gen/Network/AWS/CodeDeploy/DeregisterOnPremisesInstance.hs6
-rw-r--r--gen/Network/AWS/CodeDeploy/GetApplication.hs10
-rw-r--r--gen/Network/AWS/CodeDeploy/GetApplicationRevision.hs13
-rw-r--r--gen/Network/AWS/CodeDeploy/GetDeployment.hs9
-rw-r--r--gen/Network/AWS/CodeDeploy/GetDeploymentConfig.hs10
-rw-r--r--gen/Network/AWS/CodeDeploy/GetDeploymentGroup.hs10
-rw-r--r--gen/Network/AWS/CodeDeploy/GetDeploymentInstance.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/GetOnPremisesInstance.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/ListApplicationRevisions.hs55
-rw-r--r--gen/Network/AWS/CodeDeploy/ListApplications.hs17
-rw-r--r--gen/Network/AWS/CodeDeploy/ListDeploymentConfigs.hs23
-rw-r--r--gen/Network/AWS/CodeDeploy/ListDeploymentGroups.hs22
-rw-r--r--gen/Network/AWS/CodeDeploy/ListDeploymentInstances.hs45
-rw-r--r--gen/Network/AWS/CodeDeploy/ListDeployments.hs40
-rw-r--r--gen/Network/AWS/CodeDeploy/ListOnPremisesInstances.hs33
-rw-r--r--gen/Network/AWS/CodeDeploy/RegisterApplicationRevision.hs14
-rw-r--r--gen/Network/AWS/CodeDeploy/RegisterOnPremisesInstance.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/RemoveTagsFromOnPremisesInstances.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/StopDeployment.hs8
-rw-r--r--gen/Network/AWS/CodeDeploy/Types.hs55
-rw-r--r--gen/Network/AWS/CodeDeploy/Types/Product.hs323
-rw-r--r--gen/Network/AWS/CodeDeploy/Types/Sum.hs45
-rw-r--r--gen/Network/AWS/CodeDeploy/UpdateApplication.hs12
-rw-r--r--gen/Network/AWS/CodeDeploy/UpdateDeploymentGroup.hs40
-rw-r--r--gen/Network/AWS/CodeDeploy/Waiters.hs2
-rw-r--r--test/Main.hs2
-rw-r--r--test/Test/AWS/CodeDeploy.hs2
-rw-r--r--test/Test/AWS/CodeDeploy/Internal.hs2
-rw-r--r--test/Test/AWS/Gen/CodeDeploy.hs56
52 files changed, 1343 insertions, 488 deletions
diff --git a/README.md b/README.md
index 946db7a..270d021 100644
--- a/README.md
+++ b/README.md
@@ -8,33 +8,30 @@
## Version
-`1.3.7`
+`1.4.0`
## Description
AWS CodeDeploy __Overview__
-This is the AWS CodeDeploy API Reference. This guide provides
-descriptions of the AWS CodeDeploy APIs. For additional information, see
-the
-<http://docs.aws.amazon.com/codedeploy/latest/userguide AWS CodeDeploy User Guide>.
+This reference guide provides descriptions of the AWS CodeDeploy APIs.
+For more information about AWS CodeDeploy, see the
+<docs.aws.amazon.com/codedeploy/latest/userguide AWS CodeDeploy User Guide>.
__Using the APIs__
-You can use the AWS CodeDeploy APIs to work with the following items:
+You can use the AWS CodeDeploy APIs to work with the following:
-- Applications are unique identifiers that AWS CodeDeploy uses to
- ensure that the correct combinations of revisions, deployment
- configurations, and deployment groups are being referenced during
- deployments.
+- Applications are unique identifiers used by AWS CodeDeploy to ensure
+ the correct combinations of revisions, deployment configurations,
+ and deployment groups are being referenced during deployments.
You can use the AWS CodeDeploy APIs to create, delete, get, list,
and update applications.
-- Deployment configurations are sets of deployment rules and
- deployment success and failure conditions that AWS CodeDeploy uses
- during deployments.
+- Deployment configurations are sets of deployment rules and success
+ and failure conditions used by AWS CodeDeploy during deployments.
You can use the AWS CodeDeploy APIs to create, delete, get, and list
deployment configurations.
@@ -50,7 +47,7 @@ You can use the AWS CodeDeploy APIs to work with the following items:
tags or Auto Scaling group names. Instances belong to deployment
groups.
- You can use the AWS CodeDeploy APIs to get and list instances.
+ You can use the AWS CodeDeploy APIs to get and list instance.
- Deployments represent the process of deploying revisions to
instances.
@@ -58,24 +55,24 @@ You can use the AWS CodeDeploy APIs to work with the following items:
You can use the AWS CodeDeploy APIs to create, get, list, and stop
deployments.
-- Application revisions are archive files that are stored in Amazon S3
- buckets or GitHub repositories. These revisions contain source
- content (such as source code, web pages, executable files, any
- deployment scripts, and similar) along with an Application
- Specification file (AppSpec file). (The AppSpec file is unique to
- AWS CodeDeploy; it defines a series of deployment actions that you
- want AWS CodeDeploy to execute.) An application revision is uniquely
+- Application revisions are archive files stored in Amazon S3 buckets
+ or GitHub repositories. These revisions contain source content (such
+ as source code, web pages, executable files, and deployment scripts)
+ along with an application specification (AppSpec) file. (The AppSpec
+ file is unique to AWS CodeDeploy; it defines the deployment actions
+ you want AWS CodeDeploy to execute.) Ffor application revisions
+ stored in Amazon S3 buckets, an application revision is uniquely
identified by its Amazon S3 object key and its ETag, version, or
- both (for application revisions that are stored in Amazon S3
- buckets) or by its repository name and commit ID (for applications
- revisions that are stored in GitHub repositories). Application
- revisions are deployed through deployment groups.
+ both. For application revisions stored in GitHub repositories, an
+ application revision is uniquely identified by its repository name
+ and commit ID. Application revisions are deployed through deployment
+ groups.
You can use the AWS CodeDeploy APIs to get, list, and register
application revisions.
Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-codedeploy)
-and the [AWS API Reference](http://docs.aws.amazon.com/codedeploy/latest/APIReference/Welcome.html).
+and the [AWS API Reference](https://aws.amazon.com/documentation/).
The types from this library are intended to be used with [amazonka](http://hackage.haskell.org/package/amazonka),
which provides mechanisms for specifying AuthN/AuthZ information and sending requests.
diff --git a/amazonka-codedeploy.cabal b/amazonka-codedeploy.cabal
index 419da30..f2fe25a 100644
--- a/amazonka-codedeploy.cabal
+++ b/amazonka-codedeploy.cabal
@@ -1,5 +1,5 @@
name: amazonka-codedeploy
-version: 1.3.7
+version: 1.4.0
synopsis: Amazon CodeDeploy SDK.
homepage: https://github.com/brendanhay/amazonka
bug-reports: https://github.com/brendanhay/amazonka/issues
@@ -7,7 +7,7 @@ license: OtherLicense
license-file: LICENSE
author: Brendan Hay
maintainer: Brendan Hay <brendan.g.hay@gmail.com>
-copyright: Copyright (c) 2013-2015 Brendan Hay
+copyright: Copyright (c) 2013-2016 Brendan Hay
category: Network, AWS, Cloud, Distributed Computing
build-type: Simple
cabal-version: >= 1.10
@@ -15,26 +15,23 @@ extra-source-files: README.md fixture/*.yaml fixture/*.proto
description:
AWS CodeDeploy __Overview__
- This is the AWS CodeDeploy API Reference. This guide provides
- descriptions of the AWS CodeDeploy APIs. For additional information, see
- the
- <http://docs.aws.amazon.com/codedeploy/latest/userguide AWS CodeDeploy User Guide>.
+ This reference guide provides descriptions of the AWS CodeDeploy APIs.
+ For more information about AWS CodeDeploy, see the
+ <docs.aws.amazon.com/codedeploy/latest/userguide AWS CodeDeploy User Guide>.
__Using the APIs__
- You can use the AWS CodeDeploy APIs to work with the following items:
+ You can use the AWS CodeDeploy APIs to work with the following:
- - Applications are unique identifiers that AWS CodeDeploy uses to
- ensure that the correct combinations of revisions, deployment
- configurations, and deployment groups are being referenced during
- deployments.
+ - Applications are unique identifiers used by AWS CodeDeploy to ensure
+ the correct combinations of revisions, deployment configurations,
+ and deployment groups are being referenced during deployments.
You can use the AWS CodeDeploy APIs to create, delete, get, list,
and update applications.
- - Deployment configurations are sets of deployment rules and
- deployment success and failure conditions that AWS CodeDeploy uses
- during deployments.
+ - Deployment configurations are sets of deployment rules and success
+ and failure conditions used by AWS CodeDeploy during deployments.
You can use the AWS CodeDeploy APIs to create, delete, get, and list
deployment configurations.
@@ -50,7 +47,7 @@ description:
tags or Auto Scaling group names. Instances belong to deployment
groups.
- You can use the AWS CodeDeploy APIs to get and list instances.
+ You can use the AWS CodeDeploy APIs to get and list instance.
- Deployments represent the process of deploying revisions to
instances.
@@ -58,18 +55,18 @@ description:
You can use the AWS CodeDeploy APIs to create, get, list, and stop
deployments.
- - Application revisions are archive files that are stored in Amazon S3
- buckets or GitHub repositories. These revisions contain source
- content (such as source code, web pages, executable files, any
- deployment scripts, and similar) along with an Application
- Specification file (AppSpec file). (The AppSpec file is unique to
- AWS CodeDeploy; it defines a series of deployment actions that you
- want AWS CodeDeploy to execute.) An application revision is uniquely
+ - Application revisions are archive files stored in Amazon S3 buckets
+ or GitHub repositories. These revisions contain source content (such
+ as source code, web pages, executable files, and deployment scripts)
+ along with an application specification (AppSpec) file. (The AppSpec
+ file is unique to AWS CodeDeploy; it defines the deployment actions
+ you want AWS CodeDeploy to execute.) Ffor application revisions
+ stored in Amazon S3 buckets, an application revision is uniquely
identified by its Amazon S3 object key and its ETag, version, or
- both (for application revisions that are stored in Amazon S3
- buckets) or by its repository name and commit ID (for applications
- revisions that are stored in GitHub repositories). Application
- revisions are deployed through deployment groups.
+ both. For application revisions stored in GitHub repositories, an
+ application revision is uniquely identified by its repository name
+ and commit ID. Application revisions are deployed through deployment
+ groups.
You can use the AWS CodeDeploy APIs to get, list, and register
application revisions.
@@ -85,7 +82,7 @@ description:
such as <http://hackage.haskell.org/package/lens lens> or
<http://hackage.haskell.org/package/lens-family-core lens-family-core>.
.
- See "Network.AWS.CodeDeploy" and the <http://docs.aws.amazon.com/codedeploy/latest/APIReference/Welcome.html AWS API Reference>
+ See "Network.AWS.CodeDeploy" or <https://aws.amazon.com/documentation/ the AWS Documentation>
to get started.
source-repository head
@@ -101,7 +98,10 @@ library
exposed-modules:
Network.AWS.CodeDeploy
, Network.AWS.CodeDeploy.AddTagsToOnPremisesInstances
+ , Network.AWS.CodeDeploy.BatchGetApplicationRevisions
, Network.AWS.CodeDeploy.BatchGetApplications
+ , Network.AWS.CodeDeploy.BatchGetDeploymentGroups
+ , Network.AWS.CodeDeploy.BatchGetDeploymentInstances
, Network.AWS.CodeDeploy.BatchGetDeployments
, Network.AWS.CodeDeploy.BatchGetOnPremisesInstances
, Network.AWS.CodeDeploy.CreateApplication
@@ -140,7 +140,7 @@ library
, Network.AWS.CodeDeploy.Types.Sum
build-depends:
- amazonka-core == 1.3.7.*
+ amazonka-core == 1.4.0.*
, base >= 4.7 && < 5
test-suite amazonka-codedeploy-test
@@ -160,9 +160,9 @@ test-suite amazonka-codedeploy-test
, Test.AWS.CodeDeploy.Internal
build-depends:
- amazonka-core == 1.3.7.*
- , amazonka-test == 1.3.7.*
- , amazonka-codedeploy == 1.3.7.*
+ amazonka-core == 1.4.0.*
+ , amazonka-test == 1.4.0.*
+ , amazonka-codedeploy == 1.4.0.*
, base
, bytestring
, tasty
diff --git a/fixture/BatchGetApplicationRevisions.yaml b/fixture/BatchGetApplicationRevisions.yaml
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/fixture/BatchGetApplicationRevisions.yaml
diff --git a/fixture/BatchGetApplicationRevisionsResponse.proto b/fixture/BatchGetApplicationRevisionsResponse.proto
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/fixture/BatchGetApplicationRevisionsResponse.proto
diff --git a/fixture/BatchGetDeploymentGroups.yaml b/fixture/BatchGetDeploymentGroups.yaml
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/fixture/BatchGetDeploymentGroups.yaml
diff --git a/fixture/BatchGetDeploymentGroupsResponse.proto b/fixture/BatchGetDeploymentGroupsResponse.proto
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/fixture/BatchGetDeploymentGroupsResponse.proto
diff --git a/fixture/BatchGetDeploymentInstances.yaml b/fixture/BatchGetDeploymentInstances.yaml
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/fixture/BatchGetDeploymentInstances.yaml
diff --git a/fixture/BatchGetDeploymentInstancesResponse.proto b/fixture/BatchGetDeploymentInstancesResponse.proto
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/fixture/BatchGetDeploymentInstancesResponse.proto
diff --git a/gen/Network/AWS/CodeDeploy.hs b/gen/Network/AWS/CodeDeploy.hs
index d853003..0f1dd65 100644
--- a/gen/Network/AWS/CodeDeploy.hs
+++ b/gen/Network/AWS/CodeDeploy.hs
@@ -5,7 +5,7 @@
-- |
-- Module : Network.AWS.CodeDeploy
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -13,26 +13,23 @@
--
-- AWS CodeDeploy __Overview__
--
--- This is the AWS CodeDeploy API Reference. This guide provides
--- descriptions of the AWS CodeDeploy APIs. For additional information, see
--- the
--- <http://docs.aws.amazon.com/codedeploy/latest/userguide AWS CodeDeploy User Guide>.
+-- This reference guide provides descriptions of the AWS CodeDeploy APIs.
+-- For more information about AWS CodeDeploy, see the
+-- <docs.aws.amazon.com/codedeploy/latest/userguide AWS CodeDeploy User Guide>.
--
-- __Using the APIs__
--
--- You can use the AWS CodeDeploy APIs to work with the following items:
+-- You can use the AWS CodeDeploy APIs to work with the following:
--
--- - Applications are unique identifiers that AWS CodeDeploy uses to
--- ensure that the correct combinations of revisions, deployment
--- configurations, and deployment groups are being referenced during
--- deployments.
+-- - Applications are unique identifiers used by AWS CodeDeploy to ensure
+-- the correct combinations of revisions, deployment configurations,
+-- and deployment groups are being referenced during deployments.
--
-- You can use the AWS CodeDeploy APIs to create, delete, get, list,
-- and update applications.
--
--- - Deployment configurations are sets of deployment rules and
--- deployment success and failure conditions that AWS CodeDeploy uses
--- during deployments.
+-- - Deployment configurations are sets of deployment rules and success
+-- and failure conditions used by AWS CodeDeploy during deployments.
--
-- You can use the AWS CodeDeploy APIs to create, delete, get, and list
-- deployment configurations.
@@ -48,7 +45,7 @@
-- tags or Auto Scaling group names. Instances belong to deployment
-- groups.
--
--- You can use the AWS CodeDeploy APIs to get and list instances.
+-- You can use the AWS CodeDeploy APIs to get and list instance.
--
-- - Deployments represent the process of deploying revisions to
-- instances.
@@ -56,24 +53,22 @@
-- You can use the AWS CodeDeploy APIs to create, get, list, and stop
-- deployments.
--
--- - Application revisions are archive files that are stored in Amazon S3
--- buckets or GitHub repositories. These revisions contain source
--- content (such as source code, web pages, executable files, any
--- deployment scripts, and similar) along with an Application
--- Specification file (AppSpec file). (The AppSpec file is unique to
--- AWS CodeDeploy; it defines a series of deployment actions that you
--- want AWS CodeDeploy to execute.) An application revision is uniquely
+-- - Application revisions are archive files stored in Amazon S3 buckets
+-- or GitHub repositories. These revisions contain source content (such
+-- as source code, web pages, executable files, and deployment scripts)
+-- along with an application specification (AppSpec) file. (The AppSpec
+-- file is unique to AWS CodeDeploy; it defines the deployment actions
+-- you want AWS CodeDeploy to execute.) Ffor application revisions
+-- stored in Amazon S3 buckets, an application revision is uniquely
-- identified by its Amazon S3 object key and its ETag, version, or
--- both (for application revisions that are stored in Amazon S3
--- buckets) or by its repository name and commit ID (for applications
--- revisions that are stored in GitHub repositories). Application
--- revisions are deployed through deployment groups.
+-- both. For application revisions stored in GitHub repositories, an
+-- application revision is uniquely identified by its repository name
+-- and commit ID. Application revisions are deployed through deployment
+-- groups.
--
-- You can use the AWS CodeDeploy APIs to get, list, and register
-- application revisions.
--
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/Welcome.html AWS API Reference>
module Network.AWS.CodeDeploy
(
-- * Service Configuration
@@ -82,6 +77,9 @@ module Network.AWS.CodeDeploy
-- * Errors
-- $errors
+ -- ** LifecycleHookLimitExceededException
+ , _LifecycleHookLimitExceededException
+
-- ** InvalidTimeRangeException
, _InvalidTimeRangeException
@@ -145,6 +143,9 @@ module Network.AWS.CodeDeploy
-- ** InvalidTagFilterException
, _InvalidTagFilterException
+ -- ** InvalidTriggerConfigException
+ , _InvalidTriggerConfigException
+
-- ** TagRequiredException
, _TagRequiredException
@@ -202,6 +203,9 @@ module Network.AWS.CodeDeploy
-- ** DeploymentDoesNotExistException
, _DeploymentDoesNotExistException
+ -- ** BatchLimitExceededException
+ , _BatchLimitExceededException
+
-- ** InvalidRevisionException
, _InvalidRevisionException
@@ -223,6 +227,9 @@ module Network.AWS.CodeDeploy
-- ** InstanceNameRequiredException
, _InstanceNameRequiredException
+ -- ** TriggerTargetsLimitExceededException
+ , _TriggerTargetsLimitExceededException
+
-- ** InvalidDeploymentStatusException
, _InvalidDeploymentStatusException
@@ -262,6 +269,9 @@ module Network.AWS.CodeDeploy
-- ** RemoveTagsFromOnPremisesInstances
, module Network.AWS.CodeDeploy.RemoveTagsFromOnPremisesInstances
+ -- ** BatchGetDeploymentGroups
+ , module Network.AWS.CodeDeploy.BatchGetDeploymentGroups
+
-- ** DeleteDeploymentGroup
, module Network.AWS.CodeDeploy.DeleteDeploymentGroup
@@ -289,6 +299,9 @@ module Network.AWS.CodeDeploy
-- ** CreateDeployment
, module Network.AWS.CodeDeploy.CreateDeployment
+ -- ** BatchGetApplicationRevisions
+ , module Network.AWS.CodeDeploy.BatchGetApplicationRevisions
+
-- ** BatchGetDeployments
, module Network.AWS.CodeDeploy.BatchGetDeployments
@@ -319,6 +332,9 @@ module Network.AWS.CodeDeploy
-- ** StopDeployment
, module Network.AWS.CodeDeploy.StopDeployment
+ -- ** BatchGetDeploymentInstances
+ , module Network.AWS.CodeDeploy.BatchGetDeploymentInstances
+
-- ** GetApplication
, module Network.AWS.CodeDeploy.GetApplication
@@ -405,6 +421,9 @@ module Network.AWS.CodeDeploy
-- ** TagFilterType
, TagFilterType (..)
+ -- ** TriggerEventType
+ , TriggerEventType (..)
+
-- ** ApplicationInfo
, ApplicationInfo
, applicationInfo
@@ -436,6 +455,7 @@ module Network.AWS.CodeDeploy
, dgiEc2TagFilters
, dgiOnPremisesInstanceTagFilters
, dgiApplicationName
+ , dgiTriggerConfigurations
, dgiDeploymentGroupId
, dgiAutoScalingGroups
, dgiDeploymentGroupName
@@ -537,6 +557,12 @@ module Network.AWS.CodeDeploy
, mhhValue
, mhhType
+ -- ** RevisionInfo
+ , RevisionInfo
+ , revisionInfo
+ , riGenericRevisionInfo
+ , riRevisionLocation
+
-- ** RevisionLocation
, RevisionLocation
, revisionLocation
@@ -571,10 +597,20 @@ module Network.AWS.CodeDeploy
, timeRange
, trStart
, trEnd
+
+ -- ** TriggerConfig
+ , TriggerConfig
+ , triggerConfig
+ , tcTriggerName
+ , tcTriggerEvents
+ , tcTriggerTargetARN
) where
import Network.AWS.CodeDeploy.AddTagsToOnPremisesInstances
+import Network.AWS.CodeDeploy.BatchGetApplicationRevisions
import Network.AWS.CodeDeploy.BatchGetApplications
+import Network.AWS.CodeDeploy.BatchGetDeploymentGroups
+import Network.AWS.CodeDeploy.BatchGetDeploymentInstances
import Network.AWS.CodeDeploy.BatchGetDeployments
import Network.AWS.CodeDeploy.BatchGetOnPremisesInstances
import Network.AWS.CodeDeploy.CreateApplication
diff --git a/gen/Network/AWS/CodeDeploy/AddTagsToOnPremisesInstances.hs b/gen/Network/AWS/CodeDeploy/AddTagsToOnPremisesInstances.hs
index 54a9ee6..b734a7b 100644
--- a/gen/Network/AWS/CodeDeploy/AddTagsToOnPremisesInstances.hs
+++ b/gen/Network/AWS/CodeDeploy/AddTagsToOnPremisesInstances.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.AddTagsToOnPremisesInstances
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Adds tags to on-premises instances.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_AddTagsToOnPremisesInstances.html AWS API Reference> for AddTagsToOnPremisesInstances.
module Network.AWS.CodeDeploy.AddTagsToOnPremisesInstances
(
-- * Creating a Request
@@ -42,7 +40,8 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response
--- | Represents the input of an adds tags to on-premises instance operation.
+-- | Represents the input of, and adds tags to, an on-premises instance
+-- operation.
--
-- /See:/ 'addTagsToOnPremisesInstances' smart constructor.
data AddTagsToOnPremisesInstances = AddTagsToOnPremisesInstances'
@@ -67,12 +66,12 @@ addTagsToOnPremisesInstances =
-- | The tag key-value pairs to add to the on-premises instances.
--
--- Keys and values are both required. Keys cannot be nulls or empty
--- strings. Value-only tags are not allowed.
+-- Keys and values are both required. Keys cannot be null or empty strings.
+-- Value-only tags are not allowed.
attopiTags :: Lens' AddTagsToOnPremisesInstances [Tag]
attopiTags = lens _attopiTags (\ s a -> s{_attopiTags = a}) . _Coerce;
--- | The names of the on-premises instances to add tags to.
+-- | The names of the on-premises instances to which to add tags.
attopiInstanceNames :: Lens' AddTagsToOnPremisesInstances [Text]
attopiInstanceNames = lens _attopiInstanceNames (\ s a -> s{_attopiInstanceNames = a}) . _Coerce;
@@ -84,6 +83,8 @@ instance AWSRequest AddTagsToOnPremisesInstances
response
= receiveNull AddTagsToOnPremisesInstancesResponse'
+instance Hashable AddTagsToOnPremisesInstances
+
instance ToHeaders AddTagsToOnPremisesInstances where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/BatchGetApplicationRevisions.hs b/gen/Network/AWS/CodeDeploy/BatchGetApplicationRevisions.hs
new file mode 100644
index 0000000..48cecfa
--- /dev/null
+++ b/gen/Network/AWS/CodeDeploy/BatchGetApplicationRevisions.hs
@@ -0,0 +1,168 @@
+{-# LANGUAGE DeriveDataTypeable #-}
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE RecordWildCards #-}
+{-# LANGUAGE TypeFamilies #-}
+
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+{-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-matches #-}
+
+-- Derived from AWS service descriptions, licensed under Apache 2.0.
+
+-- |
+-- Module : Network.AWS.CodeDeploy.BatchGetApplicationRevisions
+-- Copyright : (c) 2013-2016 Brendan Hay
+-- License : Mozilla Public License, v. 2.0.
+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
+-- Stability : auto-generated
+-- Portability : non-portable (GHC extensions)
+--
+-- Gets information about one or more application revisions.
+module Network.AWS.CodeDeploy.BatchGetApplicationRevisions
+ (
+ -- * Creating a Request
+ batchGetApplicationRevisions
+ , BatchGetApplicationRevisions
+ -- * Request Lenses
+ , bgarApplicationName
+ , bgarRevisions
+
+ -- * Destructuring the Response
+ , batchGetApplicationRevisionsResponse
+ , BatchGetApplicationRevisionsResponse
+ -- * Response Lenses
+ , bgarrsApplicationName
+ , bgarrsRevisions
+ , bgarrsErrorMessage
+ , bgarrsResponseStatus
+ ) where
+
+import Network.AWS.CodeDeploy.Types
+import Network.AWS.CodeDeploy.Types.Product
+import Network.AWS.Lens
+import Network.AWS.Prelude
+import Network.AWS.Request
+import Network.AWS.Response
+
+-- | Represents the input of a batch get application revisions operation.
+--
+-- /See:/ 'batchGetApplicationRevisions' smart constructor.
+data BatchGetApplicationRevisions = BatchGetApplicationRevisions'
+ { _bgarApplicationName :: !Text
+ , _bgarRevisions :: ![RevisionLocation]
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'BatchGetApplicationRevisions' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'bgarApplicationName'
+--
+-- * 'bgarRevisions'
+batchGetApplicationRevisions
+ :: Text -- ^ 'bgarApplicationName'
+ -> BatchGetApplicationRevisions
+batchGetApplicationRevisions pApplicationName_ =
+ BatchGetApplicationRevisions'
+ { _bgarApplicationName = pApplicationName_
+ , _bgarRevisions = mempty
+ }
+
+-- | The name of an AWS CodeDeploy application about which to get revision
+-- information.
+bgarApplicationName :: Lens' BatchGetApplicationRevisions Text
+bgarApplicationName = lens _bgarApplicationName (\ s a -> s{_bgarApplicationName = a});
+
+-- | Information to get about the application revisions, including type and
+-- location.
+bgarRevisions :: Lens' BatchGetApplicationRevisions [RevisionLocation]
+bgarRevisions = lens _bgarRevisions (\ s a -> s{_bgarRevisions = a}) . _Coerce;
+
+instance AWSRequest BatchGetApplicationRevisions
+ where
+ type Rs BatchGetApplicationRevisions =
+ BatchGetApplicationRevisionsResponse
+ request = postJSON codeDeploy
+ response
+ = receiveJSON
+ (\ s h x ->
+ BatchGetApplicationRevisionsResponse' <$>
+ (x .?> "applicationName") <*>
+ (x .?> "revisions" .!@ mempty)
+ <*> (x .?> "errorMessage")
+ <*> (pure (fromEnum s)))
+
+instance Hashable BatchGetApplicationRevisions
+
+instance ToHeaders BatchGetApplicationRevisions where
+ toHeaders
+ = const
+ (mconcat
+ ["X-Amz-Target" =#
+ ("CodeDeploy_20141006.BatchGetApplicationRevisions"
+ :: ByteString),
+ "Content-Type" =#
+ ("application/x-amz-json-1.1" :: ByteString)])
+
+instance ToJSON BatchGetApplicationRevisions where
+ toJSON BatchGetApplicationRevisions'{..}
+ = object
+ (catMaybes
+ [Just ("applicationName" .= _bgarApplicationName),
+ Just ("revisions" .= _bgarRevisions)])
+
+instance ToPath BatchGetApplicationRevisions where
+ toPath = const "/"
+
+instance ToQuery BatchGetApplicationRevisions where
+ toQuery = const mempty
+
+-- | Represents the output of a batch get application revisions operation.
+--
+-- /See:/ 'batchGetApplicationRevisionsResponse' smart constructor.
+data BatchGetApplicationRevisionsResponse = BatchGetApplicationRevisionsResponse'
+ { _bgarrsApplicationName :: !(Maybe Text)
+ , _bgarrsRevisions :: !(Maybe [RevisionInfo])
+ , _bgarrsErrorMessage :: !(Maybe Text)
+ , _bgarrsResponseStatus :: !Int
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'BatchGetApplicationRevisionsResponse' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'bgarrsApplicationName'
+--
+-- * 'bgarrsRevisions'
+--
+-- * 'bgarrsErrorMessage'
+--
+-- * 'bgarrsResponseStatus'
+batchGetApplicationRevisionsResponse
+ :: Int -- ^ 'bgarrsResponseStatus'
+ -> BatchGetApplicationRevisionsResponse
+batchGetApplicationRevisionsResponse pResponseStatus_ =
+ BatchGetApplicationRevisionsResponse'
+ { _bgarrsApplicationName = Nothing
+ , _bgarrsRevisions = Nothing
+ , _bgarrsErrorMessage = Nothing
+ , _bgarrsResponseStatus = pResponseStatus_
+ }
+
+-- | The name of the application that corresponds to the revisions.
+bgarrsApplicationName :: Lens' BatchGetApplicationRevisionsResponse (Maybe Text)
+bgarrsApplicationName = lens _bgarrsApplicationName (\ s a -> s{_bgarrsApplicationName = a});
+
+-- | Additional information about the revisions, including the type and
+-- location.
+bgarrsRevisions :: Lens' BatchGetApplicationRevisionsResponse [RevisionInfo]
+bgarrsRevisions = lens _bgarrsRevisions (\ s a -> s{_bgarrsRevisions = a}) . _Default . _Coerce;
+
+-- | Information about errors that may have occurred during the API call.
+bgarrsErrorMessage :: Lens' BatchGetApplicationRevisionsResponse (Maybe Text)
+bgarrsErrorMessage = lens _bgarrsErrorMessage (\ s a -> s{_bgarrsErrorMessage = a});
+
+-- | The response status code.
+bgarrsResponseStatus :: Lens' BatchGetApplicationRevisionsResponse Int
+bgarrsResponseStatus = lens _bgarrsResponseStatus (\ s a -> s{_bgarrsResponseStatus = a});
diff --git a/gen/Network/AWS/CodeDeploy/BatchGetApplications.hs b/gen/Network/AWS/CodeDeploy/BatchGetApplications.hs
index 5629899..517d303 100644
--- a/gen/Network/AWS/CodeDeploy/BatchGetApplications.hs
+++ b/gen/Network/AWS/CodeDeploy/BatchGetApplications.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.BatchGetApplications
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about one or more applications.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_BatchGetApplications.html AWS API Reference> for BatchGetApplications.
module Network.AWS.CodeDeploy.BatchGetApplications
(
-- * Creating a Request
@@ -63,8 +61,7 @@ batchGetApplications =
{ _bgaApplicationNames = Nothing
}
--- | A list of application names, with multiple application names separated
--- by spaces.
+-- | A list of application names separated by spaces.
bgaApplicationNames :: Lens' BatchGetApplications [Text]
bgaApplicationNames = lens _bgaApplicationNames (\ s a -> s{_bgaApplicationNames = a}) . _Default . _Coerce;
@@ -79,6 +76,8 @@ instance AWSRequest BatchGetApplications where
(x .?> "applicationsInfo" .!@ mempty) <*>
(pure (fromEnum s)))
+instance Hashable BatchGetApplications
+
instance ToHeaders BatchGetApplications where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/BatchGetDeploymentGroups.hs b/gen/Network/AWS/CodeDeploy/BatchGetDeploymentGroups.hs
new file mode 100644
index 0000000..295fc9e
--- /dev/null
+++ b/gen/Network/AWS/CodeDeploy/BatchGetDeploymentGroups.hs
@@ -0,0 +1,157 @@
+{-# LANGUAGE DeriveDataTypeable #-}
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE RecordWildCards #-}
+{-# LANGUAGE TypeFamilies #-}
+
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+{-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-matches #-}
+
+-- Derived from AWS service descriptions, licensed under Apache 2.0.
+
+-- |
+-- Module : Network.AWS.CodeDeploy.BatchGetDeploymentGroups
+-- Copyright : (c) 2013-2016 Brendan Hay
+-- License : Mozilla Public License, v. 2.0.
+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
+-- Stability : auto-generated
+-- Portability : non-portable (GHC extensions)
+--
+-- Get information about one or more deployment groups.
+module Network.AWS.CodeDeploy.BatchGetDeploymentGroups
+ (
+ -- * Creating a Request
+ batchGetDeploymentGroups
+ , BatchGetDeploymentGroups
+ -- * Request Lenses
+ , bgdgApplicationName
+ , bgdgDeploymentGroupNames
+
+ -- * Destructuring the Response
+ , batchGetDeploymentGroupsResponse
+ , BatchGetDeploymentGroupsResponse
+ -- * Response Lenses
+ , bgdgrsDeploymentGroupsInfo
+ , bgdgrsErrorMessage
+ , bgdgrsResponseStatus
+ ) where
+
+import Network.AWS.CodeDeploy.Types
+import Network.AWS.CodeDeploy.Types.Product
+import Network.AWS.Lens
+import Network.AWS.Prelude
+import Network.AWS.Request
+import Network.AWS.Response
+
+-- | Represents the input of a batch get deployment groups operation.
+--
+-- /See:/ 'batchGetDeploymentGroups' smart constructor.
+data BatchGetDeploymentGroups = BatchGetDeploymentGroups'
+ { _bgdgApplicationName :: !Text
+ , _bgdgDeploymentGroupNames :: ![Text]
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'BatchGetDeploymentGroups' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'bgdgApplicationName'
+--
+-- * 'bgdgDeploymentGroupNames'
+batchGetDeploymentGroups
+ :: Text -- ^ 'bgdgApplicationName'
+ -> BatchGetDeploymentGroups
+batchGetDeploymentGroups pApplicationName_ =
+ BatchGetDeploymentGroups'
+ { _bgdgApplicationName = pApplicationName_
+ , _bgdgDeploymentGroupNames = mempty
+ }
+
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
+bgdgApplicationName :: Lens' BatchGetDeploymentGroups Text
+bgdgApplicationName = lens _bgdgApplicationName (\ s a -> s{_bgdgApplicationName = a});
+
+-- | The deployment groups\' names.
+bgdgDeploymentGroupNames :: Lens' BatchGetDeploymentGroups [Text]
+bgdgDeploymentGroupNames = lens _bgdgDeploymentGroupNames (\ s a -> s{_bgdgDeploymentGroupNames = a}) . _Coerce;
+
+instance AWSRequest BatchGetDeploymentGroups where
+ type Rs BatchGetDeploymentGroups =
+ BatchGetDeploymentGroupsResponse
+ request = postJSON codeDeploy
+ response
+ = receiveJSON
+ (\ s h x ->
+ BatchGetDeploymentGroupsResponse' <$>
+ (x .?> "deploymentGroupsInfo" .!@ mempty) <*>
+ (x .?> "errorMessage")
+ <*> (pure (fromEnum s)))
+
+instance Hashable BatchGetDeploymentGroups
+
+instance ToHeaders BatchGetDeploymentGroups where
+ toHeaders
+ = const
+ (mconcat
+ ["X-Amz-Target" =#
+ ("CodeDeploy_20141006.BatchGetDeploymentGroups" ::
+ ByteString),
+ "Content-Type" =#
+ ("application/x-amz-json-1.1" :: ByteString)])
+
+instance ToJSON BatchGetDeploymentGroups where
+ toJSON BatchGetDeploymentGroups'{..}
+ = object
+ (catMaybes
+ [Just ("applicationName" .= _bgdgApplicationName),
+ Just
+ ("deploymentGroupNames" .=
+ _bgdgDeploymentGroupNames)])
+
+instance ToPath BatchGetDeploymentGroups where
+ toPath = const "/"
+
+instance ToQuery BatchGetDeploymentGroups where
+ toQuery = const mempty
+
+-- | Represents the output of a batch get deployment groups operation.
+--
+-- /See:/ 'batchGetDeploymentGroupsResponse' smart constructor.
+data BatchGetDeploymentGroupsResponse = BatchGetDeploymentGroupsResponse'
+ { _bgdgrsDeploymentGroupsInfo :: !(Maybe [DeploymentGroupInfo])
+ , _bgdgrsErrorMessage :: !(Maybe Text)
+ , _bgdgrsResponseStatus :: !Int
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'BatchGetDeploymentGroupsResponse' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'bgdgrsDeploymentGroupsInfo'
+--
+-- * 'bgdgrsErrorMessage'
+--
+-- * 'bgdgrsResponseStatus'
+batchGetDeploymentGroupsResponse
+ :: Int -- ^ 'bgdgrsResponseStatus'
+ -> BatchGetDeploymentGroupsResponse
+batchGetDeploymentGroupsResponse pResponseStatus_ =
+ BatchGetDeploymentGroupsResponse'
+ { _bgdgrsDeploymentGroupsInfo = Nothing
+ , _bgdgrsErrorMessage = Nothing
+ , _bgdgrsResponseStatus = pResponseStatus_
+ }
+
+-- | Information about the deployment groups.
+bgdgrsDeploymentGroupsInfo :: Lens' BatchGetDeploymentGroupsResponse [DeploymentGroupInfo]
+bgdgrsDeploymentGroupsInfo = lens _bgdgrsDeploymentGroupsInfo (\ s a -> s{_bgdgrsDeploymentGroupsInfo = a}) . _Default . _Coerce;
+
+-- | Information about errors that may have occurred during the API call.
+bgdgrsErrorMessage :: Lens' BatchGetDeploymentGroupsResponse (Maybe Text)
+bgdgrsErrorMessage = lens _bgdgrsErrorMessage (\ s a -> s{_bgdgrsErrorMessage = a});
+
+-- | The response status code.
+bgdgrsResponseStatus :: Lens' BatchGetDeploymentGroupsResponse Int
+bgdgrsResponseStatus = lens _bgdgrsResponseStatus (\ s a -> s{_bgdgrsResponseStatus = a});
diff --git a/gen/Network/AWS/CodeDeploy/BatchGetDeploymentInstances.hs b/gen/Network/AWS/CodeDeploy/BatchGetDeploymentInstances.hs
new file mode 100644
index 0000000..cac9973
--- /dev/null
+++ b/gen/Network/AWS/CodeDeploy/BatchGetDeploymentInstances.hs
@@ -0,0 +1,155 @@
+{-# LANGUAGE DeriveDataTypeable #-}
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE RecordWildCards #-}
+{-# LANGUAGE TypeFamilies #-}
+
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+{-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-matches #-}
+
+-- Derived from AWS service descriptions, licensed under Apache 2.0.
+
+-- |
+-- Module : Network.AWS.CodeDeploy.BatchGetDeploymentInstances
+-- Copyright : (c) 2013-2016 Brendan Hay
+-- License : Mozilla Public License, v. 2.0.
+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
+-- Stability : auto-generated
+-- Portability : non-portable (GHC extensions)
+--
+-- Gets information about one or more instance that are part of a
+-- deployment group.
+module Network.AWS.CodeDeploy.BatchGetDeploymentInstances
+ (
+ -- * Creating a Request
+ batchGetDeploymentInstances
+ , BatchGetDeploymentInstances
+ -- * Request Lenses
+ , bgdiDeploymentId
+ , bgdiInstanceIds
+
+ -- * Destructuring the Response
+ , batchGetDeploymentInstancesResponse
+ , BatchGetDeploymentInstancesResponse
+ -- * Response Lenses
+ , bgdirsInstancesSummary
+ , bgdirsErrorMessage
+ , bgdirsResponseStatus
+ ) where
+
+import Network.AWS.CodeDeploy.Types
+import Network.AWS.CodeDeploy.Types.Product
+import Network.AWS.Lens
+import Network.AWS.Prelude
+import Network.AWS.Request
+import Network.AWS.Response
+
+-- | Represents the input of a batch get deployment instances operation.
+--
+-- /See:/ 'batchGetDeploymentInstances' smart constructor.
+data BatchGetDeploymentInstances = BatchGetDeploymentInstances'
+ { _bgdiDeploymentId :: !Text
+ , _bgdiInstanceIds :: ![Text]
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'BatchGetDeploymentInstances' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'bgdiDeploymentId'
+--
+-- * 'bgdiInstanceIds'
+batchGetDeploymentInstances
+ :: Text -- ^ 'bgdiDeploymentId'
+ -> BatchGetDeploymentInstances
+batchGetDeploymentInstances pDeploymentId_ =
+ BatchGetDeploymentInstances'
+ { _bgdiDeploymentId = pDeploymentId_
+ , _bgdiInstanceIds = mempty
+ }
+
+-- | The unique ID of a deployment.
+bgdiDeploymentId :: Lens' BatchGetDeploymentInstances Text
+bgdiDeploymentId = lens _bgdiDeploymentId (\ s a -> s{_bgdiDeploymentId = a});
+
+-- | The unique IDs of instances in the deployment group.
+bgdiInstanceIds :: Lens' BatchGetDeploymentInstances [Text]
+bgdiInstanceIds = lens _bgdiInstanceIds (\ s a -> s{_bgdiInstanceIds = a}) . _Coerce;
+
+instance AWSRequest BatchGetDeploymentInstances where
+ type Rs BatchGetDeploymentInstances =
+ BatchGetDeploymentInstancesResponse
+ request = postJSON codeDeploy
+ response
+ = receiveJSON
+ (\ s h x ->
+ BatchGetDeploymentInstancesResponse' <$>
+ (x .?> "instancesSummary" .!@ mempty) <*>
+ (x .?> "errorMessage")
+ <*> (pure (fromEnum s)))
+
+instance Hashable BatchGetDeploymentInstances
+
+instance ToHeaders BatchGetDeploymentInstances where
+ toHeaders
+ = const
+ (mconcat
+ ["X-Amz-Target" =#
+ ("CodeDeploy_20141006.BatchGetDeploymentInstances" ::
+ ByteString),
+ "Content-Type" =#
+ ("application/x-amz-json-1.1" :: ByteString)])
+
+instance ToJSON BatchGetDeploymentInstances where
+ toJSON BatchGetDeploymentInstances'{..}
+ = object
+ (catMaybes
+ [Just ("deploymentId" .= _bgdiDeploymentId),
+ Just ("instanceIds" .= _bgdiInstanceIds)])
+
+instance ToPath BatchGetDeploymentInstances where
+ toPath = const "/"
+
+instance ToQuery BatchGetDeploymentInstances where
+ toQuery = const mempty
+
+-- | Represents the output of a batch get deployment instance operation.
+--
+-- /See:/ 'batchGetDeploymentInstancesResponse' smart constructor.
+data BatchGetDeploymentInstancesResponse = BatchGetDeploymentInstancesResponse'
+ { _bgdirsInstancesSummary :: !(Maybe [InstanceSummary])
+ , _bgdirsErrorMessage :: !(Maybe Text)
+ , _bgdirsResponseStatus :: !Int
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'BatchGetDeploymentInstancesResponse' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'bgdirsInstancesSummary'
+--
+-- * 'bgdirsErrorMessage'
+--
+-- * 'bgdirsResponseStatus'
+batchGetDeploymentInstancesResponse
+ :: Int -- ^ 'bgdirsResponseStatus'
+ -> BatchGetDeploymentInstancesResponse
+batchGetDeploymentInstancesResponse pResponseStatus_ =
+ BatchGetDeploymentInstancesResponse'
+ { _bgdirsInstancesSummary = Nothing
+ , _bgdirsErrorMessage = Nothing
+ , _bgdirsResponseStatus = pResponseStatus_
+ }
+
+-- | Information about the instance.
+bgdirsInstancesSummary :: Lens' BatchGetDeploymentInstancesResponse [InstanceSummary]
+bgdirsInstancesSummary = lens _bgdirsInstancesSummary (\ s a -> s{_bgdirsInstancesSummary = a}) . _Default . _Coerce;
+
+-- | Information about errors that may have occurred during the API call.
+bgdirsErrorMessage :: Lens' BatchGetDeploymentInstancesResponse (Maybe Text)
+bgdirsErrorMessage = lens _bgdirsErrorMessage (\ s a -> s{_bgdirsErrorMessage = a});
+
+-- | The response status code.
+bgdirsResponseStatus :: Lens' BatchGetDeploymentInstancesResponse Int
+bgdirsResponseStatus = lens _bgdirsResponseStatus (\ s a -> s{_bgdirsResponseStatus = a});
diff --git a/gen/Network/AWS/CodeDeploy/BatchGetDeployments.hs b/gen/Network/AWS/CodeDeploy/BatchGetDeployments.hs
index 76e0bb8..316fbb6 100644
--- a/gen/Network/AWS/CodeDeploy/BatchGetDeployments.hs
+++ b/gen/Network/AWS/CodeDeploy/BatchGetDeployments.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.BatchGetDeployments
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about one or more deployments.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_BatchGetDeployments.html AWS API Reference> for BatchGetDeployments.
module Network.AWS.CodeDeploy.BatchGetDeployments
(
-- * Creating a Request
@@ -63,8 +61,7 @@ batchGetDeployments =
{ _bgdDeploymentIds = Nothing
}
--- | A list of deployment IDs, with multiple deployment IDs separated by
--- spaces.
+-- | A list of deployment IDs, separated by spaces.
bgdDeploymentIds :: Lens' BatchGetDeployments [Text]
bgdDeploymentIds = lens _bgdDeploymentIds (\ s a -> s{_bgdDeploymentIds = a}) . _Default . _Coerce;
@@ -79,6 +76,8 @@ instance AWSRequest BatchGetDeployments where
(x .?> "deploymentsInfo" .!@ mempty) <*>
(pure (fromEnum s)))
+instance Hashable BatchGetDeployments
+
instance ToHeaders BatchGetDeployments where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/BatchGetOnPremisesInstances.hs b/gen/Network/AWS/CodeDeploy/BatchGetOnPremisesInstances.hs
index 207abb7..5c02958 100644
--- a/gen/Network/AWS/CodeDeploy/BatchGetOnPremisesInstances.hs
+++ b/gen/Network/AWS/CodeDeploy/BatchGetOnPremisesInstances.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.BatchGetOnPremisesInstances
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about one or more on-premises instances.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_BatchGetOnPremisesInstances.html AWS API Reference> for BatchGetOnPremisesInstances.
module Network.AWS.CodeDeploy.BatchGetOnPremisesInstances
(
-- * Creating a Request
@@ -63,7 +61,7 @@ batchGetOnPremisesInstances =
{ _bgopiInstanceNames = Nothing
}
--- | The names of the on-premises instances to get information about.
+-- | The names of the on-premises instances about which to get information.
bgopiInstanceNames :: Lens' BatchGetOnPremisesInstances [Text]
bgopiInstanceNames = lens _bgopiInstanceNames (\ s a -> s{_bgopiInstanceNames = a}) . _Default . _Coerce;
@@ -78,6 +76,8 @@ instance AWSRequest BatchGetOnPremisesInstances where
(x .?> "instanceInfos" .!@ mempty) <*>
(pure (fromEnum s)))
+instance Hashable BatchGetOnPremisesInstances
+
instance ToHeaders BatchGetOnPremisesInstances where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/CreateApplication.hs b/gen/Network/AWS/CodeDeploy/CreateApplication.hs
index 3252407..cb3ce9f 100644
--- a/gen/Network/AWS/CodeDeploy/CreateApplication.hs
+++ b/gen/Network/AWS/CodeDeploy/CreateApplication.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.CreateApplication
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Creates a new application.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_CreateApplication.html AWS API Reference> for CreateApplication.
+-- Creates an application.
module Network.AWS.CodeDeploy.CreateApplication
(
-- * Creating a Request
@@ -78,6 +76,8 @@ instance AWSRequest CreateApplication where
CreateApplicationResponse' <$>
(x .?> "applicationId") <*> (pure (fromEnum s)))
+instance Hashable CreateApplication
+
instance ToHeaders CreateApplication where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/CreateDeployment.hs b/gen/Network/AWS/CodeDeploy/CreateDeployment.hs
index 6b6db06..acc8961 100644
--- a/gen/Network/AWS/CodeDeploy/CreateDeployment.hs
+++ b/gen/Network/AWS/CodeDeploy/CreateDeployment.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.CreateDeployment
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deploys an application revision through the specified deployment group.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_CreateDeployment.html AWS API Reference> for CreateDeployment.
module Network.AWS.CodeDeploy.CreateDeployment
(
-- * Creating a Request
@@ -89,8 +87,8 @@ createDeployment pApplicationName_ =
, _cdApplicationName = pApplicationName_
}
--- | The name of an existing deployment configuration associated with the
--- applicable IAM user or AWS account.
+-- | The name of a deployment configuration associated with the applicable
+-- IAM user or AWS account.
--
-- If not specified, the value configured in the deployment group will be
-- used as the default. If the deployment group does not have a deployment
@@ -99,8 +97,7 @@ createDeployment pApplicationName_ =
cdDeploymentConfigName :: Lens' CreateDeployment (Maybe Text)
cdDeploymentConfigName = lens _cdDeploymentConfigName (\ s a -> s{_cdDeploymentConfigName = a});
--- | The type of revision to deploy, along with information about the
--- revision\'s location.
+-- | The type and location of the revision to deploy.
cdRevision :: Lens' CreateDeployment (Maybe RevisionLocation)
cdRevision = lens _cdRevision (\ s a -> s{_cdRevision = a});
@@ -108,25 +105,24 @@ cdRevision = lens _cdRevision (\ s a -> s{_cdRevision = a});
cdDescription :: Lens' CreateDeployment (Maybe Text)
cdDescription = lens _cdDescription (\ s a -> s{_cdDescription = a});
--- | The deployment group\'s name.
+-- | The name of the deployment group.
cdDeploymentGroupName :: Lens' CreateDeployment (Maybe Text)
cdDeploymentGroupName = lens _cdDeploymentGroupName (\ s a -> s{_cdDeploymentGroupName = a});
-- | If set to true, then if the deployment causes the ApplicationStop
--- deployment lifecycle event to fail to a specific instance, the
--- deployment will not be considered to have failed to that instance at
--- that point and will continue on to the BeforeInstall deployment
--- lifecycle event.
+-- deployment lifecycle event to an instance to fail, the deployment to
+-- that instance will not be considered to have failed at that point and
+-- will continue on to the BeforeInstall deployment lifecycle event.
--
-- If set to false or not specified, then if the deployment causes the
--- ApplicationStop deployment lifecycle event to fail to a specific
--- instance, the deployment will stop to that instance, and the deployment
--- to that instance will be considered to have failed.
+-- ApplicationStop deployment lifecycle event to fail to an instance, the
+-- deployment to that instance will stop, and the deployment to that
+-- instance will be considered to have failed.
cdIgnoreApplicationStopFailures :: Lens' CreateDeployment (Maybe Bool)
cdIgnoreApplicationStopFailures = lens _cdIgnoreApplicationStopFailures (\ s a -> s{_cdIgnoreApplicationStopFailures = a});
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
cdApplicationName :: Lens' CreateDeployment Text
cdApplicationName = lens _cdApplicationName (\ s a -> s{_cdApplicationName = a});
@@ -139,6 +135,8 @@ instance AWSRequest CreateDeployment where
CreateDeploymentResponse' <$>
(x .?> "deploymentId") <*> (pure (fromEnum s)))
+instance Hashable CreateDeployment
+
instance ToHeaders CreateDeployment where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/CreateDeploymentConfig.hs b/gen/Network/AWS/CodeDeploy/CreateDeploymentConfig.hs
index 37fea71..82896d5 100644
--- a/gen/Network/AWS/CodeDeploy/CreateDeploymentConfig.hs
+++ b/gen/Network/AWS/CodeDeploy/CreateDeploymentConfig.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.CreateDeploymentConfig
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Creates a new deployment configuration.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_CreateDeploymentConfig.html AWS API Reference> for CreateDeploymentConfig.
+-- Creates a deployment configuration.
module Network.AWS.CodeDeploy.CreateDeploymentConfig
(
-- * Creating a Request
@@ -76,17 +74,17 @@ createDeploymentConfig pDeploymentConfigName_ =
-- The type parameter takes either of the following values:
--
-- - HOST_COUNT: The value parameter represents the minimum number of
--- healthy instances, as an absolute value.
+-- healthy instances as an absolute value.
-- - FLEET_PERCENT: The value parameter represents the minimum number of
--- healthy instances, as a percentage of the total number of instances
--- in the deployment. If you specify FLEET_PERCENT, then at the start
--- of the deployment AWS CodeDeploy converts the percentage to the
--- equivalent number of instances and rounds fractional instances up.
+-- healthy instances as a percentage of the total number of instances
+-- in the deployment. If you specify FLEET_PERCENT, at the start of the
+-- deployment, AWS CodeDeploy converts the percentage to the equivalent
+-- number of instance and rounds up fractional instances.
--
-- The value parameter takes an integer.
--
--- For example, to set a minimum of 95% healthy instances, specify a type
--- of FLEET_PERCENT and a value of 95.
+-- For example, to set a minimum of 95% healthy instance, specify a type of
+-- FLEET_PERCENT and a value of 95.
cdcMinimumHealthyHosts :: Lens' CreateDeploymentConfig (Maybe MinimumHealthyHosts)
cdcMinimumHealthyHosts = lens _cdcMinimumHealthyHosts (\ s a -> s{_cdcMinimumHealthyHosts = a});
@@ -104,6 +102,8 @@ instance AWSRequest CreateDeploymentConfig where
CreateDeploymentConfigResponse' <$>
(x .?> "deploymentConfigId") <*> (pure (fromEnum s)))
+instance Hashable CreateDeploymentConfig
+
instance ToHeaders CreateDeploymentConfig where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/CreateDeploymentGroup.hs b/gen/Network/AWS/CodeDeploy/CreateDeploymentGroup.hs
index c78cf7d..8cb0afb 100644
--- a/gen/Network/AWS/CodeDeploy/CreateDeploymentGroup.hs
+++ b/gen/Network/AWS/CodeDeploy/CreateDeploymentGroup.hs
@@ -12,16 +12,14 @@
-- |
-- Module : Network.AWS.CodeDeploy.CreateDeploymentGroup
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Creates a new deployment group for application revisions to be deployed
--- to.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_CreateDeploymentGroup.html AWS API Reference> for CreateDeploymentGroup.
+-- Creates a deployment group to which application revisions will be
+-- deployed.
module Network.AWS.CodeDeploy.CreateDeploymentGroup
(
-- * Creating a Request
@@ -31,6 +29,7 @@ module Network.AWS.CodeDeploy.CreateDeploymentGroup
, cdgDeploymentConfigName
, cdgEc2TagFilters
, cdgOnPremisesInstanceTagFilters
+ , cdgTriggerConfigurations
, cdgAutoScalingGroups
, cdgApplicationName
, cdgDeploymentGroupName
@@ -58,6 +57,7 @@ data CreateDeploymentGroup = CreateDeploymentGroup'
{ _cdgDeploymentConfigName :: !(Maybe Text)
, _cdgEc2TagFilters :: !(Maybe [EC2TagFilter])
, _cdgOnPremisesInstanceTagFilters :: !(Maybe [TagFilter])
+ , _cdgTriggerConfigurations :: !(Maybe [TriggerConfig])
, _cdgAutoScalingGroups :: !(Maybe [Text])
, _cdgApplicationName :: !Text
, _cdgDeploymentGroupName :: !Text
@@ -74,6 +74,8 @@ data CreateDeploymentGroup = CreateDeploymentGroup'
--
-- * 'cdgOnPremisesInstanceTagFilters'
--
+-- * 'cdgTriggerConfigurations'
+--
-- * 'cdgAutoScalingGroups'
--
-- * 'cdgApplicationName'
@@ -91,68 +93,99 @@ createDeploymentGroup pApplicationName_ pDeploymentGroupName_ pServiceRoleARN_ =
{ _cdgDeploymentConfigName = Nothing
, _cdgEc2TagFilters = Nothing
, _cdgOnPremisesInstanceTagFilters = Nothing
+ , _cdgTriggerConfigurations = Nothing
, _cdgAutoScalingGroups = Nothing
, _cdgApplicationName = pApplicationName_
, _cdgDeploymentGroupName = pDeploymentGroupName_
, _cdgServiceRoleARN = pServiceRoleARN_
}
--- | If specified, the deployment configuration name must be one of the
--- predefined values, or it can be a custom deployment configuration:
---
--- - CodeDeployDefault.AllAtOnce deploys an application revision to up to
--- all of the instances at once. The overall deployment succeeds if the
--- application revision deploys to at least one of the instances. The
--- overall deployment fails after the application revision fails to
--- deploy to all of the instances. For example, for 9 instances, deploy
--- to up to all 9 instances at once. The overall deployment succeeds if
--- any of the 9 instances is successfully deployed to, and it fails if
--- all 9 instances fail to be deployed to.
--- - CodeDeployDefault.HalfAtATime deploys to up to half of the instances
--- at a time (with fractions rounded down). The overall deployment
--- succeeds if the application revision deploys to at least half of the
--- instances (with fractions rounded up); otherwise, the deployment
--- fails. For example, for 9 instances, deploy to up to 4 instances at
--- a time. The overall deployment succeeds if 5 or more instances are
--- successfully deployed to; otherwise, the deployment fails. Note that
--- the deployment may successfully deploy to some instances, even if
--- the overall deployment fails.
--- - CodeDeployDefault.OneAtATime deploys the application revision to
--- only one of the instances at a time. The overall deployment succeeds
--- if the application revision deploys to all of the instances. The
--- overall deployment fails after the application revision first fails
--- to deploy to any one instances. For example, for 9 instances, deploy
--- to one instance at a time. The overall deployment succeeds if all 9
--- instances are successfully deployed to, and it fails if any of one
--- of the 9 instances fail to be deployed to. Note that the deployment
--- may successfully deploy to some instances, even if the overall
--- deployment fails. This is the default deployment configuration if a
--- configuration isn\'t specified for either the deployment or the
--- deployment group.
---
--- To create a custom deployment configuration, call the create deployment
--- configuration operation.
+-- | If specified, the deployment configuration name can be either one of the
+-- predefined configurations provided with AWS CodeDeploy or a custom
+-- deployment configuration that you create by calling the create
+-- deployment configuration operation.
+--
+-- CodeDeployDefault.OneAtATime is the default deployment configuration. It
+-- is used if a configuration isn\'t specified for the deployment or the
+-- deployment group.
+--
+-- The predefined deployment configurations include the following:
+--
+-- - __CodeDeployDefault.AllAtOnce__ attempts to deploy an application
+-- revision to as many instance as possible at once. The status of the
+-- overall deployment will be displayed as __Succeeded__ if the
+-- application revision is deployed to one or more of the instances.
+-- The status of the overall deployment will be displayed as __Failed__
+-- if the application revision is not deployed to any of the instances.
+-- Using an example of nine instance, CodeDeployDefault.AllAtOnce will
+-- attempt to deploy to all nine instance at once. The overall
+-- deployment will succeed if deployment to even a single instance is
+-- successful; it will fail only if deployments to all nine instance
+-- fail.
+--
+-- - __CodeDeployDefault.HalfAtATime__ deploys to up to half of the
+-- instances at a time (with fractions rounded down). The overall
+-- deployment succeeds if the application revision is deployed to at
+-- least half of the instances (with fractions rounded up); otherwise,
+-- the deployment fails. In the example of nine instances, it will
+-- deploy to up to four instance at a time. The overall deployment
+-- succeeds if deployment to five or more instances succeed; otherwise,
+-- the deployment fails. The deployment may be successfully deployed to
+-- some instances even if the overall deployment fails.
+--
+-- - __CodeDeployDefault.OneAtATime__ deploys the application revision to
+-- only one instance at a time.
+--
+-- For deployment groups that contain more than one instance:
+--
+-- - The overall deployment succeeds if the application revision is
+-- deployed to all of the instances. The exception to this rule is
+-- if deployment to the last instance fails, the overall deployment
+-- still succeeds. This is because AWS CodeDeploy allows only one
+-- instance at a time to be taken offline with the
+-- CodeDeployDefault.OneAtATime configuration.
+--
+-- - The overall deployment fails as soon as the application revision
+-- fails to be deployed to any but the last instance. The
+-- deployment may be successfully deployed to some instances even
+-- if the overall deployment fails.
+--
+-- - In an example using nine instance, it will deploy to one
+-- instance at a time. The overall deployment succeeds if
+-- deployment to the first eight instance is successful; the
+-- overall deployment fails if deployment to any of the first eight
+-- instance fails.
+--
+-- For deployment groups that contain only one instance, the overall
+-- deployment is successful only if deployment to the single instance
+-- is successful
+--
cdgDeploymentConfigName :: Lens' CreateDeploymentGroup (Maybe Text)
cdgDeploymentConfigName = lens _cdgDeploymentConfigName (\ s a -> s{_cdgDeploymentConfigName = a});
--- | The Amazon EC2 tags to filter on.
+-- | The Amazon EC2 tags on which to filter.
cdgEc2TagFilters :: Lens' CreateDeploymentGroup [EC2TagFilter]
cdgEc2TagFilters = lens _cdgEc2TagFilters (\ s a -> s{_cdgEc2TagFilters = a}) . _Default . _Coerce;
--- | The on-premises instance tags to filter on.
+-- | The on-premises instance tags on which to filter.
cdgOnPremisesInstanceTagFilters :: Lens' CreateDeploymentGroup [TagFilter]
cdgOnPremisesInstanceTagFilters = lens _cdgOnPremisesInstanceTagFilters (\ s a -> s{_cdgOnPremisesInstanceTagFilters = a}) . _Default . _Coerce;
+-- | Information about triggers to create when the deployment group is
+-- created.
+cdgTriggerConfigurations :: Lens' CreateDeploymentGroup [TriggerConfig]
+cdgTriggerConfigurations = lens _cdgTriggerConfigurations (\ s a -> s{_cdgTriggerConfigurations = a}) . _Default . _Coerce;
+
-- | A list of associated Auto Scaling groups.
cdgAutoScalingGroups :: Lens' CreateDeploymentGroup [Text]
cdgAutoScalingGroups = lens _cdgAutoScalingGroups (\ s a -> s{_cdgAutoScalingGroups = a}) . _Default . _Coerce;
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
cdgApplicationName :: Lens' CreateDeploymentGroup Text
cdgApplicationName = lens _cdgApplicationName (\ s a -> s{_cdgApplicationName = a});
--- | The name of an existing deployment group for the specified application.
+-- | The name of a new deployment group for the specified application.
cdgDeploymentGroupName :: Lens' CreateDeploymentGroup Text
cdgDeploymentGroupName = lens _cdgDeploymentGroupName (\ s a -> s{_cdgDeploymentGroupName = a});
@@ -171,6 +204,8 @@ instance AWSRequest CreateDeploymentGroup where
CreateDeploymentGroupResponse' <$>
(x .?> "deploymentGroupId") <*> (pure (fromEnum s)))
+instance Hashable CreateDeploymentGroup
+
instance ToHeaders CreateDeploymentGroup where
toHeaders
= const
@@ -190,6 +225,8 @@ instance ToJSON CreateDeploymentGroup where
("ec2TagFilters" .=) <$> _cdgEc2TagFilters,
("onPremisesInstanceTagFilters" .=) <$>
_cdgOnPremisesInstanceTagFilters,
+ ("triggerConfigurations" .=) <$>
+ _cdgTriggerConfigurations,
("autoScalingGroups" .=) <$> _cdgAutoScalingGroups,
Just ("applicationName" .= _cdgApplicationName),
Just
diff --git a/gen/Network/AWS/CodeDeploy/DeleteApplication.hs b/gen/Network/AWS/CodeDeploy/DeleteApplication.hs
index d9499c8..7739630 100644
--- a/gen/Network/AWS/CodeDeploy/DeleteApplication.hs
+++ b/gen/Network/AWS/CodeDeploy/DeleteApplication.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.DeleteApplication
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deletes an application.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_DeleteApplication.html AWS API Reference> for DeleteApplication.
module Network.AWS.CodeDeploy.DeleteApplication
(
-- * Creating a Request
@@ -61,8 +59,8 @@ deleteApplication pApplicationName_ =
{ _daApplicationName = pApplicationName_
}
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
daApplicationName :: Lens' DeleteApplication Text
daApplicationName = lens _daApplicationName (\ s a -> s{_daApplicationName = a});
@@ -71,6 +69,8 @@ instance AWSRequest DeleteApplication where
request = postJSON codeDeploy
response = receiveNull DeleteApplicationResponse'
+instance Hashable DeleteApplication
+
instance ToHeaders DeleteApplication where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/DeleteDeploymentConfig.hs b/gen/Network/AWS/CodeDeploy/DeleteDeploymentConfig.hs
index 625dfae..87bcf47 100644
--- a/gen/Network/AWS/CodeDeploy/DeleteDeploymentConfig.hs
+++ b/gen/Network/AWS/CodeDeploy/DeleteDeploymentConfig.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.DeleteDeploymentConfig
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -21,9 +21,7 @@
-- Deletes a deployment configuration.
--
-- A deployment configuration cannot be deleted if it is currently in use.
--- Also, predefined configurations cannot be deleted.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_DeleteDeploymentConfig.html AWS API Reference> for DeleteDeploymentConfig.
+-- Predefined configurations cannot be deleted.
module Network.AWS.CodeDeploy.DeleteDeploymentConfig
(
-- * Creating a Request
@@ -64,8 +62,8 @@ deleteDeploymentConfig pDeploymentConfigName_ =
{ _ddcDeploymentConfigName = pDeploymentConfigName_
}
--- | The name of an existing deployment configuration associated with the
--- applicable IAM user or AWS account.
+-- | The name of a deployment configuration associated with the applicable
+-- IAM user or AWS account.
ddcDeploymentConfigName :: Lens' DeleteDeploymentConfig Text
ddcDeploymentConfigName = lens _ddcDeploymentConfigName (\ s a -> s{_ddcDeploymentConfigName = a});
@@ -76,6 +74,8 @@ instance AWSRequest DeleteDeploymentConfig where
response
= receiveNull DeleteDeploymentConfigResponse'
+instance Hashable DeleteDeploymentConfig
+
instance ToHeaders DeleteDeploymentConfig where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/DeleteDeploymentGroup.hs b/gen/Network/AWS/CodeDeploy/DeleteDeploymentGroup.hs
index a63e25e..4e73739 100644
--- a/gen/Network/AWS/CodeDeploy/DeleteDeploymentGroup.hs
+++ b/gen/Network/AWS/CodeDeploy/DeleteDeploymentGroup.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.DeleteDeploymentGroup
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deletes a deployment group.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_DeleteDeploymentGroup.html AWS API Reference> for DeleteDeploymentGroup.
module Network.AWS.CodeDeploy.DeleteDeploymentGroup
(
-- * Creating a Request
@@ -70,8 +68,8 @@ deleteDeploymentGroup pApplicationName_ pDeploymentGroupName_ =
, _ddgDeploymentGroupName = pDeploymentGroupName_
}
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
ddgApplicationName :: Lens' DeleteDeploymentGroup Text
ddgApplicationName = lens _ddgApplicationName (\ s a -> s{_ddgApplicationName = a});
@@ -90,6 +88,8 @@ instance AWSRequest DeleteDeploymentGroup where
(x .?> "hooksNotCleanedUp" .!@ mempty) <*>
(pure (fromEnum s)))
+instance Hashable DeleteDeploymentGroup
+
instance ToHeaders DeleteDeploymentGroup where
toHeaders
= const
@@ -141,7 +141,7 @@ deleteDeploymentGroupResponse pResponseStatus_ =
-- | If the output contains no data, and the corresponding deployment group
-- contained at least one Auto Scaling group, AWS CodeDeploy successfully
-- removed all corresponding Auto Scaling lifecycle event hooks from the
--- Amazon EC2 instances in the Auto Scaling. If the output does contain
+-- Amazon EC2 instances in the Auto Scaling group. If the output contains
-- data, AWS CodeDeploy could not remove some Auto Scaling lifecycle event
-- hooks from the Amazon EC2 instances in the Auto Scaling group.
ddgrsHooksNotCleanedUp :: Lens' DeleteDeploymentGroupResponse [AutoScalingGroup]
diff --git a/gen/Network/AWS/CodeDeploy/DeregisterOnPremisesInstance.hs b/gen/Network/AWS/CodeDeploy/DeregisterOnPremisesInstance.hs
index 13ceda7..b32f7d5 100644
--- a/gen/Network/AWS/CodeDeploy/DeregisterOnPremisesInstance.hs
+++ b/gen/Network/AWS/CodeDeploy/DeregisterOnPremisesInstance.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.DeregisterOnPremisesInstance
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deregisters an on-premises instance.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_DeregisterOnPremisesInstance.html AWS API Reference> for DeregisterOnPremisesInstance.
module Network.AWS.CodeDeploy.DeregisterOnPremisesInstance
(
-- * Creating a Request
@@ -73,6 +71,8 @@ instance AWSRequest DeregisterOnPremisesInstance
response
= receiveNull DeregisterOnPremisesInstanceResponse'
+instance Hashable DeregisterOnPremisesInstance
+
instance ToHeaders DeregisterOnPremisesInstance where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/GetApplication.hs b/gen/Network/AWS/CodeDeploy/GetApplication.hs
index 8aeafb7..ce8638f 100644
--- a/gen/Network/AWS/CodeDeploy/GetApplication.hs
+++ b/gen/Network/AWS/CodeDeploy/GetApplication.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetApplication
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about an application.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetApplication.html AWS API Reference> for GetApplication.
module Network.AWS.CodeDeploy.GetApplication
(
-- * Creating a Request
@@ -64,8 +62,8 @@ getApplication pApplicationName_ =
{ _gaApplicationName = pApplicationName_
}
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
gaApplicationName :: Lens' GetApplication Text
gaApplicationName = lens _gaApplicationName (\ s a -> s{_gaApplicationName = a});
@@ -78,6 +76,8 @@ instance AWSRequest GetApplication where
GetApplicationResponse' <$>
(x .?> "application") <*> (pure (fromEnum s)))
+instance Hashable GetApplication
+
instance ToHeaders GetApplication where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/GetApplicationRevision.hs b/gen/Network/AWS/CodeDeploy/GetApplicationRevision.hs
index 094e4f3..a67cc73 100644
--- a/gen/Network/AWS/CodeDeploy/GetApplicationRevision.hs
+++ b/gen/Network/AWS/CodeDeploy/GetApplicationRevision.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetApplicationRevision
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about an application revision.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetApplicationRevision.html AWS API Reference> for GetApplicationRevision.
module Network.AWS.CodeDeploy.GetApplicationRevision
(
-- * Creating a Request
@@ -76,8 +74,8 @@ getApplicationRevision pApplicationName_ pRevision_ =
garApplicationName :: Lens' GetApplicationRevision Text
garApplicationName = lens _garApplicationName (\ s a -> s{_garApplicationName = a});
--- | Information about the application revision to get, including the
--- revision\'s type and its location.
+-- | Information about the application revision to get, including type and
+-- location.
garRevision :: Lens' GetApplicationRevision RevisionLocation
garRevision = lens _garRevision (\ s a -> s{_garRevision = a});
@@ -93,6 +91,8 @@ instance AWSRequest GetApplicationRevision where
<*> (x .?> "revision")
<*> (pure (fromEnum s)))
+instance Hashable GetApplicationRevision
+
instance ToHeaders GetApplicationRevision where
toHeaders
= const
@@ -156,8 +156,7 @@ garrsApplicationName = lens _garrsApplicationName (\ s a -> s{_garrsApplicationN
garrsRevisionInfo :: Lens' GetApplicationRevisionResponse (Maybe GenericRevisionInfo)
garrsRevisionInfo = lens _garrsRevisionInfo (\ s a -> s{_garrsRevisionInfo = a});
--- | Additional information about the revision, including the revision\'s
--- type and its location.
+-- | Additional information about the revision, including type and location.
garrsRevision :: Lens' GetApplicationRevisionResponse (Maybe RevisionLocation)
garrsRevision = lens _garrsRevision (\ s a -> s{_garrsRevision = a});
diff --git a/gen/Network/AWS/CodeDeploy/GetDeployment.hs b/gen/Network/AWS/CodeDeploy/GetDeployment.hs
index 81b375c..b1f082a 100644
--- a/gen/Network/AWS/CodeDeploy/GetDeployment.hs
+++ b/gen/Network/AWS/CodeDeploy/GetDeployment.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetDeployment
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about a deployment.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetDeployment.html AWS API Reference> for GetDeployment.
module Network.AWS.CodeDeploy.GetDeployment
(
-- * Creating a Request
@@ -64,8 +62,7 @@ getDeployment pDeploymentId_ =
{ _gdDeploymentId = pDeploymentId_
}
--- | An existing deployment ID associated with the applicable IAM user or AWS
--- account.
+-- | A deployment ID associated with the applicable IAM user or AWS account.
gdDeploymentId :: Lens' GetDeployment Text
gdDeploymentId = lens _gdDeploymentId (\ s a -> s{_gdDeploymentId = a});
@@ -78,6 +75,8 @@ instance AWSRequest GetDeployment where
GetDeploymentResponse' <$>
(x .?> "deploymentInfo") <*> (pure (fromEnum s)))
+instance Hashable GetDeployment
+
instance ToHeaders GetDeployment where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/GetDeploymentConfig.hs b/gen/Network/AWS/CodeDeploy/GetDeploymentConfig.hs
index e34c8a4..3d95dc4 100644
--- a/gen/Network/AWS/CodeDeploy/GetDeploymentConfig.hs
+++ b/gen/Network/AWS/CodeDeploy/GetDeploymentConfig.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetDeploymentConfig
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about a deployment configuration.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetDeploymentConfig.html AWS API Reference> for GetDeploymentConfig.
module Network.AWS.CodeDeploy.GetDeploymentConfig
(
-- * Creating a Request
@@ -64,8 +62,8 @@ getDeploymentConfig pDeploymentConfigName_ =
{ _gdcDeploymentConfigName = pDeploymentConfigName_
}
--- | The name of an existing deployment configuration associated with the
--- applicable IAM user or AWS account.
+-- | The name of a deployment configuration associated with the applicable
+-- IAM user or AWS account.
gdcDeploymentConfigName :: Lens' GetDeploymentConfig Text
gdcDeploymentConfigName = lens _gdcDeploymentConfigName (\ s a -> s{_gdcDeploymentConfigName = a});
@@ -80,6 +78,8 @@ instance AWSRequest GetDeploymentConfig where
(x .?> "deploymentConfigInfo") <*>
(pure (fromEnum s)))
+instance Hashable GetDeploymentConfig
+
instance ToHeaders GetDeploymentConfig where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/GetDeploymentGroup.hs b/gen/Network/AWS/CodeDeploy/GetDeploymentGroup.hs
index 647e574..bdf64f5 100644
--- a/gen/Network/AWS/CodeDeploy/GetDeploymentGroup.hs
+++ b/gen/Network/AWS/CodeDeploy/GetDeploymentGroup.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetDeploymentGroup
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about a deployment group.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetDeploymentGroup.html AWS API Reference> for GetDeploymentGroup.
module Network.AWS.CodeDeploy.GetDeploymentGroup
(
-- * Creating a Request
@@ -70,8 +68,8 @@ getDeploymentGroup pApplicationName_ pDeploymentGroupName_ =
, _gdgDeploymentGroupName = pDeploymentGroupName_
}
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
gdgApplicationName :: Lens' GetDeploymentGroup Text
gdgApplicationName = lens _gdgApplicationName (\ s a -> s{_gdgApplicationName = a});
@@ -90,6 +88,8 @@ instance AWSRequest GetDeploymentGroup where
(x .?> "deploymentGroupInfo") <*>
(pure (fromEnum s)))
+instance Hashable GetDeploymentGroup
+
instance ToHeaders GetDeploymentGroup where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/GetDeploymentInstance.hs b/gen/Network/AWS/CodeDeploy/GetDeploymentInstance.hs
index 3d1a47d..61c7e16 100644
--- a/gen/Network/AWS/CodeDeploy/GetDeploymentInstance.hs
+++ b/gen/Network/AWS/CodeDeploy/GetDeploymentInstance.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetDeploymentInstance
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about an instance as part of a deployment.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetDeploymentInstance.html AWS API Reference> for GetDeploymentInstance.
module Network.AWS.CodeDeploy.GetDeploymentInstance
(
-- * Creating a Request
@@ -74,7 +72,7 @@ getDeploymentInstance pDeploymentId_ pInstanceId_ =
gdiDeploymentId :: Lens' GetDeploymentInstance Text
gdiDeploymentId = lens _gdiDeploymentId (\ s a -> s{_gdiDeploymentId = a});
--- | The unique ID of an instance in the deployment\'s deployment group.
+-- | The unique ID of an instance in the deployment group.
gdiInstanceId :: Lens' GetDeploymentInstance Text
gdiInstanceId = lens _gdiInstanceId (\ s a -> s{_gdiInstanceId = a});
@@ -88,6 +86,8 @@ instance AWSRequest GetDeploymentInstance where
GetDeploymentInstanceResponse' <$>
(x .?> "instanceSummary") <*> (pure (fromEnum s)))
+instance Hashable GetDeploymentInstance
+
instance ToHeaders GetDeploymentInstance where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/GetOnPremisesInstance.hs b/gen/Network/AWS/CodeDeploy/GetOnPremisesInstance.hs
index eb66a58..9143294 100644
--- a/gen/Network/AWS/CodeDeploy/GetOnPremisesInstance.hs
+++ b/gen/Network/AWS/CodeDeploy/GetOnPremisesInstance.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.GetOnPremisesInstance
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about an on-premises instance.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_GetOnPremisesInstance.html AWS API Reference> for GetOnPremisesInstance.
module Network.AWS.CodeDeploy.GetOnPremisesInstance
(
-- * Creating a Request
@@ -64,7 +62,7 @@ getOnPremisesInstance pInstanceName_ =
{ _gopiInstanceName = pInstanceName_
}
--- | The name of the on-premises instance to get information about
+-- | The name of the on-premises instance about which to get information.
gopiInstanceName :: Lens' GetOnPremisesInstance Text
gopiInstanceName = lens _gopiInstanceName (\ s a -> s{_gopiInstanceName = a});
@@ -78,6 +76,8 @@ instance AWSRequest GetOnPremisesInstance where
GetOnPremisesInstanceResponse' <$>
(x .?> "instanceInfo") <*> (pure (fromEnum s)))
+instance Hashable GetOnPremisesInstance
+
instance ToHeaders GetOnPremisesInstance where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/ListApplicationRevisions.hs b/gen/Network/AWS/CodeDeploy/ListApplicationRevisions.hs
index f4d9fc3..2c1ba9f 100644
--- a/gen/Network/AWS/CodeDeploy/ListApplicationRevisions.hs
+++ b/gen/Network/AWS/CodeDeploy/ListApplicationRevisions.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListApplicationRevisions
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Lists information about revisions for an application.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListApplicationRevisions.html AWS API Reference> for ListApplicationRevisions.
module Network.AWS.CodeDeploy.ListApplicationRevisions
(
-- * Creating a Request
@@ -95,8 +93,8 @@ listApplicationRevisions pApplicationName_ =
, _larApplicationName = pApplicationName_
}
--- | A specific key prefix for the set of Amazon S3 objects to limit the
--- search for revisions.
+-- | A key prefix for the set of Amazon S3 objects to limit the search for
+-- revisions.
larS3KeyPrefix :: Lens' ListApplicationRevisions (Maybe Text)
larS3KeyPrefix = lens _larS3KeyPrefix (\ s a -> s{_larS3KeyPrefix = a});
@@ -107,15 +105,14 @@ larS3KeyPrefix = lens _larS3KeyPrefix (\ s a -> s{_larS3KeyPrefix = a});
-- group.
-- - exclude: Do not list revisions that are target revisions of a
-- deployment group.
--- - ignore: List all revisions, regardless of whether they are target
--- revisions of a deployment group.
+-- - ignore: List all revisions.
larDeployed :: Lens' ListApplicationRevisions (Maybe ListStateFilterAction)
larDeployed = lens _larDeployed (\ s a -> s{_larDeployed = a});
--- | The order to sort the list results by:
+-- | The order in which to sort the list results:
--
--- - ascending: Sort the list of results in ascending order.
--- - descending: Sort the list of results in descending order.
+-- - ascending: ascending order.
+-- - descending: descending order.
--
-- If not specified, the results will be sorted in ascending order.
--
@@ -123,34 +120,33 @@ larDeployed = lens _larDeployed (\ s a -> s{_larDeployed = a});
larSortOrder :: Lens' ListApplicationRevisions (Maybe SortOrder)
larSortOrder = lens _larSortOrder (\ s a -> s{_larSortOrder = a});
--- | An identifier that was returned from the previous list application
--- revisions call, which can be used to return the next set of applications
--- in the list.
+-- | An identifier returned from the previous list application revisions
+-- call. It can be used to return the next set of applications in the list.
larNextToken :: Lens' ListApplicationRevisions (Maybe Text)
larNextToken = lens _larNextToken (\ s a -> s{_larNextToken = a});
--- | A specific Amazon S3 bucket name to limit the search for revisions.
+-- | An Amazon S3 bucket name to limit the search for revisions.
--
--- If set to null, then all of the user\'s buckets will be searched.
+-- If set to null, all of the user\'s buckets will be searched.
larS3Bucket :: Lens' ListApplicationRevisions (Maybe Text)
larS3Bucket = lens _larS3Bucket (\ s a -> s{_larS3Bucket = a});
--- | The column name to sort the list results by:
+-- | The column name to use to sort the list results:
--
--- - registerTime: Sort the list results by when the revisions were
--- registered with AWS CodeDeploy.
--- - firstUsedTime: Sort the list results by when the revisions were
--- first used by in a deployment.
--- - lastUsedTime: Sort the list results by when the revisions were last
--- used in a deployment.
+-- - registerTime: Sort by the time the revisions were registered with
+-- AWS CodeDeploy.
+-- - firstUsedTime: Sort by the time the revisions were first used in a
+-- deployment.
+-- - lastUsedTime: Sort by the time the revisions were last used in a
+-- deployment.
--
-- If not specified or set to null, the results will be returned in an
-- arbitrary order.
larSortBy :: Lens' ListApplicationRevisions (Maybe ApplicationRevisionSortBy)
larSortBy = lens _larSortBy (\ s a -> s{_larSortBy = a});
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
larApplicationName :: Lens' ListApplicationRevisions Text
larApplicationName = lens _larApplicationName (\ s a -> s{_larApplicationName = a});
@@ -166,6 +162,8 @@ instance AWSRequest ListApplicationRevisions where
(x .?> "revisions" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListApplicationRevisions
+
instance ToHeaders ListApplicationRevisions where
toHeaders
= const
@@ -222,14 +220,13 @@ listApplicationRevisionsResponse pResponseStatus_ =
, _larrsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- application revisions call to return the next set of application
--- revisions in the list.
+-- | If a large amount of information is returned, an identifier will also be
+-- returned. It can be used in a subsequent list application revisions call
+-- to return the next set of application revisions in the list.
larrsNextToken :: Lens' ListApplicationRevisionsResponse (Maybe Text)
larrsNextToken = lens _larrsNextToken (\ s a -> s{_larrsNextToken = a});
--- | A list of revision locations that contain the matching revisions.
+-- | A list of locations that contain the matching revisions.
larrsRevisions :: Lens' ListApplicationRevisionsResponse [RevisionLocation]
larrsRevisions = lens _larrsRevisions (\ s a -> s{_larrsRevisions = a}) . _Default . _Coerce;
diff --git a/gen/Network/AWS/CodeDeploy/ListApplications.hs b/gen/Network/AWS/CodeDeploy/ListApplications.hs
index b0d90ae..84c7222 100644
--- a/gen/Network/AWS/CodeDeploy/ListApplications.hs
+++ b/gen/Network/AWS/CodeDeploy/ListApplications.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListApplications
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -20,8 +20,6 @@
--
-- Lists the applications registered with the applicable IAM user or AWS
-- account.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListApplications.html AWS API Reference> for ListApplications.
module Network.AWS.CodeDeploy.ListApplications
(
-- * Creating a Request
@@ -65,9 +63,8 @@ listApplications =
{ _laNextToken = Nothing
}
--- | An identifier that was returned from the previous list applications
--- call, which can be used to return the next set of applications in the
--- list.
+-- | An identifier returned from the previous list applications call. It can
+-- be used to return the next set of applications in the list.
laNextToken :: Lens' ListApplications (Maybe Text)
laNextToken = lens _laNextToken (\ s a -> s{_laNextToken = a});
@@ -82,6 +79,8 @@ instance AWSRequest ListApplications where
(x .?> "applications" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListApplications
+
instance ToHeaders ListApplications where
toHeaders
= const
@@ -131,9 +130,9 @@ listApplicationsResponse pResponseStatus_ =
, _larsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- applications call to return the next set of applications in the list.
+-- | If a large amount of information is returned, an identifier is also
+-- returned. It can be used in a subsequent list applications call to
+-- return the next set of applications, will also be returned. in the list.
larsNextToken :: Lens' ListApplicationsResponse (Maybe Text)
larsNextToken = lens _larsNextToken (\ s a -> s{_larsNextToken = a});
diff --git a/gen/Network/AWS/CodeDeploy/ListDeploymentConfigs.hs b/gen/Network/AWS/CodeDeploy/ListDeploymentConfigs.hs
index 674bfd5..4bbef96 100644
--- a/gen/Network/AWS/CodeDeploy/ListDeploymentConfigs.hs
+++ b/gen/Network/AWS/CodeDeploy/ListDeploymentConfigs.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListDeploymentConfigs
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -20,8 +20,6 @@
--
-- Lists the deployment configurations with the applicable IAM user or AWS
-- account.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListDeploymentConfigs.html AWS API Reference> for ListDeploymentConfigs.
module Network.AWS.CodeDeploy.ListDeploymentConfigs
(
-- * Creating a Request
@@ -65,9 +63,9 @@ listDeploymentConfigs =
{ _ldcNextToken = Nothing
}
--- | An identifier that was returned from the previous list deployment
--- configurations call, which can be used to return the next set of
--- deployment configurations in the list.
+-- | An identifier returned from the previous list deployment configurations
+-- call. It can be used to return the next set of deployment configurations
+-- in the list.
ldcNextToken :: Lens' ListDeploymentConfigs (Maybe Text)
ldcNextToken = lens _ldcNextToken (\ s a -> s{_ldcNextToken = a});
@@ -83,6 +81,8 @@ instance AWSRequest ListDeploymentConfigs where
(x .?> "deploymentConfigsList" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListDeploymentConfigs
+
instance ToHeaders ListDeploymentConfigs where
toHeaders
= const
@@ -132,15 +132,14 @@ listDeploymentConfigsResponse pResponseStatus_ =
, _ldcrsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- deployment configurations call to return the next set of deployment
--- configurations in the list.
+-- | If a large amount of information is returned, an identifier is also
+-- returned. It can be used in a subsequent list deployment configurations
+-- call to return the next set of deployment configurations in the list.
ldcrsNextToken :: Lens' ListDeploymentConfigsResponse (Maybe Text)
ldcrsNextToken = lens _ldcrsNextToken (\ s a -> s{_ldcrsNextToken = a});
--- | A list of deployment configurations, including the built-in
--- configurations such as CodeDeployDefault.OneAtATime.
+-- | A list of deployment configurations, including built-in configurations
+-- such as CodeDeployDefault.OneAtATime.
ldcrsDeploymentConfigsList :: Lens' ListDeploymentConfigsResponse [Text]
ldcrsDeploymentConfigsList = lens _ldcrsDeploymentConfigsList (\ s a -> s{_ldcrsDeploymentConfigsList = a}) . _Default . _Coerce;
diff --git a/gen/Network/AWS/CodeDeploy/ListDeploymentGroups.hs b/gen/Network/AWS/CodeDeploy/ListDeploymentGroups.hs
index ead55de..34b7fb4 100644
--- a/gen/Network/AWS/CodeDeploy/ListDeploymentGroups.hs
+++ b/gen/Network/AWS/CodeDeploy/ListDeploymentGroups.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListDeploymentGroups
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -20,8 +20,6 @@
--
-- Lists the deployment groups for an application registered with the
-- applicable IAM user or AWS account.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListDeploymentGroups.html AWS API Reference> for ListDeploymentGroups.
module Network.AWS.CodeDeploy.ListDeploymentGroups
(
-- * Creating a Request
@@ -72,14 +70,13 @@ listDeploymentGroups pApplicationName_ =
, _ldgApplicationName = pApplicationName_
}
--- | An identifier that was returned from the previous list deployment groups
--- call, which can be used to return the next set of deployment groups in
--- the list.
+-- | An identifier returned from the previous list deployment groups call. It
+-- can be used to return the next set of deployment groups in the list.
ldgNextToken :: Lens' ListDeploymentGroups (Maybe Text)
ldgNextToken = lens _ldgNextToken (\ s a -> s{_ldgNextToken = a});
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
ldgApplicationName :: Lens' ListDeploymentGroups Text
ldgApplicationName = lens _ldgApplicationName (\ s a -> s{_ldgApplicationName = a});
@@ -95,6 +92,8 @@ instance AWSRequest ListDeploymentGroups where
(x .?> "deploymentGroups" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListDeploymentGroups
+
instance ToHeaders ListDeploymentGroups where
toHeaders
= const
@@ -150,10 +149,9 @@ listDeploymentGroupsResponse pResponseStatus_ =
, _ldgrsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- deployment groups call to return the next set of deployment groups in
--- the list.
+-- | If a large amount of information is returned, an identifier is also
+-- returned. It can be used in a subsequent list deployment groups call to
+-- return the next set of deployment groups in the list.
ldgrsNextToken :: Lens' ListDeploymentGroupsResponse (Maybe Text)
ldgrsNextToken = lens _ldgrsNextToken (\ s a -> s{_ldgrsNextToken = a});
diff --git a/gen/Network/AWS/CodeDeploy/ListDeploymentInstances.hs b/gen/Network/AWS/CodeDeploy/ListDeploymentInstances.hs
index 05fa687..887dc0b 100644
--- a/gen/Network/AWS/CodeDeploy/ListDeploymentInstances.hs
+++ b/gen/Network/AWS/CodeDeploy/ListDeploymentInstances.hs
@@ -12,16 +12,14 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListDeploymentInstances
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Lists the instances for a deployment associated with the applicable IAM
+-- Lists the instance for a deployment associated with the applicable IAM
-- user or AWS account.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListDeploymentInstances.html AWS API Reference> for ListDeploymentInstances.
module Network.AWS.CodeDeploy.ListDeploymentInstances
(
-- * Creating a Request
@@ -76,26 +74,22 @@ listDeploymentInstances pDeploymentId_ =
, _ldiDeploymentId = pDeploymentId_
}
--- | A subset of instances to list, by status:
+-- | A subset of instances to list by status:
--
--- - Pending: Include in the resulting list those instances with pending
--- deployments.
--- - InProgress: Include in the resulting list those instances with
--- in-progress deployments.
--- - Succeeded: Include in the resulting list those instances with
--- succeeded deployments.
--- - Failed: Include in the resulting list those instances with failed
--- deployments.
--- - Skipped: Include in the resulting list those instances with skipped
--- deployments.
--- - Unknown: Include in the resulting list those instances with
--- deployments in an unknown state.
+-- - Pending: Include those instance with pending deployments.
+-- - InProgress: Include those instance where deployments are still in
+-- progress.
+-- - Succeeded: Include those instances with successful deployments.
+-- - Failed: Include those instance with failed deployments.
+-- - Skipped: Include those instance with skipped deployments.
+-- - Unknown: Include those instance with deployments in an unknown
+-- state.
ldiInstanceStatusFilter :: Lens' ListDeploymentInstances [InstanceStatus]
ldiInstanceStatusFilter = lens _ldiInstanceStatusFilter (\ s a -> s{_ldiInstanceStatusFilter = a}) . _Default . _Coerce;
--- | An identifier that was returned from the previous list deployment
--- instances call, which can be used to return the next set of deployment
--- instances in the list.
+-- | An identifier returned from the previous list deployment instances call.
+-- It can be used to return the next set of deployment instances in the
+-- list.
ldiNextToken :: Lens' ListDeploymentInstances (Maybe Text)
ldiNextToken = lens _ldiNextToken (\ s a -> s{_ldiNextToken = a});
@@ -115,6 +109,8 @@ instance AWSRequest ListDeploymentInstances where
(x .?> "instancesList" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListDeploymentInstances
+
instance ToHeaders ListDeploymentInstances where
toHeaders
= const
@@ -168,14 +164,13 @@ listDeploymentInstancesResponse pResponseStatus_ =
, _ldirsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- deployment instances call to return the next set of deployment instances
--- in the list.
+-- | If a large amount of information is returned, an identifier is also
+-- returned. It can be used in a subsequent list deployment instances call
+-- to return the next set of deployment instances in the list.
ldirsNextToken :: Lens' ListDeploymentInstancesResponse (Maybe Text)
ldirsNextToken = lens _ldirsNextToken (\ s a -> s{_ldirsNextToken = a});
--- | A list of instances IDs.
+-- | A list of instance IDs.
ldirsInstancesList :: Lens' ListDeploymentInstancesResponse [Text]
ldirsInstancesList = lens _ldirsInstancesList (\ s a -> s{_ldirsInstancesList = a}) . _Default . _Coerce;
diff --git a/gen/Network/AWS/CodeDeploy/ListDeployments.hs b/gen/Network/AWS/CodeDeploy/ListDeployments.hs
index 4536717..0719e2a 100644
--- a/gen/Network/AWS/CodeDeploy/ListDeployments.hs
+++ b/gen/Network/AWS/CodeDeploy/ListDeployments.hs
@@ -12,16 +12,14 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListDeployments
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Lists the deployments within a deployment group for an application
+-- Lists the deployments in a deployment group for an application
-- registered with the applicable IAM user or AWS account.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListDeployments.html AWS API Reference> for ListDeployments.
module Network.AWS.CodeDeploy.ListDeployments
(
-- * Creating a Request
@@ -85,29 +83,29 @@ listDeployments =
, _ldDeploymentGroupName = Nothing
}
--- | A deployment creation start- and end-time range for returning a subset
--- of the list of deployments.
+-- | A time range (start and end) for returning a subset of the list of
+-- deployments.
ldCreateTimeRange :: Lens' ListDeployments (Maybe TimeRange)
ldCreateTimeRange = lens _ldCreateTimeRange (\ s a -> s{_ldCreateTimeRange = a});
--- | An identifier that was returned from the previous list deployments call,
--- which can be used to return the next set of deployments in the list.
+-- | An identifier returned from the previous list deployments call. It can
+-- be used to return the next set of deployments in the list.
ldNextToken :: Lens' ListDeployments (Maybe Text)
ldNextToken = lens _ldNextToken (\ s a -> s{_ldNextToken = a});
--- | A subset of deployments to list, by status:
+-- | A subset of deployments to list by status:
--
--- - Created: Include in the resulting list created deployments.
--- - Queued: Include in the resulting list queued deployments.
--- - In Progress: Include in the resulting list in-progress deployments.
--- - Succeeded: Include in the resulting list succeeded deployments.
--- - Failed: Include in the resulting list failed deployments.
--- - Aborted: Include in the resulting list aborted deployments.
+-- - Created: Include created deployments in the resulting list.
+-- - Queued: Include queued deployments in the resulting list.
+-- - In Progress: Include in-progress deployments in the resulting list.
+-- - Succeeded: Include successful deployments in the resulting list.
+-- - Failed: Include failed deployments in the resulting list.
+-- - Aborted: Include aborted deployments in the resulting list.
ldIncludeOnlyStatuses :: Lens' ListDeployments [DeploymentStatus]
ldIncludeOnlyStatuses = lens _ldIncludeOnlyStatuses (\ s a -> s{_ldIncludeOnlyStatuses = a}) . _Default . _Coerce;
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
ldApplicationName :: Lens' ListDeployments (Maybe Text)
ldApplicationName = lens _ldApplicationName (\ s a -> s{_ldApplicationName = a});
@@ -126,6 +124,8 @@ instance AWSRequest ListDeployments where
(x .?> "deployments" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListDeployments
+
instance ToHeaders ListDeployments where
toHeaders
= const
@@ -182,9 +182,9 @@ listDeploymentsResponse pResponseStatus_ =
, _ldrsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- deployments call to return the next set of deployments in the list.
+-- | If a large amount of information is returned, an identifier is also
+-- returned. It can be used in a subsequent list deployments call to return
+-- the next set of deployments in the list.
ldrsNextToken :: Lens' ListDeploymentsResponse (Maybe Text)
ldrsNextToken = lens _ldrsNextToken (\ s a -> s{_ldrsNextToken = a});
diff --git a/gen/Network/AWS/CodeDeploy/ListOnPremisesInstances.hs b/gen/Network/AWS/CodeDeploy/ListOnPremisesInstances.hs
index fa8be81..2da8702 100644
--- a/gen/Network/AWS/CodeDeploy/ListOnPremisesInstances.hs
+++ b/gen/Network/AWS/CodeDeploy/ListOnPremisesInstances.hs
@@ -12,19 +12,17 @@
-- |
-- Module : Network.AWS.CodeDeploy.ListOnPremisesInstances
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Gets a list of one or more on-premises instance names.
+-- Gets a list of names for one or more on-premises instances.
--
-- Unless otherwise specified, both registered and deregistered on-premises
-- instance names will be listed. To list only registered or deregistered
-- on-premises instance names, use the registration status parameter.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_ListOnPremisesInstances.html AWS API Reference> for ListOnPremisesInstances.
module Network.AWS.CodeDeploy.ListOnPremisesInstances
(
-- * Creating a Request
@@ -81,22 +79,22 @@ listOnPremisesInstances =
}
-- | The on-premises instance tags that will be used to restrict the
--- corresponding on-premises instance names that are returned.
+-- corresponding on-premises instance names returned.
lopiTagFilters :: Lens' ListOnPremisesInstances [TagFilter]
lopiTagFilters = lens _lopiTagFilters (\ s a -> s{_lopiTagFilters = a}) . _Default . _Coerce;
--- | An identifier that was returned from the previous list on-premises
--- instances call, which can be used to return the next set of on-premises
--- instances in the list.
+-- | An identifier returned from the previous list on-premises instances
+-- call. It can be used to return the next set of on-premises instances in
+-- the list.
lopiNextToken :: Lens' ListOnPremisesInstances (Maybe Text)
lopiNextToken = lens _lopiNextToken (\ s a -> s{_lopiNextToken = a});
--- | The on-premises instances registration status:
+-- | The registration status of the on-premises instances:
--
--- - Deregistered: Include in the resulting list deregistered on-premises
--- instances.
--- - Registered: Include in the resulting list registered on-premises
--- instances.
+-- - Deregistered: Include deregistered on-premises instances in the
+-- resulting list.
+-- - Registered: Include registered on-premises instances in the
+-- resulting list.
lopiRegistrationStatus :: Lens' ListOnPremisesInstances (Maybe RegistrationStatus)
lopiRegistrationStatus = lens _lopiRegistrationStatus (\ s a -> s{_lopiRegistrationStatus = a});
@@ -112,6 +110,8 @@ instance AWSRequest ListOnPremisesInstances where
(x .?> "instanceNames" .!@ mempty)
<*> (pure (fromEnum s)))
+instance Hashable ListOnPremisesInstances
+
instance ToHeaders ListOnPremisesInstances where
toHeaders
= const
@@ -165,10 +165,9 @@ listOnPremisesInstancesResponse pResponseStatus_ =
, _lopirsResponseStatus = pResponseStatus_
}
--- | If the amount of information that is returned is significantly large, an
--- identifier will also be returned, which can be used in a subsequent list
--- on-premises instances call to return the next set of on-premises
--- instances in the list.
+-- | If a large amount of information is returned, an identifier is also
+-- returned. It can be used in a subsequent list on-premises instances call
+-- to return the next set of on-premises instances in the list.
lopirsNextToken :: Lens' ListOnPremisesInstancesResponse (Maybe Text)
lopirsNextToken = lens _lopirsNextToken (\ s a -> s{_lopirsNextToken = a});
diff --git a/gen/Network/AWS/CodeDeploy/RegisterApplicationRevision.hs b/gen/Network/AWS/CodeDeploy/RegisterApplicationRevision.hs
index 0240a6d..a3f3402 100644
--- a/gen/Network/AWS/CodeDeploy/RegisterApplicationRevision.hs
+++ b/gen/Network/AWS/CodeDeploy/RegisterApplicationRevision.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.RegisterApplicationRevision
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Registers with AWS CodeDeploy a revision for the specified application.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_RegisterApplicationRevision.html AWS API Reference> for RegisterApplicationRevision.
module Network.AWS.CodeDeploy.RegisterApplicationRevision
(
-- * Creating a Request
@@ -76,13 +74,13 @@ registerApplicationRevision pApplicationName_ pRevision_ =
rarDescription :: Lens' RegisterApplicationRevision (Maybe Text)
rarDescription = lens _rarDescription (\ s a -> s{_rarDescription = a});
--- | The name of an existing AWS CodeDeploy application associated with the
--- applicable IAM user or AWS account.
+-- | The name of an AWS CodeDeploy application associated with the applicable
+-- IAM user or AWS account.
rarApplicationName :: Lens' RegisterApplicationRevision Text
rarApplicationName = lens _rarApplicationName (\ s a -> s{_rarApplicationName = a});
--- | Information about the application revision to register, including the
--- revision\'s type and its location.
+-- | Information about the application revision to register, including type
+-- and location.
rarRevision :: Lens' RegisterApplicationRevision RevisionLocation
rarRevision = lens _rarRevision (\ s a -> s{_rarRevision = a});
@@ -93,6 +91,8 @@ instance AWSRequest RegisterApplicationRevision where
response
= receiveNull RegisterApplicationRevisionResponse'
+instance Hashable RegisterApplicationRevision
+
instance ToHeaders RegisterApplicationRevision where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/RegisterOnPremisesInstance.hs b/gen/Network/AWS/CodeDeploy/RegisterOnPremisesInstance.hs
index a0969c7..110625d 100644
--- a/gen/Network/AWS/CodeDeploy/RegisterOnPremisesInstance.hs
+++ b/gen/Network/AWS/CodeDeploy/RegisterOnPremisesInstance.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.RegisterOnPremisesInstance
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Registers an on-premises instance.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_RegisterOnPremisesInstance.html AWS API Reference> for RegisterOnPremisesInstance.
module Network.AWS.CodeDeploy.RegisterOnPremisesInstance
(
-- * Creating a Request
@@ -42,7 +40,7 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response
--- | Represents the input of register on-premises instance operation.
+-- | Represents the input of the register on-premises instance operation.
--
-- /See:/ 'registerOnPremisesInstance' smart constructor.
data RegisterOnPremisesInstance = RegisterOnPremisesInstance'
@@ -82,6 +80,8 @@ instance AWSRequest RegisterOnPremisesInstance where
response
= receiveNull RegisterOnPremisesInstanceResponse'
+instance Hashable RegisterOnPremisesInstance
+
instance ToHeaders RegisterOnPremisesInstance where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/RemoveTagsFromOnPremisesInstances.hs b/gen/Network/AWS/CodeDeploy/RemoveTagsFromOnPremisesInstances.hs
index 6f62f67..d117d73 100644
--- a/gen/Network/AWS/CodeDeploy/RemoveTagsFromOnPremisesInstances.hs
+++ b/gen/Network/AWS/CodeDeploy/RemoveTagsFromOnPremisesInstances.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.RemoveTagsFromOnPremisesInstances
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Removes one or more tags from one or more on-premises instances.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_RemoveTagsFromOnPremisesInstances.html AWS API Reference> for RemoveTagsFromOnPremisesInstances.
module Network.AWS.CodeDeploy.RemoveTagsFromOnPremisesInstances
(
-- * Creating a Request
@@ -70,7 +68,7 @@ removeTagsFromOnPremisesInstances =
rtfopiTags :: Lens' RemoveTagsFromOnPremisesInstances [Tag]
rtfopiTags = lens _rtfopiTags (\ s a -> s{_rtfopiTags = a}) . _Coerce;
--- | The names of the on-premises instances to remove tags from.
+-- | The names of the on-premises instances from which to remove tags.
rtfopiInstanceNames :: Lens' RemoveTagsFromOnPremisesInstances [Text]
rtfopiInstanceNames = lens _rtfopiInstanceNames (\ s a -> s{_rtfopiInstanceNames = a}) . _Coerce;
@@ -83,6 +81,8 @@ instance AWSRequest RemoveTagsFromOnPremisesInstances
= receiveNull
RemoveTagsFromOnPremisesInstancesResponse'
+instance Hashable RemoveTagsFromOnPremisesInstances
+
instance ToHeaders RemoveTagsFromOnPremisesInstances
where
toHeaders
diff --git a/gen/Network/AWS/CodeDeploy/StopDeployment.hs b/gen/Network/AWS/CodeDeploy/StopDeployment.hs
index 3b96661..5b8af3b 100644
--- a/gen/Network/AWS/CodeDeploy/StopDeployment.hs
+++ b/gen/Network/AWS/CodeDeploy/StopDeployment.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.StopDeployment
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Attempts to stop an ongoing deployment.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_StopDeployment.html AWS API Reference> for StopDeployment.
module Network.AWS.CodeDeploy.StopDeployment
(
-- * Creating a Request
@@ -79,6 +77,8 @@ instance AWSRequest StopDeployment where
(x .?> "status") <*> (x .?> "statusMessage") <*>
(pure (fromEnum s)))
+instance Hashable StopDeployment
+
instance ToHeaders StopDeployment where
toHeaders
= const
@@ -131,7 +131,7 @@ stopDeploymentResponse pResponseStatus_ =
-- | The status of the stop deployment operation:
--
-- - Pending: The stop operation is pending.
--- - Succeeded: The stop operation succeeded.
+-- - Succeeded: The stop operation was successful.
sdrsStatus :: Lens' StopDeploymentResponse (Maybe StopStatus)
sdrsStatus = lens _sdrsStatus (\ s a -> s{_sdrsStatus = a});
diff --git a/gen/Network/AWS/CodeDeploy/Types.hs b/gen/Network/AWS/CodeDeploy/Types.hs
index c2febf4..69151b0 100644
--- a/gen/Network/AWS/CodeDeploy/Types.hs
+++ b/gen/Network/AWS/CodeDeploy/Types.hs
@@ -4,7 +4,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.Types
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -16,6 +16,7 @@ module Network.AWS.CodeDeploy.Types
codeDeploy
-- * Errors
+ , _LifecycleHookLimitExceededException
, _InvalidTimeRangeException
, _InvalidTagException
, _InstanceNameAlreadyRegisteredException
@@ -37,6 +38,7 @@ module Network.AWS.CodeDeploy.Types
, _ApplicationDoesNotExistException
, _InvalidMinimumHealthyHostValueException
, _InvalidTagFilterException
+ , _InvalidTriggerConfigException
, _TagRequiredException
, _DeploymentGroupNameRequiredException
, _BucketNameFilterRequiredException
@@ -56,6 +58,7 @@ module Network.AWS.CodeDeploy.Types
, _InvalidSortOrderException
, _DeploymentAlreadyCompletedException
, _DeploymentDoesNotExistException
+ , _BatchLimitExceededException
, _InvalidRevisionException
, _RevisionRequiredException
, _InstanceDoesNotExistException
@@ -63,6 +66,7 @@ module Network.AWS.CodeDeploy.Types
, _InvalidEC2TagException
, _InvalidInstanceNameException
, _InstanceNameRequiredException
+ , _TriggerTargetsLimitExceededException
, _InvalidDeploymentStatusException
, _InvalidRegistrationStatusException
, _ApplicationNameRequiredException
@@ -122,6 +126,9 @@ module Network.AWS.CodeDeploy.Types
-- * TagFilterType
, TagFilterType (..)
+ -- * TriggerEventType
+ , TriggerEventType (..)
+
-- * ApplicationInfo
, ApplicationInfo
, applicationInfo
@@ -153,6 +160,7 @@ module Network.AWS.CodeDeploy.Types
, dgiEc2TagFilters
, dgiOnPremisesInstanceTagFilters
, dgiApplicationName
+ , dgiTriggerConfigurations
, dgiDeploymentGroupId
, dgiAutoScalingGroups
, dgiDeploymentGroupName
@@ -254,6 +262,12 @@ module Network.AWS.CodeDeploy.Types
, mhhValue
, mhhType
+ -- * RevisionInfo
+ , RevisionInfo
+ , revisionInfo
+ , riGenericRevisionInfo
+ , riRevisionLocation
+
-- * RevisionLocation
, RevisionLocation
, revisionLocation
@@ -288,6 +302,13 @@ module Network.AWS.CodeDeploy.Types
, timeRange
, trStart
, trEnd
+
+ -- * TriggerConfig
+ , TriggerConfig
+ , triggerConfig
+ , tcTriggerName
+ , tcTriggerEvents
+ , tcTriggerTargetARN
) where
import Network.AWS.CodeDeploy.Types.Product
@@ -319,6 +340,7 @@ codeDeploy =
, _retryCheck = check
}
check e
+ | has (hasStatus 429) e = Just "too_many_requests"
| has (hasCode "ThrottlingException" . hasStatus 400) e =
Just "throttling_exception"
| has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
@@ -327,6 +349,11 @@ codeDeploy =
| has (hasStatus 509) e = Just "limit_exceeded"
| otherwise = Nothing
+-- | The limit for lifecycle hooks was exceeded.
+_LifecycleHookLimitExceededException :: AsError a => Getting (First ServiceError) a ServiceError
+_LifecycleHookLimitExceededException =
+ _ServiceError . hasCode "LifecycleHookLimitExceededException"
+
-- | The specified time range was specified in an invalid format.
_InvalidTimeRangeException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidTimeRangeException =
@@ -351,7 +378,7 @@ _InvalidDeploymentGroupNameException :: AsError a => Getting (First ServiceError
_InvalidDeploymentGroupNameException =
_ServiceError . hasCode "InvalidDeploymentGroupNameException"
--- | The description that was provided is too long.
+-- | The description is too long.
_DescriptionTooLongException :: AsError a => Getting (First ServiceError) a ServiceError
_DescriptionTooLongException =
_ServiceError . hasCode "DescriptionTooLongException"
@@ -426,7 +453,7 @@ _ApplicationDoesNotExistException :: AsError a => Getting (First ServiceError) a
_ApplicationDoesNotExistException =
_ServiceError . hasCode "ApplicationDoesNotExistException"
--- | The minimum healthy instances value was specified in an invalid format.
+-- | The minimum healthy instance value was specified in an invalid format.
_InvalidMinimumHealthyHostValueException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidMinimumHealthyHostValueException =
_ServiceError . hasCode "InvalidMinimumHealthyHostValueException"
@@ -436,6 +463,11 @@ _InvalidTagFilterException :: AsError a => Getting (First ServiceError) a Servic
_InvalidTagFilterException =
_ServiceError . hasCode "InvalidTagFilterException"
+-- | The trigger was specified in an invalid format.
+_InvalidTriggerConfigException :: AsError a => Getting (First ServiceError) a ServiceError
+_InvalidTriggerConfigException =
+ _ServiceError . hasCode "InvalidTriggerConfigException"
+
-- | A tag was not specified.
_TagRequiredException :: AsError a => Getting (First ServiceError) a ServiceError
_TagRequiredException = _ServiceError . hasCode "TagRequiredException"
@@ -445,7 +477,7 @@ _DeploymentGroupNameRequiredException :: AsError a => Getting (First ServiceErro
_DeploymentGroupNameRequiredException =
_ServiceError . hasCode "DeploymentGroupNameRequiredException"
--- | A bucket name is required but was not provided.
+-- | A bucket name is required, but was not provided.
_BucketNameFilterRequiredException :: AsError a => Getting (First ServiceError) a ServiceError
_BucketNameFilterRequiredException =
_ServiceError . hasCode "BucketNameFilterRequiredException"
@@ -525,7 +557,7 @@ _InvalidSortOrderException :: AsError a => Getting (First ServiceError) a Servic
_InvalidSortOrderException =
_ServiceError . hasCode "InvalidSortOrderException"
--- | The deployment is already completed.
+-- | The deployment is already complete.
_DeploymentAlreadyCompletedException :: AsError a => Getting (First ServiceError) a ServiceError
_DeploymentAlreadyCompletedException =
_ServiceError . hasCode "DeploymentAlreadyCompletedException"
@@ -536,6 +568,12 @@ _DeploymentDoesNotExistException :: AsError a => Getting (First ServiceError) a
_DeploymentDoesNotExistException =
_ServiceError . hasCode "DeploymentDoesNotExistException"
+-- | The maximum number of names or IDs allowed for this request (100) was
+-- exceeded.
+_BatchLimitExceededException :: AsError a => Getting (First ServiceError) a ServiceError
+_BatchLimitExceededException =
+ _ServiceError . hasCode "BatchLimitExceededException"
+
-- | The revision was specified in an invalid format.
_InvalidRevisionException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidRevisionException = _ServiceError . hasCode "InvalidRevisionException"
@@ -570,6 +608,11 @@ _InstanceNameRequiredException :: AsError a => Getting (First ServiceError) a Se
_InstanceNameRequiredException =
_ServiceError . hasCode "InstanceNameRequiredException"
+-- | The maximum allowed number of triggers was exceeded.
+_TriggerTargetsLimitExceededException :: AsError a => Getting (First ServiceError) a ServiceError
+_TriggerTargetsLimitExceededException =
+ _ServiceError . hasCode "TriggerTargetsLimitExceededException"
+
-- | The specified deployment status doesn\'t exist or cannot be determined.
_InvalidDeploymentStatusException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidDeploymentStatusException =
@@ -606,7 +649,7 @@ _TagLimitExceededException :: AsError a => Getting (First ServiceError) a Servic
_TagLimitExceededException =
_ServiceError . hasCode "TagLimitExceededException"
--- | More applications were attempted to be created than were allowed.
+-- | More applications were attempted to be created than are allowed.
_ApplicationLimitExceededException :: AsError a => Getting (First ServiceError) a ServiceError
_ApplicationLimitExceededException =
_ServiceError . hasCode "ApplicationLimitExceededException"
diff --git a/gen/Network/AWS/CodeDeploy/Types/Product.hs b/gen/Network/AWS/CodeDeploy/Types/Product.hs
index efceafd..5d00b37 100644
--- a/gen/Network/AWS/CodeDeploy/Types/Product.hs
+++ b/gen/Network/AWS/CodeDeploy/Types/Product.hs
@@ -9,7 +9,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.Types.Product
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -65,7 +65,7 @@ aiApplicationId = lens _aiApplicationId (\ s a -> s{_aiApplicationId = a});
aiApplicationName :: Lens' ApplicationInfo (Maybe Text)
aiApplicationName = lens _aiApplicationName (\ s a -> s{_aiApplicationName = a});
--- | The time that the application was created.
+-- | The time at which the application was created.
aiCreateTime :: Lens' ApplicationInfo (Maybe UTCTime)
aiCreateTime = lens _aiCreateTime (\ s a -> s{_aiCreateTime = a}) . mapping _Time;
@@ -78,6 +78,8 @@ instance FromJSON ApplicationInfo where
<*> (x .:? "applicationName")
<*> (x .:? "createTime"))
+instance Hashable ApplicationInfo
+
-- | Information about an Auto Scaling group.
--
-- /See:/ 'autoScalingGroup' smart constructor.
@@ -116,6 +118,8 @@ instance FromJSON AutoScalingGroup where
AutoScalingGroup' <$>
(x .:? "hook") <*> (x .:? "name"))
+instance Hashable AutoScalingGroup
+
-- | Information about a deployment configuration.
--
-- /See:/ 'deploymentConfigInfo' smart constructor.
@@ -151,7 +155,7 @@ deploymentConfigInfo =
dciDeploymentConfigName :: Lens' DeploymentConfigInfo (Maybe Text)
dciDeploymentConfigName = lens _dciDeploymentConfigName (\ s a -> s{_dciDeploymentConfigName = a});
--- | Information about the number or percentage of minimum healthy instances.
+-- | Information about the number or percentage of minimum healthy instance.
dciMinimumHealthyHosts :: Lens' DeploymentConfigInfo (Maybe MinimumHealthyHosts)
dciMinimumHealthyHosts = lens _dciMinimumHealthyHosts (\ s a -> s{_dciMinimumHealthyHosts = a});
@@ -159,7 +163,7 @@ dciMinimumHealthyHosts = lens _dciMinimumHealthyHosts (\ s a -> s{_dciMinimumHea
dciDeploymentConfigId :: Lens' DeploymentConfigInfo (Maybe Text)
dciDeploymentConfigId = lens _dciDeploymentConfigId (\ s a -> s{_dciDeploymentConfigId = a});
--- | The time that the deployment configuration was created.
+-- | The time at which the deployment configuration was created.
dciCreateTime :: Lens' DeploymentConfigInfo (Maybe UTCTime)
dciCreateTime = lens _dciCreateTime (\ s a -> s{_dciCreateTime = a}) . mapping _Time;
@@ -173,6 +177,8 @@ instance FromJSON DeploymentConfigInfo where
<*> (x .:? "deploymentConfigId")
<*> (x .:? "createTime"))
+instance Hashable DeploymentConfigInfo
+
-- | Information about a deployment group.
--
-- /See:/ 'deploymentGroupInfo' smart constructor.
@@ -183,6 +189,7 @@ data DeploymentGroupInfo = DeploymentGroupInfo'
, _dgiEc2TagFilters :: !(Maybe [EC2TagFilter])
, _dgiOnPremisesInstanceTagFilters :: !(Maybe [TagFilter])
, _dgiApplicationName :: !(Maybe Text)
+ , _dgiTriggerConfigurations :: !(Maybe [TriggerConfig])
, _dgiDeploymentGroupId :: !(Maybe Text)
, _dgiAutoScalingGroups :: !(Maybe [AutoScalingGroup])
, _dgiDeploymentGroupName :: !(Maybe Text)
@@ -204,6 +211,8 @@ data DeploymentGroupInfo = DeploymentGroupInfo'
--
-- * 'dgiApplicationName'
--
+-- * 'dgiTriggerConfigurations'
+--
-- * 'dgiDeploymentGroupId'
--
-- * 'dgiAutoScalingGroups'
@@ -219,6 +228,7 @@ deploymentGroupInfo =
, _dgiEc2TagFilters = Nothing
, _dgiOnPremisesInstanceTagFilters = Nothing
, _dgiApplicationName = Nothing
+ , _dgiTriggerConfigurations = Nothing
, _dgiDeploymentGroupId = Nothing
, _dgiAutoScalingGroups = Nothing
, _dgiDeploymentGroupName = Nothing
@@ -232,16 +242,16 @@ dgiServiceRoleARN = lens _dgiServiceRoleARN (\ s a -> s{_dgiServiceRoleARN = a})
dgiDeploymentConfigName :: Lens' DeploymentGroupInfo (Maybe Text)
dgiDeploymentConfigName = lens _dgiDeploymentConfigName (\ s a -> s{_dgiDeploymentConfigName = a});
--- | Information about the deployment group\'s target revision, including the
--- revision\'s type and its location.
+-- | Information about the deployment group\'s target revision, including
+-- type and location.
dgiTargetRevision :: Lens' DeploymentGroupInfo (Maybe RevisionLocation)
dgiTargetRevision = lens _dgiTargetRevision (\ s a -> s{_dgiTargetRevision = a});
--- | The Amazon EC2 tags to filter on.
+-- | The Amazon EC2 tags on which to filter.
dgiEc2TagFilters :: Lens' DeploymentGroupInfo [EC2TagFilter]
dgiEc2TagFilters = lens _dgiEc2TagFilters (\ s a -> s{_dgiEc2TagFilters = a}) . _Default . _Coerce;
--- | The on-premises instance tags to filter on.
+-- | The on-premises instance tags on which to filter.
dgiOnPremisesInstanceTagFilters :: Lens' DeploymentGroupInfo [TagFilter]
dgiOnPremisesInstanceTagFilters = lens _dgiOnPremisesInstanceTagFilters (\ s a -> s{_dgiOnPremisesInstanceTagFilters = a}) . _Default . _Coerce;
@@ -249,6 +259,10 @@ dgiOnPremisesInstanceTagFilters = lens _dgiOnPremisesInstanceTagFilters (\ s a -
dgiApplicationName :: Lens' DeploymentGroupInfo (Maybe Text)
dgiApplicationName = lens _dgiApplicationName (\ s a -> s{_dgiApplicationName = a});
+-- | A list of associated triggers.
+dgiTriggerConfigurations :: Lens' DeploymentGroupInfo [TriggerConfig]
+dgiTriggerConfigurations = lens _dgiTriggerConfigurations (\ s a -> s{_dgiTriggerConfigurations = a}) . _Default . _Coerce;
+
-- | The deployment group ID.
dgiDeploymentGroupId :: Lens' DeploymentGroupInfo (Maybe Text)
dgiDeploymentGroupId = lens _dgiDeploymentGroupId (\ s a -> s{_dgiDeploymentGroupId = a});
@@ -272,10 +286,13 @@ instance FromJSON DeploymentGroupInfo where
<*> (x .:? "ec2TagFilters" .!= mempty)
<*> (x .:? "onPremisesInstanceTagFilters" .!= mempty)
<*> (x .:? "applicationName")
+ <*> (x .:? "triggerConfigurations" .!= mempty)
<*> (x .:? "deploymentGroupId")
<*> (x .:? "autoScalingGroups" .!= mempty)
<*> (x .:? "deploymentGroupName"))
+instance Hashable DeploymentGroupInfo
+
-- | Information about a deployment.
--
-- /See:/ 'deploymentInfo' smart constructor.
@@ -347,7 +364,7 @@ deploymentInfo =
, _diIgnoreApplicationStopFailures = Nothing
}
--- | How the deployment was created:
+-- | The means by which the deployment was created:
--
-- - user: A user created the deployment.
-- - autoscaling: Auto Scaling created the deployment.
@@ -366,17 +383,16 @@ diDeploymentId = lens _diDeploymentId (\ s a -> s{_diDeploymentId = a});
diDeploymentConfigName :: Lens' DeploymentInfo (Maybe Text)
diDeploymentConfigName = lens _diDeploymentConfigName (\ s a -> s{_diDeploymentConfigName = a});
--- | A timestamp indicating when the deployment began deploying to the
+-- | A timestamp indicating when the deployment was deployed to the
-- deployment group.
--
--- Note that in some cases, the reported value of the start time may be
--- later than the complete time. This is due to differences in the clock
--- settings of various back-end servers that participate in the overall
--- deployment process.
+-- In some cases, the reported value of the start time may be later than
+-- the complete time. This is due to differences in the clock settings of
+-- back-end servers that participate in the deployment process.
diStartTime :: Lens' DeploymentInfo (Maybe UTCTime)
diStartTime = lens _diStartTime (\ s a -> s{_diStartTime = a}) . mapping _Time;
--- | A timestamp indicating when the deployment was completed.
+-- | A timestamp indicating when the deployment was complete.
diCompleteTime :: Lens' DeploymentInfo (Maybe UTCTime)
diCompleteTime = lens _diCompleteTime (\ s a -> s{_diCompleteTime = a}) . mapping _Time;
@@ -392,8 +408,8 @@ diDeploymentOverview = lens _diDeploymentOverview (\ s a -> s{_diDeploymentOverv
diApplicationName :: Lens' DeploymentInfo (Maybe Text)
diApplicationName = lens _diApplicationName (\ s a -> s{_diApplicationName = a});
--- | Information about the location of application artifacts that are stored
--- and the service to retrieve them from.
+-- | Information about the location of stored application artifacts and the
+-- service from which to retrieve them.
diRevision :: Lens' DeploymentInfo (Maybe RevisionLocation)
diRevision = lens _diRevision (\ s a -> s{_diRevision = a});
@@ -410,14 +426,14 @@ diDeploymentGroupName :: Lens' DeploymentInfo (Maybe Text)
diDeploymentGroupName = lens _diDeploymentGroupName (\ s a -> s{_diDeploymentGroupName = a});
-- | If true, then if the deployment causes the ApplicationStop deployment
--- lifecycle event to fail to a specific instance, the deployment will not
--- be considered to have failed to that instance at that point and will
--- continue on to the BeforeInstall deployment lifecycle event.
+-- lifecycle event to an instance to fail, the deployment to that instance
+-- will not be considered to have failed at that point and will continue on
+-- to the BeforeInstall deployment lifecycle event.
--
-- If false or not specified, then if the deployment causes the
--- ApplicationStop deployment lifecycle event to fail to a specific
--- instance, the deployment will stop to that instance, and the deployment
--- to that instance will be considered to have failed.
+-- ApplicationStop deployment lifecycle event to an instance to fail, the
+-- deployment to that instance will stop, and the deployment to that
+-- instance will be considered to have failed.
diIgnoreApplicationStopFailures :: Lens' DeploymentInfo (Maybe Bool)
diIgnoreApplicationStopFailures = lens _diIgnoreApplicationStopFailures (\ s a -> s{_diIgnoreApplicationStopFailures = a});
@@ -440,6 +456,8 @@ instance FromJSON DeploymentInfo where
<*> (x .:? "deploymentGroupName")
<*> (x .:? "ignoreApplicationStopFailures"))
+instance Hashable DeploymentInfo
+
-- | Information about the deployment status of the instances in the
-- deployment.
--
@@ -476,23 +494,24 @@ deploymentOverview =
, _doFailed = Nothing
}
--- | The number of instances that are pending in the deployment.
+-- | The number of instances in the deployment in a pending state.
doPending :: Lens' DeploymentOverview (Maybe Integer)
doPending = lens _doPending (\ s a -> s{_doPending = a});
--- | The number of instances that have been skipped in the deployment.
+-- | The number of instances in the deployment in a skipped state.
doSkipped :: Lens' DeploymentOverview (Maybe Integer)
doSkipped = lens _doSkipped (\ s a -> s{_doSkipped = a});
--- | The number of instances that are in progress in the deployment.
+-- | The number of instances in which the deployment is in progress.
doInProgress :: Lens' DeploymentOverview (Maybe Integer)
doInProgress = lens _doInProgress (\ s a -> s{_doInProgress = a});
--- | The number of instances that have succeeded in the deployment.
+-- | The number of instances in the deployment to which revisions have been
+-- successfully deployed.
doSucceeded :: Lens' DeploymentOverview (Maybe Integer)
doSucceeded = lens _doSucceeded (\ s a -> s{_doSucceeded = a});
--- | The number of instances that have failed in the deployment.
+-- | The number of instances in the deployment in a failed state.
doFailed :: Lens' DeploymentOverview (Maybe Integer)
doFailed = lens _doFailed (\ s a -> s{_doFailed = a});
@@ -506,6 +525,8 @@ instance FromJSON DeploymentOverview where
<*> (x .:? "Succeeded")
<*> (x .:? "Failed"))
+instance Hashable DeploymentOverview
+
-- | Diagnostic information about executable scripts that are part of a
-- deployment.
--
@@ -538,7 +559,10 @@ diagnostics =
, _dMessage = Nothing
}
--- | The last portion of the associated diagnostic log.
+-- | The last portion of the diagnostic log.
+--
+-- If available, AWS CodeDeploy returns up to the last 4 KB of the
+-- diagnostic log.
dLogTail :: Lens' Diagnostics (Maybe Text)
dLogTail = lens _dLogTail (\ s a -> s{_dLogTail = a});
@@ -574,6 +598,8 @@ instance FromJSON Diagnostics where
(x .:? "scriptName")
<*> (x .:? "message"))
+instance Hashable Diagnostics
+
-- | Information about a tag filter.
--
-- /See:/ 'ec2TagFilter' smart constructor.
@@ -624,6 +650,8 @@ instance FromJSON EC2TagFilter where
EC2TagFilter' <$>
(x .:? "Value") <*> (x .:? "Key") <*> (x .:? "Type"))
+instance Hashable EC2TagFilter
+
instance ToJSON EC2TagFilter where
toJSON EC2TagFilter'{..}
= object
@@ -656,33 +684,32 @@ errorInformation =
-- | The error code:
--
--- - APPLICATION_MISSING: The application was missing. Note that this
--- error code will most likely be raised if the application is deleted
--- after the deployment is created but before it starts.
--- - DEPLOYMENT_GROUP_MISSING: The deployment group was missing. Note
--- that this error code will most likely be raised if the deployment
--- group is deleted after the deployment is created but before it
--- starts.
+-- - APPLICATION_MISSING: The application was missing. This error code
+-- will most likely be raised if the application is deleted after the
+-- deployment is created but before it is started.
+-- - DEPLOYMENT_GROUP_MISSING: The deployment group was missing. This
+-- error code will most likely be raised if the deployment group is
+-- deleted after the deployment is created but before it is started.
-- - HEALTH_CONSTRAINTS: The deployment failed on too many instances to
--- be able to successfully deploy within the specified instance health
--- constraints.
--- - HEALTH_CONSTRAINTS_INVALID: The revision can never successfully
--- deploy within the instance health constraints as specified.
+-- be successfully deployed within the instance health constraints
+-- specified.
+-- - HEALTH_CONSTRAINTS_INVALID: The revision cannot be successfully
+-- deployed within the instance health constraints specified.
-- - IAM_ROLE_MISSING: The service role cannot be accessed.
-- - IAM_ROLE_PERMISSIONS: The service role does not have the correct
-- permissions.
-- - INTERNAL_ERROR: There was an internal error.
-- - NO_EC2_SUBSCRIPTION: The calling account is not subscribed to the
-- Amazon EC2 service.
--- - NO_INSTANCES: No instances were specified, or no instances can be
+-- - NO_INSTANCES: No instance were specified, or no instance can be
-- found.
--- - OVER_MAX_INSTANCES: The maximum number of instances was exceeded.
+-- - OVER_MAX_INSTANCES: The maximum number of instance was exceeded.
-- - THROTTLED: The operation was throttled because the calling account
-- exceeded the throttling limits of one or more AWS services.
-- - TIMEOUT: The deployment has timed out.
--- - REVISION_MISSING: The revision ID was missing. Note that this error
--- code will most likely be raised if the revision is deleted after the
--- deployment is created but before it starts.
+-- - REVISION_MISSING: The revision ID was missing. This error code will
+-- most likely be raised if the revision is deleted after the
+-- deployment is created but before it is started.
eiCode :: Lens' ErrorInformation (Maybe DeployErrorCode)
eiCode = lens _eiCode (\ s a -> s{_eiCode = a});
@@ -697,6 +724,8 @@ instance FromJSON ErrorInformation where
ErrorInformation' <$>
(x .:? "code") <*> (x .:? "message"))
+instance Hashable ErrorInformation
+
-- | Information about an application revision.
--
-- /See:/ 'genericRevisionInfo' smart constructor.
@@ -740,7 +769,7 @@ griRegisterTime = lens _griRegisterTime (\ s a -> s{_griRegisterTime = a}) . map
griFirstUsedTime :: Lens' GenericRevisionInfo (Maybe UTCTime)
griFirstUsedTime = lens _griFirstUsedTime (\ s a -> s{_griFirstUsedTime = a}) . mapping _Time;
--- | A list of deployment groups that use this revision.
+-- | The deployment groups for which this is the current target revision.
griDeploymentGroups :: Lens' GenericRevisionInfo [Text]
griDeploymentGroups = lens _griDeploymentGroups (\ s a -> s{_griDeploymentGroups = a}) . _Default . _Coerce;
@@ -762,8 +791,10 @@ instance FromJSON GenericRevisionInfo where
<*> (x .:? "lastUsedTime")
<*> (x .:? "description"))
--- | Information about the location of application artifacts that are stored
--- in GitHub.
+instance Hashable GenericRevisionInfo
+
+-- | Information about the location of application artifacts stored in
+-- GitHub.
--
-- /See:/ 'gitHubLocation' smart constructor.
data GitHubLocation = GitHubLocation'
@@ -786,8 +817,8 @@ gitHubLocation =
, _ghlRepository = Nothing
}
--- | The SHA1 commit ID of the GitHub commit that references the that
--- represents the bundled artifacts for the application revision.
+-- | The SHA1 commit ID of the GitHub commit that represents the bundled
+-- artifacts for the application revision.
ghlCommitId :: Lens' GitHubLocation (Maybe Text)
ghlCommitId = lens _ghlCommitId (\ s a -> s{_ghlCommitId = a});
@@ -806,6 +837,8 @@ instance FromJSON GitHubLocation where
GitHubLocation' <$>
(x .:? "commitId") <*> (x .:? "repository"))
+instance Hashable GitHubLocation
+
instance ToJSON GitHubLocation where
toJSON GitHubLocation'{..}
= object
@@ -852,7 +885,7 @@ instanceInfo =
, _iiTags = Nothing
}
--- | The time that the on-premises instance was registered.
+-- | The time at which the on-premises instance was registered.
iiRegisterTime :: Lens' InstanceInfo (Maybe UTCTime)
iiRegisterTime = lens _iiRegisterTime (\ s a -> s{_iiRegisterTime = a}) . mapping _Time;
@@ -860,7 +893,7 @@ iiRegisterTime = lens _iiRegisterTime (\ s a -> s{_iiRegisterTime = a}) . mappin
iiInstanceARN :: Lens' InstanceInfo (Maybe Text)
iiInstanceARN = lens _iiInstanceARN (\ s a -> s{_iiInstanceARN = a});
--- | If the on-premises instance was deregistered, the time that the
+-- | If the on-premises instance was deregistered, the time at which the
-- on-premises instance was deregistered.
iiDeregisterTime :: Lens' InstanceInfo (Maybe UTCTime)
iiDeregisterTime = lens _iiDeregisterTime (\ s a -> s{_iiDeregisterTime = a}) . mapping _Time;
@@ -873,7 +906,7 @@ iiIamUserARN = lens _iiIamUserARN (\ s a -> s{_iiIamUserARN = a});
iiInstanceName :: Lens' InstanceInfo (Maybe Text)
iiInstanceName = lens _iiInstanceName (\ s a -> s{_iiInstanceName = a});
--- | The tags that are currently associated with the on-premises instance.
+-- | The tags currently associated with the on-premises instance.
iiTags :: Lens' InstanceInfo [Tag]
iiTags = lens _iiTags (\ s a -> s{_iiTags = a}) . _Default . _Coerce;
@@ -888,6 +921,8 @@ instance FromJSON InstanceInfo where
<*> (x .:? "instanceName")
<*> (x .:? "tags" .!= mempty))
+instance Hashable InstanceInfo
+
-- | Information about an instance in a deployment.
--
-- /See:/ 'instanceSummary' smart constructor.
@@ -960,6 +995,8 @@ instance FromJSON InstanceSummary where
<*> (x .:? "lastUpdatedAt")
<*> (x .:? "lifecycleEvents" .!= mempty))
+instance Hashable InstanceSummary
+
-- | Information about a deployment lifecycle event.
--
-- /See:/ 'lifecycleEvent' smart constructor.
@@ -999,7 +1036,7 @@ lifecycleEvent =
--
-- - Pending: The deployment lifecycle event is pending.
-- - InProgress: The deployment lifecycle event is in progress.
--- - Succeeded: The deployment lifecycle event has succeeded.
+-- - Succeeded: The deployment lifecycle event ran successfully.
-- - Failed: The deployment lifecycle event has failed.
-- - Skipped: The deployment lifecycle event has been skipped.
-- - Unknown: The deployment lifecycle event is unknown.
@@ -1033,7 +1070,9 @@ instance FromJSON LifecycleEvent where
<*> (x .:? "diagnostics")
<*> (x .:? "endTime"))
--- | Information about minimum healthy instances.
+instance Hashable LifecycleEvent
+
+-- | Information about minimum healthy instance.
--
-- /See:/ 'minimumHealthyHosts' smart constructor.
data MinimumHealthyHosts = MinimumHealthyHosts'
@@ -1056,29 +1095,35 @@ minimumHealthyHosts =
, _mhhType = Nothing
}
--- | The minimum healthy instances value.
+-- | The minimum healthy instance value.
mhhValue :: Lens' MinimumHealthyHosts (Maybe Int)
mhhValue = lens _mhhValue (\ s a -> s{_mhhValue = a});
--- | The minimum healthy instances type:
+-- | The minimum healthy instance type:
--
--- - HOST_COUNT: The minimum number of healthy instances, as an absolute
+-- - HOST_COUNT: The minimum number of healthy instance as an absolute
-- value.
--- - FLEET_PERCENT: The minimum number of healthy instances, as a
--- percentage of the total number of instances in the deployment.
+-- - FLEET_PERCENT: The minimum number of healthy instance as a
+-- percentage of the total number of instance in the deployment.
--
--- For example, for 9 instances, if a HOST_COUNT of 6 is specified, deploy
--- to up to 3 instances at a time. The deployment succeeds if 6 or more
--- instances are successfully deployed to; otherwise, the deployment fails.
--- If a FLEET_PERCENT of 40 is specified, deploy to up to 5 instances at a
--- time. The deployment succeeds if 4 or more instances are successfully
--- deployed to; otherwise, the deployment fails.
+-- In an example of nine instance, if a HOST_COUNT of six is specified,
+-- deploy to up to three instances at a time. The deployment will be
+-- successful if six or more instances are deployed to successfully;
+-- otherwise, the deployment fails. If a FLEET_PERCENT of 40 is specified,
+-- deploy to up to five instance at a time. The deployment will be
+-- successful if four or more instance are deployed to successfully;
+-- otherwise, the deployment fails.
--
-- In a call to the get deployment configuration operation,
--- CodeDeployDefault.OneAtATime will return a minimum healthy instances
--- type of MOST_CONCURRENCY and a value of 1. This means a deployment to
--- only one instances at a time. (You cannot set the type to
--- MOST_CONCURRENCY, only to HOST_COUNT or FLEET_PERCENT.)
+-- CodeDeployDefault.OneAtATime will return a minimum healthy instance type
+-- of MOST_CONCURRENCY and a value of 1. This means a deployment to only
+-- one instance at a time. (You cannot set the type to MOST_CONCURRENCY,
+-- only to HOST_COUNT or FLEET_PERCENT.) In addition, with
+-- CodeDeployDefault.OneAtATime, AWS CodeDeploy will try to ensure that all
+-- instances but one are kept in a healthy state during the deployment.
+-- Although this allows one instance at a time to be taken offline for a
+-- new deployment, it also means that if the deployment to the last
+-- instance fails, the overall deployment still succeeds.
mhhType :: Lens' MinimumHealthyHosts (Maybe MinimumHealthyHostsType)
mhhType = lens _mhhType (\ s a -> s{_mhhType = a});
@@ -1089,6 +1134,8 @@ instance FromJSON MinimumHealthyHosts where
MinimumHealthyHosts' <$>
(x .:? "value") <*> (x .:? "type"))
+instance Hashable MinimumHealthyHosts
+
instance ToJSON MinimumHealthyHosts where
toJSON MinimumHealthyHosts'{..}
= object
@@ -1096,7 +1143,48 @@ instance ToJSON MinimumHealthyHosts where
[("value" .=) <$> _mhhValue,
("type" .=) <$> _mhhType])
--- | Information about an application revision\'s location.
+-- | Information about an application revision.
+--
+-- /See:/ 'revisionInfo' smart constructor.
+data RevisionInfo = RevisionInfo'
+ { _riGenericRevisionInfo :: !(Maybe GenericRevisionInfo)
+ , _riRevisionLocation :: !(Maybe RevisionLocation)
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'RevisionInfo' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'riGenericRevisionInfo'
+--
+-- * 'riRevisionLocation'
+revisionInfo
+ :: RevisionInfo
+revisionInfo =
+ RevisionInfo'
+ { _riGenericRevisionInfo = Nothing
+ , _riRevisionLocation = Nothing
+ }
+
+-- | Undocumented member.
+riGenericRevisionInfo :: Lens' RevisionInfo (Maybe GenericRevisionInfo)
+riGenericRevisionInfo = lens _riGenericRevisionInfo (\ s a -> s{_riGenericRevisionInfo = a});
+
+-- | Undocumented member.
+riRevisionLocation :: Lens' RevisionInfo (Maybe RevisionLocation)
+riRevisionLocation = lens _riRevisionLocation (\ s a -> s{_riRevisionLocation = a});
+
+instance FromJSON RevisionInfo where
+ parseJSON
+ = withObject "RevisionInfo"
+ (\ x ->
+ RevisionInfo' <$>
+ (x .:? "genericRevisionInfo") <*>
+ (x .:? "revisionLocation"))
+
+instance Hashable RevisionInfo
+
+-- | Information about the location of an application revision.
--
-- /See:/ 'revisionLocation' smart constructor.
data RevisionLocation = RevisionLocation'
@@ -1123,7 +1211,7 @@ revisionLocation =
, _rlGitHubLocation = Nothing
}
--- | The application revision\'s type:
+-- | The type of application revision:
--
-- - S3: An application revision stored in Amazon S3.
-- - GitHub: An application revision stored in GitHub.
@@ -1146,6 +1234,8 @@ instance FromJSON RevisionLocation where
(x .:? "revisionType") <*> (x .:? "s3Location") <*>
(x .:? "gitHubLocation"))
+instance Hashable RevisionLocation
+
instance ToJSON RevisionLocation where
toJSON RevisionLocation'{..}
= object
@@ -1154,8 +1244,8 @@ instance ToJSON RevisionLocation where
("s3Location" .=) <$> _rlS3Location,
("gitHubLocation" .=) <$> _rlGitHubLocation])
--- | Information about the location of application artifacts that are stored
--- in Amazon S3.
+-- | Information about the location of application artifacts stored in Amazon
+-- S3.
--
-- /See:/ 's3Location' smart constructor.
data S3Location = S3Location'
@@ -1234,6 +1324,8 @@ instance FromJSON S3Location where
<*> (x .:? "key")
<*> (x .:? "version"))
+instance Hashable S3Location
+
instance ToJSON S3Location where
toJSON S3Location'{..}
= object
@@ -1279,6 +1371,8 @@ instance FromJSON Tag where
= withObject "Tag"
(\ x -> Tag' <$> (x .:? "Value") <*> (x .:? "Key"))
+instance Hashable Tag
+
instance ToJSON Tag where
toJSON Tag'{..}
= object
@@ -1335,6 +1429,8 @@ instance FromJSON TagFilter where
TagFilter' <$>
(x .:? "Value") <*> (x .:? "Key") <*> (x .:? "Type"))
+instance Hashable TagFilter
+
instance ToJSON TagFilter where
toJSON TagFilter'{..}
= object
@@ -1365,20 +1461,91 @@ timeRange =
, _trEnd = Nothing
}
--- | The time range\'s start time.
+-- | The start time of the time range.
--
--- Specify null to leave the time range\'s start time open-ended.
+-- Specify null to leave the start time open-ended.
trStart :: Lens' TimeRange (Maybe UTCTime)
trStart = lens _trStart (\ s a -> s{_trStart = a}) . mapping _Time;
--- | The time range\'s end time.
+-- | The end time of the time range.
--
--- Specify null to leave the time range\'s end time open-ended.
+-- Specify null to leave the end time open-ended.
trEnd :: Lens' TimeRange (Maybe UTCTime)
trEnd = lens _trEnd (\ s a -> s{_trEnd = a}) . mapping _Time;
+instance Hashable TimeRange
+
instance ToJSON TimeRange where
toJSON TimeRange'{..}
= object
(catMaybes
[("start" .=) <$> _trStart, ("end" .=) <$> _trEnd])
+
+-- | Information about notification triggers for the deployment group.
+--
+-- /See:/ 'triggerConfig' smart constructor.
+data TriggerConfig = TriggerConfig'
+ { _tcTriggerName :: !(Maybe Text)
+ , _tcTriggerEvents :: !(Maybe [TriggerEventType])
+ , _tcTriggerTargetARN :: !(Maybe Text)
+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'TriggerConfig' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'tcTriggerName'
+--
+-- * 'tcTriggerEvents'
+--
+-- * 'tcTriggerTargetARN'
+triggerConfig
+ :: TriggerConfig
+triggerConfig =
+ TriggerConfig'
+ { _tcTriggerName = Nothing
+ , _tcTriggerEvents = Nothing
+ , _tcTriggerTargetARN = Nothing
+ }
+
+-- | The name of the notification trigger.
+tcTriggerName :: Lens' TriggerConfig (Maybe Text)
+tcTriggerName = lens _tcTriggerName (\ s a -> s{_tcTriggerName = a});
+
+-- | The event type or types for which notifications are triggered.
+--
+-- The following event type values are supported:
+--
+-- - DEPLOYMENT_START
+-- - DEPLOYMENT_SUCCESS
+-- - DEPLOYMENT_FAILURE
+-- - DEPLOYMENT_STOP
+-- - INSTANCE_START
+-- - INSTANCE_SUCCESS
+-- - INSTANCE_FAILURE
+tcTriggerEvents :: Lens' TriggerConfig [TriggerEventType]
+tcTriggerEvents = lens _tcTriggerEvents (\ s a -> s{_tcTriggerEvents = a}) . _Default . _Coerce;
+
+-- | The ARN of the Amazon Simple Notification Service topic through which
+-- notifications about deployment or instance events are sent.
+tcTriggerTargetARN :: Lens' TriggerConfig (Maybe Text)
+tcTriggerTargetARN = lens _tcTriggerTargetARN (\ s a -> s{_tcTriggerTargetARN = a});
+
+instance FromJSON TriggerConfig where
+ parseJSON
+ = withObject "TriggerConfig"
+ (\ x ->
+ TriggerConfig' <$>
+ (x .:? "triggerName") <*>
+ (x .:? "triggerEvents" .!= mempty)
+ <*> (x .:? "triggerTargetArn"))
+
+instance Hashable TriggerConfig
+
+instance ToJSON TriggerConfig where
+ toJSON TriggerConfig'{..}
+ = object
+ (catMaybes
+ [("triggerName" .=) <$> _tcTriggerName,
+ ("triggerEvents" .=) <$> _tcTriggerEvents,
+ ("triggerTargetArn" .=) <$> _tcTriggerTargetARN])
diff --git a/gen/Network/AWS/CodeDeploy/Types/Sum.hs b/gen/Network/AWS/CodeDeploy/Types/Sum.hs
index a259193..549e2aa 100644
--- a/gen/Network/AWS/CodeDeploy/Types/Sum.hs
+++ b/gen/Network/AWS/CodeDeploy/Types/Sum.hs
@@ -9,7 +9,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.Types.Sum
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -535,3 +535,46 @@ instance ToJSON TagFilterType where
instance FromJSON TagFilterType where
parseJSON = parseJSONText "TagFilterType"
+
+data TriggerEventType
+ = DeploymentFailure
+ | DeploymentStart
+ | DeploymentStop
+ | DeploymentSuccess
+ | InstanceFailure
+ | InstanceStart
+ | InstanceSuccess
+ deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)
+
+instance FromText TriggerEventType where
+ parser = takeLowerText >>= \case
+ "deploymentfailure" -> pure DeploymentFailure
+ "deploymentstart" -> pure DeploymentStart
+ "deploymentstop" -> pure DeploymentStop
+ "deploymentsuccess" -> pure DeploymentSuccess
+ "instancefailure" -> pure InstanceFailure
+ "instancestart" -> pure InstanceStart
+ "instancesuccess" -> pure InstanceSuccess
+ e -> fromTextError $ "Failure parsing TriggerEventType from value: '" <> e
+ <> "'. Accepted values: DeploymentFailure, DeploymentStart, DeploymentStop, DeploymentSuccess, InstanceFailure, InstanceStart, InstanceSuccess"
+
+instance ToText TriggerEventType where
+ toText = \case
+ DeploymentFailure -> "DeploymentFailure"
+ DeploymentStart -> "DeploymentStart"
+ DeploymentStop -> "DeploymentStop"
+ DeploymentSuccess -> "DeploymentSuccess"
+ InstanceFailure -> "InstanceFailure"
+ InstanceStart -> "InstanceStart"
+ InstanceSuccess -> "InstanceSuccess"
+
+instance Hashable TriggerEventType
+instance ToByteString TriggerEventType
+instance ToQuery TriggerEventType
+instance ToHeader TriggerEventType
+
+instance ToJSON TriggerEventType where
+ toJSON = toJSONText
+
+instance FromJSON TriggerEventType where
+ parseJSON = parseJSONText "TriggerEventType"
diff --git a/gen/Network/AWS/CodeDeploy/UpdateApplication.hs b/gen/Network/AWS/CodeDeploy/UpdateApplication.hs
index 21a46fb..5f7dfef 100644
--- a/gen/Network/AWS/CodeDeploy/UpdateApplication.hs
+++ b/gen/Network/AWS/CodeDeploy/UpdateApplication.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.UpdateApplication
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Changes an existing application\'s name.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_UpdateApplication.html AWS API Reference> for UpdateApplication.
+-- Changes the name of an application.
module Network.AWS.CodeDeploy.UpdateApplication
(
-- * Creating a Request
@@ -65,11 +63,11 @@ updateApplication =
, _uaApplicationName = Nothing
}
--- | The new name that you want to change the application to.
+-- | The new name to give the application.
uaNewApplicationName :: Lens' UpdateApplication (Maybe Text)
uaNewApplicationName = lens _uaNewApplicationName (\ s a -> s{_uaNewApplicationName = a});
--- | The current name of the application that you want to change.
+-- | The current name of the application you want to change.
uaApplicationName :: Lens' UpdateApplication (Maybe Text)
uaApplicationName = lens _uaApplicationName (\ s a -> s{_uaApplicationName = a});
@@ -78,6 +76,8 @@ instance AWSRequest UpdateApplication where
request = postJSON codeDeploy
response = receiveNull UpdateApplicationResponse'
+instance Hashable UpdateApplication
+
instance ToHeaders UpdateApplication where
toHeaders
= const
diff --git a/gen/Network/AWS/CodeDeploy/UpdateDeploymentGroup.hs b/gen/Network/AWS/CodeDeploy/UpdateDeploymentGroup.hs
index fedb94b..f22e313 100644
--- a/gen/Network/AWS/CodeDeploy/UpdateDeploymentGroup.hs
+++ b/gen/Network/AWS/CodeDeploy/UpdateDeploymentGroup.hs
@@ -12,15 +12,13 @@
-- |
-- Module : Network.AWS.CodeDeploy.UpdateDeploymentGroup
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
--- Changes information about an existing deployment group.
---
--- /See:/ <http://docs.aws.amazon.com/codedeploy/latest/APIReference/API_UpdateDeploymentGroup.html AWS API Reference> for UpdateDeploymentGroup.
+-- Changes information about a deployment group.
module Network.AWS.CodeDeploy.UpdateDeploymentGroup
(
-- * Creating a Request
@@ -32,6 +30,7 @@ module Network.AWS.CodeDeploy.UpdateDeploymentGroup
, udgNewDeploymentGroupName
, udgEc2TagFilters
, udgOnPremisesInstanceTagFilters
+ , udgTriggerConfigurations
, udgAutoScalingGroups
, udgApplicationName
, udgCurrentDeploymentGroupName
@@ -60,6 +59,7 @@ data UpdateDeploymentGroup = UpdateDeploymentGroup'
, _udgNewDeploymentGroupName :: !(Maybe Text)
, _udgEc2TagFilters :: !(Maybe [EC2TagFilter])
, _udgOnPremisesInstanceTagFilters :: !(Maybe [TagFilter])
+ , _udgTriggerConfigurations :: !(Maybe [TriggerConfig])
, _udgAutoScalingGroups :: !(Maybe [Text])
, _udgApplicationName :: !Text
, _udgCurrentDeploymentGroupName :: !Text
@@ -79,6 +79,8 @@ data UpdateDeploymentGroup = UpdateDeploymentGroup'
--
-- * 'udgOnPremisesInstanceTagFilters'
--
+-- * 'udgTriggerConfigurations'
+--
-- * 'udgAutoScalingGroups'
--
-- * 'udgApplicationName'
@@ -95,12 +97,13 @@ updateDeploymentGroup pApplicationName_ pCurrentDeploymentGroupName_ =
, _udgNewDeploymentGroupName = Nothing
, _udgEc2TagFilters = Nothing
, _udgOnPremisesInstanceTagFilters = Nothing
+ , _udgTriggerConfigurations = Nothing
, _udgAutoScalingGroups = Nothing
, _udgApplicationName = pApplicationName_
, _udgCurrentDeploymentGroupName = pCurrentDeploymentGroupName_
}
--- | A replacement service role\'s ARN, if you want to change it.
+-- | A replacement ARN for the service role, if you want to change it.
udgServiceRoleARN :: Lens' UpdateDeploymentGroup (Maybe Text)
udgServiceRoleARN = lens _udgServiceRoleARN (\ s a -> s{_udgServiceRoleARN = a});
@@ -113,18 +116,27 @@ udgDeploymentConfigName = lens _udgDeploymentConfigName (\ s a -> s{_udgDeployme
udgNewDeploymentGroupName :: Lens' UpdateDeploymentGroup (Maybe Text)
udgNewDeploymentGroupName = lens _udgNewDeploymentGroupName (\ s a -> s{_udgNewDeploymentGroupName = a});
--- | The replacement set of Amazon EC2 tags to filter on, if you want to
--- change them.
+-- | The replacement set of Amazon EC2 tags on which to filter, if you want
+-- to change them. To keep the existing tags, enter their names. To remove
+-- tags, do not enter any tag names.
udgEc2TagFilters :: Lens' UpdateDeploymentGroup [EC2TagFilter]
udgEc2TagFilters = lens _udgEc2TagFilters (\ s a -> s{_udgEc2TagFilters = a}) . _Default . _Coerce;
--- | The replacement set of on-premises instance tags for filter on, if you
--- want to change them.
+-- | The replacement set of on-premises instance tags on which to filter, if
+-- you want to change them. To keep the existing tags, enter their names.
+-- To remove tags, do not enter any tag names.
udgOnPremisesInstanceTagFilters :: Lens' UpdateDeploymentGroup [TagFilter]
udgOnPremisesInstanceTagFilters = lens _udgOnPremisesInstanceTagFilters (\ s a -> s{_udgOnPremisesInstanceTagFilters = a}) . _Default . _Coerce;
+-- | Information about triggers to change when the deployment group is
+-- updated.
+udgTriggerConfigurations :: Lens' UpdateDeploymentGroup [TriggerConfig]
+udgTriggerConfigurations = lens _udgTriggerConfigurations (\ s a -> s{_udgTriggerConfigurations = a}) . _Default . _Coerce;
+
-- | The replacement list of Auto Scaling groups to be included in the
--- deployment group, if you want to change them.
+-- deployment group, if you want to change them. To keep the Auto Scaling
+-- groups, enter their names. To remove Auto Scaling groups, do not enter
+-- any Auto Scaling group names.
udgAutoScalingGroups :: Lens' UpdateDeploymentGroup [Text]
udgAutoScalingGroups = lens _udgAutoScalingGroups (\ s a -> s{_udgAutoScalingGroups = a}) . _Default . _Coerce;
@@ -132,7 +144,7 @@ udgAutoScalingGroups = lens _udgAutoScalingGroups (\ s a -> s{_udgAutoScalingGro
udgApplicationName :: Lens' UpdateDeploymentGroup Text
udgApplicationName = lens _udgApplicationName (\ s a -> s{_udgApplicationName = a});
--- | The current name of the existing deployment group.
+-- | The current name of the deployment group.
udgCurrentDeploymentGroupName :: Lens' UpdateDeploymentGroup Text
udgCurrentDeploymentGroupName = lens _udgCurrentDeploymentGroupName (\ s a -> s{_udgCurrentDeploymentGroupName = a});
@@ -147,6 +159,8 @@ instance AWSRequest UpdateDeploymentGroup where
(x .?> "hooksNotCleanedUp" .!@ mempty) <*>
(pure (fromEnum s)))
+instance Hashable UpdateDeploymentGroup
+
instance ToHeaders UpdateDeploymentGroup where
toHeaders
= const
@@ -169,6 +183,8 @@ instance ToJSON UpdateDeploymentGroup where
("ec2TagFilters" .=) <$> _udgEc2TagFilters,
("onPremisesInstanceTagFilters" .=) <$>
_udgOnPremisesInstanceTagFilters,
+ ("triggerConfigurations" .=) <$>
+ _udgTriggerConfigurations,
("autoScalingGroups" .=) <$> _udgAutoScalingGroups,
Just ("applicationName" .= _udgApplicationName),
Just
@@ -208,7 +224,7 @@ updateDeploymentGroupResponse pResponseStatus_ =
-- | If the output contains no data, and the corresponding deployment group
-- contained at least one Auto Scaling group, AWS CodeDeploy successfully
-- removed all corresponding Auto Scaling lifecycle event hooks from the
--- AWS account. If the output does contain data, AWS CodeDeploy could not
+-- AWS account. If the output contains data, AWS CodeDeploy could not
-- remove some Auto Scaling lifecycle event hooks from the AWS account.
udgrsHooksNotCleanedUp :: Lens' UpdateDeploymentGroupResponse [AutoScalingGroup]
udgrsHooksNotCleanedUp = lens _udgrsHooksNotCleanedUp (\ s a -> s{_udgrsHooksNotCleanedUp = a}) . _Default . _Coerce;
diff --git a/gen/Network/AWS/CodeDeploy/Waiters.hs b/gen/Network/AWS/CodeDeploy/Waiters.hs
index 10f8574..8b6d1bb 100644
--- a/gen/Network/AWS/CodeDeploy/Waiters.hs
+++ b/gen/Network/AWS/CodeDeploy/Waiters.hs
@@ -7,7 +7,7 @@
-- |
-- Module : Network.AWS.CodeDeploy.Waiters
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
diff --git a/test/Main.hs b/test/Main.hs
index 0f554d8..6c12334 100644
--- a/test/Main.hs
+++ b/test/Main.hs
@@ -2,7 +2,7 @@
-- |
-- Module : Main
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
diff --git a/test/Test/AWS/CodeDeploy.hs b/test/Test/AWS/CodeDeploy.hs
index 20cbf7b..817efb5 100644
--- a/test/Test/AWS/CodeDeploy.hs
+++ b/test/Test/AWS/CodeDeploy.hs
@@ -1,7 +1,7 @@
{-# LANGUAGE OverloadedStrings #-}
-- Module : Test.AWS.CodeDeploy
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : This Source Code Form is subject to the terms of
-- the Mozilla Public License, v. 2.0.
-- A copy of the MPL can be found in the LICENSE file or
diff --git a/test/Test/AWS/CodeDeploy/Internal.hs b/test/Test/AWS/CodeDeploy/Internal.hs
index c5c8c87..0d38f10 100644
--- a/test/Test/AWS/CodeDeploy/Internal.hs
+++ b/test/Test/AWS/CodeDeploy/Internal.hs
@@ -2,7 +2,7 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- Module : Test.AWS.CodeDeploy.Internal
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : This Source Code Form is subject to the terms of
-- the Mozilla Public License, v. 2.0.
-- A copy of the MPL can be found in the LICENSE file or
diff --git a/test/Test/AWS/Gen/CodeDeploy.hs b/test/Test/AWS/Gen/CodeDeploy.hs
index b5c3b78..1e8190d 100644
--- a/test/Test/AWS/Gen/CodeDeploy.hs
+++ b/test/Test/AWS/Gen/CodeDeploy.hs
@@ -5,7 +5,7 @@
-- |
-- Module : Test.AWS.Gen.CodeDeploy
--- Copyright : (c) 2013-2015 Brendan Hay
+-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
@@ -31,6 +31,9 @@ import Test.AWS.CodeDeploy.Internal
-- [ testRemoveTagsFromOnPremisesInstances $
-- removeTagsFromOnPremisesInstances
--
+-- , testBatchGetDeploymentGroups $
+-- batchGetDeploymentGroups
+--
-- , testDeleteDeploymentGroup $
-- deleteDeploymentGroup
--
@@ -58,6 +61,9 @@ import Test.AWS.CodeDeploy.Internal
-- , testCreateDeployment $
-- createDeployment
--
+-- , testBatchGetApplicationRevisions $
+-- batchGetApplicationRevisions
+--
-- , testBatchGetDeployments $
-- batchGetDeployments
--
@@ -88,6 +94,9 @@ import Test.AWS.CodeDeploy.Internal
-- , testStopDeployment $
-- stopDeployment
--
+-- , testBatchGetDeploymentInstances $
+-- batchGetDeploymentInstances
+--
-- , testGetApplication $
-- getApplication
--
@@ -130,6 +139,9 @@ import Test.AWS.CodeDeploy.Internal
-- [ testRemoveTagsFromOnPremisesInstancesResponse $
-- removeTagsFromOnPremisesInstancesResponse
--
+-- , testBatchGetDeploymentGroupsResponse $
+-- batchGetDeploymentGroupsResponse
+--
-- , testDeleteDeploymentGroupResponse $
-- deleteDeploymentGroupResponse
--
@@ -157,6 +169,9 @@ import Test.AWS.CodeDeploy.Internal
-- , testCreateDeploymentResponse $
-- createDeploymentResponse
--
+-- , testBatchGetApplicationRevisionsResponse $
+-- batchGetApplicationRevisionsResponse
+--
-- , testBatchGetDeploymentsResponse $
-- batchGetDeploymentsResponse
--
@@ -187,6 +202,9 @@ import Test.AWS.CodeDeploy.Internal
-- , testStopDeploymentResponse $
-- stopDeploymentResponse
--
+-- , testBatchGetDeploymentInstancesResponse $
+-- batchGetDeploymentInstancesResponse
+--
-- , testGetApplicationResponse $
-- getApplicationResponse
--
@@ -233,6 +251,11 @@ testRemoveTagsFromOnPremisesInstances = req
"RemoveTagsFromOnPremisesInstances"
"fixture/RemoveTagsFromOnPremisesInstances.yaml"
+testBatchGetDeploymentGroups :: BatchGetDeploymentGroups -> TestTree
+testBatchGetDeploymentGroups = req
+ "BatchGetDeploymentGroups"
+ "fixture/BatchGetDeploymentGroups.yaml"
+
testDeleteDeploymentGroup :: DeleteDeploymentGroup -> TestTree
testDeleteDeploymentGroup = req
"DeleteDeploymentGroup"
@@ -278,6 +301,11 @@ testCreateDeployment = req
"CreateDeployment"
"fixture/CreateDeployment.yaml"
+testBatchGetApplicationRevisions :: BatchGetApplicationRevisions -> TestTree
+testBatchGetApplicationRevisions = req
+ "BatchGetApplicationRevisions"
+ "fixture/BatchGetApplicationRevisions.yaml"
+
testBatchGetDeployments :: BatchGetDeployments -> TestTree
testBatchGetDeployments = req
"BatchGetDeployments"
@@ -328,6 +356,11 @@ testStopDeployment = req
"StopDeployment"
"fixture/StopDeployment.yaml"
+testBatchGetDeploymentInstances :: BatchGetDeploymentInstances -> TestTree
+testBatchGetDeploymentInstances = req
+ "BatchGetDeploymentInstances"
+ "fixture/BatchGetDeploymentInstances.yaml"
+
testGetApplication :: GetApplication -> TestTree
testGetApplication = req
"GetApplication"
@@ -397,6 +430,13 @@ testRemoveTagsFromOnPremisesInstancesResponse = res
codeDeploy
(Proxy :: Proxy RemoveTagsFromOnPremisesInstances)
+testBatchGetDeploymentGroupsResponse :: BatchGetDeploymentGroupsResponse -> TestTree
+testBatchGetDeploymentGroupsResponse = res
+ "BatchGetDeploymentGroupsResponse"
+ "fixture/BatchGetDeploymentGroupsResponse.proto"
+ codeDeploy
+ (Proxy :: Proxy BatchGetDeploymentGroups)
+
testDeleteDeploymentGroupResponse :: DeleteDeploymentGroupResponse -> TestTree
testDeleteDeploymentGroupResponse = res
"DeleteDeploymentGroupResponse"
@@ -460,6 +500,13 @@ testCreateDeploymentResponse = res
codeDeploy
(Proxy :: Proxy CreateDeployment)
+testBatchGetApplicationRevisionsResponse :: BatchGetApplicationRevisionsResponse -> TestTree
+testBatchGetApplicationRevisionsResponse = res
+ "BatchGetApplicationRevisionsResponse"
+ "fixture/BatchGetApplicationRevisionsResponse.proto"
+ codeDeploy
+ (Proxy :: Proxy BatchGetApplicationRevisions)
+
testBatchGetDeploymentsResponse :: BatchGetDeploymentsResponse -> TestTree
testBatchGetDeploymentsResponse = res
"BatchGetDeploymentsResponse"
@@ -530,6 +577,13 @@ testStopDeploymentResponse = res
codeDeploy
(Proxy :: Proxy StopDeployment)
+testBatchGetDeploymentInstancesResponse :: BatchGetDeploymentInstancesResponse -> TestTree
+testBatchGetDeploymentInstancesResponse = res
+ "BatchGetDeploymentInstancesResponse"
+ "fixture/BatchGetDeploymentInstancesResponse.proto"
+ codeDeploy
+ (Proxy :: Proxy BatchGetDeploymentInstances)
+
testGetApplicationResponse :: GetApplicationResponse -> TestTree
testGetApplicationResponse = res
"GetApplicationResponse"