ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/DisplayMediaStreamOptions.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from screen-capture (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.DisplayMediaStreamOptions
       (js_newDisplayMediaStreamOptions, js_setVideo, js_getVideo, js_setAudio, js_getAudio, js_setController, js_getController, js_setSelfBrowserSurface, js_getSelfBrowserSurface, js_setSystemAudio, js_getSystemAudio, js_setWindowAudio, js_getWindowAudio, js_setSurfaceSwitching, js_getSurfaceSwitching, js_setMonitorTypeSurfaces, js_getMonitorTypeSurfaces, js_setAudioSelection, js_getAudioSelection, newDisplayMediaStreamOptions, setVideo, getVideo, getVideoUnsafe, getVideoUnchecked, setAudio, getAudio, getAudioUnsafe, getAudioUnchecked, setController, getController, getControllerUnsafe, getControllerUnchecked, setSelfBrowserSurface, getSelfBrowserSurface, getSelfBrowserSurfaceUnsafe, getSelfBrowserSurfaceUnchecked, setSystemAudio, getSystemAudio, getSystemAudioUnsafe, getSystemAudioUnchecked, setWindowAudio, getWindowAudio, getWindowAudioUnsafe, getWindowAudioUnchecked, setSurfaceSwitching, getSurfaceSwitching, getSurfaceSwitchingUnsafe, getSurfaceSwitchingUnchecked, setMonitorTypeSurfaces, getMonitorTypeSurfaces, getMonitorTypeSurfacesUnsafe, getMonitorTypeSurfacesUnchecked, setAudioSelection, getAudioSelection, getAudioSelectionUnsafe, getAudioSelectionUnchecked, DisplayMediaStreamOptions(..), gTypeDisplayMediaStreamOptions)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(() => { return ({}); })"
        js_newDisplayMediaStreamOptions :: IO DisplayMediaStreamOptions
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions DisplayMediaStreamOptions specification>
newDisplayMediaStreamOptions :: (MonadDOM m) => m DisplayMediaStreamOptions
newDisplayMediaStreamOptions = liftDOM ((js_newDisplayMediaStreamOptions))

foreign import javascript safe "(($1, $2) => { $1[\"video\"] = $2; })"
        js_setVideo :: DisplayMediaStreamOptions -> BoolOrMediaTrackConstraints -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-video DisplayMediaStreamOptions.video specification>
setVideo :: (MonadDOM m, IsBoolOrMediaTrackConstraints val) => DisplayMediaStreamOptions -> val -> m ()
setVideo self val = liftDOM (void ((js_setVideo (self) (Types.toBoolOrMediaTrackConstraints val))))

foreign import javascript unsafe "(($1) => { return $1[\"video\"]; })"
        js_getVideo :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-video DisplayMediaStreamOptions.video specification>
getVideo :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe BoolOrMediaTrackConstraints)
getVideo self = liftDOM (((js_getVideo (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-video DisplayMediaStreamOptions.video specification>
getVideoUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m BoolOrMediaTrackConstraints
getVideoUnsafe self = liftDOM ((((js_getVideo (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-video DisplayMediaStreamOptions.video specification>
getVideoUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m BoolOrMediaTrackConstraints
getVideoUnchecked self = liftDOM ((pFromJSVal <$> (js_getVideo (self))))

foreign import javascript safe "(($1, $2) => { $1[\"audio\"] = $2; })"
        js_setAudio :: DisplayMediaStreamOptions -> BoolOrMediaTrackConstraints -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audio DisplayMediaStreamOptions.audio specification>
setAudio :: (MonadDOM m, IsBoolOrMediaTrackConstraints val) => DisplayMediaStreamOptions -> val -> m ()
setAudio self val = liftDOM (void ((js_setAudio (self) (Types.toBoolOrMediaTrackConstraints val))))

foreign import javascript unsafe "(($1) => { return $1[\"audio\"]; })"
        js_getAudio :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audio DisplayMediaStreamOptions.audio specification>
getAudio :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe BoolOrMediaTrackConstraints)
getAudio self = liftDOM (((js_getAudio (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audio DisplayMediaStreamOptions.audio specification>
getAudioUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m BoolOrMediaTrackConstraints
getAudioUnsafe self = liftDOM ((((js_getAudio (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audio DisplayMediaStreamOptions.audio specification>
getAudioUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m BoolOrMediaTrackConstraints
getAudioUnchecked self = liftDOM ((pFromJSVal <$> (js_getAudio (self))))

foreign import javascript safe "(($1, $2) => { $1[\"controller\"] = $2; })"
        js_setController :: DisplayMediaStreamOptions -> CaptureController -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-controller DisplayMediaStreamOptions.controller specification>
setController :: (MonadDOM m) => DisplayMediaStreamOptions -> CaptureController -> m ()
setController self val = liftDOM (void ((js_setController (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"controller\"]; })"
        js_getController :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-controller DisplayMediaStreamOptions.controller specification>
getController :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe CaptureController)
getController self = liftDOM (((js_getController (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-controller DisplayMediaStreamOptions.controller specification>
getControllerUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m CaptureController
getControllerUnsafe self = liftDOM ((((js_getController (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-controller DisplayMediaStreamOptions.controller specification>
getControllerUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m CaptureController
getControllerUnchecked self = liftDOM ((pFromJSVal <$> (js_getController (self))))

foreign import javascript safe "(($1, $2) => { $1[\"selfBrowserSurface\"] = $2; })"
        js_setSelfBrowserSurface :: DisplayMediaStreamOptions -> JSVal -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-selfbrowsersurface DisplayMediaStreamOptions.selfBrowserSurface specification>
setSelfBrowserSurface :: (MonadDOM m) => DisplayMediaStreamOptions -> SelfCapturePreferenceEnum -> m ()
setSelfBrowserSurface self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSelfBrowserSurface (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"selfBrowserSurface\"]; })"
        js_getSelfBrowserSurface :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-selfbrowsersurface DisplayMediaStreamOptions.selfBrowserSurface specification>
getSelfBrowserSurface :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe SelfCapturePreferenceEnum)
getSelfBrowserSurface self = liftDOM (((js_getSelfBrowserSurface (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-selfbrowsersurface DisplayMediaStreamOptions.selfBrowserSurface specification>
getSelfBrowserSurfaceUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m SelfCapturePreferenceEnum
getSelfBrowserSurfaceUnsafe self = liftDOM ((((js_getSelfBrowserSurface (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-selfbrowsersurface DisplayMediaStreamOptions.selfBrowserSurface specification>
getSelfBrowserSurfaceUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m SelfCapturePreferenceEnum
getSelfBrowserSurfaceUnchecked self = liftDOM ((pFromJSVal <$> (js_getSelfBrowserSurface (self))))

foreign import javascript safe "(($1, $2) => { $1[\"systemAudio\"] = $2; })"
        js_setSystemAudio :: DisplayMediaStreamOptions -> JSVal -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-systemaudio DisplayMediaStreamOptions.systemAudio specification>
setSystemAudio :: (MonadDOM m) => DisplayMediaStreamOptions -> SystemAudioPreferenceEnum -> m ()
setSystemAudio self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSystemAudio (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"systemAudio\"]; })"
        js_getSystemAudio :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-systemaudio DisplayMediaStreamOptions.systemAudio specification>
getSystemAudio :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe SystemAudioPreferenceEnum)
getSystemAudio self = liftDOM (((js_getSystemAudio (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-systemaudio DisplayMediaStreamOptions.systemAudio specification>
getSystemAudioUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m SystemAudioPreferenceEnum
getSystemAudioUnsafe self = liftDOM ((((js_getSystemAudio (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-systemaudio DisplayMediaStreamOptions.systemAudio specification>
getSystemAudioUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m SystemAudioPreferenceEnum
getSystemAudioUnchecked self = liftDOM ((pFromJSVal <$> (js_getSystemAudio (self))))

foreign import javascript safe "(($1, $2) => { $1[\"windowAudio\"] = $2; })"
        js_setWindowAudio :: DisplayMediaStreamOptions -> JSVal -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-windowaudio DisplayMediaStreamOptions.windowAudio specification>
setWindowAudio :: (MonadDOM m) => DisplayMediaStreamOptions -> WindowAudioPreferenceEnum -> m ()
setWindowAudio self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setWindowAudio (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"windowAudio\"]; })"
        js_getWindowAudio :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-windowaudio DisplayMediaStreamOptions.windowAudio specification>
getWindowAudio :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe WindowAudioPreferenceEnum)
getWindowAudio self = liftDOM (((js_getWindowAudio (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-windowaudio DisplayMediaStreamOptions.windowAudio specification>
getWindowAudioUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m WindowAudioPreferenceEnum
getWindowAudioUnsafe self = liftDOM ((((js_getWindowAudio (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-windowaudio DisplayMediaStreamOptions.windowAudio specification>
getWindowAudioUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m WindowAudioPreferenceEnum
getWindowAudioUnchecked self = liftDOM ((pFromJSVal <$> (js_getWindowAudio (self))))

foreign import javascript safe "(($1, $2) => { $1[\"surfaceSwitching\"] = $2; })"
        js_setSurfaceSwitching :: DisplayMediaStreamOptions -> JSVal -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-surfaceswitching DisplayMediaStreamOptions.surfaceSwitching specification>
setSurfaceSwitching :: (MonadDOM m) => DisplayMediaStreamOptions -> SurfaceSwitchingPreferenceEnum -> m ()
setSurfaceSwitching self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSurfaceSwitching (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"surfaceSwitching\"]; })"
        js_getSurfaceSwitching :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-surfaceswitching DisplayMediaStreamOptions.surfaceSwitching specification>
getSurfaceSwitching :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe SurfaceSwitchingPreferenceEnum)
getSurfaceSwitching self = liftDOM (((js_getSurfaceSwitching (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-surfaceswitching DisplayMediaStreamOptions.surfaceSwitching specification>
getSurfaceSwitchingUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m SurfaceSwitchingPreferenceEnum
getSurfaceSwitchingUnsafe self = liftDOM ((((js_getSurfaceSwitching (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-surfaceswitching DisplayMediaStreamOptions.surfaceSwitching specification>
getSurfaceSwitchingUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m SurfaceSwitchingPreferenceEnum
getSurfaceSwitchingUnchecked self = liftDOM ((pFromJSVal <$> (js_getSurfaceSwitching (self))))

foreign import javascript safe "(($1, $2) => { $1[\"monitorTypeSurfaces\"] = $2; })"
        js_setMonitorTypeSurfaces :: DisplayMediaStreamOptions -> JSVal -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-monitortypesurfaces DisplayMediaStreamOptions.monitorTypeSurfaces specification>
setMonitorTypeSurfaces :: (MonadDOM m) => DisplayMediaStreamOptions -> MonitorTypeSurfacesEnum -> m ()
setMonitorTypeSurfaces self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setMonitorTypeSurfaces (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"monitorTypeSurfaces\"]; })"
        js_getMonitorTypeSurfaces :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-monitortypesurfaces DisplayMediaStreamOptions.monitorTypeSurfaces specification>
getMonitorTypeSurfaces :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe MonitorTypeSurfacesEnum)
getMonitorTypeSurfaces self = liftDOM (((js_getMonitorTypeSurfaces (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-monitortypesurfaces DisplayMediaStreamOptions.monitorTypeSurfaces specification>
getMonitorTypeSurfacesUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m MonitorTypeSurfacesEnum
getMonitorTypeSurfacesUnsafe self = liftDOM ((((js_getMonitorTypeSurfaces (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-monitortypesurfaces DisplayMediaStreamOptions.monitorTypeSurfaces specification>
getMonitorTypeSurfacesUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m MonitorTypeSurfacesEnum
getMonitorTypeSurfacesUnchecked self = liftDOM ((pFromJSVal <$> (js_getMonitorTypeSurfaces (self))))

foreign import javascript safe "(($1, $2) => { $1[\"audioSelection\"] = $2; })"
        js_setAudioSelection :: DisplayMediaStreamOptions -> JSVal -> IO ()
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audioselection DisplayMediaStreamOptions.audioSelection specification>
setAudioSelection :: (MonadDOM m) => DisplayMediaStreamOptions -> AudioSelectionPreferenceEnum -> m ()
setAudioSelection self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setAudioSelection (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"audioSelection\"]; })"
        js_getAudioSelection :: DisplayMediaStreamOptions -> IO JSVal
-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audioselection DisplayMediaStreamOptions.audioSelection specification>
getAudioSelection :: (MonadDOM m) => DisplayMediaStreamOptions -> m (Maybe AudioSelectionPreferenceEnum)
getAudioSelection self = liftDOM (((js_getAudioSelection (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audioselection DisplayMediaStreamOptions.audioSelection specification>
getAudioSelectionUnsafe :: (MonadDOM m, HasCallStack) => DisplayMediaStreamOptions -> m AudioSelectionPreferenceEnum
getAudioSelectionUnsafe self = liftDOM ((((js_getAudioSelection (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-screen-share/#dom-displaymediastreamoptions-audioselection DisplayMediaStreamOptions.audioSelection specification>
getAudioSelectionUnchecked :: (MonadDOM m) => DisplayMediaStreamOptions -> m AudioSelectionPreferenceEnum
getAudioSelectionUnchecked self = liftDOM ((pFromJSVal <$> (js_getAudioSelection (self))))