{-# 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.Snowball.Types.JobMetadata where
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 Amazonka.Snowball.Types.DataTransfer
import Amazonka.Snowball.Types.DeviceConfiguration
import Amazonka.Snowball.Types.JobLogs
import Amazonka.Snowball.Types.JobResource
import Amazonka.Snowball.Types.JobState
import Amazonka.Snowball.Types.JobType
import Amazonka.Snowball.Types.Notification
import Amazonka.Snowball.Types.OnDeviceServiceConfiguration
import Amazonka.Snowball.Types.RemoteManagement
import Amazonka.Snowball.Types.ShippingDetails
import Amazonka.Snowball.Types.SnowballCapacity
import Amazonka.Snowball.Types.SnowballType
import Amazonka.Snowball.Types.TaxDocuments
data JobMetadata = JobMetadata'
{
JobMetadata -> Maybe Text
addressId :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe Text
clusterId :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe POSIX
creationDate :: Prelude.Maybe Data.POSIX,
JobMetadata -> Maybe DataTransfer
dataTransferProgress :: Prelude.Maybe DataTransfer,
JobMetadata -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe DeviceConfiguration
deviceConfiguration :: Prelude.Maybe DeviceConfiguration,
JobMetadata -> Maybe Text
forwardingAddressId :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe Text
jobId :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe JobLogs
jobLogInfo :: Prelude.Maybe JobLogs,
JobMetadata -> Maybe JobState
jobState :: Prelude.Maybe JobState,
JobMetadata -> Maybe JobType
jobType :: Prelude.Maybe JobType,
JobMetadata -> Maybe Text
kmsKeyARN :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe Text
longTermPricingId :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe Notification
notification :: Prelude.Maybe Notification,
JobMetadata -> Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration :: Prelude.Maybe OnDeviceServiceConfiguration,
JobMetadata -> Maybe RemoteManagement
remoteManagement :: Prelude.Maybe RemoteManagement,
JobMetadata -> Maybe JobResource
resources :: Prelude.Maybe JobResource,
JobMetadata -> Maybe Text
roleARN :: Prelude.Maybe Prelude.Text,
JobMetadata -> Maybe ShippingDetails
shippingDetails :: Prelude.Maybe ShippingDetails,
JobMetadata -> Maybe SnowballCapacity
snowballCapacityPreference :: Prelude.Maybe SnowballCapacity,
JobMetadata -> Maybe SnowballType
snowballType :: Prelude.Maybe SnowballType,
JobMetadata -> Maybe TaxDocuments
taxDocuments :: Prelude.Maybe TaxDocuments
}
deriving (JobMetadata -> JobMetadata -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: JobMetadata -> JobMetadata -> Bool
$c/= :: JobMetadata -> JobMetadata -> Bool
== :: JobMetadata -> JobMetadata -> Bool
$c== :: JobMetadata -> JobMetadata -> Bool
Prelude.Eq, ReadPrec [JobMetadata]
ReadPrec JobMetadata
Int -> ReadS JobMetadata
ReadS [JobMetadata]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [JobMetadata]
$creadListPrec :: ReadPrec [JobMetadata]
readPrec :: ReadPrec JobMetadata
$creadPrec :: ReadPrec JobMetadata
readList :: ReadS [JobMetadata]
$creadList :: ReadS [JobMetadata]
readsPrec :: Int -> ReadS JobMetadata
$creadsPrec :: Int -> ReadS JobMetadata
Prelude.Read, Int -> JobMetadata -> ShowS
[JobMetadata] -> ShowS
JobMetadata -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [JobMetadata] -> ShowS
$cshowList :: [JobMetadata] -> ShowS
show :: JobMetadata -> String
$cshow :: JobMetadata -> String
showsPrec :: Int -> JobMetadata -> ShowS
$cshowsPrec :: Int -> JobMetadata -> ShowS
Prelude.Show, forall x. Rep JobMetadata x -> JobMetadata
forall x. JobMetadata -> Rep JobMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep JobMetadata x -> JobMetadata
$cfrom :: forall x. JobMetadata -> Rep JobMetadata x
Prelude.Generic)
newJobMetadata ::
JobMetadata
newJobMetadata :: JobMetadata
newJobMetadata =
JobMetadata'
{ $sel:addressId:JobMetadata' :: Maybe Text
addressId = forall a. Maybe a
Prelude.Nothing,
$sel:clusterId:JobMetadata' :: Maybe Text
clusterId = forall a. Maybe a
Prelude.Nothing,
$sel:creationDate:JobMetadata' :: Maybe POSIX
creationDate = forall a. Maybe a
Prelude.Nothing,
$sel:dataTransferProgress:JobMetadata' :: Maybe DataTransfer
dataTransferProgress = forall a. Maybe a
Prelude.Nothing,
$sel:description:JobMetadata' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:deviceConfiguration:JobMetadata' :: Maybe DeviceConfiguration
deviceConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:forwardingAddressId:JobMetadata' :: Maybe Text
forwardingAddressId = forall a. Maybe a
Prelude.Nothing,
$sel:jobId:JobMetadata' :: Maybe Text
jobId = forall a. Maybe a
Prelude.Nothing,
$sel:jobLogInfo:JobMetadata' :: Maybe JobLogs
jobLogInfo = forall a. Maybe a
Prelude.Nothing,
$sel:jobState:JobMetadata' :: Maybe JobState
jobState = forall a. Maybe a
Prelude.Nothing,
$sel:jobType:JobMetadata' :: Maybe JobType
jobType = forall a. Maybe a
Prelude.Nothing,
$sel:kmsKeyARN:JobMetadata' :: Maybe Text
kmsKeyARN = forall a. Maybe a
Prelude.Nothing,
$sel:longTermPricingId:JobMetadata' :: Maybe Text
longTermPricingId = forall a. Maybe a
Prelude.Nothing,
$sel:notification:JobMetadata' :: Maybe Notification
notification = forall a. Maybe a
Prelude.Nothing,
$sel:onDeviceServiceConfiguration:JobMetadata' :: Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:remoteManagement:JobMetadata' :: Maybe RemoteManagement
remoteManagement = forall a. Maybe a
Prelude.Nothing,
$sel:resources:JobMetadata' :: Maybe JobResource
resources = forall a. Maybe a
Prelude.Nothing,
$sel:roleARN:JobMetadata' :: Maybe Text
roleARN = forall a. Maybe a
Prelude.Nothing,
$sel:shippingDetails:JobMetadata' :: Maybe ShippingDetails
shippingDetails = forall a. Maybe a
Prelude.Nothing,
$sel:snowballCapacityPreference:JobMetadata' :: Maybe SnowballCapacity
snowballCapacityPreference = forall a. Maybe a
Prelude.Nothing,
$sel:snowballType:JobMetadata' :: Maybe SnowballType
snowballType = forall a. Maybe a
Prelude.Nothing,
$sel:taxDocuments:JobMetadata' :: Maybe TaxDocuments
taxDocuments = forall a. Maybe a
Prelude.Nothing
}
jobMetadata_addressId :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_addressId :: Lens' JobMetadata (Maybe Text)
jobMetadata_addressId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
addressId :: Maybe Text
$sel:addressId:JobMetadata' :: JobMetadata -> Maybe Text
addressId} -> Maybe Text
addressId) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:addressId:JobMetadata' :: Maybe Text
addressId = Maybe Text
a} :: JobMetadata)
jobMetadata_clusterId :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_clusterId :: Lens' JobMetadata (Maybe Text)
jobMetadata_clusterId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
clusterId :: Maybe Text
$sel:clusterId:JobMetadata' :: JobMetadata -> Maybe Text
clusterId} -> Maybe Text
clusterId) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:clusterId:JobMetadata' :: Maybe Text
clusterId = Maybe Text
a} :: JobMetadata)
jobMetadata_creationDate :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.UTCTime)
jobMetadata_creationDate :: Lens' JobMetadata (Maybe UTCTime)
jobMetadata_creationDate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe POSIX
creationDate :: Maybe POSIX
$sel:creationDate:JobMetadata' :: JobMetadata -> Maybe POSIX
creationDate} -> Maybe POSIX
creationDate) (\s :: JobMetadata
s@JobMetadata' {} Maybe POSIX
a -> JobMetadata
s {$sel:creationDate:JobMetadata' :: Maybe POSIX
creationDate = Maybe POSIX
a} :: JobMetadata) 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
jobMetadata_dataTransferProgress :: Lens.Lens' JobMetadata (Prelude.Maybe DataTransfer)
jobMetadata_dataTransferProgress :: Lens' JobMetadata (Maybe DataTransfer)
jobMetadata_dataTransferProgress = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe DataTransfer
dataTransferProgress :: Maybe DataTransfer
$sel:dataTransferProgress:JobMetadata' :: JobMetadata -> Maybe DataTransfer
dataTransferProgress} -> Maybe DataTransfer
dataTransferProgress) (\s :: JobMetadata
s@JobMetadata' {} Maybe DataTransfer
a -> JobMetadata
s {$sel:dataTransferProgress:JobMetadata' :: Maybe DataTransfer
dataTransferProgress = Maybe DataTransfer
a} :: JobMetadata)
jobMetadata_description :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_description :: Lens' JobMetadata (Maybe Text)
jobMetadata_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
description :: Maybe Text
$sel:description:JobMetadata' :: JobMetadata -> Maybe Text
description} -> Maybe Text
description) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:description:JobMetadata' :: Maybe Text
description = Maybe Text
a} :: JobMetadata)
jobMetadata_deviceConfiguration :: Lens.Lens' JobMetadata (Prelude.Maybe DeviceConfiguration)
jobMetadata_deviceConfiguration :: Lens' JobMetadata (Maybe DeviceConfiguration)
jobMetadata_deviceConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe DeviceConfiguration
deviceConfiguration :: Maybe DeviceConfiguration
$sel:deviceConfiguration:JobMetadata' :: JobMetadata -> Maybe DeviceConfiguration
deviceConfiguration} -> Maybe DeviceConfiguration
deviceConfiguration) (\s :: JobMetadata
s@JobMetadata' {} Maybe DeviceConfiguration
a -> JobMetadata
s {$sel:deviceConfiguration:JobMetadata' :: Maybe DeviceConfiguration
deviceConfiguration = Maybe DeviceConfiguration
a} :: JobMetadata)
jobMetadata_forwardingAddressId :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_forwardingAddressId :: Lens' JobMetadata (Maybe Text)
jobMetadata_forwardingAddressId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
forwardingAddressId :: Maybe Text
$sel:forwardingAddressId:JobMetadata' :: JobMetadata -> Maybe Text
forwardingAddressId} -> Maybe Text
forwardingAddressId) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:forwardingAddressId:JobMetadata' :: Maybe Text
forwardingAddressId = Maybe Text
a} :: JobMetadata)
jobMetadata_jobId :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_jobId :: Lens' JobMetadata (Maybe Text)
jobMetadata_jobId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
jobId :: Maybe Text
$sel:jobId:JobMetadata' :: JobMetadata -> Maybe Text
jobId} -> Maybe Text
jobId) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:jobId:JobMetadata' :: Maybe Text
jobId = Maybe Text
a} :: JobMetadata)
jobMetadata_jobLogInfo :: Lens.Lens' JobMetadata (Prelude.Maybe JobLogs)
jobMetadata_jobLogInfo :: Lens' JobMetadata (Maybe JobLogs)
jobMetadata_jobLogInfo = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe JobLogs
jobLogInfo :: Maybe JobLogs
$sel:jobLogInfo:JobMetadata' :: JobMetadata -> Maybe JobLogs
jobLogInfo} -> Maybe JobLogs
jobLogInfo) (\s :: JobMetadata
s@JobMetadata' {} Maybe JobLogs
a -> JobMetadata
s {$sel:jobLogInfo:JobMetadata' :: Maybe JobLogs
jobLogInfo = Maybe JobLogs
a} :: JobMetadata)
jobMetadata_jobState :: Lens.Lens' JobMetadata (Prelude.Maybe JobState)
jobMetadata_jobState :: Lens' JobMetadata (Maybe JobState)
jobMetadata_jobState = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe JobState
jobState :: Maybe JobState
$sel:jobState:JobMetadata' :: JobMetadata -> Maybe JobState
jobState} -> Maybe JobState
jobState) (\s :: JobMetadata
s@JobMetadata' {} Maybe JobState
a -> JobMetadata
s {$sel:jobState:JobMetadata' :: Maybe JobState
jobState = Maybe JobState
a} :: JobMetadata)
jobMetadata_jobType :: Lens.Lens' JobMetadata (Prelude.Maybe JobType)
jobMetadata_jobType :: Lens' JobMetadata (Maybe JobType)
jobMetadata_jobType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe JobType
jobType :: Maybe JobType
$sel:jobType:JobMetadata' :: JobMetadata -> Maybe JobType
jobType} -> Maybe JobType
jobType) (\s :: JobMetadata
s@JobMetadata' {} Maybe JobType
a -> JobMetadata
s {$sel:jobType:JobMetadata' :: Maybe JobType
jobType = Maybe JobType
a} :: JobMetadata)
jobMetadata_kmsKeyARN :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_kmsKeyARN :: Lens' JobMetadata (Maybe Text)
jobMetadata_kmsKeyARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
kmsKeyARN :: Maybe Text
$sel:kmsKeyARN:JobMetadata' :: JobMetadata -> Maybe Text
kmsKeyARN} -> Maybe Text
kmsKeyARN) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:kmsKeyARN:JobMetadata' :: Maybe Text
kmsKeyARN = Maybe Text
a} :: JobMetadata)
jobMetadata_longTermPricingId :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_longTermPricingId :: Lens' JobMetadata (Maybe Text)
jobMetadata_longTermPricingId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
longTermPricingId :: Maybe Text
$sel:longTermPricingId:JobMetadata' :: JobMetadata -> Maybe Text
longTermPricingId} -> Maybe Text
longTermPricingId) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:longTermPricingId:JobMetadata' :: Maybe Text
longTermPricingId = Maybe Text
a} :: JobMetadata)
jobMetadata_notification :: Lens.Lens' JobMetadata (Prelude.Maybe Notification)
jobMetadata_notification :: Lens' JobMetadata (Maybe Notification)
jobMetadata_notification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Notification
notification :: Maybe Notification
$sel:notification:JobMetadata' :: JobMetadata -> Maybe Notification
notification} -> Maybe Notification
notification) (\s :: JobMetadata
s@JobMetadata' {} Maybe Notification
a -> JobMetadata
s {$sel:notification:JobMetadata' :: Maybe Notification
notification = Maybe Notification
a} :: JobMetadata)
jobMetadata_onDeviceServiceConfiguration :: Lens.Lens' JobMetadata (Prelude.Maybe OnDeviceServiceConfiguration)
jobMetadata_onDeviceServiceConfiguration :: Lens' JobMetadata (Maybe OnDeviceServiceConfiguration)
jobMetadata_onDeviceServiceConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration :: Maybe OnDeviceServiceConfiguration
$sel:onDeviceServiceConfiguration:JobMetadata' :: JobMetadata -> Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration} -> Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration) (\s :: JobMetadata
s@JobMetadata' {} Maybe OnDeviceServiceConfiguration
a -> JobMetadata
s {$sel:onDeviceServiceConfiguration:JobMetadata' :: Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration = Maybe OnDeviceServiceConfiguration
a} :: JobMetadata)
jobMetadata_remoteManagement :: Lens.Lens' JobMetadata (Prelude.Maybe RemoteManagement)
jobMetadata_remoteManagement :: Lens' JobMetadata (Maybe RemoteManagement)
jobMetadata_remoteManagement = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe RemoteManagement
remoteManagement :: Maybe RemoteManagement
$sel:remoteManagement:JobMetadata' :: JobMetadata -> Maybe RemoteManagement
remoteManagement} -> Maybe RemoteManagement
remoteManagement) (\s :: JobMetadata
s@JobMetadata' {} Maybe RemoteManagement
a -> JobMetadata
s {$sel:remoteManagement:JobMetadata' :: Maybe RemoteManagement
remoteManagement = Maybe RemoteManagement
a} :: JobMetadata)
jobMetadata_resources :: Lens.Lens' JobMetadata (Prelude.Maybe JobResource)
jobMetadata_resources :: Lens' JobMetadata (Maybe JobResource)
jobMetadata_resources = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe JobResource
resources :: Maybe JobResource
$sel:resources:JobMetadata' :: JobMetadata -> Maybe JobResource
resources} -> Maybe JobResource
resources) (\s :: JobMetadata
s@JobMetadata' {} Maybe JobResource
a -> JobMetadata
s {$sel:resources:JobMetadata' :: Maybe JobResource
resources = Maybe JobResource
a} :: JobMetadata)
jobMetadata_roleARN :: Lens.Lens' JobMetadata (Prelude.Maybe Prelude.Text)
jobMetadata_roleARN :: Lens' JobMetadata (Maybe Text)
jobMetadata_roleARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe Text
roleARN :: Maybe Text
$sel:roleARN:JobMetadata' :: JobMetadata -> Maybe Text
roleARN} -> Maybe Text
roleARN) (\s :: JobMetadata
s@JobMetadata' {} Maybe Text
a -> JobMetadata
s {$sel:roleARN:JobMetadata' :: Maybe Text
roleARN = Maybe Text
a} :: JobMetadata)
jobMetadata_shippingDetails :: Lens.Lens' JobMetadata (Prelude.Maybe ShippingDetails)
jobMetadata_shippingDetails :: Lens' JobMetadata (Maybe ShippingDetails)
jobMetadata_shippingDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe ShippingDetails
shippingDetails :: Maybe ShippingDetails
$sel:shippingDetails:JobMetadata' :: JobMetadata -> Maybe ShippingDetails
shippingDetails} -> Maybe ShippingDetails
shippingDetails) (\s :: JobMetadata
s@JobMetadata' {} Maybe ShippingDetails
a -> JobMetadata
s {$sel:shippingDetails:JobMetadata' :: Maybe ShippingDetails
shippingDetails = Maybe ShippingDetails
a} :: JobMetadata)
jobMetadata_snowballCapacityPreference :: Lens.Lens' JobMetadata (Prelude.Maybe SnowballCapacity)
jobMetadata_snowballCapacityPreference :: Lens' JobMetadata (Maybe SnowballCapacity)
jobMetadata_snowballCapacityPreference = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe SnowballCapacity
snowballCapacityPreference :: Maybe SnowballCapacity
$sel:snowballCapacityPreference:JobMetadata' :: JobMetadata -> Maybe SnowballCapacity
snowballCapacityPreference} -> Maybe SnowballCapacity
snowballCapacityPreference) (\s :: JobMetadata
s@JobMetadata' {} Maybe SnowballCapacity
a -> JobMetadata
s {$sel:snowballCapacityPreference:JobMetadata' :: Maybe SnowballCapacity
snowballCapacityPreference = Maybe SnowballCapacity
a} :: JobMetadata)
jobMetadata_snowballType :: Lens.Lens' JobMetadata (Prelude.Maybe SnowballType)
jobMetadata_snowballType :: Lens' JobMetadata (Maybe SnowballType)
jobMetadata_snowballType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe SnowballType
snowballType :: Maybe SnowballType
$sel:snowballType:JobMetadata' :: JobMetadata -> Maybe SnowballType
snowballType} -> Maybe SnowballType
snowballType) (\s :: JobMetadata
s@JobMetadata' {} Maybe SnowballType
a -> JobMetadata
s {$sel:snowballType:JobMetadata' :: Maybe SnowballType
snowballType = Maybe SnowballType
a} :: JobMetadata)
jobMetadata_taxDocuments :: Lens.Lens' JobMetadata (Prelude.Maybe TaxDocuments)
jobMetadata_taxDocuments :: Lens' JobMetadata (Maybe TaxDocuments)
jobMetadata_taxDocuments = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobMetadata' {Maybe TaxDocuments
taxDocuments :: Maybe TaxDocuments
$sel:taxDocuments:JobMetadata' :: JobMetadata -> Maybe TaxDocuments
taxDocuments} -> Maybe TaxDocuments
taxDocuments) (\s :: JobMetadata
s@JobMetadata' {} Maybe TaxDocuments
a -> JobMetadata
s {$sel:taxDocuments:JobMetadata' :: Maybe TaxDocuments
taxDocuments = Maybe TaxDocuments
a} :: JobMetadata)
instance Data.FromJSON JobMetadata where
parseJSON :: Value -> Parser JobMetadata
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"JobMetadata"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe DataTransfer
-> Maybe Text
-> Maybe DeviceConfiguration
-> Maybe Text
-> Maybe Text
-> Maybe JobLogs
-> Maybe JobState
-> Maybe JobType
-> Maybe Text
-> Maybe Text
-> Maybe Notification
-> Maybe OnDeviceServiceConfiguration
-> Maybe RemoteManagement
-> Maybe JobResource
-> Maybe Text
-> Maybe ShippingDetails
-> Maybe SnowballCapacity
-> Maybe SnowballType
-> Maybe TaxDocuments
-> JobMetadata
JobMetadata'
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
"AddressId")
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
"ClusterId")
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
"CreationDate")
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
"DataTransferProgress")
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
"Description")
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
"DeviceConfiguration")
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
"ForwardingAddressId")
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
"JobId")
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
"JobLogInfo")
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
"JobState")
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
"JobType")
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
"KmsKeyARN")
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
"LongTermPricingId")
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
"Notification")
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
"OnDeviceServiceConfiguration")
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
"RemoteManagement")
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
"Resources")
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
"RoleARN")
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
"ShippingDetails")
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
"SnowballCapacityPreference")
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
"SnowballType")
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
"TaxDocuments")
)
instance Prelude.Hashable JobMetadata where
hashWithSalt :: Int -> JobMetadata -> Int
hashWithSalt Int
_salt JobMetadata' {Maybe Text
Maybe POSIX
Maybe DataTransfer
Maybe JobLogs
Maybe JobState
Maybe JobType
Maybe Notification
Maybe RemoteManagement
Maybe ShippingDetails
Maybe SnowballCapacity
Maybe SnowballType
Maybe OnDeviceServiceConfiguration
Maybe TaxDocuments
Maybe JobResource
Maybe DeviceConfiguration
taxDocuments :: Maybe TaxDocuments
snowballType :: Maybe SnowballType
snowballCapacityPreference :: Maybe SnowballCapacity
shippingDetails :: Maybe ShippingDetails
roleARN :: Maybe Text
resources :: Maybe JobResource
remoteManagement :: Maybe RemoteManagement
onDeviceServiceConfiguration :: Maybe OnDeviceServiceConfiguration
notification :: Maybe Notification
longTermPricingId :: Maybe Text
kmsKeyARN :: Maybe Text
jobType :: Maybe JobType
jobState :: Maybe JobState
jobLogInfo :: Maybe JobLogs
jobId :: Maybe Text
forwardingAddressId :: Maybe Text
deviceConfiguration :: Maybe DeviceConfiguration
description :: Maybe Text
dataTransferProgress :: Maybe DataTransfer
creationDate :: Maybe POSIX
clusterId :: Maybe Text
addressId :: Maybe Text
$sel:taxDocuments:JobMetadata' :: JobMetadata -> Maybe TaxDocuments
$sel:snowballType:JobMetadata' :: JobMetadata -> Maybe SnowballType
$sel:snowballCapacityPreference:JobMetadata' :: JobMetadata -> Maybe SnowballCapacity
$sel:shippingDetails:JobMetadata' :: JobMetadata -> Maybe ShippingDetails
$sel:roleARN:JobMetadata' :: JobMetadata -> Maybe Text
$sel:resources:JobMetadata' :: JobMetadata -> Maybe JobResource
$sel:remoteManagement:JobMetadata' :: JobMetadata -> Maybe RemoteManagement
$sel:onDeviceServiceConfiguration:JobMetadata' :: JobMetadata -> Maybe OnDeviceServiceConfiguration
$sel:notification:JobMetadata' :: JobMetadata -> Maybe Notification
$sel:longTermPricingId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:kmsKeyARN:JobMetadata' :: JobMetadata -> Maybe Text
$sel:jobType:JobMetadata' :: JobMetadata -> Maybe JobType
$sel:jobState:JobMetadata' :: JobMetadata -> Maybe JobState
$sel:jobLogInfo:JobMetadata' :: JobMetadata -> Maybe JobLogs
$sel:jobId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:forwardingAddressId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:deviceConfiguration:JobMetadata' :: JobMetadata -> Maybe DeviceConfiguration
$sel:description:JobMetadata' :: JobMetadata -> Maybe Text
$sel:dataTransferProgress:JobMetadata' :: JobMetadata -> Maybe DataTransfer
$sel:creationDate:JobMetadata' :: JobMetadata -> Maybe POSIX
$sel:clusterId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:addressId:JobMetadata' :: JobMetadata -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
addressId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
clusterId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
creationDate
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DataTransfer
dataTransferProgress
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DeviceConfiguration
deviceConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
forwardingAddressId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
jobId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe JobLogs
jobLogInfo
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe JobState
jobState
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe JobType
jobType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
kmsKeyARN
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
longTermPricingId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Notification
notification
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RemoteManagement
remoteManagement
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe JobResource
resources
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
roleARN
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ShippingDetails
shippingDetails
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SnowballCapacity
snowballCapacityPreference
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SnowballType
snowballType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TaxDocuments
taxDocuments
instance Prelude.NFData JobMetadata where
rnf :: JobMetadata -> ()
rnf JobMetadata' {Maybe Text
Maybe POSIX
Maybe DataTransfer
Maybe JobLogs
Maybe JobState
Maybe JobType
Maybe Notification
Maybe RemoteManagement
Maybe ShippingDetails
Maybe SnowballCapacity
Maybe SnowballType
Maybe OnDeviceServiceConfiguration
Maybe TaxDocuments
Maybe JobResource
Maybe DeviceConfiguration
taxDocuments :: Maybe TaxDocuments
snowballType :: Maybe SnowballType
snowballCapacityPreference :: Maybe SnowballCapacity
shippingDetails :: Maybe ShippingDetails
roleARN :: Maybe Text
resources :: Maybe JobResource
remoteManagement :: Maybe RemoteManagement
onDeviceServiceConfiguration :: Maybe OnDeviceServiceConfiguration
notification :: Maybe Notification
longTermPricingId :: Maybe Text
kmsKeyARN :: Maybe Text
jobType :: Maybe JobType
jobState :: Maybe JobState
jobLogInfo :: Maybe JobLogs
jobId :: Maybe Text
forwardingAddressId :: Maybe Text
deviceConfiguration :: Maybe DeviceConfiguration
description :: Maybe Text
dataTransferProgress :: Maybe DataTransfer
creationDate :: Maybe POSIX
clusterId :: Maybe Text
addressId :: Maybe Text
$sel:taxDocuments:JobMetadata' :: JobMetadata -> Maybe TaxDocuments
$sel:snowballType:JobMetadata' :: JobMetadata -> Maybe SnowballType
$sel:snowballCapacityPreference:JobMetadata' :: JobMetadata -> Maybe SnowballCapacity
$sel:shippingDetails:JobMetadata' :: JobMetadata -> Maybe ShippingDetails
$sel:roleARN:JobMetadata' :: JobMetadata -> Maybe Text
$sel:resources:JobMetadata' :: JobMetadata -> Maybe JobResource
$sel:remoteManagement:JobMetadata' :: JobMetadata -> Maybe RemoteManagement
$sel:onDeviceServiceConfiguration:JobMetadata' :: JobMetadata -> Maybe OnDeviceServiceConfiguration
$sel:notification:JobMetadata' :: JobMetadata -> Maybe Notification
$sel:longTermPricingId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:kmsKeyARN:JobMetadata' :: JobMetadata -> Maybe Text
$sel:jobType:JobMetadata' :: JobMetadata -> Maybe JobType
$sel:jobState:JobMetadata' :: JobMetadata -> Maybe JobState
$sel:jobLogInfo:JobMetadata' :: JobMetadata -> Maybe JobLogs
$sel:jobId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:forwardingAddressId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:deviceConfiguration:JobMetadata' :: JobMetadata -> Maybe DeviceConfiguration
$sel:description:JobMetadata' :: JobMetadata -> Maybe Text
$sel:dataTransferProgress:JobMetadata' :: JobMetadata -> Maybe DataTransfer
$sel:creationDate:JobMetadata' :: JobMetadata -> Maybe POSIX
$sel:clusterId:JobMetadata' :: JobMetadata -> Maybe Text
$sel:addressId:JobMetadata' :: JobMetadata -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
addressId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
clusterId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
creationDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DataTransfer
dataTransferProgress
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DeviceConfiguration
deviceConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
forwardingAddressId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
jobId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe JobLogs
jobLogInfo
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe JobState
jobState
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe JobType
jobType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
kmsKeyARN
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
longTermPricingId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Notification
notification
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe OnDeviceServiceConfiguration
onDeviceServiceConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RemoteManagement
remoteManagement
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe JobResource
resources
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
roleARN
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ShippingDetails
shippingDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe SnowballCapacity
snowballCapacityPreference
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SnowballType
snowballType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TaxDocuments
taxDocuments