ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/SecurityPolicyViolationEvent.hs
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from CSP3 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.SecurityPolicyViolationEvent
(js_newSecurityPolicyViolationEvent, js_getDocumentURI, js_getReferrer, js_getBlockedURI, js_getEffectiveDirective, js_getViolatedDirective, js_getOriginalPolicy, js_getSourceFile, js_getSample, js_getDisposition, js_getStatusCode, js_getLineNumber, js_getColumnNumber, newSecurityPolicyViolationEvent, getDocumentURI, getReferrer, getBlockedURI, getEffectiveDirective, getViolatedDirective, getOriginalPolicy, getSourceFile, getSample, getDisposition, getStatusCode, getLineNumber, getColumnNumber, SecurityPolicyViolationEvent(..), gTypeSecurityPolicyViolationEvent)
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[\"SecurityPolicyViolationEvent\"]($1, $2); })"
js_newSecurityPolicyViolationEvent :: JSString -> JSVal -> IO SecurityPolicyViolationEvent
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/SecurityPolicyViolationEvent MDN SecurityPolicyViolationEvent. documentation>
newSecurityPolicyViolationEvent :: (MonadDOM m, ToJSString type') => type' -> Maybe SecurityPolicyViolationEventInit -> m SecurityPolicyViolationEvent
newSecurityPolicyViolationEvent type' eventInitDict = liftDOM (((P.maybe (P.return jsUndefined) toJSVal eventInitDict) >>= \a2' -> js_newSecurityPolicyViolationEvent (toJSString type') a2'))
foreign import javascript unsafe "(($1) => { return $1[\"documentURI\"]; })"
js_getDocumentURI :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/documentURI MDN SecurityPolicyViolationEvent.documentURI documentation>
getDocumentURI :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getDocumentURI self = liftDOM ((fromJSString <$> (js_getDocumentURI (self))))
foreign import javascript unsafe "(($1) => { return $1[\"referrer\"]; })"
js_getReferrer :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/referrer MDN SecurityPolicyViolationEvent.referrer documentation>
getReferrer :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getReferrer self = liftDOM ((fromJSString <$> (js_getReferrer (self))))
foreign import javascript unsafe "(($1) => { return $1[\"blockedURI\"]; })"
js_getBlockedURI :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/blockedURI MDN SecurityPolicyViolationEvent.blockedURI documentation>
getBlockedURI :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getBlockedURI self = liftDOM ((fromJSString <$> (js_getBlockedURI (self))))
foreign import javascript unsafe "(($1) => { return $1[\"effectiveDirective\"]; })"
js_getEffectiveDirective :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/effectiveDirective MDN SecurityPolicyViolationEvent.effectiveDirective documentation>
getEffectiveDirective :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getEffectiveDirective self = liftDOM ((fromJSString <$> (js_getEffectiveDirective (self))))
foreign import javascript unsafe "(($1) => { return $1[\"violatedDirective\"]; })"
js_getViolatedDirective :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/violatedDirective MDN SecurityPolicyViolationEvent.violatedDirective documentation>
getViolatedDirective :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getViolatedDirective self = liftDOM ((fromJSString <$> (js_getViolatedDirective (self))))
foreign import javascript unsafe "(($1) => { return $1[\"originalPolicy\"]; })"
js_getOriginalPolicy :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/originalPolicy MDN SecurityPolicyViolationEvent.originalPolicy documentation>
getOriginalPolicy :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getOriginalPolicy self = liftDOM ((fromJSString <$> (js_getOriginalPolicy (self))))
foreign import javascript unsafe "(($1) => { return $1[\"sourceFile\"]; })"
js_getSourceFile :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/sourceFile MDN SecurityPolicyViolationEvent.sourceFile documentation>
getSourceFile :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getSourceFile self = liftDOM ((fromJSString <$> (js_getSourceFile (self))))
foreign import javascript unsafe "(($1) => { return $1[\"sample\"]; })"
js_getSample :: SecurityPolicyViolationEvent -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/sample MDN SecurityPolicyViolationEvent.sample documentation>
getSample :: (MonadDOM m, FromJSString result) => SecurityPolicyViolationEvent -> m result
getSample self = liftDOM ((fromJSString <$> (js_getSample (self))))
foreign import javascript unsafe "(($1) => { return $1[\"disposition\"]; })"
js_getDisposition :: SecurityPolicyViolationEvent -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/disposition MDN SecurityPolicyViolationEvent.disposition documentation>
getDisposition :: (MonadDOM m) => SecurityPolicyViolationEvent -> m SecurityPolicyViolationEventDisposition
getDisposition self = liftDOM (((js_getDisposition (self)) >>= fromJSValUnchecked))
foreign import javascript unsafe "(($1) => { return $1[\"statusCode\"]; })"
js_getStatusCode :: SecurityPolicyViolationEvent -> IO Word
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/statusCode MDN SecurityPolicyViolationEvent.statusCode documentation>
getStatusCode :: (MonadDOM m) => SecurityPolicyViolationEvent -> m Word
getStatusCode self = liftDOM ((js_getStatusCode (self)))
foreign import javascript unsafe "(($1) => { return $1[\"lineNumber\"]; })"
js_getLineNumber :: SecurityPolicyViolationEvent -> IO Word
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/lineNumber MDN SecurityPolicyViolationEvent.lineNumber documentation>
getLineNumber :: (MonadDOM m) => SecurityPolicyViolationEvent -> m Word
getLineNumber self = liftDOM ((js_getLineNumber (self)))
foreign import javascript unsafe "(($1) => { return $1[\"columnNumber\"]; })"
js_getColumnNumber :: SecurityPolicyViolationEvent -> IO Word
-- | <https://developer.mozilla.org/docs/Web/API/SecurityPolicyViolationEvent/columnNumber MDN SecurityPolicyViolationEvent.columnNumber documentation>
getColumnNumber :: (MonadDOM m) => SecurityPolicyViolationEvent -> m Word
getColumnNumber self = liftDOM ((js_getColumnNumber (self)))