In This Topic ▼

DeliverEndOfStream Method

Summary

Informs the objects "downstream" of the sample source object that the source has reached the end of the data stream.

Syntax

C++

public void DeliverEndOfStream( 
   int TimeOut 
)

Public Sub DeliverEndOfStream( _ 
   ByVal TimeOut As Integer _ 
)

public: 
void DeliverEndOfStream(  
   int TimeOut 
)

Parameters

TimeOut
Maximum time to allow for the end of stream notification, in milliseconds.

Remarks

Informs the objects "downstream" of the sample source object that the source has reached the end of the data stream. In some cases (for example, when writing AVI files), stopping the object without calling this method might indicate a stop caused by an error. Such a stop can have unpredictable results (the AVI might not get indexed properly). Call this method before stopping the object. If the method fails, an error is raised. For more information, refer to the Error Codes. Most time-out situations are the result of an error condition. The error returned for a timeout condition is E_ABORT. If you receive an E_ABORT error code and your timeout was set sufficiently high, then a problem has occurred downstream. In this case, you should call the main object's "Stop" method and report an error.

Example

using Leadtools; 
using Leadtools.Multimedia; 
using LeadtoolsMultimediaExamples.Fixtures; 
 
public bool _result = false; 
public ConvertCtrlForm _form = new ConvertCtrlForm(); 
public ConvertCtrl _convertctrl; 
 
// input files and output file 
string inFile1 = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source1.avi"); 
string inFile2 = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source2.avi"); 
string outFile = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_ConcatAVIFilesExample.avi"); 
 
public void ConcatAVIFilesExample() 
{ 
   ConvertCtrl pConvert1; 
   ConvertCtrl pConvert2; 
   MultiStreamSource pMSSource; 
   MultiStreamTarget pMSTarget; 
   Int64 lStart; 
 
   MediaType pmt; 
   MediaType pInsertedMediaType; 
 
   pConvert1 = new ConvertCtrl(true); 
   pConvert2 = new ConvertCtrl(true); 
 
   pMSSource = new MultiStreamSource(); 
   pMSTarget = new MultiStreamTarget(); 
 
   // set the start time to be 0 
   lStart = 0; 
 
   // set the input filename 
   pConvert1.SourceFile = inFile1; 
 
   // set the output sample to a target object 
   pMSTarget.StreamCount = 2; 
 
   // set the target media types for video and audio streams 
   pmt = new MediaType(); 
   pmt.Type = Constants.MEDIATYPE_Video; 
   pMSTarget.SetAcceptedMediaType(0, pmt); 
 
   pmt.Type = Constants.MEDIATYPE_Audio; 
   pMSTarget.SetAcceptedMediaType(1, pmt); 
 
   pmt = null; 
 
   // get the inserted media type for the first stream 
   pInsertedMediaType = pMSTarget.GetAcceptedMediaType(0); 
   pInsertedMediaType = null; 
 
   // set convert 1 target object 
   pConvert1.TargetObject = pMSTarget; 
 
   // start the source conversion, so we can get the media sample format 
   pConvert1.StartConvert(); 
 
   // initialize convert 2 
   // get the output media sample format and put it into the source object 
   pMSSource.StreamCount = 2; 
   pmt = pMSTarget.GetConnectedMediaType(0); 
   pMSSource.SetMediaType(0, pmt); 
   pmt = null; 
 
   pmt = pMSTarget.GetConnectedMediaType(1); 
   pMSSource.SetMediaType(1, pmt); 
   pmt = null; 
 
   // get the inserted media type for the first stream 
   pInsertedMediaType = pMSSource.GetMediaType(0); 
   pInsertedMediaType = null; 
 
   // set the output filename 
   pConvert2.TargetFile = outFile; 
 
   // set the source for convert 2 
   pConvert2.SourceObject = pMSSource; 
 
   // start the dest conversion 
   pConvert2.StartConvert(); 
 
   // convert first file 
   ConcateFile(pConvert1, pMSTarget, pMSSource, ref lStart); 
 
   /* 
   Restrict the output format to the media type of the source for the first file 
   That is because the two files must have the same media type for both video and audio 
   With video, you have to make sure the files have the same frame rate! Minor changes in 
   the frame rate might make the connection fail! 
   The control will tolerate differences in frame rate if you comment the next line 
   */ 
 
   pmt = pMSTarget.GetConnectedMediaType(0); 
   pMSTarget.SetAcceptedMediaType(0, pmt); 
   pmt = null; 
 
   pmt = pMSTarget.GetConnectedMediaType(1); 
   pMSTarget.SetAcceptedMediaType(1, pmt); 
   pmt = null; 
 
   // change the source file to second file 
   pConvert1.SourceFile = inFile2; 
 
   // start converting again 
   pConvert1.StartConvert(); 
 
   // convert second file 
   ConcateFile(pConvert1, pMSTarget, pMSSource, ref lStart); 
 
   // deliver end of sample to stop the conversion 
   pMSSource.DeliverEndOfStream(0, 1000); 
   pMSSource.DeliverEndOfStream(1, 1000); 
 
   if (pConvert2.State == ConvertState.Running) 
      pConvert2.StopConvert(); 
 
   // free the source and target objects 
   pConvert2.ResetSource(); 
   pConvert1.ResetTarget(); 
 
   pConvert1.Dispose(); 
   pConvert2.Dispose(); 
   pMSSource.Dispose(); 
   pMSTarget.Dispose(); 
 
   _result = File.Exists(outFile); 
} 
 
void ConcateFile(ConvertCtrl pConvert1, 
                 MultiStreamTarget pMSTarget, 
                 MultiStreamSource pMSSource, 
                 ref long lStart) 
{ 
   MediaSample pmsSrc = null; 
   MediaSample pmsDst = null; 
   long MediaTimeStart; 
   long MediaTimeStop; 
   long LastStart; 
   long LastStop; 
   int lSampleStream; 
   int lActualDataLength; 
 
   LastStop = 0; 
 
   do 
   { 
      // get the sample, allowing 10 s for the operation to complete 
      try 
      { 
         lSampleStream = pMSTarget.WaitForSample(1000); 
      } 
      catch (COMException cex) 
      { 
         if (cex.ErrorCode == (int)ErrorCode.VFW_E_TIMEOUT) 
         { 
            // end of the stream 
            break; 
         } 
         _result = false; 
         break; 
      } 
 
      try 
      { 
         // get the target sample 
         pmsSrc = pMSTarget.GetSample(lSampleStream, 0); 
         // get the source buffer 
         pmsDst = pMSSource.GetSampleBuffer(lSampleStream, 2000); 
      } 
      catch (Exception) 
      { 
         _result = false; 
         break; 
      } 
 
      // get the media time 
      pmsSrc.GetMediaTime(out MediaTimeStart, out MediaTimeStop); 
 
      // get the source sample time 
      pmsSrc.GetTime(out LastStart, out LastStop); 
 
      // set the destination sample time 
      pmsDst.SetTime(lStart + LastStart, lStart + LastStop); 
 
      // copy the data 
      lActualDataLength = pmsSrc.ActualDataLength; 
 
      // set the destination buffer  
      // we could Marshal the unmanaged buffer here, but no need since we are mearly  
      // setting the destination to the source buffer contents (unaltered data) 
      pmsDst.SetData(lActualDataLength, pmsSrc.GetData(lActualDataLength)); 
 
      // copy the other flags 
      pmsDst.Discontinuity = pmsSrc.Discontinuity; 
      pmsDst.Preroll = pmsSrc.Preroll; 
      pmsDst.SyncPoint = pmsSrc.SyncPoint; 
 
      // release the source sample 
      pmsSrc = null; 
 
      // deliver the destination sample 
      pMSSource.DeliverSample(lSampleStream, 1000, pmsDst); 
 
      // release the destination sample 
      pmsDst = null; 
   } 
   while (true); 
 
   pConvert1.StopConvert(); 
   lStart = LastStop; 
} 
 
static class LEAD_VARS 
{ 
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media"; 
}

Imports Leadtools 
Imports Leadtools.Multimedia 
Imports LeadtoolsMultimediaExamples.Fixtures 
 
Public _result As Boolean = False 
Public _form As ConvertCtrlForm = New ConvertCtrlForm() 
Public _convertctrl As ConvertCtrl 
 
' input files and output file 
Private inFile1 As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source1.avi") 
Private inFile2 As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source2.avi") 
Private outFile As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_ConcatAVIFilesExample.avi") 
 
Public Sub ConcatAVIFilesExample() 
   Dim pConvert1 As ConvertCtrl 
   Dim pConvert2 As ConvertCtrl 
   Dim pMSSource As MultiStreamSource 
   Dim pMSTarget As MultiStreamTarget 
   Dim lStart As Int64 
 
   Dim pmt As MediaType 
   Dim pInsertedMediaType As MediaType 
 
   pConvert1 = New ConvertCtrl(True) 
   pConvert2 = New ConvertCtrl(True) 
 
   pMSSource = New MultiStreamSource() 
   pMSTarget = New MultiStreamTarget() 
 
   ' set the start time to be 0 
   lStart = 0 
 
   ' set the input filename 
   pConvert1.SourceFile = inFile1 
 
   ' set the output sample to a target object 
   pMSTarget.StreamCount = 2 
 
   ' set the target media types for video and audio streams 
   pmt = New MediaType() 
   pmt.Type = Leadtools.Multimedia.Constants.MEDIATYPE_Video 
   pMSTarget.SetAcceptedMediaType(0, pmt) 
 
   pmt.Type = Leadtools.Multimedia.Constants.MEDIATYPE_Audio 
   pMSTarget.SetAcceptedMediaType(1, pmt) 
 
   pmt = Nothing 
 
   ' get the inserted media type for the first stream 
   pInsertedMediaType = pMSTarget.GetAcceptedMediaType(0) 
   pInsertedMediaType = Nothing 
 
   ' set convert 1 target object 
   pConvert1.TargetObject = pMSTarget 
 
   ' start the source conversion, so we can get the media sample format 
   pConvert1.StartConvert() 
 
   ' initialize convert 2 
   ' get the output media sample format and put it into the source object 
   pMSSource.StreamCount = 2 
   pmt = pMSTarget.GetConnectedMediaType(0) 
   pMSSource.SetMediaType(0, pmt) 
   pmt = Nothing 
 
   pmt = pMSTarget.GetConnectedMediaType(1) 
   pMSSource.SetMediaType(1, pmt) 
   pmt = Nothing 
 
   ' get the inserted media type for the first stream 
   pInsertedMediaType = pMSSource.GetMediaType(0) 
   pInsertedMediaType = Nothing 
 
   ' set the output filename 
   pConvert2.TargetFile = outFile 
 
   ' set the source for convert 2 
   pConvert2.SourceObject = pMSSource 
 
   ' start the dest conversion 
   pConvert2.StartConvert() 
 
   ' convert first file 
   ConcateFile(pConvert1, pMSTarget, pMSSource, lStart) 
 
   ' 
   'Restrict the output format to the media type of the source for the first file 
   'That is because the two files must have the same media type for both video and audio 
   'With video, you have to make sure the files have the same frame rate! Minor changes in 
   'the frame rate might make the connection fail! 
   'The control will tolerate differences in frame rate if you comment the next line 
   ' 
 
   pmt = pMSTarget.GetConnectedMediaType(0) 
   pMSTarget.SetAcceptedMediaType(0, pmt) 
   pmt = Nothing 
 
   pmt = pMSTarget.GetConnectedMediaType(1) 
   pMSTarget.SetAcceptedMediaType(1, pmt) 
   pmt = Nothing 
 
   ' change the source file to second file 
   pConvert1.SourceFile = inFile2 
 
   ' start converting again 
   pConvert1.StartConvert() 
 
   ' convert second file 
   ConcateFile(pConvert1, pMSTarget, pMSSource, lStart) 
 
   ' deliver end of sample to stop the conversion 
   pMSSource.DeliverEndOfStream(0, 1000) 
   pMSSource.DeliverEndOfStream(1, 1000) 
 
   If pConvert2.State = ConvertState.Running Then 
      pConvert2.StopConvert() 
   End If 
 
   ' free the source and target objects 
   pConvert2.ResetSource() 
   pConvert1.ResetTarget() 
 
   pConvert1.Dispose() 
   pConvert2.Dispose() 
   pMSSource.Dispose() 
   pMSTarget.Dispose() 
 
   _result = File.Exists(outFile) 
End Sub 
 
Private Sub ConcateFile(ByVal pConvert1 As ConvertCtrl, 
                        ByVal pMSTarget As MultiStreamTarget, 
                        ByVal pMSSource As MultiStreamSource, 
                        ByRef lStart As Long) 
   Dim pmsSrc As MediaSample = Nothing 
   Dim pmsDst As MediaSample = Nothing 
   Dim MediaTimeStart As Long 
   Dim MediaTimeStop As Long 
   Dim LastStart As Long 
   Dim LastStop As Long 
   Dim lSampleStream As Integer 
   Dim lActualDataLength As Integer 
 
   LastStop = 0 
 
   Do 
      ' get the sample, allowing 10 s for the operation to complete 
      Try 
         lSampleStream = pMSTarget.WaitForSample(1000) 
      Catch cex As COMException 
         If cex.ErrorCode = CInt(ErrorCode.VFW_E_TIMEOUT) Then 
            ' end of the stream 
            Exit Do 
         End If 
         _result = False 
         Exit Do 
      End Try 
 
      Try 
         ' get the target sample 
         pmsSrc = pMSTarget.GetSample(lSampleStream, 0) 
         ' get the source buffer 
         pmsDst = pMSSource.GetSampleBuffer(lSampleStream, 2000) 
      Catch e1 As Exception 
         _result = False 
         Exit Do 
      End Try 
 
      ' get the media time 
      pmsSrc.GetMediaTime(MediaTimeStart, MediaTimeStop) 
 
      ' get the source sample time 
      pmsSrc.GetTime(LastStart, LastStop) 
 
      ' set the destination sample time 
      pmsDst.SetTime(lStart + LastStart, lStart + LastStop) 
 
      ' copy the data 
      lActualDataLength = pmsSrc.ActualDataLength 
 
      ' set the destination buffer  
      ' we could Marshal the unmanaged buffer here, but no need since we are mearly  
      ' setting the destination to the source buffer contents (unaltered data) 
      pmsDst.SetData(lActualDataLength, pmsSrc.GetData(lActualDataLength)) 
 
      ' copy the other flags 
      pmsDst.Discontinuity = pmsSrc.Discontinuity 
      pmsDst.Preroll = pmsSrc.Preroll 
      pmsDst.SyncPoint = pmsSrc.SyncPoint 
 
      ' release the source sample 
      pmsSrc = Nothing 
 
      ' deliver the destination sample 
      pMSSource.DeliverSample(lSampleStream, 1000, pmsDst) 
 
      ' release the destination sample 
      pmsDst = Nothing 
   Loop While True 
 
   pConvert1.StopConvert() 
   lStart = LastStop 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media" 
End Class

Requirements

Target Platforms

Reference

SampleSource Class

SampleSource Members

Download our FREE evaluation

Help Version 20.0.2020.4.2

Leadtools.Multimedia Assembly

Introduction

Getting Started

Namespaces

Leadtools.Multimedia Namespace

Leadtools.Multimedia.Common Namespace

Assemblies