AudioDataInit.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webcodecs (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.AudioDataInit
       (js_newAudioDataInit, js_setFormat, js_getFormat, js_setSampleRate, js_getSampleRate, js_setNumberOfFrames, js_getNumberOfFrames, js_setNumberOfChannels, js_getNumberOfChannels, js_setTimestamp, js_getTimestamp, js_setData, js_getData, js_setTransfer, js_getTransfer, newAudioDataInit, setFormat, getFormat, setSampleRate, getSampleRate, setNumberOfFrames, getNumberOfFrames, setNumberOfChannels, getNumberOfChannels, setTimestamp, getTimestamp, setData, getData, setTransfer, getTransfer, getTransferUnsafe, getTransferUnchecked, AudioDataInit(..), gTypeAudioDataInit)
       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, $2, $3, $4, $5, $6) => { return ({\"format\": $1, \"sampleRate\": $2, \"numberOfFrames\": $3, \"numberOfChannels\": $4, \"timestamp\": $5, \"data\": $6}); })"
        js_newAudioDataInit :: JSVal -> Float -> Word -> Word -> JSVal -> AllowSharedBufferSource -> IO AudioDataInit
-- | <https://w3c.github.io/webcodecs/#dictdef-audiodatainit AudioDataInit specification>
newAudioDataInit :: (MonadDOM m, IsAllowSharedBufferSource data') => AudioSampleFormat -> Float -> Word -> Word -> Int53 -> data' -> m AudioDataInit
newAudioDataInit format sampleRate numberOfFrames numberOfChannels timestamp data' = liftDOM (((toJSVal format) >>= \a1' -> (toJSVal timestamp) >>= \a5' -> js_newAudioDataInit a1' (sampleRate) (numberOfFrames) (numberOfChannels) a5' (Types.toAllowSharedBufferSource data')))

foreign import javascript safe "(($1, $2) => { $1[\"format\"] = $2; })"
        js_setFormat :: AudioDataInit -> JSVal -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-format AudioDataInit.format specification>
setFormat :: (MonadDOM m) => AudioDataInit -> AudioSampleFormat -> m ()
setFormat self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setFormat (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"format\"]; })"
        js_getFormat :: AudioDataInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-format AudioDataInit.format specification>
getFormat :: (MonadDOM m) => AudioDataInit -> m AudioSampleFormat
getFormat self = liftDOM (((js_getFormat (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"sampleRate\"] = $2; })"
        js_setSampleRate :: AudioDataInit -> Float -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-samplerate AudioDataInit.sampleRate specification>
setSampleRate :: (MonadDOM m) => AudioDataInit -> Float -> m ()
setSampleRate self val = liftDOM (void ((js_setSampleRate (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"sampleRate\"]; })"
        js_getSampleRate :: AudioDataInit -> IO Float
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-samplerate AudioDataInit.sampleRate specification>
getSampleRate :: (MonadDOM m) => AudioDataInit -> m Float
getSampleRate self = liftDOM ((js_getSampleRate (self)))

foreign import javascript safe "(($1, $2) => { $1[\"numberOfFrames\"] = $2; })"
        js_setNumberOfFrames :: AudioDataInit -> Word -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-numberofframes AudioDataInit.numberOfFrames specification>
setNumberOfFrames :: (MonadDOM m) => AudioDataInit -> Word -> m ()
setNumberOfFrames self val = liftDOM (void ((js_setNumberOfFrames (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"numberOfFrames\"]; })"
        js_getNumberOfFrames :: AudioDataInit -> IO Word
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-numberofframes AudioDataInit.numberOfFrames specification>
getNumberOfFrames :: (MonadDOM m) => AudioDataInit -> m Word
getNumberOfFrames self = liftDOM ((js_getNumberOfFrames (self)))

foreign import javascript safe "(($1, $2) => { $1[\"numberOfChannels\"] = $2; })"
        js_setNumberOfChannels :: AudioDataInit -> Word -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-numberofchannels AudioDataInit.numberOfChannels specification>
setNumberOfChannels :: (MonadDOM m) => AudioDataInit -> Word -> m ()
setNumberOfChannels self val = liftDOM (void ((js_setNumberOfChannels (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"numberOfChannels\"]; })"
        js_getNumberOfChannels :: AudioDataInit -> IO Word
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-numberofchannels AudioDataInit.numberOfChannels specification>
getNumberOfChannels :: (MonadDOM m) => AudioDataInit -> m Word
getNumberOfChannels self = liftDOM ((js_getNumberOfChannels (self)))

foreign import javascript safe "(($1, $2) => { $1[\"timestamp\"] = $2; })"
        js_setTimestamp :: AudioDataInit -> JSVal -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-timestamp AudioDataInit.timestamp specification>
setTimestamp :: (MonadDOM m) => AudioDataInit -> Int53 -> m ()
setTimestamp self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setTimestamp (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"timestamp\"]; })"
        js_getTimestamp :: AudioDataInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-timestamp AudioDataInit.timestamp specification>
getTimestamp :: (MonadDOM m) => AudioDataInit -> m Int53
getTimestamp self = liftDOM (((js_getTimestamp (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"data\"] = $2; })"
        js_setData :: AudioDataInit -> AllowSharedBufferSource -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-data AudioDataInit.data specification>
setData :: (MonadDOM m, IsAllowSharedBufferSource val) => AudioDataInit -> val -> m ()
setData self val = liftDOM (void ((js_setData (self) (Types.toAllowSharedBufferSource val))))

foreign import javascript unsafe "(($1) => { return $1[\"data\"]; })"
        js_getData :: AudioDataInit -> IO AllowSharedBufferSource
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-data AudioDataInit.data specification>
getData :: (MonadDOM m) => AudioDataInit -> m AllowSharedBufferSource
getData self = liftDOM ((js_getData (self)))

foreign import javascript safe "(($1, $2) => { $1[\"transfer\"] = $2; })"
        js_setTransfer :: AudioDataInit -> JSVal -> IO ()
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-transfer AudioDataInit.transfer specification>
setTransfer :: (MonadDOM m, IsArrayBuffer val) => AudioDataInit -> [val] -> m ()
setTransfer self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setTransfer (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"transfer\"]; })"
        js_getTransfer :: AudioDataInit -> IO JSVal
-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-transfer AudioDataInit.transfer specification>
getTransfer :: (MonadDOM m) => AudioDataInit -> m (Maybe [ArrayBuffer])
getTransfer self = liftDOM (((js_getTransfer (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-transfer AudioDataInit.transfer specification>
getTransferUnsafe :: (MonadDOM m, HasCallStack) => AudioDataInit -> m [ArrayBuffer]
getTransferUnsafe self = liftDOM ((((js_getTransfer (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/webcodecs/#dom-audiodatainit-transfer AudioDataInit.transfer specification>
getTransferUnchecked :: (MonadDOM m) => AudioDataInit -> m [ArrayBuffer]
getTransferUnchecked self = liftDOM (((js_getTransfer (self)) >>= fromJSValUnchecked))