{- |
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.Soup.Objects.ProxyResolverDefault
    ( 

-- * Exported types
    ProxyResolverDefault(..)                ,
    IsProxyResolverDefault                  ,
    toProxyResolverDefault                  ,
    noProxyResolverDefault                  ,


 -- * Properties
-- ** gproxyResolver #attr:gproxyResolver#
    ProxyResolverDefaultGproxyResolverPropertyInfo,
    clearProxyResolverDefaultGproxyResolver ,
    constructProxyResolverDefaultGproxyResolver,
    proxyResolverDefaultGproxyResolver      ,
    setProxyResolverDefaultGproxyResolver   ,




    ) 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 qualified GI.Gio.Interfaces.ProxyResolver as Gio.ProxyResolver
import {-# SOURCE #-} qualified GI.Soup.Interfaces.ProxyURIResolver as Soup.ProxyURIResolver
import {-# SOURCE #-} qualified GI.Soup.Interfaces.SessionFeature as Soup.SessionFeature

newtype ProxyResolverDefault = ProxyResolverDefault (ManagedPtr ProxyResolverDefault)
foreign import ccall "soup_proxy_resolver_default_get_type"
    c_soup_proxy_resolver_default_get_type :: IO GType

instance GObject ProxyResolverDefault where
    gobjectType _ = c_soup_proxy_resolver_default_get_type
    

class GObject o => IsProxyResolverDefault o
#if MIN_VERSION_base(4,9,0)
instance {-# OVERLAPPABLE #-} (GObject a, O.UnknownAncestorError ProxyResolverDefault a) =>
    IsProxyResolverDefault a
#endif
instance IsProxyResolverDefault ProxyResolverDefault
instance GObject.Object.IsObject ProxyResolverDefault
instance Soup.ProxyURIResolver.IsProxyURIResolver ProxyResolverDefault
instance Soup.SessionFeature.IsSessionFeature ProxyResolverDefault

toProxyResolverDefault :: IsProxyResolverDefault o => o -> IO ProxyResolverDefault
toProxyResolverDefault = unsafeCastTo ProxyResolverDefault

noProxyResolverDefault :: Maybe ProxyResolverDefault
noProxyResolverDefault = Nothing

type family ResolveProxyResolverDefaultMethod (t :: Symbol) (o :: *) :: * where
    ResolveProxyResolverDefaultMethod "addFeature" o = Soup.SessionFeature.SessionFeatureAddFeatureMethodInfo
    ResolveProxyResolverDefaultMethod "attach" o = Soup.SessionFeature.SessionFeatureAttachMethodInfo
    ResolveProxyResolverDefaultMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
    ResolveProxyResolverDefaultMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
    ResolveProxyResolverDefaultMethod "detach" o = Soup.SessionFeature.SessionFeatureDetachMethodInfo
    ResolveProxyResolverDefaultMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
    ResolveProxyResolverDefaultMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
    ResolveProxyResolverDefaultMethod "hasFeature" o = Soup.SessionFeature.SessionFeatureHasFeatureMethodInfo
    ResolveProxyResolverDefaultMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
    ResolveProxyResolverDefaultMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
    ResolveProxyResolverDefaultMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
    ResolveProxyResolverDefaultMethod "ref" o = GObject.Object.ObjectRefMethodInfo
    ResolveProxyResolverDefaultMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
    ResolveProxyResolverDefaultMethod "removeFeature" o = Soup.SessionFeature.SessionFeatureRemoveFeatureMethodInfo
    ResolveProxyResolverDefaultMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
    ResolveProxyResolverDefaultMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
    ResolveProxyResolverDefaultMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
    ResolveProxyResolverDefaultMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
    ResolveProxyResolverDefaultMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
    ResolveProxyResolverDefaultMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
    ResolveProxyResolverDefaultMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
    ResolveProxyResolverDefaultMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
    ResolveProxyResolverDefaultMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
    ResolveProxyResolverDefaultMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
    ResolveProxyResolverDefaultMethod "getProxyUriAsync" o = Soup.ProxyURIResolver.ProxyURIResolverGetProxyUriAsyncMethodInfo
    ResolveProxyResolverDefaultMethod "getProxyUriSync" o = Soup.ProxyURIResolver.ProxyURIResolverGetProxyUriSyncMethodInfo
    ResolveProxyResolverDefaultMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
    ResolveProxyResolverDefaultMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
    ResolveProxyResolverDefaultMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
    ResolveProxyResolverDefaultMethod l o = O.MethodResolutionFailed l o

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

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

-- VVV Prop "gproxy-resolver"
   -- Type: TInterface (Name {namespace = "Gio", name = "ProxyResolver"})
   -- Flags: [PropertyWritable]
   -- Nullable: (Nothing,Nothing)

setProxyResolverDefaultGproxyResolver :: (MonadIO m, IsProxyResolverDefault o, Gio.ProxyResolver.IsProxyResolver a) => o -> a -> m ()
setProxyResolverDefaultGproxyResolver obj val = liftIO $ setObjectPropertyObject obj "gproxy-resolver" (Just val)

constructProxyResolverDefaultGproxyResolver :: (IsProxyResolverDefault o, Gio.ProxyResolver.IsProxyResolver a) => a -> IO (GValueConstruct o)
constructProxyResolverDefaultGproxyResolver val = constructObjectPropertyObject "gproxy-resolver" (Just val)

clearProxyResolverDefaultGproxyResolver :: (MonadIO m, IsProxyResolverDefault o) => o -> m ()
clearProxyResolverDefaultGproxyResolver obj = liftIO $ setObjectPropertyObject obj "gproxy-resolver" (Nothing :: Maybe Gio.ProxyResolver.ProxyResolver)

data ProxyResolverDefaultGproxyResolverPropertyInfo
instance AttrInfo ProxyResolverDefaultGproxyResolverPropertyInfo where
    type AttrAllowedOps ProxyResolverDefaultGproxyResolverPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrClear]
    type AttrSetTypeConstraint ProxyResolverDefaultGproxyResolverPropertyInfo = Gio.ProxyResolver.IsProxyResolver
    type AttrBaseTypeConstraint ProxyResolverDefaultGproxyResolverPropertyInfo = IsProxyResolverDefault
    type AttrGetType ProxyResolverDefaultGproxyResolverPropertyInfo = ()
    type AttrLabel ProxyResolverDefaultGproxyResolverPropertyInfo = "gproxy-resolver"
    type AttrOrigin ProxyResolverDefaultGproxyResolverPropertyInfo = ProxyResolverDefault
    attrGet _ = undefined
    attrSet _ = setProxyResolverDefaultGproxyResolver
    attrConstruct _ = constructProxyResolverDefaultGproxyResolver
    attrClear _ = clearProxyResolverDefaultGproxyResolver

instance O.HasAttributeList ProxyResolverDefault
type instance O.AttributeList ProxyResolverDefault = ProxyResolverDefaultAttributeList
type ProxyResolverDefaultAttributeList = ('[ '("gproxyResolver", ProxyResolverDefaultGproxyResolverPropertyInfo)] :: [(Symbol, *)])

proxyResolverDefaultGproxyResolver :: AttrLabelProxy "gproxyResolver"
proxyResolverDefaultGproxyResolver = AttrLabelProxy

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