{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.AllVideoCapabilities (js_getSourceType, getSourceType, js_getSourceId, getSourceId, js_getWidth, getWidth, js_getHeight, getHeight, js_getFrameRate, getFrameRate, js_getAspectRatio, getAspectRatio, js_getFacingMode, getFacingMode, AllVideoCapabilities, castToAllVideoCapabilities, gTypeAllVideoCapabilities) 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, castRef) 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[\"sourceType\"]" js_getSourceType :: JSRef AllVideoCapabilities -> IO (JSRef [result]) -- | getSourceType :: (MonadIO m, FromJSString result) => AllVideoCapabilities -> m [result] getSourceType self = liftIO ((js_getSourceType (unAllVideoCapabilities self)) >>= fromJSRefUnchecked) foreign import javascript unsafe "$1[\"sourceId\"]" js_getSourceId :: JSRef AllVideoCapabilities -> IO (JSRef [result]) -- | getSourceId :: (MonadIO m, FromJSString result) => AllVideoCapabilities -> m [result] getSourceId self = liftIO ((js_getSourceId (unAllVideoCapabilities self)) >>= fromJSRefUnchecked) foreign import javascript unsafe "$1[\"width\"]" js_getWidth :: JSRef AllVideoCapabilities -> IO (JSRef CapabilityRange) -- | getWidth :: (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange) getWidth self = liftIO ((js_getWidth (unAllVideoCapabilities self)) >>= fromJSRef) foreign import javascript unsafe "$1[\"height\"]" js_getHeight :: JSRef AllVideoCapabilities -> IO (JSRef CapabilityRange) -- | getHeight :: (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange) getHeight self = liftIO ((js_getHeight (unAllVideoCapabilities self)) >>= fromJSRef) foreign import javascript unsafe "$1[\"frameRate\"]" js_getFrameRate :: JSRef AllVideoCapabilities -> IO (JSRef CapabilityRange) -- | getFrameRate :: (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange) getFrameRate self = liftIO ((js_getFrameRate (unAllVideoCapabilities self)) >>= fromJSRef) foreign import javascript unsafe "$1[\"aspectRatio\"]" js_getAspectRatio :: JSRef AllVideoCapabilities -> IO (JSRef CapabilityRange) -- | getAspectRatio :: (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange) getAspectRatio self = liftIO ((js_getAspectRatio (unAllVideoCapabilities self)) >>= fromJSRef) foreign import javascript unsafe "$1[\"facingMode\"]" js_getFacingMode :: JSRef AllVideoCapabilities -> IO (JSRef [result]) -- | getFacingMode :: (MonadIO m, FromJSString result) => AllVideoCapabilities -> m [result] getFacingMode self = liftIO ((js_getFacingMode (unAllVideoCapabilities self)) >>= fromJSRefUnchecked)