]> git.sesse.net Git - mlt/blobdiff - src/modules/xine/filter_deinterlace.c
Add YADIF methods in deinterlace filter.
[mlt] / src / modules / xine / filter_deinterlace.c
index fef3301ff3f3cc95150839ea382c15aed03553b8..c7341afd911dc2f33614b4269fe3c96ec6984d65 100644 (file)
 
 #include <framework/mlt_filter.h>
 #include <framework/mlt_log.h>
+#include <framework/mlt_producer.h>
+#include <framework/mlt_events.h>
 #include "deinterlace.h"
+#include "yadif.h"
 
 #include <framework/mlt_frame.h>
 
 #include <string.h>
 #include <stdlib.h>
 
+int deinterlace_yadif( mlt_frame frame, mlt_filter filter, uint8_t **image, mlt_image_format *format, int *width, int *height, int mode )
+{
+       mlt_properties properties = MLT_FRAME_PROPERTIES( frame );
+       mlt_frame previous_frame = mlt_properties_get_data( properties, "previous frame", NULL );
+       uint8_t* previous_image = NULL;
+       int previous_width = *width;
+       int previous_height = *height;
+       mlt_frame next_frame = mlt_properties_get_data( properties, "next frame", NULL );
+       uint8_t* next_image = NULL;
+       int next_width = *width;
+       int next_height = *height;
+       yadif_filter *yadif = mlt_properties_get_data( MLT_FILTER_PROPERTIES( filter ), "yadif", NULL );
+       
+       mlt_log_debug( MLT_FILTER_SERVICE(filter), "previous %d current %d next %d\n", 
+               previous_frame? mlt_frame_get_position(previous_frame) : -1,
+               mlt_frame_get_position(frame),
+               next_frame?  mlt_frame_get_position(next_frame) : -1);
+
+       if ( !previous_frame || !next_frame )
+               return 1;
+       
+       // Get the preceding frame's image
+       int error = mlt_frame_get_image( previous_frame, &previous_image, format, &previous_width, &previous_height, 0 );
+       
+       if ( !error && previous_image && *format == mlt_image_yuv422 )
+       {
+               // Get the current frame's image
+               error = mlt_frame_get_image( frame, image, format, width, height, 0 );
+               
+               // Check that we aren't already progressive
+               if ( !error && *image && *format == mlt_image_yuv422 &&
+                    !mlt_properties_get_int( MLT_FRAME_PROPERTIES( frame ), "progressive" ) ) 
+               {
+                       // Get the following frame's image
+                       error = mlt_frame_get_image( next_frame, &next_image, format, &next_width, &next_height, 0 );
+               
+                       if ( !error && next_image && *format == mlt_image_yuv422 )
+                       {
+                               if ( !yadif->ysrc )
+                               {
+                                       // Create intermediate planar planes
+                                       yadif->yheight = *height;
+                                       yadif->ywidth  = *width;
+                                       yadif->uvwidth = yadif->ywidth / 2;
+                                       yadif->ypitch  = ( yadif->ywidth +  15 ) / 16 * 16;
+                                       yadif->uvpitch = ( yadif->uvwidth + 15 ) / 16 * 16;
+                                       yadif->ysrc  = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->ypitch );
+                                       yadif->usrc  = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch);
+                                       yadif->vsrc  = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       yadif->yprev = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->ypitch );
+                                       yadif->uprev = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       yadif->vprev = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       yadif->ynext = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->ypitch );
+                                       yadif->unext = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       yadif->vnext = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       yadif->ydest = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->ypitch );
+                                       yadif->udest = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       yadif->vdest = (unsigned char *) mlt_pool_alloc( yadif->yheight * yadif->uvpitch );
+                                       
+                               }
+                       
+                               const int order = mlt_properties_get_int( properties, "top_field_first" );
+                               const int pitch = *width << 1;
+                               const int parity = 0;
+                       
+                               // Convert packed to planar
+                               YUY2ToPlanes( *image, pitch, *width, *height, yadif->ysrc,
+                                       yadif->ypitch, yadif->usrc, yadif->vsrc, yadif->uvpitch, yadif->cpu );
+                               YUY2ToPlanes( previous_image, pitch, *width, *height, yadif->yprev,
+                                       yadif->ypitch, yadif->uprev, yadif->vprev, yadif->uvpitch, yadif->cpu );
+                               YUY2ToPlanes( next_image, pitch, *width, *height, yadif->ynext,
+                                       yadif->ypitch, yadif->unext, yadif->vnext, yadif->uvpitch, yadif->cpu );
+                               
+                               // Deinterlace each plane
+                               filter_plane( mode, yadif->ydest, yadif->ypitch, yadif->yprev, yadif->ysrc,
+                                       yadif->ynext, yadif->ypitch, *width, *height, parity, order, yadif->cpu);
+                               filter_plane( mode, yadif->udest, yadif->uvpitch,yadif->uprev, yadif->usrc,
+                                       yadif->unext, yadif->uvpitch, *width >> 1, *height, parity, order, yadif->cpu);
+                               filter_plane( mode, yadif->vdest, yadif->uvpitch, yadif->vprev, yadif->vsrc,
+                                       yadif->vnext, yadif->uvpitch, *width >> 1, *height, parity, order, yadif->cpu);
+                               
+                               // Convert planar to packed
+                               YUY2FromPlanes( *image, pitch, *width, *height, yadif->ydest,
+                                       yadif->ypitch, yadif->udest, yadif->vdest, yadif->uvpitch, yadif->cpu);
+                       }
+               }
+       }
+       return error;
+}
+
 /** Do it :-).
 */
 
 static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable )
 {
        int error = 0;
-       int deinterlace = mlt_properties_get_int( MLT_FRAME_PROPERTIES( this ), "consumer_deinterlace" );
-       int progressive = mlt_properties_get_int( MLT_FRAME_PROPERTIES( this ), "progressive" );
+       mlt_properties properties = MLT_FRAME_PROPERTIES( this );
+       int deinterlace = mlt_properties_get_int( properties, "consumer_deinterlace" );
+       int progressive = mlt_properties_get_int( properties, "progressive" );
        
        // Pop the service off the stack
        mlt_filter filter = mlt_frame_pop_service( this );
 
-       // Determine if we need a writable version or not
-       if ( deinterlace && !writable )
-                writable = !progressive;
-
        // Get the input image
        if ( deinterlace && !progressive )
-               *format = mlt_image_yuv422;
-       error = mlt_frame_get_image( this, image, format, width, height, writable );
-       progressive = mlt_properties_get_int( MLT_FRAME_PROPERTIES( this ), "progressive" );
-       mlt_log_debug( MLT_FILTER_SERVICE( filter ), "xine.deinterlace %d prog %d format %s\n",
-               deinterlace, progressive, mlt_image_format_name( *format ) );
-
-       // Check that we want progressive and we aren't already progressive
-       if ( deinterlace && *format == mlt_image_yuv422 && *image && !progressive )
        {
                // Determine deinterlace method
                char *method_str = mlt_properties_get( MLT_FILTER_PROPERTIES( filter ), "method" );
-               int method = DEINTERLACE_LINEARBLEND;
-               char *frame_method_str = mlt_properties_get( MLT_FRAME_PROPERTIES( this ), "deinterlace_method" );
+               int method = DEINTERLACE_NONE;
+               char *frame_method_str = mlt_properties_get( properties, "deinterlace_method" );
                
-               if ( frame_method_str != NULL )
+               if ( frame_method_str )
                        method_str = frame_method_str;
                
-               if ( method_str == NULL )
+               if ( !method_str || strcmp( method_str, "yadif" ) == 0 )
+                       method = DEINTERLACE_YADIF;
+               else if ( strcmp( method_str, "yadif-nospatial" ) == 0 )
+                       method = DEINTERLACE_YADIF_NOSPATIAL;
+               else if ( strcmp( method_str, "onefield" ) == 0 )
+                       method = DEINTERLACE_ONEFIELD;
+               else if ( strcmp( method_str, "linearblend" ) == 0 )
                        method = DEINTERLACE_LINEARBLEND;
                else if ( strcmp( method_str, "bob" ) == 0 )
                        method = DEINTERLACE_BOB;
@@ -70,16 +158,66 @@ static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *
                        method = DEINTERLACE_BOB;
                else if ( strcmp( method_str, "greedy" ) == 0 )
                        method = DEINTERLACE_GREEDY;
-               else if ( strcmp( method_str, "onefield" ) == 0 )
-                       method = DEINTERLACE_ONEFIELD;
+
+               *format = mlt_image_yuv422;
+
+               if ( method == DEINTERLACE_YADIF )
+               {
+                       int mode = 0;
+                       error = deinterlace_yadif( this, filter, image, format, width, height, mode );
+                       progressive = mlt_properties_get_int( properties, "progressive" );
+               }
+               else if ( method == DEINTERLACE_YADIF_NOSPATIAL )
+               {
+                       int mode = 2;
+                       error = deinterlace_yadif( this, filter, image, format, width, height, mode );
+                       progressive = mlt_properties_get_int( properties, "progressive" );
+               }
+               if ( error || ( method > DEINTERLACE_NONE && method < DEINTERLACE_YADIF ) )
+               {
+                       // Signal that we no longer need previous and next frames
+                       mlt_producer producer = mlt_producer_cut_parent( mlt_frame_get_original_producer(this) );
+                       mlt_properties_set_int( MLT_PRODUCER_PROPERTIES(producer), "_need_previous_next", 0 );
                        
-               // Deinterlace the image
-               deinterlace_yuv( *image, image, *width * 2, *height, method );
+                       if ( error )
+                               method = DEINTERLACE_ONEFIELD;
+                       
+                       // Get the current frame's image
+                       error = mlt_frame_get_image( this, image, format, width, height, writable );
+                       progressive = mlt_properties_get_int( properties, "progressive" );
+
+                       // Check that we aren't already progressive
+                       if ( !progressive && !error && *image && *format == mlt_image_yuv422 )
+                       {
+                               // Deinterlace the image using one of the Xine deinterlacers
+                               int image_size = *width * *height * 2;
+                               uint8_t *new_image = mlt_pool_alloc( image_size );
+
+                               deinterlace_yuv( new_image, image, *width * 2, *height, method );
+                               mlt_properties_set_data( properties, "image", new_image, image_size, mlt_pool_release, NULL );
+                               *image = new_image;
+                       }
+               }
+               else if ( method == DEINTERLACE_NONE )
+               {
+                       error = mlt_frame_get_image( this, image, format, width, height, writable );
+               }
                
-               // Make sure that others know the frame is deinterlaced
-               mlt_properties_set_int( MLT_FRAME_PROPERTIES( this ), "progressive", 1 );
+               mlt_log_debug( MLT_FILTER_SERVICE( filter ), "error %d deint %d prog %d fmt %s method %s\n",
+                       error, deinterlace, progressive, mlt_image_format_name( *format ), method_str ? method_str : "yadif" );
+               
+               if ( !error )
+               {
+                       // Make sure that others know the frame is deinterlaced
+                       mlt_properties_set_int( properties, "progressive", 1 );
+               }
        }
-
+       else
+       {
+               // Pass through
+               error = mlt_frame_get_image( this, image, format, width, height, writable );
+       }
+       
        return error;
 }
 
@@ -97,6 +235,36 @@ static mlt_frame deinterlace_process( mlt_filter this, mlt_frame frame )
        return frame;
 }
 
+static void filter_close( mlt_filter this )
+{
+       yadif_filter *yadif = mlt_properties_get_data( MLT_FILTER_PROPERTIES( this ), "yadif", NULL );
+       if ( yadif )
+       {
+               if ( yadif->ysrc )
+               {
+                       mlt_pool_release( yadif->ysrc );
+                       mlt_pool_release( yadif->usrc );
+                       mlt_pool_release( yadif->vsrc );
+                       mlt_pool_release( yadif->yprev );
+                       mlt_pool_release( yadif->uprev );
+                       mlt_pool_release( yadif->vprev );
+                       mlt_pool_release( yadif->ynext );
+                       mlt_pool_release( yadif->unext );
+                       mlt_pool_release( yadif->vnext );
+                       mlt_pool_release( yadif->ydest );
+                       mlt_pool_release( yadif->udest );
+                       mlt_pool_release( yadif->vdest );
+               }
+               mlt_pool_release( yadif );
+       }
+}
+
+static void on_service_changed( mlt_service owner, mlt_service filter )
+{
+       mlt_service service = mlt_properties_get_data( MLT_SERVICE_PROPERTIES(filter), "service", NULL );
+       mlt_properties_set_int( MLT_SERVICE_PROPERTIES(service), "_need_previous_next", 1 );
+}
+
 /** Constructor for the filter.
 */
 
@@ -105,8 +273,37 @@ mlt_filter filter_deinterlace_init( mlt_profile profile, mlt_service_type type,
        mlt_filter this = mlt_filter_new( );
        if ( this != NULL )
        {
+               yadif_filter *yadif = mlt_pool_alloc( sizeof( *yadif ) );
+
+               yadif->cpu = 0; // Pure C
+#ifdef USE_SSE
+               yadif->cpu |= AVS_CPU_INTEGER_SSE;
+#endif
+#ifdef USE_SSE2
+               yadif->cpu |= AVS_CPU_SSE2;
+#endif
+               yadif->ysrc = NULL;
                this->process = deinterlace_process;
+               this->close = filter_close;
                mlt_properties_set( MLT_FILTER_PROPERTIES( this ), "method", arg );
+               mlt_properties_set_data( MLT_FILTER_PROPERTIES( this ), "yadif", yadif, sizeof(*yadif), NULL, NULL );
+               mlt_events_listen( MLT_FILTER_PROPERTIES( this ), this, "service-changed", (mlt_listener) on_service_changed ); 
+               
+#if defined(__GNUC__) && !defined(PIC)
+               // Set SSSE3 bit to cpu
+               asm (\
+               "mov $1, %%eax \n\t"\
+               "push %%ebx \n\t"\
+               "cpuid \n\t"\
+               "pop %%ebx \n\t"\
+               "mov %%ecx, %%edx \n\t"\
+               "shr $9, %%edx \n\t"\
+               "and $1, %%edx \n\t"\
+               "shl $9, %%edx \n\t"\
+               "and $511, %%ebx \n\t"\
+               "or %%edx, %%ebx \n\t"\
+               : "=b"(yadif->cpu) : "p"(yadif->cpu) : "%eax", "%ecx", "%edx");
+#endif
        }
        return this;
 }