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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from mediacapture-streams (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.MediaStream
       (js_newMediaStream, js_newMediaStream', js_newMediaStream'', js_addTrack, js_clone, js_getAudioTracks, js_getTrackById, js_getTracks, js_getVideoTracks, js_removeTrack, js_getId, js_getActive, newMediaStream, newMediaStream', newMediaStream'', addTrack, clone, clone_, getAudioTracks, getAudioTracks_, getTrackById, getTrackById_, getTrackByIdUnsafe, getTrackByIdUnchecked, getTracks, getTracks_, getVideoTracks, getVideoTracks_, removeTrack, getId, getActive, addTrackEvent, removeTrackEvent, MediaStream(..), gTypeMediaStream)
       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 new globalThis[\"MediaStream\"](); })"
        js_newMediaStream :: IO MediaStream
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/MediaStream MDN MediaStream. documentation>
newMediaStream :: (MonadDOM m) => m MediaStream
newMediaStream = liftDOM ((js_newMediaStream))

foreign import javascript safe "(($1) => { return new globalThis[\"MediaStream\"]($1); })"
        js_newMediaStream' :: MediaStream -> IO MediaStream
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/MediaStream MDN MediaStream. documentation>
newMediaStream' :: (MonadDOM m) => MediaStream -> m MediaStream
newMediaStream' stream = liftDOM ((js_newMediaStream' (stream)))

foreign import javascript safe "(($1) => { return new globalThis[\"MediaStream\"]($1); })"
        js_newMediaStream'' :: JSVal -> IO MediaStream
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/MediaStream MDN MediaStream. documentation>
newMediaStream'' :: (MonadDOM m, IsMediaStreamTrack tracks) => [tracks] -> m MediaStream
newMediaStream'' tracks = liftDOM (((toJSVal tracks) >>= \a1' -> js_newMediaStream'' a1'))

foreign import javascript safe "(($1, $2) => { return $1[\"addTrack\"]($2); })"
        js_addTrack :: MediaStream -> MediaStreamTrack -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/addTrack MDN MediaStream.addTrack documentation>
addTrack :: (MonadDOM m, IsMediaStreamTrack track) => MediaStream -> track -> m ()
addTrack self track = liftDOM (void ((js_addTrack (self) (Types.toMediaStreamTrack track))))

foreign import javascript safe "(($1) => { return $1[\"clone\"](); })"
        js_clone :: MediaStream -> IO MediaStream
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/clone MDN MediaStream.clone documentation>
clone :: (MonadDOM m) => MediaStream -> m MediaStream
clone self = liftDOM ((js_clone (self)))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/clone MDN MediaStream.clone documentation>
clone_ :: (MonadDOM m) => MediaStream -> m ()
clone_ self = liftDOM (void ((js_clone (self))))

foreign import javascript safe "(($1) => { return $1[\"getAudioTracks\"](); })"
        js_getAudioTracks :: MediaStream -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getAudioTracks MDN MediaStream.getAudioTracks documentation>
getAudioTracks :: (MonadDOM m) => MediaStream -> m [MediaStreamTrack]
getAudioTracks self = liftDOM (((js_getAudioTracks (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getAudioTracks MDN MediaStream.getAudioTracks documentation>
getAudioTracks_ :: (MonadDOM m) => MediaStream -> m ()
getAudioTracks_ self = liftDOM (void ((js_getAudioTracks (self))))

foreign import javascript safe "(($1, $2) => { return $1[\"getTrackById\"]($2); })"
        js_getTrackById :: MediaStream -> JSString -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getTrackById MDN MediaStream.getTrackById documentation>
getTrackById :: (MonadDOM m, ToJSString trackId) => MediaStream -> trackId -> m (Maybe MediaStreamTrack)
getTrackById self trackId = liftDOM (((js_getTrackById (self) (toJSString trackId)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getTrackById MDN MediaStream.getTrackById documentation>
getTrackById_ :: (MonadDOM m, ToJSString trackId) => MediaStream -> trackId -> m ()
getTrackById_ self trackId = liftDOM (void ((js_getTrackById (self) (toJSString trackId))))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getTrackById MDN MediaStream.getTrackById documentation>
getTrackByIdUnsafe :: (MonadDOM m, ToJSString trackId, HasCallStack) => MediaStream -> trackId -> m MediaStreamTrack
getTrackByIdUnsafe self trackId = liftDOM ((((js_getTrackById (self) (toJSString trackId)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getTrackById MDN MediaStream.getTrackById documentation>
getTrackByIdUnchecked :: (MonadDOM m, ToJSString trackId) => MediaStream -> trackId -> m MediaStreamTrack
getTrackByIdUnchecked self trackId = liftDOM ((pFromJSVal <$> (js_getTrackById (self) (toJSString trackId))))

foreign import javascript safe "(($1) => { return $1[\"getTracks\"](); })"
        js_getTracks :: MediaStream -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getTracks MDN MediaStream.getTracks documentation>
getTracks :: (MonadDOM m) => MediaStream -> m [MediaStreamTrack]
getTracks self = liftDOM (((js_getTracks (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getTracks MDN MediaStream.getTracks documentation>
getTracks_ :: (MonadDOM m) => MediaStream -> m ()
getTracks_ self = liftDOM (void ((js_getTracks (self))))

foreign import javascript safe "(($1) => { return $1[\"getVideoTracks\"](); })"
        js_getVideoTracks :: MediaStream -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getVideoTracks MDN MediaStream.getVideoTracks documentation>
getVideoTracks :: (MonadDOM m) => MediaStream -> m [MediaStreamTrack]
getVideoTracks self = liftDOM (((js_getVideoTracks (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/getVideoTracks MDN MediaStream.getVideoTracks documentation>
getVideoTracks_ :: (MonadDOM m) => MediaStream -> m ()
getVideoTracks_ self = liftDOM (void ((js_getVideoTracks (self))))

foreign import javascript safe "(($1, $2) => { return $1[\"removeTrack\"]($2); })"
        js_removeTrack :: MediaStream -> MediaStreamTrack -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/removeTrack MDN MediaStream.removeTrack documentation>
removeTrack :: (MonadDOM m, IsMediaStreamTrack track) => MediaStream -> track -> m ()
removeTrack self track = liftDOM (void ((js_removeTrack (self) (Types.toMediaStreamTrack track))))

foreign import javascript unsafe "(($1) => { return $1[\"id\"]; })"
        js_getId :: MediaStream -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/id MDN MediaStream.id documentation>
getId :: (MonadDOM m, FromJSString result) => MediaStream -> m result
getId self = liftDOM ((fromJSString <$> (js_getId (self))))

foreign import javascript unsafe "(($1) => { return $1[\"active\"]; })"
        js_getActive :: MediaStream -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/MediaStream/active MDN MediaStream.active documentation>
getActive :: (MonadDOM m) => MediaStream -> m Bool
getActive self = liftDOM ((js_getActive (self)))

-- | <https://w3c.github.io/mediacapture-main/#dom-mediastream-onaddtrack addtrack event>
addTrackEvent :: EventName MediaStream MediaStreamTrackEvent
addTrackEvent = unsafeEventName (toJSString "addtrack")

-- | <https://w3c.github.io/mediacapture-main/#dom-mediastream-onremovetrack removetrack event>
removeTrackEvent :: EventName MediaStream MediaStreamTrackEvent
removeTrackEvent = unsafeEventName (toJSString "removetrack")