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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from encrypted-media-2 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.MediaKeySystemConfiguration
       (js_newMediaKeySystemConfiguration, js_setLabel, js_getLabel, js_setInitDataTypes, js_getInitDataTypes, js_setAudioCapabilities, js_getAudioCapabilities, js_setVideoCapabilities, js_getVideoCapabilities, js_setDistinctiveIdentifier, js_getDistinctiveIdentifier, js_setPersistentState, js_getPersistentState, js_setSessionTypes, js_getSessionTypes, newMediaKeySystemConfiguration, setLabel, getLabel, getLabelUnsafe, getLabelUnchecked, setInitDataTypes, getInitDataTypes, getInitDataTypesUnsafe, getInitDataTypesUnchecked, setAudioCapabilities, getAudioCapabilities, getAudioCapabilitiesUnsafe, getAudioCapabilitiesUnchecked, setVideoCapabilities, getVideoCapabilities, getVideoCapabilitiesUnsafe, getVideoCapabilitiesUnchecked, setDistinctiveIdentifier, getDistinctiveIdentifier, getDistinctiveIdentifierUnsafe, getDistinctiveIdentifierUnchecked, setPersistentState, getPersistentState, getPersistentStateUnsafe, getPersistentStateUnchecked, setSessionTypes, getSessionTypes, getSessionTypesUnsafe, getSessionTypesUnchecked, MediaKeySystemConfiguration(..), gTypeMediaKeySystemConfiguration)
       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 ({}); })"
        js_newMediaKeySystemConfiguration :: IO MediaKeySystemConfiguration
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration MediaKeySystemConfiguration specification>
newMediaKeySystemConfiguration :: (MonadDOM m) => m MediaKeySystemConfiguration
newMediaKeySystemConfiguration = liftDOM ((js_newMediaKeySystemConfiguration))

foreign import javascript safe "(($1, $2) => { $1[\"label\"] = $2; })"
        js_setLabel :: MediaKeySystemConfiguration -> JSString -> IO ()
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-label MediaKeySystemConfiguration.label specification>
setLabel :: (MonadDOM m, ToJSString val) => MediaKeySystemConfiguration -> val -> m ()
setLabel self val = liftDOM (void ((js_setLabel (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"label\"]; })"
        js_getLabel :: MediaKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-label MediaKeySystemConfiguration.label specification>
getLabel :: (MonadDOM m, FromJSString result) => MediaKeySystemConfiguration -> m (Maybe result)
getLabel self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getLabel (self))))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-label MediaKeySystemConfiguration.label specification>
getLabelUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => MediaKeySystemConfiguration -> m result
getLabelUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getLabel (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-label MediaKeySystemConfiguration.label specification>
getLabelUnchecked :: (MonadDOM m, FromJSString result) => MediaKeySystemConfiguration -> m result
getLabelUnchecked self = liftDOM ((pFromJSVal <$> (js_getLabel (self))))

foreign import javascript safe "(($1, $2) => { $1[\"initDataTypes\"] = $2; })"
        js_setInitDataTypes :: MediaKeySystemConfiguration -> JSVal -> IO ()
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-initdatatypes MediaKeySystemConfiguration.initDataTypes specification>
setInitDataTypes :: (MonadDOM m, ToJSString val) => MediaKeySystemConfiguration -> [val] -> m ()
setInitDataTypes self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setInitDataTypes (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"initDataTypes\"]; })"
        js_getInitDataTypes :: MediaKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-initdatatypes MediaKeySystemConfiguration.initDataTypes specification>
getInitDataTypes :: (MonadDOM m, FromJSString result) => MediaKeySystemConfiguration -> m (Maybe [result])
getInitDataTypes self = liftDOM (((js_getInitDataTypes (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-initdatatypes MediaKeySystemConfiguration.initDataTypes specification>
getInitDataTypesUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => MediaKeySystemConfiguration -> m [result]
getInitDataTypesUnsafe self = liftDOM ((((js_getInitDataTypes (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-initdatatypes MediaKeySystemConfiguration.initDataTypes specification>
getInitDataTypesUnchecked :: (MonadDOM m, FromJSString result) => MediaKeySystemConfiguration -> m [result]
getInitDataTypesUnchecked self = liftDOM (((js_getInitDataTypes (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"audioCapabilities\"] = $2; })"
        js_setAudioCapabilities :: MediaKeySystemConfiguration -> JSVal -> IO ()
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-audiocapabilities MediaKeySystemConfiguration.audioCapabilities specification>
setAudioCapabilities :: (MonadDOM m) => MediaKeySystemConfiguration -> [MediaKeySystemMediaCapability] -> m ()
setAudioCapabilities self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setAudioCapabilities (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"audioCapabilities\"]; })"
        js_getAudioCapabilities :: MediaKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-audiocapabilities MediaKeySystemConfiguration.audioCapabilities specification>
getAudioCapabilities :: (MonadDOM m) => MediaKeySystemConfiguration -> m (Maybe [MediaKeySystemMediaCapability])
getAudioCapabilities self = liftDOM (((js_getAudioCapabilities (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-audiocapabilities MediaKeySystemConfiguration.audioCapabilities specification>
getAudioCapabilitiesUnsafe :: (MonadDOM m, HasCallStack) => MediaKeySystemConfiguration -> m [MediaKeySystemMediaCapability]
getAudioCapabilitiesUnsafe self = liftDOM ((((js_getAudioCapabilities (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-audiocapabilities MediaKeySystemConfiguration.audioCapabilities specification>
getAudioCapabilitiesUnchecked :: (MonadDOM m) => MediaKeySystemConfiguration -> m [MediaKeySystemMediaCapability]
getAudioCapabilitiesUnchecked self = liftDOM (((js_getAudioCapabilities (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"videoCapabilities\"] = $2; })"
        js_setVideoCapabilities :: MediaKeySystemConfiguration -> JSVal -> IO ()
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-videocapabilities MediaKeySystemConfiguration.videoCapabilities specification>
setVideoCapabilities :: (MonadDOM m) => MediaKeySystemConfiguration -> [MediaKeySystemMediaCapability] -> m ()
setVideoCapabilities self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setVideoCapabilities (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"videoCapabilities\"]; })"
        js_getVideoCapabilities :: MediaKeySystemConfiguration -> IO JSVal
-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-videocapabilities MediaKeySystemConfiguration.videoCapabilities specification>
getVideoCapabilities :: (MonadDOM m) => MediaKeySystemConfiguration -> m (Maybe [MediaKeySystemMediaCapability])
getVideoCapabilities self = liftDOM (((js_getVideoCapabilities (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-videocapabilities MediaKeySystemConfiguration.videoCapabilities specification>
getVideoCapabilitiesUnsafe :: (MonadDOM m, HasCallStack) => MediaKeySystemConfiguration -> m [MediaKeySystemMediaCapability]
getVideoCapabilitiesUnsafe self = liftDOM ((((js_getVideoCapabilities (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/encrypted-media/#dom-mediakeysystemconfiguration-videocapabilities MediaKeySystemConfiguration.videoCapabilities specification>
getVideoCapabilitiesUnchecked :: (MonadDOM m) => MediaKeySystemConfiguration -> m [MediaKeySystemMediaCapability]
getVideoCapabilitiesUnchecked self = liftDOM (((js_getVideoCapabilities (self)) >>= fromJSValUnchecked))

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

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

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

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

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

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

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

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

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

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

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

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