1 /*****************************************************************************
2 * swscale.c: scaling and chroma conversion using libswscale
3 *****************************************************************************
4 * Copyright (C) 1999-2008 the VideoLAN team
7 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8 * Gildas Bazin <gbazin@videolan.org>
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23 *****************************************************************************/
25 /*****************************************************************************
27 *****************************************************************************/
32 #include <vlc_common.h>
33 #include <vlc_plugin.h>
35 #include <vlc_filter.h>
37 #ifdef HAVE_LIBSWSCALE_SWSCALE_H
38 # include <libswscale/swscale.h>
39 #elif defined(HAVE_FFMPEG_SWSCALE_H)
40 # include <ffmpeg/swscale.h>
43 /* Gruikkkkkkkkkk!!!!! */
44 #include "../codec/avcodec/chroma.h"
46 /*****************************************************************************
48 *****************************************************************************/
49 static int OpenScaler( vlc_object_t * );
50 static void CloseScaler( vlc_object_t * );
52 #define SCALEMODE_TEXT N_("Scaling mode")
53 #define SCALEMODE_LONGTEXT N_("Scaling mode to use.")
55 static const int pi_mode_values[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 };
56 const char *const ppsz_mode_descriptions[] =
57 { N_("Fast bilinear"), N_("Bilinear"), N_("Bicubic (good quality)"),
58 N_("Experimental"), N_("Nearest neighbour (bad quality)"),
59 N_("Area"), N_("Luma bicubic / chroma bilinear"), N_("Gauss"),
60 N_("SincR"), N_("Lanczos"), N_("Bicubic spline") };
63 set_description( N_("Video scaling filter") );
64 set_capability( "video filter2", 150 );
65 set_category( CAT_VIDEO );
66 set_subcategory( SUBCAT_VIDEO_VFILTER );
67 set_callbacks( OpenScaler, CloseScaler );
68 add_integer( "swscale-mode", 2, NULL, SCALEMODE_TEXT, SCALEMODE_LONGTEXT, true );
69 change_integer_list( pi_mode_values, ppsz_mode_descriptions, 0 );
72 /* Version checking */
73 #if LIBSWSCALE_VERSION_INT >= ((0<<16)+(5<<8)+0)
74 /****************************************************************************
76 ****************************************************************************/
78 void *( *swscale_fast_memcpy )( void *, const void *, size_t );
81 * Internal swscale filter structure.
85 SwsFilter *p_src_filter;
86 SwsFilter *p_dst_filter;
87 int i_cpu_mask, i_sws_flags;
89 video_format_t fmt_in;
90 video_format_t fmt_out;
92 struct SwsContext *ctx;
93 struct SwsContext *ctxA;
102 static picture_t *Filter( filter_t *, picture_t * );
103 static int Init( filter_t * );
104 static void Clean( filter_t * );
113 } ScalerConfiguration;
115 static int GetParameters( ScalerConfiguration *,
116 const video_format_t *p_fmti,
117 const video_format_t *p_fmto,
118 int i_sws_flags_default );
120 static int GetSwsCpuMask(void);
122 /* SwScaler point resize quality seems really bad, let our scale module do it
123 * (change it to true to try) */
124 #define ALLOW_YUVP (false)
125 /* SwScaler does not like too small picture */
126 #define MINIMUM_WIDTH (16)
128 /* XXX is it always 3 even for BIG_ENDIAN (blend.c seems to think so) ? */
131 /*****************************************************************************
132 * OpenScaler: probe the filter and return score
133 *****************************************************************************/
134 static int OpenScaler( vlc_object_t *p_this )
136 filter_t *p_filter = (filter_t*)p_this;
141 float sws_lum_gblur = 0.0, sws_chr_gblur = 0.0;
142 int sws_chr_vshift = 0, sws_chr_hshift = 0;
143 float sws_chr_sharpen = 0.0, sws_lum_sharpen = 0.0;
145 if( GetParameters( NULL,
146 &p_filter->fmt_in.video,
147 &p_filter->fmt_out.video, 0 ) )
153 p_filter->pf_video_filter = Filter;
154 /* Allocate the memory needed to store the decoder's structure */
155 if( ( p_filter->p_sys = p_sys = malloc(sizeof(filter_sys_t)) ) == NULL )
158 /* FIXME pointer assignment may not be atomic */
159 swscale_fast_memcpy = vlc_memcpy;
161 /* Set CPU capabilities */
162 p_sys->i_cpu_mask = GetSwsCpuMask();
165 i_sws_mode = var_CreateGetInteger( p_filter, "swscale-mode" );
168 case 0: p_sys->i_sws_flags = SWS_FAST_BILINEAR; break;
169 case 1: p_sys->i_sws_flags = SWS_BILINEAR; break;
170 case 2: p_sys->i_sws_flags = SWS_BICUBIC; break;
171 case 3: p_sys->i_sws_flags = SWS_X; break;
172 case 4: p_sys->i_sws_flags = SWS_POINT; break;
173 case 5: p_sys->i_sws_flags = SWS_AREA; break;
174 case 6: p_sys->i_sws_flags = SWS_BICUBLIN; break;
175 case 7: p_sys->i_sws_flags = SWS_GAUSS; break;
176 case 8: p_sys->i_sws_flags = SWS_SINC; break;
177 case 9: p_sys->i_sws_flags = SWS_LANCZOS; break;
178 case 10: p_sys->i_sws_flags = SWS_SPLINE; break;
179 default: p_sys->i_sws_flags = SWS_BICUBIC; i_sws_mode = 2; break;
182 p_sys->p_src_filter =
183 sws_getDefaultFilter( sws_lum_gblur, sws_chr_gblur,
184 sws_lum_sharpen, sws_chr_sharpen,
185 sws_chr_hshift, sws_chr_vshift, 0 );
186 p_sys->p_dst_filter = NULL;
191 p_sys->p_src_a = NULL;
192 p_sys->p_dst_a = NULL;
193 p_sys->p_src_e = NULL;
194 p_sys->p_dst_e = NULL;
195 memset( &p_sys->fmt_in, 0, sizeof(p_sys->fmt_in) );
196 memset( &p_sys->fmt_out, 0, sizeof(p_sys->fmt_out) );
198 if( Init( p_filter ) )
200 if( p_sys->p_src_filter )
201 sws_freeFilter( p_sys->p_src_filter );
206 msg_Dbg( p_filter, "%ix%i chroma: %4.4s -> %ix%i chroma: %4.4s with scaling using %s",
207 p_filter->fmt_in.video.i_width, p_filter->fmt_in.video.i_height,
208 (char *)&p_filter->fmt_in.video.i_chroma,
209 p_filter->fmt_out.video.i_width, p_filter->fmt_out.video.i_height,
210 (char *)&p_filter->fmt_out.video.i_chroma,
211 ppsz_mode_descriptions[i_sws_mode] );
216 /*****************************************************************************
217 * CloseFilter: clean up the filter
218 *****************************************************************************/
219 static void CloseScaler( vlc_object_t *p_this )
221 filter_t *p_filter = (filter_t*)p_this;
222 filter_sys_t *p_sys = p_filter->p_sys;
225 if( p_sys->p_src_filter )
226 sws_freeFilter( p_sys->p_src_filter );
230 /*****************************************************************************
232 *****************************************************************************/
233 static int GetSwsCpuMask(void)
235 const unsigned int i_cpu = vlc_CPU();
238 if( i_cpu & CPU_CAPABILITY_MMX )
239 i_sws_cpu |= SWS_CPU_CAPS_MMX;
240 #if (LIBSWSCALE_VERSION_INT >= ((0<<16)+(5<<8)+0))
241 if( i_cpu & CPU_CAPABILITY_MMXEXT )
242 i_sws_cpu |= SWS_CPU_CAPS_MMX2;
244 if( i_cpu & CPU_CAPABILITY_3DNOW )
245 i_sws_cpu |= SWS_CPU_CAPS_3DNOW;
247 if( i_cpu & CPU_CAPABILITY_ALTIVEC )
248 i_sws_cpu |= SWS_CPU_CAPS_ALTIVEC;
252 static bool IsFmtSimilar( const video_format_t *p_fmt1, const video_format_t *p_fmt2 )
254 return p_fmt1->i_chroma == p_fmt2->i_chroma &&
255 p_fmt1->i_width == p_fmt2->i_width &&
256 p_fmt1->i_height == p_fmt2->i_height;
259 static int GetParameters( ScalerConfiguration *p_cfg,
260 const video_format_t *p_fmti,
261 const video_format_t *p_fmto,
262 int i_sws_flags_default )
266 if( GetFfmpegChroma( &i_fmti, *p_fmti ) != VLC_SUCCESS ||
267 GetFfmpegChroma( &i_fmto, *p_fmto ) != VLC_SUCCESS )
270 bool b_has_a = false;
271 bool b_add_a = false;
272 int i_sws_flags = i_sws_flags_default;
274 if( p_fmti->i_chroma == p_fmto->i_chroma )
276 if( p_fmti->i_chroma == VLC_FOURCC( 'Y', 'U', 'V', 'P' ) && ALLOW_YUVP )
278 i_fmti = i_fmto = PIX_FMT_GRAY8;
279 i_sws_flags = SWS_POINT;
281 else if( p_fmti->i_chroma == VLC_FOURCC( 'Y', 'U', 'V', 'A' ) )
283 i_fmti = i_fmto = PIX_FMT_YUV444P;
286 else if( p_fmti->i_chroma == VLC_FOURCC( 'R', 'G', 'B', 'A' ) )
288 i_fmti = i_fmto = PIX_FMT_RGBA32;
292 if( i_fmti >= 0 && i_fmto < 0 )
294 /* Special case: injecting dummy alpha plane */
295 switch( p_fmto->i_chroma )
297 case VLC_FOURCC( 'Y', 'U', 'V', 'A' ):
298 i_fmto = PIX_FMT_YUV444P;
301 case VLC_FOURCC( 'R', 'G', 'B', 'A' ):
302 i_fmto = PIX_FMT_RGBA32;
312 p_cfg->i_fmti = i_fmti;
313 p_cfg->i_fmto = i_fmto;
314 p_cfg->b_has_a = b_has_a;
315 p_cfg->b_add_a = b_add_a;
316 p_cfg->i_sws_flags = i_sws_flags;
319 if( i_fmti < 0 || i_fmto < 0 )
325 static int Init( filter_t *p_filter )
327 filter_sys_t *p_sys = p_filter->p_sys;
328 const video_format_t *p_fmti = &p_filter->fmt_in.video;
329 const video_format_t *p_fmto = &p_filter->fmt_out.video;
331 if( IsFmtSimilar( p_fmti, &p_sys->fmt_in ) &&
332 IsFmtSimilar( p_fmto, &p_sys->fmt_out ) &&
339 /* Init with new parameters */
340 ScalerConfiguration cfg;
341 if( GetParameters( &cfg, p_fmti, p_fmto, p_sys->i_sws_flags ) )
343 msg_Err( p_filter, "format not supported" );
346 if( p_fmti->i_width <= 0 || p_fmto->i_width <= 0 )
348 msg_Err( p_filter, "0 width not supported" );
352 /* swscale does not like too small width */
353 p_sys->i_extend_factor = 1;
354 while( __MIN( p_fmti->i_width, p_fmto->i_width ) * p_sys->i_extend_factor < MINIMUM_WIDTH)
355 p_sys->i_extend_factor++;
357 const unsigned i_fmti_width = p_fmti->i_width * p_sys->i_extend_factor;
358 const unsigned i_fmto_width = p_fmto->i_width * p_sys->i_extend_factor;
359 for( int n = 0; n < (cfg.b_has_a ? 2 : 1); n++ )
361 const int i_fmti = n == 0 ? cfg.i_fmti : PIX_FMT_GRAY8;
362 const int i_fmto = n == 0 ? cfg.i_fmto : PIX_FMT_GRAY8;
363 struct SwsContext *ctx;
365 ctx = sws_getContext( i_fmti_width, p_fmti->i_height, i_fmti,
366 i_fmto_width, p_fmto->i_height, i_fmto,
367 cfg.i_sws_flags | p_sys->i_cpu_mask,
368 p_sys->p_src_filter, p_sys->p_dst_filter, 0 );
376 p_sys->p_src_a = picture_New( VLC_FOURCC( 'G', 'R', 'E', 'Y' ), i_fmti_width, p_fmti->i_height, 0 );
377 p_sys->p_dst_a = picture_New( VLC_FOURCC( 'G', 'R', 'E', 'Y' ), i_fmto_width, p_fmto->i_height, 0 );
379 if( p_sys->i_extend_factor != 1 )
381 p_sys->p_src_e = picture_New( p_fmti->i_chroma, i_fmti_width, p_fmti->i_height, 0 );
382 p_sys->p_dst_e = picture_New( p_fmto->i_chroma, i_fmto_width, p_fmto->i_height, 0 );
384 memset( p_sys->p_src_e->p[0].p_pixels, 0, p_sys->p_src_e->p[0].i_pitch * p_sys->p_src_e->p[0].i_lines );
385 memset( p_sys->p_dst_e->p[0].p_pixels, 0, p_sys->p_dst_e->p[0].i_pitch * p_sys->p_dst_e->p[0].i_lines );
389 ( cfg.b_has_a && ( !p_sys->ctxA || !p_sys->p_src_a || !p_sys->p_dst_a ) ) ||
390 ( p_sys->i_extend_factor != 1 && ( !p_sys->p_src_e || !p_sys->p_dst_e ) ) )
392 msg_Err( p_filter, "could not init SwScaler and/or allocate memory" );
397 p_sys->b_add_a = cfg.b_add_a;
398 p_sys->fmt_in = *p_fmti;
399 p_sys->fmt_out = *p_fmto;
402 msg_Dbg( p_filter, "%ix%i chroma: %4.4s -> %ix%i chroma: %4.4s extend by %d",
403 p_fmti->i_width, p_fmti->i_height, (char *)&p_fmti->i_chroma,
404 p_fmto->i_width, p_fmto->i_height, (char *)&p_fmto->i_chroma,
405 p_sys->i_extend_factor );
409 static void Clean( filter_t *p_filter )
411 filter_sys_t *p_sys = p_filter->p_sys;
414 picture_Release( p_sys->p_src_e );
416 picture_Release( p_sys->p_dst_e );
419 picture_Release( p_sys->p_src_a );
421 picture_Release( p_sys->p_dst_a );
424 sws_freeContext( p_sys->ctxA );
427 sws_freeContext( p_sys->ctx );
429 /* We have to set it to null has we call be called again :( */
432 p_sys->p_src_a = NULL;
433 p_sys->p_dst_a = NULL;
434 p_sys->p_src_e = NULL;
435 p_sys->p_dst_e = NULL;
438 static void GetPixels( uint8_t *pp_pixel[3], int pi_pitch[3],
439 const picture_t *p_picture,
440 int i_plane_start, int i_plane_count )
443 for( n = 0; n < __MIN(i_plane_count, p_picture->i_planes-i_plane_start ); n++ )
445 pp_pixel[n] = p_picture->p[i_plane_start+n].p_pixels;
446 pi_pitch[n] = p_picture->p[i_plane_start+n].i_pitch;
455 static void ExtractA( picture_t *p_dst, const picture_t *p_src, unsigned i_width, unsigned i_height )
457 plane_t *d = &p_dst->p[0];
458 const plane_t *s = &p_src->p[0];
460 for( unsigned y = 0; y < i_height; y++ )
461 for( unsigned x = 0; x < i_width; x++ )
462 d->p_pixels[y*d->i_pitch+x] = s->p_pixels[y*s->i_pitch+4*x+OFFSET_A];
464 static void InjectA( picture_t *p_dst, const picture_t *p_src, unsigned i_width, unsigned i_height )
466 plane_t *d = &p_dst->p[0];
467 const plane_t *s = &p_src->p[0];
469 for( unsigned y = 0; y < i_height; y++ )
470 for( unsigned x = 0; x < i_width; x++ )
471 d->p_pixels[y*d->i_pitch+4*x+OFFSET_A] = s->p_pixels[y*s->i_pitch+x];
473 static void FillA( plane_t *d, int i_offset )
475 for( int y = 0; y < d->i_visible_lines; y++ )
476 for( int x = 0; x < d->i_visible_pitch; x += d->i_pixel_pitch )
477 d->p_pixels[y*d->i_pitch+x+i_offset] = 0xff;
480 static void CopyPad( picture_t *p_dst, const picture_t *p_src )
482 picture_Copy( p_dst, p_src );
483 for( int n = 0; n < p_dst->i_planes; n++ )
485 const plane_t *s = &p_src->p[n];
486 plane_t *d = &p_dst->p[n];
488 for( int y = 0; y < s->i_lines; y++ )
490 for( int x = s->i_visible_pitch; x < d->i_visible_pitch; x += s->i_pixel_pitch )
491 memcpy( &d->p_pixels[y*d->i_pitch + x], &d->p_pixels[y*d->i_pitch + s->i_visible_pitch - s->i_pixel_pitch], s->i_pixel_pitch );
496 static void Convert( struct SwsContext *ctx,
497 picture_t *p_dst, picture_t *p_src, int i_height, int i_plane_start, int i_plane_count )
499 uint8_t *src[3]; int src_stride[3];
500 uint8_t *dst[3]; int dst_stride[3];
502 GetPixels( src, src_stride, p_src, i_plane_start, i_plane_count );
503 GetPixels( dst, dst_stride, p_dst, i_plane_start, i_plane_count );
505 #if LIBSWSCALE_VERSION_INT >= ((0<<16)+(5<<8)+0)
506 sws_scale( ctx, src, src_stride, 0, i_height,
509 sws_scale_ordered( ctx, src, src_stride, 0, i_height,
514 /****************************************************************************
515 * Filter: the whole thing
516 ****************************************************************************
517 * This function is called just after the thread is launched.
518 ****************************************************************************/
519 static picture_t *Filter( filter_t *p_filter, picture_t *p_pic )
521 filter_sys_t *p_sys = p_filter->p_sys;
522 const video_format_t *p_fmti = &p_filter->fmt_in.video;
523 const video_format_t *p_fmto = &p_filter->fmt_out.video;
524 picture_t *p_pic_dst;
526 /* Check if format properties changed */
527 if( Init( p_filter ) )
529 picture_Release( p_pic );
533 /* Request output picture */
534 p_pic_dst = filter_NewPicture( p_filter );
537 picture_Release( p_pic );
542 picture_t *p_src = p_pic;
543 picture_t *p_dst = p_pic_dst;
544 if( p_sys->i_extend_factor != 1 )
546 p_src = p_sys->p_src_e;
547 p_dst = p_sys->p_dst_e;
549 CopyPad( p_src, p_pic );
552 Convert( p_sys->ctx, p_dst, p_src, p_fmti->i_height, 0, 3 );
555 if( p_fmto->i_chroma == VLC_FOURCC( 'R', 'G', 'B', 'A' ) )
557 /* We extract the A plane to rescale it, and then we reinject it. */
558 ExtractA( p_sys->p_src_a, p_src, p_fmti->i_width * p_sys->i_extend_factor, p_fmti->i_height );
560 Convert( p_sys->ctxA, p_sys->p_dst_a, p_sys->p_src_a, p_fmti->i_height, 0, 1 );
562 InjectA( p_dst, p_sys->p_dst_a, p_fmto->i_width * p_sys->i_extend_factor, p_fmto->i_height );
566 Convert( p_sys->ctxA, p_dst, p_src, p_fmti->i_height, 3, 1 );
569 else if( p_sys->b_add_a )
571 /* We inject a complete opaque alpha plane */
572 if( p_fmto->i_chroma == VLC_FOURCC( 'R', 'G', 'B', 'A' ) )
573 FillA( &p_dst->p[0], OFFSET_A );
575 FillA( &p_dst->p[A_PLANE], 0 );
578 if( p_sys->i_extend_factor != 1 )
580 picture_CopyPixels( p_pic_dst, p_dst );
583 picture_CopyProperties( p_pic_dst, p_pic );
584 picture_Release( p_pic );
588 #else /* LIBSWSCALE_VERSION_INT >= ((0<<16)+(5<<8)+0) */
590 int OpenScaler( vlc_object_t *p_this )
595 void CloseScaler( vlc_object_t *p_this )
599 #endif /* LIBSWSCALE_VERSION_INT >= ((0<<16)+(5<<8)+0) */