{-# 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.CodeArtifact.ListPackageVersionAssets
(
ListPackageVersionAssets (..),
newListPackageVersionAssets,
listPackageVersionAssets_domainOwner,
listPackageVersionAssets_maxResults,
listPackageVersionAssets_namespace,
listPackageVersionAssets_nextToken,
listPackageVersionAssets_domain,
listPackageVersionAssets_repository,
listPackageVersionAssets_format,
listPackageVersionAssets_package,
listPackageVersionAssets_packageVersion,
ListPackageVersionAssetsResponse (..),
newListPackageVersionAssetsResponse,
listPackageVersionAssetsResponse_assets,
listPackageVersionAssetsResponse_format,
listPackageVersionAssetsResponse_namespace,
listPackageVersionAssetsResponse_nextToken,
listPackageVersionAssetsResponse_package,
listPackageVersionAssetsResponse_version,
listPackageVersionAssetsResponse_versionRevision,
listPackageVersionAssetsResponse_httpStatus,
)
where
import Amazonka.CodeArtifact.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListPackageVersionAssets = ListPackageVersionAssets'
{
ListPackageVersionAssets -> Maybe Text
domainOwner :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssets -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListPackageVersionAssets -> Maybe Text
namespace :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssets -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssets -> Text
domain :: Prelude.Text,
ListPackageVersionAssets -> Text
repository :: Prelude.Text,
ListPackageVersionAssets -> PackageFormat
format :: PackageFormat,
ListPackageVersionAssets -> Text
package :: Prelude.Text,
ListPackageVersionAssets -> Text
packageVersion :: Prelude.Text
}
deriving (ListPackageVersionAssets -> ListPackageVersionAssets -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListPackageVersionAssets -> ListPackageVersionAssets -> Bool
$c/= :: ListPackageVersionAssets -> ListPackageVersionAssets -> Bool
== :: ListPackageVersionAssets -> ListPackageVersionAssets -> Bool
$c== :: ListPackageVersionAssets -> ListPackageVersionAssets -> Bool
Prelude.Eq, ReadPrec [ListPackageVersionAssets]
ReadPrec ListPackageVersionAssets
Int -> ReadS ListPackageVersionAssets
ReadS [ListPackageVersionAssets]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListPackageVersionAssets]
$creadListPrec :: ReadPrec [ListPackageVersionAssets]
readPrec :: ReadPrec ListPackageVersionAssets
$creadPrec :: ReadPrec ListPackageVersionAssets
readList :: ReadS [ListPackageVersionAssets]
$creadList :: ReadS [ListPackageVersionAssets]
readsPrec :: Int -> ReadS ListPackageVersionAssets
$creadsPrec :: Int -> ReadS ListPackageVersionAssets
Prelude.Read, Int -> ListPackageVersionAssets -> ShowS
[ListPackageVersionAssets] -> ShowS
ListPackageVersionAssets -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListPackageVersionAssets] -> ShowS
$cshowList :: [ListPackageVersionAssets] -> ShowS
show :: ListPackageVersionAssets -> String
$cshow :: ListPackageVersionAssets -> String
showsPrec :: Int -> ListPackageVersionAssets -> ShowS
$cshowsPrec :: Int -> ListPackageVersionAssets -> ShowS
Prelude.Show, forall x.
Rep ListPackageVersionAssets x -> ListPackageVersionAssets
forall x.
ListPackageVersionAssets -> Rep ListPackageVersionAssets x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListPackageVersionAssets x -> ListPackageVersionAssets
$cfrom :: forall x.
ListPackageVersionAssets -> Rep ListPackageVersionAssets x
Prelude.Generic)
newListPackageVersionAssets ::
Prelude.Text ->
Prelude.Text ->
PackageFormat ->
Prelude.Text ->
Prelude.Text ->
ListPackageVersionAssets
newListPackageVersionAssets :: Text
-> Text
-> PackageFormat
-> Text
-> Text
-> ListPackageVersionAssets
newListPackageVersionAssets
Text
pDomain_
Text
pRepository_
PackageFormat
pFormat_
Text
pPackage_
Text
pPackageVersion_ =
ListPackageVersionAssets'
{ $sel:domainOwner:ListPackageVersionAssets' :: Maybe Text
domainOwner =
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListPackageVersionAssets' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:namespace:ListPackageVersionAssets' :: Maybe Text
namespace = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListPackageVersionAssets' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:domain:ListPackageVersionAssets' :: Text
domain = Text
pDomain_,
$sel:repository:ListPackageVersionAssets' :: Text
repository = Text
pRepository_,
$sel:format:ListPackageVersionAssets' :: PackageFormat
format = PackageFormat
pFormat_,
$sel:package:ListPackageVersionAssets' :: Text
package = Text
pPackage_,
$sel:packageVersion:ListPackageVersionAssets' :: Text
packageVersion = Text
pPackageVersion_
}
listPackageVersionAssets_domainOwner :: Lens.Lens' ListPackageVersionAssets (Prelude.Maybe Prelude.Text)
listPackageVersionAssets_domainOwner :: Lens' ListPackageVersionAssets (Maybe Text)
listPackageVersionAssets_domainOwner = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Maybe Text
domainOwner :: Maybe Text
$sel:domainOwner:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
domainOwner} -> Maybe Text
domainOwner) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Maybe Text
a -> ListPackageVersionAssets
s {$sel:domainOwner:ListPackageVersionAssets' :: Maybe Text
domainOwner = Maybe Text
a} :: ListPackageVersionAssets)
listPackageVersionAssets_maxResults :: Lens.Lens' ListPackageVersionAssets (Prelude.Maybe Prelude.Natural)
listPackageVersionAssets_maxResults :: Lens' ListPackageVersionAssets (Maybe Natural)
listPackageVersionAssets_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Maybe Natural
a -> ListPackageVersionAssets
s {$sel:maxResults:ListPackageVersionAssets' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListPackageVersionAssets)
listPackageVersionAssets_namespace :: Lens.Lens' ListPackageVersionAssets (Prelude.Maybe Prelude.Text)
listPackageVersionAssets_namespace :: Lens' ListPackageVersionAssets (Maybe Text)
listPackageVersionAssets_namespace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Maybe Text
namespace :: Maybe Text
$sel:namespace:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
namespace} -> Maybe Text
namespace) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Maybe Text
a -> ListPackageVersionAssets
s {$sel:namespace:ListPackageVersionAssets' :: Maybe Text
namespace = Maybe Text
a} :: ListPackageVersionAssets)
listPackageVersionAssets_nextToken :: Lens.Lens' ListPackageVersionAssets (Prelude.Maybe Prelude.Text)
listPackageVersionAssets_nextToken :: Lens' ListPackageVersionAssets (Maybe Text)
listPackageVersionAssets_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Maybe Text
a -> ListPackageVersionAssets
s {$sel:nextToken:ListPackageVersionAssets' :: Maybe Text
nextToken = Maybe Text
a} :: ListPackageVersionAssets)
listPackageVersionAssets_domain :: Lens.Lens' ListPackageVersionAssets Prelude.Text
listPackageVersionAssets_domain :: Lens' ListPackageVersionAssets Text
listPackageVersionAssets_domain = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Text
domain :: Text
$sel:domain:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
domain} -> Text
domain) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Text
a -> ListPackageVersionAssets
s {$sel:domain:ListPackageVersionAssets' :: Text
domain = Text
a} :: ListPackageVersionAssets)
listPackageVersionAssets_repository :: Lens.Lens' ListPackageVersionAssets Prelude.Text
listPackageVersionAssets_repository :: Lens' ListPackageVersionAssets Text
listPackageVersionAssets_repository = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Text
repository :: Text
$sel:repository:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
repository} -> Text
repository) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Text
a -> ListPackageVersionAssets
s {$sel:repository:ListPackageVersionAssets' :: Text
repository = Text
a} :: ListPackageVersionAssets)
listPackageVersionAssets_format :: Lens.Lens' ListPackageVersionAssets PackageFormat
listPackageVersionAssets_format :: Lens' ListPackageVersionAssets PackageFormat
listPackageVersionAssets_format = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {PackageFormat
format :: PackageFormat
$sel:format:ListPackageVersionAssets' :: ListPackageVersionAssets -> PackageFormat
format} -> PackageFormat
format) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} PackageFormat
a -> ListPackageVersionAssets
s {$sel:format:ListPackageVersionAssets' :: PackageFormat
format = PackageFormat
a} :: ListPackageVersionAssets)
listPackageVersionAssets_package :: Lens.Lens' ListPackageVersionAssets Prelude.Text
listPackageVersionAssets_package :: Lens' ListPackageVersionAssets Text
listPackageVersionAssets_package = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Text
package :: Text
$sel:package:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
package} -> Text
package) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Text
a -> ListPackageVersionAssets
s {$sel:package:ListPackageVersionAssets' :: Text
package = Text
a} :: ListPackageVersionAssets)
listPackageVersionAssets_packageVersion :: Lens.Lens' ListPackageVersionAssets Prelude.Text
listPackageVersionAssets_packageVersion :: Lens' ListPackageVersionAssets Text
listPackageVersionAssets_packageVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssets' {Text
packageVersion :: Text
$sel:packageVersion:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
packageVersion} -> Text
packageVersion) (\s :: ListPackageVersionAssets
s@ListPackageVersionAssets' {} Text
a -> ListPackageVersionAssets
s {$sel:packageVersion:ListPackageVersionAssets' :: Text
packageVersion = Text
a} :: ListPackageVersionAssets)
instance Core.AWSPager ListPackageVersionAssets where
page :: ListPackageVersionAssets
-> AWSResponse ListPackageVersionAssets
-> Maybe ListPackageVersionAssets
page ListPackageVersionAssets
rq AWSResponse ListPackageVersionAssets
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListPackageVersionAssets
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_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 ListPackageVersionAssets
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPackageVersionAssetsResponse (Maybe [AssetSummary])
listPackageVersionAssetsResponse_assets
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.$ ListPackageVersionAssets
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListPackageVersionAssets (Maybe Text)
listPackageVersionAssets_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListPackageVersionAssets
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_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 ListPackageVersionAssets where
type
AWSResponse ListPackageVersionAssets =
ListPackageVersionAssetsResponse
request :: (Service -> Service)
-> ListPackageVersionAssets -> Request ListPackageVersionAssets
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListPackageVersionAssets
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListPackageVersionAssets)))
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 [AssetSummary]
-> Maybe PackageFormat
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> ListPackageVersionAssetsResponse
ListPackageVersionAssetsResponse'
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
"assets" 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
"format")
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
"namespace")
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.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"package")
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
"version")
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
"versionRevision")
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 ListPackageVersionAssets where
hashWithSalt :: Int -> ListPackageVersionAssets -> Int
hashWithSalt Int
_salt ListPackageVersionAssets' {Maybe Natural
Maybe Text
Text
PackageFormat
packageVersion :: Text
package :: Text
format :: PackageFormat
repository :: Text
domain :: Text
nextToken :: Maybe Text
namespace :: Maybe Text
maxResults :: Maybe Natural
domainOwner :: Maybe Text
$sel:packageVersion:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:package:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:format:ListPackageVersionAssets' :: ListPackageVersionAssets -> PackageFormat
$sel:repository:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:domain:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:nextToken:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
$sel:namespace:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
$sel:maxResults:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Natural
$sel:domainOwner:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
domainOwner
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
namespace
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
domain
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
repository
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` PackageFormat
format
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
package
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
packageVersion
instance Prelude.NFData ListPackageVersionAssets where
rnf :: ListPackageVersionAssets -> ()
rnf ListPackageVersionAssets' {Maybe Natural
Maybe Text
Text
PackageFormat
packageVersion :: Text
package :: Text
format :: PackageFormat
repository :: Text
domain :: Text
nextToken :: Maybe Text
namespace :: Maybe Text
maxResults :: Maybe Natural
domainOwner :: Maybe Text
$sel:packageVersion:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:package:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:format:ListPackageVersionAssets' :: ListPackageVersionAssets -> PackageFormat
$sel:repository:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:domain:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:nextToken:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
$sel:namespace:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
$sel:maxResults:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Natural
$sel:domainOwner:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
domainOwner
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
namespace
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 Text
domain
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
repository
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf PackageFormat
format
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
package
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
packageVersion
instance Data.ToHeaders ListPackageVersionAssets where
toHeaders :: ListPackageVersionAssets -> 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.ToJSON ListPackageVersionAssets where
toJSON :: ListPackageVersionAssets -> Value
toJSON = forall a b. a -> b -> a
Prelude.const (Object -> Value
Data.Object forall a. Monoid a => a
Prelude.mempty)
instance Data.ToPath ListPackageVersionAssets where
toPath :: ListPackageVersionAssets -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/v1/package/version/assets"
instance Data.ToQuery ListPackageVersionAssets where
toQuery :: ListPackageVersionAssets -> QueryString
toQuery ListPackageVersionAssets' {Maybe Natural
Maybe Text
Text
PackageFormat
packageVersion :: Text
package :: Text
format :: PackageFormat
repository :: Text
domain :: Text
nextToken :: Maybe Text
namespace :: Maybe Text
maxResults :: Maybe Natural
domainOwner :: Maybe Text
$sel:packageVersion:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:package:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:format:ListPackageVersionAssets' :: ListPackageVersionAssets -> PackageFormat
$sel:repository:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:domain:ListPackageVersionAssets' :: ListPackageVersionAssets -> Text
$sel:nextToken:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
$sel:namespace:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
$sel:maxResults:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Natural
$sel:domainOwner:ListPackageVersionAssets' :: ListPackageVersionAssets -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"domain-owner" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
domainOwner,
ByteString
"max-results" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"namespace" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
namespace,
ByteString
"next-token" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken,
ByteString
"domain" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
domain,
ByteString
"repository" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
repository,
ByteString
"format" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: PackageFormat
format,
ByteString
"package" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
package,
ByteString
"version" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
packageVersion
]
data ListPackageVersionAssetsResponse = ListPackageVersionAssetsResponse'
{
ListPackageVersionAssetsResponse -> Maybe [AssetSummary]
assets :: Prelude.Maybe [AssetSummary],
ListPackageVersionAssetsResponse -> Maybe PackageFormat
format :: Prelude.Maybe PackageFormat,
ListPackageVersionAssetsResponse -> Maybe Text
namespace :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssetsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssetsResponse -> Maybe Text
package :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssetsResponse -> Maybe Text
version :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssetsResponse -> Maybe Text
versionRevision :: Prelude.Maybe Prelude.Text,
ListPackageVersionAssetsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListPackageVersionAssetsResponse
-> ListPackageVersionAssetsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListPackageVersionAssetsResponse
-> ListPackageVersionAssetsResponse -> Bool
$c/= :: ListPackageVersionAssetsResponse
-> ListPackageVersionAssetsResponse -> Bool
== :: ListPackageVersionAssetsResponse
-> ListPackageVersionAssetsResponse -> Bool
$c== :: ListPackageVersionAssetsResponse
-> ListPackageVersionAssetsResponse -> Bool
Prelude.Eq, ReadPrec [ListPackageVersionAssetsResponse]
ReadPrec ListPackageVersionAssetsResponse
Int -> ReadS ListPackageVersionAssetsResponse
ReadS [ListPackageVersionAssetsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListPackageVersionAssetsResponse]
$creadListPrec :: ReadPrec [ListPackageVersionAssetsResponse]
readPrec :: ReadPrec ListPackageVersionAssetsResponse
$creadPrec :: ReadPrec ListPackageVersionAssetsResponse
readList :: ReadS [ListPackageVersionAssetsResponse]
$creadList :: ReadS [ListPackageVersionAssetsResponse]
readsPrec :: Int -> ReadS ListPackageVersionAssetsResponse
$creadsPrec :: Int -> ReadS ListPackageVersionAssetsResponse
Prelude.Read, Int -> ListPackageVersionAssetsResponse -> ShowS
[ListPackageVersionAssetsResponse] -> ShowS
ListPackageVersionAssetsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListPackageVersionAssetsResponse] -> ShowS
$cshowList :: [ListPackageVersionAssetsResponse] -> ShowS
show :: ListPackageVersionAssetsResponse -> String
$cshow :: ListPackageVersionAssetsResponse -> String
showsPrec :: Int -> ListPackageVersionAssetsResponse -> ShowS
$cshowsPrec :: Int -> ListPackageVersionAssetsResponse -> ShowS
Prelude.Show, forall x.
Rep ListPackageVersionAssetsResponse x
-> ListPackageVersionAssetsResponse
forall x.
ListPackageVersionAssetsResponse
-> Rep ListPackageVersionAssetsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListPackageVersionAssetsResponse x
-> ListPackageVersionAssetsResponse
$cfrom :: forall x.
ListPackageVersionAssetsResponse
-> Rep ListPackageVersionAssetsResponse x
Prelude.Generic)
newListPackageVersionAssetsResponse ::
Prelude.Int ->
ListPackageVersionAssetsResponse
newListPackageVersionAssetsResponse :: Int -> ListPackageVersionAssetsResponse
newListPackageVersionAssetsResponse Int
pHttpStatus_ =
ListPackageVersionAssetsResponse'
{ $sel:assets:ListPackageVersionAssetsResponse' :: Maybe [AssetSummary]
assets =
forall a. Maybe a
Prelude.Nothing,
$sel:format:ListPackageVersionAssetsResponse' :: Maybe PackageFormat
format = forall a. Maybe a
Prelude.Nothing,
$sel:namespace:ListPackageVersionAssetsResponse' :: Maybe Text
namespace = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListPackageVersionAssetsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:package:ListPackageVersionAssetsResponse' :: Maybe Text
package = forall a. Maybe a
Prelude.Nothing,
$sel:version:ListPackageVersionAssetsResponse' :: Maybe Text
version = forall a. Maybe a
Prelude.Nothing,
$sel:versionRevision:ListPackageVersionAssetsResponse' :: Maybe Text
versionRevision = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListPackageVersionAssetsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listPackageVersionAssetsResponse_assets :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe [AssetSummary])
listPackageVersionAssetsResponse_assets :: Lens' ListPackageVersionAssetsResponse (Maybe [AssetSummary])
listPackageVersionAssetsResponse_assets = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe [AssetSummary]
assets :: Maybe [AssetSummary]
$sel:assets:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe [AssetSummary]
assets} -> Maybe [AssetSummary]
assets) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe [AssetSummary]
a -> ListPackageVersionAssetsResponse
s {$sel:assets:ListPackageVersionAssetsResponse' :: Maybe [AssetSummary]
assets = Maybe [AssetSummary]
a} :: ListPackageVersionAssetsResponse) 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
listPackageVersionAssetsResponse_format :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe PackageFormat)
listPackageVersionAssetsResponse_format :: Lens' ListPackageVersionAssetsResponse (Maybe PackageFormat)
listPackageVersionAssetsResponse_format = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe PackageFormat
format :: Maybe PackageFormat
$sel:format:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe PackageFormat
format} -> Maybe PackageFormat
format) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe PackageFormat
a -> ListPackageVersionAssetsResponse
s {$sel:format:ListPackageVersionAssetsResponse' :: Maybe PackageFormat
format = Maybe PackageFormat
a} :: ListPackageVersionAssetsResponse)
listPackageVersionAssetsResponse_namespace :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe Prelude.Text)
listPackageVersionAssetsResponse_namespace :: Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_namespace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe Text
namespace :: Maybe Text
$sel:namespace:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
namespace} -> Maybe Text
namespace) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe Text
a -> ListPackageVersionAssetsResponse
s {$sel:namespace:ListPackageVersionAssetsResponse' :: Maybe Text
namespace = Maybe Text
a} :: ListPackageVersionAssetsResponse)
listPackageVersionAssetsResponse_nextToken :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe Prelude.Text)
listPackageVersionAssetsResponse_nextToken :: Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe Text
a -> ListPackageVersionAssetsResponse
s {$sel:nextToken:ListPackageVersionAssetsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListPackageVersionAssetsResponse)
listPackageVersionAssetsResponse_package :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe Prelude.Text)
listPackageVersionAssetsResponse_package :: Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_package = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe Text
package :: Maybe Text
$sel:package:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
package} -> Maybe Text
package) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe Text
a -> ListPackageVersionAssetsResponse
s {$sel:package:ListPackageVersionAssetsResponse' :: Maybe Text
package = Maybe Text
a} :: ListPackageVersionAssetsResponse)
listPackageVersionAssetsResponse_version :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe Prelude.Text)
listPackageVersionAssetsResponse_version :: Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_version = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe Text
version :: Maybe Text
$sel:version:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
version} -> Maybe Text
version) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe Text
a -> ListPackageVersionAssetsResponse
s {$sel:version:ListPackageVersionAssetsResponse' :: Maybe Text
version = Maybe Text
a} :: ListPackageVersionAssetsResponse)
listPackageVersionAssetsResponse_versionRevision :: Lens.Lens' ListPackageVersionAssetsResponse (Prelude.Maybe Prelude.Text)
listPackageVersionAssetsResponse_versionRevision :: Lens' ListPackageVersionAssetsResponse (Maybe Text)
listPackageVersionAssetsResponse_versionRevision = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Maybe Text
versionRevision :: Maybe Text
$sel:versionRevision:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
versionRevision} -> Maybe Text
versionRevision) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Maybe Text
a -> ListPackageVersionAssetsResponse
s {$sel:versionRevision:ListPackageVersionAssetsResponse' :: Maybe Text
versionRevision = Maybe Text
a} :: ListPackageVersionAssetsResponse)
listPackageVersionAssetsResponse_httpStatus :: Lens.Lens' ListPackageVersionAssetsResponse Prelude.Int
listPackageVersionAssetsResponse_httpStatus :: Lens' ListPackageVersionAssetsResponse Int
listPackageVersionAssetsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPackageVersionAssetsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListPackageVersionAssetsResponse
s@ListPackageVersionAssetsResponse' {} Int
a -> ListPackageVersionAssetsResponse
s {$sel:httpStatus:ListPackageVersionAssetsResponse' :: Int
httpStatus = Int
a} :: ListPackageVersionAssetsResponse)
instance
Prelude.NFData
ListPackageVersionAssetsResponse
where
rnf :: ListPackageVersionAssetsResponse -> ()
rnf ListPackageVersionAssetsResponse' {Int
Maybe [AssetSummary]
Maybe Text
Maybe PackageFormat
httpStatus :: Int
versionRevision :: Maybe Text
version :: Maybe Text
package :: Maybe Text
nextToken :: Maybe Text
namespace :: Maybe Text
format :: Maybe PackageFormat
assets :: Maybe [AssetSummary]
$sel:httpStatus:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Int
$sel:versionRevision:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
$sel:version:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
$sel:package:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
$sel:nextToken:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
$sel:namespace:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe Text
$sel:format:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe PackageFormat
$sel:assets:ListPackageVersionAssetsResponse' :: ListPackageVersionAssetsResponse -> Maybe [AssetSummary]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [AssetSummary]
assets
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe PackageFormat
format
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
namespace
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 Text
package
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
version
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
versionRevision
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus