{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.SourceBuffer (js_appendBuffer, appendBuffer, js_appendBufferView, appendBufferView, js_abort, abort, js_remove, remove, js_setMode, setMode, js_getMode, getMode, js_getUpdating, getUpdating, js_getBuffered, getBuffered, js_setTimestampOffset, setTimestampOffset, js_getTimestampOffset, getTimestampOffset, js_getAudioTracks, getAudioTracks, js_getVideoTracks, getVideoTracks, js_getTextTracks, getTextTracks, js_setAppendWindowStart, setAppendWindowStart, js_getAppendWindowStart, getAppendWindowStart, js_setAppendWindowEnd, setAppendWindowEnd, js_getAppendWindowEnd, getAppendWindowEnd, SourceBuffer, castToSourceBuffer, gTypeSourceBuffer) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord) import Data.Typeable (Typeable) import GHCJS.Types (JSRef(..), JSString) import GHCJS.Foreign (jsNull) import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..)) import GHCJS.Marshal (ToJSRef(..), FromJSRef(..)) import GHCJS.Marshal.Pure (PToJSRef(..), PFromJSRef(..)) import Control.Monad.IO.Class (MonadIO(..)) import Data.Int (Int64) import Data.Word (Word, Word64) import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName) import GHCJS.DOM.Enums foreign import javascript unsafe "$1[\"appendBuffer\"]($2)" js_appendBuffer :: SourceBuffer -> Nullable ArrayBuffer -> IO () -- | appendBuffer :: (MonadIO m, IsArrayBuffer data') => SourceBuffer -> Maybe data' -> m () appendBuffer self data' = liftIO (js_appendBuffer (self) (maybeToNullable (fmap toArrayBuffer data'))) foreign import javascript unsafe "$1[\"appendBuffer\"]($2)" js_appendBufferView :: SourceBuffer -> Nullable ArrayBufferView -> IO () -- | appendBufferView :: (MonadIO m, IsArrayBufferView data') => SourceBuffer -> Maybe data' -> m () appendBufferView self data' = liftIO (js_appendBufferView (self) (maybeToNullable (fmap toArrayBufferView data'))) foreign import javascript unsafe "$1[\"abort\"]()" js_abort :: SourceBuffer -> IO () -- | abort :: (MonadIO m) => SourceBuffer -> m () abort self = liftIO (js_abort (self)) foreign import javascript unsafe "$1[\"remove\"]($2, $3)" js_remove :: SourceBuffer -> Double -> Double -> IO () -- | remove :: (MonadIO m) => SourceBuffer -> Double -> Double -> m () remove self start end = liftIO (js_remove (self) start end) foreign import javascript unsafe "$1[\"mode\"] = $2;" js_setMode :: SourceBuffer -> JSRef -> IO () -- | setMode :: (MonadIO m) => SourceBuffer -> AppendMode -> m () setMode self val = liftIO (js_setMode (self) (pToJSRef val)) foreign import javascript unsafe "$1[\"mode\"]" js_getMode :: SourceBuffer -> IO JSRef -- | getMode :: (MonadIO m) => SourceBuffer -> m AppendMode getMode self = liftIO ((js_getMode (self)) >>= fromJSRefUnchecked) foreign import javascript unsafe "($1[\"updating\"] ? 1 : 0)" js_getUpdating :: SourceBuffer -> IO Bool -- | getUpdating :: (MonadIO m) => SourceBuffer -> m Bool getUpdating self = liftIO (js_getUpdating (self)) foreign import javascript unsafe "$1[\"buffered\"]" js_getBuffered :: SourceBuffer -> IO (Nullable TimeRanges) -- | getBuffered :: (MonadIO m) => SourceBuffer -> m (Maybe TimeRanges) getBuffered self = liftIO (nullableToMaybe <$> (js_getBuffered (self))) foreign import javascript unsafe "$1[\"timestampOffset\"] = $2;" js_setTimestampOffset :: SourceBuffer -> Double -> IO () -- | setTimestampOffset :: (MonadIO m) => SourceBuffer -> Double -> m () setTimestampOffset self val = liftIO (js_setTimestampOffset (self) val) foreign import javascript unsafe "$1[\"timestampOffset\"]" js_getTimestampOffset :: SourceBuffer -> IO Double -- | getTimestampOffset :: (MonadIO m) => SourceBuffer -> m Double getTimestampOffset self = liftIO (js_getTimestampOffset (self)) foreign import javascript unsafe "$1[\"audioTracks\"]" js_getAudioTracks :: SourceBuffer -> IO (Nullable AudioTrackList) -- | getAudioTracks :: (MonadIO m) => SourceBuffer -> m (Maybe AudioTrackList) getAudioTracks self = liftIO (nullableToMaybe <$> (js_getAudioTracks (self))) foreign import javascript unsafe "$1[\"videoTracks\"]" js_getVideoTracks :: SourceBuffer -> IO (Nullable VideoTrackList) -- | getVideoTracks :: (MonadIO m) => SourceBuffer -> m (Maybe VideoTrackList) getVideoTracks self = liftIO (nullableToMaybe <$> (js_getVideoTracks (self))) foreign import javascript unsafe "$1[\"textTracks\"]" js_getTextTracks :: SourceBuffer -> IO (Nullable TextTrackList) -- | getTextTracks :: (MonadIO m) => SourceBuffer -> m (Maybe TextTrackList) getTextTracks self = liftIO (nullableToMaybe <$> (js_getTextTracks (self))) foreign import javascript unsafe "$1[\"appendWindowStart\"] = $2;" js_setAppendWindowStart :: SourceBuffer -> Double -> IO () -- | setAppendWindowStart :: (MonadIO m) => SourceBuffer -> Double -> m () setAppendWindowStart self val = liftIO (js_setAppendWindowStart (self) val) foreign import javascript unsafe "$1[\"appendWindowStart\"]" js_getAppendWindowStart :: SourceBuffer -> IO Double -- | getAppendWindowStart :: (MonadIO m) => SourceBuffer -> m Double getAppendWindowStart self = liftIO (js_getAppendWindowStart (self)) foreign import javascript unsafe "$1[\"appendWindowEnd\"] = $2;" js_setAppendWindowEnd :: SourceBuffer -> Double -> IO () -- | setAppendWindowEnd :: (MonadIO m) => SourceBuffer -> Double -> m () setAppendWindowEnd self val = liftIO (js_setAppendWindowEnd (self) val) foreign import javascript unsafe "$1[\"appendWindowEnd\"]" js_getAppendWindowEnd :: SourceBuffer -> IO Double -- | getAppendWindowEnd :: (MonadIO m) => SourceBuffer -> m Double getAppendWindowEnd self = liftIO (js_getAppendWindowEnd (self))