* Copyright (C) 2004-2005 Ushodaya Enterprises Limited
* Author: Charles Yates <charles.yates@pandora.be>
*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
*
- * This program is distributed in the hope that it will be useful,
+ * This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
*
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software Foundation,
- * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
-#include "filter_avcolour_space.h"
-
+#include <framework/mlt_filter.h>
#include <framework/mlt_frame.h>
+#include <framework/mlt_log.h>
// ffmpeg Header files
#include <avformat.h>
+#ifdef SWSCALE
+#include <swscale.h>
+#endif
+
+#if LIBAVUTIL_VERSION_INT < (50<<16)
+#define PIX_FMT_YUYV422 PIX_FMT_YUV422
+#endif
#include <stdio.h>
#include <stdlib.h>
-static inline int convert_mlt_to_av_cs( mlt_image_format format )
+#if 0 // This test might come in handy elsewhere someday.
+static int is_big_endian( )
+{
+ union { int i; char c[ 4 ]; } big_endian_test;
+ big_endian_test.i = 1;
+
+ return big_endian_test.c[ 0 ] != 1;
+}
+#endif
+
+static int convert_mlt_to_av_cs( mlt_image_format format )
{
int value = 0;
switch( format )
{
case mlt_image_rgb24:
+ case mlt_image_rgb24_full:
value = PIX_FMT_RGB24;
break;
case mlt_image_rgb24a:
- value = PIX_FMT_RGBA32;
+ case mlt_image_opengl:
+ case mlt_image_rgb24a_full:
+ value = PIX_FMT_RGBA;
break;
case mlt_image_yuv422:
- value = PIX_FMT_YUV422;
+ case mlt_image_yuv422_709:
+ value = PIX_FMT_YUYV422;
break;
case mlt_image_yuv420p:
value = PIX_FMT_YUV420P;
break;
case mlt_image_none:
- fprintf( stderr, "Invalid format...\n" );
+ mlt_log_error( NULL, "[filter avcolor_space] Invalid format\n" );
break;
}
return value;
}
-static inline void convert_image( uint8_t *out, uint8_t *in, int out_fmt, int in_fmt, int width, int height )
+enum luma_scale {
+ LUMA_SCALE_AUTO = 0,
+ LUMA_SCALE_NONE,
+ LUMA_SCALE_OUT,
+ LUMA_SCALE_IN
+};
+
+static void set_luma_transfer( struct SwsContext *context, int is_709, enum luma_scale scale )
{
- if ( in_fmt == PIX_FMT_YUV420P && out_fmt == PIX_FMT_YUV422 )
+ int *coefficients;
+ int range_in, range_out;
+ int brightness, contrast, saturation;
+
+ if ( sws_getColorspaceDetails( context, &coefficients, &range_in, &coefficients, &range_out,
+ &brightness, &contrast, &saturation ) != -1 )
{
- register int i, j;
- register int half = width >> 1;
- register uint8_t *Y = in;
- register uint8_t *U = Y + width * height;
- register uint8_t *V = U + width * height / 2;
- register uint8_t *d = out;
- register uint8_t *y, *u, *v;
-
- i = height >> 1;
- while ( i -- )
+ // Don't change these from defaults unless explicitly told to.
+ switch ( scale )
{
- y = Y;
- u = U;
- v = V;
- j = half;
- while ( j -- )
- {
- *d ++ = *y ++;
- *d ++ = *u ++;
- *d ++ = *y ++;
- *d ++ = *v ++;
- }
-
- Y += width;
- y = Y;
- u = U;
- v = V;
- j = half;
- while ( j -- )
- {
- *d ++ = *y ++;
- *d ++ = *u ++;
- *d ++ = *y ++;
- *d ++ = *v ++;
- }
-
- Y += width;
- U += width / 2;
- V += width / 2;
+ case LUMA_SCALE_NONE:
+ range_in = range_out = 1;
+ break;
+ case LUMA_SCALE_OUT:
+ range_in = 0;
+ range_out = 1;
+ break;
+ case LUMA_SCALE_IN:
+ range_in = 1;
+ range_out = 0;
+ break;
+ default:
+ break;
}
- }
- else
- {
- AVPicture input;
- AVPicture output;
- avpicture_fill( &output, out, out_fmt, width, height );
- avpicture_fill( &input, in, in_fmt, width, height );
- img_convert( &output, out_fmt, &input, in_fmt, width, height );
+ if ( is_709 )
+ coefficients = sws_getCoefficients( SWS_CS_ITU709 );
+ sws_setColorspaceDetails( context, coefficients, range_in, coefficients, range_out,
+ brightness, contrast, saturation );
}
}
+static void av_convert_image( uint8_t *out, uint8_t *in, int out_fmt, int in_fmt,
+ int width, int height, int is_709, int is_full )
+{
+ AVPicture input;
+ AVPicture output;
+ int flags = SWS_BILINEAR | SWS_ACCURATE_RND;
+
+ if ( out_fmt == PIX_FMT_YUYV422 )
+ flags |= SWS_FULL_CHR_H_INP;
+ else
+ flags |= SWS_FULL_CHR_H_INT;
+#ifdef USE_MMX
+ flags |= SWS_CPU_CAPS_MMX;
+#endif
+#ifdef USE_SSE
+ flags |= SWS_CPU_CAPS_MMX2;
+#endif
+
+ avpicture_fill( &input, in, in_fmt, width, height );
+ avpicture_fill( &output, out, out_fmt, width, height );
+#ifdef SWSCALE
+ struct SwsContext *context = sws_getContext( width, height, in_fmt,
+ width, height, out_fmt, flags, NULL, NULL, NULL);
+ set_luma_transfer( context, is_709, is_full );
+ sws_scale( context, input.data, input.linesize, 0, height,
+ output.data, output.linesize);
+ sws_freeContext( context );
+#else
+ img_convert( &output, out_fmt, &input, in_fmt, width, height );
+#endif
+}
+
/** Do it :-).
*/
-static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable )
+static int convert_image( mlt_frame frame, uint8_t **image, mlt_image_format *format, mlt_image_format output_format )
{
- mlt_filter filter = mlt_frame_pop_service( this );
- mlt_properties properties = MLT_FRAME_PROPERTIES( this );
- int output_format = *format;
- mlt_image_format forced = mlt_properties_get_int( MLT_FILTER_PROPERTIES( filter ), "forced" );
+ mlt_properties properties = MLT_FRAME_PROPERTIES( frame );
+ int width = mlt_properties_get_int( properties, "width" );
+ int height = mlt_properties_get_int( properties, "height" );
int error = 0;
- // Allow this filter to force processing in a colour space other than requested
- *format = forced != 0 ? forced : *format;
-
- error = mlt_frame_get_image( this, image, format, width, height, 0 );
-
- if ( error == 0 && *format != output_format && *width > 0 && *height > 0 )
+ if ( *format != output_format )
{
+ mlt_log_debug( NULL, "[filter avcolor_space] %s -> %s @ %dx%d\n",
+ mlt_image_format_name( *format ), mlt_image_format_name( output_format ),
+ width, height );
+
int in_fmt = convert_mlt_to_av_cs( *format );
int out_fmt = convert_mlt_to_av_cs( output_format );
- int size = avpicture_get_size( out_fmt, *width, *height );
+ int size = avpicture_get_size( out_fmt, width, height );
uint8_t *output = mlt_pool_alloc( size );
- convert_image( output, *image, out_fmt, in_fmt, *width, *height );
+
+ if ( *format == mlt_image_rgb24a || *format == mlt_image_opengl )
+ {
+ register int len = width * height;
+ uint8_t *alpha = mlt_pool_alloc( len );
+
+ if ( alpha )
+ {
+ // Extract the alpha mask from the RGBA image using Duff's Device
+ register uint8_t *s = *image + 3; // start on the alpha component
+ register uint8_t *d = alpha;
+ register int n = ( len + 7 ) / 8;
+
+ switch ( len % 8 )
+ {
+ case 0: do { *d++ = *s; s += 4;
+ case 7: *d++ = *s; s += 4;
+ case 6: *d++ = *s; s += 4;
+ case 5: *d++ = *s; s += 4;
+ case 4: *d++ = *s; s += 4;
+ case 3: *d++ = *s; s += 4;
+ case 2: *d++ = *s; s += 4;
+ case 1: *d++ = *s; s += 4;
+ }
+ while ( --n > 0 );
+ }
+ mlt_properties_set_data( properties, "alpha", alpha, len, mlt_pool_release, NULL );
+ frame->get_alpha_mask = NULL;
+ }
+ }
+
+ // Update the output
+ int is_709 = output_format == mlt_image_yuv422 && width * height > 750000;
+ enum luma_scale luma = LUMA_SCALE_AUTO;
+ av_convert_image( output, *image, out_fmt, in_fmt, width, height, is_709, luma );
*image = output;
*format = output_format;
mlt_properties_set_data( properties, "image", output, size, mlt_pool_release, NULL );
mlt_properties_set_int( properties, "format", output_format );
+
+ if ( output_format == mlt_image_rgb24a || output_format == mlt_image_opengl )
+ {
+ register int len = width * height;
+ int alpha_size = 0;
+ uint8_t *alpha = mlt_frame_get_alpha_mask( frame );
+ mlt_properties_get_data( properties, "alpha", &alpha_size );
+
+ if ( alpha && alpha_size >= len )
+ {
+ // Merge the alpha mask from into the RGBA image using Duff's Device
+ register uint8_t *s = alpha;
+ register uint8_t *d = *image + 3; // start on the alpha component
+ register int n = ( len + 7 ) / 8;
+
+ switch ( len % 8 )
+ {
+ case 0: do { *d = *s++; d += 4;
+ case 7: *d = *s++; d += 4;
+ case 6: *d = *s++; d += 4;
+ case 5: *d = *s++; d += 4;
+ case 4: *d = *s++; d += 4;
+ case 3: *d = *s++; d += 4;
+ case 2: *d = *s++; d += 4;
+ case 1: *d = *s++; d += 4;
+ }
+ while ( --n > 0 );
+ }
+ }
+ }
}
return error;
}
static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
{
- mlt_frame_push_service( frame, this );
- mlt_frame_push_get_image( frame, filter_get_image );
+ frame->convert_image = convert_image;
return frame;
}
mlt_filter filter_avcolour_space_init( void *arg )
{
+#ifdef SWSCALE
+#if (LIBSWSCALE_VERSION_INT >= ((0<<16)+(7<<8)+2))
+ // Test to see if swscale accepts the arg as resolution
+ if ( arg )
+ {
+ int width = (int) arg;
+ struct SwsContext *context = sws_getContext( width, width, PIX_FMT_RGB32, 64, 64, PIX_FMT_RGB32, SWS_BILINEAR, NULL, NULL, NULL);
+ if ( context )
+ sws_freeContext( context );
+ else
+ return NULL;
+ }
+#else
+ return NULL;
+#endif
+#endif
mlt_filter this = mlt_filter_new( );
if ( this != NULL )
this->process = filter_process;