#include <stdio.h>
#include <string.h>
#include <stdlib.h>
+#include <math.h>
+
+/** Swapbytes inline.
+*/
+
+static inline void swap_bytes( uint8_t *upper, uint8_t *lower )
+{
+ uint8_t t = *lower;
+ *lower = *upper;
+ *upper = t;
+}
/** Do it :-).
*/
int error = 0;
// Get the properties from the frame
- mlt_properties properties = mlt_frame_properties( this );
+ mlt_properties properties = MLT_FRAME_PROPERTIES( this );
// Pop the top of stack now
mlt_filter filter = mlt_frame_pop_service( this );
+ // Retrieve the aspect ratio
+ double aspect_ratio = mlt_deque_pop_back_double( MLT_FRAME_IMAGE_STACK( this ) );
+
// Assign requested width/height from our subordinate
int owidth = *width;
int oheight = *height;
+ // Check for the special case - no aspect ratio means no problem :-)
+ if ( aspect_ratio == 0.0 )
+ aspect_ratio = mlt_properties_get_double( properties, "consumer_aspect_ratio" );
+
+ // Reset the aspect ratio
+ mlt_properties_set_double( properties, "aspect_ratio", aspect_ratio );
+
// Hmmm...
char *rescale = mlt_properties_get( properties, "rescale.interp" );
if ( rescale != NULL && !strcmp( rescale, "none" ) )
return mlt_frame_get_image( this, image, format, width, height, writable );
- if ( mlt_properties_get( properties, "distort" ) == NULL )
+ if ( mlt_properties_get_int( properties, "distort" ) == 0 )
{
// Normalise the input and out display aspect
int normalised_width = mlt_properties_get_int( properties, "normalised_width" );
real_width = mlt_properties_get_int( properties, "width" );
if ( real_height == 0 )
real_height = mlt_properties_get_int( properties, "height" );
- double input_ar = mlt_frame_get_aspect_ratio( this ) * real_width / real_height;
+ double input_ar = aspect_ratio * real_width / real_height;
double output_ar = mlt_properties_get_double( properties, "consumer_aspect_ratio" ) * owidth / oheight;
+ //fprintf( stderr, "normalised %dx%d output %dx%d %f %f\n", normalised_width, normalised_height, owidth, oheight, ( float )output_ar, ( float )mlt_properties_get_double( properties, "consumer_aspect_ratio" ) * owidth / oheight );
+
// Optimised for the input_ar > output_ar case (e.g. widescreen on standard)
- int scaled_width = input_ar / output_ar * normalised_width + 0.5;
+ int scaled_width = rint( 0.5 + ( input_ar * normalised_width ) / output_ar );
int scaled_height = normalised_height;
// Now ensure that our images fit in the output frame
if ( scaled_width > normalised_width )
{
scaled_width = normalised_width;
- scaled_height = output_ar / input_ar * normalised_height + 0.5;
+ scaled_height = rint( 0.5 + ( output_ar * normalised_height ) / input_ar );
}
-
+
// Now calculate the actual image size that we want
- owidth = scaled_width * owidth / normalised_width;
- oheight = scaled_height * oheight / normalised_height;
+ owidth = rint( 0.5 + scaled_width * owidth / normalised_width );
+ oheight = rint( 0.5 + scaled_height * oheight / normalised_height );
// Tell frame we have conformed the aspect to the consumer
mlt_frame_set_aspect_ratio( this, mlt_properties_get_double( properties, "consumer_aspect_ratio" ) );
}
+ mlt_properties_set_int( properties, "distort", 0 );
+
// Now pass on the calculations down the line
mlt_properties_set_int( properties, "resize_width", *width );
mlt_properties_set_int( properties, "resize_height", *height );
error = mlt_frame_get_image( this, image, format, &owidth, &oheight, writable );
// We only know how to process yuv422 at the moment
- if ( error == 0 && *format == mlt_image_yuv422 )
+ if ( error == 0 && *format == mlt_image_yuv422 && *image != NULL )
{
// Get the requested scale operation
- char *op = mlt_properties_get( mlt_filter_properties( filter ), "scale" );
+ char *op = mlt_properties_get( MLT_FILTER_PROPERTIES( filter ), "scale" );
+
+ // Provides a manual override for misreported field order
+ if ( mlt_properties_get( properties, "meta.top_field_first" ) )
+ mlt_properties_set( properties, "top_field_first", mlt_properties_get_int( properties, "meta.top_field_first" ) );
// Correct field order if needed
if ( mlt_properties_get_int( properties, "top_field_first" ) == 1 )
// Get the input image, width and height
int size;
uint8_t *image = mlt_properties_get_data( properties, "image", &size );
-
- // Keep the original image around to be destroyed on frame close
- mlt_properties_rename( properties, "image", "original_image" );
-
- // Duplicate the last line in the field to avoid artifact
- memcpy( image + oheight * owidth * 2, image + oheight * owidth * 2 - owidth * 4, owidth * 2 );
-
- // Offset the image pointer by one line
- image += owidth * 2;
- size -= owidth * 2;
-
- // Set the new image pointer with no destructor
- mlt_properties_set_data( properties, "image", image, size, NULL, NULL );
+ uint8_t *ptr = image + owidth * 2;
+ int h = oheight / 2;
+ int w = owidth;
+
+ // Swap the lines around
+ while( h -- )
+ {
+ w = owidth;
+ while( w -- )
+ {
+ swap_bytes( image ++, ptr ++ );
+ swap_bytes( image ++, ptr ++ );
+ }
+ image += owidth * 2;
+ ptr += owidth * 2;
+ }
// Set the normalised field order
mlt_properties_set_int( properties, "top_field_first", 0 );
+ mlt_properties_set_int( properties, "meta.top_field_first", 0 );
}
if ( !strcmp( op, "affine" ) )
static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
{
+ // Store the aspect ratio reported by the source
+ mlt_deque_push_back_double( MLT_FRAME_IMAGE_STACK( frame ), mlt_frame_get_aspect_ratio( frame ) );
+
// Push this on to the service stack
mlt_frame_push_service( frame, this );
if ( mlt_filter_init( this, this ) == 0 )
{
this->process = filter_process;
- mlt_properties_set( mlt_filter_properties( this ), "scale", arg == NULL ? "off" : arg );
+ mlt_properties_set( MLT_FILTER_PROPERTIES( this ), "scale", arg == NULL ? "off" : arg );
}
return this;
}