ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/Request.hs
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from fetch (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.Request
(js_newRequest, js_clone, js_getMethod, js_getUrl, js_getHeaders, js_getDestination, js_getReferrer, js_getReferrerPolicy, js_getMode, js_getCredentials, js_getCache, js_getRedirect, js_getIntegrity, js_getKeepalive, js_getSignal, newRequest, clone, clone_, getMethod, getUrl, getHeaders, getDestination, getReferrer, getReferrerPolicy, getMode, getCredentials, getCache, getRedirect, getIntegrity, getKeepalive, getSignal, Request(..), gTypeRequest)
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 new globalThis[\"Request\"]($1, $2); })"
js_newRequest :: RequestInfo -> JSVal -> IO Request
-- | <https://developer.mozilla.org/docs/Web/API/Request/Request MDN Request. documentation>
newRequest :: (MonadDOM m, IsRequestInfo input) => input -> Maybe RequestInit -> m Request
newRequest input init = liftDOM (((P.maybe (P.return jsUndefined) toJSVal init) >>= \a2' -> js_newRequest (Types.toRequestInfo input) a2'))
foreign import javascript safe "(($1) => { return $1[\"clone\"](); })"
js_clone :: Request -> IO Request
-- | <https://developer.mozilla.org/docs/Web/API/Request/clone MDN Request.clone documentation>
clone :: (MonadDOM m) => Request -> m Request
clone self = liftDOM ((js_clone (self)))
-- | <https://developer.mozilla.org/docs/Web/API/Request/clone MDN Request.clone documentation>
clone_ :: (MonadDOM m) => Request -> m ()
clone_ self = liftDOM (void ((js_clone (self))))
foreign import javascript unsafe "(($1) => { return $1[\"method\"]; })"
js_getMethod :: Request -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/Request/method MDN Request.method documentation>
getMethod :: (MonadDOM m, FromJSString result) => Request -> m result
getMethod self = liftDOM ((fromJSString <$> (js_getMethod (self))))
foreign import javascript unsafe "(($1) => { return $1[\"url\"]; })"
js_getUrl :: Request -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/Request/url MDN Request.url documentation>
getUrl :: (MonadDOM m, FromJSString result) => Request -> m result
getUrl self = liftDOM ((fromJSString <$> (js_getUrl (self))))
foreign import javascript unsafe "(($1) => { return $1[\"headers\"]; })"
js_getHeaders :: Request -> IO Headers
-- | <https://developer.mozilla.org/docs/Web/API/Request/headers MDN Request.headers documentation>
getHeaders :: (MonadDOM m) => Request -> m Headers
getHeaders self = liftDOM ((js_getHeaders (self)))
foreign import javascript unsafe "(($1) => { return $1[\"destination\"]; })"
js_getDestination :: Request -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/destination MDN Request.destination documentation>
getDestination :: (MonadDOM m) => Request -> m RequestDestination
getDestination self = liftDOM (((js_getDestination (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"referrer\"]; })"
js_getReferrer :: Request -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/Request/referrer MDN Request.referrer documentation>
getReferrer :: (MonadDOM m, FromJSString result) => Request -> m result
getReferrer self = liftDOM ((fromJSString <$> (js_getReferrer (self))))
foreign import javascript unsafe "(($1) => { return $1[\"referrerPolicy\"]; })"
js_getReferrerPolicy :: Request -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/referrerPolicy MDN Request.referrerPolicy documentation>
getReferrerPolicy :: (MonadDOM m) => Request -> m ReferrerPolicy
getReferrerPolicy self = liftDOM (((js_getReferrerPolicy (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"mode\"]; })"
js_getMode :: Request -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/mode MDN Request.mode documentation>
getMode :: (MonadDOM m) => Request -> m RequestMode
getMode self = liftDOM (((js_getMode (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"credentials\"]; })"
js_getCredentials :: Request -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/credentials MDN Request.credentials documentation>
getCredentials :: (MonadDOM m) => Request -> m RequestCredentials
getCredentials self = liftDOM (((js_getCredentials (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"cache\"]; })"
js_getCache :: Request -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/cache MDN Request.cache documentation>
getCache :: (MonadDOM m) => Request -> m RequestCache
getCache self = liftDOM (((js_getCache (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"redirect\"]; })"
js_getRedirect :: Request -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/redirect MDN Request.redirect documentation>
getRedirect :: (MonadDOM m) => Request -> m RequestRedirect
getRedirect self = liftDOM (((js_getRedirect (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"integrity\"]; })"
js_getIntegrity :: Request -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/Request/integrity MDN Request.integrity documentation>
getIntegrity :: (MonadDOM m, FromJSString result) => Request -> m result
getIntegrity self = liftDOM ((fromJSString <$> (js_getIntegrity (self))))
foreign import javascript unsafe "(($1) => { return $1[\"keepalive\"]; })"
js_getKeepalive :: Request -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/Request/keepalive MDN Request.keepalive documentation>
getKeepalive :: (MonadDOM m) => Request -> m Bool
getKeepalive self = liftDOM ((js_getKeepalive (self)))
foreign import javascript unsafe "(($1) => { return $1[\"signal\"]; })"
js_getSignal :: Request -> IO AbortSignal
-- | <https://developer.mozilla.org/docs/Web/API/Request/signal MDN Request.signal documentation>
getSignal :: (MonadDOM m) => Request -> m AbortSignal
getSignal self = liftDOM ((js_getSignal (self)))