jsaddle-dom-0.10.0.0: src/JSDOM/Generated/MediaSessionActionDetails.hs
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from mediasession (webref). Do not edit.
module JSDOM.Generated.MediaSessionActionDetails
(newMediaSessionActionDetails, setAction, getAction, setSeekOffset, getSeekOffset, getSeekOffsetUnsafe, getSeekOffsetUnchecked, setSeekTime, getSeekTime, getSeekTimeUnsafe, getSeekTimeUnchecked, setFastSeek, getFastSeek, getFastSeekUnsafe, getFastSeekUnchecked, setIsActivating, getIsActivating, getIsActivatingUnsafe, getIsActivatingUnchecked, setEnterPictureInPictureReason, getEnterPictureInPictureReason, getEnterPictureInPictureReasonUnsafe, getEnterPictureInPictureReasonUnchecked, MediaSessionActionDetails(..), gTypeMediaSessionActionDetails)
where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums
-- | <https://w3c.github.io/mediasession/#dictdef-mediasessionactiondetails MediaSessionActionDetails specification>
newMediaSessionActionDetails :: (MonadDOM m) => MediaSessionAction -> m MediaSessionActionDetails
newMediaSessionActionDetails action = liftDOM ((((new (jsg "Object") () >>= \o -> (o ^. jss "action" (toJSVal action)) P.>> P.return o)) >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-action MediaSessionActionDetails.action specification>
setAction :: (MonadDOM m) => MediaSessionActionDetails -> MediaSessionAction -> m ()
setAction self val = liftDOM (void (self ^. jss "action" (toJSVal val)))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-action MediaSessionActionDetails.action specification>
getAction :: (MonadDOM m) => MediaSessionActionDetails -> m MediaSessionAction
getAction self = liftDOM (((self ^. js "action") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seekoffset MediaSessionActionDetails.seekOffset specification>
setSeekOffset :: (MonadDOM m) => MediaSessionActionDetails -> Double -> m ()
setSeekOffset self val = liftDOM (void (self ^. jss "seekOffset" (toJSVal val)))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seekoffset MediaSessionActionDetails.seekOffset specification>
getSeekOffset :: (MonadDOM m) => MediaSessionActionDetails -> m (Maybe Double)
getSeekOffset self = liftDOM (((self ^. js "seekOffset") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seekoffset MediaSessionActionDetails.seekOffset specification>
getSeekOffsetUnsafe :: (MonadDOM m, HasCallStack) => MediaSessionActionDetails -> m Double
getSeekOffsetUnsafe self = liftDOM ((((self ^. js "seekOffset") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seekoffset MediaSessionActionDetails.seekOffset specification>
getSeekOffsetUnchecked :: (MonadDOM m) => MediaSessionActionDetails -> m Double
getSeekOffsetUnchecked self = liftDOM (((self ^. js "seekOffset") >>= valToNumber))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seektime MediaSessionActionDetails.seekTime specification>
setSeekTime :: (MonadDOM m) => MediaSessionActionDetails -> Double -> m ()
setSeekTime self val = liftDOM (void (self ^. jss "seekTime" (toJSVal val)))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seektime MediaSessionActionDetails.seekTime specification>
getSeekTime :: (MonadDOM m) => MediaSessionActionDetails -> m (Maybe Double)
getSeekTime self = liftDOM (((self ^. js "seekTime") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seektime MediaSessionActionDetails.seekTime specification>
getSeekTimeUnsafe :: (MonadDOM m, HasCallStack) => MediaSessionActionDetails -> m Double
getSeekTimeUnsafe self = liftDOM ((((self ^. js "seekTime") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-seektime MediaSessionActionDetails.seekTime specification>
getSeekTimeUnchecked :: (MonadDOM m) => MediaSessionActionDetails -> m Double
getSeekTimeUnchecked self = liftDOM (((self ^. js "seekTime") >>= valToNumber))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-fastseek MediaSessionActionDetails.fastSeek specification>
setFastSeek :: (MonadDOM m) => MediaSessionActionDetails -> Bool -> m ()
setFastSeek self val = liftDOM (void (self ^. jss "fastSeek" (toJSVal val)))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-fastseek MediaSessionActionDetails.fastSeek specification>
getFastSeek :: (MonadDOM m) => MediaSessionActionDetails -> m (Maybe Bool)
getFastSeek self = liftDOM (((self ^. js "fastSeek") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-fastseek MediaSessionActionDetails.fastSeek specification>
getFastSeekUnsafe :: (MonadDOM m, HasCallStack) => MediaSessionActionDetails -> m Bool
getFastSeekUnsafe self = liftDOM ((((self ^. js "fastSeek") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-fastseek MediaSessionActionDetails.fastSeek specification>
getFastSeekUnchecked :: (MonadDOM m) => MediaSessionActionDetails -> m Bool
getFastSeekUnchecked self = liftDOM (((self ^. js "fastSeek") >>= valToBool))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-isactivating MediaSessionActionDetails.isActivating specification>
setIsActivating :: (MonadDOM m) => MediaSessionActionDetails -> Bool -> m ()
setIsActivating self val = liftDOM (void (self ^. jss "isActivating" (toJSVal val)))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-isactivating MediaSessionActionDetails.isActivating specification>
getIsActivating :: (MonadDOM m) => MediaSessionActionDetails -> m (Maybe Bool)
getIsActivating self = liftDOM (((self ^. js "isActivating") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-isactivating MediaSessionActionDetails.isActivating specification>
getIsActivatingUnsafe :: (MonadDOM m, HasCallStack) => MediaSessionActionDetails -> m Bool
getIsActivatingUnsafe self = liftDOM ((((self ^. js "isActivating") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-isactivating MediaSessionActionDetails.isActivating specification>
getIsActivatingUnchecked :: (MonadDOM m) => MediaSessionActionDetails -> m Bool
getIsActivatingUnchecked self = liftDOM (((self ^. js "isActivating") >>= valToBool))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-enterpictureinpicturereason MediaSessionActionDetails.enterPictureInPictureReason specification>
setEnterPictureInPictureReason :: (MonadDOM m) => MediaSessionActionDetails -> MediaSessionEnterPictureInPictureReason -> m ()
setEnterPictureInPictureReason self val = liftDOM (void (self ^. jss "enterPictureInPictureReason" (toJSVal val)))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-enterpictureinpicturereason MediaSessionActionDetails.enterPictureInPictureReason specification>
getEnterPictureInPictureReason :: (MonadDOM m) => MediaSessionActionDetails -> m (Maybe MediaSessionEnterPictureInPictureReason)
getEnterPictureInPictureReason self = liftDOM (((self ^. js "enterPictureInPictureReason") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-enterpictureinpicturereason MediaSessionActionDetails.enterPictureInPictureReason specification>
getEnterPictureInPictureReasonUnsafe :: (MonadDOM m, HasCallStack) => MediaSessionActionDetails -> m MediaSessionEnterPictureInPictureReason
getEnterPictureInPictureReasonUnsafe self = liftDOM ((((self ^. js "enterPictureInPictureReason") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://w3c.github.io/mediasession/#dom-mediasessionactiondetails-enterpictureinpicturereason MediaSessionActionDetails.enterPictureInPictureReason specification>
getEnterPictureInPictureReasonUnchecked :: (MonadDOM m) => MediaSessionActionDetails -> m MediaSessionEnterPictureInPictureReason
getEnterPictureInPictureReasonUnchecked self = liftDOM (((self ^. js "enterPictureInPictureReason") >>= fromJSValUnchecked))