module GI.Soup.Objects.SessionSync
(
SessionSync(..) ,
SessionSyncK ,
toSessionSync ,
noSessionSync ,
sessionSyncNew ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.Soup.Types
import GI.Soup.Callbacks
import qualified GI.GObject as GObject
newtype SessionSync = SessionSync (ForeignPtr SessionSync)
foreign import ccall "soup_session_sync_get_type"
c_soup_session_sync_get_type :: IO GType
type instance ParentTypes SessionSync = SessionSyncParentTypes
type SessionSyncParentTypes = '[Session, GObject.Object]
instance GObject SessionSync where
gobjectIsInitiallyUnowned _ = False
gobjectType _ = c_soup_session_sync_get_type
class GObject o => SessionSyncK o
instance (GObject o, IsDescendantOf SessionSync o) => SessionSyncK o
toSessionSync :: SessionSyncK o => o -> IO SessionSync
toSessionSync = unsafeCastTo SessionSync
noSessionSync :: Maybe SessionSync
noSessionSync = Nothing
type instance AttributeList SessionSync = SessionSyncAttributeList
type SessionSyncAttributeList = ('[ '("accept-language", SessionAcceptLanguagePropertyInfo), '("accept-language-auto", SessionAcceptLanguageAutoPropertyInfo), '("async-context", SessionAsyncContextPropertyInfo), '("http-aliases", SessionHttpAliasesPropertyInfo), '("https-aliases", SessionHttpsAliasesPropertyInfo), '("idle-timeout", SessionIdleTimeoutPropertyInfo), '("local-address", SessionLocalAddressPropertyInfo), '("max-conns", SessionMaxConnsPropertyInfo), '("max-conns-per-host", SessionMaxConnsPerHostPropertyInfo), '("proxy-resolver", SessionProxyResolverPropertyInfo), '("proxy-uri", SessionProxyUriPropertyInfo), '("ssl-ca-file", SessionSslCaFilePropertyInfo), '("ssl-strict", SessionSslStrictPropertyInfo), '("ssl-use-system-ca-file", SessionSslUseSystemCaFilePropertyInfo), '("timeout", SessionTimeoutPropertyInfo), '("tls-database", SessionTlsDatabasePropertyInfo), '("tls-interaction", SessionTlsInteractionPropertyInfo), '("use-ntlm", SessionUseNtlmPropertyInfo), '("use-thread-context", SessionUseThreadContextPropertyInfo), '("user-agent", SessionUserAgentPropertyInfo)] :: [(Symbol, *)])
type instance SignalList SessionSync = SessionSyncSignalList
type SessionSyncSignalList = ('[ '("authenticate", SessionAuthenticateSignalInfo), '("connection-created", SessionConnectionCreatedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("request-queued", SessionRequestQueuedSignalInfo), '("request-started", SessionRequestStartedSignalInfo), '("request-unqueued", SessionRequestUnqueuedSignalInfo), '("tunneling", SessionTunnelingSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "soup_session_sync_new" soup_session_sync_new ::
IO (Ptr SessionSync)
sessionSyncNew ::
(MonadIO m) =>
m SessionSync
sessionSyncNew = liftIO $ do
result <- soup_session_sync_new
checkUnexpectedReturnNULL "soup_session_sync_new" result
result' <- (wrapObject SessionSync) result
return result'