]> git.sesse.net Git - mlt/blob - src/modules/avformat/filter_avcolour_space.c
Add resolution as init arg to libswscale filters.
[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         avpicture_fill( &input, in, in_fmt, width, height );
80         avpicture_fill( &output, out, out_fmt, width, height );
81 #ifdef SWSCALE
82         struct SwsContext *context = sws_getContext( width, height, in_fmt,
83                 width, height, out_fmt, SWS_FAST_BILINEAR, NULL, NULL, NULL);
84         sws_scale( context, input.data, input.linesize, 0, height,
85                 output.data, output.linesize);
86         sws_freeContext( context );
87 #else
88         img_convert( &output, out_fmt, &input, in_fmt, width, height );
89 #endif
90 }
91
92 /** Do it :-).
93 */
94
95 static int convert_image( mlt_frame frame, uint8_t **image, mlt_image_format *format, mlt_image_format output_format )
96 {
97         mlt_properties properties = MLT_FRAME_PROPERTIES( frame );
98         int width = mlt_properties_get_int( properties, "width" );
99         int height = mlt_properties_get_int( properties, "height" );
100         int error = 0;
101
102         if ( *format != output_format )
103         {
104                 mlt_log_debug( NULL, "[filter avcolor_space] %s -> %s\n",
105                         mlt_image_format_name( *format ), mlt_image_format_name( output_format ) );
106
107                 int in_fmt = convert_mlt_to_av_cs( *format );
108                 int out_fmt = convert_mlt_to_av_cs( output_format );
109                 int size = avpicture_get_size( out_fmt, width, height );
110                 uint8_t *output = mlt_pool_alloc( size );
111
112                 if ( *format == mlt_image_rgb24a || *format == mlt_image_opengl )
113                 {
114                         register int len = width * height;
115                         uint8_t *alpha = mlt_pool_alloc( len );
116
117                         if ( alpha )
118                         {
119                                 // Extract the alpha mask from the RGBA image using Duff's Device
120                                 register uint8_t *s = *image + 3; // start on the alpha component
121                                 register uint8_t *d = alpha;
122                                 register int n = ( len + 7 ) / 8;
123
124                                 switch ( len % 8 )
125                                 {
126                                         case 0: do { *d++ = *s; s += 4;
127                                         case 7:          *d++ = *s; s += 4;
128                                         case 6:          *d++ = *s; s += 4;
129                                         case 5:          *d++ = *s; s += 4;
130                                         case 4:          *d++ = *s; s += 4;
131                                         case 3:          *d++ = *s; s += 4;
132                                         case 2:          *d++ = *s; s += 4;
133                                         case 1:          *d++ = *s; s += 4;
134                                                         }
135                                                         while ( --n > 0 );
136                                 }
137                                 mlt_properties_set_data( properties, "alpha", alpha, len, mlt_pool_release, NULL );
138                                 frame->get_alpha_mask = NULL;
139                         }
140                 }
141
142                 // Update the output
143                 av_convert_image( output, *image, out_fmt, in_fmt, width, height );
144                 *image = output;
145                 *format = output_format;
146                 mlt_properties_set_data( properties, "image", output, size, mlt_pool_release, NULL );
147                 mlt_properties_set_int( properties, "format", output_format );
148         }
149         return error;
150 }
151
152 /** Filter processing.
153 */
154
155 static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
156 {
157         frame->convert_image = convert_image;
158         return frame;
159 }
160
161 /** Constructor for the filter.
162 */
163
164 mlt_filter filter_avcolour_space_init( void *arg )
165 {
166         // Test to see if swscale accepts the arg as resolution
167         if ( arg )
168         {
169                 int width = (int) arg;
170                 struct SwsContext *context = sws_getContext( width, width, PIX_FMT_RGB32, 64, 64, PIX_FMT_RGB32, SWS_BILINEAR, NULL, NULL, NULL);
171                 if ( context )
172                         sws_freeContext( context );
173                 else
174                         return NULL;
175         }               
176
177         mlt_filter this = mlt_filter_new( );
178         if ( this != NULL )
179                 this->process = filter_process;
180         return this;
181 }
182