in point fix, low latency sdl, minor fixes
[melted] / src / framework / mlt_producer.c
index c874243..74441f9 100644 (file)
@@ -20,6 +20,7 @@
 
 #include "config.h"
 #include "mlt_producer.h"
+#include "mlt_factory.h"
 #include "mlt_frame.h"
 #include <stdio.h>
 #include <string.h>
@@ -36,98 +37,114 @@ static int producer_get_frame( mlt_service this, mlt_frame_ptr frame, int index
 
 int mlt_producer_init( mlt_producer this, void *child )
 {
-       // Initialise the producer
-       memset( this, 0, sizeof( struct mlt_producer_s ) );
-       
-       // Associate with the child
-       this->child = child;
+       // Check that we haven't received NULL
+       int error = this == NULL;
 
-       // Initialise the service
-       if ( mlt_service_init( &this->parent, this ) == 0 )
+       // Continue if no error
+       if ( error == 0 )
        {
-               // The parent is the service
-               mlt_service parent = &this->parent;
-
-               // Get the properties of the parent
-               mlt_properties properties = mlt_service_properties( parent );
-
-               // Set the default properties
-               mlt_properties_set( properties, "mlt_type", "mlt_producer" );
-               mlt_properties_set_position( properties, "position", 0.0 );
-               mlt_properties_set_double( properties, "frame", 0 );
-               mlt_properties_set_double( properties, "fps", 25.0 );
-               mlt_properties_set_double( properties, "speed", 1.0 );
-               mlt_properties_set_position( properties, "in", 0.0 );
-               mlt_properties_set_position( properties, "out", 179999 );
-               mlt_properties_set_position( properties, "length", 180000 );
-               mlt_properties_set_double( properties, "aspect_ratio", 4.0 / 3.0 );
-               mlt_properties_set( properties, "log_id", "multitrack" );
-
-               // Override service get_frame
-               parent->get_frame = producer_get_frame;
-       }
+               // Initialise the producer
+               memset( this, 0, sizeof( struct mlt_producer_s ) );
+       
+               // Associate with the child
+               this->child = child;
 
-       return 0;
-}
+               // Initialise the service
+               if ( mlt_service_init( &this->parent, this ) == 0 )
+               {
+                       // Get the normalisation preference
+                       char *normalisation = mlt_environment( "MLT_NORMALISATION" );
 
-/** Get the parent service object.
-*/
+                       // The parent is the service
+                       mlt_service parent = &this->parent;
+       
+                       // Get the properties of the parent
+                       mlt_properties properties = mlt_service_properties( parent );
+       
+                       // Set the default properties
+                       mlt_properties_set( properties, "mlt_type", "mlt_producer" );
+                       mlt_properties_set_position( properties, "_position", 0.0 );
+                       mlt_properties_set_double( properties, "_frame", 0 );
+                       if ( normalisation == NULL || strcmp( normalisation, "NTSC" ) )
+                       {
+                               mlt_properties_set_double( properties, "fps", 25.0 );
+                               mlt_properties_set_double( properties, "aspect_ratio", 72.0 / 79.0 );
+                       }
+                       else
+                       {
+                               mlt_properties_set_double( properties, "fps", 30000.0 / 1001.0 );
+                               mlt_properties_set_double( properties, "aspect_ratio", 128.0 / 117.0 );
+                       }
+                       mlt_properties_set_double( properties, "_speed", 1.0 );
+                       mlt_properties_set_position( properties, "in", 0 );
+                       mlt_properties_set_position( properties, "out", 14999 );
+                       mlt_properties_set_position( properties, "length", 15000 );
+                       mlt_properties_set( properties, "eof", "pause" );
+                       mlt_properties_set( properties, "resource", "<producer>" );
+
+                       // Override service get_frame
+                       parent->get_frame = producer_get_frame;
+               }
+       }
 
-mlt_service mlt_producer_service( mlt_producer this )
-{
-       return &this->parent;
+       return error;
 }
 
-/** Get the producer properties.
+/** Create a new producer.
 */
 
-mlt_properties mlt_producer_properties( mlt_producer this )
+mlt_producer mlt_producer_new( )
 {
-       return mlt_service_properties( &this->parent );
+       mlt_producer this = malloc( sizeof( struct mlt_producer_s ) );
+       mlt_producer_init( this, NULL );
+       return this;
 }
 
-/** Convert frame position to position.
+/** Get the parent service object.
 */
 
-/*
-mlt_position mlt_producer_time( mlt_producer this, int64_t frame )
+mlt_service mlt_producer_service( mlt_producer this )
 {
-       if ( frame < 0 )
-               return -1;
-       else
-               return ( mlt_position )frame / mlt_producer_get_fps( this );
+       return &this->parent;
 }
-*/
 
-/** Convert position to frame position.
+/** Get the producer properties.
 */
 
-/*
-int64_t mlt_producer_frame_position( mlt_producer this, mlt_position position )
+mlt_properties mlt_producer_properties( mlt_producer this )
 {
-       if ( position < 0 )
-               return -1;
-       else
-               return ( int64_t )( floor( position * mlt_producer_get_fps( this ) + 0.5 ) );
+       return mlt_service_properties( &this->parent );
 }
-*/
 
 /** Seek to a specified position.
 */
 
 int mlt_producer_seek( mlt_producer this, mlt_position position )
 {
+       // Determine eof handling
+       char *eof = mlt_properties_get( mlt_producer_properties( this ), "eof" );
+       int use_points = 1 - mlt_properties_get_int( mlt_producer_properties( this ), "ignore_points" );
+
        // Check bounds
        if ( position < 0 )
+       {
                position = 0;
-       else if ( position > mlt_producer_get_playtime( this ) )
+       }
+       else if ( use_points && !strcmp( eof, "pause" ) && position >= mlt_producer_get_playtime( this ) )
+       {
+               mlt_producer_set_speed( this, 0 );
                position = mlt_producer_get_playtime( this ) - 1;
+       }
+       else if ( use_points && !strcmp( eof, "loop" ) && position >= mlt_producer_get_playtime( this ) )
+       {
+               position = position % mlt_producer_get_playtime( this );
+       }
 
        // Set the position
-       mlt_properties_set_position( mlt_producer_properties( this ), "position", position );
+       mlt_properties_set_position( mlt_producer_properties( this ), "_position", position );
 
        // Calculate the absolute frame
-       mlt_properties_set_position( mlt_producer_properties( this ), "frame", mlt_producer_get_in( this ) + position );
+       mlt_properties_set_position( mlt_producer_properties( this ), "_frame", use_points * mlt_producer_get_in( this ) + position );
 
        return 0;
 }
@@ -137,7 +154,7 @@ int mlt_producer_seek( mlt_producer this, mlt_position position )
 
 mlt_position mlt_producer_position( mlt_producer this )
 {
-       return mlt_properties_get_position( mlt_producer_properties( this ), "position" );
+       return mlt_properties_get_position( mlt_producer_properties( this ), "_position" );
 }
 
 /** Get the current position (relative to start of producer).
@@ -145,7 +162,7 @@ mlt_position mlt_producer_position( mlt_producer this )
 
 mlt_position mlt_producer_frame( mlt_producer this )
 {
-       return mlt_properties_get_double( mlt_producer_properties( this ), "frame" );
+       return mlt_properties_get_position( mlt_producer_properties( this ), "_frame" );
 }
 
 /** Set the playing speed.
@@ -153,7 +170,7 @@ mlt_position mlt_producer_frame( mlt_producer this )
 
 int mlt_producer_set_speed( mlt_producer this, double speed )
 {
-       return mlt_properties_set_double( mlt_producer_properties( this ), "speed", speed );
+       return mlt_properties_set_double( mlt_producer_properties( this ), "_speed", speed );
 }
 
 /** Get the playing speed.
@@ -161,7 +178,7 @@ int mlt_producer_set_speed( mlt_producer this, double speed )
 
 double mlt_producer_get_speed( mlt_producer this )
 {
-       return mlt_properties_get_double( mlt_producer_properties( this ), "speed" );
+       return mlt_properties_get_double( mlt_producer_properties( this ), "_speed" );
 }
 
 /** Get the frames per second.
@@ -240,7 +257,7 @@ mlt_position mlt_producer_get_length( mlt_producer this )
 
 void mlt_producer_prepare_next( mlt_producer this )
 {
-       mlt_producer_seek( this, mlt_producer_frame( this ) + mlt_producer_get_speed( this ) );
+       mlt_producer_seek( this, mlt_producer_position( this ) + mlt_producer_get_speed( this ) );
 }
 
 /** Get a frame.
@@ -251,13 +268,11 @@ static int producer_get_frame( mlt_service service, mlt_frame_ptr frame, int ind
        int result = 1;
        mlt_producer this = service->child;
 
+       // Determine eof handling
+       char *eof = mlt_properties_get( mlt_producer_properties( this ), "eof" );
+
        // A properly instatiated producer will have a get_frame method...
-       if ( this->get_frame != NULL )
-       {
-               // Get the frame from the implementation
-               result = this->get_frame( this, frame, index );
-       }
-       else
+       if ( this->get_frame == NULL || ( !strcmp( eof, "continue" ) && mlt_producer_position( this ) > mlt_producer_get_out( this ) ) )
        {
                // Generate a test frame
                *frame = mlt_frame_init( );
@@ -265,15 +280,24 @@ static int producer_get_frame( mlt_service service, mlt_frame_ptr frame, int ind
                // Set the position
                result = mlt_frame_set_position( *frame, mlt_producer_position( this ) );
 
+               // Mark as a test card
+               mlt_properties_set_int( mlt_frame_properties( *frame ), "test_image", 1 );
+               mlt_properties_set_int( mlt_frame_properties( *frame ), "test_audio", 1 );
+
                // Calculate the next position
                mlt_producer_prepare_next( this );
        }
+       else
+       {
+               // Get the frame from the implementation
+               result = this->get_frame( this, frame, index );
+       }
 
        // Copy the fps and speed of the producer onto the frame
        mlt_properties properties = mlt_frame_properties( *frame );
        mlt_properties_set_double( properties, "fps", mlt_producer_get_fps( this ) );
        double speed = mlt_producer_get_speed( this );
-       mlt_properties_set_double( properties, "speed", speed );
+       mlt_properties_set_double( properties, "_speed", speed );
 
        return 0;
 }