module Qtc.Network.QHttpResponseHeader (
QqHttpResponseHeader(..)
,QqHttpResponseHeader_nf(..)
,reasonPhrase
,QsetStatusLine(..)
,statusCode
,qHttpResponseHeader_delete, qHttpResponseHeader_delete1
)
where
import Foreign.C.Types
import Qth.ClassTypes.Core
import Qtc.Enums.Base
import Qtc.Classes.Base
import Qtc.Classes.Qccs
import Qtc.Classes.Core
import Qtc.ClassTypes.Core
import Qth.ClassTypes.Core
import Qtc.Classes.Network
import Qtc.ClassTypes.Network
instance QuserMethod (QHttpResponseHeader ()) (()) (IO ()) where
userMethod qobj evid ()
= withObjectPtr qobj $ \cobj_qobj ->
qtc_QHttpResponseHeader_userMethod cobj_qobj (toCInt evid)
foreign import ccall "qtc_QHttpResponseHeader_userMethod" qtc_QHttpResponseHeader_userMethod :: Ptr (TQHttpResponseHeader a) -> CInt -> IO ()
instance QuserMethod (QHttpResponseHeaderSc a) (()) (IO ()) where
userMethod qobj evid ()
= withObjectPtr qobj $ \cobj_qobj ->
qtc_QHttpResponseHeader_userMethod cobj_qobj (toCInt evid)
instance QuserMethod (QHttpResponseHeader ()) (QVariant ()) (IO (QVariant ())) where
userMethod qobj evid qvoj
= withObjectRefResult $
withObjectPtr qobj $ \cobj_qobj ->
withObjectPtr qvoj $ \cobj_qvoj ->
qtc_QHttpResponseHeader_userMethodVariant cobj_qobj (toCInt evid) cobj_qvoj
foreign import ccall "qtc_QHttpResponseHeader_userMethodVariant" qtc_QHttpResponseHeader_userMethodVariant :: Ptr (TQHttpResponseHeader a) -> CInt -> Ptr (TQVariant ()) -> IO (Ptr (TQVariant ()))
instance QuserMethod (QHttpResponseHeaderSc a) (QVariant ()) (IO (QVariant ())) where
userMethod qobj evid qvoj
= withObjectRefResult $
withObjectPtr qobj $ \cobj_qobj ->
withObjectPtr qvoj $ \cobj_qvoj ->
qtc_QHttpResponseHeader_userMethodVariant cobj_qobj (toCInt evid) cobj_qvoj
class QqHttpResponseHeader x1 where
qHttpResponseHeader :: x1 -> IO (QHttpResponseHeader ())
instance QqHttpResponseHeader (()) where
qHttpResponseHeader ()
= withQHttpResponseHeaderResult $
qtc_QHttpResponseHeader
foreign import ccall "qtc_QHttpResponseHeader" qtc_QHttpResponseHeader :: IO (Ptr (TQHttpResponseHeader ()))
instance QqHttpResponseHeader ((QHttpResponseHeader t1)) where
qHttpResponseHeader (x1)
= withQHttpResponseHeaderResult $
withObjectPtr x1 $ \cobj_x1 ->
qtc_QHttpResponseHeader1 cobj_x1
foreign import ccall "qtc_QHttpResponseHeader1" qtc_QHttpResponseHeader1 :: Ptr (TQHttpResponseHeader t1) -> IO (Ptr (TQHttpResponseHeader ()))
instance QqHttpResponseHeader ((String)) where
qHttpResponseHeader (x1)
= withQHttpResponseHeaderResult $
withCWString x1 $ \cstr_x1 ->
qtc_QHttpResponseHeader2 cstr_x1
foreign import ccall "qtc_QHttpResponseHeader2" qtc_QHttpResponseHeader2 :: CWString -> IO (Ptr (TQHttpResponseHeader ()))
instance QqHttpResponseHeader ((Int)) where
qHttpResponseHeader (x1)
= withQHttpResponseHeaderResult $
qtc_QHttpResponseHeader3 (toCInt x1)
foreign import ccall "qtc_QHttpResponseHeader3" qtc_QHttpResponseHeader3 :: CInt -> IO (Ptr (TQHttpResponseHeader ()))
instance QqHttpResponseHeader ((Int, String)) where
qHttpResponseHeader (x1, x2)
= withQHttpResponseHeaderResult $
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader4 (toCInt x1) cstr_x2
foreign import ccall "qtc_QHttpResponseHeader4" qtc_QHttpResponseHeader4 :: CInt -> CWString -> IO (Ptr (TQHttpResponseHeader ()))
instance QqHttpResponseHeader ((Int, String, Int)) where
qHttpResponseHeader (x1, x2, x3)
= withQHttpResponseHeaderResult $
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader5 (toCInt x1) cstr_x2 (toCInt x3)
foreign import ccall "qtc_QHttpResponseHeader5" qtc_QHttpResponseHeader5 :: CInt -> CWString -> CInt -> IO (Ptr (TQHttpResponseHeader ()))
instance QqHttpResponseHeader ((Int, String, Int, Int)) where
qHttpResponseHeader (x1, x2, x3, x4)
= withQHttpResponseHeaderResult $
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader6 (toCInt x1) cstr_x2 (toCInt x3) (toCInt x4)
foreign import ccall "qtc_QHttpResponseHeader6" qtc_QHttpResponseHeader6 :: CInt -> CWString -> CInt -> CInt -> IO (Ptr (TQHttpResponseHeader ()))
class QqHttpResponseHeader_nf x1 where
qHttpResponseHeader_nf :: x1 -> IO (QHttpResponseHeader ())
instance QqHttpResponseHeader_nf (()) where
qHttpResponseHeader_nf ()
= withObjectRefResult $
qtc_QHttpResponseHeader
instance QqHttpResponseHeader_nf ((QHttpResponseHeader t1)) where
qHttpResponseHeader_nf (x1)
= withObjectRefResult $
withObjectPtr x1 $ \cobj_x1 ->
qtc_QHttpResponseHeader1 cobj_x1
instance QqHttpResponseHeader_nf ((String)) where
qHttpResponseHeader_nf (x1)
= withObjectRefResult $
withCWString x1 $ \cstr_x1 ->
qtc_QHttpResponseHeader2 cstr_x1
instance QqHttpResponseHeader_nf ((Int)) where
qHttpResponseHeader_nf (x1)
= withObjectRefResult $
qtc_QHttpResponseHeader3 (toCInt x1)
instance QqHttpResponseHeader_nf ((Int, String)) where
qHttpResponseHeader_nf (x1, x2)
= withObjectRefResult $
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader4 (toCInt x1) cstr_x2
instance QqHttpResponseHeader_nf ((Int, String, Int)) where
qHttpResponseHeader_nf (x1, x2, x3)
= withObjectRefResult $
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader5 (toCInt x1) cstr_x2 (toCInt x3)
instance QqHttpResponseHeader_nf ((Int, String, Int, Int)) where
qHttpResponseHeader_nf (x1, x2, x3, x4)
= withObjectRefResult $
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader6 (toCInt x1) cstr_x2 (toCInt x3) (toCInt x4)
instance QmajorVersion (QHttpResponseHeader ()) (()) where
majorVersion x0 ()
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_majorVersion_h cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_majorVersion_h" qtc_QHttpResponseHeader_majorVersion_h :: Ptr (TQHttpResponseHeader a) -> IO CInt
instance QmajorVersion (QHttpResponseHeaderSc a) (()) where
majorVersion x0 ()
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_majorVersion_h cobj_x0
instance QminorVersion (QHttpResponseHeader ()) (()) where
minorVersion x0 ()
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_minorVersion_h cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_minorVersion_h" qtc_QHttpResponseHeader_minorVersion_h :: Ptr (TQHttpResponseHeader a) -> IO CInt
instance QminorVersion (QHttpResponseHeaderSc a) (()) where
minorVersion x0 ()
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_minorVersion_h cobj_x0
instance QparseLine (QHttpResponseHeader ()) ((String, Int)) where
parseLine x0 (x1, x2)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QHttpResponseHeader_parseLine cobj_x0 cstr_x1 (toCInt x2)
foreign import ccall "qtc_QHttpResponseHeader_parseLine" qtc_QHttpResponseHeader_parseLine :: Ptr (TQHttpResponseHeader a) -> CWString -> CInt -> IO CBool
instance QparseLine (QHttpResponseHeaderSc a) ((String, Int)) where
parseLine x0 (x1, x2)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QHttpResponseHeader_parseLine cobj_x0 cstr_x1 (toCInt x2)
reasonPhrase :: QHttpResponseHeader a -> (()) -> IO (String)
reasonPhrase x0 ()
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_reasonPhrase cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_reasonPhrase" qtc_QHttpResponseHeader_reasonPhrase :: Ptr (TQHttpResponseHeader a) -> IO (Ptr (TQString ()))
class QsetStatusLine x1 where
setStatusLine :: QHttpResponseHeader a -> x1 -> IO ()
instance QsetStatusLine ((Int)) where
setStatusLine x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_setStatusLine cobj_x0 (toCInt x1)
foreign import ccall "qtc_QHttpResponseHeader_setStatusLine" qtc_QHttpResponseHeader_setStatusLine :: Ptr (TQHttpResponseHeader a) -> CInt -> IO ()
instance QsetStatusLine ((Int, String)) where
setStatusLine x0 (x1, x2)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader_setStatusLine1 cobj_x0 (toCInt x1) cstr_x2
foreign import ccall "qtc_QHttpResponseHeader_setStatusLine1" qtc_QHttpResponseHeader_setStatusLine1 :: Ptr (TQHttpResponseHeader a) -> CInt -> CWString -> IO ()
instance QsetStatusLine ((Int, String, Int)) where
setStatusLine x0 (x1, x2, x3)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader_setStatusLine2 cobj_x0 (toCInt x1) cstr_x2 (toCInt x3)
foreign import ccall "qtc_QHttpResponseHeader_setStatusLine2" qtc_QHttpResponseHeader_setStatusLine2 :: Ptr (TQHttpResponseHeader a) -> CInt -> CWString -> CInt -> IO ()
instance QsetStatusLine ((Int, String, Int, Int)) where
setStatusLine x0 (x1, x2, x3, x4)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x2 $ \cstr_x2 ->
qtc_QHttpResponseHeader_setStatusLine3 cobj_x0 (toCInt x1) cstr_x2 (toCInt x3) (toCInt x4)
foreign import ccall "qtc_QHttpResponseHeader_setStatusLine3" qtc_QHttpResponseHeader_setStatusLine3 :: Ptr (TQHttpResponseHeader a) -> CInt -> CWString -> CInt -> CInt -> IO ()
statusCode :: QHttpResponseHeader a -> (()) -> IO (Int)
statusCode x0 ()
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_statusCode cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_statusCode" qtc_QHttpResponseHeader_statusCode :: Ptr (TQHttpResponseHeader a) -> IO CInt
instance QtoString (QHttpResponseHeader ()) (()) where
toString x0 ()
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_toString_h cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_toString_h" qtc_QHttpResponseHeader_toString_h :: Ptr (TQHttpResponseHeader a) -> IO (Ptr (TQString ()))
instance QtoString (QHttpResponseHeaderSc a) (()) where
toString x0 ()
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_toString_h cobj_x0
qHttpResponseHeader_delete :: QHttpResponseHeader a -> IO ()
qHttpResponseHeader_delete x0
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_delete cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_delete" qtc_QHttpResponseHeader_delete :: Ptr (TQHttpResponseHeader a) -> IO ()
qHttpResponseHeader_delete1 :: QHttpResponseHeader a -> IO ()
qHttpResponseHeader_delete1 x0
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_delete1 cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_delete1" qtc_QHttpResponseHeader_delete1 :: Ptr (TQHttpResponseHeader a) -> IO ()
instance QqisValid (QHttpResponseHeader ()) (()) where
qisValid x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_isValid cobj_x0
foreign import ccall "qtc_QHttpResponseHeader_isValid" qtc_QHttpResponseHeader_isValid :: Ptr (TQHttpResponseHeader a) -> IO CBool
instance QqisValid (QHttpResponseHeaderSc a) (()) where
qisValid x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_isValid cobj_x0
instance Qparse (QHttpResponseHeader ()) ((String)) where
parse x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QHttpResponseHeader_parse cobj_x0 cstr_x1
foreign import ccall "qtc_QHttpResponseHeader_parse" qtc_QHttpResponseHeader_parse :: Ptr (TQHttpResponseHeader a) -> CWString -> IO CBool
instance Qparse (QHttpResponseHeaderSc a) ((String)) where
parse x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QHttpResponseHeader_parse cobj_x0 cstr_x1
instance QsetValid (QHttpResponseHeader ()) ((Bool)) where
setValid x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_setValid cobj_x0 (toCBool x1)
foreign import ccall "qtc_QHttpResponseHeader_setValid" qtc_QHttpResponseHeader_setValid :: Ptr (TQHttpResponseHeader a) -> CBool -> IO ()
instance QsetValid (QHttpResponseHeaderSc a) ((Bool)) where
setValid x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QHttpResponseHeader_setValid cobj_x0 (toCBool x1)