gi-gstbase-0.1.6.13: GI/GstBase/Objects/BaseTransform.hs
{- |
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.GstBase.Objects.BaseTransform
(
-- * Exported types
BaseTransform(..) ,
BaseTransformK ,
toBaseTransform ,
noBaseTransform ,
-- * Methods
-- ** baseTransformGetAllocator
BaseTransformGetAllocatorMethodInfo ,
baseTransformGetAllocator ,
-- ** baseTransformGetBufferPool
BaseTransformGetBufferPoolMethodInfo ,
baseTransformGetBufferPool ,
-- ** baseTransformIsInPlace
BaseTransformIsInPlaceMethodInfo ,
baseTransformIsInPlace ,
-- ** baseTransformIsPassthrough
BaseTransformIsPassthroughMethodInfo ,
baseTransformIsPassthrough ,
-- ** baseTransformIsQosEnabled
BaseTransformIsQosEnabledMethodInfo ,
baseTransformIsQosEnabled ,
-- ** baseTransformReconfigureSink
BaseTransformReconfigureSinkMethodInfo ,
baseTransformReconfigureSink ,
-- ** baseTransformReconfigureSrc
BaseTransformReconfigureSrcMethodInfo ,
baseTransformReconfigureSrc ,
-- ** baseTransformSetGapAware
BaseTransformSetGapAwareMethodInfo ,
baseTransformSetGapAware ,
-- ** baseTransformSetInPlace
BaseTransformSetInPlaceMethodInfo ,
baseTransformSetInPlace ,
-- ** baseTransformSetPassthrough
BaseTransformSetPassthroughMethodInfo ,
baseTransformSetPassthrough ,
-- ** baseTransformSetPreferPassthrough
BaseTransformSetPreferPassthroughMethodInfo,
baseTransformSetPreferPassthrough ,
-- ** baseTransformSetQosEnabled
BaseTransformSetQosEnabledMethodInfo ,
baseTransformSetQosEnabled ,
-- ** baseTransformUpdateQos
BaseTransformUpdateQosMethodInfo ,
baseTransformUpdateQos ,
-- ** baseTransformUpdateSrcCaps
BaseTransformUpdateSrcCapsMethodInfo ,
baseTransformUpdateSrcCaps ,
-- * Properties
-- ** Qos
BaseTransformQosPropertyInfo ,
constructBaseTransformQos ,
getBaseTransformQos ,
setBaseTransformQos ,
) 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.GstBase.Types
import GI.GstBase.Callbacks
import qualified GI.GObject as GObject
import qualified GI.Gst as Gst
newtype BaseTransform = BaseTransform (ForeignPtr BaseTransform)
foreign import ccall "gst_base_transform_get_type"
c_gst_base_transform_get_type :: IO GType
type instance ParentTypes BaseTransform = BaseTransformParentTypes
type BaseTransformParentTypes = '[Gst.Element, Gst.Object, GObject.Object]
instance GObject BaseTransform where
gobjectIsInitiallyUnowned _ = True
gobjectType _ = c_gst_base_transform_get_type
class GObject o => BaseTransformK o
instance (GObject o, IsDescendantOf BaseTransform o) => BaseTransformK o
toBaseTransform :: BaseTransformK o => o -> IO BaseTransform
toBaseTransform = unsafeCastTo BaseTransform
noBaseTransform :: Maybe BaseTransform
noBaseTransform = Nothing
type family ResolveBaseTransformMethod (t :: Symbol) (o :: *) :: * where
ResolveBaseTransformMethod "abortState" o = Gst.ElementAbortStateMethodInfo
ResolveBaseTransformMethod "addControlBinding" o = Gst.ObjectAddControlBindingMethodInfo
ResolveBaseTransformMethod "addPad" o = Gst.ElementAddPadMethodInfo
ResolveBaseTransformMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo
ResolveBaseTransformMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo
ResolveBaseTransformMethod "changeState" o = Gst.ElementChangeStateMethodInfo
ResolveBaseTransformMethod "continueState" o = Gst.ElementContinueStateMethodInfo
ResolveBaseTransformMethod "createAllPads" o = Gst.ElementCreateAllPadsMethodInfo
ResolveBaseTransformMethod "defaultError" o = Gst.ObjectDefaultErrorMethodInfo
ResolveBaseTransformMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo
ResolveBaseTransformMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo
ResolveBaseTransformMethod "hasActiveControlBindings" o = Gst.ObjectHasActiveControlBindingsMethodInfo
ResolveBaseTransformMethod "hasAncestor" o = Gst.ObjectHasAncestorMethodInfo
ResolveBaseTransformMethod "hasAsAncestor" o = Gst.ObjectHasAsAncestorMethodInfo
ResolveBaseTransformMethod "hasAsParent" o = Gst.ObjectHasAsParentMethodInfo
ResolveBaseTransformMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo
ResolveBaseTransformMethod "isInPlace" o = BaseTransformIsInPlaceMethodInfo
ResolveBaseTransformMethod "isLockedState" o = Gst.ElementIsLockedStateMethodInfo
ResolveBaseTransformMethod "isPassthrough" o = BaseTransformIsPassthroughMethodInfo
ResolveBaseTransformMethod "isQosEnabled" o = BaseTransformIsQosEnabledMethodInfo
ResolveBaseTransformMethod "iteratePads" o = Gst.ElementIteratePadsMethodInfo
ResolveBaseTransformMethod "iterateSinkPads" o = Gst.ElementIterateSinkPadsMethodInfo
ResolveBaseTransformMethod "iterateSrcPads" o = Gst.ElementIterateSrcPadsMethodInfo
ResolveBaseTransformMethod "link" o = Gst.ElementLinkMethodInfo
ResolveBaseTransformMethod "linkFiltered" o = Gst.ElementLinkFilteredMethodInfo
ResolveBaseTransformMethod "linkPads" o = Gst.ElementLinkPadsMethodInfo
ResolveBaseTransformMethod "linkPadsFiltered" o = Gst.ElementLinkPadsFilteredMethodInfo
ResolveBaseTransformMethod "linkPadsFull" o = Gst.ElementLinkPadsFullMethodInfo
ResolveBaseTransformMethod "lostState" o = Gst.ElementLostStateMethodInfo
ResolveBaseTransformMethod "messageFull" o = Gst.ElementMessageFullMethodInfo
ResolveBaseTransformMethod "noMorePads" o = Gst.ElementNoMorePadsMethodInfo
ResolveBaseTransformMethod "notify" o = GObject.ObjectNotifyMethodInfo
ResolveBaseTransformMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo
ResolveBaseTransformMethod "postMessage" o = Gst.ElementPostMessageMethodInfo
ResolveBaseTransformMethod "provideClock" o = Gst.ElementProvideClockMethodInfo
ResolveBaseTransformMethod "query" o = Gst.ElementQueryMethodInfo
ResolveBaseTransformMethod "queryConvert" o = Gst.ElementQueryConvertMethodInfo
ResolveBaseTransformMethod "queryDuration" o = Gst.ElementQueryDurationMethodInfo
ResolveBaseTransformMethod "queryPosition" o = Gst.ElementQueryPositionMethodInfo
ResolveBaseTransformMethod "reconfigureSink" o = BaseTransformReconfigureSinkMethodInfo
ResolveBaseTransformMethod "reconfigureSrc" o = BaseTransformReconfigureSrcMethodInfo
ResolveBaseTransformMethod "refSink" o = GObject.ObjectRefSinkMethodInfo
ResolveBaseTransformMethod "releaseRequestPad" o = Gst.ElementReleaseRequestPadMethodInfo
ResolveBaseTransformMethod "removeControlBinding" o = Gst.ObjectRemoveControlBindingMethodInfo
ResolveBaseTransformMethod "removePad" o = Gst.ElementRemovePadMethodInfo
ResolveBaseTransformMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo
ResolveBaseTransformMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo
ResolveBaseTransformMethod "requestPad" o = Gst.ElementRequestPadMethodInfo
ResolveBaseTransformMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo
ResolveBaseTransformMethod "seek" o = Gst.ElementSeekMethodInfo
ResolveBaseTransformMethod "seekSimple" o = Gst.ElementSeekSimpleMethodInfo
ResolveBaseTransformMethod "sendEvent" o = Gst.ElementSendEventMethodInfo
ResolveBaseTransformMethod "stealData" o = GObject.ObjectStealDataMethodInfo
ResolveBaseTransformMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo
ResolveBaseTransformMethod "suggestNextSync" o = Gst.ObjectSuggestNextSyncMethodInfo
ResolveBaseTransformMethod "syncStateWithParent" o = Gst.ElementSyncStateWithParentMethodInfo
ResolveBaseTransformMethod "syncValues" o = Gst.ObjectSyncValuesMethodInfo
ResolveBaseTransformMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo
ResolveBaseTransformMethod "unlink" o = Gst.ElementUnlinkMethodInfo
ResolveBaseTransformMethod "unlinkPads" o = Gst.ElementUnlinkPadsMethodInfo
ResolveBaseTransformMethod "unparent" o = Gst.ObjectUnparentMethodInfo
ResolveBaseTransformMethod "updateQos" o = BaseTransformUpdateQosMethodInfo
ResolveBaseTransformMethod "updateSrcCaps" o = BaseTransformUpdateSrcCapsMethodInfo
ResolveBaseTransformMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo
ResolveBaseTransformMethod "getAllocator" o = BaseTransformGetAllocatorMethodInfo
ResolveBaseTransformMethod "getBaseTime" o = Gst.ElementGetBaseTimeMethodInfo
ResolveBaseTransformMethod "getBufferPool" o = BaseTransformGetBufferPoolMethodInfo
ResolveBaseTransformMethod "getBus" o = Gst.ElementGetBusMethodInfo
ResolveBaseTransformMethod "getClock" o = Gst.ElementGetClockMethodInfo
ResolveBaseTransformMethod "getCompatiblePad" o = Gst.ElementGetCompatiblePadMethodInfo
ResolveBaseTransformMethod "getCompatiblePadTemplate" o = Gst.ElementGetCompatiblePadTemplateMethodInfo
ResolveBaseTransformMethod "getControlBinding" o = Gst.ObjectGetControlBindingMethodInfo
ResolveBaseTransformMethod "getControlRate" o = Gst.ObjectGetControlRateMethodInfo
ResolveBaseTransformMethod "getData" o = GObject.ObjectGetDataMethodInfo
ResolveBaseTransformMethod "getFactory" o = Gst.ElementGetFactoryMethodInfo
ResolveBaseTransformMethod "getGValueArray" o = Gst.ObjectGetGValueArrayMethodInfo
ResolveBaseTransformMethod "getName" o = Gst.ObjectGetNameMethodInfo
ResolveBaseTransformMethod "getParent" o = Gst.ObjectGetParentMethodInfo
ResolveBaseTransformMethod "getPathString" o = Gst.ObjectGetPathStringMethodInfo
ResolveBaseTransformMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo
ResolveBaseTransformMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo
ResolveBaseTransformMethod "getRequestPad" o = Gst.ElementGetRequestPadMethodInfo
ResolveBaseTransformMethod "getStartTime" o = Gst.ElementGetStartTimeMethodInfo
ResolveBaseTransformMethod "getState" o = Gst.ElementGetStateMethodInfo
ResolveBaseTransformMethod "getStaticPad" o = Gst.ElementGetStaticPadMethodInfo
ResolveBaseTransformMethod "getValue" o = Gst.ObjectGetValueMethodInfo
ResolveBaseTransformMethod "getValueArray" o = Gst.ObjectGetValueArrayMethodInfo
ResolveBaseTransformMethod "setBaseTime" o = Gst.ElementSetBaseTimeMethodInfo
ResolveBaseTransformMethod "setBus" o = Gst.ElementSetBusMethodInfo
ResolveBaseTransformMethod "setClock" o = Gst.ElementSetClockMethodInfo
ResolveBaseTransformMethod "setContext" o = Gst.ElementSetContextMethodInfo
ResolveBaseTransformMethod "setControlBindingDisabled" o = Gst.ObjectSetControlBindingDisabledMethodInfo
ResolveBaseTransformMethod "setControlBindingsDisabled" o = Gst.ObjectSetControlBindingsDisabledMethodInfo
ResolveBaseTransformMethod "setControlRate" o = Gst.ObjectSetControlRateMethodInfo
ResolveBaseTransformMethod "setData" o = GObject.ObjectSetDataMethodInfo
ResolveBaseTransformMethod "setGapAware" o = BaseTransformSetGapAwareMethodInfo
ResolveBaseTransformMethod "setInPlace" o = BaseTransformSetInPlaceMethodInfo
ResolveBaseTransformMethod "setLockedState" o = Gst.ElementSetLockedStateMethodInfo
ResolveBaseTransformMethod "setName" o = Gst.ObjectSetNameMethodInfo
ResolveBaseTransformMethod "setParent" o = Gst.ObjectSetParentMethodInfo
ResolveBaseTransformMethod "setPassthrough" o = BaseTransformSetPassthroughMethodInfo
ResolveBaseTransformMethod "setPreferPassthrough" o = BaseTransformSetPreferPassthroughMethodInfo
ResolveBaseTransformMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo
ResolveBaseTransformMethod "setQosEnabled" o = BaseTransformSetQosEnabledMethodInfo
ResolveBaseTransformMethod "setStartTime" o = Gst.ElementSetStartTimeMethodInfo
ResolveBaseTransformMethod "setState" o = Gst.ElementSetStateMethodInfo
ResolveBaseTransformMethod l o = MethodResolutionFailed l o
instance (info ~ ResolveBaseTransformMethod t BaseTransform, MethodInfo info BaseTransform p) => IsLabelProxy t (BaseTransform -> p) where
fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveBaseTransformMethod t BaseTransform, MethodInfo info BaseTransform p) => IsLabel t (BaseTransform -> p) where
fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)
#endif
-- VVV Prop "qos"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
getBaseTransformQos :: (MonadIO m, BaseTransformK o) => o -> m Bool
getBaseTransformQos obj = liftIO $ getObjectPropertyBool obj "qos"
setBaseTransformQos :: (MonadIO m, BaseTransformK o) => o -> Bool -> m ()
setBaseTransformQos obj val = liftIO $ setObjectPropertyBool obj "qos" val
constructBaseTransformQos :: Bool -> IO ([Char], GValue)
constructBaseTransformQos val = constructObjectPropertyBool "qos" val
data BaseTransformQosPropertyInfo
instance AttrInfo BaseTransformQosPropertyInfo where
type AttrAllowedOps BaseTransformQosPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint BaseTransformQosPropertyInfo = (~) Bool
type AttrBaseTypeConstraint BaseTransformQosPropertyInfo = BaseTransformK
type AttrGetType BaseTransformQosPropertyInfo = Bool
type AttrLabel BaseTransformQosPropertyInfo = "qos"
attrGet _ = getBaseTransformQos
attrSet _ = setBaseTransformQos
attrConstruct _ = constructBaseTransformQos
type instance AttributeList BaseTransform = BaseTransformAttributeList
type BaseTransformAttributeList = ('[ '("name", Gst.ObjectNamePropertyInfo), '("parent", Gst.ObjectParentPropertyInfo), '("qos", BaseTransformQosPropertyInfo)] :: [(Symbol, *)])
type instance SignalList BaseTransform = BaseTransformSignalList
type BaseTransformSignalList = ('[ '("deepNotify", Gst.ObjectDeepNotifySignalInfo), '("noMorePads", Gst.ElementNoMorePadsSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("padAdded", Gst.ElementPadAddedSignalInfo), '("padRemoved", Gst.ElementPadRemovedSignalInfo)] :: [(Symbol, *)])
-- method BaseTransform::get_allocator
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "allocator", argType = TInterface "Gst" "Allocator", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "params", argType = TInterface "Gst" "AllocationParams", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferEverything}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_get_allocator" gst_base_transform_get_allocator ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
Ptr (Ptr Gst.Allocator) -> -- allocator : TInterface "Gst" "Allocator"
Ptr Gst.AllocationParams -> -- params : TInterface "Gst" "AllocationParams"
IO ()
baseTransformGetAllocator ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m (Gst.Allocator,Gst.AllocationParams)-- result
baseTransformGetAllocator _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
allocator <- allocMem :: IO (Ptr (Ptr Gst.Allocator))
params <- callocBoxedBytes 64 :: IO (Ptr Gst.AllocationParams)
gst_base_transform_get_allocator _obj' allocator params
allocator' <- peek allocator
allocator'' <- (wrapObject Gst.Allocator) allocator'
params' <- (wrapBoxed Gst.AllocationParams) params
touchManagedPtr _obj
freeMem allocator
return (allocator'', params')
data BaseTransformGetAllocatorMethodInfo
instance (signature ~ (m (Gst.Allocator,Gst.AllocationParams)), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformGetAllocatorMethodInfo a signature where
overloadedMethod _ = baseTransformGetAllocator
-- method BaseTransform::get_buffer_pool
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TInterface "Gst" "BufferPool"
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_get_buffer_pool" gst_base_transform_get_buffer_pool ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
IO (Ptr Gst.BufferPool)
baseTransformGetBufferPool ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m Gst.BufferPool -- result
baseTransformGetBufferPool _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gst_base_transform_get_buffer_pool _obj'
checkUnexpectedReturnNULL "gst_base_transform_get_buffer_pool" result
result' <- (wrapObject Gst.BufferPool) result
touchManagedPtr _obj
return result'
data BaseTransformGetBufferPoolMethodInfo
instance (signature ~ (m Gst.BufferPool), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformGetBufferPoolMethodInfo a signature where
overloadedMethod _ = baseTransformGetBufferPool
-- method BaseTransform::is_in_place
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_is_in_place" gst_base_transform_is_in_place ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
IO CInt
baseTransformIsInPlace ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m Bool -- result
baseTransformIsInPlace _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gst_base_transform_is_in_place _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
data BaseTransformIsInPlaceMethodInfo
instance (signature ~ (m Bool), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformIsInPlaceMethodInfo a signature where
overloadedMethod _ = baseTransformIsInPlace
-- method BaseTransform::is_passthrough
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_is_passthrough" gst_base_transform_is_passthrough ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
IO CInt
baseTransformIsPassthrough ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m Bool -- result
baseTransformIsPassthrough _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gst_base_transform_is_passthrough _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
data BaseTransformIsPassthroughMethodInfo
instance (signature ~ (m Bool), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformIsPassthroughMethodInfo a signature where
overloadedMethod _ = baseTransformIsPassthrough
-- method BaseTransform::is_qos_enabled
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_is_qos_enabled" gst_base_transform_is_qos_enabled ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
IO CInt
baseTransformIsQosEnabled ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m Bool -- result
baseTransformIsQosEnabled _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gst_base_transform_is_qos_enabled _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
data BaseTransformIsQosEnabledMethodInfo
instance (signature ~ (m Bool), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformIsQosEnabledMethodInfo a signature where
overloadedMethod _ = baseTransformIsQosEnabled
-- method BaseTransform::reconfigure_sink
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_reconfigure_sink" gst_base_transform_reconfigure_sink ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
IO ()
baseTransformReconfigureSink ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m () -- result
baseTransformReconfigureSink _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
gst_base_transform_reconfigure_sink _obj'
touchManagedPtr _obj
return ()
data BaseTransformReconfigureSinkMethodInfo
instance (signature ~ (m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformReconfigureSinkMethodInfo a signature where
overloadedMethod _ = baseTransformReconfigureSink
-- method BaseTransform::reconfigure_src
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_reconfigure_src" gst_base_transform_reconfigure_src ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
IO ()
baseTransformReconfigureSrc ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> m () -- result
baseTransformReconfigureSrc _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
gst_base_transform_reconfigure_src _obj'
touchManagedPtr _obj
return ()
data BaseTransformReconfigureSrcMethodInfo
instance (signature ~ (m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformReconfigureSrcMethodInfo a signature where
overloadedMethod _ = baseTransformReconfigureSrc
-- method BaseTransform::set_gap_aware
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "gap_aware", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_set_gap_aware" gst_base_transform_set_gap_aware ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
CInt -> -- gap_aware : TBasicType TBoolean
IO ()
baseTransformSetGapAware ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Bool -- gapAware
-> m () -- result
baseTransformSetGapAware _obj gapAware = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let gapAware' = (fromIntegral . fromEnum) gapAware
gst_base_transform_set_gap_aware _obj' gapAware'
touchManagedPtr _obj
return ()
data BaseTransformSetGapAwareMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformSetGapAwareMethodInfo a signature where
overloadedMethod _ = baseTransformSetGapAware
-- method BaseTransform::set_in_place
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "in_place", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_set_in_place" gst_base_transform_set_in_place ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
CInt -> -- in_place : TBasicType TBoolean
IO ()
baseTransformSetInPlace ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Bool -- inPlace
-> m () -- result
baseTransformSetInPlace _obj inPlace = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let inPlace' = (fromIntegral . fromEnum) inPlace
gst_base_transform_set_in_place _obj' inPlace'
touchManagedPtr _obj
return ()
data BaseTransformSetInPlaceMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformSetInPlaceMethodInfo a signature where
overloadedMethod _ = baseTransformSetInPlace
-- method BaseTransform::set_passthrough
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "passthrough", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_set_passthrough" gst_base_transform_set_passthrough ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
CInt -> -- passthrough : TBasicType TBoolean
IO ()
baseTransformSetPassthrough ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Bool -- passthrough
-> m () -- result
baseTransformSetPassthrough _obj passthrough = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let passthrough' = (fromIntegral . fromEnum) passthrough
gst_base_transform_set_passthrough _obj' passthrough'
touchManagedPtr _obj
return ()
data BaseTransformSetPassthroughMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformSetPassthroughMethodInfo a signature where
overloadedMethod _ = baseTransformSetPassthrough
-- method BaseTransform::set_prefer_passthrough
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "prefer_passthrough", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_set_prefer_passthrough" gst_base_transform_set_prefer_passthrough ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
CInt -> -- prefer_passthrough : TBasicType TBoolean
IO ()
baseTransformSetPreferPassthrough ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Bool -- preferPassthrough
-> m () -- result
baseTransformSetPreferPassthrough _obj preferPassthrough = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let preferPassthrough' = (fromIntegral . fromEnum) preferPassthrough
gst_base_transform_set_prefer_passthrough _obj' preferPassthrough'
touchManagedPtr _obj
return ()
data BaseTransformSetPreferPassthroughMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformSetPreferPassthroughMethodInfo a signature where
overloadedMethod _ = baseTransformSetPreferPassthrough
-- method BaseTransform::set_qos_enabled
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_set_qos_enabled" gst_base_transform_set_qos_enabled ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
CInt -> -- enabled : TBasicType TBoolean
IO ()
baseTransformSetQosEnabled ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Bool -- enabled
-> m () -- result
baseTransformSetQosEnabled _obj enabled = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let enabled' = (fromIntegral . fromEnum) enabled
gst_base_transform_set_qos_enabled _obj' enabled'
touchManagedPtr _obj
return ()
data BaseTransformSetQosEnabledMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformSetQosEnabledMethodInfo a signature where
overloadedMethod _ = baseTransformSetQosEnabled
-- method BaseTransform::update_qos
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "proportion", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "diff", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "timestamp", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_update_qos" gst_base_transform_update_qos ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
CDouble -> -- proportion : TBasicType TDouble
Int64 -> -- diff : TBasicType TInt64
Word64 -> -- timestamp : TBasicType TUInt64
IO ()
baseTransformUpdateQos ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Double -- proportion
-> Int64 -- diff
-> Word64 -- timestamp
-> m () -- result
baseTransformUpdateQos _obj proportion diff timestamp = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let proportion' = realToFrac proportion
gst_base_transform_update_qos _obj' proportion' diff timestamp
touchManagedPtr _obj
return ()
data BaseTransformUpdateQosMethodInfo
instance (signature ~ (Double -> Int64 -> Word64 -> m ()), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformUpdateQosMethodInfo a signature where
overloadedMethod _ = baseTransformUpdateQos
-- method BaseTransform::update_src_caps
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "GstBase" "BaseTransform", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "updated_caps", argType = TInterface "Gst" "Caps", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "gst_base_transform_update_src_caps" gst_base_transform_update_src_caps ::
Ptr BaseTransform -> -- _obj : TInterface "GstBase" "BaseTransform"
Ptr Gst.Caps -> -- updated_caps : TInterface "Gst" "Caps"
IO CInt
baseTransformUpdateSrcCaps ::
(MonadIO m, BaseTransformK a) =>
a -- _obj
-> Gst.Caps -- updatedCaps
-> m Bool -- result
baseTransformUpdateSrcCaps _obj updatedCaps = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let updatedCaps' = unsafeManagedPtrGetPtr updatedCaps
result <- gst_base_transform_update_src_caps _obj' updatedCaps'
let result' = (/= 0) result
touchManagedPtr _obj
touchManagedPtr updatedCaps
return result'
data BaseTransformUpdateSrcCapsMethodInfo
instance (signature ~ (Gst.Caps -> m Bool), MonadIO m, BaseTransformK a) => MethodInfo BaseTransformUpdateSrcCapsMethodInfo a signature where
overloadedMethod _ = baseTransformUpdateSrcCaps