2 * filter_resize.c -- resizing filter
3 * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
4 * Author: Charles Yates <charles.yates@pandora.be>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 #include <framework/mlt_filter.h>
22 #include <framework/mlt_frame.h>
32 static inline void swap_bytes( uint8_t *upper, uint8_t *lower )
42 static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable )
46 // Get the properties from the frame
47 mlt_properties properties = MLT_FRAME_PROPERTIES( this );
49 // Pop the top of stack now
50 mlt_filter filter = mlt_frame_pop_service( this );
52 // Retrieve the aspect ratio
53 double aspect_ratio = mlt_deque_pop_back_double( MLT_FRAME_IMAGE_STACK( this ) );
55 // Correct Width/height if necessary
56 if ( *width == 0 || *height == 0 )
58 *width = mlt_properties_get_int( properties, "normalised_width" );
59 *height = mlt_properties_get_int( properties, "normalised_height" );
62 // Assign requested width/height from our subordinate
64 int oheight = *height;
66 // Check for the special case - no aspect ratio means no problem :-)
67 if ( aspect_ratio == 0.0 )
68 aspect_ratio = mlt_properties_get_double( properties, "consumer_aspect_ratio" );
70 // Reset the aspect ratio
71 mlt_properties_set_double( properties, "aspect_ratio", aspect_ratio );
74 char *rescale = mlt_properties_get( properties, "rescale.interp" );
75 if ( rescale != NULL && !strcmp( rescale, "none" ) )
76 return mlt_frame_get_image( this, image, format, width, height, writable );
78 if ( mlt_properties_get_int( properties, "distort" ) == 0 )
80 // Normalise the input and out display aspect
81 int normalised_width = mlt_properties_get_int( properties, "normalised_width" );
82 int normalised_height = mlt_properties_get_int( properties, "normalised_height" );
83 int real_width = mlt_properties_get_int( properties, "real_width" );
84 int real_height = mlt_properties_get_int( properties, "real_height" );
85 if ( real_width == 0 )
86 real_width = mlt_properties_get_int( properties, "width" );
87 if ( real_height == 0 )
88 real_height = mlt_properties_get_int( properties, "height" );
89 double input_ar = aspect_ratio * real_width / real_height;
90 double output_ar = mlt_properties_get_double( properties, "consumer_aspect_ratio" ) * owidth / oheight;
92 //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 );
94 // Optimised for the input_ar > output_ar case (e.g. widescreen on standard)
95 int scaled_width = rint( 0.5 + ( input_ar * normalised_width ) / output_ar );
96 int scaled_height = normalised_height;
98 // Now ensure that our images fit in the output frame
99 if ( scaled_width > normalised_width )
101 scaled_width = normalised_width;
102 scaled_height = rint( 0.5 + ( output_ar * normalised_height ) / input_ar );
105 // Now calculate the actual image size that we want
106 owidth = rint( 0.5 + scaled_width * owidth / normalised_width );
107 oheight = rint( 0.5 + scaled_height * oheight / normalised_height );
109 // Tell frame we have conformed the aspect to the consumer
110 mlt_frame_set_aspect_ratio( this, mlt_properties_get_double( properties, "consumer_aspect_ratio" ) );
113 mlt_properties_set_int( properties, "distort", 0 );
115 // Now pass on the calculations down the line
116 mlt_properties_set_int( properties, "resize_width", *width );
117 mlt_properties_set_int( properties, "resize_height", *height );
120 error = mlt_frame_get_image( this, image, format, &owidth, &oheight, writable );
122 // We only know how to process yuv422 at the moment
123 if ( error == 0 && *format == mlt_image_yuv422 && *image != NULL )
125 // Get the requested scale operation
126 char *op = mlt_properties_get( MLT_FILTER_PROPERTIES( filter ), "scale" );
128 // Provides a manual override for misreported field order
129 if ( mlt_properties_get( properties, "meta.top_field_first" ) )
130 mlt_properties_set_int( properties, "top_field_first", mlt_properties_get_int( properties, "meta.top_field_first" ) );
132 // Correct field order if needed
133 if ( mlt_properties_get_int( properties, "top_field_first" ) == 1 )
135 // Get the input image, width and height
137 uint8_t *image = mlt_properties_get_data( properties, "image", &size );
138 uint8_t *ptr = image + owidth * 2;
139 memmove( ptr, image, size - owidth * 2 );
141 // Set the normalised field order
142 mlt_properties_set_int( properties, "top_field_first", 0 );
143 mlt_properties_set_int( properties, "meta.top_field_first", 0 );
146 if ( !strcmp( op, "affine" ) )
148 *image = mlt_frame_rescale_yuv422( this, *width, *height );
150 else if ( strcmp( op, "none" ) != 0 )
152 *image = mlt_frame_resize_yuv422( this, *width, *height );
164 /** Filter processing.
167 static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
169 // Store the aspect ratio reported by the source
170 mlt_deque_push_back_double( MLT_FRAME_IMAGE_STACK( frame ), mlt_frame_get_aspect_ratio( frame ) );
172 // Push this on to the service stack
173 mlt_frame_push_service( frame, this );
175 // Push the get_image method on to the stack
176 mlt_frame_push_get_image( frame, filter_get_image );
181 /** Constructor for the filter.
184 mlt_filter filter_resize_init( mlt_profile profile, mlt_service_type type, const char *id, char *arg )
186 mlt_filter this = calloc( sizeof( struct mlt_filter_s ), 1 );
187 if ( mlt_filter_init( this, this ) == 0 )
189 this->process = filter_process;
190 mlt_properties_set( MLT_FILTER_PROPERTIES( this ), "scale", arg == NULL ? "off" : arg );