DocumentPictureInPictureOptions.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from document-picture-in-picture (webref). Do not edit.
module JSDOM.Generated.DocumentPictureInPictureOptions
       (newDocumentPictureInPictureOptions, setWidth, getWidth, getWidthUnsafe, getWidthUnchecked, setHeight, getHeight, getHeightUnsafe, getHeightUnchecked, setDisallowReturnToOpener, getDisallowReturnToOpener, getDisallowReturnToOpenerUnsafe, getDisallowReturnToOpenerUnchecked, setPreferInitialWindowPlacement, getPreferInitialWindowPlacement, getPreferInitialWindowPlacementUnsafe, getPreferInitialWindowPlacementUnchecked, DocumentPictureInPictureOptions(..), gTypeDocumentPictureInPictureOptions)
       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://wicg.github.io/document-picture-in-picture/#dictdef-documentpictureinpictureoptions DocumentPictureInPictureOptions specification>
newDocumentPictureInPictureOptions :: (MonadDOM m) => m DocumentPictureInPictureOptions
newDocumentPictureInPictureOptions = liftDOM ((((new (jsg "Object") () >>= \o -> P.return o)) >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
setWidth :: (MonadDOM m) => DocumentPictureInPictureOptions -> Word53 -> m ()
setWidth self val = liftDOM (void (self ^. jss "width" (toJSVal val)))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
getWidth :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Word53)
getWidth self = liftDOM (((self ^. js "width") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
getWidthUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Word53
getWidthUnsafe self = liftDOM ((((self ^. js "width") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
getWidthUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Word53
getWidthUnchecked self = liftDOM (((self ^. js "width") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
setHeight :: (MonadDOM m) => DocumentPictureInPictureOptions -> Word53 -> m ()
setHeight self val = liftDOM (void (self ^. jss "height" (toJSVal val)))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
getHeight :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Word53)
getHeight self = liftDOM (((self ^. js "height") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
getHeightUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Word53
getHeightUnsafe self = liftDOM ((((self ^. js "height") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
getHeightUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Word53
getHeightUnchecked self = liftDOM (((self ^. js "height") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
setDisallowReturnToOpener :: (MonadDOM m) => DocumentPictureInPictureOptions -> Bool -> m ()
setDisallowReturnToOpener self val = liftDOM (void (self ^. jss "disallowReturnToOpener" (toJSVal val)))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
getDisallowReturnToOpener :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Bool)
getDisallowReturnToOpener self = liftDOM (((self ^. js "disallowReturnToOpener") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
getDisallowReturnToOpenerUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Bool
getDisallowReturnToOpenerUnsafe self = liftDOM ((((self ^. js "disallowReturnToOpener") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
getDisallowReturnToOpenerUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Bool
getDisallowReturnToOpenerUnchecked self = liftDOM (((self ^. js "disallowReturnToOpener") >>= valToBool))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
setPreferInitialWindowPlacement :: (MonadDOM m) => DocumentPictureInPictureOptions -> Bool -> m ()
setPreferInitialWindowPlacement self val = liftDOM (void (self ^. jss "preferInitialWindowPlacement" (toJSVal val)))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
getPreferInitialWindowPlacement :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Bool)
getPreferInitialWindowPlacement self = liftDOM (((self ^. js "preferInitialWindowPlacement") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
getPreferInitialWindowPlacementUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Bool
getPreferInitialWindowPlacementUnsafe self = liftDOM ((((self ^. js "preferInitialWindowPlacement") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
getPreferInitialWindowPlacementUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Bool
getPreferInitialWindowPlacementUnchecked self = liftDOM (((self ^. js "preferInitialWindowPlacement") >>= valToBool))