#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.GstAudio.Objects.AudioBaseSrc
(
AudioBaseSrc(..) ,
IsAudioBaseSrc ,
toAudioBaseSrc ,
noAudioBaseSrc ,
#if ENABLE_OVERLOADING
AudioBaseSrcCreateRingbufferMethodInfo ,
#endif
audioBaseSrcCreateRingbuffer ,
#if ENABLE_OVERLOADING
AudioBaseSrcGetProvideClockMethodInfo ,
#endif
audioBaseSrcGetProvideClock ,
#if ENABLE_OVERLOADING
AudioBaseSrcGetSlaveMethodMethodInfo ,
#endif
audioBaseSrcGetSlaveMethod ,
#if ENABLE_OVERLOADING
AudioBaseSrcSetProvideClockMethodInfo ,
#endif
audioBaseSrcSetProvideClock ,
#if ENABLE_OVERLOADING
AudioBaseSrcSetSlaveMethodMethodInfo ,
#endif
audioBaseSrcSetSlaveMethod ,
#if ENABLE_OVERLOADING
AudioBaseSrcActualBufferTimePropertyInfo,
#endif
#if ENABLE_OVERLOADING
audioBaseSrcActualBufferTime ,
#endif
getAudioBaseSrcActualBufferTime ,
#if ENABLE_OVERLOADING
AudioBaseSrcActualLatencyTimePropertyInfo,
#endif
#if ENABLE_OVERLOADING
audioBaseSrcActualLatencyTime ,
#endif
getAudioBaseSrcActualLatencyTime ,
#if ENABLE_OVERLOADING
AudioBaseSrcBufferTimePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioBaseSrcBufferTime ,
#endif
constructAudioBaseSrcBufferTime ,
getAudioBaseSrcBufferTime ,
setAudioBaseSrcBufferTime ,
#if ENABLE_OVERLOADING
AudioBaseSrcLatencyTimePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioBaseSrcLatencyTime ,
#endif
constructAudioBaseSrcLatencyTime ,
getAudioBaseSrcLatencyTime ,
setAudioBaseSrcLatencyTime ,
#if ENABLE_OVERLOADING
AudioBaseSrcProvideClockPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioBaseSrcProvideClock ,
#endif
constructAudioBaseSrcProvideClock ,
getAudioBaseSrcProvideClock ,
setAudioBaseSrcProvideClock ,
#if ENABLE_OVERLOADING
AudioBaseSrcSlaveMethodPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioBaseSrcSlaveMethod ,
#endif
constructAudioBaseSrcSlaveMethod ,
getAudioBaseSrcSlaveMethod ,
setAudioBaseSrcSlaveMethod ,
) 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.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
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 GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gst.Objects.Element as Gst.Element
import qualified GI.Gst.Objects.Object as Gst.Object
import {-# SOURCE #-} qualified GI.GstAudio.Enums as GstAudio.Enums
import {-# SOURCE #-} qualified GI.GstAudio.Objects.AudioRingBuffer as GstAudio.AudioRingBuffer
import qualified GI.GstBase.Objects.BaseSrc as GstBase.BaseSrc
import qualified GI.GstBase.Objects.PushSrc as GstBase.PushSrc
newtype AudioBaseSrc = AudioBaseSrc (ManagedPtr AudioBaseSrc)
foreign import ccall "gst_audio_base_src_get_type"
c_gst_audio_base_src_get_type :: IO GType
instance GObject AudioBaseSrc where
gobjectType = c_gst_audio_base_src_get_type
class (GObject o, O.IsDescendantOf AudioBaseSrc o) => IsAudioBaseSrc o
instance (GObject o, O.IsDescendantOf AudioBaseSrc o) => IsAudioBaseSrc o
instance O.HasParentTypes AudioBaseSrc
type instance O.ParentTypes AudioBaseSrc = '[GstBase.PushSrc.PushSrc, GstBase.BaseSrc.BaseSrc, Gst.Element.Element, Gst.Object.Object, GObject.Object.Object]
toAudioBaseSrc :: (MonadIO m, IsAudioBaseSrc o) => o -> m AudioBaseSrc
toAudioBaseSrc = liftIO . unsafeCastTo AudioBaseSrc
noAudioBaseSrc :: Maybe AudioBaseSrc
noAudioBaseSrc = Nothing
#if ENABLE_OVERLOADING
type family ResolveAudioBaseSrcMethod (t :: Symbol) (o :: *) :: * where
ResolveAudioBaseSrcMethod "abortState" o = Gst.Element.ElementAbortStateMethodInfo
ResolveAudioBaseSrcMethod "addControlBinding" o = Gst.Object.ObjectAddControlBindingMethodInfo
ResolveAudioBaseSrcMethod "addPad" o = Gst.Element.ElementAddPadMethodInfo
ResolveAudioBaseSrcMethod "addPropertyDeepNotifyWatch" o = Gst.Element.ElementAddPropertyDeepNotifyWatchMethodInfo
ResolveAudioBaseSrcMethod "addPropertyNotifyWatch" o = Gst.Element.ElementAddPropertyNotifyWatchMethodInfo
ResolveAudioBaseSrcMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveAudioBaseSrcMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveAudioBaseSrcMethod "callAsync" o = Gst.Element.ElementCallAsyncMethodInfo
ResolveAudioBaseSrcMethod "changeState" o = Gst.Element.ElementChangeStateMethodInfo
ResolveAudioBaseSrcMethod "continueState" o = Gst.Element.ElementContinueStateMethodInfo
ResolveAudioBaseSrcMethod "createAllPads" o = Gst.Element.ElementCreateAllPadsMethodInfo
ResolveAudioBaseSrcMethod "createRingbuffer" o = AudioBaseSrcCreateRingbufferMethodInfo
ResolveAudioBaseSrcMethod "defaultError" o = Gst.Object.ObjectDefaultErrorMethodInfo
ResolveAudioBaseSrcMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveAudioBaseSrcMethod "foreachPad" o = Gst.Element.ElementForeachPadMethodInfo
ResolveAudioBaseSrcMethod "foreachSinkPad" o = Gst.Element.ElementForeachSinkPadMethodInfo
ResolveAudioBaseSrcMethod "foreachSrcPad" o = Gst.Element.ElementForeachSrcPadMethodInfo
ResolveAudioBaseSrcMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveAudioBaseSrcMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveAudioBaseSrcMethod "hasActiveControlBindings" o = Gst.Object.ObjectHasActiveControlBindingsMethodInfo
ResolveAudioBaseSrcMethod "hasAncestor" o = Gst.Object.ObjectHasAncestorMethodInfo
ResolveAudioBaseSrcMethod "hasAsAncestor" o = Gst.Object.ObjectHasAsAncestorMethodInfo
ResolveAudioBaseSrcMethod "hasAsParent" o = Gst.Object.ObjectHasAsParentMethodInfo
ResolveAudioBaseSrcMethod "isAsync" o = GstBase.BaseSrc.BaseSrcIsAsyncMethodInfo
ResolveAudioBaseSrcMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveAudioBaseSrcMethod "isLive" o = GstBase.BaseSrc.BaseSrcIsLiveMethodInfo
ResolveAudioBaseSrcMethod "isLockedState" o = Gst.Element.ElementIsLockedStateMethodInfo
ResolveAudioBaseSrcMethod "iteratePads" o = Gst.Element.ElementIteratePadsMethodInfo
ResolveAudioBaseSrcMethod "iterateSinkPads" o = Gst.Element.ElementIterateSinkPadsMethodInfo
ResolveAudioBaseSrcMethod "iterateSrcPads" o = Gst.Element.ElementIterateSrcPadsMethodInfo
ResolveAudioBaseSrcMethod "link" o = Gst.Element.ElementLinkMethodInfo
ResolveAudioBaseSrcMethod "linkFiltered" o = Gst.Element.ElementLinkFilteredMethodInfo
ResolveAudioBaseSrcMethod "linkPads" o = Gst.Element.ElementLinkPadsMethodInfo
ResolveAudioBaseSrcMethod "linkPadsFiltered" o = Gst.Element.ElementLinkPadsFilteredMethodInfo
ResolveAudioBaseSrcMethod "linkPadsFull" o = Gst.Element.ElementLinkPadsFullMethodInfo
ResolveAudioBaseSrcMethod "lostState" o = Gst.Element.ElementLostStateMethodInfo
ResolveAudioBaseSrcMethod "messageFull" o = Gst.Element.ElementMessageFullMethodInfo
ResolveAudioBaseSrcMethod "messageFullWithDetails" o = Gst.Element.ElementMessageFullWithDetailsMethodInfo
ResolveAudioBaseSrcMethod "newSeamlessSegment" o = GstBase.BaseSrc.BaseSrcNewSeamlessSegmentMethodInfo
ResolveAudioBaseSrcMethod "noMorePads" o = Gst.Element.ElementNoMorePadsMethodInfo
ResolveAudioBaseSrcMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveAudioBaseSrcMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveAudioBaseSrcMethod "postMessage" o = Gst.Element.ElementPostMessageMethodInfo
ResolveAudioBaseSrcMethod "provideClock" o = Gst.Element.ElementProvideClockMethodInfo
ResolveAudioBaseSrcMethod "query" o = Gst.Element.ElementQueryMethodInfo
ResolveAudioBaseSrcMethod "queryConvert" o = Gst.Element.ElementQueryConvertMethodInfo
ResolveAudioBaseSrcMethod "queryDuration" o = Gst.Element.ElementQueryDurationMethodInfo
ResolveAudioBaseSrcMethod "queryLatency" o = GstBase.BaseSrc.BaseSrcQueryLatencyMethodInfo
ResolveAudioBaseSrcMethod "queryPosition" o = Gst.Element.ElementQueryPositionMethodInfo
ResolveAudioBaseSrcMethod "ref" o = Gst.Object.ObjectRefMethodInfo
ResolveAudioBaseSrcMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveAudioBaseSrcMethod "releaseRequestPad" o = Gst.Element.ElementReleaseRequestPadMethodInfo
ResolveAudioBaseSrcMethod "removeControlBinding" o = Gst.Object.ObjectRemoveControlBindingMethodInfo
ResolveAudioBaseSrcMethod "removePad" o = Gst.Element.ElementRemovePadMethodInfo
ResolveAudioBaseSrcMethod "removePropertyNotifyWatch" o = Gst.Element.ElementRemovePropertyNotifyWatchMethodInfo
ResolveAudioBaseSrcMethod "requestPad" o = Gst.Element.ElementRequestPadMethodInfo
ResolveAudioBaseSrcMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveAudioBaseSrcMethod "seek" o = Gst.Element.ElementSeekMethodInfo
ResolveAudioBaseSrcMethod "seekSimple" o = Gst.Element.ElementSeekSimpleMethodInfo
ResolveAudioBaseSrcMethod "sendEvent" o = Gst.Element.ElementSendEventMethodInfo
ResolveAudioBaseSrcMethod "startComplete" o = GstBase.BaseSrc.BaseSrcStartCompleteMethodInfo
ResolveAudioBaseSrcMethod "startWait" o = GstBase.BaseSrc.BaseSrcStartWaitMethodInfo
ResolveAudioBaseSrcMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveAudioBaseSrcMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveAudioBaseSrcMethod "submitBufferList" o = GstBase.BaseSrc.BaseSrcSubmitBufferListMethodInfo
ResolveAudioBaseSrcMethod "suggestNextSync" o = Gst.Object.ObjectSuggestNextSyncMethodInfo
ResolveAudioBaseSrcMethod "syncStateWithParent" o = Gst.Element.ElementSyncStateWithParentMethodInfo
ResolveAudioBaseSrcMethod "syncValues" o = Gst.Object.ObjectSyncValuesMethodInfo
ResolveAudioBaseSrcMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveAudioBaseSrcMethod "unlink" o = Gst.Element.ElementUnlinkMethodInfo
ResolveAudioBaseSrcMethod "unlinkPads" o = Gst.Element.ElementUnlinkPadsMethodInfo
ResolveAudioBaseSrcMethod "unparent" o = Gst.Object.ObjectUnparentMethodInfo
ResolveAudioBaseSrcMethod "unref" o = Gst.Object.ObjectUnrefMethodInfo
ResolveAudioBaseSrcMethod "waitPlaying" o = GstBase.BaseSrc.BaseSrcWaitPlayingMethodInfo
ResolveAudioBaseSrcMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveAudioBaseSrcMethod "getAllocator" o = GstBase.BaseSrc.BaseSrcGetAllocatorMethodInfo
ResolveAudioBaseSrcMethod "getBaseTime" o = Gst.Element.ElementGetBaseTimeMethodInfo
ResolveAudioBaseSrcMethod "getBlocksize" o = GstBase.BaseSrc.BaseSrcGetBlocksizeMethodInfo
ResolveAudioBaseSrcMethod "getBufferPool" o = GstBase.BaseSrc.BaseSrcGetBufferPoolMethodInfo
ResolveAudioBaseSrcMethod "getBus" o = Gst.Element.ElementGetBusMethodInfo
ResolveAudioBaseSrcMethod "getClock" o = Gst.Element.ElementGetClockMethodInfo
ResolveAudioBaseSrcMethod "getCompatiblePad" o = Gst.Element.ElementGetCompatiblePadMethodInfo
ResolveAudioBaseSrcMethod "getCompatiblePadTemplate" o = Gst.Element.ElementGetCompatiblePadTemplateMethodInfo
ResolveAudioBaseSrcMethod "getContext" o = Gst.Element.ElementGetContextMethodInfo
ResolveAudioBaseSrcMethod "getContextUnlocked" o = Gst.Element.ElementGetContextUnlockedMethodInfo
ResolveAudioBaseSrcMethod "getContexts" o = Gst.Element.ElementGetContextsMethodInfo
ResolveAudioBaseSrcMethod "getControlBinding" o = Gst.Object.ObjectGetControlBindingMethodInfo
ResolveAudioBaseSrcMethod "getControlRate" o = Gst.Object.ObjectGetControlRateMethodInfo
ResolveAudioBaseSrcMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveAudioBaseSrcMethod "getDoTimestamp" o = GstBase.BaseSrc.BaseSrcGetDoTimestampMethodInfo
ResolveAudioBaseSrcMethod "getFactory" o = Gst.Element.ElementGetFactoryMethodInfo
ResolveAudioBaseSrcMethod "getGValueArray" o = Gst.Object.ObjectGetGValueArrayMethodInfo
ResolveAudioBaseSrcMethod "getMetadata" o = Gst.Element.ElementGetMetadataMethodInfo
ResolveAudioBaseSrcMethod "getName" o = Gst.Object.ObjectGetNameMethodInfo
ResolveAudioBaseSrcMethod "getPadTemplate" o = Gst.Element.ElementGetPadTemplateMethodInfo
ResolveAudioBaseSrcMethod "getPadTemplateList" o = Gst.Element.ElementGetPadTemplateListMethodInfo
ResolveAudioBaseSrcMethod "getParent" o = Gst.Object.ObjectGetParentMethodInfo
ResolveAudioBaseSrcMethod "getPathString" o = Gst.Object.ObjectGetPathStringMethodInfo
ResolveAudioBaseSrcMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveAudioBaseSrcMethod "getProvideClock" o = AudioBaseSrcGetProvideClockMethodInfo
ResolveAudioBaseSrcMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveAudioBaseSrcMethod "getRequestPad" o = Gst.Element.ElementGetRequestPadMethodInfo
ResolveAudioBaseSrcMethod "getSlaveMethod" o = AudioBaseSrcGetSlaveMethodMethodInfo
ResolveAudioBaseSrcMethod "getStartTime" o = Gst.Element.ElementGetStartTimeMethodInfo
ResolveAudioBaseSrcMethod "getState" o = Gst.Element.ElementGetStateMethodInfo
ResolveAudioBaseSrcMethod "getStaticPad" o = Gst.Element.ElementGetStaticPadMethodInfo
ResolveAudioBaseSrcMethod "getValue" o = Gst.Object.ObjectGetValueMethodInfo
ResolveAudioBaseSrcMethod "setAsync" o = GstBase.BaseSrc.BaseSrcSetAsyncMethodInfo
ResolveAudioBaseSrcMethod "setAutomaticEos" o = GstBase.BaseSrc.BaseSrcSetAutomaticEosMethodInfo
ResolveAudioBaseSrcMethod "setBaseTime" o = Gst.Element.ElementSetBaseTimeMethodInfo
ResolveAudioBaseSrcMethod "setBlocksize" o = GstBase.BaseSrc.BaseSrcSetBlocksizeMethodInfo
ResolveAudioBaseSrcMethod "setBus" o = Gst.Element.ElementSetBusMethodInfo
ResolveAudioBaseSrcMethod "setCaps" o = GstBase.BaseSrc.BaseSrcSetCapsMethodInfo
ResolveAudioBaseSrcMethod "setClock" o = Gst.Element.ElementSetClockMethodInfo
ResolveAudioBaseSrcMethod "setContext" o = Gst.Element.ElementSetContextMethodInfo
ResolveAudioBaseSrcMethod "setControlBindingDisabled" o = Gst.Object.ObjectSetControlBindingDisabledMethodInfo
ResolveAudioBaseSrcMethod "setControlBindingsDisabled" o = Gst.Object.ObjectSetControlBindingsDisabledMethodInfo
ResolveAudioBaseSrcMethod "setControlRate" o = Gst.Object.ObjectSetControlRateMethodInfo
ResolveAudioBaseSrcMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveAudioBaseSrcMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveAudioBaseSrcMethod "setDoTimestamp" o = GstBase.BaseSrc.BaseSrcSetDoTimestampMethodInfo
ResolveAudioBaseSrcMethod "setDynamicSize" o = GstBase.BaseSrc.BaseSrcSetDynamicSizeMethodInfo
ResolveAudioBaseSrcMethod "setFormat" o = GstBase.BaseSrc.BaseSrcSetFormatMethodInfo
ResolveAudioBaseSrcMethod "setLive" o = GstBase.BaseSrc.BaseSrcSetLiveMethodInfo
ResolveAudioBaseSrcMethod "setLockedState" o = Gst.Element.ElementSetLockedStateMethodInfo
ResolveAudioBaseSrcMethod "setName" o = Gst.Object.ObjectSetNameMethodInfo
ResolveAudioBaseSrcMethod "setParent" o = Gst.Object.ObjectSetParentMethodInfo
ResolveAudioBaseSrcMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveAudioBaseSrcMethod "setProvideClock" o = AudioBaseSrcSetProvideClockMethodInfo
ResolveAudioBaseSrcMethod "setSlaveMethod" o = AudioBaseSrcSetSlaveMethodMethodInfo
ResolveAudioBaseSrcMethod "setStartTime" o = Gst.Element.ElementSetStartTimeMethodInfo
ResolveAudioBaseSrcMethod "setState" o = Gst.Element.ElementSetStateMethodInfo
ResolveAudioBaseSrcMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveAudioBaseSrcMethod t AudioBaseSrc, O.MethodInfo info AudioBaseSrc p) => OL.IsLabel t (AudioBaseSrc -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
getAudioBaseSrcActualBufferTime :: (MonadIO m, IsAudioBaseSrc o) => o -> m Int64
getAudioBaseSrcActualBufferTime obj = liftIO $ B.Properties.getObjectPropertyInt64 obj "actual-buffer-time"
#if ENABLE_OVERLOADING
data AudioBaseSrcActualBufferTimePropertyInfo
instance AttrInfo AudioBaseSrcActualBufferTimePropertyInfo where
type AttrAllowedOps AudioBaseSrcActualBufferTimePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint AudioBaseSrcActualBufferTimePropertyInfo = (~) ()
type AttrBaseTypeConstraint AudioBaseSrcActualBufferTimePropertyInfo = IsAudioBaseSrc
type AttrGetType AudioBaseSrcActualBufferTimePropertyInfo = Int64
type AttrLabel AudioBaseSrcActualBufferTimePropertyInfo = "actual-buffer-time"
type AttrOrigin AudioBaseSrcActualBufferTimePropertyInfo = AudioBaseSrc
attrGet _ = getAudioBaseSrcActualBufferTime
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getAudioBaseSrcActualLatencyTime :: (MonadIO m, IsAudioBaseSrc o) => o -> m Int64
getAudioBaseSrcActualLatencyTime obj = liftIO $ B.Properties.getObjectPropertyInt64 obj "actual-latency-time"
#if ENABLE_OVERLOADING
data AudioBaseSrcActualLatencyTimePropertyInfo
instance AttrInfo AudioBaseSrcActualLatencyTimePropertyInfo where
type AttrAllowedOps AudioBaseSrcActualLatencyTimePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint AudioBaseSrcActualLatencyTimePropertyInfo = (~) ()
type AttrBaseTypeConstraint AudioBaseSrcActualLatencyTimePropertyInfo = IsAudioBaseSrc
type AttrGetType AudioBaseSrcActualLatencyTimePropertyInfo = Int64
type AttrLabel AudioBaseSrcActualLatencyTimePropertyInfo = "actual-latency-time"
type AttrOrigin AudioBaseSrcActualLatencyTimePropertyInfo = AudioBaseSrc
attrGet _ = getAudioBaseSrcActualLatencyTime
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getAudioBaseSrcBufferTime :: (MonadIO m, IsAudioBaseSrc o) => o -> m Int64
getAudioBaseSrcBufferTime obj = liftIO $ B.Properties.getObjectPropertyInt64 obj "buffer-time"
setAudioBaseSrcBufferTime :: (MonadIO m, IsAudioBaseSrc o) => o -> Int64 -> m ()
setAudioBaseSrcBufferTime obj val = liftIO $ B.Properties.setObjectPropertyInt64 obj "buffer-time" val
constructAudioBaseSrcBufferTime :: (IsAudioBaseSrc o) => Int64 -> IO (GValueConstruct o)
constructAudioBaseSrcBufferTime val = B.Properties.constructObjectPropertyInt64 "buffer-time" val
#if ENABLE_OVERLOADING
data AudioBaseSrcBufferTimePropertyInfo
instance AttrInfo AudioBaseSrcBufferTimePropertyInfo where
type AttrAllowedOps AudioBaseSrcBufferTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioBaseSrcBufferTimePropertyInfo = (~) Int64
type AttrBaseTypeConstraint AudioBaseSrcBufferTimePropertyInfo = IsAudioBaseSrc
type AttrGetType AudioBaseSrcBufferTimePropertyInfo = Int64
type AttrLabel AudioBaseSrcBufferTimePropertyInfo = "buffer-time"
type AttrOrigin AudioBaseSrcBufferTimePropertyInfo = AudioBaseSrc
attrGet _ = getAudioBaseSrcBufferTime
attrSet _ = setAudioBaseSrcBufferTime
attrConstruct _ = constructAudioBaseSrcBufferTime
attrClear _ = undefined
#endif
getAudioBaseSrcLatencyTime :: (MonadIO m, IsAudioBaseSrc o) => o -> m Int64
getAudioBaseSrcLatencyTime obj = liftIO $ B.Properties.getObjectPropertyInt64 obj "latency-time"
setAudioBaseSrcLatencyTime :: (MonadIO m, IsAudioBaseSrc o) => o -> Int64 -> m ()
setAudioBaseSrcLatencyTime obj val = liftIO $ B.Properties.setObjectPropertyInt64 obj "latency-time" val
constructAudioBaseSrcLatencyTime :: (IsAudioBaseSrc o) => Int64 -> IO (GValueConstruct o)
constructAudioBaseSrcLatencyTime val = B.Properties.constructObjectPropertyInt64 "latency-time" val
#if ENABLE_OVERLOADING
data AudioBaseSrcLatencyTimePropertyInfo
instance AttrInfo AudioBaseSrcLatencyTimePropertyInfo where
type AttrAllowedOps AudioBaseSrcLatencyTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioBaseSrcLatencyTimePropertyInfo = (~) Int64
type AttrBaseTypeConstraint AudioBaseSrcLatencyTimePropertyInfo = IsAudioBaseSrc
type AttrGetType AudioBaseSrcLatencyTimePropertyInfo = Int64
type AttrLabel AudioBaseSrcLatencyTimePropertyInfo = "latency-time"
type AttrOrigin AudioBaseSrcLatencyTimePropertyInfo = AudioBaseSrc
attrGet _ = getAudioBaseSrcLatencyTime
attrSet _ = setAudioBaseSrcLatencyTime
attrConstruct _ = constructAudioBaseSrcLatencyTime
attrClear _ = undefined
#endif
getAudioBaseSrcProvideClock :: (MonadIO m, IsAudioBaseSrc o) => o -> m Bool
getAudioBaseSrcProvideClock obj = liftIO $ B.Properties.getObjectPropertyBool obj "provide-clock"
setAudioBaseSrcProvideClock :: (MonadIO m, IsAudioBaseSrc o) => o -> Bool -> m ()
setAudioBaseSrcProvideClock obj val = liftIO $ B.Properties.setObjectPropertyBool obj "provide-clock" val
constructAudioBaseSrcProvideClock :: (IsAudioBaseSrc o) => Bool -> IO (GValueConstruct o)
constructAudioBaseSrcProvideClock val = B.Properties.constructObjectPropertyBool "provide-clock" val
#if ENABLE_OVERLOADING
data AudioBaseSrcProvideClockPropertyInfo
instance AttrInfo AudioBaseSrcProvideClockPropertyInfo where
type AttrAllowedOps AudioBaseSrcProvideClockPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioBaseSrcProvideClockPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AudioBaseSrcProvideClockPropertyInfo = IsAudioBaseSrc
type AttrGetType AudioBaseSrcProvideClockPropertyInfo = Bool
type AttrLabel AudioBaseSrcProvideClockPropertyInfo = "provide-clock"
type AttrOrigin AudioBaseSrcProvideClockPropertyInfo = AudioBaseSrc
attrGet _ = getAudioBaseSrcProvideClock
attrSet _ = setAudioBaseSrcProvideClock
attrConstruct _ = constructAudioBaseSrcProvideClock
attrClear _ = undefined
#endif
getAudioBaseSrcSlaveMethod :: (MonadIO m, IsAudioBaseSrc o) => o -> m GstAudio.Enums.AudioBaseSrcSlaveMethod
getAudioBaseSrcSlaveMethod obj = liftIO $ B.Properties.getObjectPropertyEnum obj "slave-method"
setAudioBaseSrcSlaveMethod :: (MonadIO m, IsAudioBaseSrc o) => o -> GstAudio.Enums.AudioBaseSrcSlaveMethod -> m ()
setAudioBaseSrcSlaveMethod obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "slave-method" val
constructAudioBaseSrcSlaveMethod :: (IsAudioBaseSrc o) => GstAudio.Enums.AudioBaseSrcSlaveMethod -> IO (GValueConstruct o)
constructAudioBaseSrcSlaveMethod val = B.Properties.constructObjectPropertyEnum "slave-method" val
#if ENABLE_OVERLOADING
data AudioBaseSrcSlaveMethodPropertyInfo
instance AttrInfo AudioBaseSrcSlaveMethodPropertyInfo where
type AttrAllowedOps AudioBaseSrcSlaveMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioBaseSrcSlaveMethodPropertyInfo = (~) GstAudio.Enums.AudioBaseSrcSlaveMethod
type AttrBaseTypeConstraint AudioBaseSrcSlaveMethodPropertyInfo = IsAudioBaseSrc
type AttrGetType AudioBaseSrcSlaveMethodPropertyInfo = GstAudio.Enums.AudioBaseSrcSlaveMethod
type AttrLabel AudioBaseSrcSlaveMethodPropertyInfo = "slave-method"
type AttrOrigin AudioBaseSrcSlaveMethodPropertyInfo = AudioBaseSrc
attrGet _ = getAudioBaseSrcSlaveMethod
attrSet _ = setAudioBaseSrcSlaveMethod
attrConstruct _ = constructAudioBaseSrcSlaveMethod
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList AudioBaseSrc
type instance O.AttributeList AudioBaseSrc = AudioBaseSrcAttributeList
type AudioBaseSrcAttributeList = ('[ '("actualBufferTime", AudioBaseSrcActualBufferTimePropertyInfo), '("actualLatencyTime", AudioBaseSrcActualLatencyTimePropertyInfo), '("blocksize", GstBase.BaseSrc.BaseSrcBlocksizePropertyInfo), '("bufferTime", AudioBaseSrcBufferTimePropertyInfo), '("doTimestamp", GstBase.BaseSrc.BaseSrcDoTimestampPropertyInfo), '("latencyTime", AudioBaseSrcLatencyTimePropertyInfo), '("name", Gst.Object.ObjectNamePropertyInfo), '("numBuffers", GstBase.BaseSrc.BaseSrcNumBuffersPropertyInfo), '("parent", Gst.Object.ObjectParentPropertyInfo), '("provideClock", AudioBaseSrcProvideClockPropertyInfo), '("slaveMethod", AudioBaseSrcSlaveMethodPropertyInfo), '("typefind", GstBase.BaseSrc.BaseSrcTypefindPropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
audioBaseSrcActualBufferTime :: AttrLabelProxy "actualBufferTime"
audioBaseSrcActualBufferTime = AttrLabelProxy
audioBaseSrcActualLatencyTime :: AttrLabelProxy "actualLatencyTime"
audioBaseSrcActualLatencyTime = AttrLabelProxy
audioBaseSrcBufferTime :: AttrLabelProxy "bufferTime"
audioBaseSrcBufferTime = AttrLabelProxy
audioBaseSrcLatencyTime :: AttrLabelProxy "latencyTime"
audioBaseSrcLatencyTime = AttrLabelProxy
audioBaseSrcProvideClock :: AttrLabelProxy "provideClock"
audioBaseSrcProvideClock = AttrLabelProxy
audioBaseSrcSlaveMethod :: AttrLabelProxy "slaveMethod"
audioBaseSrcSlaveMethod = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
type instance O.SignalList AudioBaseSrc = AudioBaseSrcSignalList
type AudioBaseSrcSignalList = ('[ '("deepNotify", Gst.Object.ObjectDeepNotifySignalInfo), '("noMorePads", Gst.Element.ElementNoMorePadsSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("padAdded", Gst.Element.ElementPadAddedSignalInfo), '("padRemoved", Gst.Element.ElementPadRemovedSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gst_audio_base_src_create_ringbuffer" gst_audio_base_src_create_ringbuffer ::
Ptr AudioBaseSrc ->
IO (Ptr GstAudio.AudioRingBuffer.AudioRingBuffer)
audioBaseSrcCreateRingbuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioBaseSrc a) =>
a
-> m GstAudio.AudioRingBuffer.AudioRingBuffer
audioBaseSrcCreateRingbuffer src = liftIO $ do
src' <- unsafeManagedPtrCastPtr src
result <- gst_audio_base_src_create_ringbuffer src'
checkUnexpectedReturnNULL "audioBaseSrcCreateRingbuffer" result
result' <- (newObject GstAudio.AudioRingBuffer.AudioRingBuffer) result
touchManagedPtr src
return result'
#if ENABLE_OVERLOADING
data AudioBaseSrcCreateRingbufferMethodInfo
instance (signature ~ (m GstAudio.AudioRingBuffer.AudioRingBuffer), MonadIO m, IsAudioBaseSrc a) => O.MethodInfo AudioBaseSrcCreateRingbufferMethodInfo a signature where
overloadedMethod _ = audioBaseSrcCreateRingbuffer
#endif
foreign import ccall "gst_audio_base_src_get_provide_clock" gst_audio_base_src_get_provide_clock ::
Ptr AudioBaseSrc ->
IO CInt
audioBaseSrcGetProvideClock ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioBaseSrc a) =>
a
-> m Bool
audioBaseSrcGetProvideClock src = liftIO $ do
src' <- unsafeManagedPtrCastPtr src
result <- gst_audio_base_src_get_provide_clock src'
let result' = (/= 0) result
touchManagedPtr src
return result'
#if ENABLE_OVERLOADING
data AudioBaseSrcGetProvideClockMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsAudioBaseSrc a) => O.MethodInfo AudioBaseSrcGetProvideClockMethodInfo a signature where
overloadedMethod _ = audioBaseSrcGetProvideClock
#endif
foreign import ccall "gst_audio_base_src_get_slave_method" gst_audio_base_src_get_slave_method ::
Ptr AudioBaseSrc ->
IO CUInt
audioBaseSrcGetSlaveMethod ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioBaseSrc a) =>
a
-> m GstAudio.Enums.AudioBaseSrcSlaveMethod
audioBaseSrcGetSlaveMethod src = liftIO $ do
src' <- unsafeManagedPtrCastPtr src
result <- gst_audio_base_src_get_slave_method src'
let result' = (toEnum . fromIntegral) result
touchManagedPtr src
return result'
#if ENABLE_OVERLOADING
data AudioBaseSrcGetSlaveMethodMethodInfo
instance (signature ~ (m GstAudio.Enums.AudioBaseSrcSlaveMethod), MonadIO m, IsAudioBaseSrc a) => O.MethodInfo AudioBaseSrcGetSlaveMethodMethodInfo a signature where
overloadedMethod _ = audioBaseSrcGetSlaveMethod
#endif
foreign import ccall "gst_audio_base_src_set_provide_clock" gst_audio_base_src_set_provide_clock ::
Ptr AudioBaseSrc ->
CInt ->
IO ()
audioBaseSrcSetProvideClock ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioBaseSrc a) =>
a
-> Bool
-> m ()
audioBaseSrcSetProvideClock src provide = liftIO $ do
src' <- unsafeManagedPtrCastPtr src
let provide' = (fromIntegral . fromEnum) provide
gst_audio_base_src_set_provide_clock src' provide'
touchManagedPtr src
return ()
#if ENABLE_OVERLOADING
data AudioBaseSrcSetProvideClockMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioBaseSrc a) => O.MethodInfo AudioBaseSrcSetProvideClockMethodInfo a signature where
overloadedMethod _ = audioBaseSrcSetProvideClock
#endif
foreign import ccall "gst_audio_base_src_set_slave_method" gst_audio_base_src_set_slave_method ::
Ptr AudioBaseSrc ->
CUInt ->
IO ()
audioBaseSrcSetSlaveMethod ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioBaseSrc a) =>
a
-> GstAudio.Enums.AudioBaseSrcSlaveMethod
-> m ()
audioBaseSrcSetSlaveMethod src method = liftIO $ do
src' <- unsafeManagedPtrCastPtr src
let method' = (fromIntegral . fromEnum) method
gst_audio_base_src_set_slave_method src' method'
touchManagedPtr src
return ()
#if ENABLE_OVERLOADING
data AudioBaseSrcSetSlaveMethodMethodInfo
instance (signature ~ (GstAudio.Enums.AudioBaseSrcSlaveMethod -> m ()), MonadIO m, IsAudioBaseSrc a) => O.MethodInfo AudioBaseSrcSetSlaveMethodMethodInfo a signature where
overloadedMethod _ = audioBaseSrcSetSlaveMethod
#endif