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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webcodecs (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.VideoEncoderEncodeOptions
       (js_newVideoEncoderEncodeOptions, js_setKeyFrame, js_getKeyFrame, js_setAv1, js_getAv1, js_setAvc, js_getAvc, js_setHevc, js_getHevc, js_setVp9, js_getVp9, newVideoEncoderEncodeOptions, setKeyFrame, getKeyFrame, getKeyFrameUnsafe, getKeyFrameUnchecked, setAv1, getAv1, getAv1Unsafe, getAv1Unchecked, setAvc, getAvc, getAvcUnsafe, getAvcUnchecked, setHevc, getHevc, getHevcUnsafe, getHevcUnchecked, setVp9, getVp9, getVp9Unsafe, getVp9Unchecked, VideoEncoderEncodeOptions(..), gTypeVideoEncoderEncodeOptions)
       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_newVideoEncoderEncodeOptions :: IO VideoEncoderEncodeOptions
-- | <https://w3c.github.io/webcodecs/#dictdef-videoencoderencodeoptions VideoEncoderEncodeOptions specification>
newVideoEncoderEncodeOptions :: (MonadDOM m) => m VideoEncoderEncodeOptions
newVideoEncoderEncodeOptions = liftDOM ((js_newVideoEncoderEncodeOptions))

foreign import javascript safe "(($1, $2) => { $1[\"keyFrame\"] = $2; })"
        js_setKeyFrame :: VideoEncoderEncodeOptions -> Bool -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoencoderencodeoptions-keyframe VideoEncoderEncodeOptions.keyFrame specification>
setKeyFrame :: (MonadDOM m) => VideoEncoderEncodeOptions -> Bool -> m ()
setKeyFrame self val = liftDOM (void ((js_setKeyFrame (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"keyFrame\"]; })"
        js_getKeyFrame :: VideoEncoderEncodeOptions -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoencoderencodeoptions-keyframe VideoEncoderEncodeOptions.keyFrame specification>
getKeyFrame :: (MonadDOM m) => VideoEncoderEncodeOptions -> m (Maybe Bool)
getKeyFrame self = liftDOM (((js_getKeyFrame (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoencoderencodeoptions-keyframe VideoEncoderEncodeOptions.keyFrame specification>
getKeyFrameUnsafe :: (MonadDOM m, HasCallStack) => VideoEncoderEncodeOptions -> m Bool
getKeyFrameUnsafe self = liftDOM ((((js_getKeyFrame (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoencoderencodeoptions-keyframe VideoEncoderEncodeOptions.keyFrame specification>
getKeyFrameUnchecked :: (MonadDOM m) => VideoEncoderEncodeOptions -> m Bool
getKeyFrameUnchecked self = liftDOM ((pFromJSVal <$> (js_getKeyFrame (self))))

foreign import javascript safe "(($1, $2) => { $1[\"av1\"] = $2; })"
        js_setAv1 :: VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForAv1 -> IO ()
-- | <https://w3c.github.io/webcodecs/av1_codec_registration.html#dom-videoencoderencodeoptions-av1 VideoEncoderEncodeOptions.av1 specification>
setAv1 :: (MonadDOM m) => VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForAv1 -> m ()
setAv1 self val = liftDOM (void ((js_setAv1 (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"av1\"]; })"
        js_getAv1 :: VideoEncoderEncodeOptions -> IO JSVal
-- | <https://w3c.github.io/webcodecs/av1_codec_registration.html#dom-videoencoderencodeoptions-av1 VideoEncoderEncodeOptions.av1 specification>
getAv1 :: (MonadDOM m) => VideoEncoderEncodeOptions -> m (Maybe VideoEncoderEncodeOptionsForAv1)
getAv1 self = liftDOM (((js_getAv1 (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/av1_codec_registration.html#dom-videoencoderencodeoptions-av1 VideoEncoderEncodeOptions.av1 specification>
getAv1Unsafe :: (MonadDOM m, HasCallStack) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForAv1
getAv1Unsafe self = liftDOM ((((js_getAv1 (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/av1_codec_registration.html#dom-videoencoderencodeoptions-av1 VideoEncoderEncodeOptions.av1 specification>
getAv1Unchecked :: (MonadDOM m) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForAv1
getAv1Unchecked self = liftDOM ((pFromJSVal <$> (js_getAv1 (self))))

foreign import javascript safe "(($1, $2) => { $1[\"avc\"] = $2; })"
        js_setAvc :: VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForAvc -> IO ()
-- | <https://w3c.github.io/webcodecs/avc_codec_registration.html#dom-videoencoderencodeoptions-avc VideoEncoderEncodeOptions.avc specification>
setAvc :: (MonadDOM m) => VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForAvc -> m ()
setAvc self val = liftDOM (void ((js_setAvc (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"avc\"]; })"
        js_getAvc :: VideoEncoderEncodeOptions -> IO JSVal
-- | <https://w3c.github.io/webcodecs/avc_codec_registration.html#dom-videoencoderencodeoptions-avc VideoEncoderEncodeOptions.avc specification>
getAvc :: (MonadDOM m) => VideoEncoderEncodeOptions -> m (Maybe VideoEncoderEncodeOptionsForAvc)
getAvc self = liftDOM (((js_getAvc (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/avc_codec_registration.html#dom-videoencoderencodeoptions-avc VideoEncoderEncodeOptions.avc specification>
getAvcUnsafe :: (MonadDOM m, HasCallStack) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForAvc
getAvcUnsafe self = liftDOM ((((js_getAvc (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/avc_codec_registration.html#dom-videoencoderencodeoptions-avc VideoEncoderEncodeOptions.avc specification>
getAvcUnchecked :: (MonadDOM m) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForAvc
getAvcUnchecked self = liftDOM ((pFromJSVal <$> (js_getAvc (self))))

foreign import javascript safe "(($1, $2) => { $1[\"hevc\"] = $2; })"
        js_setHevc :: VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForHevc -> IO ()
-- | <https://w3c.github.io/webcodecs/hevc_codec_registration.html#dom-videoencoderencodeoptions-hevc VideoEncoderEncodeOptions.hevc specification>
setHevc :: (MonadDOM m) => VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForHevc -> m ()
setHevc self val = liftDOM (void ((js_setHevc (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"hevc\"]; })"
        js_getHevc :: VideoEncoderEncodeOptions -> IO JSVal
-- | <https://w3c.github.io/webcodecs/hevc_codec_registration.html#dom-videoencoderencodeoptions-hevc VideoEncoderEncodeOptions.hevc specification>
getHevc :: (MonadDOM m) => VideoEncoderEncodeOptions -> m (Maybe VideoEncoderEncodeOptionsForHevc)
getHevc self = liftDOM (((js_getHevc (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/hevc_codec_registration.html#dom-videoencoderencodeoptions-hevc VideoEncoderEncodeOptions.hevc specification>
getHevcUnsafe :: (MonadDOM m, HasCallStack) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForHevc
getHevcUnsafe self = liftDOM ((((js_getHevc (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/hevc_codec_registration.html#dom-videoencoderencodeoptions-hevc VideoEncoderEncodeOptions.hevc specification>
getHevcUnchecked :: (MonadDOM m) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForHevc
getHevcUnchecked self = liftDOM ((pFromJSVal <$> (js_getHevc (self))))

foreign import javascript safe "(($1, $2) => { $1[\"vp9\"] = $2; })"
        js_setVp9 :: VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForVp9 -> IO ()
-- | <https://w3c.github.io/webcodecs/vp9_codec_registration.html#dom-videoencoderencodeoptions-vp9 VideoEncoderEncodeOptions.vp9 specification>
setVp9 :: (MonadDOM m) => VideoEncoderEncodeOptions -> VideoEncoderEncodeOptionsForVp9 -> m ()
setVp9 self val = liftDOM (void ((js_setVp9 (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"vp9\"]; })"
        js_getVp9 :: VideoEncoderEncodeOptions -> IO JSVal
-- | <https://w3c.github.io/webcodecs/vp9_codec_registration.html#dom-videoencoderencodeoptions-vp9 VideoEncoderEncodeOptions.vp9 specification>
getVp9 :: (MonadDOM m) => VideoEncoderEncodeOptions -> m (Maybe VideoEncoderEncodeOptionsForVp9)
getVp9 self = liftDOM (((js_getVp9 (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/vp9_codec_registration.html#dom-videoencoderencodeoptions-vp9 VideoEncoderEncodeOptions.vp9 specification>
getVp9Unsafe :: (MonadDOM m, HasCallStack) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForVp9
getVp9Unsafe self = liftDOM ((((js_getVp9 (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/vp9_codec_registration.html#dom-videoencoderencodeoptions-vp9 VideoEncoderEncodeOptions.vp9 specification>
getVp9Unchecked :: (MonadDOM m) => VideoEncoderEncodeOptions -> m VideoEncoderEncodeOptionsForVp9
getVp9Unchecked self = liftDOM ((pFromJSVal <$> (js_getVp9 (self))))