make mlt_position type double

[mlt] / src / modules / core / filter_luma.c

diff --git a/src/modules/core/filter_luma.c b/src/modules/core/filter_luma.c
index f2e11567097ea915aff94c5f2a260b5c0e93eadf..37ceeb44ff679b1328a37fbe613d3ce3dac37189 100644 (file)
--- a/src/modules/core/filter_luma.c
+++ b/src/modules/core/filter_luma.c
@@ -23,6 +23,7 @@
 #include <framework/mlt_frame.h>
 #include <framework/mlt_producer.h>
 #include <framework/mlt_transition.h>
+#include <framework/mlt_log.h>
 
 #include <stdio.h>
 #include <stdlib.h>
@@ -36,13 +37,29 @@ static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *
        int error = 0;
        mlt_filter filter = mlt_frame_pop_service( this );
        mlt_properties properties = MLT_FILTER_PROPERTIES( filter );
+
+       mlt_service_lock( MLT_FILTER_SERVICE( filter ) );
+
        mlt_transition luma = mlt_properties_get_data( properties, "luma", NULL );
        mlt_frame b_frame = mlt_properties_get_data( properties, "frame", NULL );
        mlt_properties b_frame_props = b_frame ? MLT_FRAME_PROPERTIES( b_frame ) : NULL;
        int out = mlt_properties_get_int( properties, "period" );
-       
-       if ( out == 0 )
-               out = 24;
+       int cycle = mlt_properties_get_int( properties, "cycle" );
+       int duration = mlt_properties_get_int( properties, "duration" );
+       mlt_position position = mlt_filter_get_position( filter, this );
+
+       out = out? out + 1 : 25;
+       if ( cycle )
+               out = cycle;
+       if ( duration < 1 || duration > out )
+               duration = out;
+       *format = mlt_image_yuv422;
+
+       if ( b_frame == NULL || mlt_properties_get_int( b_frame_props, "width" ) != *width || mlt_properties_get_int( b_frame_props, "height" ) != *height )
+       {
+               b_frame = mlt_frame_init( MLT_FILTER_SERVICE( filter ) );
+               mlt_properties_set_data( properties, "frame", b_frame, 0, ( mlt_destructor )mlt_frame_close, NULL );
+       }
 
        if ( luma == NULL )
        {
@@ -53,30 +70,31 @@ static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *
                {
                        mlt_properties luma_properties = MLT_TRANSITION_PROPERTIES( luma );
                        mlt_properties_set_int( luma_properties, "in", 0 );
-                       mlt_properties_set_int( luma_properties, "out", out );
+                       mlt_properties_set_int( luma_properties, "out", duration - 1 );
                        mlt_properties_set_int( luma_properties, "reverse", 1 );
                        mlt_properties_set_data( properties, "luma", luma, 0, ( mlt_destructor )mlt_transition_close, NULL );
                }
        }
 
-       if ( b_frame == NULL || mlt_properties_get_int( b_frame_props, "width" ) != *width || mlt_properties_get_int( b_frame_props, "height" ) != *height )
-       {
-               b_frame = mlt_frame_init( MLT_FILTER_SERVICE( filter ) );
-               mlt_properties_set_data( properties, "frame", b_frame, 0, ( mlt_destructor )mlt_frame_close, NULL );
-       }
-
-       if ( luma != NULL && 
-               ( mlt_properties_get( properties, "blur" ) != NULL || 
-                 (int)mlt_frame_get_position( this ) % ( out + 1 ) != out ) )
+       mlt_position modulo_pos = MLT_POSITION_MOD(position, out);
+       mlt_log_debug( MLT_FILTER_SERVICE(filter), "pos " MLT_POSITION_FMT " mod period " MLT_POSITION_FMT "\n", position, modulo_pos );
+       if ( luma != NULL &&
+            ( mlt_properties_get( properties, "blur" ) != NULL ||
+                  ( position >= duration && modulo_pos < duration - 1 ) ) )
        {
                mlt_properties luma_properties = MLT_TRANSITION_PROPERTIES( luma );
                mlt_properties_pass( luma_properties, properties, "luma." );
+               int in = position / out * out + mlt_frame_get_position( this ) - position;
+               mlt_properties_set_int( luma_properties, "in", in );
+               mlt_properties_set_int( luma_properties, "out", in + duration - 1 );
                mlt_transition_process( luma, this, b_frame );
        }
 
        error = mlt_frame_get_image( this, image, format, width, height, 1 );
 
-       if ( error == 0 )
+       // We only need a copy of the last frame in the cycle, but we could miss it
+       // with realtime frame-dropping, so we copy the last several frames of the cycle.
+       if ( error == 0 && modulo_pos > out - duration )
        {
                mlt_properties a_props = MLT_FRAME_PROPERTIES( this );
                int size = 0;
@@ -85,15 +103,18 @@ static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *
 
                if ( dst != NULL )
                {
+                       mlt_log_debug( MLT_FILTER_SERVICE(filter), "copying frame " MLT_POSITION_FMT "\n", modulo_pos );
                        mlt_properties b_props = MLT_FRAME_PROPERTIES( b_frame );
                        memcpy( dst, src, size );
-                       mlt_properties_set_data( b_props, "image", dst, size, mlt_pool_release, NULL );
+                       mlt_frame_set_image( b_frame, dst, size, mlt_pool_release );
                        mlt_properties_set_int( b_props, "width", *width );
                        mlt_properties_set_int( b_props, "height", *height );
                        mlt_properties_set_int( b_props, "format", *format );
                }
        }
 
+       mlt_service_unlock( MLT_FILTER_SERVICE( filter ) );
+
        return error;
 }