{-# 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.IoTSiteWise.ListBulkImportJobs
(
ListBulkImportJobs (..),
newListBulkImportJobs,
listBulkImportJobs_filter,
listBulkImportJobs_maxResults,
listBulkImportJobs_nextToken,
ListBulkImportJobsResponse (..),
newListBulkImportJobsResponse,
listBulkImportJobsResponse_nextToken,
listBulkImportJobsResponse_httpStatus,
listBulkImportJobsResponse_jobSummaries,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoTSiteWise.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListBulkImportJobs = ListBulkImportJobs'
{
ListBulkImportJobs -> Maybe ListBulkImportJobsFilter
filter' :: Prelude.Maybe ListBulkImportJobsFilter,
ListBulkImportJobs -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListBulkImportJobs -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
}
deriving (ListBulkImportJobs -> ListBulkImportJobs -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListBulkImportJobs -> ListBulkImportJobs -> Bool
$c/= :: ListBulkImportJobs -> ListBulkImportJobs -> Bool
== :: ListBulkImportJobs -> ListBulkImportJobs -> Bool
$c== :: ListBulkImportJobs -> ListBulkImportJobs -> Bool
Prelude.Eq, ReadPrec [ListBulkImportJobs]
ReadPrec ListBulkImportJobs
Int -> ReadS ListBulkImportJobs
ReadS [ListBulkImportJobs]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListBulkImportJobs]
$creadListPrec :: ReadPrec [ListBulkImportJobs]
readPrec :: ReadPrec ListBulkImportJobs
$creadPrec :: ReadPrec ListBulkImportJobs
readList :: ReadS [ListBulkImportJobs]
$creadList :: ReadS [ListBulkImportJobs]
readsPrec :: Int -> ReadS ListBulkImportJobs
$creadsPrec :: Int -> ReadS ListBulkImportJobs
Prelude.Read, Int -> ListBulkImportJobs -> ShowS
[ListBulkImportJobs] -> ShowS
ListBulkImportJobs -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListBulkImportJobs] -> ShowS
$cshowList :: [ListBulkImportJobs] -> ShowS
show :: ListBulkImportJobs -> String
$cshow :: ListBulkImportJobs -> String
showsPrec :: Int -> ListBulkImportJobs -> ShowS
$cshowsPrec :: Int -> ListBulkImportJobs -> ShowS
Prelude.Show, forall x. Rep ListBulkImportJobs x -> ListBulkImportJobs
forall x. ListBulkImportJobs -> Rep ListBulkImportJobs x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListBulkImportJobs x -> ListBulkImportJobs
$cfrom :: forall x. ListBulkImportJobs -> Rep ListBulkImportJobs x
Prelude.Generic)
newListBulkImportJobs ::
ListBulkImportJobs
newListBulkImportJobs :: ListBulkImportJobs
newListBulkImportJobs =
ListBulkImportJobs'
{ $sel:filter':ListBulkImportJobs' :: Maybe ListBulkImportJobsFilter
filter' = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListBulkImportJobs' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListBulkImportJobs' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
}
listBulkImportJobs_filter :: Lens.Lens' ListBulkImportJobs (Prelude.Maybe ListBulkImportJobsFilter)
listBulkImportJobs_filter :: Lens' ListBulkImportJobs (Maybe ListBulkImportJobsFilter)
listBulkImportJobs_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBulkImportJobs' {Maybe ListBulkImportJobsFilter
filter' :: Maybe ListBulkImportJobsFilter
$sel:filter':ListBulkImportJobs' :: ListBulkImportJobs -> Maybe ListBulkImportJobsFilter
filter'} -> Maybe ListBulkImportJobsFilter
filter') (\s :: ListBulkImportJobs
s@ListBulkImportJobs' {} Maybe ListBulkImportJobsFilter
a -> ListBulkImportJobs
s {$sel:filter':ListBulkImportJobs' :: Maybe ListBulkImportJobsFilter
filter' = Maybe ListBulkImportJobsFilter
a} :: ListBulkImportJobs)
listBulkImportJobs_maxResults :: Lens.Lens' ListBulkImportJobs (Prelude.Maybe Prelude.Natural)
listBulkImportJobs_maxResults :: Lens' ListBulkImportJobs (Maybe Natural)
listBulkImportJobs_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBulkImportJobs' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListBulkImportJobs
s@ListBulkImportJobs' {} Maybe Natural
a -> ListBulkImportJobs
s {$sel:maxResults:ListBulkImportJobs' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListBulkImportJobs)
listBulkImportJobs_nextToken :: Lens.Lens' ListBulkImportJobs (Prelude.Maybe Prelude.Text)
listBulkImportJobs_nextToken :: Lens' ListBulkImportJobs (Maybe Text)
listBulkImportJobs_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBulkImportJobs' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListBulkImportJobs
s@ListBulkImportJobs' {} Maybe Text
a -> ListBulkImportJobs
s {$sel:nextToken:ListBulkImportJobs' :: Maybe Text
nextToken = Maybe Text
a} :: ListBulkImportJobs)
instance Core.AWSPager ListBulkImportJobs where
page :: ListBulkImportJobs
-> AWSResponse ListBulkImportJobs -> Maybe ListBulkImportJobs
page ListBulkImportJobs
rq AWSResponse ListBulkImportJobs
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListBulkImportJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListBulkImportJobsResponse (Maybe Text)
listBulkImportJobsResponse_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 ListBulkImportJobs
rs forall s a. s -> Getting a s a -> a
Lens.^. Lens' ListBulkImportJobsResponse [JobSummary]
listBulkImportJobsResponse_jobSummaries) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListBulkImportJobs
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListBulkImportJobs (Maybe Text)
listBulkImportJobs_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListBulkImportJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListBulkImportJobsResponse (Maybe Text)
listBulkImportJobsResponse_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 ListBulkImportJobs where
type
AWSResponse ListBulkImportJobs =
ListBulkImportJobsResponse
request :: (Service -> Service)
-> ListBulkImportJobs -> Request ListBulkImportJobs
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 ListBulkImportJobs
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListBulkImportJobs)))
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 Text -> Int -> [JobSummary] -> ListBulkImportJobsResponse
ListBulkImportJobsResponse'
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
"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))
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
"jobSummaries" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
)
instance Prelude.Hashable ListBulkImportJobs where
hashWithSalt :: Int -> ListBulkImportJobs -> Int
hashWithSalt Int
_salt ListBulkImportJobs' {Maybe Natural
Maybe Text
Maybe ListBulkImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListBulkImportJobsFilter
$sel:nextToken:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Text
$sel:maxResults:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Natural
$sel:filter':ListBulkImportJobs' :: ListBulkImportJobs -> Maybe ListBulkImportJobsFilter
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ListBulkImportJobsFilter
filter'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
instance Prelude.NFData ListBulkImportJobs where
rnf :: ListBulkImportJobs -> ()
rnf ListBulkImportJobs' {Maybe Natural
Maybe Text
Maybe ListBulkImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListBulkImportJobsFilter
$sel:nextToken:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Text
$sel:maxResults:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Natural
$sel:filter':ListBulkImportJobs' :: ListBulkImportJobs -> Maybe ListBulkImportJobsFilter
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ListBulkImportJobsFilter
filter'
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
instance Data.ToHeaders ListBulkImportJobs where
toHeaders :: ListBulkImportJobs -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToPath ListBulkImportJobs where
toPath :: ListBulkImportJobs -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/jobs"
instance Data.ToQuery ListBulkImportJobs where
toQuery :: ListBulkImportJobs -> QueryString
toQuery ListBulkImportJobs' {Maybe Natural
Maybe Text
Maybe ListBulkImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe ListBulkImportJobsFilter
$sel:nextToken:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Text
$sel:maxResults:ListBulkImportJobs' :: ListBulkImportJobs -> Maybe Natural
$sel:filter':ListBulkImportJobs' :: ListBulkImportJobs -> Maybe ListBulkImportJobsFilter
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"filter" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ListBulkImportJobsFilter
filter',
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
]
data ListBulkImportJobsResponse = ListBulkImportJobsResponse'
{
ListBulkImportJobsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListBulkImportJobsResponse -> Int
httpStatus :: Prelude.Int,
ListBulkImportJobsResponse -> [JobSummary]
jobSummaries :: [JobSummary]
}
deriving (ListBulkImportJobsResponse -> ListBulkImportJobsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListBulkImportJobsResponse -> ListBulkImportJobsResponse -> Bool
$c/= :: ListBulkImportJobsResponse -> ListBulkImportJobsResponse -> Bool
== :: ListBulkImportJobsResponse -> ListBulkImportJobsResponse -> Bool
$c== :: ListBulkImportJobsResponse -> ListBulkImportJobsResponse -> Bool
Prelude.Eq, ReadPrec [ListBulkImportJobsResponse]
ReadPrec ListBulkImportJobsResponse
Int -> ReadS ListBulkImportJobsResponse
ReadS [ListBulkImportJobsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListBulkImportJobsResponse]
$creadListPrec :: ReadPrec [ListBulkImportJobsResponse]
readPrec :: ReadPrec ListBulkImportJobsResponse
$creadPrec :: ReadPrec ListBulkImportJobsResponse
readList :: ReadS [ListBulkImportJobsResponse]
$creadList :: ReadS [ListBulkImportJobsResponse]
readsPrec :: Int -> ReadS ListBulkImportJobsResponse
$creadsPrec :: Int -> ReadS ListBulkImportJobsResponse
Prelude.Read, Int -> ListBulkImportJobsResponse -> ShowS
[ListBulkImportJobsResponse] -> ShowS
ListBulkImportJobsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListBulkImportJobsResponse] -> ShowS
$cshowList :: [ListBulkImportJobsResponse] -> ShowS
show :: ListBulkImportJobsResponse -> String
$cshow :: ListBulkImportJobsResponse -> String
showsPrec :: Int -> ListBulkImportJobsResponse -> ShowS
$cshowsPrec :: Int -> ListBulkImportJobsResponse -> ShowS
Prelude.Show, forall x.
Rep ListBulkImportJobsResponse x -> ListBulkImportJobsResponse
forall x.
ListBulkImportJobsResponse -> Rep ListBulkImportJobsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListBulkImportJobsResponse x -> ListBulkImportJobsResponse
$cfrom :: forall x.
ListBulkImportJobsResponse -> Rep ListBulkImportJobsResponse x
Prelude.Generic)
newListBulkImportJobsResponse ::
Prelude.Int ->
ListBulkImportJobsResponse
newListBulkImportJobsResponse :: Int -> ListBulkImportJobsResponse
newListBulkImportJobsResponse Int
pHttpStatus_ =
ListBulkImportJobsResponse'
{ $sel:nextToken:ListBulkImportJobsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListBulkImportJobsResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:jobSummaries:ListBulkImportJobsResponse' :: [JobSummary]
jobSummaries = forall a. Monoid a => a
Prelude.mempty
}
listBulkImportJobsResponse_nextToken :: Lens.Lens' ListBulkImportJobsResponse (Prelude.Maybe Prelude.Text)
listBulkImportJobsResponse_nextToken :: Lens' ListBulkImportJobsResponse (Maybe Text)
listBulkImportJobsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBulkImportJobsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListBulkImportJobsResponse' :: ListBulkImportJobsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListBulkImportJobsResponse
s@ListBulkImportJobsResponse' {} Maybe Text
a -> ListBulkImportJobsResponse
s {$sel:nextToken:ListBulkImportJobsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListBulkImportJobsResponse)
listBulkImportJobsResponse_httpStatus :: Lens.Lens' ListBulkImportJobsResponse Prelude.Int
listBulkImportJobsResponse_httpStatus :: Lens' ListBulkImportJobsResponse Int
listBulkImportJobsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBulkImportJobsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListBulkImportJobsResponse' :: ListBulkImportJobsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListBulkImportJobsResponse
s@ListBulkImportJobsResponse' {} Int
a -> ListBulkImportJobsResponse
s {$sel:httpStatus:ListBulkImportJobsResponse' :: Int
httpStatus = Int
a} :: ListBulkImportJobsResponse)
listBulkImportJobsResponse_jobSummaries :: Lens.Lens' ListBulkImportJobsResponse [JobSummary]
listBulkImportJobsResponse_jobSummaries :: Lens' ListBulkImportJobsResponse [JobSummary]
listBulkImportJobsResponse_jobSummaries = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBulkImportJobsResponse' {[JobSummary]
jobSummaries :: [JobSummary]
$sel:jobSummaries:ListBulkImportJobsResponse' :: ListBulkImportJobsResponse -> [JobSummary]
jobSummaries} -> [JobSummary]
jobSummaries) (\s :: ListBulkImportJobsResponse
s@ListBulkImportJobsResponse' {} [JobSummary]
a -> ListBulkImportJobsResponse
s {$sel:jobSummaries:ListBulkImportJobsResponse' :: [JobSummary]
jobSummaries = [JobSummary]
a} :: ListBulkImportJobsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
instance Prelude.NFData ListBulkImportJobsResponse where
rnf :: ListBulkImportJobsResponse -> ()
rnf ListBulkImportJobsResponse' {Int
[JobSummary]
Maybe Text
jobSummaries :: [JobSummary]
httpStatus :: Int
nextToken :: Maybe Text
$sel:jobSummaries:ListBulkImportJobsResponse' :: ListBulkImportJobsResponse -> [JobSummary]
$sel:httpStatus:ListBulkImportJobsResponse' :: ListBulkImportJobsResponse -> Int
$sel:nextToken:ListBulkImportJobsResponse' :: ListBulkImportJobsResponse -> Maybe Text
..} =
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
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [JobSummary]
jobSummaries