Skip to content

Commit

Permalink
Regenerating amazonka-cloudwatch from latest service definition
Browse files Browse the repository at this point in the history
  • Loading branch information
brendanhay committed Nov 29, 2016
1 parent fc26b72 commit b023497
Show file tree
Hide file tree
Showing 14 changed files with 319 additions and 302 deletions.
2 changes: 2 additions & 0 deletions amazonka-cloudwatch/gen/Network/AWS/CloudWatch.hs
Original file line number Diff line number Diff line change
Expand Up @@ -122,6 +122,7 @@ module Network.AWS.CloudWatch
, dMaximum
, dAverage
, dMinimum
, dExtendedStatistics
, dSum
, dUnit
, dTimestamp
Expand Down Expand Up @@ -169,6 +170,7 @@ module Network.AWS.CloudWatch
, maAlarmActions
, maUnit
, maStatistic
, maExtendedStatistic

-- ** MetricDatum
, MetricDatum
Expand Down
12 changes: 4 additions & 8 deletions amazonka-cloudwatch/gen/Network/AWS/CloudWatch/DeleteAlarms.hs
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deletes all specified alarms. In the event of an error, no alarms are deleted.
-- Deletes the specified alarms. In the event of an error, no alarms are deleted.
--
--
module Network.AWS.CloudWatch.DeleteAlarms
Expand All @@ -41,11 +41,7 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response

-- | Describes the inputs for DeleteAlarms.
--
--
--
-- /See:/ 'deleteAlarms' smart constructor.
-- | /See:/ 'deleteAlarms' smart constructor.
newtype DeleteAlarms = DeleteAlarms'
{ _dAlarmNames :: [Text]
} deriving (Eq,Read,Show,Data,Typeable,Generic)
Expand All @@ -54,15 +50,15 @@ newtype DeleteAlarms = DeleteAlarms'
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'dAlarmNames' - A list of alarms to be deleted.
-- * 'dAlarmNames' - The alarms to be deleted.
deleteAlarms
:: DeleteAlarms
deleteAlarms =
DeleteAlarms'
{ _dAlarmNames = mempty
}

-- | A list of alarms to be deleted.
-- | The alarms to be deleted.
dAlarmNames :: Lens' DeleteAlarms [Text]
dAlarmNames = lens _dAlarmNames (\ s a -> s{_dAlarmNames = a}) . _Coerce;

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -18,9 +18,11 @@
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieves history for the specified alarm. Filter alarms by date range or item type. If an alarm name is not specified, Amazon CloudWatch returns histories for all of the owner's alarms.
-- Retrieves the history for the specified alarm. You can filter the results by date range or item type. If an alarm name is not specified, the histories for all alarms are returned.
--
--
-- Note that Amazon CloudWatch retains the history of an alarm even if you delete the alarm.
--
--
-- This operation returns paginated results.
module Network.AWS.CloudWatch.DescribeAlarmHistory
Expand Down Expand Up @@ -53,11 +55,7 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response

-- | Describes the inputs for DescribeAlarmHistory.
--
--
--
-- /See:/ 'describeAlarmHistory' smart constructor.
-- | /See:/ 'describeAlarmHistory' smart constructor.
data DescribeAlarmHistory = DescribeAlarmHistory'
{ _dahAlarmName :: !(Maybe Text)
, _dahHistoryItemType :: !(Maybe HistoryItemType)
Expand Down Expand Up @@ -160,11 +158,7 @@ instance ToQuery DescribeAlarmHistory where
"NextToken" =: _dahNextToken,
"MaxRecords" =: _dahMaxRecords]

-- | The output for 'DescribeAlarmHistory' .
--
--
--
-- /See:/ 'describeAlarmHistoryResponse' smart constructor.
-- | /See:/ 'describeAlarmHistoryResponse' smart constructor.
data DescribeAlarmHistoryResponse = DescribeAlarmHistoryResponse'
{ _dahrsAlarmHistoryItems :: !(Maybe [AlarmHistoryItem])
, _dahrsNextToken :: !(Maybe Text)
Expand All @@ -175,9 +169,9 @@ data DescribeAlarmHistoryResponse = DescribeAlarmHistoryResponse'
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'dahrsAlarmHistoryItems' - A list of alarm histories in JSON format.
-- * 'dahrsAlarmHistoryItems' - The alarm histories, in JSON format.
--
-- * 'dahrsNextToken' - A string that marks the start of the next batch of returned results.
-- * 'dahrsNextToken' - The token that marks the start of the next batch of returned results.
--
-- * 'dahrsResponseStatus' - -- | The response status code.
describeAlarmHistoryResponse
Expand All @@ -190,11 +184,11 @@ describeAlarmHistoryResponse pResponseStatus_ =
, _dahrsResponseStatus = pResponseStatus_
}

-- | A list of alarm histories in JSON format.
-- | The alarm histories, in JSON format.
dahrsAlarmHistoryItems :: Lens' DescribeAlarmHistoryResponse [AlarmHistoryItem]
dahrsAlarmHistoryItems = lens _dahrsAlarmHistoryItems (\ s a -> s{_dahrsAlarmHistoryItems = a}) . _Default . _Coerce;

-- | A string that marks the start of the next batch of returned results.
-- | The token that marks the start of the next batch of returned results.
dahrsNextToken :: Lens' DescribeAlarmHistoryResponse (Maybe Text)
dahrsNextToken = lens _dahrsNextToken (\ s a -> s{_dahrsNextToken = a});

Expand Down
30 changes: 11 additions & 19 deletions amazonka-cloudwatch/gen/Network/AWS/CloudWatch/DescribeAlarms.hs
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieves alarms with the specified names. If no name is specified, all alarms for the user are returned. Alarms can be retrieved by using only a prefix for the alarm name, the alarm state, or a prefix for any action.
-- Retrieves the specified alarms. If no alarms are specified, all alarms are returned. Alarms can be retrieved by using only a prefix for the alarm name, the alarm state, or a prefix for any action.
--
--
--
Expand Down Expand Up @@ -53,11 +53,7 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response

-- | Describes the inputs for DescribeAlarms.
--
--
--
-- /See:/ 'describeAlarms' smart constructor.
-- | /See:/ 'describeAlarms' smart constructor.
data DescribeAlarms = DescribeAlarms'
{ _daAlarmNamePrefix :: !(Maybe Text)
, _daActionPrefix :: !(Maybe Text)
Expand All @@ -71,15 +67,15 @@ data DescribeAlarms = DescribeAlarms'
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'daAlarmNamePrefix' - The alarm name prefix. @AlarmNames@ cannot be specified if this parameter is specified.
-- * 'daAlarmNamePrefix' - The alarm name prefix. You cannot specify @AlarmNames@ if this parameter is specified.
--
-- * 'daActionPrefix' - The action name prefix.
--
-- * 'daNextToken' - The token returned by a previous call to indicate that there is more data available.
--
-- * 'daStateValue' - The state value to be used in matching alarms.
--
-- * 'daAlarmNames' - A list of alarm names to retrieve information for.
-- * 'daAlarmNames' - The names of the alarms.
--
-- * 'daMaxRecords' - The maximum number of alarm descriptions to retrieve.
describeAlarms
Expand All @@ -94,7 +90,7 @@ describeAlarms =
, _daMaxRecords = Nothing
}

-- | The alarm name prefix. @AlarmNames@ cannot be specified if this parameter is specified.
-- | The alarm name prefix. You cannot specify @AlarmNames@ if this parameter is specified.
daAlarmNamePrefix :: Lens' DescribeAlarms (Maybe Text)
daAlarmNamePrefix = lens _daAlarmNamePrefix (\ s a -> s{_daAlarmNamePrefix = a});

Expand All @@ -110,7 +106,7 @@ daNextToken = lens _daNextToken (\ s a -> s{_daNextToken = a});
daStateValue :: Lens' DescribeAlarms (Maybe StateValue)
daStateValue = lens _daStateValue (\ s a -> s{_daStateValue = a});

-- | A list of alarm names to retrieve information for.
-- | The names of the alarms.
daAlarmNames :: Lens' DescribeAlarms [Text]
daAlarmNames = lens _daAlarmNames (\ s a -> s{_daAlarmNames = a}) . _Default . _Coerce;

Expand Down Expand Up @@ -160,11 +156,7 @@ instance ToQuery DescribeAlarms where
toQuery (toQueryList "member" <$> _daAlarmNames),
"MaxRecords" =: _daMaxRecords]

-- | The output for 'DescribeAlarms' .
--
--
--
-- /See:/ 'describeAlarmsResponse' smart constructor.
-- | /See:/ 'describeAlarmsResponse' smart constructor.
data DescribeAlarmsResponse = DescribeAlarmsResponse'
{ _darsMetricAlarms :: !(Maybe [MetricAlarm])
, _darsNextToken :: !(Maybe Text)
Expand All @@ -175,9 +167,9 @@ data DescribeAlarmsResponse = DescribeAlarmsResponse'
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'darsMetricAlarms' - A list of information for the specified alarms.
-- * 'darsMetricAlarms' - The information for the specified alarms.
--
-- * 'darsNextToken' - A string that marks the start of the next batch of returned results.
-- * 'darsNextToken' - The token that marks the start of the next batch of returned results.
--
-- * 'darsResponseStatus' - -- | The response status code.
describeAlarmsResponse
Expand All @@ -190,11 +182,11 @@ describeAlarmsResponse pResponseStatus_ =
, _darsResponseStatus = pResponseStatus_
}

-- | A list of information for the specified alarms.
-- | The information for the specified alarms.
darsMetricAlarms :: Lens' DescribeAlarmsResponse [MetricAlarm]
darsMetricAlarms = lens _darsMetricAlarms (\ s a -> s{_darsMetricAlarms = a}) . _Default . _Coerce;

-- | A string that marks the start of the next batch of returned results.
-- | The token that marks the start of the next batch of returned results.
darsNextToken :: Lens' DescribeAlarmsResponse (Maybe Text)
darsNextToken = lens _darsNextToken (\ s a -> s{_darsNextToken = a});

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieves all alarms for a single metric. Specify a statistic, period, or unit to filter the set of alarms further.
-- Retrieves the alarms for the specified metric. Specify a statistic, period, or unit to filter the results.
--
--
module Network.AWS.CloudWatch.DescribeAlarmsForMetric
Expand All @@ -31,6 +31,7 @@ module Network.AWS.CloudWatch.DescribeAlarmsForMetric
, dafmDimensions
, dafmUnit
, dafmStatistic
, dafmExtendedStatistic
, dafmMetricName
, dafmNamespace

Expand All @@ -49,31 +50,30 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response

-- | Describes the inputs for DescribeAlarmsForMetric.
--
--
--
-- /See:/ 'describeAlarmsForMetric' smart constructor.
-- | /See:/ 'describeAlarmsForMetric' smart constructor.
data DescribeAlarmsForMetric = DescribeAlarmsForMetric'
{ _dafmPeriod :: !(Maybe Nat)
, _dafmDimensions :: !(Maybe [Dimension])
, _dafmUnit :: !(Maybe StandardUnit)
, _dafmStatistic :: !(Maybe Statistic)
, _dafmMetricName :: !Text
, _dafmNamespace :: !Text
{ _dafmPeriod :: !(Maybe Nat)
, _dafmDimensions :: !(Maybe [Dimension])
, _dafmUnit :: !(Maybe StandardUnit)
, _dafmStatistic :: !(Maybe Statistic)
, _dafmExtendedStatistic :: !(Maybe Text)
, _dafmMetricName :: !Text
, _dafmNamespace :: !Text
} deriving (Eq,Read,Show,Data,Typeable,Generic)

-- | Creates a value of 'DescribeAlarmsForMetric' with the minimum fields required to make a request.
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'dafmPeriod' - The period in seconds over which the statistic is applied.
-- * 'dafmPeriod' - The period, in seconds, over which the statistic is applied.
--
-- * 'dafmDimensions' - The list of dimensions associated with the metric. If the metric has any associated dimensions, you must specify them in order for the DescribeAlarmsForMetric to succeed.
-- * 'dafmDimensions' - The dimensions associated with the metric. If the metric has any associated dimensions, you must specify them in order for the call to succeed.
--
-- * 'dafmUnit' - The unit for the metric.
--
-- * 'dafmStatistic' - The statistic for the metric.
-- * 'dafmStatistic' - The statistic for the metric, other than percentiles. For percentile statistics, use @ExtendedStatistics@ .
--
-- * 'dafmExtendedStatistic' - The percentile statistic for the metric. Specify a value between p0.0 and p100.
--
-- * 'dafmMetricName' - The name of the metric.
--
Expand All @@ -88,26 +88,31 @@ describeAlarmsForMetric pMetricName_ pNamespace_ =
, _dafmDimensions = Nothing
, _dafmUnit = Nothing
, _dafmStatistic = Nothing
, _dafmExtendedStatistic = Nothing
, _dafmMetricName = pMetricName_
, _dafmNamespace = pNamespace_
}

-- | The period in seconds over which the statistic is applied.
-- | The period, in seconds, over which the statistic is applied.
dafmPeriod :: Lens' DescribeAlarmsForMetric (Maybe Natural)
dafmPeriod = lens _dafmPeriod (\ s a -> s{_dafmPeriod = a}) . mapping _Nat;

-- | The list of dimensions associated with the metric. If the metric has any associated dimensions, you must specify them in order for the DescribeAlarmsForMetric to succeed.
-- | The dimensions associated with the metric. If the metric has any associated dimensions, you must specify them in order for the call to succeed.
dafmDimensions :: Lens' DescribeAlarmsForMetric [Dimension]
dafmDimensions = lens _dafmDimensions (\ s a -> s{_dafmDimensions = a}) . _Default . _Coerce;

-- | The unit for the metric.
dafmUnit :: Lens' DescribeAlarmsForMetric (Maybe StandardUnit)
dafmUnit = lens _dafmUnit (\ s a -> s{_dafmUnit = a});

-- | The statistic for the metric.
-- | The statistic for the metric, other than percentiles. For percentile statistics, use @ExtendedStatistics@ .
dafmStatistic :: Lens' DescribeAlarmsForMetric (Maybe Statistic)
dafmStatistic = lens _dafmStatistic (\ s a -> s{_dafmStatistic = a});

-- | The percentile statistic for the metric. Specify a value between p0.0 and p100.
dafmExtendedStatistic :: Lens' DescribeAlarmsForMetric (Maybe Text)
dafmExtendedStatistic = lens _dafmExtendedStatistic (\ s a -> s{_dafmExtendedStatistic = a});

-- | The name of the metric.
dafmMetricName :: Lens' DescribeAlarmsForMetric Text
dafmMetricName = lens _dafmMetricName (\ s a -> s{_dafmMetricName = a});
Expand Down Expand Up @@ -148,14 +153,11 @@ instance ToQuery DescribeAlarmsForMetric where
"Dimensions" =:
toQuery (toQueryList "member" <$> _dafmDimensions),
"Unit" =: _dafmUnit, "Statistic" =: _dafmStatistic,
"ExtendedStatistic" =: _dafmExtendedStatistic,
"MetricName" =: _dafmMetricName,
"Namespace" =: _dafmNamespace]

-- | The output for 'DescribeAlarmsForMetric' .
--
--
--
-- /See:/ 'describeAlarmsForMetricResponse' smart constructor.
-- | /See:/ 'describeAlarmsForMetricResponse' smart constructor.
data DescribeAlarmsForMetricResponse = DescribeAlarmsForMetricResponse'
{ _dafmrsMetricAlarms :: !(Maybe [MetricAlarm])
, _dafmrsResponseStatus :: !Int
Expand All @@ -165,7 +167,7 @@ data DescribeAlarmsForMetricResponse = DescribeAlarmsForMetricResponse'
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'dafmrsMetricAlarms' - A list of information for each alarm with the specified metric.
-- * 'dafmrsMetricAlarms' - The information for each alarm with the specified metric.
--
-- * 'dafmrsResponseStatus' - -- | The response status code.
describeAlarmsForMetricResponse
Expand All @@ -177,7 +179,7 @@ describeAlarmsForMetricResponse pResponseStatus_ =
, _dafmrsResponseStatus = pResponseStatus_
}

-- | A list of information for each alarm with the specified metric.
-- | The information for each alarm with the specified metric.
dafmrsMetricAlarms :: Lens' DescribeAlarmsForMetricResponse [MetricAlarm]
dafmrsMetricAlarms = lens _dafmrsMetricAlarms (\ s a -> s{_dafmrsMetricAlarms = a}) . _Default . _Coerce;

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Disables actions for the specified alarms. When an alarm's actions are disabled the alarm's state may change, but none of the alarm's actions will execute.
-- Disables the actions for the specified alarms. When an alarm's actions are disabled, the alarm actions do not execute when the alarm state changes.
--
--
module Network.AWS.CloudWatch.DisableAlarmActions
Expand All @@ -41,11 +41,7 @@ import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response

-- |
--
--
--
-- /See:/ 'disableAlarmActions' smart constructor.
-- | /See:/ 'disableAlarmActions' smart constructor.
newtype DisableAlarmActions = DisableAlarmActions'
{ _daaAlarmNames :: [Text]
} deriving (Eq,Read,Show,Data,Typeable,Generic)
Expand All @@ -54,15 +50,15 @@ newtype DisableAlarmActions = DisableAlarmActions'
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'daaAlarmNames' - The names of the alarms to disable actions for.
-- * 'daaAlarmNames' - The names of the alarms.
disableAlarmActions
:: DisableAlarmActions
disableAlarmActions =
DisableAlarmActions'
{ _daaAlarmNames = mempty
}

-- | The names of the alarms to disable actions for.
-- | The names of the alarms.
daaAlarmNames :: Lens' DisableAlarmActions [Text]
daaAlarmNames = lens _daaAlarmNames (\ s a -> s{_daaAlarmNames = a}) . _Coerce;

Expand Down
Loading

0 comments on commit b023497

Please sign in to comment.