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 *****************************************************************************/
35 #include "vlc_filter.h"
37 #include <math.h> /* exp(), sqrt() */
39 /*****************************************************************************
41 *****************************************************************************/
42 static int Create ( vlc_object_t * );
43 static void Destroy ( vlc_object_t * );
45 static picture_t *Filter( filter_t *, picture_t * );
47 #define SIGMA_TEXT N_("Gaussian's std deviation")
48 #define SIGMA_LONGTEXT N_( \
49 "Gaussian's standard deviation. The bluring will take " \
50 "into account pixels up to 3*sigma away in any direction.")
52 #define FILTER_PREFIX "gaussianblur-"
54 /*****************************************************************************
56 *****************************************************************************/
58 set_description( _("Gaussian blur video filter") );
59 set_shortname( _( "Gaussian Blur" ));
60 set_capability( "video filter2", 0 );
61 set_category( CAT_VIDEO );
62 set_subcategory( SUBCAT_VIDEO_VFILTER );
64 add_float( FILTER_PREFIX "sigma", 2., NULL, SIGMA_TEXT, SIGMA_LONGTEXT,
67 set_callbacks( Create, Destroy );
70 static const char *ppsz_filter_options[] = {
74 /* Comment this to use floats instead of integers (faster for bigger sigma
76 * For sigma = 2 ints are faster
77 * For sigma = 4 floats are faster
79 #define DONT_USE_FLOATS
84 #ifdef DONT_USE_FLOATS
89 float *pf_distribution;
95 static void gaussianblur_InitDistribution( filter_sys_t *p_sys )
97 double f_sigma = p_sys->f_sigma;
98 int i_dim = (int)(3.*f_sigma);
99 #ifdef DONT_USE_FLOATS
100 int *pi_distribution = (int*)malloc( (2*i_dim+1) * sizeof( int ) );
102 float *pf_distribution = (float*)malloc( (2*i_dim+1) * sizeof( float ) );
105 for( x = -i_dim; x <= i_dim; x++ )
107 #ifdef DONT_USE_FLOATS
108 pi_distribution[i_dim+x] =
109 (int)( sqrt( exp(-(x*x)/(f_sigma*f_sigma) )
110 / (2.*M_PI*f_sigma*f_sigma) ) * (double)(1<<8) );
111 printf("%d\n",pi_distribution[i_dim+x]);
113 pf_distribution[i_dim+x] = (float)
114 sqrt( exp(-(x*x)/(f_sigma*f_sigma) ) / (2.*M_PI*f_sigma*f_sigma) );
115 printf("%f\n",pf_distribution[i_dim+x]);
118 p_sys->i_dim = i_dim;
119 #ifdef DONT_USE_FLOATS
120 p_sys->pi_distribution = pi_distribution;
122 p_sys->pf_distribution = pf_distribution;
126 static int Create( vlc_object_t *p_this )
128 filter_t *p_filter = (filter_t *)p_this;
130 if( p_filter->fmt_in.video.i_chroma != VLC_FOURCC('I','4','2','0')
131 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('I','Y','U','V')
132 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('J','4','2','0')
133 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('Y','V','1','2')
135 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('I','4','2','2')
136 && p_filter->fmt_in.video.i_chroma != VLC_FOURCC('J','4','2','2')
139 /* We only want planar YUV 4:2:0 or 4:2:2 */
140 msg_Err( p_filter, "Unsupported input chroma (%4s)",
141 (char*)&(p_filter->fmt_in.video.i_chroma) );
145 if( p_filter->fmt_in.video.i_chroma != p_filter->fmt_out.video.i_chroma )
147 msg_Err( p_filter, "Input and output chromas don't match" );
151 p_filter->p_sys = malloc( sizeof( filter_sys_t ) );
152 if( p_filter->p_sys == NULL )
154 msg_Err( p_filter, "out of memory" );
158 config_ChainParse( p_filter, FILTER_PREFIX, ppsz_filter_options,
161 p_filter->pf_video_filter = Filter;
163 p_filter->p_sys->f_sigma =
164 var_CreateGetFloat( p_filter, FILTER_PREFIX "sigma" );
165 if( p_filter->p_sys->f_sigma <= 0. )
167 msg_Err( p_filter, "sigma must be positive" );
170 gaussianblur_InitDistribution( p_filter->p_sys );
171 msg_Dbg( p_filter, "gaussian distribution is %d pixels wide",
172 p_filter->p_sys->i_dim*2+1 );
173 #ifdef DONT_USE_FLOATS
174 p_filter->p_sys->pi_buffer = NULL;
175 p_filter->p_sys->pi_scale = NULL;
177 p_filter->p_sys->pf_buffer = NULL;
178 p_filter->p_sys->pf_scale = NULL;
184 static void Destroy( vlc_object_t *p_this )
186 filter_t *p_filter = (filter_t *)p_this;
187 #ifdef DONT_USE_FLOATS
188 free( p_filter->p_sys->pi_distribution );
189 free( p_filter->p_sys->pi_buffer );
190 free( p_filter->p_sys->pi_scale );
192 free( p_filter->p_sys->pf_distribution );
193 free( p_filter->p_sys->pf_buffer );
194 free( p_filter->p_sys->pf_scale );
196 free( p_filter->p_sys );
199 static picture_t *Filter( filter_t *p_filter, picture_t *p_pic )
202 filter_sys_t *p_sys = p_filter->p_sys;
204 const int i_dim = p_sys->i_dim;
205 #ifdef DONT_USE_FLOATS
208 const int *pi_distribution = p_sys->pi_distribution;
212 const float *pf_distribution = p_sys->pf_distribution;
214 if( !p_pic ) return NULL;
216 p_outpic = p_filter->pf_vout_buffer_new( p_filter );
219 msg_Warn( p_filter, "can't get output picture" );
220 if( p_pic->pf_release )
221 p_pic->pf_release( p_pic );
224 #ifdef DONT_USE_FLOATS
225 if( !p_sys->pi_buffer )
227 p_sys->pi_buffer = (int*)realloc( p_sys->pi_buffer,
228 p_pic->p[Y_PLANE].i_visible_lines
229 * p_pic->p[Y_PLANE].i_pitch
232 pi_buffer = p_sys->pi_buffer;
234 if( !p_sys->pf_buffer )
236 p_sys->pf_buffer = (float*)realloc( p_sys->pf_buffer,
237 p_pic->p[Y_PLANE].i_visible_lines
238 * p_pic->p[Y_PLANE].i_pitch
241 pf_buffer = p_sys->pf_buffer;
243 #ifdef DONT_USE_FLOATS
244 if( !p_sys->pi_scale )
246 if( !p_sys->pf_scale )
249 const int i_visible_lines = p_pic->p[Y_PLANE].i_visible_lines;
250 const int i_visible_pitch = p_pic->p[Y_PLANE].i_visible_pitch;
251 const int i_pitch = p_pic->p[Y_PLANE].i_pitch;
253 #ifdef DONT_USE_FLOATS
254 p_sys->pi_scale = (int*)malloc( i_visible_lines * i_pitch
256 pi_scale = p_sys->pi_scale;
258 p_sys->pf_scale = (float*)malloc( i_visible_lines * i_pitch
260 pf_scale = p_sys->pf_scale;
262 for( i_line = 0 ; i_line < i_visible_lines ; i_line++ )
264 for( i_col = 0; i_col < i_visible_pitch ; i_col++ )
267 #ifdef DONT_USE_FLOATS
272 for( y = __MAX( -i_dim, -i_line );
273 y <= __MIN( i_dim, i_visible_lines - i_line - 1 );
276 for( x = __MAX( -i_dim, -i_col );
277 x <= __MIN( i_dim, i_visible_pitch - i_col + 1 );
280 #ifdef DONT_USE_FLOATS
281 value += pi_distribution[y+i_dim]
282 * pi_distribution[x+i_dim];
284 value += ((double)pf_distribution[y+i_dim])
285 * ((double)pf_distribution[x+i_dim]);
289 #ifdef DONT_USE_FLOATS
290 pi_scale[i_line*i_pitch+i_col] = value;
292 pf_scale[i_line*i_pitch+i_col] = (float)(1./value);
297 #ifdef DONT_USE_FLOATS
298 pi_scale = p_sys->pi_scale;
300 pf_scale = p_sys->pf_scale;
303 for( i_plane = 0 ; i_plane < p_pic->i_planes ; i_plane++ )
306 uint8_t *p_in = p_pic->p[i_plane].p_pixels;
307 uint8_t *p_out = p_outpic->p[i_plane].p_pixels;
309 const int i_visible_lines = p_pic->p[i_plane].i_visible_lines;
310 const int i_visible_pitch = p_pic->p[i_plane].i_visible_pitch;
311 const int i_pitch = p_pic->p[i_plane].i_pitch;
314 const int x_factor = p_pic->p[Y_PLANE].i_visible_pitch/i_visible_pitch-1;
315 const int y_factor = p_pic->p[Y_PLANE].i_visible_lines/i_visible_lines-1;
317 for( i_line = 0 ; i_line < i_visible_lines ; i_line++ )
319 for( i_col = 0; i_col < i_visible_pitch ; i_col++ )
321 #ifdef DONT_USE_FLOATS
327 const int c = i_line*i_pitch+i_col;
328 for( x = __MAX( -i_dim, -i_col*(x_factor+1) );
329 x <= __MIN( i_dim, (i_visible_pitch - i_col)*(x_factor+1) + 1 );
332 #ifdef DONT_USE_FLOATS
333 value += pi_distribution[x+i_dim]
334 * p_in[c+(x>>x_factor)];
336 value += pf_distribution[x+i_dim]
337 * (float)p_in[c+(x>>x_factor)];
340 #ifdef DONT_USE_FLOATS
341 pi_buffer[c] = value;
343 pf_buffer[c] = value;
347 for( i_line = 0 ; i_line < i_visible_lines ; i_line++ )
349 for( i_col = 0; i_col < i_visible_pitch ; i_col++ )
351 #ifdef DONT_USE_FLOATS
357 const int c = i_line*i_pitch+i_col;
358 for( y = __MAX( -i_dim, (-i_line)*(y_factor+1) );
359 y <= __MIN( i_dim, (i_visible_lines - i_line)*(y_factor+1) - 1 );
362 #ifdef DONT_USE_FLOATS
363 value += pi_distribution[y+i_dim]
364 * pi_buffer[c+(y>>y_factor)*i_pitch];
366 value += pf_distribution[y+i_dim]
367 * pf_buffer[c+(y>>y_factor)*i_pitch];
370 #ifdef DONT_USE_FLOATS
371 p_out[c] = (uint8_t)(value/pi_scale[(i_line<<y_factor)*(i_pitch<<x_factor)+(i_col<<x_factor)]);
373 p_out[c] = (uint8_t)(value*pf_scale[(i_line<<y_factor)*(i_pitch<<x_factor)+(i_col<<x_factor)]);
379 p_outpic->date = p_pic->date;
380 p_outpic->b_force = p_pic->b_force;
381 p_outpic->i_nb_fields = p_pic->i_nb_fields;
382 p_outpic->b_progressive = p_pic->b_progressive;
383 p_outpic->b_top_field_first = p_pic->b_top_field_first;
385 if( p_pic->pf_release )
386 p_pic->pf_release( p_pic );