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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.NavigateEventInit
       (js_newNavigateEventInit, js_setNavigationType, js_getNavigationType, js_setDestination, js_getDestination, js_setCanIntercept, js_getCanIntercept, js_setUserInitiated, js_getUserInitiated, js_setHashChange, js_getHashChange, js_setSignal, js_getSignal, js_setFormData, js_getFormData, js_setDownloadRequest, js_getDownloadRequest, js_setInfo, js_getInfo, js_setHasUAVisualTransition, js_getHasUAVisualTransition, js_setSourceElement, js_getSourceElement, newNavigateEventInit, setNavigationType, getNavigationType, getNavigationTypeUnsafe, getNavigationTypeUnchecked, setDestination, getDestination, setCanIntercept, getCanIntercept, getCanInterceptUnsafe, getCanInterceptUnchecked, setUserInitiated, getUserInitiated, getUserInitiatedUnsafe, getUserInitiatedUnchecked, setHashChange, getHashChange, getHashChangeUnsafe, getHashChangeUnchecked, setSignal, getSignal, setFormData, getFormData, getFormDataUnsafe, getFormDataUnchecked, setDownloadRequest, getDownloadRequest, getDownloadRequestUnsafe, getDownloadRequestUnchecked, setInfo, getInfo, setHasUAVisualTransition, getHasUAVisualTransition, getHasUAVisualTransitionUnsafe, getHasUAVisualTransitionUnchecked, setSourceElement, getSourceElement, getSourceElementUnsafe, getSourceElementUnchecked, NavigateEventInit(..), gTypeNavigateEventInit)
       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) => { return ({\"destination\": $1, \"signal\": $2}); })"
        js_newNavigateEventInit :: NavigationDestination -> AbortSignal -> IO NavigateEventInit
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#navigateeventinit NavigateEventInit specification>
newNavigateEventInit :: (MonadDOM m, IsAbortSignal signal) => NavigationDestination -> signal -> m NavigateEventInit
newNavigateEventInit destination signal = liftDOM ((js_newNavigateEventInit (destination) (Types.toAbortSignal signal)))

foreign import javascript safe "(($1, $2) => { $1[\"navigationType\"] = $2; })"
        js_setNavigationType :: NavigateEventInit -> JSVal -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-navigationtype NavigateEventInit.navigationType specification>
setNavigationType :: (MonadDOM m) => NavigateEventInit -> NavigationType -> m ()
setNavigationType self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setNavigationType (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"navigationType\"]; })"
        js_getNavigationType :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-navigationtype NavigateEventInit.navigationType specification>
getNavigationType :: (MonadDOM m) => NavigateEventInit -> m (Maybe NavigationType)
getNavigationType self = liftDOM (((js_getNavigationType (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-navigationtype NavigateEventInit.navigationType specification>
getNavigationTypeUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m NavigationType
getNavigationTypeUnsafe self = liftDOM ((((js_getNavigationType (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-navigationtype NavigateEventInit.navigationType specification>
getNavigationTypeUnchecked :: (MonadDOM m) => NavigateEventInit -> m NavigationType
getNavigationTypeUnchecked self = liftDOM ((pFromJSVal <$> (js_getNavigationType (self))))

foreign import javascript safe "(($1, $2) => { $1[\"destination\"] = $2; })"
        js_setDestination :: NavigateEventInit -> NavigationDestination -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-destination NavigateEventInit.destination specification>
setDestination :: (MonadDOM m) => NavigateEventInit -> NavigationDestination -> m ()
setDestination self val = liftDOM (void ((js_setDestination (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"destination\"]; })"
        js_getDestination :: NavigateEventInit -> IO NavigationDestination
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-destination NavigateEventInit.destination specification>
getDestination :: (MonadDOM m) => NavigateEventInit -> m NavigationDestination
getDestination self = liftDOM ((js_getDestination (self)))

foreign import javascript safe "(($1, $2) => { $1[\"canIntercept\"] = $2; })"
        js_setCanIntercept :: NavigateEventInit -> Bool -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-canintercept NavigateEventInit.canIntercept specification>
setCanIntercept :: (MonadDOM m) => NavigateEventInit -> Bool -> m ()
setCanIntercept self val = liftDOM (void ((js_setCanIntercept (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"canIntercept\"]; })"
        js_getCanIntercept :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-canintercept NavigateEventInit.canIntercept specification>
getCanIntercept :: (MonadDOM m) => NavigateEventInit -> m (Maybe Bool)
getCanIntercept self = liftDOM (((js_getCanIntercept (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-canintercept NavigateEventInit.canIntercept specification>
getCanInterceptUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m Bool
getCanInterceptUnsafe self = liftDOM ((((js_getCanIntercept (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-canintercept NavigateEventInit.canIntercept specification>
getCanInterceptUnchecked :: (MonadDOM m) => NavigateEventInit -> m Bool
getCanInterceptUnchecked self = liftDOM ((pFromJSVal <$> (js_getCanIntercept (self))))

foreign import javascript safe "(($1, $2) => { $1[\"userInitiated\"] = $2; })"
        js_setUserInitiated :: NavigateEventInit -> Bool -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-userinitiated NavigateEventInit.userInitiated specification>
setUserInitiated :: (MonadDOM m) => NavigateEventInit -> Bool -> m ()
setUserInitiated self val = liftDOM (void ((js_setUserInitiated (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"userInitiated\"]; })"
        js_getUserInitiated :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-userinitiated NavigateEventInit.userInitiated specification>
getUserInitiated :: (MonadDOM m) => NavigateEventInit -> m (Maybe Bool)
getUserInitiated self = liftDOM (((js_getUserInitiated (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-userinitiated NavigateEventInit.userInitiated specification>
getUserInitiatedUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m Bool
getUserInitiatedUnsafe self = liftDOM ((((js_getUserInitiated (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-userinitiated NavigateEventInit.userInitiated specification>
getUserInitiatedUnchecked :: (MonadDOM m) => NavigateEventInit -> m Bool
getUserInitiatedUnchecked self = liftDOM ((pFromJSVal <$> (js_getUserInitiated (self))))

foreign import javascript safe "(($1, $2) => { $1[\"hashChange\"] = $2; })"
        js_setHashChange :: NavigateEventInit -> Bool -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hashchange NavigateEventInit.hashChange specification>
setHashChange :: (MonadDOM m) => NavigateEventInit -> Bool -> m ()
setHashChange self val = liftDOM (void ((js_setHashChange (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"hashChange\"]; })"
        js_getHashChange :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hashchange NavigateEventInit.hashChange specification>
getHashChange :: (MonadDOM m) => NavigateEventInit -> m (Maybe Bool)
getHashChange self = liftDOM (((js_getHashChange (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hashchange NavigateEventInit.hashChange specification>
getHashChangeUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m Bool
getHashChangeUnsafe self = liftDOM ((((js_getHashChange (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hashchange NavigateEventInit.hashChange specification>
getHashChangeUnchecked :: (MonadDOM m) => NavigateEventInit -> m Bool
getHashChangeUnchecked self = liftDOM ((pFromJSVal <$> (js_getHashChange (self))))

foreign import javascript safe "(($1, $2) => { $1[\"signal\"] = $2; })"
        js_setSignal :: NavigateEventInit -> AbortSignal -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-signal NavigateEventInit.signal specification>
setSignal :: (MonadDOM m, IsAbortSignal val) => NavigateEventInit -> val -> m ()
setSignal self val = liftDOM (void ((js_setSignal (self) (Types.toAbortSignal val))))

foreign import javascript unsafe "(($1) => { return $1[\"signal\"]; })"
        js_getSignal :: NavigateEventInit -> IO AbortSignal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-signal NavigateEventInit.signal specification>
getSignal :: (MonadDOM m) => NavigateEventInit -> m AbortSignal
getSignal self = liftDOM ((js_getSignal (self)))

foreign import javascript safe "(($1, $2) => { $1[\"formData\"] = $2; })"
        js_setFormData :: NavigateEventInit -> JSVal -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-formdata NavigateEventInit.formData specification>
setFormData :: (MonadDOM m) => NavigateEventInit -> Maybe FormData -> m ()
setFormData self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setFormData (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"formData\"]; })"
        js_getFormData :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-formdata NavigateEventInit.formData specification>
getFormData :: (MonadDOM m) => NavigateEventInit -> m (Maybe FormData)
getFormData self = liftDOM (((js_getFormData (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-formdata NavigateEventInit.formData specification>
getFormDataUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m FormData
getFormDataUnsafe self = liftDOM ((((js_getFormData (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-formdata NavigateEventInit.formData specification>
getFormDataUnchecked :: (MonadDOM m) => NavigateEventInit -> m FormData
getFormDataUnchecked self = liftDOM ((pFromJSVal <$> (js_getFormData (self))))

foreign import javascript safe "(($1, $2) => { $1[\"downloadRequest\"] = $2; })"
        js_setDownloadRequest :: NavigateEventInit -> (Nullable JSString) -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-downloadrequest NavigateEventInit.downloadRequest specification>
setDownloadRequest :: (MonadDOM m, ToJSString val) => NavigateEventInit -> Maybe val -> m ()
setDownloadRequest self val = liftDOM (void ((js_setDownloadRequest (self) (toMaybeJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"downloadRequest\"]; })"
        js_getDownloadRequest :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-downloadrequest NavigateEventInit.downloadRequest specification>
getDownloadRequest :: (MonadDOM m, FromJSString result) => NavigateEventInit -> m (Maybe result)
getDownloadRequest self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getDownloadRequest (self))))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-downloadrequest NavigateEventInit.downloadRequest specification>
getDownloadRequestUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => NavigateEventInit -> m result
getDownloadRequestUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getDownloadRequest (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-downloadrequest NavigateEventInit.downloadRequest specification>
getDownloadRequestUnchecked :: (MonadDOM m, FromJSString result) => NavigateEventInit -> m result
getDownloadRequestUnchecked self = liftDOM ((pFromJSVal <$> (js_getDownloadRequest (self))))

foreign import javascript safe "(($1, $2) => { $1[\"info\"] = $2; })"
        js_setInfo :: NavigateEventInit -> JSVal -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-info NavigateEventInit.info specification>
setInfo :: (MonadDOM m) => NavigateEventInit -> JSVal -> m ()
setInfo self val = liftDOM (void ((js_setInfo (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"info\"]; })"
        js_getInfo :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-info NavigateEventInit.info specification>
getInfo :: (MonadDOM m) => NavigateEventInit -> m JSVal
getInfo self = liftDOM ((js_getInfo (self)))

foreign import javascript safe "(($1, $2) => { $1[\"hasUAVisualTransition\"] = $2; })"
        js_setHasUAVisualTransition :: NavigateEventInit -> Bool -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hasuavisualtransition NavigateEventInit.hasUAVisualTransition specification>
setHasUAVisualTransition :: (MonadDOM m) => NavigateEventInit -> Bool -> m ()
setHasUAVisualTransition self val = liftDOM (void ((js_setHasUAVisualTransition (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"hasUAVisualTransition\"]; })"
        js_getHasUAVisualTransition :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hasuavisualtransition NavigateEventInit.hasUAVisualTransition specification>
getHasUAVisualTransition :: (MonadDOM m) => NavigateEventInit -> m (Maybe Bool)
getHasUAVisualTransition self = liftDOM (((js_getHasUAVisualTransition (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hasuavisualtransition NavigateEventInit.hasUAVisualTransition specification>
getHasUAVisualTransitionUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m Bool
getHasUAVisualTransitionUnsafe self = liftDOM ((((js_getHasUAVisualTransition (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-hasuavisualtransition NavigateEventInit.hasUAVisualTransition specification>
getHasUAVisualTransitionUnchecked :: (MonadDOM m) => NavigateEventInit -> m Bool
getHasUAVisualTransitionUnchecked self = liftDOM ((pFromJSVal <$> (js_getHasUAVisualTransition (self))))

foreign import javascript safe "(($1, $2) => { $1[\"sourceElement\"] = $2; })"
        js_setSourceElement :: NavigateEventInit -> JSVal -> IO ()
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-sourceelement NavigateEventInit.sourceElement specification>
setSourceElement :: (MonadDOM m, IsElement val) => NavigateEventInit -> Maybe val -> m ()
setSourceElement self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSourceElement (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"sourceElement\"]; })"
        js_getSourceElement :: NavigateEventInit -> IO JSVal
-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-sourceelement NavigateEventInit.sourceElement specification>
getSourceElement :: (MonadDOM m) => NavigateEventInit -> m (Maybe Element)
getSourceElement self = liftDOM (((js_getSourceElement (self)) >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-sourceelement NavigateEventInit.sourceElement specification>
getSourceElementUnsafe :: (MonadDOM m, HasCallStack) => NavigateEventInit -> m Element
getSourceElementUnsafe self = liftDOM ((((js_getSourceElement (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://html.spec.whatwg.org/multipage/nav-history-apis.html#dom-navigateeventinit-sourceelement NavigateEventInit.sourceElement specification>
getSourceElementUnchecked :: (MonadDOM m) => NavigateEventInit -> m Element
getSourceElementUnchecked self = liftDOM ((pFromJSVal <$> (js_getSourceElement (self))))