module Stratosphere.DataSync.Task.OptionsProperty ( OptionsProperty(..), mkOptionsProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data OptionsProperty = -- | See: OptionsProperty {haddock_workaround_ :: (), -- | See: atime :: (Prelude.Maybe (Value Prelude.Text)), -- | See: bytesPerSecond :: (Prelude.Maybe (Value Prelude.Integer)), -- | See: gid :: (Prelude.Maybe (Value Prelude.Text)), -- | See: logLevel :: (Prelude.Maybe (Value Prelude.Text)), -- | See: mtime :: (Prelude.Maybe (Value Prelude.Text)), -- | See: objectTags :: (Prelude.Maybe (Value Prelude.Text)), -- | See: overwriteMode :: (Prelude.Maybe (Value Prelude.Text)), -- | See: posixPermissions :: (Prelude.Maybe (Value Prelude.Text)), -- | See: preserveDeletedFiles :: (Prelude.Maybe (Value Prelude.Text)), -- | See: preserveDevices :: (Prelude.Maybe (Value Prelude.Text)), -- | See: securityDescriptorCopyFlags :: (Prelude.Maybe (Value Prelude.Text)), -- | See: taskQueueing :: (Prelude.Maybe (Value Prelude.Text)), -- | See: transferMode :: (Prelude.Maybe (Value Prelude.Text)), -- | See: uid :: (Prelude.Maybe (Value Prelude.Text)), -- | See: verifyMode :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkOptionsProperty :: OptionsProperty mkOptionsProperty = OptionsProperty {haddock_workaround_ = (), atime = Prelude.Nothing, bytesPerSecond = Prelude.Nothing, gid = Prelude.Nothing, logLevel = Prelude.Nothing, mtime = Prelude.Nothing, objectTags = Prelude.Nothing, overwriteMode = Prelude.Nothing, posixPermissions = Prelude.Nothing, preserveDeletedFiles = Prelude.Nothing, preserveDevices = Prelude.Nothing, securityDescriptorCopyFlags = Prelude.Nothing, taskQueueing = Prelude.Nothing, transferMode = Prelude.Nothing, uid = Prelude.Nothing, verifyMode = Prelude.Nothing} instance ToResourceProperties OptionsProperty where toResourceProperties OptionsProperty {..} = ResourceProperties {awsType = "AWS::DataSync::Task.Options", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "Atime" Prelude.<$> atime, (JSON..=) "BytesPerSecond" Prelude.<$> bytesPerSecond, (JSON..=) "Gid" Prelude.<$> gid, (JSON..=) "LogLevel" Prelude.<$> logLevel, (JSON..=) "Mtime" Prelude.<$> mtime, (JSON..=) "ObjectTags" Prelude.<$> objectTags, (JSON..=) "OverwriteMode" Prelude.<$> overwriteMode, (JSON..=) "PosixPermissions" Prelude.<$> posixPermissions, (JSON..=) "PreserveDeletedFiles" Prelude.<$> preserveDeletedFiles, (JSON..=) "PreserveDevices" Prelude.<$> preserveDevices, (JSON..=) "SecurityDescriptorCopyFlags" Prelude.<$> securityDescriptorCopyFlags, (JSON..=) "TaskQueueing" Prelude.<$> taskQueueing, (JSON..=) "TransferMode" Prelude.<$> transferMode, (JSON..=) "Uid" Prelude.<$> uid, (JSON..=) "VerifyMode" Prelude.<$> verifyMode])} instance JSON.ToJSON OptionsProperty where toJSON OptionsProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "Atime" Prelude.<$> atime, (JSON..=) "BytesPerSecond" Prelude.<$> bytesPerSecond, (JSON..=) "Gid" Prelude.<$> gid, (JSON..=) "LogLevel" Prelude.<$> logLevel, (JSON..=) "Mtime" Prelude.<$> mtime, (JSON..=) "ObjectTags" Prelude.<$> objectTags, (JSON..=) "OverwriteMode" Prelude.<$> overwriteMode, (JSON..=) "PosixPermissions" Prelude.<$> posixPermissions, (JSON..=) "PreserveDeletedFiles" Prelude.<$> preserveDeletedFiles, (JSON..=) "PreserveDevices" Prelude.<$> preserveDevices, (JSON..=) "SecurityDescriptorCopyFlags" Prelude.<$> securityDescriptorCopyFlags, (JSON..=) "TaskQueueing" Prelude.<$> taskQueueing, (JSON..=) "TransferMode" Prelude.<$> transferMode, (JSON..=) "Uid" Prelude.<$> uid, (JSON..=) "VerifyMode" Prelude.<$> verifyMode])) instance Property "Atime" OptionsProperty where type PropertyType "Atime" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {atime = Prelude.pure newValue, ..} instance Property "BytesPerSecond" OptionsProperty where type PropertyType "BytesPerSecond" OptionsProperty = Value Prelude.Integer set newValue OptionsProperty {..} = OptionsProperty {bytesPerSecond = Prelude.pure newValue, ..} instance Property "Gid" OptionsProperty where type PropertyType "Gid" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {gid = Prelude.pure newValue, ..} instance Property "LogLevel" OptionsProperty where type PropertyType "LogLevel" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {logLevel = Prelude.pure newValue, ..} instance Property "Mtime" OptionsProperty where type PropertyType "Mtime" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {mtime = Prelude.pure newValue, ..} instance Property "ObjectTags" OptionsProperty where type PropertyType "ObjectTags" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {objectTags = Prelude.pure newValue, ..} instance Property "OverwriteMode" OptionsProperty where type PropertyType "OverwriteMode" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {overwriteMode = Prelude.pure newValue, ..} instance Property "PosixPermissions" OptionsProperty where type PropertyType "PosixPermissions" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {posixPermissions = Prelude.pure newValue, ..} instance Property "PreserveDeletedFiles" OptionsProperty where type PropertyType "PreserveDeletedFiles" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {preserveDeletedFiles = Prelude.pure newValue, ..} instance Property "PreserveDevices" OptionsProperty where type PropertyType "PreserveDevices" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {preserveDevices = Prelude.pure newValue, ..} instance Property "SecurityDescriptorCopyFlags" OptionsProperty where type PropertyType "SecurityDescriptorCopyFlags" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {securityDescriptorCopyFlags = Prelude.pure newValue, ..} instance Property "TaskQueueing" OptionsProperty where type PropertyType "TaskQueueing" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {taskQueueing = Prelude.pure newValue, ..} instance Property "TransferMode" OptionsProperty where type PropertyType "TransferMode" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {transferMode = Prelude.pure newValue, ..} instance Property "Uid" OptionsProperty where type PropertyType "Uid" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {uid = Prelude.pure newValue, ..} instance Property "VerifyMode" OptionsProperty where type PropertyType "VerifyMode" OptionsProperty = Value Prelude.Text set newValue OptionsProperty {..} = OptionsProperty {verifyMode = Prelude.pure newValue, ..}