{-# 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.FSx.Types.CreateFileSystemLustreConfiguration where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.FSx.Types.AutoImportPolicyType
import Amazonka.FSx.Types.DataCompressionType
import Amazonka.FSx.Types.DriveCacheType
import Amazonka.FSx.Types.LustreDeploymentType
import Amazonka.FSx.Types.LustreLogCreateConfiguration
import Amazonka.FSx.Types.LustreRootSquashConfiguration
import qualified Amazonka.Prelude as Prelude
data CreateFileSystemLustreConfiguration = CreateFileSystemLustreConfiguration'
{
CreateFileSystemLustreConfiguration -> Maybe AutoImportPolicyType
autoImportPolicy :: Prelude.Maybe AutoImportPolicyType,
CreateFileSystemLustreConfiguration -> Maybe Natural
automaticBackupRetentionDays :: Prelude.Maybe Prelude.Natural,
CreateFileSystemLustreConfiguration -> Maybe Bool
copyTagsToBackups :: Prelude.Maybe Prelude.Bool,
CreateFileSystemLustreConfiguration -> Maybe Text
dailyAutomaticBackupStartTime :: Prelude.Maybe Prelude.Text,
CreateFileSystemLustreConfiguration -> Maybe DataCompressionType
dataCompressionType :: Prelude.Maybe DataCompressionType,
CreateFileSystemLustreConfiguration -> Maybe LustreDeploymentType
deploymentType :: Prelude.Maybe LustreDeploymentType,
CreateFileSystemLustreConfiguration -> Maybe DriveCacheType
driveCacheType :: Prelude.Maybe DriveCacheType,
CreateFileSystemLustreConfiguration -> Maybe Text
exportPath :: Prelude.Maybe Prelude.Text,
CreateFileSystemLustreConfiguration -> Maybe Text
importPath :: Prelude.Maybe Prelude.Text,
CreateFileSystemLustreConfiguration -> Maybe Natural
importedFileChunkSize :: Prelude.Maybe Prelude.Natural,
CreateFileSystemLustreConfiguration
-> Maybe LustreLogCreateConfiguration
logConfiguration :: Prelude.Maybe LustreLogCreateConfiguration,
CreateFileSystemLustreConfiguration -> Maybe Natural
perUnitStorageThroughput :: Prelude.Maybe Prelude.Natural,
CreateFileSystemLustreConfiguration
-> Maybe LustreRootSquashConfiguration
rootSquashConfiguration :: Prelude.Maybe LustreRootSquashConfiguration,
CreateFileSystemLustreConfiguration -> Maybe Text
weeklyMaintenanceStartTime :: Prelude.Maybe Prelude.Text
}
deriving (CreateFileSystemLustreConfiguration
-> CreateFileSystemLustreConfiguration -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateFileSystemLustreConfiguration
-> CreateFileSystemLustreConfiguration -> Bool
$c/= :: CreateFileSystemLustreConfiguration
-> CreateFileSystemLustreConfiguration -> Bool
== :: CreateFileSystemLustreConfiguration
-> CreateFileSystemLustreConfiguration -> Bool
$c== :: CreateFileSystemLustreConfiguration
-> CreateFileSystemLustreConfiguration -> Bool
Prelude.Eq, ReadPrec [CreateFileSystemLustreConfiguration]
ReadPrec CreateFileSystemLustreConfiguration
Int -> ReadS CreateFileSystemLustreConfiguration
ReadS [CreateFileSystemLustreConfiguration]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateFileSystemLustreConfiguration]
$creadListPrec :: ReadPrec [CreateFileSystemLustreConfiguration]
readPrec :: ReadPrec CreateFileSystemLustreConfiguration
$creadPrec :: ReadPrec CreateFileSystemLustreConfiguration
readList :: ReadS [CreateFileSystemLustreConfiguration]
$creadList :: ReadS [CreateFileSystemLustreConfiguration]
readsPrec :: Int -> ReadS CreateFileSystemLustreConfiguration
$creadsPrec :: Int -> ReadS CreateFileSystemLustreConfiguration
Prelude.Read, Int -> CreateFileSystemLustreConfiguration -> ShowS
[CreateFileSystemLustreConfiguration] -> ShowS
CreateFileSystemLustreConfiguration -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateFileSystemLustreConfiguration] -> ShowS
$cshowList :: [CreateFileSystemLustreConfiguration] -> ShowS
show :: CreateFileSystemLustreConfiguration -> String
$cshow :: CreateFileSystemLustreConfiguration -> String
showsPrec :: Int -> CreateFileSystemLustreConfiguration -> ShowS
$cshowsPrec :: Int -> CreateFileSystemLustreConfiguration -> ShowS
Prelude.Show, forall x.
Rep CreateFileSystemLustreConfiguration x
-> CreateFileSystemLustreConfiguration
forall x.
CreateFileSystemLustreConfiguration
-> Rep CreateFileSystemLustreConfiguration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateFileSystemLustreConfiguration x
-> CreateFileSystemLustreConfiguration
$cfrom :: forall x.
CreateFileSystemLustreConfiguration
-> Rep CreateFileSystemLustreConfiguration x
Prelude.Generic)
newCreateFileSystemLustreConfiguration ::
CreateFileSystemLustreConfiguration
newCreateFileSystemLustreConfiguration :: CreateFileSystemLustreConfiguration
newCreateFileSystemLustreConfiguration =
CreateFileSystemLustreConfiguration'
{ $sel:autoImportPolicy:CreateFileSystemLustreConfiguration' :: Maybe AutoImportPolicyType
autoImportPolicy =
forall a. Maybe a
Prelude.Nothing,
$sel:automaticBackupRetentionDays:CreateFileSystemLustreConfiguration' :: Maybe Natural
automaticBackupRetentionDays =
forall a. Maybe a
Prelude.Nothing,
$sel:copyTagsToBackups:CreateFileSystemLustreConfiguration' :: Maybe Bool
copyTagsToBackups = forall a. Maybe a
Prelude.Nothing,
$sel:dailyAutomaticBackupStartTime:CreateFileSystemLustreConfiguration' :: Maybe Text
dailyAutomaticBackupStartTime =
forall a. Maybe a
Prelude.Nothing,
$sel:dataCompressionType:CreateFileSystemLustreConfiguration' :: Maybe DataCompressionType
dataCompressionType = forall a. Maybe a
Prelude.Nothing,
$sel:deploymentType:CreateFileSystemLustreConfiguration' :: Maybe LustreDeploymentType
deploymentType = forall a. Maybe a
Prelude.Nothing,
$sel:driveCacheType:CreateFileSystemLustreConfiguration' :: Maybe DriveCacheType
driveCacheType = forall a. Maybe a
Prelude.Nothing,
$sel:exportPath:CreateFileSystemLustreConfiguration' :: Maybe Text
exportPath = forall a. Maybe a
Prelude.Nothing,
$sel:importPath:CreateFileSystemLustreConfiguration' :: Maybe Text
importPath = forall a. Maybe a
Prelude.Nothing,
$sel:importedFileChunkSize:CreateFileSystemLustreConfiguration' :: Maybe Natural
importedFileChunkSize =
forall a. Maybe a
Prelude.Nothing,
$sel:logConfiguration:CreateFileSystemLustreConfiguration' :: Maybe LustreLogCreateConfiguration
logConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:perUnitStorageThroughput:CreateFileSystemLustreConfiguration' :: Maybe Natural
perUnitStorageThroughput =
forall a. Maybe a
Prelude.Nothing,
$sel:rootSquashConfiguration:CreateFileSystemLustreConfiguration' :: Maybe LustreRootSquashConfiguration
rootSquashConfiguration =
forall a. Maybe a
Prelude.Nothing,
$sel:weeklyMaintenanceStartTime:CreateFileSystemLustreConfiguration' :: Maybe Text
weeklyMaintenanceStartTime =
forall a. Maybe a
Prelude.Nothing
}
createFileSystemLustreConfiguration_autoImportPolicy :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe AutoImportPolicyType)
createFileSystemLustreConfiguration_autoImportPolicy :: Lens'
CreateFileSystemLustreConfiguration (Maybe AutoImportPolicyType)
createFileSystemLustreConfiguration_autoImportPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe AutoImportPolicyType
autoImportPolicy :: Maybe AutoImportPolicyType
$sel:autoImportPolicy:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe AutoImportPolicyType
autoImportPolicy} -> Maybe AutoImportPolicyType
autoImportPolicy) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe AutoImportPolicyType
a -> CreateFileSystemLustreConfiguration
s {$sel:autoImportPolicy:CreateFileSystemLustreConfiguration' :: Maybe AutoImportPolicyType
autoImportPolicy = Maybe AutoImportPolicyType
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_automaticBackupRetentionDays :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Natural)
createFileSystemLustreConfiguration_automaticBackupRetentionDays :: Lens' CreateFileSystemLustreConfiguration (Maybe Natural)
createFileSystemLustreConfiguration_automaticBackupRetentionDays = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Natural
automaticBackupRetentionDays :: Maybe Natural
$sel:automaticBackupRetentionDays:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
automaticBackupRetentionDays} -> Maybe Natural
automaticBackupRetentionDays) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Natural
a -> CreateFileSystemLustreConfiguration
s {$sel:automaticBackupRetentionDays:CreateFileSystemLustreConfiguration' :: Maybe Natural
automaticBackupRetentionDays = Maybe Natural
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_copyTagsToBackups :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Bool)
createFileSystemLustreConfiguration_copyTagsToBackups :: Lens' CreateFileSystemLustreConfiguration (Maybe Bool)
createFileSystemLustreConfiguration_copyTagsToBackups = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Bool
copyTagsToBackups :: Maybe Bool
$sel:copyTagsToBackups:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Bool
copyTagsToBackups} -> Maybe Bool
copyTagsToBackups) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Bool
a -> CreateFileSystemLustreConfiguration
s {$sel:copyTagsToBackups:CreateFileSystemLustreConfiguration' :: Maybe Bool
copyTagsToBackups = Maybe Bool
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_dailyAutomaticBackupStartTime :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Text)
createFileSystemLustreConfiguration_dailyAutomaticBackupStartTime :: Lens' CreateFileSystemLustreConfiguration (Maybe Text)
createFileSystemLustreConfiguration_dailyAutomaticBackupStartTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Text
dailyAutomaticBackupStartTime :: Maybe Text
$sel:dailyAutomaticBackupStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
dailyAutomaticBackupStartTime} -> Maybe Text
dailyAutomaticBackupStartTime) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Text
a -> CreateFileSystemLustreConfiguration
s {$sel:dailyAutomaticBackupStartTime:CreateFileSystemLustreConfiguration' :: Maybe Text
dailyAutomaticBackupStartTime = Maybe Text
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_dataCompressionType :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe DataCompressionType)
createFileSystemLustreConfiguration_dataCompressionType :: Lens'
CreateFileSystemLustreConfiguration (Maybe DataCompressionType)
createFileSystemLustreConfiguration_dataCompressionType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe DataCompressionType
dataCompressionType :: Maybe DataCompressionType
$sel:dataCompressionType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DataCompressionType
dataCompressionType} -> Maybe DataCompressionType
dataCompressionType) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe DataCompressionType
a -> CreateFileSystemLustreConfiguration
s {$sel:dataCompressionType:CreateFileSystemLustreConfiguration' :: Maybe DataCompressionType
dataCompressionType = Maybe DataCompressionType
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_deploymentType :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe LustreDeploymentType)
createFileSystemLustreConfiguration_deploymentType :: Lens'
CreateFileSystemLustreConfiguration (Maybe LustreDeploymentType)
createFileSystemLustreConfiguration_deploymentType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe LustreDeploymentType
deploymentType :: Maybe LustreDeploymentType
$sel:deploymentType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe LustreDeploymentType
deploymentType} -> Maybe LustreDeploymentType
deploymentType) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe LustreDeploymentType
a -> CreateFileSystemLustreConfiguration
s {$sel:deploymentType:CreateFileSystemLustreConfiguration' :: Maybe LustreDeploymentType
deploymentType = Maybe LustreDeploymentType
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_driveCacheType :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe DriveCacheType)
createFileSystemLustreConfiguration_driveCacheType :: Lens' CreateFileSystemLustreConfiguration (Maybe DriveCacheType)
createFileSystemLustreConfiguration_driveCacheType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe DriveCacheType
driveCacheType :: Maybe DriveCacheType
$sel:driveCacheType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DriveCacheType
driveCacheType} -> Maybe DriveCacheType
driveCacheType) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe DriveCacheType
a -> CreateFileSystemLustreConfiguration
s {$sel:driveCacheType:CreateFileSystemLustreConfiguration' :: Maybe DriveCacheType
driveCacheType = Maybe DriveCacheType
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_exportPath :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Text)
createFileSystemLustreConfiguration_exportPath :: Lens' CreateFileSystemLustreConfiguration (Maybe Text)
createFileSystemLustreConfiguration_exportPath = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Text
exportPath :: Maybe Text
$sel:exportPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
exportPath} -> Maybe Text
exportPath) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Text
a -> CreateFileSystemLustreConfiguration
s {$sel:exportPath:CreateFileSystemLustreConfiguration' :: Maybe Text
exportPath = Maybe Text
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_importPath :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Text)
createFileSystemLustreConfiguration_importPath :: Lens' CreateFileSystemLustreConfiguration (Maybe Text)
createFileSystemLustreConfiguration_importPath = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Text
importPath :: Maybe Text
$sel:importPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
importPath} -> Maybe Text
importPath) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Text
a -> CreateFileSystemLustreConfiguration
s {$sel:importPath:CreateFileSystemLustreConfiguration' :: Maybe Text
importPath = Maybe Text
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_importedFileChunkSize :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Natural)
createFileSystemLustreConfiguration_importedFileChunkSize :: Lens' CreateFileSystemLustreConfiguration (Maybe Natural)
createFileSystemLustreConfiguration_importedFileChunkSize = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Natural
importedFileChunkSize :: Maybe Natural
$sel:importedFileChunkSize:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
importedFileChunkSize} -> Maybe Natural
importedFileChunkSize) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Natural
a -> CreateFileSystemLustreConfiguration
s {$sel:importedFileChunkSize:CreateFileSystemLustreConfiguration' :: Maybe Natural
importedFileChunkSize = Maybe Natural
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_logConfiguration :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe LustreLogCreateConfiguration)
createFileSystemLustreConfiguration_logConfiguration :: Lens'
CreateFileSystemLustreConfiguration
(Maybe LustreLogCreateConfiguration)
createFileSystemLustreConfiguration_logConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe LustreLogCreateConfiguration
logConfiguration :: Maybe LustreLogCreateConfiguration
$sel:logConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreLogCreateConfiguration
logConfiguration} -> Maybe LustreLogCreateConfiguration
logConfiguration) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe LustreLogCreateConfiguration
a -> CreateFileSystemLustreConfiguration
s {$sel:logConfiguration:CreateFileSystemLustreConfiguration' :: Maybe LustreLogCreateConfiguration
logConfiguration = Maybe LustreLogCreateConfiguration
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_perUnitStorageThroughput :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Natural)
createFileSystemLustreConfiguration_perUnitStorageThroughput :: Lens' CreateFileSystemLustreConfiguration (Maybe Natural)
createFileSystemLustreConfiguration_perUnitStorageThroughput = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Natural
perUnitStorageThroughput :: Maybe Natural
$sel:perUnitStorageThroughput:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
perUnitStorageThroughput} -> Maybe Natural
perUnitStorageThroughput) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Natural
a -> CreateFileSystemLustreConfiguration
s {$sel:perUnitStorageThroughput:CreateFileSystemLustreConfiguration' :: Maybe Natural
perUnitStorageThroughput = Maybe Natural
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_rootSquashConfiguration :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe LustreRootSquashConfiguration)
createFileSystemLustreConfiguration_rootSquashConfiguration :: Lens'
CreateFileSystemLustreConfiguration
(Maybe LustreRootSquashConfiguration)
createFileSystemLustreConfiguration_rootSquashConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe LustreRootSquashConfiguration
rootSquashConfiguration :: Maybe LustreRootSquashConfiguration
$sel:rootSquashConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreRootSquashConfiguration
rootSquashConfiguration} -> Maybe LustreRootSquashConfiguration
rootSquashConfiguration) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe LustreRootSquashConfiguration
a -> CreateFileSystemLustreConfiguration
s {$sel:rootSquashConfiguration:CreateFileSystemLustreConfiguration' :: Maybe LustreRootSquashConfiguration
rootSquashConfiguration = Maybe LustreRootSquashConfiguration
a} :: CreateFileSystemLustreConfiguration)
createFileSystemLustreConfiguration_weeklyMaintenanceStartTime :: Lens.Lens' CreateFileSystemLustreConfiguration (Prelude.Maybe Prelude.Text)
createFileSystemLustreConfiguration_weeklyMaintenanceStartTime :: Lens' CreateFileSystemLustreConfiguration (Maybe Text)
createFileSystemLustreConfiguration_weeklyMaintenanceStartTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateFileSystemLustreConfiguration' {Maybe Text
weeklyMaintenanceStartTime :: Maybe Text
$sel:weeklyMaintenanceStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
weeklyMaintenanceStartTime} -> Maybe Text
weeklyMaintenanceStartTime) (\s :: CreateFileSystemLustreConfiguration
s@CreateFileSystemLustreConfiguration' {} Maybe Text
a -> CreateFileSystemLustreConfiguration
s {$sel:weeklyMaintenanceStartTime:CreateFileSystemLustreConfiguration' :: Maybe Text
weeklyMaintenanceStartTime = Maybe Text
a} :: CreateFileSystemLustreConfiguration)
instance
Prelude.Hashable
CreateFileSystemLustreConfiguration
where
hashWithSalt :: Int -> CreateFileSystemLustreConfiguration -> Int
hashWithSalt
Int
_salt
CreateFileSystemLustreConfiguration' {Maybe Bool
Maybe Natural
Maybe Text
Maybe AutoImportPolicyType
Maybe DataCompressionType
Maybe DriveCacheType
Maybe LustreDeploymentType
Maybe LustreLogCreateConfiguration
Maybe LustreRootSquashConfiguration
weeklyMaintenanceStartTime :: Maybe Text
rootSquashConfiguration :: Maybe LustreRootSquashConfiguration
perUnitStorageThroughput :: Maybe Natural
logConfiguration :: Maybe LustreLogCreateConfiguration
importedFileChunkSize :: Maybe Natural
importPath :: Maybe Text
exportPath :: Maybe Text
driveCacheType :: Maybe DriveCacheType
deploymentType :: Maybe LustreDeploymentType
dataCompressionType :: Maybe DataCompressionType
dailyAutomaticBackupStartTime :: Maybe Text
copyTagsToBackups :: Maybe Bool
automaticBackupRetentionDays :: Maybe Natural
autoImportPolicy :: Maybe AutoImportPolicyType
$sel:weeklyMaintenanceStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:rootSquashConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreRootSquashConfiguration
$sel:perUnitStorageThroughput:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:logConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreLogCreateConfiguration
$sel:importedFileChunkSize:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:importPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:exportPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:driveCacheType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DriveCacheType
$sel:deploymentType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe LustreDeploymentType
$sel:dataCompressionType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DataCompressionType
$sel:dailyAutomaticBackupStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:copyTagsToBackups:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Bool
$sel:automaticBackupRetentionDays:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:autoImportPolicy:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe AutoImportPolicyType
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe AutoImportPolicyType
autoImportPolicy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
automaticBackupRetentionDays
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
copyTagsToBackups
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dailyAutomaticBackupStartTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DataCompressionType
dataCompressionType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LustreDeploymentType
deploymentType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DriveCacheType
driveCacheType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
exportPath
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
importPath
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
importedFileChunkSize
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LustreLogCreateConfiguration
logConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
perUnitStorageThroughput
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LustreRootSquashConfiguration
rootSquashConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
weeklyMaintenanceStartTime
instance
Prelude.NFData
CreateFileSystemLustreConfiguration
where
rnf :: CreateFileSystemLustreConfiguration -> ()
rnf CreateFileSystemLustreConfiguration' {Maybe Bool
Maybe Natural
Maybe Text
Maybe AutoImportPolicyType
Maybe DataCompressionType
Maybe DriveCacheType
Maybe LustreDeploymentType
Maybe LustreLogCreateConfiguration
Maybe LustreRootSquashConfiguration
weeklyMaintenanceStartTime :: Maybe Text
rootSquashConfiguration :: Maybe LustreRootSquashConfiguration
perUnitStorageThroughput :: Maybe Natural
logConfiguration :: Maybe LustreLogCreateConfiguration
importedFileChunkSize :: Maybe Natural
importPath :: Maybe Text
exportPath :: Maybe Text
driveCacheType :: Maybe DriveCacheType
deploymentType :: Maybe LustreDeploymentType
dataCompressionType :: Maybe DataCompressionType
dailyAutomaticBackupStartTime :: Maybe Text
copyTagsToBackups :: Maybe Bool
automaticBackupRetentionDays :: Maybe Natural
autoImportPolicy :: Maybe AutoImportPolicyType
$sel:weeklyMaintenanceStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:rootSquashConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreRootSquashConfiguration
$sel:perUnitStorageThroughput:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:logConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreLogCreateConfiguration
$sel:importedFileChunkSize:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:importPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:exportPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:driveCacheType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DriveCacheType
$sel:deploymentType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe LustreDeploymentType
$sel:dataCompressionType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DataCompressionType
$sel:dailyAutomaticBackupStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:copyTagsToBackups:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Bool
$sel:automaticBackupRetentionDays:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:autoImportPolicy:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe AutoImportPolicyType
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe AutoImportPolicyType
autoImportPolicy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
automaticBackupRetentionDays
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
copyTagsToBackups
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dailyAutomaticBackupStartTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DataCompressionType
dataCompressionType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LustreDeploymentType
deploymentType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DriveCacheType
driveCacheType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
exportPath
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
importPath
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
importedFileChunkSize
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LustreLogCreateConfiguration
logConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
perUnitStorageThroughput
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LustreRootSquashConfiguration
rootSquashConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
weeklyMaintenanceStartTime
instance
Data.ToJSON
CreateFileSystemLustreConfiguration
where
toJSON :: CreateFileSystemLustreConfiguration -> Value
toJSON CreateFileSystemLustreConfiguration' {Maybe Bool
Maybe Natural
Maybe Text
Maybe AutoImportPolicyType
Maybe DataCompressionType
Maybe DriveCacheType
Maybe LustreDeploymentType
Maybe LustreLogCreateConfiguration
Maybe LustreRootSquashConfiguration
weeklyMaintenanceStartTime :: Maybe Text
rootSquashConfiguration :: Maybe LustreRootSquashConfiguration
perUnitStorageThroughput :: Maybe Natural
logConfiguration :: Maybe LustreLogCreateConfiguration
importedFileChunkSize :: Maybe Natural
importPath :: Maybe Text
exportPath :: Maybe Text
driveCacheType :: Maybe DriveCacheType
deploymentType :: Maybe LustreDeploymentType
dataCompressionType :: Maybe DataCompressionType
dailyAutomaticBackupStartTime :: Maybe Text
copyTagsToBackups :: Maybe Bool
automaticBackupRetentionDays :: Maybe Natural
autoImportPolicy :: Maybe AutoImportPolicyType
$sel:weeklyMaintenanceStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:rootSquashConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreRootSquashConfiguration
$sel:perUnitStorageThroughput:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:logConfiguration:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration
-> Maybe LustreLogCreateConfiguration
$sel:importedFileChunkSize:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:importPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:exportPath:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:driveCacheType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DriveCacheType
$sel:deploymentType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe LustreDeploymentType
$sel:dataCompressionType:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe DataCompressionType
$sel:dailyAutomaticBackupStartTime:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Text
$sel:copyTagsToBackups:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Bool
$sel:automaticBackupRetentionDays:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe Natural
$sel:autoImportPolicy:CreateFileSystemLustreConfiguration' :: CreateFileSystemLustreConfiguration -> Maybe AutoImportPolicyType
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"AutoImportPolicy" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoImportPolicyType
autoImportPolicy,
(Key
"AutomaticBackupRetentionDays" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
automaticBackupRetentionDays,
(Key
"CopyTagsToBackups" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
copyTagsToBackups,
(Key
"DailyAutomaticBackupStartTime" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
dailyAutomaticBackupStartTime,
(Key
"DataCompressionType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataCompressionType
dataCompressionType,
(Key
"DeploymentType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LustreDeploymentType
deploymentType,
(Key
"DriveCacheType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DriveCacheType
driveCacheType,
(Key
"ExportPath" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
exportPath,
(Key
"ImportPath" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
importPath,
(Key
"ImportedFileChunkSize" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
importedFileChunkSize,
(Key
"LogConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LustreLogCreateConfiguration
logConfiguration,
(Key
"PerUnitStorageThroughput" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
perUnitStorageThroughput,
(Key
"RootSquashConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LustreRootSquashConfiguration
rootSquashConfiguration,
(Key
"WeeklyMaintenanceStartTime" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
weeklyMaintenanceStartTime
]
)