module Stratosphere.SageMaker.Space.CustomFileSystemProperty (
        module Exports, CustomFileSystemProperty(..),
        mkCustomFileSystemProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.SageMaker.Space.EFSFileSystemProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.Space.FSxLustreFileSystemProperty as Exports
import {-# SOURCE #-} Stratosphere.SageMaker.Space.S3FileSystemProperty as Exports
import Stratosphere.ResourceProperties
data CustomFileSystemProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-space-customfilesystem.html>
    CustomFileSystemProperty {CustomFileSystemProperty -> ()
haddock_workaround_ :: (),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-space-customfilesystem.html#cfn-sagemaker-space-customfilesystem-efsfilesystem>
                              CustomFileSystemProperty -> Maybe EFSFileSystemProperty
eFSFileSystem :: (Prelude.Maybe EFSFileSystemProperty),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-space-customfilesystem.html#cfn-sagemaker-space-customfilesystem-fsxlustrefilesystem>
                              CustomFileSystemProperty -> Maybe FSxLustreFileSystemProperty
fSxLustreFileSystem :: (Prelude.Maybe FSxLustreFileSystemProperty),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-space-customfilesystem.html#cfn-sagemaker-space-customfilesystem-s3filesystem>
                              CustomFileSystemProperty -> Maybe S3FileSystemProperty
s3FileSystem :: (Prelude.Maybe S3FileSystemProperty)}
  deriving stock (CustomFileSystemProperty -> CustomFileSystemProperty -> Bool
(CustomFileSystemProperty -> CustomFileSystemProperty -> Bool)
-> (CustomFileSystemProperty -> CustomFileSystemProperty -> Bool)
-> Eq CustomFileSystemProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CustomFileSystemProperty -> CustomFileSystemProperty -> Bool
== :: CustomFileSystemProperty -> CustomFileSystemProperty -> Bool
$c/= :: CustomFileSystemProperty -> CustomFileSystemProperty -> Bool
/= :: CustomFileSystemProperty -> CustomFileSystemProperty -> Bool
Prelude.Eq, Int -> CustomFileSystemProperty -> ShowS
[CustomFileSystemProperty] -> ShowS
CustomFileSystemProperty -> String
(Int -> CustomFileSystemProperty -> ShowS)
-> (CustomFileSystemProperty -> String)
-> ([CustomFileSystemProperty] -> ShowS)
-> Show CustomFileSystemProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CustomFileSystemProperty -> ShowS
showsPrec :: Int -> CustomFileSystemProperty -> ShowS
$cshow :: CustomFileSystemProperty -> String
show :: CustomFileSystemProperty -> String
$cshowList :: [CustomFileSystemProperty] -> ShowS
showList :: [CustomFileSystemProperty] -> ShowS
Prelude.Show)
mkCustomFileSystemProperty :: CustomFileSystemProperty
mkCustomFileSystemProperty :: CustomFileSystemProperty
mkCustomFileSystemProperty
  = CustomFileSystemProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), eFSFileSystem :: Maybe EFSFileSystemProperty
eFSFileSystem = Maybe EFSFileSystemProperty
forall a. Maybe a
Prelude.Nothing,
       fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
fSxLustreFileSystem = Maybe FSxLustreFileSystemProperty
forall a. Maybe a
Prelude.Nothing,
       s3FileSystem :: Maybe S3FileSystemProperty
s3FileSystem = Maybe S3FileSystemProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties CustomFileSystemProperty where
  toResourceProperties :: CustomFileSystemProperty -> ResourceProperties
toResourceProperties CustomFileSystemProperty {Maybe EFSFileSystemProperty
Maybe FSxLustreFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: CustomFileSystemProperty -> ()
eFSFileSystem :: CustomFileSystemProperty -> Maybe EFSFileSystemProperty
fSxLustreFileSystem :: CustomFileSystemProperty -> Maybe FSxLustreFileSystemProperty
s3FileSystem :: CustomFileSystemProperty -> Maybe S3FileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SageMaker::Space.CustomFileSystem",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> EFSFileSystemProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EFSFileSystem" (EFSFileSystemProperty -> (Key, Value))
-> Maybe EFSFileSystemProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EFSFileSystemProperty
eFSFileSystem,
                            Key -> FSxLustreFileSystemProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FSxLustreFileSystem" (FSxLustreFileSystemProperty -> (Key, Value))
-> Maybe FSxLustreFileSystemProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FSxLustreFileSystemProperty
fSxLustreFileSystem,
                            Key -> S3FileSystemProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"S3FileSystem" (S3FileSystemProperty -> (Key, Value))
-> Maybe S3FileSystemProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3FileSystemProperty
s3FileSystem])}
instance JSON.ToJSON CustomFileSystemProperty where
  toJSON :: CustomFileSystemProperty -> Value
toJSON CustomFileSystemProperty {Maybe EFSFileSystemProperty
Maybe FSxLustreFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: CustomFileSystemProperty -> ()
eFSFileSystem :: CustomFileSystemProperty -> Maybe EFSFileSystemProperty
fSxLustreFileSystem :: CustomFileSystemProperty -> Maybe FSxLustreFileSystemProperty
s3FileSystem :: CustomFileSystemProperty -> Maybe S3FileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> EFSFileSystemProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EFSFileSystem" (EFSFileSystemProperty -> (Key, Value))
-> Maybe EFSFileSystemProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EFSFileSystemProperty
eFSFileSystem,
               Key -> FSxLustreFileSystemProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FSxLustreFileSystem" (FSxLustreFileSystemProperty -> (Key, Value))
-> Maybe FSxLustreFileSystemProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FSxLustreFileSystemProperty
fSxLustreFileSystem,
               Key -> S3FileSystemProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"S3FileSystem" (S3FileSystemProperty -> (Key, Value))
-> Maybe S3FileSystemProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3FileSystemProperty
s3FileSystem]))
instance Property "EFSFileSystem" CustomFileSystemProperty where
  type PropertyType "EFSFileSystem" CustomFileSystemProperty = EFSFileSystemProperty
  set :: PropertyType "EFSFileSystem" CustomFileSystemProperty
-> CustomFileSystemProperty -> CustomFileSystemProperty
set PropertyType "EFSFileSystem" CustomFileSystemProperty
newValue CustomFileSystemProperty {Maybe EFSFileSystemProperty
Maybe FSxLustreFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: CustomFileSystemProperty -> ()
eFSFileSystem :: CustomFileSystemProperty -> Maybe EFSFileSystemProperty
fSxLustreFileSystem :: CustomFileSystemProperty -> Maybe FSxLustreFileSystemProperty
s3FileSystem :: CustomFileSystemProperty -> Maybe S3FileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
    = CustomFileSystemProperty
        {eFSFileSystem :: Maybe EFSFileSystemProperty
eFSFileSystem = EFSFileSystemProperty -> Maybe EFSFileSystemProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EFSFileSystem" CustomFileSystemProperty
EFSFileSystemProperty
newValue, Maybe FSxLustreFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: ()
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
haddock_workaround_ :: ()
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
instance Property "FSxLustreFileSystem" CustomFileSystemProperty where
  type PropertyType "FSxLustreFileSystem" CustomFileSystemProperty = FSxLustreFileSystemProperty
  set :: PropertyType "FSxLustreFileSystem" CustomFileSystemProperty
-> CustomFileSystemProperty -> CustomFileSystemProperty
set PropertyType "FSxLustreFileSystem" CustomFileSystemProperty
newValue CustomFileSystemProperty {Maybe EFSFileSystemProperty
Maybe FSxLustreFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: CustomFileSystemProperty -> ()
eFSFileSystem :: CustomFileSystemProperty -> Maybe EFSFileSystemProperty
fSxLustreFileSystem :: CustomFileSystemProperty -> Maybe FSxLustreFileSystemProperty
s3FileSystem :: CustomFileSystemProperty -> Maybe S3FileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
    = CustomFileSystemProperty
        {fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
fSxLustreFileSystem = FSxLustreFileSystemProperty -> Maybe FSxLustreFileSystemProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FSxLustreFileSystem" CustomFileSystemProperty
FSxLustreFileSystemProperty
newValue, Maybe EFSFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
instance Property "S3FileSystem" CustomFileSystemProperty where
  type PropertyType "S3FileSystem" CustomFileSystemProperty = S3FileSystemProperty
  set :: PropertyType "S3FileSystem" CustomFileSystemProperty
-> CustomFileSystemProperty -> CustomFileSystemProperty
set PropertyType "S3FileSystem" CustomFileSystemProperty
newValue CustomFileSystemProperty {Maybe EFSFileSystemProperty
Maybe FSxLustreFileSystemProperty
Maybe S3FileSystemProperty
()
haddock_workaround_ :: CustomFileSystemProperty -> ()
eFSFileSystem :: CustomFileSystemProperty -> Maybe EFSFileSystemProperty
fSxLustreFileSystem :: CustomFileSystemProperty -> Maybe FSxLustreFileSystemProperty
s3FileSystem :: CustomFileSystemProperty -> Maybe S3FileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
s3FileSystem :: Maybe S3FileSystemProperty
..}
    = CustomFileSystemProperty
        {s3FileSystem :: Maybe S3FileSystemProperty
s3FileSystem = S3FileSystemProperty -> Maybe S3FileSystemProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "S3FileSystem" CustomFileSystemProperty
S3FileSystemProperty
newValue, Maybe EFSFileSystemProperty
Maybe FSxLustreFileSystemProperty
()
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
haddock_workaround_ :: ()
eFSFileSystem :: Maybe EFSFileSystemProperty
fSxLustreFileSystem :: Maybe FSxLustreFileSystemProperty
..}