amazonka-ecs 1.4.0 → 1.4.1

raw patch · 32 files changed

+177/−6 lines, 32 filesdep ~amazonka-coredep ~amazonka-ecsdep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

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

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-ecs.cabal +5/−5
• gen/Network/AWS/ECS/CreateCluster.hs +4/−0
• gen/Network/AWS/ECS/CreateService.hs +4/−0
• gen/Network/AWS/ECS/DeleteCluster.hs +4/−0
• gen/Network/AWS/ECS/DeleteService.hs +4/−0
• gen/Network/AWS/ECS/DeregisterContainerInstance.hs +4/−0
• gen/Network/AWS/ECS/DeregisterTaskDefinition.hs +4/−0
• gen/Network/AWS/ECS/DescribeClusters.hs +4/−0
• gen/Network/AWS/ECS/DescribeContainerInstances.hs +4/−0
• gen/Network/AWS/ECS/DescribeServices.hs +4/−0
• gen/Network/AWS/ECS/DescribeTaskDefinition.hs +4/−0
• gen/Network/AWS/ECS/DescribeTasks.hs +4/−0
• gen/Network/AWS/ECS/DiscoverPollEndpoint.hs +4/−0
• gen/Network/AWS/ECS/ListClusters.hs +4/−0
• gen/Network/AWS/ECS/ListContainerInstances.hs +4/−0
• gen/Network/AWS/ECS/ListServices.hs +4/−0
• gen/Network/AWS/ECS/ListTaskDefinitionFamilies.hs +4/−0
• gen/Network/AWS/ECS/ListTaskDefinitions.hs +4/−0
• gen/Network/AWS/ECS/ListTasks.hs +4/−0
• gen/Network/AWS/ECS/RegisterContainerInstance.hs +4/−0
• gen/Network/AWS/ECS/RegisterTaskDefinition.hs +4/−0
• gen/Network/AWS/ECS/RunTask.hs +4/−0
• gen/Network/AWS/ECS/StartTask.hs +4/−0
• gen/Network/AWS/ECS/StopTask.hs +4/−0
• gen/Network/AWS/ECS/SubmitContainerStateChange.hs +4/−0
• gen/Network/AWS/ECS/SubmitTaskStateChange.hs +4/−0
• gen/Network/AWS/ECS/Types.hs +2/−0
• gen/Network/AWS/ECS/Types/Product.hs +54/−0
• gen/Network/AWS/ECS/Types/Sum.hs +7/−0
• gen/Network/AWS/ECS/UpdateContainerAgent.hs +4/−0
• gen/Network/AWS/ECS/UpdateService.hs +4/−0

@@ -8,7 +8,7 @@  ## Version -`1.4.0`+`1.4.1`   ## Description

@@ -1,5 +1,5 @@ name:                  amazonka-ecs-version:               1.4.0+version:               1.4.1 synopsis:              Amazon EC2 Container Service SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -89,7 +89,7 @@         , Network.AWS.ECS.Types.Sum      build-depends:-          amazonka-core == 1.4.0.*+          amazonka-core == 1.4.1.*         , base          >= 4.7     && < 5  test-suite amazonka-ecs-test@@ -109,9 +109,9 @@         , Test.AWS.ECS.Internal      build-depends:-          amazonka-core == 1.4.0.*-        , amazonka-test == 1.4.0.*-        , amazonka-ecs == 1.4.0.*+          amazonka-core == 1.4.1.*+        , amazonka-test == 1.4.1.*+        , amazonka-ecs == 1.4.1.*         , base         , bytestring         , tasty

@@ -79,6 +79,8 @@  instance Hashable CreateCluster +instance NFData CreateCluster+ instance ToHeaders CreateCluster where         toHeaders           = const@@ -129,3 +131,5 @@ -- | The response status code. ccrsResponseStatus :: Lens' CreateClusterResponse Int ccrsResponseStatus = lens _ccrsResponseStatus (\ s a -> s{_ccrsResponseStatus = a});++instance NFData CreateClusterResponse

@@ -205,6 +205,8 @@  instance Hashable CreateService +instance NFData CreateService+ instance ToHeaders CreateService where         toHeaders           = const@@ -264,3 +266,5 @@ -- | The response status code. csrsResponseStatus :: Lens' CreateServiceResponse Int csrsResponseStatus = lens _csrsResponseStatus (\ s a -> s{_csrsResponseStatus = a});++instance NFData CreateServiceResponse

@@ -79,6 +79,8 @@  instance Hashable DeleteCluster +instance NFData DeleteCluster+ instance ToHeaders DeleteCluster where         toHeaders           = const@@ -128,3 +130,5 @@ -- | The response status code. drsResponseStatus :: Lens' DeleteClusterResponse Int drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});++instance NFData DeleteClusterResponse

@@ -99,6 +99,8 @@  instance Hashable DeleteService +instance NFData DeleteService+ instance ToHeaders DeleteService where         toHeaders           = const@@ -151,3 +153,5 @@ -- | The response status code. dsrsResponseStatus :: Lens' DeleteServiceResponse Int dsrsResponseStatus = lens _dsrsResponseStatus (\ s a -> s{_dsrsResponseStatus = a});++instance NFData DeleteServiceResponse

@@ -123,6 +123,8 @@  instance Hashable DeregisterContainerInstance +instance NFData DeregisterContainerInstance+ instance ToHeaders DeregisterContainerInstance where         toHeaders           = const@@ -176,3 +178,5 @@ -- | The response status code. dcirsResponseStatus :: Lens' DeregisterContainerInstanceResponse Int dcirsResponseStatus = lens _dcirsResponseStatus (\ s a -> s{_dcirsResponseStatus = a});++instance NFData DeregisterContainerInstanceResponse

@@ -89,6 +89,8 @@  instance Hashable DeregisterTaskDefinition +instance NFData DeregisterTaskDefinition+ instance ToHeaders DeregisterTaskDefinition where         toHeaders           = const@@ -140,3 +142,5 @@ -- | The response status code. dtdrsResponseStatus :: Lens' DeregisterTaskDefinitionResponse Int dtdrsResponseStatus = lens _dtdrsResponseStatus (\ s a -> s{_dtdrsResponseStatus = a});++instance NFData DeregisterTaskDefinitionResponse

@@ -79,6 +79,8 @@  instance Hashable DescribeClusters +instance NFData DescribeClusters+ instance ToHeaders DescribeClusters where         toHeaders           = const@@ -137,3 +139,5 @@ -- | The response status code. dcrsResponseStatus :: Lens' DescribeClustersResponse Int dcrsResponseStatus = lens _dcrsResponseStatus (\ s a -> s{_dcrsResponseStatus = a});++instance NFData DescribeClustersResponse

@@ -92,6 +92,8 @@  instance Hashable DescribeContainerInstances +instance NFData DescribeContainerInstances+ instance ToHeaders DescribeContainerInstances where         toHeaders           = const@@ -153,3 +155,5 @@ -- | The response status code. dcisrsResponseStatus :: Lens' DescribeContainerInstancesResponse Int dcisrsResponseStatus = lens _dcisrsResponseStatus (\ s a -> s{_dcisrsResponseStatus = a});++instance NFData DescribeContainerInstancesResponse

@@ -87,6 +87,8 @@  instance Hashable DescribeServices +instance NFData DescribeServices+ instance ToHeaders DescribeServices where         toHeaders           = const@@ -147,3 +149,5 @@ -- | The response status code. dssrsResponseStatus :: Lens' DescribeServicesResponse Int dssrsResponseStatus = lens _dssrsResponseStatus (\ s a -> s{_dssrsResponseStatus = a});++instance NFData DescribeServicesResponse

@@ -83,6 +83,8 @@  instance Hashable DescribeTaskDefinition +instance NFData DescribeTaskDefinition+ instance ToHeaders DescribeTaskDefinition where         toHeaders           = const@@ -134,3 +136,5 @@ -- | The response status code. desrsResponseStatus :: Lens' DescribeTaskDefinitionResponse Int desrsResponseStatus = lens _desrsResponseStatus (\ s a -> s{_desrsResponseStatus = a});++instance NFData DescribeTaskDefinitionResponse

@@ -89,6 +89,8 @@  instance Hashable DescribeTasks +instance NFData DescribeTasks+ instance ToHeaders DescribeTasks where         toHeaders           = const@@ -149,3 +151,5 @@ -- | The response status code. dtrsResponseStatus :: Lens' DescribeTasksResponse Int dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a});++instance NFData DescribeTasksResponse

@@ -95,6 +95,8 @@  instance Hashable DiscoverPollEndpoint +instance NFData DiscoverPollEndpoint+ instance ToHeaders DiscoverPollEndpoint where         toHeaders           = const@@ -155,3 +157,5 @@ -- | The response status code. dpersResponseStatus :: Lens' DiscoverPollEndpointResponse Int dpersResponseStatus = lens _dpersResponseStatus (\ s a -> s{_dpersResponseStatus = a});++instance NFData DiscoverPollEndpointResponse

@@ -107,6 +107,8 @@  instance Hashable ListClusters +instance NFData ListClusters+ instance ToHeaders ListClusters where         toHeaders           = const@@ -171,3 +173,5 @@ -- | The response status code. lcrsResponseStatus :: Lens' ListClustersResponse Int lcrsResponseStatus = lens _lcrsResponseStatus (\ s a -> s{_lcrsResponseStatus = a});++instance NFData ListClustersResponse

@@ -120,6 +120,8 @@  instance Hashable ListContainerInstances +instance NFData ListContainerInstances+ instance ToHeaders ListContainerInstances where         toHeaders           = const@@ -186,3 +188,5 @@ -- | The response status code. lcirsResponseStatus :: Lens' ListContainerInstancesResponse Int lcirsResponseStatus = lens _lcirsResponseStatus (\ s a -> s{_lcirsResponseStatus = a});++instance NFData ListContainerInstancesResponse

@@ -118,6 +118,8 @@  instance Hashable ListServices +instance NFData ListServices+ instance ToHeaders ListServices where         toHeaders           = const@@ -183,3 +185,5 @@ -- | The response status code. lsrsResponseStatus :: Lens' ListServicesResponse Int lsrsResponseStatus = lens _lsrsResponseStatus (\ s a -> s{_lsrsResponseStatus = a});++instance NFData ListServicesResponse

@@ -123,6 +123,8 @@  instance Hashable ListTaskDefinitionFamilies +instance NFData ListTaskDefinitionFamilies+ instance ToHeaders ListTaskDefinitionFamilies where         toHeaders           = const@@ -189,3 +191,5 @@ -- | The response status code. ltdfrsResponseStatus :: Lens' ListTaskDefinitionFamiliesResponse Int ltdfrsResponseStatus = lens _ltdfrsResponseStatus (\ s a -> s{_ltdfrsResponseStatus = a});++instance NFData ListTaskDefinitionFamiliesResponse

@@ -150,6 +150,8 @@  instance Hashable ListTaskDefinitions +instance NFData ListTaskDefinitions+ instance ToHeaders ListTaskDefinitions where         toHeaders           = const@@ -217,3 +219,5 @@ -- | The response status code. ltdrsResponseStatus :: Lens' ListTaskDefinitionsResponse Int ltdrsResponseStatus = lens _ltdrsResponseStatus (\ s a -> s{_ltdrsResponseStatus = a});++instance NFData ListTaskDefinitionsResponse

@@ -178,6 +178,8 @@  instance Hashable ListTasks +instance NFData ListTasks+ instance ToHeaders ListTasks where         toHeaders           = const@@ -248,3 +250,5 @@ -- | The response status code. ltrsResponseStatus :: Lens' ListTasksResponse Int ltrsResponseStatus = lens _ltrsResponseStatus (\ s a -> s{_ltrsResponseStatus = a});++instance NFData ListTasksResponse

@@ -143,6 +143,8 @@  instance Hashable RegisterContainerInstance +instance NFData RegisterContainerInstance+ instance ToHeaders RegisterContainerInstance where         toHeaders           = const@@ -203,3 +205,5 @@ -- | The response status code. rcirsResponseStatus :: Lens' RegisterContainerInstanceResponse Int rcirsResponseStatus = lens _rcirsResponseStatus (\ s a -> s{_rcirsResponseStatus = a});++instance NFData RegisterContainerInstanceResponse

@@ -104,6 +104,8 @@  instance Hashable RegisterTaskDefinition +instance NFData RegisterTaskDefinition+ instance ToHeaders RegisterTaskDefinition where         toHeaders           = const@@ -159,3 +161,5 @@ -- | The response status code. rtdrsResponseStatus :: Lens' RegisterTaskDefinitionResponse Int rtdrsResponseStatus = lens _rtdrsResponseStatus (\ s a -> s{_rtdrsResponseStatus = a});++instance NFData RegisterTaskDefinitionResponse

@@ -141,6 +141,8 @@  instance Hashable RunTask +instance NFData RunTask+ instance ToHeaders RunTask where         toHeaders           = const@@ -205,3 +207,5 @@ -- | The response status code. rtrsResponseStatus :: Lens' RunTaskResponse Int rtrsResponseStatus = lens _rtrsResponseStatus (\ s a -> s{_rtrsResponseStatus = a});++instance NFData RunTaskResponse

@@ -141,6 +141,8 @@  instance Hashable StartTask +instance NFData StartTask+ instance ToHeaders StartTask where         toHeaders           = const@@ -205,3 +207,5 @@ -- | The response status code. strsResponseStatus :: Lens' StartTaskResponse Int strsResponseStatus = lens _strsResponseStatus (\ s a -> s{_strsResponseStatus = a});++instance NFData StartTaskResponse

@@ -107,6 +107,8 @@  instance Hashable StopTask +instance NFData StopTask+ instance ToHeaders StopTask where         toHeaders           = const@@ -160,3 +162,5 @@ -- | The response status code. srsResponseStatus :: Lens' StopTaskResponse Int srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a});++instance NFData StopTaskResponse

@@ -134,6 +134,8 @@  instance Hashable SubmitContainerStateChange +instance NFData SubmitContainerStateChange+ instance ToHeaders SubmitContainerStateChange where         toHeaders           = const@@ -191,3 +193,5 @@ -- | The response status code. scscrsResponseStatus :: Lens' SubmitContainerStateChangeResponse Int scscrsResponseStatus = lens _scscrsResponseStatus (\ s a -> s{_scscrsResponseStatus = a});++instance NFData SubmitContainerStateChangeResponse

@@ -107,6 +107,8 @@  instance Hashable SubmitTaskStateChange +instance NFData SubmitTaskStateChange+ instance ToHeaders SubmitTaskStateChange where         toHeaders           = const@@ -161,3 +163,5 @@ -- | The response status code. stscrsResponseStatus :: Lens' SubmitTaskStateChangeResponse Int stscrsResponseStatus = lens _stscrsResponseStatus (\ s a -> s{_stscrsResponseStatus = a});++instance NFData SubmitTaskStateChangeResponse

@@ -331,6 +331,8 @@       | has (hasCode "ThrottlingException" . hasStatus 400) e =           Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"+      | has (hasStatus 504) e = Just "gateway_timeout"+      | has (hasStatus 502) e = Just "bad_gateway"       | has (hasStatus 503) e = Just "service_unavailable"       | has (hasStatus 500) e = Just "general_server_error"       | has (hasStatus 509) e = Just "limit_exceeded"

@@ -63,6 +63,8 @@  instance Hashable Attribute +instance NFData Attribute+ instance ToJSON Attribute where         toJSON Attribute'{..}           = object@@ -165,6 +167,8 @@  instance Hashable Cluster +instance NFData Cluster+ -- | A Docker container that is part of a task. -- -- /See:/ 'container' smart constructor.@@ -252,6 +256,8 @@  instance Hashable Container +instance NFData Container+ -- | Container definitions are used in task definitions to describe the -- different containers that are launched as part of a task. --@@ -763,6 +769,8 @@  instance Hashable ContainerDefinition +instance NFData ContainerDefinition+ instance ToJSON ContainerDefinition where         toJSON ContainerDefinition'{..}           = object@@ -933,6 +941,8 @@  instance Hashable ContainerInstance +instance NFData ContainerInstance+ -- | The overrides that should be sent to a container. -- -- /See:/ 'containerOverride' smart constructor.@@ -987,6 +997,8 @@  instance Hashable ContainerOverride +instance NFData ContainerOverride+ instance ToJSON ContainerOverride where         toJSON ContainerOverride'{..}           = object@@ -1154,6 +1166,8 @@  instance Hashable ContainerService +instance NFData ContainerService+ -- | The details of an Amazon ECS service deployment. -- -- /See:/ 'deployment' smart constructor.@@ -1254,6 +1268,8 @@  instance Hashable Deployment +instance NFData Deployment+ -- | Optional deployment parameters that control how many tasks run during -- the deployment and the ordering of stopping and starting tasks. --@@ -1304,6 +1320,8 @@  instance Hashable DeploymentConfiguration +instance NFData DeploymentConfiguration+ instance ToJSON DeploymentConfiguration where         toJSON DeploymentConfiguration'{..}           = object@@ -1351,6 +1369,8 @@  instance Hashable Failure +instance NFData Failure+ -- | Hostnames and IP address entries that are added to the '\/etc\/hosts' -- file of a container via the 'extraHosts' parameter of its -- < ContainerDefinition>.@@ -1395,6 +1415,8 @@  instance Hashable HostEntry +instance NFData HostEntry+ instance ToJSON HostEntry where         toJSON HostEntry'{..}           = object@@ -1440,6 +1462,8 @@  instance Hashable HostVolumeProperties +instance NFData HostVolumeProperties+ instance ToJSON HostVolumeProperties where         toJSON HostVolumeProperties'{..}           = object@@ -1486,6 +1510,8 @@  instance Hashable KeyValuePair +instance NFData KeyValuePair+ instance ToJSON KeyValuePair where         toJSON KeyValuePair'{..}           = object@@ -1547,6 +1573,8 @@  instance Hashable LoadBalancer +instance NFData LoadBalancer+ instance ToJSON LoadBalancer where         toJSON LoadBalancer'{..}           = object@@ -1605,6 +1633,8 @@  instance Hashable LogConfiguration +instance NFData LogConfiguration+ instance ToJSON LogConfiguration where         toJSON LogConfiguration'{..}           = object@@ -1663,6 +1693,8 @@  instance Hashable MountPoint +instance NFData MountPoint+ instance ToJSON MountPoint where         toJSON MountPoint'{..}           = object@@ -1733,6 +1765,8 @@  instance Hashable NetworkBinding +instance NFData NetworkBinding+ instance ToJSON NetworkBinding where         toJSON NetworkBinding'{..}           = object@@ -1822,6 +1856,8 @@  instance Hashable PortMapping +instance NFData PortMapping+ instance ToJSON PortMapping where         toJSON PortMapping'{..}           = object@@ -1913,6 +1949,8 @@  instance Hashable Resource +instance NFData Resource+ instance ToJSON Resource where         toJSON Resource'{..}           = object@@ -1972,6 +2010,8 @@  instance Hashable ServiceEvent +instance NFData ServiceEvent+ -- | Details on a task in a cluster. -- -- /See:/ 'task' smart constructor.@@ -2119,6 +2159,8 @@  instance Hashable Task +instance NFData Task+ -- | Details of a task definition. -- -- /See:/ 'taskDefinition' smart constructor.@@ -2216,6 +2258,8 @@  instance Hashable TaskDefinition +instance NFData TaskDefinition+ -- | The overrides associated with a task. -- -- /See:/ 'taskOverride' smart constructor.@@ -2248,6 +2292,8 @@  instance Hashable TaskOverride +instance NFData TaskOverride+ instance ToJSON TaskOverride where         toJSON TaskOverride'{..}           = object@@ -2307,6 +2353,8 @@  instance Hashable Ulimit +instance NFData Ulimit+ instance ToJSON Ulimit where         toJSON Ulimit'{..}           = object@@ -2367,6 +2415,8 @@  instance Hashable VersionInfo +instance NFData VersionInfo+ instance ToJSON VersionInfo where         toJSON VersionInfo'{..}           = object@@ -2420,6 +2470,8 @@  instance Hashable Volume +instance NFData Volume+ instance ToJSON Volume where         toJSON Volume'{..}           = object@@ -2467,6 +2519,8 @@                    (x .:? "sourceContainer") <*> (x .:? "readOnly"))  instance Hashable VolumeFrom++instance NFData VolumeFrom  instance ToJSON VolumeFrom where         toJSON VolumeFrom'{..}

@@ -49,6 +49,7 @@         AUSUpdating -> "UPDATING"  instance Hashable     AgentUpdateStatus+instance NFData       AgentUpdateStatus instance ToByteString AgentUpdateStatus instance ToQuery      AgentUpdateStatus instance ToHeader     AgentUpdateStatus@@ -77,6 +78,7 @@         Stopped -> "STOPPED"  instance Hashable     DesiredStatus+instance NFData       DesiredStatus instance ToByteString DesiredStatus instance ToQuery      DesiredStatus instance ToHeader     DesiredStatus@@ -111,6 +113,7 @@         Syslog -> "syslog"  instance Hashable     LogDriver+instance NFData       LogDriver instance ToByteString LogDriver instance ToQuery      LogDriver instance ToHeader     LogDriver@@ -139,6 +142,7 @@         Desc -> "DESC"  instance Hashable     SortOrder+instance NFData       SortOrder instance ToByteString SortOrder instance ToQuery      SortOrder instance ToHeader     SortOrder@@ -164,6 +168,7 @@         Inactive -> "INACTIVE"  instance Hashable     TaskDefinitionStatus+instance NFData       TaskDefinitionStatus instance ToByteString TaskDefinitionStatus instance ToQuery      TaskDefinitionStatus instance ToHeader     TaskDefinitionStatus@@ -192,6 +197,7 @@         Udp -> "udp"  instance Hashable     TransportProtocol+instance NFData       TransportProtocol instance ToByteString TransportProtocol instance ToQuery      TransportProtocol instance ToHeader     TransportProtocol@@ -259,6 +265,7 @@         Stack -> "stack"  instance Hashable     UlimitName+instance NFData       UlimitName instance ToByteString UlimitName instance ToQuery      UlimitName instance ToHeader     UlimitName

@@ -100,6 +100,8 @@  instance Hashable UpdateContainerAgent +instance NFData UpdateContainerAgent+ instance ToHeaders UpdateContainerAgent where         toHeaders           = const@@ -152,3 +154,5 @@ -- | The response status code. ucarsResponseStatus :: Lens' UpdateContainerAgentResponse Int ucarsResponseStatus = lens _ucarsResponseStatus (\ s a -> s{_ucarsResponseStatus = a});++instance NFData UpdateContainerAgentResponse

@@ -178,6 +178,8 @@  instance Hashable UpdateService +instance NFData UpdateService+ instance ToHeaders UpdateService where         toHeaders           = const@@ -234,3 +236,5 @@ -- | The response status code. usrsResponseStatus :: Lens' UpdateServiceResponse Int usrsResponseStatus = lens _usrsResponseStatus (\ s a -> s{_usrsResponseStatus = a});++instance NFData UpdateServiceResponse