{- |
Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte
License    : LGPL-2.1
Maintainer : Iñaki García Etxebarria (garetxe@gmail.com)
-}

module GI.WebKit.Objects.DOMDOMSecurityPolicy
    ( 

-- * Exported types
    DOMDOMSecurityPolicy(..)                ,
    IsDOMDOMSecurityPolicy                  ,
    toDOMDOMSecurityPolicy                  ,
    noDOMDOMSecurityPolicy                  ,


 -- * Methods
-- ** allowsConnectionTo #method:allowsConnectionTo#
    DOMDOMSecurityPolicyAllowsConnectionToMethodInfo,
    dOMDOMSecurityPolicyAllowsConnectionTo  ,


-- ** allowsFontFrom #method:allowsFontFrom#
    DOMDOMSecurityPolicyAllowsFontFromMethodInfo,
    dOMDOMSecurityPolicyAllowsFontFrom      ,


-- ** allowsFormAction #method:allowsFormAction#
    DOMDOMSecurityPolicyAllowsFormActionMethodInfo,
    dOMDOMSecurityPolicyAllowsFormAction    ,


-- ** allowsFrameFrom #method:allowsFrameFrom#
    DOMDOMSecurityPolicyAllowsFrameFromMethodInfo,
    dOMDOMSecurityPolicyAllowsFrameFrom     ,


-- ** allowsImageFrom #method:allowsImageFrom#
    DOMDOMSecurityPolicyAllowsImageFromMethodInfo,
    dOMDOMSecurityPolicyAllowsImageFrom     ,


-- ** allowsMediaFrom #method:allowsMediaFrom#
    DOMDOMSecurityPolicyAllowsMediaFromMethodInfo,
    dOMDOMSecurityPolicyAllowsMediaFrom     ,


-- ** allowsObjectFrom #method:allowsObjectFrom#
    DOMDOMSecurityPolicyAllowsObjectFromMethodInfo,
    dOMDOMSecurityPolicyAllowsObjectFrom    ,


-- ** allowsPluginType #method:allowsPluginType#
    DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo,
    dOMDOMSecurityPolicyAllowsPluginType    ,


-- ** allowsScriptFrom #method:allowsScriptFrom#
    DOMDOMSecurityPolicyAllowsScriptFromMethodInfo,
    dOMDOMSecurityPolicyAllowsScriptFrom    ,


-- ** allowsStyleFrom #method:allowsStyleFrom#
    DOMDOMSecurityPolicyAllowsStyleFromMethodInfo,
    dOMDOMSecurityPolicyAllowsStyleFrom     ,


-- ** getAllowsEval #method:getAllowsEval#
    DOMDOMSecurityPolicyGetAllowsEvalMethodInfo,
    dOMDOMSecurityPolicyGetAllowsEval       ,


-- ** getAllowsInlineScript #method:getAllowsInlineScript#
    DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo,
    dOMDOMSecurityPolicyGetAllowsInlineScript,


-- ** getAllowsInlineStyle #method:getAllowsInlineStyle#
    DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo,
    dOMDOMSecurityPolicyGetAllowsInlineStyle,


-- ** getIsActive #method:getIsActive#
    DOMDOMSecurityPolicyGetIsActiveMethodInfo,
    dOMDOMSecurityPolicyGetIsActive         ,


-- ** getReportUrIs #method:getReportUrIs#
    DOMDOMSecurityPolicyGetReportUrIsMethodInfo,
    dOMDOMSecurityPolicyGetReportUrIs       ,




 -- * Properties
-- ** allowsEval #attr:allowsEval#
    DOMDOMSecurityPolicyAllowsEvalPropertyInfo,
    dOMDOMSecurityPolicyAllowsEval          ,
    getDOMDOMSecurityPolicyAllowsEval       ,


-- ** allowsInlineScript #attr:allowsInlineScript#
    DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo,
    dOMDOMSecurityPolicyAllowsInlineScript  ,
    getDOMDOMSecurityPolicyAllowsInlineScript,


-- ** allowsInlineStyle #attr:allowsInlineStyle#
    DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo,
    dOMDOMSecurityPolicyAllowsInlineStyle   ,
    getDOMDOMSecurityPolicyAllowsInlineStyle,


-- ** isActive #attr:isActive#
    DOMDOMSecurityPolicyIsActivePropertyInfo,
    dOMDOMSecurityPolicyIsActive            ,
    getDOMDOMSecurityPolicyIsActive         ,


-- ** reportUrIs #attr:reportUrIs#
    DOMDOMSecurityPolicyReportUrIsPropertyInfo,
    dOMDOMSecurityPolicyReportUrIs          ,
    getDOMDOMSecurityPolicyReportUrIs       ,




    ) where

import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P

import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP

import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.WebKit.Objects.DOMDOMStringList as WebKit.DOMDOMStringList
import {-# SOURCE #-} qualified GI.WebKit.Objects.DOMObject as WebKit.DOMObject

newtype DOMDOMSecurityPolicy = DOMDOMSecurityPolicy (ManagedPtr DOMDOMSecurityPolicy)
foreign import ccall "webkit_dom_dom_security_policy_get_type"
    c_webkit_dom_dom_security_policy_get_type :: IO GType

instance GObject DOMDOMSecurityPolicy where
    gobjectType _ = c_webkit_dom_dom_security_policy_get_type
    

class GObject o => IsDOMDOMSecurityPolicy o
#if MIN_VERSION_base(4,9,0)
instance {-# OVERLAPPABLE #-} (GObject a, O.UnknownAncestorError DOMDOMSecurityPolicy a) =>
    IsDOMDOMSecurityPolicy a
#endif
instance IsDOMDOMSecurityPolicy DOMDOMSecurityPolicy
instance WebKit.DOMObject.IsDOMObject DOMDOMSecurityPolicy
instance GObject.Object.IsObject DOMDOMSecurityPolicy

toDOMDOMSecurityPolicy :: IsDOMDOMSecurityPolicy o => o -> IO DOMDOMSecurityPolicy
toDOMDOMSecurityPolicy = unsafeCastTo DOMDOMSecurityPolicy

noDOMDOMSecurityPolicy :: Maybe DOMDOMSecurityPolicy
noDOMDOMSecurityPolicy = Nothing

type family ResolveDOMDOMSecurityPolicyMethod (t :: Symbol) (o :: *) :: * where
    ResolveDOMDOMSecurityPolicyMethod "allowsConnectionTo" o = DOMDOMSecurityPolicyAllowsConnectionToMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsFontFrom" o = DOMDOMSecurityPolicyAllowsFontFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsFormAction" o = DOMDOMSecurityPolicyAllowsFormActionMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsFrameFrom" o = DOMDOMSecurityPolicyAllowsFrameFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsImageFrom" o = DOMDOMSecurityPolicyAllowsImageFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsMediaFrom" o = DOMDOMSecurityPolicyAllowsMediaFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsObjectFrom" o = DOMDOMSecurityPolicyAllowsObjectFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsPluginType" o = DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsScriptFrom" o = DOMDOMSecurityPolicyAllowsScriptFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "allowsStyleFrom" o = DOMDOMSecurityPolicyAllowsStyleFromMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "ref" o = GObject.Object.ObjectRefMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getAllowsEval" o = DOMDOMSecurityPolicyGetAllowsEvalMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getAllowsInlineScript" o = DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getAllowsInlineStyle" o = DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getIsActive" o = DOMDOMSecurityPolicyGetIsActiveMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "getReportUrIs" o = DOMDOMSecurityPolicyGetReportUrIsMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
    ResolveDOMDOMSecurityPolicyMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
    ResolveDOMDOMSecurityPolicyMethod l o = O.MethodResolutionFailed l o

instance (info ~ ResolveDOMDOMSecurityPolicyMethod t DOMDOMSecurityPolicy, O.MethodInfo info DOMDOMSecurityPolicy p) => O.IsLabelProxy t (DOMDOMSecurityPolicy -> p) where
    fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)

#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMDOMSecurityPolicyMethod t DOMDOMSecurityPolicy, O.MethodInfo info DOMDOMSecurityPolicy p) => O.IsLabel t (DOMDOMSecurityPolicy -> p) where
    fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif

-- VVV Prop "allows-eval"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable]
   -- Nullable: (Just False,Nothing)

getDOMDOMSecurityPolicyAllowsEval :: (MonadIO m, IsDOMDOMSecurityPolicy o) => o -> m Bool
getDOMDOMSecurityPolicyAllowsEval obj = liftIO $ getObjectPropertyBool obj "allows-eval"

data DOMDOMSecurityPolicyAllowsEvalPropertyInfo
instance AttrInfo DOMDOMSecurityPolicyAllowsEvalPropertyInfo where
    type AttrAllowedOps DOMDOMSecurityPolicyAllowsEvalPropertyInfo = '[ 'AttrGet]
    type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsEvalPropertyInfo = (~) ()
    type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsEvalPropertyInfo = IsDOMDOMSecurityPolicy
    type AttrGetType DOMDOMSecurityPolicyAllowsEvalPropertyInfo = Bool
    type AttrLabel DOMDOMSecurityPolicyAllowsEvalPropertyInfo = "allows-eval"
    type AttrOrigin DOMDOMSecurityPolicyAllowsEvalPropertyInfo = DOMDOMSecurityPolicy
    attrGet _ = getDOMDOMSecurityPolicyAllowsEval
    attrSet _ = undefined
    attrConstruct _ = undefined
    attrClear _ = undefined

-- VVV Prop "allows-inline-script"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable]
   -- Nullable: (Just False,Nothing)

getDOMDOMSecurityPolicyAllowsInlineScript :: (MonadIO m, IsDOMDOMSecurityPolicy o) => o -> m Bool
getDOMDOMSecurityPolicyAllowsInlineScript obj = liftIO $ getObjectPropertyBool obj "allows-inline-script"

data DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo
instance AttrInfo DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo where
    type AttrAllowedOps DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = '[ 'AttrGet]
    type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = (~) ()
    type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = IsDOMDOMSecurityPolicy
    type AttrGetType DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = Bool
    type AttrLabel DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = "allows-inline-script"
    type AttrOrigin DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = DOMDOMSecurityPolicy
    attrGet _ = getDOMDOMSecurityPolicyAllowsInlineScript
    attrSet _ = undefined
    attrConstruct _ = undefined
    attrClear _ = undefined

-- VVV Prop "allows-inline-style"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable]
   -- Nullable: (Just False,Nothing)

getDOMDOMSecurityPolicyAllowsInlineStyle :: (MonadIO m, IsDOMDOMSecurityPolicy o) => o -> m Bool
getDOMDOMSecurityPolicyAllowsInlineStyle obj = liftIO $ getObjectPropertyBool obj "allows-inline-style"

data DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo
instance AttrInfo DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo where
    type AttrAllowedOps DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = '[ 'AttrGet]
    type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = (~) ()
    type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = IsDOMDOMSecurityPolicy
    type AttrGetType DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = Bool
    type AttrLabel DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = "allows-inline-style"
    type AttrOrigin DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = DOMDOMSecurityPolicy
    attrGet _ = getDOMDOMSecurityPolicyAllowsInlineStyle
    attrSet _ = undefined
    attrConstruct _ = undefined
    attrClear _ = undefined

-- VVV Prop "is-active"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable]
   -- Nullable: (Just False,Nothing)

getDOMDOMSecurityPolicyIsActive :: (MonadIO m, IsDOMDOMSecurityPolicy o) => o -> m Bool
getDOMDOMSecurityPolicyIsActive obj = liftIO $ getObjectPropertyBool obj "is-active"

data DOMDOMSecurityPolicyIsActivePropertyInfo
instance AttrInfo DOMDOMSecurityPolicyIsActivePropertyInfo where
    type AttrAllowedOps DOMDOMSecurityPolicyIsActivePropertyInfo = '[ 'AttrGet]
    type AttrSetTypeConstraint DOMDOMSecurityPolicyIsActivePropertyInfo = (~) ()
    type AttrBaseTypeConstraint DOMDOMSecurityPolicyIsActivePropertyInfo = IsDOMDOMSecurityPolicy
    type AttrGetType DOMDOMSecurityPolicyIsActivePropertyInfo = Bool
    type AttrLabel DOMDOMSecurityPolicyIsActivePropertyInfo = "is-active"
    type AttrOrigin DOMDOMSecurityPolicyIsActivePropertyInfo = DOMDOMSecurityPolicy
    attrGet _ = getDOMDOMSecurityPolicyIsActive
    attrSet _ = undefined
    attrConstruct _ = undefined
    attrClear _ = undefined

-- VVV Prop "report-ur-is"
   -- Type: TInterface (Name {namespace = "WebKit", name = "DOMDOMStringList"})
   -- Flags: [PropertyReadable]
   -- Nullable: (Nothing,Nothing)

getDOMDOMSecurityPolicyReportUrIs :: (MonadIO m, IsDOMDOMSecurityPolicy o) => o -> m (Maybe WebKit.DOMDOMStringList.DOMDOMStringList)
getDOMDOMSecurityPolicyReportUrIs obj = liftIO $ getObjectPropertyObject obj "report-ur-is" WebKit.DOMDOMStringList.DOMDOMStringList

data DOMDOMSecurityPolicyReportUrIsPropertyInfo
instance AttrInfo DOMDOMSecurityPolicyReportUrIsPropertyInfo where
    type AttrAllowedOps DOMDOMSecurityPolicyReportUrIsPropertyInfo = '[ 'AttrGet, 'AttrClear]
    type AttrSetTypeConstraint DOMDOMSecurityPolicyReportUrIsPropertyInfo = (~) ()
    type AttrBaseTypeConstraint DOMDOMSecurityPolicyReportUrIsPropertyInfo = IsDOMDOMSecurityPolicy
    type AttrGetType DOMDOMSecurityPolicyReportUrIsPropertyInfo = (Maybe WebKit.DOMDOMStringList.DOMDOMStringList)
    type AttrLabel DOMDOMSecurityPolicyReportUrIsPropertyInfo = "report-ur-is"
    type AttrOrigin DOMDOMSecurityPolicyReportUrIsPropertyInfo = DOMDOMSecurityPolicy
    attrGet _ = getDOMDOMSecurityPolicyReportUrIs
    attrSet _ = undefined
    attrConstruct _ = undefined
    attrClear _ = undefined

instance O.HasAttributeList DOMDOMSecurityPolicy
type instance O.AttributeList DOMDOMSecurityPolicy = DOMDOMSecurityPolicyAttributeList
type DOMDOMSecurityPolicyAttributeList = ('[ '("allowsEval", DOMDOMSecurityPolicyAllowsEvalPropertyInfo), '("allowsInlineScript", DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo), '("allowsInlineStyle", DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo), '("coreObject", WebKit.DOMObject.DOMObjectCoreObjectPropertyInfo), '("isActive", DOMDOMSecurityPolicyIsActivePropertyInfo), '("reportUrIs", DOMDOMSecurityPolicyReportUrIsPropertyInfo)] :: [(Symbol, *)])

dOMDOMSecurityPolicyAllowsEval :: AttrLabelProxy "allowsEval"
dOMDOMSecurityPolicyAllowsEval = AttrLabelProxy

dOMDOMSecurityPolicyAllowsInlineScript :: AttrLabelProxy "allowsInlineScript"
dOMDOMSecurityPolicyAllowsInlineScript = AttrLabelProxy

dOMDOMSecurityPolicyAllowsInlineStyle :: AttrLabelProxy "allowsInlineStyle"
dOMDOMSecurityPolicyAllowsInlineStyle = AttrLabelProxy

dOMDOMSecurityPolicyIsActive :: AttrLabelProxy "isActive"
dOMDOMSecurityPolicyIsActive = AttrLabelProxy

dOMDOMSecurityPolicyReportUrIs :: AttrLabelProxy "reportUrIs"
dOMDOMSecurityPolicyReportUrIs = AttrLabelProxy

type instance O.SignalList DOMDOMSecurityPolicy = DOMDOMSecurityPolicySignalList
type DOMDOMSecurityPolicySignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])

-- method DOMDOMSecurityPolicy::allows_connection_to
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_connection_to" webkit_dom_dom_security_policy_allows_connection_to :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsConnectionTo ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsConnectionTo self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_connection_to self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsConnectionToMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsConnectionToMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsConnectionTo

-- method DOMDOMSecurityPolicy::allows_font_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_font_from" webkit_dom_dom_security_policy_allows_font_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsFontFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsFontFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_font_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsFontFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsFontFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsFontFrom

-- method DOMDOMSecurityPolicy::allows_form_action
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_form_action" webkit_dom_dom_security_policy_allows_form_action :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsFormAction ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsFormAction self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_form_action self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsFormActionMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsFormActionMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsFormAction

-- method DOMDOMSecurityPolicy::allows_frame_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_frame_from" webkit_dom_dom_security_policy_allows_frame_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsFrameFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsFrameFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_frame_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsFrameFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsFrameFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsFrameFrom

-- method DOMDOMSecurityPolicy::allows_image_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_image_from" webkit_dom_dom_security_policy_allows_image_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsImageFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsImageFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_image_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsImageFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsImageFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsImageFrom

-- method DOMDOMSecurityPolicy::allows_media_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_media_from" webkit_dom_dom_security_policy_allows_media_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsMediaFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsMediaFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_media_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsMediaFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsMediaFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsMediaFrom

-- method DOMDOMSecurityPolicy::allows_object_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_object_from" webkit_dom_dom_security_policy_allows_object_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsObjectFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsObjectFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_object_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsObjectFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsObjectFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsObjectFrom

-- method DOMDOMSecurityPolicy::allows_plugin_type
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_plugin_type" webkit_dom_dom_security_policy_allows_plugin_type :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- type : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsPluginType ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@type@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsPluginType self type_ = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    type_' <- textToCString type_
    result <- webkit_dom_dom_security_policy_allows_plugin_type self' type_'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem type_'
    return result'

data DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsPluginType

-- method DOMDOMSecurityPolicy::allows_script_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_script_from" webkit_dom_dom_security_policy_allows_script_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsScriptFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsScriptFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_script_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsScriptFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsScriptFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsScriptFrom

-- method DOMDOMSecurityPolicy::allows_style_from
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #gchar", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_allows_style_from" webkit_dom_dom_security_policy_allows_style_from :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    CString ->                              -- url : TBasicType TUTF8
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyAllowsStyleFrom ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> T.Text
    {- ^ /@url@/: A @/gchar/@ -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyAllowsStyleFrom self url = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    url' <- textToCString url
    result <- webkit_dom_dom_security_policy_allows_style_from self' url'
    let result' = (/= 0) result
    touchManagedPtr self
    freeMem url'
    return result'

data DOMDOMSecurityPolicyAllowsStyleFromMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyAllowsStyleFromMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyAllowsStyleFrom

-- method DOMDOMSecurityPolicy::get_allows_eval
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_get_allows_eval" webkit_dom_dom_security_policy_get_allows_eval :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyGetAllowsEval ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyGetAllowsEval self = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    result <- webkit_dom_dom_security_policy_get_allows_eval self'
    let result' = (/= 0) result
    touchManagedPtr self
    return result'

data DOMDOMSecurityPolicyGetAllowsEvalMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyGetAllowsEvalMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyGetAllowsEval

-- method DOMDOMSecurityPolicy::get_allows_inline_script
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_get_allows_inline_script" webkit_dom_dom_security_policy_get_allows_inline_script :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyGetAllowsInlineScript ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyGetAllowsInlineScript self = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    result <- webkit_dom_dom_security_policy_get_allows_inline_script self'
    let result' = (/= 0) result
    touchManagedPtr self
    return result'

data DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyGetAllowsInlineScript

-- method DOMDOMSecurityPolicy::get_allows_inline_style
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_get_allows_inline_style" webkit_dom_dom_security_policy_get_allows_inline_style :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyGetAllowsInlineStyle ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyGetAllowsInlineStyle self = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    result <- webkit_dom_dom_security_policy_get_allows_inline_style self'
    let result' = (/= 0) result
    touchManagedPtr self
    return result'

data DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyGetAllowsInlineStyle

-- method DOMDOMSecurityPolicy::get_is_active
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_get_is_active" webkit_dom_dom_security_policy_get_is_active :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    IO CInt

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyGetIsActive ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> m Bool
    {- ^ __Returns:__ A 'Bool' -}
dOMDOMSecurityPolicyGetIsActive self = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    result <- webkit_dom_dom_security_policy_get_is_active self'
    let result' = (/= 0) result
    touchManagedPtr self
    return result'

data DOMDOMSecurityPolicyGetIsActiveMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyGetIsActiveMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyGetIsActive

-- method DOMDOMSecurityPolicy::get_report_ur_is
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "self", argType = TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #WebKitDOMDOMSecurityPolicy", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "WebKit", name = "DOMDOMStringList"}))
-- throws : False
-- Skip return : False

foreign import ccall "webkit_dom_dom_security_policy_get_report_ur_is" webkit_dom_dom_security_policy_get_report_ur_is :: 
    Ptr DOMDOMSecurityPolicy ->             -- self : TInterface (Name {namespace = "WebKit", name = "DOMDOMSecurityPolicy"})
    IO (Ptr WebKit.DOMDOMStringList.DOMDOMStringList)

{- |
/No description available in the introspection data./
-}
dOMDOMSecurityPolicyGetReportUrIs ::
    (B.CallStack.HasCallStack, MonadIO m, IsDOMDOMSecurityPolicy a) =>
    a
    {- ^ /@self@/: A 'GI.WebKit.Objects.DOMDOMSecurityPolicy.DOMDOMSecurityPolicy' -}
    -> m WebKit.DOMDOMStringList.DOMDOMStringList
    {- ^ __Returns:__ A 'GI.WebKit.Objects.DOMDOMStringList.DOMDOMStringList' -}
dOMDOMSecurityPolicyGetReportUrIs self = liftIO $ do
    self' <- unsafeManagedPtrCastPtr self
    result <- webkit_dom_dom_security_policy_get_report_ur_is self'
    checkUnexpectedReturnNULL "dOMDOMSecurityPolicyGetReportUrIs" result
    result' <- (wrapObject WebKit.DOMDOMStringList.DOMDOMStringList) result
    touchManagedPtr self
    return result'

data DOMDOMSecurityPolicyGetReportUrIsMethodInfo
instance (signature ~ (m WebKit.DOMDOMStringList.DOMDOMStringList), MonadIO m, IsDOMDOMSecurityPolicy a) => O.MethodInfo DOMDOMSecurityPolicyGetReportUrIsMethodInfo a signature where
    overloadedMethod _ = dOMDOMSecurityPolicyGetReportUrIs