#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.GstAudio.Objects.AudioDecoder
(
AudioDecoder(..) ,
IsAudioDecoder ,
toAudioDecoder ,
noAudioDecoder ,
#if ENABLE_OVERLOADING
AudioDecoderAllocateOutputBufferMethodInfo,
#endif
audioDecoderAllocateOutputBuffer ,
#if ENABLE_OVERLOADING
AudioDecoderFinishFrameMethodInfo ,
#endif
audioDecoderFinishFrame ,
#if ENABLE_OVERLOADING
AudioDecoderGetAllocatorMethodInfo ,
#endif
audioDecoderGetAllocator ,
#if ENABLE_OVERLOADING
AudioDecoderGetAudioInfoMethodInfo ,
#endif
audioDecoderGetAudioInfo ,
#if ENABLE_OVERLOADING
AudioDecoderGetDelayMethodInfo ,
#endif
audioDecoderGetDelay ,
#if ENABLE_OVERLOADING
AudioDecoderGetDrainableMethodInfo ,
#endif
audioDecoderGetDrainable ,
#if ENABLE_OVERLOADING
AudioDecoderGetEstimateRateMethodInfo ,
#endif
audioDecoderGetEstimateRate ,
#if ENABLE_OVERLOADING
AudioDecoderGetLatencyMethodInfo ,
#endif
audioDecoderGetLatency ,
#if ENABLE_OVERLOADING
AudioDecoderGetMaxErrorsMethodInfo ,
#endif
audioDecoderGetMaxErrors ,
#if ENABLE_OVERLOADING
AudioDecoderGetMinLatencyMethodInfo ,
#endif
audioDecoderGetMinLatency ,
#if ENABLE_OVERLOADING
AudioDecoderGetNeedsFormatMethodInfo ,
#endif
audioDecoderGetNeedsFormat ,
#if ENABLE_OVERLOADING
AudioDecoderGetParseStateMethodInfo ,
#endif
audioDecoderGetParseState ,
#if ENABLE_OVERLOADING
AudioDecoderGetPlcMethodInfo ,
#endif
audioDecoderGetPlc ,
#if ENABLE_OVERLOADING
AudioDecoderGetPlcAwareMethodInfo ,
#endif
audioDecoderGetPlcAware ,
#if ENABLE_OVERLOADING
AudioDecoderGetToleranceMethodInfo ,
#endif
audioDecoderGetTolerance ,
#if ENABLE_OVERLOADING
AudioDecoderMergeTagsMethodInfo ,
#endif
audioDecoderMergeTags ,
#if ENABLE_OVERLOADING
AudioDecoderNegotiateMethodInfo ,
#endif
audioDecoderNegotiate ,
#if ENABLE_OVERLOADING
AudioDecoderProxyGetcapsMethodInfo ,
#endif
audioDecoderProxyGetcaps ,
#if ENABLE_OVERLOADING
AudioDecoderSetAllocationCapsMethodInfo ,
#endif
audioDecoderSetAllocationCaps ,
#if ENABLE_OVERLOADING
AudioDecoderSetDrainableMethodInfo ,
#endif
audioDecoderSetDrainable ,
#if ENABLE_OVERLOADING
AudioDecoderSetEstimateRateMethodInfo ,
#endif
audioDecoderSetEstimateRate ,
#if ENABLE_OVERLOADING
AudioDecoderSetLatencyMethodInfo ,
#endif
audioDecoderSetLatency ,
#if ENABLE_OVERLOADING
AudioDecoderSetMaxErrorsMethodInfo ,
#endif
audioDecoderSetMaxErrors ,
#if ENABLE_OVERLOADING
AudioDecoderSetMinLatencyMethodInfo ,
#endif
audioDecoderSetMinLatency ,
#if ENABLE_OVERLOADING
AudioDecoderSetNeedsFormatMethodInfo ,
#endif
audioDecoderSetNeedsFormat ,
#if ENABLE_OVERLOADING
AudioDecoderSetOutputFormatMethodInfo ,
#endif
audioDecoderSetOutputFormat ,
#if ENABLE_OVERLOADING
AudioDecoderSetPlcMethodInfo ,
#endif
audioDecoderSetPlc ,
#if ENABLE_OVERLOADING
AudioDecoderSetPlcAwareMethodInfo ,
#endif
audioDecoderSetPlcAware ,
#if ENABLE_OVERLOADING
AudioDecoderSetToleranceMethodInfo ,
#endif
audioDecoderSetTolerance ,
#if ENABLE_OVERLOADING
AudioDecoderSetUseDefaultPadAcceptcapsMethodInfo,
#endif
audioDecoderSetUseDefaultPadAcceptcaps ,
#if ENABLE_OVERLOADING
AudioDecoderMinLatencyPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioDecoderMinLatency ,
#endif
constructAudioDecoderMinLatency ,
getAudioDecoderMinLatency ,
setAudioDecoderMinLatency ,
#if ENABLE_OVERLOADING
AudioDecoderPlcPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioDecoderPlc ,
#endif
constructAudioDecoderPlc ,
getAudioDecoderPlc ,
setAudioDecoderPlc ,
#if ENABLE_OVERLOADING
AudioDecoderTolerancePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
audioDecoderTolerance ,
#endif
constructAudioDecoderTolerance ,
getAudioDecoderTolerance ,
setAudioDecoderTolerance ,
) 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.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.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.Gst.Enums as Gst.Enums
import qualified GI.Gst.Objects.Allocator as Gst.Allocator
import qualified GI.Gst.Objects.Element as Gst.Element
import qualified GI.Gst.Objects.Object as Gst.Object
import qualified GI.Gst.Structs.AllocationParams as Gst.AllocationParams
import qualified GI.Gst.Structs.Buffer as Gst.Buffer
import qualified GI.Gst.Structs.Caps as Gst.Caps
import qualified GI.Gst.Structs.TagList as Gst.TagList
import {-# SOURCE #-} qualified GI.GstAudio.Structs.AudioInfo as GstAudio.AudioInfo
newtype AudioDecoder = AudioDecoder (ManagedPtr AudioDecoder)
foreign import ccall "gst_audio_decoder_get_type"
c_gst_audio_decoder_get_type :: IO GType
instance GObject AudioDecoder where
gobjectType _ = c_gst_audio_decoder_get_type
class GObject o => IsAudioDecoder o
#if MIN_VERSION_base(4,9,0)
instance {-# OVERLAPPABLE #-} (GObject a, O.UnknownAncestorError AudioDecoder a) =>
IsAudioDecoder a
#endif
instance IsAudioDecoder AudioDecoder
instance Gst.Element.IsElement AudioDecoder
instance Gst.Object.IsObject AudioDecoder
instance GObject.Object.IsObject AudioDecoder
toAudioDecoder :: (MonadIO m, IsAudioDecoder o) => o -> m AudioDecoder
toAudioDecoder = liftIO . unsafeCastTo AudioDecoder
noAudioDecoder :: Maybe AudioDecoder
noAudioDecoder = Nothing
#if ENABLE_OVERLOADING
type family ResolveAudioDecoderMethod (t :: Symbol) (o :: *) :: * where
ResolveAudioDecoderMethod "abortState" o = Gst.Element.ElementAbortStateMethodInfo
ResolveAudioDecoderMethod "addControlBinding" o = Gst.Object.ObjectAddControlBindingMethodInfo
ResolveAudioDecoderMethod "addPad" o = Gst.Element.ElementAddPadMethodInfo
ResolveAudioDecoderMethod "addPropertyDeepNotifyWatch" o = Gst.Element.ElementAddPropertyDeepNotifyWatchMethodInfo
ResolveAudioDecoderMethod "addPropertyNotifyWatch" o = Gst.Element.ElementAddPropertyNotifyWatchMethodInfo
ResolveAudioDecoderMethod "allocateOutputBuffer" o = AudioDecoderAllocateOutputBufferMethodInfo
ResolveAudioDecoderMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveAudioDecoderMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveAudioDecoderMethod "callAsync" o = Gst.Element.ElementCallAsyncMethodInfo
ResolveAudioDecoderMethod "changeState" o = Gst.Element.ElementChangeStateMethodInfo
ResolveAudioDecoderMethod "continueState" o = Gst.Element.ElementContinueStateMethodInfo
ResolveAudioDecoderMethod "createAllPads" o = Gst.Element.ElementCreateAllPadsMethodInfo
ResolveAudioDecoderMethod "defaultError" o = Gst.Object.ObjectDefaultErrorMethodInfo
ResolveAudioDecoderMethod "finishFrame" o = AudioDecoderFinishFrameMethodInfo
ResolveAudioDecoderMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveAudioDecoderMethod "foreachPad" o = Gst.Element.ElementForeachPadMethodInfo
ResolveAudioDecoderMethod "foreachSinkPad" o = Gst.Element.ElementForeachSinkPadMethodInfo
ResolveAudioDecoderMethod "foreachSrcPad" o = Gst.Element.ElementForeachSrcPadMethodInfo
ResolveAudioDecoderMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveAudioDecoderMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveAudioDecoderMethod "hasActiveControlBindings" o = Gst.Object.ObjectHasActiveControlBindingsMethodInfo
ResolveAudioDecoderMethod "hasAncestor" o = Gst.Object.ObjectHasAncestorMethodInfo
ResolveAudioDecoderMethod "hasAsAncestor" o = Gst.Object.ObjectHasAsAncestorMethodInfo
ResolveAudioDecoderMethod "hasAsParent" o = Gst.Object.ObjectHasAsParentMethodInfo
ResolveAudioDecoderMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveAudioDecoderMethod "isLockedState" o = Gst.Element.ElementIsLockedStateMethodInfo
ResolveAudioDecoderMethod "iteratePads" o = Gst.Element.ElementIteratePadsMethodInfo
ResolveAudioDecoderMethod "iterateSinkPads" o = Gst.Element.ElementIterateSinkPadsMethodInfo
ResolveAudioDecoderMethod "iterateSrcPads" o = Gst.Element.ElementIterateSrcPadsMethodInfo
ResolveAudioDecoderMethod "link" o = Gst.Element.ElementLinkMethodInfo
ResolveAudioDecoderMethod "linkFiltered" o = Gst.Element.ElementLinkFilteredMethodInfo
ResolveAudioDecoderMethod "linkPads" o = Gst.Element.ElementLinkPadsMethodInfo
ResolveAudioDecoderMethod "linkPadsFiltered" o = Gst.Element.ElementLinkPadsFilteredMethodInfo
ResolveAudioDecoderMethod "linkPadsFull" o = Gst.Element.ElementLinkPadsFullMethodInfo
ResolveAudioDecoderMethod "lostState" o = Gst.Element.ElementLostStateMethodInfo
ResolveAudioDecoderMethod "mergeTags" o = AudioDecoderMergeTagsMethodInfo
ResolveAudioDecoderMethod "messageFull" o = Gst.Element.ElementMessageFullMethodInfo
ResolveAudioDecoderMethod "messageFullWithDetails" o = Gst.Element.ElementMessageFullWithDetailsMethodInfo
ResolveAudioDecoderMethod "negotiate" o = AudioDecoderNegotiateMethodInfo
ResolveAudioDecoderMethod "noMorePads" o = Gst.Element.ElementNoMorePadsMethodInfo
ResolveAudioDecoderMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveAudioDecoderMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveAudioDecoderMethod "postMessage" o = Gst.Element.ElementPostMessageMethodInfo
ResolveAudioDecoderMethod "provideClock" o = Gst.Element.ElementProvideClockMethodInfo
ResolveAudioDecoderMethod "proxyGetcaps" o = AudioDecoderProxyGetcapsMethodInfo
ResolveAudioDecoderMethod "query" o = Gst.Element.ElementQueryMethodInfo
ResolveAudioDecoderMethod "queryConvert" o = Gst.Element.ElementQueryConvertMethodInfo
ResolveAudioDecoderMethod "queryDuration" o = Gst.Element.ElementQueryDurationMethodInfo
ResolveAudioDecoderMethod "queryPosition" o = Gst.Element.ElementQueryPositionMethodInfo
ResolveAudioDecoderMethod "ref" o = Gst.Object.ObjectRefMethodInfo
ResolveAudioDecoderMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveAudioDecoderMethod "releaseRequestPad" o = Gst.Element.ElementReleaseRequestPadMethodInfo
ResolveAudioDecoderMethod "removeControlBinding" o = Gst.Object.ObjectRemoveControlBindingMethodInfo
ResolveAudioDecoderMethod "removePad" o = Gst.Element.ElementRemovePadMethodInfo
ResolveAudioDecoderMethod "removePropertyNotifyWatch" o = Gst.Element.ElementRemovePropertyNotifyWatchMethodInfo
ResolveAudioDecoderMethod "requestPad" o = Gst.Element.ElementRequestPadMethodInfo
ResolveAudioDecoderMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveAudioDecoderMethod "seek" o = Gst.Element.ElementSeekMethodInfo
ResolveAudioDecoderMethod "seekSimple" o = Gst.Element.ElementSeekSimpleMethodInfo
ResolveAudioDecoderMethod "sendEvent" o = Gst.Element.ElementSendEventMethodInfo
ResolveAudioDecoderMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveAudioDecoderMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveAudioDecoderMethod "suggestNextSync" o = Gst.Object.ObjectSuggestNextSyncMethodInfo
ResolveAudioDecoderMethod "syncStateWithParent" o = Gst.Element.ElementSyncStateWithParentMethodInfo
ResolveAudioDecoderMethod "syncValues" o = Gst.Object.ObjectSyncValuesMethodInfo
ResolveAudioDecoderMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveAudioDecoderMethod "unlink" o = Gst.Element.ElementUnlinkMethodInfo
ResolveAudioDecoderMethod "unlinkPads" o = Gst.Element.ElementUnlinkPadsMethodInfo
ResolveAudioDecoderMethod "unparent" o = Gst.Object.ObjectUnparentMethodInfo
ResolveAudioDecoderMethod "unref" o = Gst.Object.ObjectUnrefMethodInfo
ResolveAudioDecoderMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveAudioDecoderMethod "getAllocator" o = AudioDecoderGetAllocatorMethodInfo
ResolveAudioDecoderMethod "getAudioInfo" o = AudioDecoderGetAudioInfoMethodInfo
ResolveAudioDecoderMethod "getBaseTime" o = Gst.Element.ElementGetBaseTimeMethodInfo
ResolveAudioDecoderMethod "getBus" o = Gst.Element.ElementGetBusMethodInfo
ResolveAudioDecoderMethod "getClock" o = Gst.Element.ElementGetClockMethodInfo
ResolveAudioDecoderMethod "getCompatiblePad" o = Gst.Element.ElementGetCompatiblePadMethodInfo
ResolveAudioDecoderMethod "getCompatiblePadTemplate" o = Gst.Element.ElementGetCompatiblePadTemplateMethodInfo
ResolveAudioDecoderMethod "getContext" o = Gst.Element.ElementGetContextMethodInfo
ResolveAudioDecoderMethod "getContextUnlocked" o = Gst.Element.ElementGetContextUnlockedMethodInfo
ResolveAudioDecoderMethod "getContexts" o = Gst.Element.ElementGetContextsMethodInfo
ResolveAudioDecoderMethod "getControlBinding" o = Gst.Object.ObjectGetControlBindingMethodInfo
ResolveAudioDecoderMethod "getControlRate" o = Gst.Object.ObjectGetControlRateMethodInfo
ResolveAudioDecoderMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveAudioDecoderMethod "getDelay" o = AudioDecoderGetDelayMethodInfo
ResolveAudioDecoderMethod "getDrainable" o = AudioDecoderGetDrainableMethodInfo
ResolveAudioDecoderMethod "getEstimateRate" o = AudioDecoderGetEstimateRateMethodInfo
ResolveAudioDecoderMethod "getFactory" o = Gst.Element.ElementGetFactoryMethodInfo
ResolveAudioDecoderMethod "getGValueArray" o = Gst.Object.ObjectGetGValueArrayMethodInfo
ResolveAudioDecoderMethod "getLatency" o = AudioDecoderGetLatencyMethodInfo
ResolveAudioDecoderMethod "getMaxErrors" o = AudioDecoderGetMaxErrorsMethodInfo
ResolveAudioDecoderMethod "getMetadata" o = Gst.Element.ElementGetMetadataMethodInfo
ResolveAudioDecoderMethod "getMinLatency" o = AudioDecoderGetMinLatencyMethodInfo
ResolveAudioDecoderMethod "getName" o = Gst.Object.ObjectGetNameMethodInfo
ResolveAudioDecoderMethod "getNeedsFormat" o = AudioDecoderGetNeedsFormatMethodInfo
ResolveAudioDecoderMethod "getPadTemplate" o = Gst.Element.ElementGetPadTemplateMethodInfo
ResolveAudioDecoderMethod "getPadTemplateList" o = Gst.Element.ElementGetPadTemplateListMethodInfo
ResolveAudioDecoderMethod "getParent" o = Gst.Object.ObjectGetParentMethodInfo
ResolveAudioDecoderMethod "getParseState" o = AudioDecoderGetParseStateMethodInfo
ResolveAudioDecoderMethod "getPathString" o = Gst.Object.ObjectGetPathStringMethodInfo
ResolveAudioDecoderMethod "getPlc" o = AudioDecoderGetPlcMethodInfo
ResolveAudioDecoderMethod "getPlcAware" o = AudioDecoderGetPlcAwareMethodInfo
ResolveAudioDecoderMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveAudioDecoderMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveAudioDecoderMethod "getRequestPad" o = Gst.Element.ElementGetRequestPadMethodInfo
ResolveAudioDecoderMethod "getStartTime" o = Gst.Element.ElementGetStartTimeMethodInfo
ResolveAudioDecoderMethod "getState" o = Gst.Element.ElementGetStateMethodInfo
ResolveAudioDecoderMethod "getStaticPad" o = Gst.Element.ElementGetStaticPadMethodInfo
ResolveAudioDecoderMethod "getTolerance" o = AudioDecoderGetToleranceMethodInfo
ResolveAudioDecoderMethod "getValue" o = Gst.Object.ObjectGetValueMethodInfo
ResolveAudioDecoderMethod "setAllocationCaps" o = AudioDecoderSetAllocationCapsMethodInfo
ResolveAudioDecoderMethod "setBaseTime" o = Gst.Element.ElementSetBaseTimeMethodInfo
ResolveAudioDecoderMethod "setBus" o = Gst.Element.ElementSetBusMethodInfo
ResolveAudioDecoderMethod "setClock" o = Gst.Element.ElementSetClockMethodInfo
ResolveAudioDecoderMethod "setContext" o = Gst.Element.ElementSetContextMethodInfo
ResolveAudioDecoderMethod "setControlBindingDisabled" o = Gst.Object.ObjectSetControlBindingDisabledMethodInfo
ResolveAudioDecoderMethod "setControlBindingsDisabled" o = Gst.Object.ObjectSetControlBindingsDisabledMethodInfo
ResolveAudioDecoderMethod "setControlRate" o = Gst.Object.ObjectSetControlRateMethodInfo
ResolveAudioDecoderMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveAudioDecoderMethod "setDrainable" o = AudioDecoderSetDrainableMethodInfo
ResolveAudioDecoderMethod "setEstimateRate" o = AudioDecoderSetEstimateRateMethodInfo
ResolveAudioDecoderMethod "setLatency" o = AudioDecoderSetLatencyMethodInfo
ResolveAudioDecoderMethod "setLockedState" o = Gst.Element.ElementSetLockedStateMethodInfo
ResolveAudioDecoderMethod "setMaxErrors" o = AudioDecoderSetMaxErrorsMethodInfo
ResolveAudioDecoderMethod "setMinLatency" o = AudioDecoderSetMinLatencyMethodInfo
ResolveAudioDecoderMethod "setName" o = Gst.Object.ObjectSetNameMethodInfo
ResolveAudioDecoderMethod "setNeedsFormat" o = AudioDecoderSetNeedsFormatMethodInfo
ResolveAudioDecoderMethod "setOutputFormat" o = AudioDecoderSetOutputFormatMethodInfo
ResolveAudioDecoderMethod "setParent" o = Gst.Object.ObjectSetParentMethodInfo
ResolveAudioDecoderMethod "setPlc" o = AudioDecoderSetPlcMethodInfo
ResolveAudioDecoderMethod "setPlcAware" o = AudioDecoderSetPlcAwareMethodInfo
ResolveAudioDecoderMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveAudioDecoderMethod "setStartTime" o = Gst.Element.ElementSetStartTimeMethodInfo
ResolveAudioDecoderMethod "setState" o = Gst.Element.ElementSetStateMethodInfo
ResolveAudioDecoderMethod "setTolerance" o = AudioDecoderSetToleranceMethodInfo
ResolveAudioDecoderMethod "setUseDefaultPadAcceptcaps" o = AudioDecoderSetUseDefaultPadAcceptcapsMethodInfo
ResolveAudioDecoderMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveAudioDecoderMethod t AudioDecoder, O.MethodInfo info AudioDecoder p) => O.IsLabelProxy t (AudioDecoder -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveAudioDecoderMethod t AudioDecoder, O.MethodInfo info AudioDecoder p) => O.IsLabel t (AudioDecoder -> 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
#endif
getAudioDecoderMinLatency :: (MonadIO m, IsAudioDecoder o) => o -> m Int64
getAudioDecoderMinLatency obj = liftIO $ getObjectPropertyInt64 obj "min-latency"
setAudioDecoderMinLatency :: (MonadIO m, IsAudioDecoder o) => o -> Int64 -> m ()
setAudioDecoderMinLatency obj val = liftIO $ setObjectPropertyInt64 obj "min-latency" val
constructAudioDecoderMinLatency :: (IsAudioDecoder o) => Int64 -> IO (GValueConstruct o)
constructAudioDecoderMinLatency val = constructObjectPropertyInt64 "min-latency" val
#if ENABLE_OVERLOADING
data AudioDecoderMinLatencyPropertyInfo
instance AttrInfo AudioDecoderMinLatencyPropertyInfo where
type AttrAllowedOps AudioDecoderMinLatencyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioDecoderMinLatencyPropertyInfo = (~) Int64
type AttrBaseTypeConstraint AudioDecoderMinLatencyPropertyInfo = IsAudioDecoder
type AttrGetType AudioDecoderMinLatencyPropertyInfo = Int64
type AttrLabel AudioDecoderMinLatencyPropertyInfo = "min-latency"
type AttrOrigin AudioDecoderMinLatencyPropertyInfo = AudioDecoder
attrGet _ = getAudioDecoderMinLatency
attrSet _ = setAudioDecoderMinLatency
attrConstruct _ = constructAudioDecoderMinLatency
attrClear _ = undefined
#endif
getAudioDecoderPlc :: (MonadIO m, IsAudioDecoder o) => o -> m Bool
getAudioDecoderPlc obj = liftIO $ getObjectPropertyBool obj "plc"
setAudioDecoderPlc :: (MonadIO m, IsAudioDecoder o) => o -> Bool -> m ()
setAudioDecoderPlc obj val = liftIO $ setObjectPropertyBool obj "plc" val
constructAudioDecoderPlc :: (IsAudioDecoder o) => Bool -> IO (GValueConstruct o)
constructAudioDecoderPlc val = constructObjectPropertyBool "plc" val
#if ENABLE_OVERLOADING
data AudioDecoderPlcPropertyInfo
instance AttrInfo AudioDecoderPlcPropertyInfo where
type AttrAllowedOps AudioDecoderPlcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioDecoderPlcPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AudioDecoderPlcPropertyInfo = IsAudioDecoder
type AttrGetType AudioDecoderPlcPropertyInfo = Bool
type AttrLabel AudioDecoderPlcPropertyInfo = "plc"
type AttrOrigin AudioDecoderPlcPropertyInfo = AudioDecoder
attrGet _ = getAudioDecoderPlc
attrSet _ = setAudioDecoderPlc
attrConstruct _ = constructAudioDecoderPlc
attrClear _ = undefined
#endif
getAudioDecoderTolerance :: (MonadIO m, IsAudioDecoder o) => o -> m Int64
getAudioDecoderTolerance obj = liftIO $ getObjectPropertyInt64 obj "tolerance"
setAudioDecoderTolerance :: (MonadIO m, IsAudioDecoder o) => o -> Int64 -> m ()
setAudioDecoderTolerance obj val = liftIO $ setObjectPropertyInt64 obj "tolerance" val
constructAudioDecoderTolerance :: (IsAudioDecoder o) => Int64 -> IO (GValueConstruct o)
constructAudioDecoderTolerance val = constructObjectPropertyInt64 "tolerance" val
#if ENABLE_OVERLOADING
data AudioDecoderTolerancePropertyInfo
instance AttrInfo AudioDecoderTolerancePropertyInfo where
type AttrAllowedOps AudioDecoderTolerancePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AudioDecoderTolerancePropertyInfo = (~) Int64
type AttrBaseTypeConstraint AudioDecoderTolerancePropertyInfo = IsAudioDecoder
type AttrGetType AudioDecoderTolerancePropertyInfo = Int64
type AttrLabel AudioDecoderTolerancePropertyInfo = "tolerance"
type AttrOrigin AudioDecoderTolerancePropertyInfo = AudioDecoder
attrGet _ = getAudioDecoderTolerance
attrSet _ = setAudioDecoderTolerance
attrConstruct _ = constructAudioDecoderTolerance
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList AudioDecoder
type instance O.AttributeList AudioDecoder = AudioDecoderAttributeList
type AudioDecoderAttributeList = ('[ '("minLatency", AudioDecoderMinLatencyPropertyInfo), '("name", Gst.Object.ObjectNamePropertyInfo), '("parent", Gst.Object.ObjectParentPropertyInfo), '("plc", AudioDecoderPlcPropertyInfo), '("tolerance", AudioDecoderTolerancePropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
audioDecoderMinLatency :: AttrLabelProxy "minLatency"
audioDecoderMinLatency = AttrLabelProxy
audioDecoderPlc :: AttrLabelProxy "plc"
audioDecoderPlc = AttrLabelProxy
audioDecoderTolerance :: AttrLabelProxy "tolerance"
audioDecoderTolerance = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
type instance O.SignalList AudioDecoder = AudioDecoderSignalList
type AudioDecoderSignalList = ('[ '("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_decoder_allocate_output_buffer" gst_audio_decoder_allocate_output_buffer ::
Ptr AudioDecoder ->
Word64 ->
IO (Ptr Gst.Buffer.Buffer)
audioDecoderAllocateOutputBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Word64
-> m Gst.Buffer.Buffer
audioDecoderAllocateOutputBuffer dec size = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_allocate_output_buffer dec' size
checkUnexpectedReturnNULL "audioDecoderAllocateOutputBuffer" result
result' <- (wrapBoxed Gst.Buffer.Buffer) result
touchManagedPtr dec
return result'
#if ENABLE_OVERLOADING
data AudioDecoderAllocateOutputBufferMethodInfo
instance (signature ~ (Word64 -> m Gst.Buffer.Buffer), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderAllocateOutputBufferMethodInfo a signature where
overloadedMethod _ = audioDecoderAllocateOutputBuffer
#endif
foreign import ccall "gst_audio_decoder_finish_frame" gst_audio_decoder_finish_frame ::
Ptr AudioDecoder ->
Ptr Gst.Buffer.Buffer ->
Int32 ->
IO CUInt
audioDecoderFinishFrame ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Gst.Buffer.Buffer
-> Int32
-> m Gst.Enums.FlowReturn
audioDecoderFinishFrame dec buf frames = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
buf' <- unsafeManagedPtrGetPtr buf
result <- gst_audio_decoder_finish_frame dec' buf' frames
let result' = (toEnum . fromIntegral) result
touchManagedPtr dec
touchManagedPtr buf
return result'
#if ENABLE_OVERLOADING
data AudioDecoderFinishFrameMethodInfo
instance (signature ~ (Gst.Buffer.Buffer -> Int32 -> m Gst.Enums.FlowReturn), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderFinishFrameMethodInfo a signature where
overloadedMethod _ = audioDecoderFinishFrame
#endif
foreign import ccall "gst_audio_decoder_get_allocator" gst_audio_decoder_get_allocator ::
Ptr AudioDecoder ->
Ptr (Ptr Gst.Allocator.Allocator) ->
Ptr Gst.AllocationParams.AllocationParams ->
IO ()
audioDecoderGetAllocator ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m ((Gst.Allocator.Allocator, Gst.AllocationParams.AllocationParams))
audioDecoderGetAllocator dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
allocator <- allocMem :: IO (Ptr (Ptr Gst.Allocator.Allocator))
params <- callocBoxedBytes 64 :: IO (Ptr Gst.AllocationParams.AllocationParams)
gst_audio_decoder_get_allocator dec' allocator params
allocator' <- peek allocator
allocator'' <- (wrapObject Gst.Allocator.Allocator) allocator'
params' <- (wrapBoxed Gst.AllocationParams.AllocationParams) params
touchManagedPtr dec
freeMem allocator
return (allocator'', params')
#if ENABLE_OVERLOADING
data AudioDecoderGetAllocatorMethodInfo
instance (signature ~ (m ((Gst.Allocator.Allocator, Gst.AllocationParams.AllocationParams))), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetAllocatorMethodInfo a signature where
overloadedMethod _ = audioDecoderGetAllocator
#endif
foreign import ccall "gst_audio_decoder_get_audio_info" gst_audio_decoder_get_audio_info ::
Ptr AudioDecoder ->
IO (Ptr GstAudio.AudioInfo.AudioInfo)
audioDecoderGetAudioInfo ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m GstAudio.AudioInfo.AudioInfo
audioDecoderGetAudioInfo dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_audio_info dec'
checkUnexpectedReturnNULL "audioDecoderGetAudioInfo" result
result' <- (wrapBoxed GstAudio.AudioInfo.AudioInfo) result
touchManagedPtr dec
return result'
#if ENABLE_OVERLOADING
data AudioDecoderGetAudioInfoMethodInfo
instance (signature ~ (m GstAudio.AudioInfo.AudioInfo), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetAudioInfoMethodInfo a signature where
overloadedMethod _ = audioDecoderGetAudioInfo
#endif
foreign import ccall "gst_audio_decoder_get_delay" gst_audio_decoder_get_delay ::
Ptr AudioDecoder ->
IO Int32
audioDecoderGetDelay ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Int32
audioDecoderGetDelay dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_delay dec'
touchManagedPtr dec
return result
#if ENABLE_OVERLOADING
data AudioDecoderGetDelayMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetDelayMethodInfo a signature where
overloadedMethod _ = audioDecoderGetDelay
#endif
foreign import ccall "gst_audio_decoder_get_drainable" gst_audio_decoder_get_drainable ::
Ptr AudioDecoder ->
IO CInt
audioDecoderGetDrainable ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Bool
audioDecoderGetDrainable dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_drainable dec'
let result' = (/= 0) result
touchManagedPtr dec
return result'
#if ENABLE_OVERLOADING
data AudioDecoderGetDrainableMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetDrainableMethodInfo a signature where
overloadedMethod _ = audioDecoderGetDrainable
#endif
foreign import ccall "gst_audio_decoder_get_estimate_rate" gst_audio_decoder_get_estimate_rate ::
Ptr AudioDecoder ->
IO Int32
audioDecoderGetEstimateRate ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Int32
audioDecoderGetEstimateRate dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_estimate_rate dec'
touchManagedPtr dec
return result
#if ENABLE_OVERLOADING
data AudioDecoderGetEstimateRateMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetEstimateRateMethodInfo a signature where
overloadedMethod _ = audioDecoderGetEstimateRate
#endif
foreign import ccall "gst_audio_decoder_get_latency" gst_audio_decoder_get_latency ::
Ptr AudioDecoder ->
Ptr Word64 ->
Ptr Word64 ->
IO ()
audioDecoderGetLatency ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m ((Word64, Word64))
audioDecoderGetLatency dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
min <- allocMem :: IO (Ptr Word64)
max <- allocMem :: IO (Ptr Word64)
gst_audio_decoder_get_latency dec' min max
min' <- peek min
max' <- peek max
touchManagedPtr dec
freeMem min
freeMem max
return (min', max')
#if ENABLE_OVERLOADING
data AudioDecoderGetLatencyMethodInfo
instance (signature ~ (m ((Word64, Word64))), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetLatencyMethodInfo a signature where
overloadedMethod _ = audioDecoderGetLatency
#endif
foreign import ccall "gst_audio_decoder_get_max_errors" gst_audio_decoder_get_max_errors ::
Ptr AudioDecoder ->
IO Int32
audioDecoderGetMaxErrors ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Int32
audioDecoderGetMaxErrors dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_max_errors dec'
touchManagedPtr dec
return result
#if ENABLE_OVERLOADING
data AudioDecoderGetMaxErrorsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetMaxErrorsMethodInfo a signature where
overloadedMethod _ = audioDecoderGetMaxErrors
#endif
foreign import ccall "gst_audio_decoder_get_min_latency" gst_audio_decoder_get_min_latency ::
Ptr AudioDecoder ->
IO Word64
audioDecoderGetMinLatency ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Word64
audioDecoderGetMinLatency dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_min_latency dec'
touchManagedPtr dec
return result
#if ENABLE_OVERLOADING
data AudioDecoderGetMinLatencyMethodInfo
instance (signature ~ (m Word64), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetMinLatencyMethodInfo a signature where
overloadedMethod _ = audioDecoderGetMinLatency
#endif
foreign import ccall "gst_audio_decoder_get_needs_format" gst_audio_decoder_get_needs_format ::
Ptr AudioDecoder ->
IO CInt
audioDecoderGetNeedsFormat ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Bool
audioDecoderGetNeedsFormat dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_needs_format dec'
let result' = (/= 0) result
touchManagedPtr dec
return result'
#if ENABLE_OVERLOADING
data AudioDecoderGetNeedsFormatMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetNeedsFormatMethodInfo a signature where
overloadedMethod _ = audioDecoderGetNeedsFormat
#endif
foreign import ccall "gst_audio_decoder_get_parse_state" gst_audio_decoder_get_parse_state ::
Ptr AudioDecoder ->
Ptr CInt ->
Ptr CInt ->
IO ()
audioDecoderGetParseState ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m ((Bool, Bool))
audioDecoderGetParseState dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
sync <- allocMem :: IO (Ptr CInt)
eos <- allocMem :: IO (Ptr CInt)
gst_audio_decoder_get_parse_state dec' sync eos
sync' <- peek sync
let sync'' = (/= 0) sync'
eos' <- peek eos
let eos'' = (/= 0) eos'
touchManagedPtr dec
freeMem sync
freeMem eos
return (sync'', eos'')
#if ENABLE_OVERLOADING
data AudioDecoderGetParseStateMethodInfo
instance (signature ~ (m ((Bool, Bool))), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetParseStateMethodInfo a signature where
overloadedMethod _ = audioDecoderGetParseState
#endif
foreign import ccall "gst_audio_decoder_get_plc" gst_audio_decoder_get_plc ::
Ptr AudioDecoder ->
IO CInt
audioDecoderGetPlc ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Bool
audioDecoderGetPlc dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_plc dec'
let result' = (/= 0) result
touchManagedPtr dec
return result'
#if ENABLE_OVERLOADING
data AudioDecoderGetPlcMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetPlcMethodInfo a signature where
overloadedMethod _ = audioDecoderGetPlc
#endif
foreign import ccall "gst_audio_decoder_get_plc_aware" gst_audio_decoder_get_plc_aware ::
Ptr AudioDecoder ->
IO Int32
audioDecoderGetPlcAware ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Int32
audioDecoderGetPlcAware dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_plc_aware dec'
touchManagedPtr dec
return result
#if ENABLE_OVERLOADING
data AudioDecoderGetPlcAwareMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetPlcAwareMethodInfo a signature where
overloadedMethod _ = audioDecoderGetPlcAware
#endif
foreign import ccall "gst_audio_decoder_get_tolerance" gst_audio_decoder_get_tolerance ::
Ptr AudioDecoder ->
IO Word64
audioDecoderGetTolerance ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Word64
audioDecoderGetTolerance dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_get_tolerance dec'
touchManagedPtr dec
return result
#if ENABLE_OVERLOADING
data AudioDecoderGetToleranceMethodInfo
instance (signature ~ (m Word64), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderGetToleranceMethodInfo a signature where
overloadedMethod _ = audioDecoderGetTolerance
#endif
foreign import ccall "gst_audio_decoder_merge_tags" gst_audio_decoder_merge_tags ::
Ptr AudioDecoder ->
Ptr Gst.TagList.TagList ->
CUInt ->
IO ()
audioDecoderMergeTags ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Maybe (Gst.TagList.TagList)
-> Gst.Enums.TagMergeMode
-> m ()
audioDecoderMergeTags dec tags mode = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
maybeTags <- case tags of
Nothing -> return nullPtr
Just jTags -> do
jTags' <- unsafeManagedPtrGetPtr jTags
return jTags'
let mode' = (fromIntegral . fromEnum) mode
gst_audio_decoder_merge_tags dec' maybeTags mode'
touchManagedPtr dec
whenJust tags touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data AudioDecoderMergeTagsMethodInfo
instance (signature ~ (Maybe (Gst.TagList.TagList) -> Gst.Enums.TagMergeMode -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderMergeTagsMethodInfo a signature where
overloadedMethod _ = audioDecoderMergeTags
#endif
foreign import ccall "gst_audio_decoder_negotiate" gst_audio_decoder_negotiate ::
Ptr AudioDecoder ->
IO CInt
audioDecoderNegotiate ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> m Bool
audioDecoderNegotiate dec = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
result <- gst_audio_decoder_negotiate dec'
let result' = (/= 0) result
touchManagedPtr dec
return result'
#if ENABLE_OVERLOADING
data AudioDecoderNegotiateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderNegotiateMethodInfo a signature where
overloadedMethod _ = audioDecoderNegotiate
#endif
foreign import ccall "gst_audio_decoder_proxy_getcaps" gst_audio_decoder_proxy_getcaps ::
Ptr AudioDecoder ->
Ptr Gst.Caps.Caps ->
Ptr Gst.Caps.Caps ->
IO (Ptr Gst.Caps.Caps)
audioDecoderProxyGetcaps ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Maybe (Gst.Caps.Caps)
-> Maybe (Gst.Caps.Caps)
-> m Gst.Caps.Caps
audioDecoderProxyGetcaps decoder caps filter = liftIO $ do
decoder' <- unsafeManagedPtrCastPtr decoder
maybeCaps <- case caps of
Nothing -> return nullPtr
Just jCaps -> do
jCaps' <- unsafeManagedPtrGetPtr jCaps
return jCaps'
maybeFilter <- case filter of
Nothing -> return nullPtr
Just jFilter -> do
jFilter' <- unsafeManagedPtrGetPtr jFilter
return jFilter'
result <- gst_audio_decoder_proxy_getcaps decoder' maybeCaps maybeFilter
checkUnexpectedReturnNULL "audioDecoderProxyGetcaps" result
result' <- (wrapBoxed Gst.Caps.Caps) result
touchManagedPtr decoder
whenJust caps touchManagedPtr
whenJust filter touchManagedPtr
return result'
#if ENABLE_OVERLOADING
data AudioDecoderProxyGetcapsMethodInfo
instance (signature ~ (Maybe (Gst.Caps.Caps) -> Maybe (Gst.Caps.Caps) -> m Gst.Caps.Caps), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderProxyGetcapsMethodInfo a signature where
overloadedMethod _ = audioDecoderProxyGetcaps
#endif
foreign import ccall "gst_audio_decoder_set_allocation_caps" gst_audio_decoder_set_allocation_caps ::
Ptr AudioDecoder ->
Ptr Gst.Caps.Caps ->
IO ()
audioDecoderSetAllocationCaps ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Maybe (Gst.Caps.Caps)
-> m ()
audioDecoderSetAllocationCaps dec allocationCaps = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
maybeAllocationCaps <- case allocationCaps of
Nothing -> return nullPtr
Just jAllocationCaps -> do
jAllocationCaps' <- unsafeManagedPtrGetPtr jAllocationCaps
return jAllocationCaps'
gst_audio_decoder_set_allocation_caps dec' maybeAllocationCaps
touchManagedPtr dec
whenJust allocationCaps touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetAllocationCapsMethodInfo
instance (signature ~ (Maybe (Gst.Caps.Caps) -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetAllocationCapsMethodInfo a signature where
overloadedMethod _ = audioDecoderSetAllocationCaps
#endif
foreign import ccall "gst_audio_decoder_set_drainable" gst_audio_decoder_set_drainable ::
Ptr AudioDecoder ->
CInt ->
IO ()
audioDecoderSetDrainable ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Bool
-> m ()
audioDecoderSetDrainable dec enabled = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
let enabled' = (fromIntegral . fromEnum) enabled
gst_audio_decoder_set_drainable dec' enabled'
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetDrainableMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetDrainableMethodInfo a signature where
overloadedMethod _ = audioDecoderSetDrainable
#endif
foreign import ccall "gst_audio_decoder_set_estimate_rate" gst_audio_decoder_set_estimate_rate ::
Ptr AudioDecoder ->
CInt ->
IO ()
audioDecoderSetEstimateRate ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Bool
-> m ()
audioDecoderSetEstimateRate dec enabled = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
let enabled' = (fromIntegral . fromEnum) enabled
gst_audio_decoder_set_estimate_rate dec' enabled'
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetEstimateRateMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetEstimateRateMethodInfo a signature where
overloadedMethod _ = audioDecoderSetEstimateRate
#endif
foreign import ccall "gst_audio_decoder_set_latency" gst_audio_decoder_set_latency ::
Ptr AudioDecoder ->
Word64 ->
Word64 ->
IO ()
audioDecoderSetLatency ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Word64
-> Word64
-> m ()
audioDecoderSetLatency dec min max = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
gst_audio_decoder_set_latency dec' min max
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetLatencyMethodInfo
instance (signature ~ (Word64 -> Word64 -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetLatencyMethodInfo a signature where
overloadedMethod _ = audioDecoderSetLatency
#endif
foreign import ccall "gst_audio_decoder_set_max_errors" gst_audio_decoder_set_max_errors ::
Ptr AudioDecoder ->
Int32 ->
IO ()
audioDecoderSetMaxErrors ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Int32
-> m ()
audioDecoderSetMaxErrors dec num = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
gst_audio_decoder_set_max_errors dec' num
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetMaxErrorsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetMaxErrorsMethodInfo a signature where
overloadedMethod _ = audioDecoderSetMaxErrors
#endif
foreign import ccall "gst_audio_decoder_set_min_latency" gst_audio_decoder_set_min_latency ::
Ptr AudioDecoder ->
Word64 ->
IO ()
audioDecoderSetMinLatency ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Word64
-> m ()
audioDecoderSetMinLatency dec num = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
gst_audio_decoder_set_min_latency dec' num
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetMinLatencyMethodInfo
instance (signature ~ (Word64 -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetMinLatencyMethodInfo a signature where
overloadedMethod _ = audioDecoderSetMinLatency
#endif
foreign import ccall "gst_audio_decoder_set_needs_format" gst_audio_decoder_set_needs_format ::
Ptr AudioDecoder ->
CInt ->
IO ()
audioDecoderSetNeedsFormat ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Bool
-> m ()
audioDecoderSetNeedsFormat dec enabled = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
let enabled' = (fromIntegral . fromEnum) enabled
gst_audio_decoder_set_needs_format dec' enabled'
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetNeedsFormatMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetNeedsFormatMethodInfo a signature where
overloadedMethod _ = audioDecoderSetNeedsFormat
#endif
foreign import ccall "gst_audio_decoder_set_output_format" gst_audio_decoder_set_output_format ::
Ptr AudioDecoder ->
Ptr GstAudio.AudioInfo.AudioInfo ->
IO CInt
audioDecoderSetOutputFormat ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> GstAudio.AudioInfo.AudioInfo
-> m Bool
audioDecoderSetOutputFormat dec info = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
info' <- unsafeManagedPtrGetPtr info
result <- gst_audio_decoder_set_output_format dec' info'
let result' = (/= 0) result
touchManagedPtr dec
touchManagedPtr info
return result'
#if ENABLE_OVERLOADING
data AudioDecoderSetOutputFormatMethodInfo
instance (signature ~ (GstAudio.AudioInfo.AudioInfo -> m Bool), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetOutputFormatMethodInfo a signature where
overloadedMethod _ = audioDecoderSetOutputFormat
#endif
foreign import ccall "gst_audio_decoder_set_plc" gst_audio_decoder_set_plc ::
Ptr AudioDecoder ->
CInt ->
IO ()
audioDecoderSetPlc ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Bool
-> m ()
audioDecoderSetPlc dec enabled = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
let enabled' = (fromIntegral . fromEnum) enabled
gst_audio_decoder_set_plc dec' enabled'
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetPlcMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetPlcMethodInfo a signature where
overloadedMethod _ = audioDecoderSetPlc
#endif
foreign import ccall "gst_audio_decoder_set_plc_aware" gst_audio_decoder_set_plc_aware ::
Ptr AudioDecoder ->
CInt ->
IO ()
audioDecoderSetPlcAware ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Bool
-> m ()
audioDecoderSetPlcAware dec plc = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
let plc' = (fromIntegral . fromEnum) plc
gst_audio_decoder_set_plc_aware dec' plc'
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetPlcAwareMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetPlcAwareMethodInfo a signature where
overloadedMethod _ = audioDecoderSetPlcAware
#endif
foreign import ccall "gst_audio_decoder_set_tolerance" gst_audio_decoder_set_tolerance ::
Ptr AudioDecoder ->
Word64 ->
IO ()
audioDecoderSetTolerance ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Word64
-> m ()
audioDecoderSetTolerance dec tolerance = liftIO $ do
dec' <- unsafeManagedPtrCastPtr dec
gst_audio_decoder_set_tolerance dec' tolerance
touchManagedPtr dec
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetToleranceMethodInfo
instance (signature ~ (Word64 -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetToleranceMethodInfo a signature where
overloadedMethod _ = audioDecoderSetTolerance
#endif
foreign import ccall "gst_audio_decoder_set_use_default_pad_acceptcaps" gst_audio_decoder_set_use_default_pad_acceptcaps ::
Ptr AudioDecoder ->
CInt ->
IO ()
audioDecoderSetUseDefaultPadAcceptcaps ::
(B.CallStack.HasCallStack, MonadIO m, IsAudioDecoder a) =>
a
-> Bool
-> m ()
audioDecoderSetUseDefaultPadAcceptcaps decoder use = liftIO $ do
decoder' <- unsafeManagedPtrCastPtr decoder
let use' = (fromIntegral . fromEnum) use
gst_audio_decoder_set_use_default_pad_acceptcaps decoder' use'
touchManagedPtr decoder
return ()
#if ENABLE_OVERLOADING
data AudioDecoderSetUseDefaultPadAcceptcapsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAudioDecoder a) => O.MethodInfo AudioDecoderSetUseDefaultPadAcceptcapsMethodInfo a signature where
overloadedMethod _ = audioDecoderSetUseDefaultPadAcceptcaps
#endif