1 /*****************************************************************************
2 * gaussianblur.c : gaussian blur video filter
3 *****************************************************************************
4 * Copyright (C) 2000-2007 the VideoLAN team
7 * Authors: Antoine Cellerier <dionoea -at- videolan -dot- org>
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22 *****************************************************************************/
24 /*****************************************************************************
26 *****************************************************************************/
31 #include "vlc_filter.h"
33 #include <math.h> /* exp(), sqrt() */
35 /*****************************************************************************
37 *****************************************************************************/
38 static int Create ( vlc_object_t * );
39 static void Destroy ( vlc_object_t * );
41 static picture_t *Filter( filter_t *, picture_t * );
43 #define SIGMA_TEXT N_("Gaussian's std deviation")
44 #define SIGMA_LONGTEXT N_( \
45 "Gaussian's standard deviation. The bluring will take " \
46 "into account pixels up to 3*sigma away in any direction.")
48 #define FILTER_PREFIX "gaussianblur-"
50 /*****************************************************************************
52 *****************************************************************************/
54 set_description( _("Gaussian blur video filter") );
55 set_shortname( _( "Gaussian Blur" ));
56 set_capability( "video filter2", 0 );
57 set_category( CAT_VIDEO );
58 set_subcategory( SUBCAT_VIDEO_VFILTER );
60 add_float( FILTER_PREFIX "sigma", 2., NULL, SIGMA_TEXT, SIGMA_LONGTEXT,
63 set_callbacks( Create, Destroy );
66 static const char *ppsz_filter_options[] = {
70 /* Comment this to use floats instead of integers (faster for bigger sigma
72 * For sigma = 2 ints are faster
73 * For sigma = 4 floats are faster
75 #define DONT_USE_FLOATS
80 #ifdef DONT_USE_FLOATS
85 float *pf_distribution;
91 static void gaussianblur_InitDistribution( filter_sys_t *p_sys )
93 double f_sigma = p_sys->f_sigma;
94 int i_dim = (int)(3.*f_sigma);
95 #ifdef DONT_USE_FLOATS
96 int *pi_distribution = (int*)malloc( (2*i_dim+1) * sizeof( int ) );
98 float *pf_distribution = (float*)malloc( (2*i_dim+1) * sizeof( float ) );
101 for( x = -i_dim; x <= i_dim; x++ )
103 #ifdef DONT_USE_FLOATS
104 pi_distribution[i_dim+x] =
105 (int)( sqrt( exp(-(x*x)/(f_sigma*f_sigma) )
106 / (2.*M_PI*f_sigma*f_sigma) ) * (double)(1<<8) );
107 printf("%d\n",pi_distribution[i_dim+x]);
109 pf_distribution[i_dim+x] = (float)
110 sqrt( exp(-(x*x)/(f_sigma*f_sigma) ) / (2.*M_PI*f_sigma*f_sigma) );
111 printf("%f\n",pf_distribution[i_dim+x]);
114 p_sys->i_dim = i_dim;
115 #ifdef DONT_USE_FLOATS
116 p_sys->pi_distribution = pi_distribution;
118 p_sys->pf_distribution = pf_distribution;
122 static int Create( vlc_object_t *p_this )
124 filter_t *p_filter = (filter_t *)p_this;
126 if( p_filter->fmt_in.video.i_chroma != VLC_FOURCC('I','4','2','0')
127 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('I','Y','U','V')
128 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('J','4','2','0')
129 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('Y','V','1','2')
131 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('I','4','2','2')
132 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('J','4','2','2')
135 /* We only want planar YUV 4:2:0 or 4:2:2 */
136 msg_Err( p_filter, "Unsupported input chroma (%4s)",
137 (char*)&(p_filter->fmt_in.video.i_chroma) );
141 if( p_filter->fmt_in.video.i_chroma != p_filter->fmt_out.video.i_chroma )
143 msg_Err( p_filter, "Input and output chromas don't match" );
147 p_filter->p_sys = malloc( sizeof( filter_sys_t ) );
148 if( p_filter->p_sys == NULL )
150 msg_Err( p_filter, "out of memory" );
154 config_ChainParse( p_filter, FILTER_PREFIX, ppsz_filter_options,
157 p_filter->pf_video_filter = Filter;
159 p_filter->p_sys->f_sigma =
160 var_CreateGetFloat( p_filter, FILTER_PREFIX "sigma" );
161 if( p_filter->p_sys->f_sigma <= 0. )
163 msg_Err( p_filter, "sigma must be positive" );
166 gaussianblur_InitDistribution( p_filter->p_sys );
167 msg_Dbg( p_filter, "gaussian distribution is %d pixels wide",
168 p_filter->p_sys->i_dim*2+1 );
169 #ifdef DONT_USE_FLOATS
170 p_filter->p_sys->pi_buffer = NULL;
171 p_filter->p_sys->pi_scale = NULL;
173 p_filter->p_sys->pf_buffer = NULL;
174 p_filter->p_sys->pf_scale = NULL;
180 static void Destroy( vlc_object_t *p_this )
182 filter_t *p_filter = (filter_t *)p_this;
183 #ifdef DONT_USE_FLOATS
184 free( p_filter->p_sys->pi_distribution );
185 free( p_filter->p_sys->pi_buffer );
186 free( p_filter->p_sys->pi_scale );
188 free( p_filter->p_sys->pf_distribution );
189 free( p_filter->p_sys->pf_buffer );
190 free( p_filter->p_sys->pf_scale );
192 free( p_filter->p_sys );
195 static picture_t *Filter( filter_t *p_filter, picture_t *p_pic )
198 filter_sys_t *p_sys = p_filter->p_sys;
200 const int i_dim = p_sys->i_dim;
201 #ifdef DONT_USE_FLOATS
204 const int *pi_distribution = p_sys->pi_distribution;
208 const float *pf_distribution = p_sys->pf_distribution;
210 if( !p_pic ) return NULL;
212 p_outpic = p_filter->pf_vout_buffer_new( p_filter );
215 msg_Warn( p_filter, "can't get output picture" );
216 if( p_pic->pf_release )
217 p_pic->pf_release( p_pic );
220 #ifdef DONT_USE_FLOATS
221 if( !p_sys->pi_buffer )
223 p_sys->pi_buffer = (int*)realloc( p_sys->pi_buffer,
224 p_pic->p[Y_PLANE].i_visible_lines
225 * p_pic->p[Y_PLANE].i_pitch
228 pi_buffer = p_sys->pi_buffer;
230 if( !p_sys->pf_buffer )
232 p_sys->pf_buffer = (float*)realloc( p_sys->pf_buffer,
233 p_pic->p[Y_PLANE].i_visible_lines
234 * p_pic->p[Y_PLANE].i_pitch
237 pf_buffer = p_sys->pf_buffer;
239 #ifdef DONT_USE_FLOATS
240 if( !p_sys->pi_scale )
242 if( !p_sys->pf_scale )
245 const int i_visible_lines = p_pic->p[Y_PLANE].i_visible_lines;
246 const int i_visible_pitch = p_pic->p[Y_PLANE].i_visible_pitch;
247 const int i_pitch = p_pic->p[Y_PLANE].i_pitch;
249 #ifdef DONT_USE_FLOATS
250 p_sys->pi_scale = (int*)malloc( i_visible_lines * i_pitch
252 pi_scale = p_sys->pi_scale;
254 p_sys->pf_scale = (float*)malloc( i_visible_lines * i_pitch
256 pf_scale = p_sys->pf_scale;
258 for( i_line = 0 ; i_line < i_visible_lines ; i_line++ )
260 for( i_col = 0; i_col < i_visible_pitch ; i_col++ )
263 #ifdef DONT_USE_FLOATS
268 for( y = __MAX( -i_dim, -i_line );
269 y <= __MIN( i_dim, i_visible_lines - i_line - 1 );
272 for( x = __MAX( -i_dim, -i_col );
273 x <= __MIN( i_dim, i_visible_pitch - i_col + 1 );
276 #ifdef DONT_USE_FLOATS
277 value += pi_distribution[y+i_dim]
278 * pi_distribution[x+i_dim];
280 value += ((double)pf_distribution[y+i_dim])
281 * ((double)pf_distribution[x+i_dim]);
285 #ifdef DONT_USE_FLOATS
286 pi_scale[i_line*i_pitch+i_col] = value;
288 pf_scale[i_line*i_pitch+i_col] = (float)(1./value);
293 #ifdef DONT_USE_FLOATS
294 pi_scale = p_sys->pi_scale;
296 pf_scale = p_sys->pf_scale;
299 for( i_plane = 0 ; i_plane < p_pic->i_planes ; i_plane++ )
302 uint8_t *p_in = p_pic->p[i_plane].p_pixels;
303 uint8_t *p_out = p_outpic->p[i_plane].p_pixels;
305 const int i_visible_lines = p_pic->p[i_plane].i_visible_lines;
306 const int i_visible_pitch = p_pic->p[i_plane].i_visible_pitch;
307 const int i_pitch = p_pic->p[i_plane].i_pitch;
310 const int x_factor = p_pic->p[Y_PLANE].i_visible_pitch/i_visible_pitch-1;
311 const int y_factor = p_pic->p[Y_PLANE].i_visible_lines/i_visible_lines-1;
313 for( i_line = 0 ; i_line < i_visible_lines ; i_line++ )
315 for( i_col = 0; i_col < i_visible_pitch ; i_col++ )
317 #ifdef DONT_USE_FLOATS
323 const int c = i_line*i_pitch+i_col;
324 for( x = __MAX( -i_dim, -i_col*(x_factor+1) );
325 x <= __MIN( i_dim, (i_visible_pitch - i_col)*(x_factor+1) + 1 );
328 #ifdef DONT_USE_FLOATS
329 value += pi_distribution[x+i_dim]
330 * p_in[c+(x>>x_factor)];
332 value += pf_distribution[x+i_dim]
333 * (float)p_in[c+(x>>x_factor)];
336 #ifdef DONT_USE_FLOATS
337 pi_buffer[c] = value;
339 pf_buffer[c] = value;
343 for( i_line = 0 ; i_line < i_visible_lines ; i_line++ )
345 for( i_col = 0; i_col < i_visible_pitch ; i_col++ )
347 #ifdef DONT_USE_FLOATS
353 const int c = i_line*i_pitch+i_col;
354 for( y = __MAX( -i_dim, (-i_line)*(y_factor+1) );
355 y <= __MIN( i_dim, (i_visible_lines - i_line)*(y_factor+1) - 1 );
358 #ifdef DONT_USE_FLOATS
359 value += pi_distribution[y+i_dim]
360 * pi_buffer[c+(y>>y_factor)*i_pitch];
362 value += pf_distribution[y+i_dim]
363 * pf_buffer[c+(y>>y_factor)*i_pitch];
366 #ifdef DONT_USE_FLOATS
367 p_out[c] = (uint8_t)(value/pi_scale[(i_line<<y_factor)*(i_pitch<<x_factor)+(i_col<<x_factor)]);
369 p_out[c] = (uint8_t)(value*pf_scale[(i_line<<y_factor)*(i_pitch<<x_factor)+(i_col<<x_factor)]);
375 p_outpic->date = p_pic->date;
376 p_outpic->b_force = p_pic->b_force;
377 p_outpic->i_nb_fields = p_pic->i_nb_fields;
378 p_outpic->b_progressive = p_pic->b_progressive;
379 p_outpic->b_top_field_first = p_pic->b_top_field_first;
381 if( p_pic->pf_release )
382 p_pic->pf_release( p_pic );