content: {-# LANGUAGE PatternSynonyms #-}
  {-# LANGUAGE ForeignFunctionInterface #-}
  {-# LANGUAGE JavaScriptFFI #-}
  -- For HasCallStack compatibility
  {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
  module GHCJS.DOM.JSFFI.Generated.MediaDevices
         (js_enumerateDevices, enumerateDevices, enumerateDevices_,
          js_getSupportedConstraints, getSupportedConstraints,
          getSupportedConstraints_, js_getUserMedia, getUserMedia,
          getUserMedia_, devicechange, MediaDevices(..), gTypeMediaDevices)
         where
  import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)
  import qualified Prelude (error)
  import Data.Typeable (Typeable)
  import GHCJS.Types (JSVal(..), JSString)
  import GHCJS.Foreign (jsNull, jsUndefined)
  import GHC.JS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))
  import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))
  import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))
  import Control.Monad (void)
  import Control.Monad.IO.Class (MonadIO(..))
  import Data.Int (Int64)
  import Data.Word (Word, Word64)
  import Data.Maybe (fromJust)
  import Data.Traversable (mapM)
  import GHCJS.DOM.Types
  import Control.Applicative ((<$>))
  import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
  import GHCJS.DOM.JSFFI.Generated.Enums
   
  foreign import javascript interruptible
          "(($1, $c) => { return $1[\"enumerateDevices\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
          js_enumerateDevices :: MediaDevices -> IO (JSVal, JSVal)
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.enumerateDevices Mozilla MediaDevices.enumerateDevices documentation> 
  enumerateDevices ::
                   (MonadIO m) => MediaDevices -> m [MediaDeviceInfo]
  enumerateDevices self
    = liftIO
        (((js_enumerateDevices self) >>= checkPromiseResult) >>=
           fromJSValUnchecked)
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.enumerateDevices Mozilla MediaDevices.enumerateDevices documentation> 
  enumerateDevices_ :: (MonadIO m) => MediaDevices -> m ()
  enumerateDevices_ self = liftIO (void (js_enumerateDevices self))
   
  foreign import javascript unsafe
          "(($1) => { return $1[\"getSupportedConstraints\"](); })" js_getSupportedConstraints ::
          MediaDevices -> IO MediaTrackSupportedConstraints
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.getSupportedConstraints Mozilla MediaDevices.getSupportedConstraints documentation> 
  getSupportedConstraints ::
                          (MonadIO m) => MediaDevices -> m MediaTrackSupportedConstraints
  getSupportedConstraints self
    = liftIO (js_getSupportedConstraints self)
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.getSupportedConstraints Mozilla MediaDevices.getSupportedConstraints documentation> 
  getSupportedConstraints_ :: (MonadIO m) => MediaDevices -> m ()
  getSupportedConstraints_ self
    = liftIO (void (js_getSupportedConstraints self))
   
  foreign import javascript interruptible
          "(($1, $2, $c) => { return $1[\"getUserMedia\"]($2).then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
          js_getUserMedia ::
          MediaDevices ->
            Optional MediaStreamConstraints -> IO (JSVal, MediaStream)
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.getUserMedia Mozilla MediaDevices.getUserMedia documentation> 
  getUserMedia ::
               (MonadIO m) =>
                 MediaDevices -> Maybe MediaStreamConstraints -> m MediaStream
  getUserMedia self constraints
    = liftIO
        ((js_getUserMedia self (maybeToOptional constraints)) >>=
           checkPromiseResult)
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.getUserMedia Mozilla MediaDevices.getUserMedia documentation> 
  getUserMedia_ ::
                (MonadIO m) => MediaDevices -> Maybe MediaStreamConstraints -> m ()
  getUserMedia_ self constraints
    = liftIO
        (void (js_getUserMedia self (maybeToOptional constraints)))
  
  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaDevices.ondevicechange Mozilla MediaDevices.ondevicechange documentation> 
  devicechange :: EventName MediaDevices ondevicechange
  devicechange = unsafeEventName (toJSString "devicechange")