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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webrtc (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.RTCRtpEncodingParameters
       (js_newRTCRtpEncodingParameters, js_setActive, js_getActive, js_setCodec, js_getCodec, js_setMaxBitrate, js_getMaxBitrate, js_setMaxFramerate, js_getMaxFramerate, js_setScaleResolutionDownBy, js_getScaleResolutionDownBy, js_setPriority, js_getPriority, js_setNetworkPriority, js_getNetworkPriority, js_setScalabilityMode, js_getScalabilityMode, newRTCRtpEncodingParameters, setActive, getActive, getActiveUnsafe, getActiveUnchecked, setCodec, getCodec, getCodecUnsafe, getCodecUnchecked, setMaxBitrate, getMaxBitrate, getMaxBitrateUnsafe, getMaxBitrateUnchecked, setMaxFramerate, getMaxFramerate, getMaxFramerateUnsafe, getMaxFramerateUnchecked, setScaleResolutionDownBy, getScaleResolutionDownBy, getScaleResolutionDownByUnsafe, getScaleResolutionDownByUnchecked, setPriority, getPriority, getPriorityUnsafe, getPriorityUnchecked, setNetworkPriority, getNetworkPriority, getNetworkPriorityUnsafe, getNetworkPriorityUnchecked, setScalabilityMode, getScalabilityMode, getScalabilityModeUnsafe, getScalabilityModeUnchecked, RTCRtpEncodingParameters(..), gTypeRTCRtpEncodingParameters)
       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_newRTCRtpEncodingParameters :: IO RTCRtpEncodingParameters
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters RTCRtpEncodingParameters specification>
newRTCRtpEncodingParameters :: (MonadDOM m) => m RTCRtpEncodingParameters
newRTCRtpEncodingParameters = liftDOM ((js_newRTCRtpEncodingParameters))

foreign import javascript safe "(($1, $2) => { $1[\"active\"] = $2; })"
        js_setActive :: RTCRtpEncodingParameters -> Bool -> IO ()
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-active RTCRtpEncodingParameters.active specification>
setActive :: (MonadDOM m) => RTCRtpEncodingParameters -> Bool -> m ()
setActive self val = liftDOM (void ((js_setActive (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"active\"]; })"
        js_getActive :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-active RTCRtpEncodingParameters.active specification>
getActive :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe Bool)
getActive self = liftDOM (((js_getActive (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-active RTCRtpEncodingParameters.active specification>
getActiveUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m Bool
getActiveUnsafe self = liftDOM ((((js_getActive (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-active RTCRtpEncodingParameters.active specification>
getActiveUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m Bool
getActiveUnchecked self = liftDOM ((pFromJSVal <$> (js_getActive (self))))

foreign import javascript safe "(($1, $2) => { $1[\"codec\"] = $2; })"
        js_setCodec :: RTCRtpEncodingParameters -> RTCRtpCodec -> IO ()
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-codec RTCRtpEncodingParameters.codec specification>
setCodec :: (MonadDOM m, IsRTCRtpCodec val) => RTCRtpEncodingParameters -> val -> m ()
setCodec self val = liftDOM (void ((js_setCodec (self) (Types.toRTCRtpCodec val))))

foreign import javascript unsafe "(($1) => { return $1[\"codec\"]; })"
        js_getCodec :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-codec RTCRtpEncodingParameters.codec specification>
getCodec :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe RTCRtpCodec)
getCodec self = liftDOM (((js_getCodec (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-codec RTCRtpEncodingParameters.codec specification>
getCodecUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m RTCRtpCodec
getCodecUnsafe self = liftDOM ((((js_getCodec (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-codec RTCRtpEncodingParameters.codec specification>
getCodecUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m RTCRtpCodec
getCodecUnchecked self = liftDOM ((pFromJSVal <$> (js_getCodec (self))))

foreign import javascript safe "(($1, $2) => { $1[\"maxBitrate\"] = $2; })"
        js_setMaxBitrate :: RTCRtpEncodingParameters -> Word -> IO ()
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxbitrate RTCRtpEncodingParameters.maxBitrate specification>
setMaxBitrate :: (MonadDOM m) => RTCRtpEncodingParameters -> Word -> m ()
setMaxBitrate self val = liftDOM (void ((js_setMaxBitrate (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"maxBitrate\"]; })"
        js_getMaxBitrate :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxbitrate RTCRtpEncodingParameters.maxBitrate specification>
getMaxBitrate :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe Word)
getMaxBitrate self = liftDOM (((js_getMaxBitrate (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxbitrate RTCRtpEncodingParameters.maxBitrate specification>
getMaxBitrateUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m Word
getMaxBitrateUnsafe self = liftDOM ((((js_getMaxBitrate (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxbitrate RTCRtpEncodingParameters.maxBitrate specification>
getMaxBitrateUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m Word
getMaxBitrateUnchecked self = liftDOM ((pFromJSVal <$> (js_getMaxBitrate (self))))

foreign import javascript safe "(($1, $2) => { $1[\"maxFramerate\"] = $2; })"
        js_setMaxFramerate :: RTCRtpEncodingParameters -> Double -> IO ()
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxframerate RTCRtpEncodingParameters.maxFramerate specification>
setMaxFramerate :: (MonadDOM m) => RTCRtpEncodingParameters -> Double -> m ()
setMaxFramerate self val = liftDOM (void ((js_setMaxFramerate (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"maxFramerate\"]; })"
        js_getMaxFramerate :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxframerate RTCRtpEncodingParameters.maxFramerate specification>
getMaxFramerate :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe Double)
getMaxFramerate self = liftDOM (((js_getMaxFramerate (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxframerate RTCRtpEncodingParameters.maxFramerate specification>
getMaxFramerateUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m Double
getMaxFramerateUnsafe self = liftDOM ((((js_getMaxFramerate (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-maxframerate RTCRtpEncodingParameters.maxFramerate specification>
getMaxFramerateUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m Double
getMaxFramerateUnchecked self = liftDOM ((pFromJSVal <$> (js_getMaxFramerate (self))))

foreign import javascript safe "(($1, $2) => { $1[\"scaleResolutionDownBy\"] = $2; })"
        js_setScaleResolutionDownBy :: RTCRtpEncodingParameters -> Double -> IO ()
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-scaleresolutiondownby RTCRtpEncodingParameters.scaleResolutionDownBy specification>
setScaleResolutionDownBy :: (MonadDOM m) => RTCRtpEncodingParameters -> Double -> m ()
setScaleResolutionDownBy self val = liftDOM (void ((js_setScaleResolutionDownBy (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"scaleResolutionDownBy\"]; })"
        js_getScaleResolutionDownBy :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-scaleresolutiondownby RTCRtpEncodingParameters.scaleResolutionDownBy specification>
getScaleResolutionDownBy :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe Double)
getScaleResolutionDownBy self = liftDOM (((js_getScaleResolutionDownBy (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-scaleresolutiondownby RTCRtpEncodingParameters.scaleResolutionDownBy specification>
getScaleResolutionDownByUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m Double
getScaleResolutionDownByUnsafe self = liftDOM ((((js_getScaleResolutionDownBy (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-pc/#dom-rtcrtpencodingparameters-scaleresolutiondownby RTCRtpEncodingParameters.scaleResolutionDownBy specification>
getScaleResolutionDownByUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m Double
getScaleResolutionDownByUnchecked self = liftDOM ((pFromJSVal <$> (js_getScaleResolutionDownBy (self))))

foreign import javascript safe "(($1, $2) => { $1[\"priority\"] = $2; })"
        js_setPriority :: RTCRtpEncodingParameters -> JSVal -> IO ()
-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-priority RTCRtpEncodingParameters.priority specification>
setPriority :: (MonadDOM m) => RTCRtpEncodingParameters -> RTCPriorityType -> m ()
setPriority self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setPriority (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"priority\"]; })"
        js_getPriority :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-priority RTCRtpEncodingParameters.priority specification>
getPriority :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe RTCPriorityType)
getPriority self = liftDOM (((js_getPriority (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-priority RTCRtpEncodingParameters.priority specification>
getPriorityUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m RTCPriorityType
getPriorityUnsafe self = liftDOM ((((js_getPriority (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-priority RTCRtpEncodingParameters.priority specification>
getPriorityUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m RTCPriorityType
getPriorityUnchecked self = liftDOM ((pFromJSVal <$> (js_getPriority (self))))

foreign import javascript safe "(($1, $2) => { $1[\"networkPriority\"] = $2; })"
        js_setNetworkPriority :: RTCRtpEncodingParameters -> JSVal -> IO ()
-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-networkpriority RTCRtpEncodingParameters.networkPriority specification>
setNetworkPriority :: (MonadDOM m) => RTCRtpEncodingParameters -> RTCPriorityType -> m ()
setNetworkPriority self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setNetworkPriority (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"networkPriority\"]; })"
        js_getNetworkPriority :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-networkpriority RTCRtpEncodingParameters.networkPriority specification>
getNetworkPriority :: (MonadDOM m) => RTCRtpEncodingParameters -> m (Maybe RTCPriorityType)
getNetworkPriority self = liftDOM (((js_getNetworkPriority (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-networkpriority RTCRtpEncodingParameters.networkPriority specification>
getNetworkPriorityUnsafe :: (MonadDOM m, HasCallStack) => RTCRtpEncodingParameters -> m RTCPriorityType
getNetworkPriorityUnsafe self = liftDOM ((((js_getNetworkPriority (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-priority/#dom-rtcrtpencodingparameters-networkpriority RTCRtpEncodingParameters.networkPriority specification>
getNetworkPriorityUnchecked :: (MonadDOM m) => RTCRtpEncodingParameters -> m RTCPriorityType
getNetworkPriorityUnchecked self = liftDOM ((pFromJSVal <$> (js_getNetworkPriority (self))))

foreign import javascript safe "(($1, $2) => { $1[\"scalabilityMode\"] = $2; })"
        js_setScalabilityMode :: RTCRtpEncodingParameters -> JSString -> IO ()
-- | <https://w3c.github.io/webrtc-svc/#dom-rtcrtpencodingparameters-scalabilitymode RTCRtpEncodingParameters.scalabilityMode specification>
setScalabilityMode :: (MonadDOM m, ToJSString val) => RTCRtpEncodingParameters -> val -> m ()
setScalabilityMode self val = liftDOM (void ((js_setScalabilityMode (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"scalabilityMode\"]; })"
        js_getScalabilityMode :: RTCRtpEncodingParameters -> IO JSVal
-- | <https://w3c.github.io/webrtc-svc/#dom-rtcrtpencodingparameters-scalabilitymode RTCRtpEncodingParameters.scalabilityMode specification>
getScalabilityMode :: (MonadDOM m, FromJSString result) => RTCRtpEncodingParameters -> m (Maybe result)
getScalabilityMode self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getScalabilityMode (self))))

-- | <https://w3c.github.io/webrtc-svc/#dom-rtcrtpencodingparameters-scalabilitymode RTCRtpEncodingParameters.scalabilityMode specification>
getScalabilityModeUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => RTCRtpEncodingParameters -> m result
getScalabilityModeUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getScalabilityMode (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webrtc-svc/#dom-rtcrtpencodingparameters-scalabilitymode RTCRtpEncodingParameters.scalabilityMode specification>
getScalabilityModeUnchecked :: (MonadDOM m, FromJSString result) => RTCRtpEncodingParameters -> m result
getScalabilityModeUnchecked self = liftDOM ((pFromJSVal <$> (js_getScalabilityMode (self))))