{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.CodeArtifact.Types.PackageSummary where
import Amazonka.CodeArtifact.Types.PackageFormat
import Amazonka.CodeArtifact.Types.PackageOriginConfiguration
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
data PackageSummary = PackageSummary'
{
PackageSummary -> Maybe PackageFormat
format :: Prelude.Maybe PackageFormat,
PackageSummary -> Maybe Text
namespace :: Prelude.Maybe Prelude.Text,
PackageSummary -> Maybe PackageOriginConfiguration
originConfiguration :: Prelude.Maybe PackageOriginConfiguration,
PackageSummary -> Maybe Text
package :: Prelude.Maybe Prelude.Text
}
deriving (PackageSummary -> PackageSummary -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PackageSummary -> PackageSummary -> Bool
$c/= :: PackageSummary -> PackageSummary -> Bool
== :: PackageSummary -> PackageSummary -> Bool
$c== :: PackageSummary -> PackageSummary -> Bool
Prelude.Eq, ReadPrec [PackageSummary]
ReadPrec PackageSummary
Int -> ReadS PackageSummary
ReadS [PackageSummary]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [PackageSummary]
$creadListPrec :: ReadPrec [PackageSummary]
readPrec :: ReadPrec PackageSummary
$creadPrec :: ReadPrec PackageSummary
readList :: ReadS [PackageSummary]
$creadList :: ReadS [PackageSummary]
readsPrec :: Int -> ReadS PackageSummary
$creadsPrec :: Int -> ReadS PackageSummary
Prelude.Read, Int -> PackageSummary -> ShowS
[PackageSummary] -> ShowS
PackageSummary -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PackageSummary] -> ShowS
$cshowList :: [PackageSummary] -> ShowS
show :: PackageSummary -> String
$cshow :: PackageSummary -> String
showsPrec :: Int -> PackageSummary -> ShowS
$cshowsPrec :: Int -> PackageSummary -> ShowS
Prelude.Show, forall x. Rep PackageSummary x -> PackageSummary
forall x. PackageSummary -> Rep PackageSummary x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PackageSummary x -> PackageSummary
$cfrom :: forall x. PackageSummary -> Rep PackageSummary x
Prelude.Generic)
newPackageSummary ::
PackageSummary
newPackageSummary :: PackageSummary
newPackageSummary =
PackageSummary'
{ $sel:format:PackageSummary' :: Maybe PackageFormat
format = forall a. Maybe a
Prelude.Nothing,
$sel:namespace:PackageSummary' :: Maybe Text
namespace = forall a. Maybe a
Prelude.Nothing,
$sel:originConfiguration:PackageSummary' :: Maybe PackageOriginConfiguration
originConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:package:PackageSummary' :: Maybe Text
package = forall a. Maybe a
Prelude.Nothing
}
packageSummary_format :: Lens.Lens' PackageSummary (Prelude.Maybe PackageFormat)
packageSummary_format :: Lens' PackageSummary (Maybe PackageFormat)
packageSummary_format = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PackageSummary' {Maybe PackageFormat
format :: Maybe PackageFormat
$sel:format:PackageSummary' :: PackageSummary -> Maybe PackageFormat
format} -> Maybe PackageFormat
format) (\s :: PackageSummary
s@PackageSummary' {} Maybe PackageFormat
a -> PackageSummary
s {$sel:format:PackageSummary' :: Maybe PackageFormat
format = Maybe PackageFormat
a} :: PackageSummary)
packageSummary_namespace :: Lens.Lens' PackageSummary (Prelude.Maybe Prelude.Text)
packageSummary_namespace :: Lens' PackageSummary (Maybe Text)
packageSummary_namespace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PackageSummary' {Maybe Text
namespace :: Maybe Text
$sel:namespace:PackageSummary' :: PackageSummary -> Maybe Text
namespace} -> Maybe Text
namespace) (\s :: PackageSummary
s@PackageSummary' {} Maybe Text
a -> PackageSummary
s {$sel:namespace:PackageSummary' :: Maybe Text
namespace = Maybe Text
a} :: PackageSummary)
packageSummary_originConfiguration :: Lens.Lens' PackageSummary (Prelude.Maybe PackageOriginConfiguration)
packageSummary_originConfiguration :: Lens' PackageSummary (Maybe PackageOriginConfiguration)
packageSummary_originConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PackageSummary' {Maybe PackageOriginConfiguration
originConfiguration :: Maybe PackageOriginConfiguration
$sel:originConfiguration:PackageSummary' :: PackageSummary -> Maybe PackageOriginConfiguration
originConfiguration} -> Maybe PackageOriginConfiguration
originConfiguration) (\s :: PackageSummary
s@PackageSummary' {} Maybe PackageOriginConfiguration
a -> PackageSummary
s {$sel:originConfiguration:PackageSummary' :: Maybe PackageOriginConfiguration
originConfiguration = Maybe PackageOriginConfiguration
a} :: PackageSummary)
packageSummary_package :: Lens.Lens' PackageSummary (Prelude.Maybe Prelude.Text)
packageSummary_package :: Lens' PackageSummary (Maybe Text)
packageSummary_package = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PackageSummary' {Maybe Text
package :: Maybe Text
$sel:package:PackageSummary' :: PackageSummary -> Maybe Text
package} -> Maybe Text
package) (\s :: PackageSummary
s@PackageSummary' {} Maybe Text
a -> PackageSummary
s {$sel:package:PackageSummary' :: Maybe Text
package = Maybe Text
a} :: PackageSummary)
instance Data.FromJSON PackageSummary where
parseJSON :: Value -> Parser PackageSummary
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"PackageSummary"
( \Object
x ->
Maybe PackageFormat
-> Maybe Text
-> Maybe PackageOriginConfiguration
-> Maybe Text
-> PackageSummary
PackageSummary'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (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 -> Parser (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 -> Parser (Maybe a)
Data..:? Key
"originConfiguration")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"package")
)
instance Prelude.Hashable PackageSummary where
hashWithSalt :: Int -> PackageSummary -> Int
hashWithSalt Int
_salt PackageSummary' {Maybe Text
Maybe PackageFormat
Maybe PackageOriginConfiguration
package :: Maybe Text
originConfiguration :: Maybe PackageOriginConfiguration
namespace :: Maybe Text
format :: Maybe PackageFormat
$sel:package:PackageSummary' :: PackageSummary -> Maybe Text
$sel:originConfiguration:PackageSummary' :: PackageSummary -> Maybe PackageOriginConfiguration
$sel:namespace:PackageSummary' :: PackageSummary -> Maybe Text
$sel:format:PackageSummary' :: PackageSummary -> Maybe PackageFormat
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe PackageFormat
format
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
namespace
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe PackageOriginConfiguration
originConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
package
instance Prelude.NFData PackageSummary where
rnf :: PackageSummary -> ()
rnf PackageSummary' {Maybe Text
Maybe PackageFormat
Maybe PackageOriginConfiguration
package :: Maybe Text
originConfiguration :: Maybe PackageOriginConfiguration
namespace :: Maybe Text
format :: Maybe PackageFormat
$sel:package:PackageSummary' :: PackageSummary -> Maybe Text
$sel:originConfiguration:PackageSummary' :: PackageSummary -> Maybe PackageOriginConfiguration
$sel:namespace:PackageSummary' :: PackageSummary -> Maybe Text
$sel:format:PackageSummary' :: PackageSummary -> Maybe PackageFormat
..} =
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 PackageOriginConfiguration
originConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
package