{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.IoT.ListDetectMitigationActionsExecutions
(
ListDetectMitigationActionsExecutions (..),
newListDetectMitigationActionsExecutions,
listDetectMitigationActionsExecutions_endTime,
listDetectMitigationActionsExecutions_maxResults,
listDetectMitigationActionsExecutions_nextToken,
listDetectMitigationActionsExecutions_startTime,
listDetectMitigationActionsExecutions_taskId,
listDetectMitigationActionsExecutions_thingName,
listDetectMitigationActionsExecutions_violationId,
ListDetectMitigationActionsExecutionsResponse (..),
newListDetectMitigationActionsExecutionsResponse,
listDetectMitigationActionsExecutionsResponse_actionsExecutions,
listDetectMitigationActionsExecutionsResponse_nextToken,
listDetectMitigationActionsExecutionsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoT.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListDetectMitigationActionsExecutions = ListDetectMitigationActionsExecutions'
{
ListDetectMitigationActionsExecutions -> Maybe POSIX
endTime :: Prelude.Maybe Data.POSIX,
ListDetectMitigationActionsExecutions -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListDetectMitigationActionsExecutions -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListDetectMitigationActionsExecutions -> Maybe POSIX
startTime :: Prelude.Maybe Data.POSIX,
ListDetectMitigationActionsExecutions -> Maybe Text
taskId :: Prelude.Maybe Prelude.Text,
ListDetectMitigationActionsExecutions -> Maybe Text
thingName :: Prelude.Maybe Prelude.Text,
ListDetectMitigationActionsExecutions -> Maybe Text
violationId :: Prelude.Maybe Prelude.Text
}
deriving (ListDetectMitigationActionsExecutions
-> ListDetectMitigationActionsExecutions -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListDetectMitigationActionsExecutions
-> ListDetectMitigationActionsExecutions -> Bool
$c/= :: ListDetectMitigationActionsExecutions
-> ListDetectMitigationActionsExecutions -> Bool
== :: ListDetectMitigationActionsExecutions
-> ListDetectMitigationActionsExecutions -> Bool
$c== :: ListDetectMitigationActionsExecutions
-> ListDetectMitigationActionsExecutions -> Bool
Prelude.Eq, ReadPrec [ListDetectMitigationActionsExecutions]
ReadPrec ListDetectMitigationActionsExecutions
Int -> ReadS ListDetectMitigationActionsExecutions
ReadS [ListDetectMitigationActionsExecutions]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListDetectMitigationActionsExecutions]
$creadListPrec :: ReadPrec [ListDetectMitigationActionsExecutions]
readPrec :: ReadPrec ListDetectMitigationActionsExecutions
$creadPrec :: ReadPrec ListDetectMitigationActionsExecutions
readList :: ReadS [ListDetectMitigationActionsExecutions]
$creadList :: ReadS [ListDetectMitigationActionsExecutions]
readsPrec :: Int -> ReadS ListDetectMitigationActionsExecutions
$creadsPrec :: Int -> ReadS ListDetectMitigationActionsExecutions
Prelude.Read, Int -> ListDetectMitigationActionsExecutions -> ShowS
[ListDetectMitigationActionsExecutions] -> ShowS
ListDetectMitigationActionsExecutions -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListDetectMitigationActionsExecutions] -> ShowS
$cshowList :: [ListDetectMitigationActionsExecutions] -> ShowS
show :: ListDetectMitigationActionsExecutions -> String
$cshow :: ListDetectMitigationActionsExecutions -> String
showsPrec :: Int -> ListDetectMitigationActionsExecutions -> ShowS
$cshowsPrec :: Int -> ListDetectMitigationActionsExecutions -> ShowS
Prelude.Show, forall x.
Rep ListDetectMitigationActionsExecutions x
-> ListDetectMitigationActionsExecutions
forall x.
ListDetectMitigationActionsExecutions
-> Rep ListDetectMitigationActionsExecutions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListDetectMitigationActionsExecutions x
-> ListDetectMitigationActionsExecutions
$cfrom :: forall x.
ListDetectMitigationActionsExecutions
-> Rep ListDetectMitigationActionsExecutions x
Prelude.Generic)
newListDetectMitigationActionsExecutions ::
ListDetectMitigationActionsExecutions
newListDetectMitigationActionsExecutions :: ListDetectMitigationActionsExecutions
newListDetectMitigationActionsExecutions =
ListDetectMitigationActionsExecutions'
{ $sel:endTime:ListDetectMitigationActionsExecutions' :: Maybe POSIX
endTime =
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListDetectMitigationActionsExecutions' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListDetectMitigationActionsExecutions' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:startTime:ListDetectMitigationActionsExecutions' :: Maybe POSIX
startTime = forall a. Maybe a
Prelude.Nothing,
$sel:taskId:ListDetectMitigationActionsExecutions' :: Maybe Text
taskId = forall a. Maybe a
Prelude.Nothing,
$sel:thingName:ListDetectMitigationActionsExecutions' :: Maybe Text
thingName = forall a. Maybe a
Prelude.Nothing,
$sel:violationId:ListDetectMitigationActionsExecutions' :: Maybe Text
violationId = forall a. Maybe a
Prelude.Nothing
}
listDetectMitigationActionsExecutions_endTime :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.UTCTime)
listDetectMitigationActionsExecutions_endTime :: Lens' ListDetectMitigationActionsExecutions (Maybe UTCTime)
listDetectMitigationActionsExecutions_endTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe POSIX
endTime :: Maybe POSIX
$sel:endTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
endTime} -> Maybe POSIX
endTime) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe POSIX
a -> ListDetectMitigationActionsExecutions
s {$sel:endTime:ListDetectMitigationActionsExecutions' :: Maybe POSIX
endTime = Maybe POSIX
a} :: ListDetectMitigationActionsExecutions) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
listDetectMitigationActionsExecutions_maxResults :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.Natural)
listDetectMitigationActionsExecutions_maxResults :: Lens' ListDetectMitigationActionsExecutions (Maybe Natural)
listDetectMitigationActionsExecutions_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe Natural
a -> ListDetectMitigationActionsExecutions
s {$sel:maxResults:ListDetectMitigationActionsExecutions' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListDetectMitigationActionsExecutions)
listDetectMitigationActionsExecutions_nextToken :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.Text)
listDetectMitigationActionsExecutions_nextToken :: Lens' ListDetectMitigationActionsExecutions (Maybe Text)
listDetectMitigationActionsExecutions_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe Text
a -> ListDetectMitigationActionsExecutions
s {$sel:nextToken:ListDetectMitigationActionsExecutions' :: Maybe Text
nextToken = Maybe Text
a} :: ListDetectMitigationActionsExecutions)
listDetectMitigationActionsExecutions_startTime :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.UTCTime)
listDetectMitigationActionsExecutions_startTime :: Lens' ListDetectMitigationActionsExecutions (Maybe UTCTime)
listDetectMitigationActionsExecutions_startTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe POSIX
startTime :: Maybe POSIX
$sel:startTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
startTime} -> Maybe POSIX
startTime) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe POSIX
a -> ListDetectMitigationActionsExecutions
s {$sel:startTime:ListDetectMitigationActionsExecutions' :: Maybe POSIX
startTime = Maybe POSIX
a} :: ListDetectMitigationActionsExecutions) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
listDetectMitigationActionsExecutions_taskId :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.Text)
listDetectMitigationActionsExecutions_taskId :: Lens' ListDetectMitigationActionsExecutions (Maybe Text)
listDetectMitigationActionsExecutions_taskId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe Text
taskId :: Maybe Text
$sel:taskId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
taskId} -> Maybe Text
taskId) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe Text
a -> ListDetectMitigationActionsExecutions
s {$sel:taskId:ListDetectMitigationActionsExecutions' :: Maybe Text
taskId = Maybe Text
a} :: ListDetectMitigationActionsExecutions)
listDetectMitigationActionsExecutions_thingName :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.Text)
listDetectMitigationActionsExecutions_thingName :: Lens' ListDetectMitigationActionsExecutions (Maybe Text)
listDetectMitigationActionsExecutions_thingName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe Text
thingName :: Maybe Text
$sel:thingName:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
thingName} -> Maybe Text
thingName) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe Text
a -> ListDetectMitigationActionsExecutions
s {$sel:thingName:ListDetectMitigationActionsExecutions' :: Maybe Text
thingName = Maybe Text
a} :: ListDetectMitigationActionsExecutions)
listDetectMitigationActionsExecutions_violationId :: Lens.Lens' ListDetectMitigationActionsExecutions (Prelude.Maybe Prelude.Text)
listDetectMitigationActionsExecutions_violationId :: Lens' ListDetectMitigationActionsExecutions (Maybe Text)
listDetectMitigationActionsExecutions_violationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutions' {Maybe Text
violationId :: Maybe Text
$sel:violationId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
violationId} -> Maybe Text
violationId) (\s :: ListDetectMitigationActionsExecutions
s@ListDetectMitigationActionsExecutions' {} Maybe Text
a -> ListDetectMitigationActionsExecutions
s {$sel:violationId:ListDetectMitigationActionsExecutions' :: Maybe Text
violationId = Maybe Text
a} :: ListDetectMitigationActionsExecutions)
instance
Core.AWSPager
ListDetectMitigationActionsExecutions
where
page :: ListDetectMitigationActionsExecutions
-> AWSResponse ListDetectMitigationActionsExecutions
-> Maybe ListDetectMitigationActionsExecutions
page ListDetectMitigationActionsExecutions
rq AWSResponse ListDetectMitigationActionsExecutions
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListDetectMitigationActionsExecutions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListDetectMitigationActionsExecutionsResponse (Maybe Text)
listDetectMitigationActionsExecutionsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListDetectMitigationActionsExecutions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
ListDetectMitigationActionsExecutionsResponse
(Maybe [DetectMitigationActionExecution])
listDetectMitigationActionsExecutionsResponse_actionsExecutions
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListDetectMitigationActionsExecutions
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListDetectMitigationActionsExecutions (Maybe Text)
listDetectMitigationActionsExecutions_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListDetectMitigationActionsExecutions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListDetectMitigationActionsExecutionsResponse (Maybe Text)
listDetectMitigationActionsExecutionsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance
Core.AWSRequest
ListDetectMitigationActionsExecutions
where
type
AWSResponse
ListDetectMitigationActionsExecutions =
ListDetectMitigationActionsExecutionsResponse
request :: (Service -> Service)
-> ListDetectMitigationActionsExecutions
-> Request ListDetectMitigationActionsExecutions
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListDetectMitigationActionsExecutions
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse ListDetectMitigationActionsExecutions)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe [DetectMitigationActionExecution]
-> Maybe Text
-> Int
-> ListDetectMitigationActionsExecutionsResponse
ListDetectMitigationActionsExecutionsResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"actionsExecutions"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"nextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
ListDetectMitigationActionsExecutions
where
hashWithSalt :: Int -> ListDetectMitigationActionsExecutions -> Int
hashWithSalt
Int
_salt
ListDetectMitigationActionsExecutions' {Maybe Natural
Maybe Text
Maybe POSIX
violationId :: Maybe Text
thingName :: Maybe Text
taskId :: Maybe Text
startTime :: Maybe POSIX
nextToken :: Maybe Text
maxResults :: Maybe Natural
endTime :: Maybe POSIX
$sel:violationId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:thingName:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:taskId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:startTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
$sel:nextToken:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:maxResults:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Natural
$sel:endTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
endTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
startTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
taskId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
thingName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
violationId
instance
Prelude.NFData
ListDetectMitigationActionsExecutions
where
rnf :: ListDetectMitigationActionsExecutions -> ()
rnf ListDetectMitigationActionsExecutions' {Maybe Natural
Maybe Text
Maybe POSIX
violationId :: Maybe Text
thingName :: Maybe Text
taskId :: Maybe Text
startTime :: Maybe POSIX
nextToken :: Maybe Text
maxResults :: Maybe Natural
endTime :: Maybe POSIX
$sel:violationId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:thingName:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:taskId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:startTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
$sel:nextToken:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:maxResults:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Natural
$sel:endTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
endTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
startTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
taskId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
thingName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
violationId
instance
Data.ToHeaders
ListDetectMitigationActionsExecutions
where
toHeaders :: ListDetectMitigationActionsExecutions -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance
Data.ToPath
ListDetectMitigationActionsExecutions
where
toPath :: ListDetectMitigationActionsExecutions -> ByteString
toPath =
forall a b. a -> b -> a
Prelude.const
ByteString
"/detect/mitigationactions/executions"
instance
Data.ToQuery
ListDetectMitigationActionsExecutions
where
toQuery :: ListDetectMitigationActionsExecutions -> QueryString
toQuery ListDetectMitigationActionsExecutions' {Maybe Natural
Maybe Text
Maybe POSIX
violationId :: Maybe Text
thingName :: Maybe Text
taskId :: Maybe Text
startTime :: Maybe POSIX
nextToken :: Maybe Text
maxResults :: Maybe Natural
endTime :: Maybe POSIX
$sel:violationId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:thingName:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:taskId:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:startTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
$sel:nextToken:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Text
$sel:maxResults:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe Natural
$sel:endTime:ListDetectMitigationActionsExecutions' :: ListDetectMitigationActionsExecutions -> Maybe POSIX
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"endTime" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe POSIX
endTime,
ByteString
"maxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"nextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken,
ByteString
"startTime" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe POSIX
startTime,
ByteString
"taskId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
taskId,
ByteString
"thingName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
thingName,
ByteString
"violationId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
violationId
]
data ListDetectMitigationActionsExecutionsResponse = ListDetectMitigationActionsExecutionsResponse'
{
ListDetectMitigationActionsExecutionsResponse
-> Maybe [DetectMitigationActionExecution]
actionsExecutions :: Prelude.Maybe [DetectMitigationActionExecution],
ListDetectMitigationActionsExecutionsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListDetectMitigationActionsExecutionsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListDetectMitigationActionsExecutionsResponse
-> ListDetectMitigationActionsExecutionsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListDetectMitigationActionsExecutionsResponse
-> ListDetectMitigationActionsExecutionsResponse -> Bool
$c/= :: ListDetectMitigationActionsExecutionsResponse
-> ListDetectMitigationActionsExecutionsResponse -> Bool
== :: ListDetectMitigationActionsExecutionsResponse
-> ListDetectMitigationActionsExecutionsResponse -> Bool
$c== :: ListDetectMitigationActionsExecutionsResponse
-> ListDetectMitigationActionsExecutionsResponse -> Bool
Prelude.Eq, ReadPrec [ListDetectMitigationActionsExecutionsResponse]
ReadPrec ListDetectMitigationActionsExecutionsResponse
Int -> ReadS ListDetectMitigationActionsExecutionsResponse
ReadS [ListDetectMitigationActionsExecutionsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListDetectMitigationActionsExecutionsResponse]
$creadListPrec :: ReadPrec [ListDetectMitigationActionsExecutionsResponse]
readPrec :: ReadPrec ListDetectMitigationActionsExecutionsResponse
$creadPrec :: ReadPrec ListDetectMitigationActionsExecutionsResponse
readList :: ReadS [ListDetectMitigationActionsExecutionsResponse]
$creadList :: ReadS [ListDetectMitigationActionsExecutionsResponse]
readsPrec :: Int -> ReadS ListDetectMitigationActionsExecutionsResponse
$creadsPrec :: Int -> ReadS ListDetectMitigationActionsExecutionsResponse
Prelude.Read, Int -> ListDetectMitigationActionsExecutionsResponse -> ShowS
[ListDetectMitigationActionsExecutionsResponse] -> ShowS
ListDetectMitigationActionsExecutionsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListDetectMitigationActionsExecutionsResponse] -> ShowS
$cshowList :: [ListDetectMitigationActionsExecutionsResponse] -> ShowS
show :: ListDetectMitigationActionsExecutionsResponse -> String
$cshow :: ListDetectMitigationActionsExecutionsResponse -> String
showsPrec :: Int -> ListDetectMitigationActionsExecutionsResponse -> ShowS
$cshowsPrec :: Int -> ListDetectMitigationActionsExecutionsResponse -> ShowS
Prelude.Show, forall x.
Rep ListDetectMitigationActionsExecutionsResponse x
-> ListDetectMitigationActionsExecutionsResponse
forall x.
ListDetectMitigationActionsExecutionsResponse
-> Rep ListDetectMitigationActionsExecutionsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListDetectMitigationActionsExecutionsResponse x
-> ListDetectMitigationActionsExecutionsResponse
$cfrom :: forall x.
ListDetectMitigationActionsExecutionsResponse
-> Rep ListDetectMitigationActionsExecutionsResponse x
Prelude.Generic)
newListDetectMitigationActionsExecutionsResponse ::
Prelude.Int ->
ListDetectMitigationActionsExecutionsResponse
newListDetectMitigationActionsExecutionsResponse :: Int -> ListDetectMitigationActionsExecutionsResponse
newListDetectMitigationActionsExecutionsResponse
Int
pHttpStatus_ =
ListDetectMitigationActionsExecutionsResponse'
{ $sel:actionsExecutions:ListDetectMitigationActionsExecutionsResponse' :: Maybe [DetectMitigationActionExecution]
actionsExecutions =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListDetectMitigationActionsExecutionsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListDetectMitigationActionsExecutionsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listDetectMitigationActionsExecutionsResponse_actionsExecutions :: Lens.Lens' ListDetectMitigationActionsExecutionsResponse (Prelude.Maybe [DetectMitigationActionExecution])
listDetectMitigationActionsExecutionsResponse_actionsExecutions :: Lens'
ListDetectMitigationActionsExecutionsResponse
(Maybe [DetectMitigationActionExecution])
listDetectMitigationActionsExecutionsResponse_actionsExecutions = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutionsResponse' {Maybe [DetectMitigationActionExecution]
actionsExecutions :: Maybe [DetectMitigationActionExecution]
$sel:actionsExecutions:ListDetectMitigationActionsExecutionsResponse' :: ListDetectMitigationActionsExecutionsResponse
-> Maybe [DetectMitigationActionExecution]
actionsExecutions} -> Maybe [DetectMitigationActionExecution]
actionsExecutions) (\s :: ListDetectMitigationActionsExecutionsResponse
s@ListDetectMitigationActionsExecutionsResponse' {} Maybe [DetectMitigationActionExecution]
a -> ListDetectMitigationActionsExecutionsResponse
s {$sel:actionsExecutions:ListDetectMitigationActionsExecutionsResponse' :: Maybe [DetectMitigationActionExecution]
actionsExecutions = Maybe [DetectMitigationActionExecution]
a} :: ListDetectMitigationActionsExecutionsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
listDetectMitigationActionsExecutionsResponse_nextToken :: Lens.Lens' ListDetectMitigationActionsExecutionsResponse (Prelude.Maybe Prelude.Text)
listDetectMitigationActionsExecutionsResponse_nextToken :: Lens' ListDetectMitigationActionsExecutionsResponse (Maybe Text)
listDetectMitigationActionsExecutionsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutionsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListDetectMitigationActionsExecutionsResponse' :: ListDetectMitigationActionsExecutionsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListDetectMitigationActionsExecutionsResponse
s@ListDetectMitigationActionsExecutionsResponse' {} Maybe Text
a -> ListDetectMitigationActionsExecutionsResponse
s {$sel:nextToken:ListDetectMitigationActionsExecutionsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListDetectMitigationActionsExecutionsResponse)
listDetectMitigationActionsExecutionsResponse_httpStatus :: Lens.Lens' ListDetectMitigationActionsExecutionsResponse Prelude.Int
listDetectMitigationActionsExecutionsResponse_httpStatus :: Lens' ListDetectMitigationActionsExecutionsResponse Int
listDetectMitigationActionsExecutionsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListDetectMitigationActionsExecutionsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListDetectMitigationActionsExecutionsResponse' :: ListDetectMitigationActionsExecutionsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListDetectMitigationActionsExecutionsResponse
s@ListDetectMitigationActionsExecutionsResponse' {} Int
a -> ListDetectMitigationActionsExecutionsResponse
s {$sel:httpStatus:ListDetectMitigationActionsExecutionsResponse' :: Int
httpStatus = Int
a} :: ListDetectMitigationActionsExecutionsResponse)
instance
Prelude.NFData
ListDetectMitigationActionsExecutionsResponse
where
rnf :: ListDetectMitigationActionsExecutionsResponse -> ()
rnf
ListDetectMitigationActionsExecutionsResponse' {Int
Maybe [DetectMitigationActionExecution]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
actionsExecutions :: Maybe [DetectMitigationActionExecution]
$sel:httpStatus:ListDetectMitigationActionsExecutionsResponse' :: ListDetectMitigationActionsExecutionsResponse -> Int
$sel:nextToken:ListDetectMitigationActionsExecutionsResponse' :: ListDetectMitigationActionsExecutionsResponse -> Maybe Text
$sel:actionsExecutions:ListDetectMitigationActionsExecutionsResponse' :: ListDetectMitigationActionsExecutionsResponse
-> Maybe [DetectMitigationActionExecution]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [DetectMitigationActionExecution]
actionsExecutions
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus