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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from media-capabilities (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.MediaCapabilitiesKeySystemConfiguration
       (js_newMediaCapabilitiesKeySystemConfiguration, js_setKeySystem, js_getKeySystem, js_setInitDataType, js_getInitDataType, js_setDistinctiveIdentifier, js_getDistinctiveIdentifier, js_setPersistentState, js_getPersistentState, js_setSessionTypes, js_getSessionTypes, js_setAudio, js_getAudio, js_setVideo, js_getVideo, newMediaCapabilitiesKeySystemConfiguration, setKeySystem, getKeySystem, setInitDataType, getInitDataType, getInitDataTypeUnsafe, getInitDataTypeUnchecked, setDistinctiveIdentifier, getDistinctiveIdentifier, getDistinctiveIdentifierUnsafe, getDistinctiveIdentifierUnchecked, setPersistentState, getPersistentState, getPersistentStateUnsafe, getPersistentStateUnchecked, setSessionTypes, getSessionTypes, getSessionTypesUnsafe, getSessionTypesUnchecked, setAudio, getAudio, getAudioUnsafe, getAudioUnchecked, setVideo, getVideo, getVideoUnsafe, getVideoUnchecked, MediaCapabilitiesKeySystemConfiguration(..), gTypeMediaCapabilitiesKeySystemConfiguration)
       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 "(($1) => { return ({\"keySystem\": $1}); })"
        js_newMediaCapabilitiesKeySystemConfiguration :: JSString -> IO MediaCapabilitiesKeySystemConfiguration
-- | <https://w3c.github.io/media-capabilities/#dictdef-mediacapabilitieskeysystemconfiguration MediaCapabilitiesKeySystemConfiguration specification>
newMediaCapabilitiesKeySystemConfiguration :: (MonadDOM m, ToJSString keySystem) => keySystem -> m MediaCapabilitiesKeySystemConfiguration
newMediaCapabilitiesKeySystemConfiguration keySystem = liftDOM ((js_newMediaCapabilitiesKeySystemConfiguration (toJSString keySystem)))

foreign import javascript safe "(($1, $2) => { $1[\"keySystem\"] = $2; })"
        js_setKeySystem :: MediaCapabilitiesKeySystemConfiguration -> JSString -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-keysystem MediaCapabilitiesKeySystemConfiguration.keySystem specification>
setKeySystem :: (MonadDOM m, ToJSString val) => MediaCapabilitiesKeySystemConfiguration -> val -> m ()
setKeySystem self val = liftDOM (void ((js_setKeySystem (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"keySystem\"]; })"
        js_getKeySystem :: MediaCapabilitiesKeySystemConfiguration -> IO JSString
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-keysystem MediaCapabilitiesKeySystemConfiguration.keySystem specification>
getKeySystem :: (MonadDOM m, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m result
getKeySystem self = liftDOM ((fromJSString <$> (js_getKeySystem (self))))

foreign import javascript safe "(($1, $2) => { $1[\"initDataType\"] = $2; })"
        js_setInitDataType :: MediaCapabilitiesKeySystemConfiguration -> JSString -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-initdatatype MediaCapabilitiesKeySystemConfiguration.initDataType specification>
setInitDataType :: (MonadDOM m, ToJSString val) => MediaCapabilitiesKeySystemConfiguration -> val -> m ()
setInitDataType self val = liftDOM (void ((js_setInitDataType (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"initDataType\"]; })"
        js_getInitDataType :: MediaCapabilitiesKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-initdatatype MediaCapabilitiesKeySystemConfiguration.initDataType specification>
getInitDataType :: (MonadDOM m, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m (Maybe result)
getInitDataType self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getInitDataType (self))))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-initdatatype MediaCapabilitiesKeySystemConfiguration.initDataType specification>
getInitDataTypeUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m result
getInitDataTypeUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getInitDataType (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-initdatatype MediaCapabilitiesKeySystemConfiguration.initDataType specification>
getInitDataTypeUnchecked :: (MonadDOM m, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m result
getInitDataTypeUnchecked self = liftDOM ((pFromJSVal <$> (js_getInitDataType (self))))

foreign import javascript safe "(($1, $2) => { $1[\"distinctiveIdentifier\"] = $2; })"
        js_setDistinctiveIdentifier :: MediaCapabilitiesKeySystemConfiguration -> JSVal -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-distinctiveidentifier MediaCapabilitiesKeySystemConfiguration.distinctiveIdentifier specification>
setDistinctiveIdentifier :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> MediaKeysRequirement -> m ()
setDistinctiveIdentifier self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setDistinctiveIdentifier (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"distinctiveIdentifier\"]; })"
        js_getDistinctiveIdentifier :: MediaCapabilitiesKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-distinctiveidentifier MediaCapabilitiesKeySystemConfiguration.distinctiveIdentifier specification>
getDistinctiveIdentifier :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m (Maybe MediaKeysRequirement)
getDistinctiveIdentifier self = liftDOM (((js_getDistinctiveIdentifier (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-distinctiveidentifier MediaCapabilitiesKeySystemConfiguration.distinctiveIdentifier specification>
getDistinctiveIdentifierUnsafe :: (MonadDOM m, HasCallStack) => MediaCapabilitiesKeySystemConfiguration -> m MediaKeysRequirement
getDistinctiveIdentifierUnsafe self = liftDOM ((((js_getDistinctiveIdentifier (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-distinctiveidentifier MediaCapabilitiesKeySystemConfiguration.distinctiveIdentifier specification>
getDistinctiveIdentifierUnchecked :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m MediaKeysRequirement
getDistinctiveIdentifierUnchecked self = liftDOM ((pFromJSVal <$> (js_getDistinctiveIdentifier (self))))

foreign import javascript safe "(($1, $2) => { $1[\"persistentState\"] = $2; })"
        js_setPersistentState :: MediaCapabilitiesKeySystemConfiguration -> JSVal -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-persistentstate MediaCapabilitiesKeySystemConfiguration.persistentState specification>
setPersistentState :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> MediaKeysRequirement -> m ()
setPersistentState self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setPersistentState (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"persistentState\"]; })"
        js_getPersistentState :: MediaCapabilitiesKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-persistentstate MediaCapabilitiesKeySystemConfiguration.persistentState specification>
getPersistentState :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m (Maybe MediaKeysRequirement)
getPersistentState self = liftDOM (((js_getPersistentState (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-persistentstate MediaCapabilitiesKeySystemConfiguration.persistentState specification>
getPersistentStateUnsafe :: (MonadDOM m, HasCallStack) => MediaCapabilitiesKeySystemConfiguration -> m MediaKeysRequirement
getPersistentStateUnsafe self = liftDOM ((((js_getPersistentState (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-persistentstate MediaCapabilitiesKeySystemConfiguration.persistentState specification>
getPersistentStateUnchecked :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m MediaKeysRequirement
getPersistentStateUnchecked self = liftDOM ((pFromJSVal <$> (js_getPersistentState (self))))

foreign import javascript safe "(($1, $2) => { $1[\"sessionTypes\"] = $2; })"
        js_setSessionTypes :: MediaCapabilitiesKeySystemConfiguration -> JSVal -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-sessiontypes MediaCapabilitiesKeySystemConfiguration.sessionTypes specification>
setSessionTypes :: (MonadDOM m, ToJSString val) => MediaCapabilitiesKeySystemConfiguration -> [val] -> m ()
setSessionTypes self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSessionTypes (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"sessionTypes\"]; })"
        js_getSessionTypes :: MediaCapabilitiesKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-sessiontypes MediaCapabilitiesKeySystemConfiguration.sessionTypes specification>
getSessionTypes :: (MonadDOM m, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m (Maybe [result])
getSessionTypes self = liftDOM (((js_getSessionTypes (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-sessiontypes MediaCapabilitiesKeySystemConfiguration.sessionTypes specification>
getSessionTypesUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m [result]
getSessionTypesUnsafe self = liftDOM ((((js_getSessionTypes (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-sessiontypes MediaCapabilitiesKeySystemConfiguration.sessionTypes specification>
getSessionTypesUnchecked :: (MonadDOM m, FromJSString result) => MediaCapabilitiesKeySystemConfiguration -> m [result]
getSessionTypesUnchecked self = liftDOM (((js_getSessionTypes (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"audio\"] = $2; })"
        js_setAudio :: MediaCapabilitiesKeySystemConfiguration -> KeySystemTrackConfiguration -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-audio MediaCapabilitiesKeySystemConfiguration.audio specification>
setAudio :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> KeySystemTrackConfiguration -> m ()
setAudio self val = liftDOM (void ((js_setAudio (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"audio\"]; })"
        js_getAudio :: MediaCapabilitiesKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-audio MediaCapabilitiesKeySystemConfiguration.audio specification>
getAudio :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m (Maybe KeySystemTrackConfiguration)
getAudio self = liftDOM (((js_getAudio (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-audio MediaCapabilitiesKeySystemConfiguration.audio specification>
getAudioUnsafe :: (MonadDOM m, HasCallStack) => MediaCapabilitiesKeySystemConfiguration -> m KeySystemTrackConfiguration
getAudioUnsafe self = liftDOM ((((js_getAudio (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-audio MediaCapabilitiesKeySystemConfiguration.audio specification>
getAudioUnchecked :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m KeySystemTrackConfiguration
getAudioUnchecked self = liftDOM ((pFromJSVal <$> (js_getAudio (self))))

foreign import javascript safe "(($1, $2) => { $1[\"video\"] = $2; })"
        js_setVideo :: MediaCapabilitiesKeySystemConfiguration -> KeySystemTrackConfiguration -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-video MediaCapabilitiesKeySystemConfiguration.video specification>
setVideo :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> KeySystemTrackConfiguration -> m ()
setVideo self val = liftDOM (void ((js_setVideo (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"video\"]; })"
        js_getVideo :: MediaCapabilitiesKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-video MediaCapabilitiesKeySystemConfiguration.video specification>
getVideo :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m (Maybe KeySystemTrackConfiguration)
getVideo self = liftDOM (((js_getVideo (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-video MediaCapabilitiesKeySystemConfiguration.video specification>
getVideoUnsafe :: (MonadDOM m, HasCallStack) => MediaCapabilitiesKeySystemConfiguration -> m KeySystemTrackConfiguration
getVideoUnsafe self = liftDOM ((((js_getVideo (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitieskeysystemconfiguration-video MediaCapabilitiesKeySystemConfiguration.video specification>
getVideoUnchecked :: (MonadDOM m) => MediaCapabilitiesKeySystemConfiguration -> m KeySystemTrackConfiguration
getVideoUnchecked self = liftDOM ((pFromJSVal <$> (js_getVideo (self))))