ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/VideoFrameInit.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.VideoFrameInit
       (js_newVideoFrameInit, js_setDuration, js_getDuration, js_setTimestamp, js_getTimestamp, js_setAlpha, js_getAlpha, js_setVisibleRect, js_getVisibleRect, js_setRotation, js_getRotation, js_setFlip, js_getFlip, js_setDisplayWidth, js_getDisplayWidth, js_setDisplayHeight, js_getDisplayHeight, js_setMetadata, js_getMetadata, newVideoFrameInit, setDuration, getDuration, getDurationUnsafe, getDurationUnchecked, setTimestamp, getTimestamp, getTimestampUnsafe, getTimestampUnchecked, setAlpha, getAlpha, getAlphaUnsafe, getAlphaUnchecked, setVisibleRect, getVisibleRect, getVisibleRectUnsafe, getVisibleRectUnchecked, setRotation, getRotation, getRotationUnsafe, getRotationUnchecked, setFlip, getFlip, getFlipUnsafe, getFlipUnchecked, setDisplayWidth, getDisplayWidth, getDisplayWidthUnsafe, getDisplayWidthUnchecked, setDisplayHeight, getDisplayHeight, getDisplayHeightUnsafe, getDisplayHeightUnchecked, setMetadata, getMetadata, getMetadataUnsafe, getMetadataUnchecked, VideoFrameInit(..), gTypeVideoFrameInit)
       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_newVideoFrameInit :: IO VideoFrameInit
-- | <https://w3c.github.io/webcodecs/#dictdef-videoframeinit VideoFrameInit specification>
newVideoFrameInit :: (MonadDOM m) => m VideoFrameInit
newVideoFrameInit = liftDOM ((js_newVideoFrameInit))

foreign import javascript safe "(($1, $2) => { $1[\"duration\"] = $2; })"
        js_setDuration :: VideoFrameInit -> JSVal -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-duration VideoFrameInit.duration specification>
setDuration :: (MonadDOM m) => VideoFrameInit -> Word53 -> m ()
setDuration self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setDuration (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"duration\"]; })"
        js_getDuration :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-duration VideoFrameInit.duration specification>
getDuration :: (MonadDOM m) => VideoFrameInit -> m (Maybe Word53)
getDuration self = liftDOM (((js_getDuration (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-duration VideoFrameInit.duration specification>
getDurationUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m Word53
getDurationUnsafe self = liftDOM ((((js_getDuration (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-duration VideoFrameInit.duration specification>
getDurationUnchecked :: (MonadDOM m) => VideoFrameInit -> m Word53
getDurationUnchecked self = liftDOM ((pFromJSVal <$> (js_getDuration (self))))

foreign import javascript safe "(($1, $2) => { $1[\"timestamp\"] = $2; })"
        js_setTimestamp :: VideoFrameInit -> JSVal -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-timestamp VideoFrameInit.timestamp specification>
setTimestamp :: (MonadDOM m) => VideoFrameInit -> Int53 -> m ()
setTimestamp self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setTimestamp (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"timestamp\"]; })"
        js_getTimestamp :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-timestamp VideoFrameInit.timestamp specification>
getTimestamp :: (MonadDOM m) => VideoFrameInit -> m (Maybe Int53)
getTimestamp self = liftDOM (((js_getTimestamp (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-timestamp VideoFrameInit.timestamp specification>
getTimestampUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m Int53
getTimestampUnsafe self = liftDOM ((((js_getTimestamp (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-timestamp VideoFrameInit.timestamp specification>
getTimestampUnchecked :: (MonadDOM m) => VideoFrameInit -> m Int53
getTimestampUnchecked self = liftDOM ((pFromJSVal <$> (js_getTimestamp (self))))

foreign import javascript safe "(($1, $2) => { $1[\"alpha\"] = $2; })"
        js_setAlpha :: VideoFrameInit -> JSVal -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-alpha VideoFrameInit.alpha specification>
setAlpha :: (MonadDOM m) => VideoFrameInit -> AlphaOption -> m ()
setAlpha self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setAlpha (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"alpha\"]; })"
        js_getAlpha :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-alpha VideoFrameInit.alpha specification>
getAlpha :: (MonadDOM m) => VideoFrameInit -> m (Maybe AlphaOption)
getAlpha self = liftDOM (((js_getAlpha (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-alpha VideoFrameInit.alpha specification>
getAlphaUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m AlphaOption
getAlphaUnsafe self = liftDOM ((((js_getAlpha (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-alpha VideoFrameInit.alpha specification>
getAlphaUnchecked :: (MonadDOM m) => VideoFrameInit -> m AlphaOption
getAlphaUnchecked self = liftDOM ((pFromJSVal <$> (js_getAlpha (self))))

foreign import javascript safe "(($1, $2) => { $1[\"visibleRect\"] = $2; })"
        js_setVisibleRect :: VideoFrameInit -> DOMRectInit -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-visiblerect VideoFrameInit.visibleRect specification>
setVisibleRect :: (MonadDOM m) => VideoFrameInit -> DOMRectInit -> m ()
setVisibleRect self val = liftDOM (void ((js_setVisibleRect (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"visibleRect\"]; })"
        js_getVisibleRect :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-visiblerect VideoFrameInit.visibleRect specification>
getVisibleRect :: (MonadDOM m) => VideoFrameInit -> m (Maybe DOMRectInit)
getVisibleRect self = liftDOM (((js_getVisibleRect (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-visiblerect VideoFrameInit.visibleRect specification>
getVisibleRectUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m DOMRectInit
getVisibleRectUnsafe self = liftDOM ((((js_getVisibleRect (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-visiblerect VideoFrameInit.visibleRect specification>
getVisibleRectUnchecked :: (MonadDOM m) => VideoFrameInit -> m DOMRectInit
getVisibleRectUnchecked self = liftDOM ((pFromJSVal <$> (js_getVisibleRect (self))))

foreign import javascript safe "(($1, $2) => { $1[\"rotation\"] = $2; })"
        js_setRotation :: VideoFrameInit -> Double -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-rotation VideoFrameInit.rotation specification>
setRotation :: (MonadDOM m) => VideoFrameInit -> Double -> m ()
setRotation self val = liftDOM (void ((js_setRotation (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"rotation\"]; })"
        js_getRotation :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-rotation VideoFrameInit.rotation specification>
getRotation :: (MonadDOM m) => VideoFrameInit -> m (Maybe Double)
getRotation self = liftDOM (((js_getRotation (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-rotation VideoFrameInit.rotation specification>
getRotationUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m Double
getRotationUnsafe self = liftDOM ((((js_getRotation (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-rotation VideoFrameInit.rotation specification>
getRotationUnchecked :: (MonadDOM m) => VideoFrameInit -> m Double
getRotationUnchecked self = liftDOM ((pFromJSVal <$> (js_getRotation (self))))

foreign import javascript safe "(($1, $2) => { $1[\"flip\"] = $2; })"
        js_setFlip :: VideoFrameInit -> Bool -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-flip VideoFrameInit.flip specification>
setFlip :: (MonadDOM m) => VideoFrameInit -> Bool -> m ()
setFlip self val = liftDOM (void ((js_setFlip (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"flip\"]; })"
        js_getFlip :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-flip VideoFrameInit.flip specification>
getFlip :: (MonadDOM m) => VideoFrameInit -> m (Maybe Bool)
getFlip self = liftDOM (((js_getFlip (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-flip VideoFrameInit.flip specification>
getFlipUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m Bool
getFlipUnsafe self = liftDOM ((((js_getFlip (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-flip VideoFrameInit.flip specification>
getFlipUnchecked :: (MonadDOM m) => VideoFrameInit -> m Bool
getFlipUnchecked self = liftDOM ((pFromJSVal <$> (js_getFlip (self))))

foreign import javascript safe "(($1, $2) => { $1[\"displayWidth\"] = $2; })"
        js_setDisplayWidth :: VideoFrameInit -> Word -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displaywidth VideoFrameInit.displayWidth specification>
setDisplayWidth :: (MonadDOM m) => VideoFrameInit -> Word -> m ()
setDisplayWidth self val = liftDOM (void ((js_setDisplayWidth (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"displayWidth\"]; })"
        js_getDisplayWidth :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displaywidth VideoFrameInit.displayWidth specification>
getDisplayWidth :: (MonadDOM m) => VideoFrameInit -> m (Maybe Word)
getDisplayWidth self = liftDOM (((js_getDisplayWidth (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displaywidth VideoFrameInit.displayWidth specification>
getDisplayWidthUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m Word
getDisplayWidthUnsafe self = liftDOM ((((js_getDisplayWidth (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displaywidth VideoFrameInit.displayWidth specification>
getDisplayWidthUnchecked :: (MonadDOM m) => VideoFrameInit -> m Word
getDisplayWidthUnchecked self = liftDOM ((pFromJSVal <$> (js_getDisplayWidth (self))))

foreign import javascript safe "(($1, $2) => { $1[\"displayHeight\"] = $2; })"
        js_setDisplayHeight :: VideoFrameInit -> Word -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displayheight VideoFrameInit.displayHeight specification>
setDisplayHeight :: (MonadDOM m) => VideoFrameInit -> Word -> m ()
setDisplayHeight self val = liftDOM (void ((js_setDisplayHeight (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"displayHeight\"]; })"
        js_getDisplayHeight :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displayheight VideoFrameInit.displayHeight specification>
getDisplayHeight :: (MonadDOM m) => VideoFrameInit -> m (Maybe Word)
getDisplayHeight self = liftDOM (((js_getDisplayHeight (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displayheight VideoFrameInit.displayHeight specification>
getDisplayHeightUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m Word
getDisplayHeightUnsafe self = liftDOM ((((js_getDisplayHeight (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-displayheight VideoFrameInit.displayHeight specification>
getDisplayHeightUnchecked :: (MonadDOM m) => VideoFrameInit -> m Word
getDisplayHeightUnchecked self = liftDOM ((pFromJSVal <$> (js_getDisplayHeight (self))))

foreign import javascript safe "(($1, $2) => { $1[\"metadata\"] = $2; })"
        js_setMetadata :: VideoFrameInit -> VideoFrameMetadata -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-metadata VideoFrameInit.metadata specification>
setMetadata :: (MonadDOM m) => VideoFrameInit -> VideoFrameMetadata -> m ()
setMetadata self val = liftDOM (void ((js_setMetadata (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"metadata\"]; })"
        js_getMetadata :: VideoFrameInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-metadata VideoFrameInit.metadata specification>
getMetadata :: (MonadDOM m) => VideoFrameInit -> m (Maybe VideoFrameMetadata)
getMetadata self = liftDOM (((js_getMetadata (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-metadata VideoFrameInit.metadata specification>
getMetadataUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameInit -> m VideoFrameMetadata
getMetadataUnsafe self = liftDOM ((((js_getMetadata (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-videoframeinit-metadata VideoFrameInit.metadata specification>
getMetadataUnchecked :: (MonadDOM m) => VideoFrameInit -> m VideoFrameMetadata
getMetadataUnchecked self = liftDOM ((pFromJSVal <$> (js_getMetadata (self))))