stratosphere-codebuild-1.0.0: gen/Stratosphere/CodeBuild/Project/ProjectFileSystemLocationProperty.hs
module Stratosphere.CodeBuild.Project.ProjectFileSystemLocationProperty (
ProjectFileSystemLocationProperty(..),
mkProjectFileSystemLocationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ProjectFileSystemLocationProperty
= -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html>
ProjectFileSystemLocationProperty {haddock_workaround_ :: (),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-identifier>
identifier :: (Value Prelude.Text),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-location>
location :: (Value Prelude.Text),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-mountoptions>
mountOptions :: (Prelude.Maybe (Value Prelude.Text)),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-mountpoint>
mountPoint :: (Value Prelude.Text),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codebuild-project-projectfilesystemlocation.html#cfn-codebuild-project-projectfilesystemlocation-type>
type' :: (Value Prelude.Text)}
deriving stock (Prelude.Eq, Prelude.Show)
mkProjectFileSystemLocationProperty ::
Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text -> ProjectFileSystemLocationProperty
mkProjectFileSystemLocationProperty
identifier
location
mountPoint
type'
= ProjectFileSystemLocationProperty
{haddock_workaround_ = (), identifier = identifier,
location = location, mountPoint = mountPoint, type' = type',
mountOptions = Prelude.Nothing}
instance ToResourceProperties ProjectFileSystemLocationProperty where
toResourceProperties ProjectFileSystemLocationProperty {..}
= ResourceProperties
{awsType = "AWS::CodeBuild::Project.ProjectFileSystemLocation",
supportsTags = Prelude.False,
properties = Prelude.fromList
((Prelude.<>)
["Identifier" JSON..= identifier, "Location" JSON..= location,
"MountPoint" JSON..= mountPoint, "Type" JSON..= type']
(Prelude.catMaybes
[(JSON..=) "MountOptions" Prelude.<$> mountOptions]))}
instance JSON.ToJSON ProjectFileSystemLocationProperty where
toJSON ProjectFileSystemLocationProperty {..}
= JSON.object
(Prelude.fromList
((Prelude.<>)
["Identifier" JSON..= identifier, "Location" JSON..= location,
"MountPoint" JSON..= mountPoint, "Type" JSON..= type']
(Prelude.catMaybes
[(JSON..=) "MountOptions" Prelude.<$> mountOptions])))
instance Property "Identifier" ProjectFileSystemLocationProperty where
type PropertyType "Identifier" ProjectFileSystemLocationProperty = Value Prelude.Text
set newValue ProjectFileSystemLocationProperty {..}
= ProjectFileSystemLocationProperty {identifier = newValue, ..}
instance Property "Location" ProjectFileSystemLocationProperty where
type PropertyType "Location" ProjectFileSystemLocationProperty = Value Prelude.Text
set newValue ProjectFileSystemLocationProperty {..}
= ProjectFileSystemLocationProperty {location = newValue, ..}
instance Property "MountOptions" ProjectFileSystemLocationProperty where
type PropertyType "MountOptions" ProjectFileSystemLocationProperty = Value Prelude.Text
set newValue ProjectFileSystemLocationProperty {..}
= ProjectFileSystemLocationProperty
{mountOptions = Prelude.pure newValue, ..}
instance Property "MountPoint" ProjectFileSystemLocationProperty where
type PropertyType "MountPoint" ProjectFileSystemLocationProperty = Value Prelude.Text
set newValue ProjectFileSystemLocationProperty {..}
= ProjectFileSystemLocationProperty {mountPoint = newValue, ..}
instance Property "Type" ProjectFileSystemLocationProperty where
type PropertyType "Type" ProjectFileSystemLocationProperty = Value Prelude.Text
set newValue ProjectFileSystemLocationProperty {..}
= ProjectFileSystemLocationProperty {type' = newValue, ..}