ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/VideoFrameCallbackMetadata.hs
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from video-rvfc (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.VideoFrameCallbackMetadata
(js_newVideoFrameCallbackMetadata, js_setPresentationTime, js_getPresentationTime, js_setExpectedDisplayTime, js_getExpectedDisplayTime, js_setWidth, js_getWidth, js_setHeight, js_getHeight, js_setMediaTime, js_getMediaTime, js_setPresentedFrames, js_getPresentedFrames, js_setProcessingDuration, js_getProcessingDuration, js_setCaptureTime, js_getCaptureTime, js_setReceiveTime, js_getReceiveTime, js_setRtpTimestamp, js_getRtpTimestamp, newVideoFrameCallbackMetadata, setPresentationTime, getPresentationTime, setExpectedDisplayTime, getExpectedDisplayTime, setWidth, getWidth, setHeight, getHeight, setMediaTime, getMediaTime, setPresentedFrames, getPresentedFrames, setProcessingDuration, getProcessingDuration, getProcessingDurationUnsafe, getProcessingDurationUnchecked, setCaptureTime, getCaptureTime, getCaptureTimeUnsafe, getCaptureTimeUnchecked, setReceiveTime, getReceiveTime, getReceiveTimeUnsafe, getReceiveTimeUnchecked, setRtpTimestamp, getRtpTimestamp, getRtpTimestampUnsafe, getRtpTimestampUnchecked, VideoFrameCallbackMetadata(..), gTypeVideoFrameCallbackMetadata)
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 "(($1, $2, $3, $4, $5, $6) => { return ({\"presentationTime\": $1, \"expectedDisplayTime\": $2, \"width\": $3, \"height\": $4, \"mediaTime\": $5, \"presentedFrames\": $6}); })"
js_newVideoFrameCallbackMetadata :: Double -> Double -> Word -> Word -> Double -> Word -> IO VideoFrameCallbackMetadata
-- | <https://wicg.github.io/video-rvfc/#dictdef-videoframecallbackmetadata VideoFrameCallbackMetadata specification>
newVideoFrameCallbackMetadata :: (MonadDOM m) => Double -> Double -> Word -> Word -> Double -> Word -> m VideoFrameCallbackMetadata
newVideoFrameCallbackMetadata presentationTime expectedDisplayTime width height mediaTime presentedFrames = liftDOM ((js_newVideoFrameCallbackMetadata (presentationTime) (expectedDisplayTime) (width) (height) (mediaTime) (presentedFrames)))
foreign import javascript safe "(($1, $2) => { $1[\"presentationTime\"] = $2; })"
js_setPresentationTime :: VideoFrameCallbackMetadata -> Double -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-presentationtime VideoFrameCallbackMetadata.presentationTime specification>
setPresentationTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> Double -> m ()
setPresentationTime self val = liftDOM (void ((js_setPresentationTime (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"presentationTime\"]; })"
js_getPresentationTime :: VideoFrameCallbackMetadata -> IO Double
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-presentationtime VideoFrameCallbackMetadata.presentationTime specification>
getPresentationTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Double
getPresentationTime self = liftDOM ((js_getPresentationTime (self)))
foreign import javascript safe "(($1, $2) => { $1[\"expectedDisplayTime\"] = $2; })"
js_setExpectedDisplayTime :: VideoFrameCallbackMetadata -> Double -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-expecteddisplaytime VideoFrameCallbackMetadata.expectedDisplayTime specification>
setExpectedDisplayTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> Double -> m ()
setExpectedDisplayTime self val = liftDOM (void ((js_setExpectedDisplayTime (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"expectedDisplayTime\"]; })"
js_getExpectedDisplayTime :: VideoFrameCallbackMetadata -> IO Double
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-expecteddisplaytime VideoFrameCallbackMetadata.expectedDisplayTime specification>
getExpectedDisplayTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Double
getExpectedDisplayTime self = liftDOM ((js_getExpectedDisplayTime (self)))
foreign import javascript safe "(($1, $2) => { $1[\"width\"] = $2; })"
js_setWidth :: VideoFrameCallbackMetadata -> Word -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-width VideoFrameCallbackMetadata.width specification>
setWidth :: (MonadDOM m) => VideoFrameCallbackMetadata -> Word -> m ()
setWidth self val = liftDOM (void ((js_setWidth (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"width\"]; })"
js_getWidth :: VideoFrameCallbackMetadata -> IO Word
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-width VideoFrameCallbackMetadata.width specification>
getWidth :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Word
getWidth self = liftDOM ((js_getWidth (self)))
foreign import javascript safe "(($1, $2) => { $1[\"height\"] = $2; })"
js_setHeight :: VideoFrameCallbackMetadata -> Word -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-height VideoFrameCallbackMetadata.height specification>
setHeight :: (MonadDOM m) => VideoFrameCallbackMetadata -> Word -> m ()
setHeight self val = liftDOM (void ((js_setHeight (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"height\"]; })"
js_getHeight :: VideoFrameCallbackMetadata -> IO Word
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-height VideoFrameCallbackMetadata.height specification>
getHeight :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Word
getHeight self = liftDOM ((js_getHeight (self)))
foreign import javascript safe "(($1, $2) => { $1[\"mediaTime\"] = $2; })"
js_setMediaTime :: VideoFrameCallbackMetadata -> Double -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-mediatime VideoFrameCallbackMetadata.mediaTime specification>
setMediaTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> Double -> m ()
setMediaTime self val = liftDOM (void ((js_setMediaTime (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"mediaTime\"]; })"
js_getMediaTime :: VideoFrameCallbackMetadata -> IO Double
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-mediatime VideoFrameCallbackMetadata.mediaTime specification>
getMediaTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Double
getMediaTime self = liftDOM ((js_getMediaTime (self)))
foreign import javascript safe "(($1, $2) => { $1[\"presentedFrames\"] = $2; })"
js_setPresentedFrames :: VideoFrameCallbackMetadata -> Word -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-presentedframes VideoFrameCallbackMetadata.presentedFrames specification>
setPresentedFrames :: (MonadDOM m) => VideoFrameCallbackMetadata -> Word -> m ()
setPresentedFrames self val = liftDOM (void ((js_setPresentedFrames (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"presentedFrames\"]; })"
js_getPresentedFrames :: VideoFrameCallbackMetadata -> IO Word
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-presentedframes VideoFrameCallbackMetadata.presentedFrames specification>
getPresentedFrames :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Word
getPresentedFrames self = liftDOM ((js_getPresentedFrames (self)))
foreign import javascript safe "(($1, $2) => { $1[\"processingDuration\"] = $2; })"
js_setProcessingDuration :: VideoFrameCallbackMetadata -> Double -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-processingduration VideoFrameCallbackMetadata.processingDuration specification>
setProcessingDuration :: (MonadDOM m) => VideoFrameCallbackMetadata -> Double -> m ()
setProcessingDuration self val = liftDOM (void ((js_setProcessingDuration (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"processingDuration\"]; })"
js_getProcessingDuration :: VideoFrameCallbackMetadata -> IO JSVal
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-processingduration VideoFrameCallbackMetadata.processingDuration specification>
getProcessingDuration :: (MonadDOM m) => VideoFrameCallbackMetadata -> m (Maybe Double)
getProcessingDuration self = liftDOM (((js_getProcessingDuration (self)) >>= fromJSValUnchecked))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-processingduration VideoFrameCallbackMetadata.processingDuration specification>
getProcessingDurationUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameCallbackMetadata -> m Double
getProcessingDurationUnsafe self = liftDOM ((((js_getProcessingDuration (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-processingduration VideoFrameCallbackMetadata.processingDuration specification>
getProcessingDurationUnchecked :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Double
getProcessingDurationUnchecked self = liftDOM ((pFromJSVal <$> (js_getProcessingDuration (self))))
foreign import javascript safe "(($1, $2) => { $1[\"captureTime\"] = $2; })"
js_setCaptureTime :: VideoFrameCallbackMetadata -> Double -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-capturetime VideoFrameCallbackMetadata.captureTime specification>
setCaptureTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> Double -> m ()
setCaptureTime self val = liftDOM (void ((js_setCaptureTime (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"captureTime\"]; })"
js_getCaptureTime :: VideoFrameCallbackMetadata -> IO JSVal
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-capturetime VideoFrameCallbackMetadata.captureTime specification>
getCaptureTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> m (Maybe Double)
getCaptureTime self = liftDOM (((js_getCaptureTime (self)) >>= fromJSValUnchecked))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-capturetime VideoFrameCallbackMetadata.captureTime specification>
getCaptureTimeUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameCallbackMetadata -> m Double
getCaptureTimeUnsafe self = liftDOM ((((js_getCaptureTime (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-capturetime VideoFrameCallbackMetadata.captureTime specification>
getCaptureTimeUnchecked :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Double
getCaptureTimeUnchecked self = liftDOM ((pFromJSVal <$> (js_getCaptureTime (self))))
foreign import javascript safe "(($1, $2) => { $1[\"receiveTime\"] = $2; })"
js_setReceiveTime :: VideoFrameCallbackMetadata -> Double -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-receivetime VideoFrameCallbackMetadata.receiveTime specification>
setReceiveTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> Double -> m ()
setReceiveTime self val = liftDOM (void ((js_setReceiveTime (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"receiveTime\"]; })"
js_getReceiveTime :: VideoFrameCallbackMetadata -> IO JSVal
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-receivetime VideoFrameCallbackMetadata.receiveTime specification>
getReceiveTime :: (MonadDOM m) => VideoFrameCallbackMetadata -> m (Maybe Double)
getReceiveTime self = liftDOM (((js_getReceiveTime (self)) >>= fromJSValUnchecked))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-receivetime VideoFrameCallbackMetadata.receiveTime specification>
getReceiveTimeUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameCallbackMetadata -> m Double
getReceiveTimeUnsafe self = liftDOM ((((js_getReceiveTime (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-receivetime VideoFrameCallbackMetadata.receiveTime specification>
getReceiveTimeUnchecked :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Double
getReceiveTimeUnchecked self = liftDOM ((pFromJSVal <$> (js_getReceiveTime (self))))
foreign import javascript safe "(($1, $2) => { $1[\"rtpTimestamp\"] = $2; })"
js_setRtpTimestamp :: VideoFrameCallbackMetadata -> Word -> IO ()
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-rtptimestamp VideoFrameCallbackMetadata.rtpTimestamp specification>
setRtpTimestamp :: (MonadDOM m) => VideoFrameCallbackMetadata -> Word -> m ()
setRtpTimestamp self val = liftDOM (void ((js_setRtpTimestamp (self) (val))))
foreign import javascript unsafe "(($1) => { return $1[\"rtpTimestamp\"]; })"
js_getRtpTimestamp :: VideoFrameCallbackMetadata -> IO JSVal
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-rtptimestamp VideoFrameCallbackMetadata.rtpTimestamp specification>
getRtpTimestamp :: (MonadDOM m) => VideoFrameCallbackMetadata -> m (Maybe Word)
getRtpTimestamp self = liftDOM (((js_getRtpTimestamp (self)) >>= fromJSValUnchecked))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-rtptimestamp VideoFrameCallbackMetadata.rtpTimestamp specification>
getRtpTimestampUnsafe :: (MonadDOM m, HasCallStack) => VideoFrameCallbackMetadata -> m Word
getRtpTimestampUnsafe self = liftDOM ((((js_getRtpTimestamp (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://wicg.github.io/video-rvfc/#dom-videoframecallbackmetadata-rtptimestamp VideoFrameCallbackMetadata.rtpTimestamp specification>
getRtpTimestampUnchecked :: (MonadDOM m) => VideoFrameCallbackMetadata -> m Word
getRtpTimestampUnchecked self = liftDOM ((pFromJSVal <$> (js_getRtpTimestamp (self))))