{-# 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.EC2.DescribeNetworkInsightsAnalyses
(
DescribeNetworkInsightsAnalyses (..),
newDescribeNetworkInsightsAnalyses,
describeNetworkInsightsAnalyses_analysisEndTime,
describeNetworkInsightsAnalyses_analysisStartTime,
describeNetworkInsightsAnalyses_dryRun,
describeNetworkInsightsAnalyses_filters,
describeNetworkInsightsAnalyses_maxResults,
describeNetworkInsightsAnalyses_networkInsightsAnalysisIds,
describeNetworkInsightsAnalyses_networkInsightsPathId,
describeNetworkInsightsAnalyses_nextToken,
DescribeNetworkInsightsAnalysesResponse (..),
newDescribeNetworkInsightsAnalysesResponse,
describeNetworkInsightsAnalysesResponse_networkInsightsAnalyses,
describeNetworkInsightsAnalysesResponse_nextToken,
describeNetworkInsightsAnalysesResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EC2.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeNetworkInsightsAnalyses = DescribeNetworkInsightsAnalyses'
{
DescribeNetworkInsightsAnalyses -> Maybe ISO8601
analysisEndTime :: Prelude.Maybe Data.ISO8601,
DescribeNetworkInsightsAnalyses -> Maybe ISO8601
analysisStartTime :: Prelude.Maybe Data.ISO8601,
DescribeNetworkInsightsAnalyses -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
DescribeNetworkInsightsAnalyses -> Maybe [Filter]
filters :: Prelude.Maybe [Filter],
DescribeNetworkInsightsAnalyses -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
DescribeNetworkInsightsAnalyses -> Maybe [Text]
networkInsightsAnalysisIds :: Prelude.Maybe [Prelude.Text],
DescribeNetworkInsightsAnalyses -> Maybe Text
networkInsightsPathId :: Prelude.Maybe Prelude.Text,
DescribeNetworkInsightsAnalyses -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
}
deriving (DescribeNetworkInsightsAnalyses
-> DescribeNetworkInsightsAnalyses -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeNetworkInsightsAnalyses
-> DescribeNetworkInsightsAnalyses -> Bool
$c/= :: DescribeNetworkInsightsAnalyses
-> DescribeNetworkInsightsAnalyses -> Bool
== :: DescribeNetworkInsightsAnalyses
-> DescribeNetworkInsightsAnalyses -> Bool
$c== :: DescribeNetworkInsightsAnalyses
-> DescribeNetworkInsightsAnalyses -> Bool
Prelude.Eq, ReadPrec [DescribeNetworkInsightsAnalyses]
ReadPrec DescribeNetworkInsightsAnalyses
Int -> ReadS DescribeNetworkInsightsAnalyses
ReadS [DescribeNetworkInsightsAnalyses]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeNetworkInsightsAnalyses]
$creadListPrec :: ReadPrec [DescribeNetworkInsightsAnalyses]
readPrec :: ReadPrec DescribeNetworkInsightsAnalyses
$creadPrec :: ReadPrec DescribeNetworkInsightsAnalyses
readList :: ReadS [DescribeNetworkInsightsAnalyses]
$creadList :: ReadS [DescribeNetworkInsightsAnalyses]
readsPrec :: Int -> ReadS DescribeNetworkInsightsAnalyses
$creadsPrec :: Int -> ReadS DescribeNetworkInsightsAnalyses
Prelude.Read, Int -> DescribeNetworkInsightsAnalyses -> ShowS
[DescribeNetworkInsightsAnalyses] -> ShowS
DescribeNetworkInsightsAnalyses -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeNetworkInsightsAnalyses] -> ShowS
$cshowList :: [DescribeNetworkInsightsAnalyses] -> ShowS
show :: DescribeNetworkInsightsAnalyses -> String
$cshow :: DescribeNetworkInsightsAnalyses -> String
showsPrec :: Int -> DescribeNetworkInsightsAnalyses -> ShowS
$cshowsPrec :: Int -> DescribeNetworkInsightsAnalyses -> ShowS
Prelude.Show, forall x.
Rep DescribeNetworkInsightsAnalyses x
-> DescribeNetworkInsightsAnalyses
forall x.
DescribeNetworkInsightsAnalyses
-> Rep DescribeNetworkInsightsAnalyses x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeNetworkInsightsAnalyses x
-> DescribeNetworkInsightsAnalyses
$cfrom :: forall x.
DescribeNetworkInsightsAnalyses
-> Rep DescribeNetworkInsightsAnalyses x
Prelude.Generic)
newDescribeNetworkInsightsAnalyses ::
DescribeNetworkInsightsAnalyses
newDescribeNetworkInsightsAnalyses :: DescribeNetworkInsightsAnalyses
newDescribeNetworkInsightsAnalyses =
DescribeNetworkInsightsAnalyses'
{ $sel:analysisEndTime:DescribeNetworkInsightsAnalyses' :: Maybe ISO8601
analysisEndTime =
forall a. Maybe a
Prelude.Nothing,
$sel:analysisStartTime:DescribeNetworkInsightsAnalyses' :: Maybe ISO8601
analysisStartTime = forall a. Maybe a
Prelude.Nothing,
$sel:dryRun:DescribeNetworkInsightsAnalyses' :: Maybe Bool
dryRun = forall a. Maybe a
Prelude.Nothing,
$sel:filters:DescribeNetworkInsightsAnalyses' :: Maybe [Filter]
filters = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:DescribeNetworkInsightsAnalyses' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:networkInsightsAnalysisIds:DescribeNetworkInsightsAnalyses' :: Maybe [Text]
networkInsightsAnalysisIds =
forall a. Maybe a
Prelude.Nothing,
$sel:networkInsightsPathId:DescribeNetworkInsightsAnalyses' :: Maybe Text
networkInsightsPathId = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeNetworkInsightsAnalyses' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
}
describeNetworkInsightsAnalyses_analysisEndTime :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe Prelude.UTCTime)
describeNetworkInsightsAnalyses_analysisEndTime :: Lens' DescribeNetworkInsightsAnalyses (Maybe UTCTime)
describeNetworkInsightsAnalyses_analysisEndTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe ISO8601
analysisEndTime :: Maybe ISO8601
$sel:analysisEndTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
analysisEndTime} -> Maybe ISO8601
analysisEndTime) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe ISO8601
a -> DescribeNetworkInsightsAnalyses
s {$sel:analysisEndTime:DescribeNetworkInsightsAnalyses' :: Maybe ISO8601
analysisEndTime = Maybe ISO8601
a} :: DescribeNetworkInsightsAnalyses) 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
describeNetworkInsightsAnalyses_analysisStartTime :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe Prelude.UTCTime)
describeNetworkInsightsAnalyses_analysisStartTime :: Lens' DescribeNetworkInsightsAnalyses (Maybe UTCTime)
describeNetworkInsightsAnalyses_analysisStartTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe ISO8601
analysisStartTime :: Maybe ISO8601
$sel:analysisStartTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
analysisStartTime} -> Maybe ISO8601
analysisStartTime) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe ISO8601
a -> DescribeNetworkInsightsAnalyses
s {$sel:analysisStartTime:DescribeNetworkInsightsAnalyses' :: Maybe ISO8601
analysisStartTime = Maybe ISO8601
a} :: DescribeNetworkInsightsAnalyses) 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
describeNetworkInsightsAnalyses_dryRun :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe Prelude.Bool)
describeNetworkInsightsAnalyses_dryRun :: Lens' DescribeNetworkInsightsAnalyses (Maybe Bool)
describeNetworkInsightsAnalyses_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe Bool
a -> DescribeNetworkInsightsAnalyses
s {$sel:dryRun:DescribeNetworkInsightsAnalyses' :: Maybe Bool
dryRun = Maybe Bool
a} :: DescribeNetworkInsightsAnalyses)
describeNetworkInsightsAnalyses_filters :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe [Filter])
describeNetworkInsightsAnalyses_filters :: Lens' DescribeNetworkInsightsAnalyses (Maybe [Filter])
describeNetworkInsightsAnalyses_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe [Filter]
filters :: Maybe [Filter]
$sel:filters:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Filter]
filters} -> Maybe [Filter]
filters) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe [Filter]
a -> DescribeNetworkInsightsAnalyses
s {$sel:filters:DescribeNetworkInsightsAnalyses' :: Maybe [Filter]
filters = Maybe [Filter]
a} :: DescribeNetworkInsightsAnalyses) 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
describeNetworkInsightsAnalyses_maxResults :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe Prelude.Natural)
describeNetworkInsightsAnalyses_maxResults :: Lens' DescribeNetworkInsightsAnalyses (Maybe Natural)
describeNetworkInsightsAnalyses_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe Natural
a -> DescribeNetworkInsightsAnalyses
s {$sel:maxResults:DescribeNetworkInsightsAnalyses' :: Maybe Natural
maxResults = Maybe Natural
a} :: DescribeNetworkInsightsAnalyses)
describeNetworkInsightsAnalyses_networkInsightsAnalysisIds :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe [Prelude.Text])
describeNetworkInsightsAnalyses_networkInsightsAnalysisIds :: Lens' DescribeNetworkInsightsAnalyses (Maybe [Text])
describeNetworkInsightsAnalyses_networkInsightsAnalysisIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe [Text]
networkInsightsAnalysisIds :: Maybe [Text]
$sel:networkInsightsAnalysisIds:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Text]
networkInsightsAnalysisIds} -> Maybe [Text]
networkInsightsAnalysisIds) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe [Text]
a -> DescribeNetworkInsightsAnalyses
s {$sel:networkInsightsAnalysisIds:DescribeNetworkInsightsAnalyses' :: Maybe [Text]
networkInsightsAnalysisIds = Maybe [Text]
a} :: DescribeNetworkInsightsAnalyses) 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
describeNetworkInsightsAnalyses_networkInsightsPathId :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe Prelude.Text)
describeNetworkInsightsAnalyses_networkInsightsPathId :: Lens' DescribeNetworkInsightsAnalyses (Maybe Text)
describeNetworkInsightsAnalyses_networkInsightsPathId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe Text
networkInsightsPathId :: Maybe Text
$sel:networkInsightsPathId:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
networkInsightsPathId} -> Maybe Text
networkInsightsPathId) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe Text
a -> DescribeNetworkInsightsAnalyses
s {$sel:networkInsightsPathId:DescribeNetworkInsightsAnalyses' :: Maybe Text
networkInsightsPathId = Maybe Text
a} :: DescribeNetworkInsightsAnalyses)
describeNetworkInsightsAnalyses_nextToken :: Lens.Lens' DescribeNetworkInsightsAnalyses (Prelude.Maybe Prelude.Text)
describeNetworkInsightsAnalyses_nextToken :: Lens' DescribeNetworkInsightsAnalyses (Maybe Text)
describeNetworkInsightsAnalyses_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalyses' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeNetworkInsightsAnalyses
s@DescribeNetworkInsightsAnalyses' {} Maybe Text
a -> DescribeNetworkInsightsAnalyses
s {$sel:nextToken:DescribeNetworkInsightsAnalyses' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeNetworkInsightsAnalyses)
instance
Core.AWSPager
DescribeNetworkInsightsAnalyses
where
page :: DescribeNetworkInsightsAnalyses
-> AWSResponse DescribeNetworkInsightsAnalyses
-> Maybe DescribeNetworkInsightsAnalyses
page DescribeNetworkInsightsAnalyses
rq AWSResponse DescribeNetworkInsightsAnalyses
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeNetworkInsightsAnalyses
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeNetworkInsightsAnalysesResponse (Maybe Text)
describeNetworkInsightsAnalysesResponse_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 DescribeNetworkInsightsAnalyses
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
DescribeNetworkInsightsAnalysesResponse
(Maybe [NetworkInsightsAnalysis])
describeNetworkInsightsAnalysesResponse_networkInsightsAnalyses
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.$ DescribeNetworkInsightsAnalyses
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeNetworkInsightsAnalyses (Maybe Text)
describeNetworkInsightsAnalyses_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeNetworkInsightsAnalyses
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeNetworkInsightsAnalysesResponse (Maybe Text)
describeNetworkInsightsAnalysesResponse_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
DescribeNetworkInsightsAnalyses
where
type
AWSResponse DescribeNetworkInsightsAnalyses =
DescribeNetworkInsightsAnalysesResponse
request :: (Service -> Service)
-> DescribeNetworkInsightsAnalyses
-> Request DescribeNetworkInsightsAnalyses
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DescribeNetworkInsightsAnalyses
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DescribeNetworkInsightsAnalyses)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXML
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe [NetworkInsightsAnalysis]
-> Maybe Text -> Int -> DescribeNetworkInsightsAnalysesResponse
DescribeNetworkInsightsAnalysesResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( [Node]
x
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"networkInsightsAnalysisSet"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may (forall a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"item")
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"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
DescribeNetworkInsightsAnalyses
where
hashWithSalt :: Int -> DescribeNetworkInsightsAnalyses -> Int
hashWithSalt
Int
_salt
DescribeNetworkInsightsAnalyses' {Maybe Bool
Maybe Natural
Maybe [Text]
Maybe [Filter]
Maybe Text
Maybe ISO8601
nextToken :: Maybe Text
networkInsightsPathId :: Maybe Text
networkInsightsAnalysisIds :: Maybe [Text]
maxResults :: Maybe Natural
filters :: Maybe [Filter]
dryRun :: Maybe Bool
analysisStartTime :: Maybe ISO8601
analysisEndTime :: Maybe ISO8601
$sel:nextToken:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
$sel:networkInsightsPathId:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
$sel:networkInsightsAnalysisIds:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Text]
$sel:maxResults:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Natural
$sel:filters:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Filter]
$sel:dryRun:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Bool
$sel:analysisStartTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
$sel:analysisEndTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ISO8601
analysisEndTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ISO8601
analysisStartTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
dryRun
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Filter]
filters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
networkInsightsAnalysisIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
networkInsightsPathId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
instance
Prelude.NFData
DescribeNetworkInsightsAnalyses
where
rnf :: DescribeNetworkInsightsAnalyses -> ()
rnf DescribeNetworkInsightsAnalyses' {Maybe Bool
Maybe Natural
Maybe [Text]
Maybe [Filter]
Maybe Text
Maybe ISO8601
nextToken :: Maybe Text
networkInsightsPathId :: Maybe Text
networkInsightsAnalysisIds :: Maybe [Text]
maxResults :: Maybe Natural
filters :: Maybe [Filter]
dryRun :: Maybe Bool
analysisStartTime :: Maybe ISO8601
analysisEndTime :: Maybe ISO8601
$sel:nextToken:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
$sel:networkInsightsPathId:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
$sel:networkInsightsAnalysisIds:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Text]
$sel:maxResults:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Natural
$sel:filters:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Filter]
$sel:dryRun:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Bool
$sel:analysisStartTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
$sel:analysisEndTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
analysisEndTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
analysisStartTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
dryRun
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Filter]
filters
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]
networkInsightsAnalysisIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
networkInsightsPathId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
instance
Data.ToHeaders
DescribeNetworkInsightsAnalyses
where
toHeaders :: DescribeNetworkInsightsAnalyses -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath DescribeNetworkInsightsAnalyses where
toPath :: DescribeNetworkInsightsAnalyses -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeNetworkInsightsAnalyses where
toQuery :: DescribeNetworkInsightsAnalyses -> QueryString
toQuery DescribeNetworkInsightsAnalyses' {Maybe Bool
Maybe Natural
Maybe [Text]
Maybe [Filter]
Maybe Text
Maybe ISO8601
nextToken :: Maybe Text
networkInsightsPathId :: Maybe Text
networkInsightsAnalysisIds :: Maybe [Text]
maxResults :: Maybe Natural
filters :: Maybe [Filter]
dryRun :: Maybe Bool
analysisStartTime :: Maybe ISO8601
analysisEndTime :: Maybe ISO8601
$sel:nextToken:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
$sel:networkInsightsPathId:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Text
$sel:networkInsightsAnalysisIds:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Text]
$sel:maxResults:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Natural
$sel:filters:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe [Filter]
$sel:dryRun:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe Bool
$sel:analysisStartTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
$sel:analysisEndTime:DescribeNetworkInsightsAnalyses' :: DescribeNetworkInsightsAnalyses -> Maybe ISO8601
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"DescribeNetworkInsightsAnalyses" ::
Prelude.ByteString
),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2016-11-15" :: Prelude.ByteString),
ByteString
"AnalysisEndTime" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ISO8601
analysisEndTime,
ByteString
"AnalysisStartTime" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ISO8601
analysisStartTime,
ByteString
"DryRun" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
dryRun,
forall a. ToQuery a => a -> QueryString
Data.toQuery
(forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Data.toQueryList ByteString
"Filter" forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Filter]
filters),
ByteString
"MaxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
forall a. ToQuery a => a -> QueryString
Data.toQuery
( forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Data.toQueryList ByteString
"NetworkInsightsAnalysisId"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
networkInsightsAnalysisIds
),
ByteString
"NetworkInsightsPathId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
networkInsightsPathId,
ByteString
"NextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken
]
data DescribeNetworkInsightsAnalysesResponse = DescribeNetworkInsightsAnalysesResponse'
{
DescribeNetworkInsightsAnalysesResponse
-> Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses :: Prelude.Maybe [NetworkInsightsAnalysis],
DescribeNetworkInsightsAnalysesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeNetworkInsightsAnalysesResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeNetworkInsightsAnalysesResponse
-> DescribeNetworkInsightsAnalysesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeNetworkInsightsAnalysesResponse
-> DescribeNetworkInsightsAnalysesResponse -> Bool
$c/= :: DescribeNetworkInsightsAnalysesResponse
-> DescribeNetworkInsightsAnalysesResponse -> Bool
== :: DescribeNetworkInsightsAnalysesResponse
-> DescribeNetworkInsightsAnalysesResponse -> Bool
$c== :: DescribeNetworkInsightsAnalysesResponse
-> DescribeNetworkInsightsAnalysesResponse -> Bool
Prelude.Eq, ReadPrec [DescribeNetworkInsightsAnalysesResponse]
ReadPrec DescribeNetworkInsightsAnalysesResponse
Int -> ReadS DescribeNetworkInsightsAnalysesResponse
ReadS [DescribeNetworkInsightsAnalysesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeNetworkInsightsAnalysesResponse]
$creadListPrec :: ReadPrec [DescribeNetworkInsightsAnalysesResponse]
readPrec :: ReadPrec DescribeNetworkInsightsAnalysesResponse
$creadPrec :: ReadPrec DescribeNetworkInsightsAnalysesResponse
readList :: ReadS [DescribeNetworkInsightsAnalysesResponse]
$creadList :: ReadS [DescribeNetworkInsightsAnalysesResponse]
readsPrec :: Int -> ReadS DescribeNetworkInsightsAnalysesResponse
$creadsPrec :: Int -> ReadS DescribeNetworkInsightsAnalysesResponse
Prelude.Read, Int -> DescribeNetworkInsightsAnalysesResponse -> ShowS
[DescribeNetworkInsightsAnalysesResponse] -> ShowS
DescribeNetworkInsightsAnalysesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeNetworkInsightsAnalysesResponse] -> ShowS
$cshowList :: [DescribeNetworkInsightsAnalysesResponse] -> ShowS
show :: DescribeNetworkInsightsAnalysesResponse -> String
$cshow :: DescribeNetworkInsightsAnalysesResponse -> String
showsPrec :: Int -> DescribeNetworkInsightsAnalysesResponse -> ShowS
$cshowsPrec :: Int -> DescribeNetworkInsightsAnalysesResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeNetworkInsightsAnalysesResponse x
-> DescribeNetworkInsightsAnalysesResponse
forall x.
DescribeNetworkInsightsAnalysesResponse
-> Rep DescribeNetworkInsightsAnalysesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeNetworkInsightsAnalysesResponse x
-> DescribeNetworkInsightsAnalysesResponse
$cfrom :: forall x.
DescribeNetworkInsightsAnalysesResponse
-> Rep DescribeNetworkInsightsAnalysesResponse x
Prelude.Generic)
newDescribeNetworkInsightsAnalysesResponse ::
Prelude.Int ->
DescribeNetworkInsightsAnalysesResponse
newDescribeNetworkInsightsAnalysesResponse :: Int -> DescribeNetworkInsightsAnalysesResponse
newDescribeNetworkInsightsAnalysesResponse
Int
pHttpStatus_ =
DescribeNetworkInsightsAnalysesResponse'
{ $sel:networkInsightsAnalyses:DescribeNetworkInsightsAnalysesResponse' :: Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeNetworkInsightsAnalysesResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeNetworkInsightsAnalysesResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeNetworkInsightsAnalysesResponse_networkInsightsAnalyses :: Lens.Lens' DescribeNetworkInsightsAnalysesResponse (Prelude.Maybe [NetworkInsightsAnalysis])
describeNetworkInsightsAnalysesResponse_networkInsightsAnalyses :: Lens'
DescribeNetworkInsightsAnalysesResponse
(Maybe [NetworkInsightsAnalysis])
describeNetworkInsightsAnalysesResponse_networkInsightsAnalyses = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalysesResponse' {Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses :: Maybe [NetworkInsightsAnalysis]
$sel:networkInsightsAnalyses:DescribeNetworkInsightsAnalysesResponse' :: DescribeNetworkInsightsAnalysesResponse
-> Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses} -> Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses) (\s :: DescribeNetworkInsightsAnalysesResponse
s@DescribeNetworkInsightsAnalysesResponse' {} Maybe [NetworkInsightsAnalysis]
a -> DescribeNetworkInsightsAnalysesResponse
s {$sel:networkInsightsAnalyses:DescribeNetworkInsightsAnalysesResponse' :: Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses = Maybe [NetworkInsightsAnalysis]
a} :: DescribeNetworkInsightsAnalysesResponse) 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
describeNetworkInsightsAnalysesResponse_nextToken :: Lens.Lens' DescribeNetworkInsightsAnalysesResponse (Prelude.Maybe Prelude.Text)
describeNetworkInsightsAnalysesResponse_nextToken :: Lens' DescribeNetworkInsightsAnalysesResponse (Maybe Text)
describeNetworkInsightsAnalysesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalysesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeNetworkInsightsAnalysesResponse' :: DescribeNetworkInsightsAnalysesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeNetworkInsightsAnalysesResponse
s@DescribeNetworkInsightsAnalysesResponse' {} Maybe Text
a -> DescribeNetworkInsightsAnalysesResponse
s {$sel:nextToken:DescribeNetworkInsightsAnalysesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeNetworkInsightsAnalysesResponse)
describeNetworkInsightsAnalysesResponse_httpStatus :: Lens.Lens' DescribeNetworkInsightsAnalysesResponse Prelude.Int
describeNetworkInsightsAnalysesResponse_httpStatus :: Lens' DescribeNetworkInsightsAnalysesResponse Int
describeNetworkInsightsAnalysesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeNetworkInsightsAnalysesResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeNetworkInsightsAnalysesResponse' :: DescribeNetworkInsightsAnalysesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeNetworkInsightsAnalysesResponse
s@DescribeNetworkInsightsAnalysesResponse' {} Int
a -> DescribeNetworkInsightsAnalysesResponse
s {$sel:httpStatus:DescribeNetworkInsightsAnalysesResponse' :: Int
httpStatus = Int
a} :: DescribeNetworkInsightsAnalysesResponse)
instance
Prelude.NFData
DescribeNetworkInsightsAnalysesResponse
where
rnf :: DescribeNetworkInsightsAnalysesResponse -> ()
rnf DescribeNetworkInsightsAnalysesResponse' {Int
Maybe [NetworkInsightsAnalysis]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
networkInsightsAnalyses :: Maybe [NetworkInsightsAnalysis]
$sel:httpStatus:DescribeNetworkInsightsAnalysesResponse' :: DescribeNetworkInsightsAnalysesResponse -> Int
$sel:nextToken:DescribeNetworkInsightsAnalysesResponse' :: DescribeNetworkInsightsAnalysesResponse -> Maybe Text
$sel:networkInsightsAnalyses:DescribeNetworkInsightsAnalysesResponse' :: DescribeNetworkInsightsAnalysesResponse
-> Maybe [NetworkInsightsAnalysis]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [NetworkInsightsAnalysis]
networkInsightsAnalyses
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