jsaddle-dom-0.10.0.0: src/JSDOM/Generated/ServiceWorkerRegistration.hs
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from service-workers (webref). Do not edit.
module JSDOM.Generated.ServiceWorkerRegistration
(getNotifications, getNotifications_, showNotification, unregister, unregister_, update, update_, getInstalling, getInstallingUnsafe, getInstallingUnchecked, getWaiting, getWaitingUnsafe, getWaitingUnchecked, getActive, getActiveUnsafe, getActiveUnchecked, getNavigationPreload, getScope, getUpdateViaCache, getCookies, updatefound, ServiceWorkerRegistration(..), gTypeServiceWorkerRegistration)
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://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/getNotifications MDN ServiceWorkerRegistration.getNotifications documentation>
getNotifications :: (MonadDOM m) => ServiceWorkerRegistration -> Maybe GetNotificationOptions -> m [Notification]
getNotifications self filter = liftDOM (((((self ^. jsf "getNotifications" [P.maybe (P.return jsUndefined) toJSVal filter]) >>= readPromise)) >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/getNotifications MDN ServiceWorkerRegistration.getNotifications documentation>
getNotifications_ :: (MonadDOM m) => ServiceWorkerRegistration -> Maybe GetNotificationOptions -> m ()
getNotifications_ self filter = liftDOM (void (((self ^. jsf "getNotifications" [P.maybe (P.return jsUndefined) toJSVal filter]) >>= readPromise)))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/showNotification MDN ServiceWorkerRegistration.showNotification documentation>
showNotification :: (MonadDOM m, ToJSString title) => ServiceWorkerRegistration -> title -> Maybe NotificationOptions -> m ()
showNotification self title options = liftDOM (void (((self ^. jsf "showNotification" [toJSVal title, P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/unregister MDN ServiceWorkerRegistration.unregister documentation>
unregister :: (MonadDOM m) => ServiceWorkerRegistration -> m Bool
unregister self = liftDOM (((((self ^. jsf "unregister" ()) >>= readPromise)) >>= valToBool))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/unregister MDN ServiceWorkerRegistration.unregister documentation>
unregister_ :: (MonadDOM m) => ServiceWorkerRegistration -> m ()
unregister_ self = liftDOM (void (((self ^. jsf "unregister" ()) >>= readPromise)))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/update MDN ServiceWorkerRegistration.update documentation>
update :: (MonadDOM m) => ServiceWorkerRegistration -> m ServiceWorkerRegistration
update self = liftDOM (((((self ^. jsf "update" ()) >>= readPromise)) >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/update MDN ServiceWorkerRegistration.update documentation>
update_ :: (MonadDOM m) => ServiceWorkerRegistration -> m ()
update_ self = liftDOM (void (((self ^. jsf "update" ()) >>= readPromise)))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/installing MDN ServiceWorkerRegistration.installing documentation>
getInstalling :: (MonadDOM m) => ServiceWorkerRegistration -> m (Maybe ServiceWorker)
getInstalling self = liftDOM (((self ^. js "installing") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/installing MDN ServiceWorkerRegistration.installing documentation>
getInstallingUnsafe :: (MonadDOM m, HasCallStack) => ServiceWorkerRegistration -> m ServiceWorker
getInstallingUnsafe self = liftDOM ((((self ^. js "installing") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/installing MDN ServiceWorkerRegistration.installing documentation>
getInstallingUnchecked :: (MonadDOM m) => ServiceWorkerRegistration -> m ServiceWorker
getInstallingUnchecked self = liftDOM (((self ^. js "installing") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/waiting MDN ServiceWorkerRegistration.waiting documentation>
getWaiting :: (MonadDOM m) => ServiceWorkerRegistration -> m (Maybe ServiceWorker)
getWaiting self = liftDOM (((self ^. js "waiting") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/waiting MDN ServiceWorkerRegistration.waiting documentation>
getWaitingUnsafe :: (MonadDOM m, HasCallStack) => ServiceWorkerRegistration -> m ServiceWorker
getWaitingUnsafe self = liftDOM ((((self ^. js "waiting") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/waiting MDN ServiceWorkerRegistration.waiting documentation>
getWaitingUnchecked :: (MonadDOM m) => ServiceWorkerRegistration -> m ServiceWorker
getWaitingUnchecked self = liftDOM (((self ^. js "waiting") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/active MDN ServiceWorkerRegistration.active documentation>
getActive :: (MonadDOM m) => ServiceWorkerRegistration -> m (Maybe ServiceWorker)
getActive self = liftDOM (((self ^. js "active") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/active MDN ServiceWorkerRegistration.active documentation>
getActiveUnsafe :: (MonadDOM m, HasCallStack) => ServiceWorkerRegistration -> m ServiceWorker
getActiveUnsafe self = liftDOM ((((self ^. js "active") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/active MDN ServiceWorkerRegistration.active documentation>
getActiveUnchecked :: (MonadDOM m) => ServiceWorkerRegistration -> m ServiceWorker
getActiveUnchecked self = liftDOM (((self ^. js "active") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/navigationPreload MDN ServiceWorkerRegistration.navigationPreload documentation>
getNavigationPreload :: (MonadDOM m) => ServiceWorkerRegistration -> m NavigationPreloadManager
getNavigationPreload self = liftDOM (((self ^. js "navigationPreload") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/scope MDN ServiceWorkerRegistration.scope documentation>
getScope :: (MonadDOM m, FromJSString result) => ServiceWorkerRegistration -> m result
getScope self = liftDOM (((self ^. js "scope") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/updateViaCache MDN ServiceWorkerRegistration.updateViaCache documentation>
getUpdateViaCache :: (MonadDOM m) => ServiceWorkerRegistration -> m ServiceWorkerUpdateViaCache
getUpdateViaCache self = liftDOM (((self ^. js "updateViaCache") >>= fromJSValUnchecked))
-- | <https://developer.mozilla.org/docs/Web/API/ServiceWorkerRegistration/cookies MDN ServiceWorkerRegistration.cookies documentation>
getCookies :: (MonadDOM m) => ServiceWorkerRegistration -> m CookieStoreManager
getCookies self = liftDOM (((self ^. js "cookies") >>= fromJSValUnchecked))
-- | <https://w3c.github.io/ServiceWorker/#dom-serviceworkerregistration-onupdatefound updatefound event>
updatefound :: EventName ServiceWorkerRegistration Event
updatefound = unsafeEventName (toJSString "updatefound")