]> git.sesse.net Git - mlt/blob - src/modules/avformat/filter_avcolour_space.c
Enable swscale CPU flags.
[mlt] / src / modules / avformat / filter_avcolour_space.c
1 /*
2  * filter_avcolour_space.c -- Colour space filter
3  * Copyright (C) 2004-2005 Ushodaya Enterprises Limited
4  * Author: Charles Yates <charles.yates@pandora.be>
5  *
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.
10  *
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.
15  *
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
19  */
20
21 #include <framework/mlt_filter.h>
22 #include <framework/mlt_frame.h>
23 #include <framework/mlt_log.h>
24
25 // ffmpeg Header files
26 #include <avformat.h>
27 #ifdef SWSCALE
28 #include <swscale.h>
29 #endif
30
31 #if LIBAVUTIL_VERSION_INT < (50<<16)
32 #define PIX_FMT_YUYV422 PIX_FMT_YUV422
33 #endif
34
35 #include <stdio.h>
36 #include <stdlib.h>
37
38 #if 0 // This test might come in handy elsewhere someday.
39 static int is_big_endian( )
40 {
41         union { int i; char c[ 4 ]; } big_endian_test;
42         big_endian_test.i = 1;
43
44         return big_endian_test.c[ 0 ] != 1;
45 }
46 #endif
47
48 static int convert_mlt_to_av_cs( mlt_image_format format )
49 {
50         int value = 0;
51
52         switch( format )
53         {
54                 case mlt_image_rgb24:
55                         value = PIX_FMT_RGB24;
56                         break;
57                 case mlt_image_rgb24a:
58                 case mlt_image_opengl:
59                         value = PIX_FMT_RGBA;
60                         break;
61                 case mlt_image_yuv422:
62                         value = PIX_FMT_YUYV422;
63                         break;
64                 case mlt_image_yuv420p:
65                         value = PIX_FMT_YUV420P;
66                         break;
67                 case mlt_image_none:
68                         mlt_log_error( NULL, "[filter avcolor_space] Invalid format\n" );
69                         break;
70         }
71
72         return value;
73 }
74
75 static void av_convert_image( uint8_t *out, uint8_t *in, int out_fmt, int in_fmt, int width, int height )
76 {
77         AVPicture input;
78         AVPicture output;
79         int flags = SWS_BILINEAR | SWS_ACCURATE_RND;
80
81         if ( out_fmt == PIX_FMT_YUYV422 )
82                 flags |= SWS_FULL_CHR_H_INP;
83         else
84                 flags |= SWS_FULL_CHR_H_INT;
85 #ifdef USE_MMX
86                 flags |= SWS_CPU_CAPS_MMX;
87 #endif
88 #ifdef USE_SSE
89                 flags |= SWS_CPU_CAPS_MMX2;
90 #endif
91
92         avpicture_fill( &input, in, in_fmt, width, height );
93         avpicture_fill( &output, out, out_fmt, width, height );
94 #ifdef SWSCALE
95         struct SwsContext *context = sws_getContext( width, height, in_fmt,
96                 width, height, out_fmt, flags, NULL, NULL, NULL);
97         sws_scale( context, input.data, input.linesize, 0, height,
98                 output.data, output.linesize);
99         sws_freeContext( context );
100 #else
101         img_convert( &output, out_fmt, &input, in_fmt, width, height );
102 #endif
103 }
104
105 /** Do it :-).
106 */
107
108 static int convert_image( mlt_frame frame, uint8_t **image, mlt_image_format *format, mlt_image_format output_format )
109 {
110         mlt_properties properties = MLT_FRAME_PROPERTIES( frame );
111         int width = mlt_properties_get_int( properties, "width" );
112         int height = mlt_properties_get_int( properties, "height" );
113         int error = 0;
114
115         if ( *format != output_format )
116         {
117                 mlt_log_debug( NULL, "[filter avcolor_space] %s -> %s\n",
118                         mlt_image_format_name( *format ), mlt_image_format_name( output_format ) );
119
120                 int in_fmt = convert_mlt_to_av_cs( *format );
121                 int out_fmt = convert_mlt_to_av_cs( output_format );
122                 int size = avpicture_get_size( out_fmt, width, height );
123                 uint8_t *output = mlt_pool_alloc( size );
124
125                 if ( *format == mlt_image_rgb24a || *format == mlt_image_opengl )
126                 {
127                         register int len = width * height;
128                         uint8_t *alpha = mlt_pool_alloc( len );
129
130                         if ( alpha )
131                         {
132                                 // Extract the alpha mask from the RGBA image using Duff's Device
133                                 register uint8_t *s = *image + 3; // start on the alpha component
134                                 register uint8_t *d = alpha;
135                                 register int n = ( len + 7 ) / 8;
136
137                                 switch ( len % 8 )
138                                 {
139                                         case 0: do { *d++ = *s; s += 4;
140                                         case 7:          *d++ = *s; s += 4;
141                                         case 6:          *d++ = *s; s += 4;
142                                         case 5:          *d++ = *s; s += 4;
143                                         case 4:          *d++ = *s; s += 4;
144                                         case 3:          *d++ = *s; s += 4;
145                                         case 2:          *d++ = *s; s += 4;
146                                         case 1:          *d++ = *s; s += 4;
147                                                         }
148                                                         while ( --n > 0 );
149                                 }
150                                 mlt_properties_set_data( properties, "alpha", alpha, len, mlt_pool_release, NULL );
151                                 frame->get_alpha_mask = NULL;
152                         }
153                 }
154
155                 // Update the output
156                 av_convert_image( output, *image, out_fmt, in_fmt, width, height );
157                 *image = output;
158                 *format = output_format;
159                 mlt_properties_set_data( properties, "image", output, size, mlt_pool_release, NULL );
160                 mlt_properties_set_int( properties, "format", output_format );
161         }
162         return error;
163 }
164
165 /** Filter processing.
166 */
167
168 static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
169 {
170         frame->convert_image = convert_image;
171         return frame;
172 }
173
174 /** Constructor for the filter.
175 */
176
177 mlt_filter filter_avcolour_space_init( void *arg )
178 {
179 #if (LIBSWSCALE_VERSION_INT >= ((0<<16)+(7<<8)+2))
180         // Test to see if swscale accepts the arg as resolution
181         if ( arg )
182         {
183                 int width = (int) arg;
184                 struct SwsContext *context = sws_getContext( width, width, PIX_FMT_RGB32, 64, 64, PIX_FMT_RGB32, SWS_BILINEAR, NULL, NULL, NULL);
185                 if ( context )
186                         sws_freeContext( context );
187                 else
188                         return NULL;
189         }               
190
191         mlt_filter this = mlt_filter_new( );
192         if ( this != NULL )
193                 this->process = filter_process;
194         return this;
195 #else
196         return NULL;
197 #endif
198 }
199