]> git.sesse.net Git - vlc/blob - src/video_output/vout_subpictures.c
Moved "sub-margin" to vout.
[vlc] / src / video_output / vout_subpictures.c
1 /*****************************************************************************
2  * vout_subpictures.c : subpicture management functions
3  *****************************************************************************
4  * Copyright (C) 2000-2007 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Vincent Seguin <seguin@via.ecp.fr>
8  *          Samuel Hocevar <sam@zoy.org>
9  *          Gildas Bazin <gbazin@videolan.org>
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
24  *****************************************************************************/
25
26 /*****************************************************************************
27  * Preamble
28  *****************************************************************************/
29 #ifdef HAVE_CONFIG_H
30 # include "config.h"
31 #endif
32
33 #include <assert.h>
34 #include <limits.h>
35
36 #include <vlc_common.h>
37 #include <vlc_vout.h>
38 #include <vlc_block.h>
39 #include <vlc_filter.h>
40 #include <vlc_spu.h>
41 #include "../libvlc.h"
42 #include "vout_internal.h"
43 #include <vlc_image.h>
44 #include <vlc_input.h>
45
46 /*****************************************************************************
47  * Local prototypes
48  *****************************************************************************/
49
50 /* Number of simultaneous subpictures */
51 #define VOUT_MAX_SUBPICTURES (__MAX(VOUT_MAX_PICTURES, SPU_MAX_PREPARE_TIME/5000))
52
53 /* */
54 typedef struct
55 {
56     subpicture_t *p_subpicture;
57     bool          b_reject;
58 } spu_heap_entry_t;
59
60 typedef struct
61 {
62     spu_heap_entry_t p_entry[VOUT_MAX_SUBPICTURES];
63
64 } spu_heap_t;
65
66 static void SpuHeapInit( spu_heap_t * );
67 static int  SpuHeapPush( spu_heap_t *, subpicture_t * );
68 static void SpuHeapDeleteAt( spu_heap_t *, int i_index );
69 static int  SpuHeapDeleteSubpicture( spu_heap_t *, subpicture_t * );
70 static void SpuHeapClean( spu_heap_t *p_heap );
71
72 struct spu_private_t
73 {
74     vlc_mutex_t lock;   /* lock to protect all followings fields */
75     vlc_object_t *p_input;
76
77     spu_heap_t heap;
78
79     int i_channel;             /**< number of subpicture channels registered */
80     filter_t *p_blend;                            /**< alpha blending module */
81     filter_t *p_text;                              /**< text renderer module */
82     filter_t *p_scale_yuvp;                     /**< scaling module for YUVP */
83     filter_t *p_scale;                    /**< scaling module (all but YUVP) */
84     bool b_force_crop;                     /**< force cropping of subpicture */
85     int i_crop_x, i_crop_y, i_crop_width, i_crop_height;       /**< cropping */
86
87     int i_margin;                        /**< force position of a subpicture */
88     bool b_force_palette;             /**< force palette of subpicture */
89     uint8_t palette[4][4];                               /**< forced palette */
90
91     /* Subpiture filters */
92     char           *psz_chain_update;
93     vlc_mutex_t    chain_lock;
94     filter_chain_t *p_chain;
95
96     /* */
97     mtime_t i_last_sort_date;
98 };
99
100 /* */
101 struct subpicture_region_private_t
102 {
103     video_format_t fmt;
104     picture_t      *p_picture;
105 };
106 static subpicture_region_private_t *SpuRegionPrivateNew( video_format_t * );
107 static void SpuRegionPrivateDelete( subpicture_region_private_t * );
108
109 /* */
110 typedef struct
111 {
112     int w;
113     int h;
114 } spu_scale_t;
115 static spu_scale_t spu_scale_create( int w, int h );
116 static spu_scale_t spu_scale_unit(void );
117 static spu_scale_t spu_scale_createq( int wn, int wd, int hn, int hd );
118 static int spu_scale_w( int v, const spu_scale_t s );
119 static int spu_scale_h( int v, const spu_scale_t s );
120 static int spu_invscale_w( int v, const spu_scale_t s );
121 static int spu_invscale_h( int v, const spu_scale_t s );
122
123 typedef struct
124 {
125     int i_x;
126     int i_y;
127     int i_width;
128     int i_height;
129
130     spu_scale_t scale;
131 } spu_area_t;
132
133 static spu_area_t spu_area_create( int x, int y, int w, int h, spu_scale_t );
134 static spu_area_t spu_area_scaled( spu_area_t );
135 static spu_area_t spu_area_unscaled( spu_area_t, spu_scale_t );
136 static bool spu_area_overlap( spu_area_t, spu_area_t );
137
138
139 /* Subpicture rendered flag
140  * FIXME ? it could be moved to private ? */
141 #define SUBPICTURE_RENDERED  (0x1000)
142 #if SUBPICTURE_RENDERED < SUBPICTURE_ALIGN_MASK
143 #   error SUBPICTURE_RENDERED too low
144 #endif
145
146 #define SCALE_UNIT (1000)
147
148 static void SubpictureUpdate( subpicture_t *,
149                               const video_format_t *p_fmt_src,
150                               const video_format_t *p_fmt_dst,
151                               mtime_t i_ts );
152 static void SubpictureChain( subpicture_t **pp_head, subpicture_t *p_subpic );
153 static int SubpictureCmp( const void *s0, const void *s1 );
154
155 static void SpuRenderRegion( spu_t *,
156                              picture_t *p_pic_dst, spu_area_t *,
157                              subpicture_t *, subpicture_region_t *,
158                              const spu_scale_t scale_size,
159                              const video_format_t *p_fmt,
160                              const spu_area_t *p_subtitle_area, int i_subtitle_area,
161                              mtime_t render_date );
162
163 static void UpdateSPU   ( spu_t *, vlc_object_t * );
164 static int  CropCallback( vlc_object_t *, char const *,
165                           vlc_value_t, vlc_value_t, void * );
166
167 /* Buffer allocation for SPU filter (blend, scale, ...) */
168 struct filter_owner_sys_t
169 {
170     spu_t *p_spu;
171     int i_channel;
172 };
173 static int spu_get_attachments( filter_t *,
174                                 input_attachment_t ***, int * );
175 static picture_t *spu_new_video_buffer( filter_t * );
176 static void spu_del_video_buffer( filter_t *, picture_t * );
177
178 /* Buffer aloccation fir SUB filter */
179 static int SubFilterAllocationInit( filter_t *, void * );
180 static void SubFilterAllocationClean( filter_t * );
181
182 /* */
183 static void SpuRenderCreateAndLoadText( spu_t * );
184 static void SpuRenderCreateAndLoadScale( spu_t * );
185 static void FilterRelease( filter_t *p_filter );
186
187 /*****************************************************************************
188  * Public API
189  *****************************************************************************/
190
191 #undef spu_Create
192 /**
193  * Creates the subpicture unit
194  *
195  * \param p_this the parent object which creates the subpicture unit
196  */
197 spu_t *spu_Create( vlc_object_t *p_this )
198 {
199     spu_t *p_spu;
200     spu_private_t *p_sys;
201
202     p_spu = vlc_custom_create( p_this, sizeof(spu_t) + sizeof(spu_private_t),
203                                VLC_OBJECT_GENERIC, "subpicture" );
204     if( !p_spu )
205         return NULL;
206     vlc_object_attach( p_spu, p_this );
207
208     /* Initialize spu fields */
209     p_spu->p = p_sys = (spu_private_t*)&p_spu[1];
210
211     /* Initialize private fields */
212     vlc_mutex_init( &p_sys->lock );
213
214     SpuHeapInit( &p_sys->heap );
215
216     p_sys->p_blend = NULL;
217     p_sys->p_text = NULL;
218     p_sys->p_scale = NULL;
219     p_sys->p_scale_yuvp = NULL;
220
221     p_sys->i_margin = var_InheritInteger( p_spu, "sub-margin" );
222
223     /* Register the default subpicture channel */
224     p_sys->i_channel = SPU_DEFAULT_CHANNEL + 1;
225
226     p_sys->psz_chain_update = NULL;
227     vlc_mutex_init( &p_sys->chain_lock );
228     p_sys->p_chain = filter_chain_New( p_spu, "sub filter", false,
229                                        SubFilterAllocationInit,
230                                        SubFilterAllocationClean,
231                                        p_spu );
232
233     /* Load text and scale module */
234     SpuRenderCreateAndLoadText( p_spu );
235     SpuRenderCreateAndLoadScale( p_spu );
236
237     /* */
238     p_sys->i_last_sort_date = -1;
239
240     return p_spu;
241 }
242
243 /**
244  * Destroy the subpicture unit
245  *
246  * \param p_this the parent object which destroys the subpicture unit
247  */
248 void spu_Destroy( spu_t *p_spu )
249 {
250     spu_private_t *p_sys = p_spu->p;
251
252     if( p_sys->p_blend )
253         filter_DeleteBlend( p_sys->p_blend );
254
255     if( p_sys->p_text )
256         FilterRelease( p_sys->p_text );
257
258     if( p_sys->p_scale_yuvp )
259         FilterRelease( p_sys->p_scale_yuvp );
260
261     if( p_sys->p_scale )
262         FilterRelease( p_sys->p_scale );
263
264     filter_chain_Delete( p_sys->p_chain );
265     vlc_mutex_destroy( &p_sys->chain_lock );
266     free( p_sys->psz_chain_update );
267
268     /* Destroy all remaining subpictures */
269     SpuHeapClean( &p_sys->heap );
270
271     vlc_mutex_destroy( &p_sys->lock );
272
273     vlc_object_release( p_spu );
274 }
275
276 /**
277  * Attach/Detach the SPU from any input
278  *
279  * \param p_this the object in which to destroy the subpicture unit
280  * \param b_attach to select attach or detach
281  */
282 void spu_Attach( spu_t *p_spu, vlc_object_t *p_input, bool b_attach )
283 {
284     if( b_attach )
285     {
286         UpdateSPU( p_spu, p_input );
287         var_Create( p_input, "highlight", VLC_VAR_BOOL );
288         var_AddCallback( p_input, "highlight", CropCallback, p_spu );
289
290         vlc_mutex_lock( &p_spu->p->lock );
291         p_spu->p->p_input = p_input;
292
293         FilterRelease( p_spu->p->p_text );
294         p_spu->p->p_text = NULL;
295         SpuRenderCreateAndLoadText( p_spu );
296
297         vlc_mutex_unlock( &p_spu->p->lock );
298     }
299     else
300     {
301         vlc_mutex_lock( &p_spu->p->lock );
302         p_spu->p->p_input = NULL;
303         vlc_mutex_unlock( &p_spu->p->lock );
304
305         /* Delete callbacks */
306         var_DelCallback( p_input, "highlight", CropCallback, p_spu );
307         var_Destroy( p_input, "highlight" );
308     }
309 }
310
311 /**
312  * Inform the SPU filters of mouse event
313  */
314 int spu_ProcessMouse( spu_t *p_spu,
315                       const vlc_mouse_t *p_mouse,
316                       const video_format_t *p_fmt )
317 {
318     spu_private_t *p_sys = p_spu->p;
319
320     vlc_mutex_lock( &p_sys->chain_lock );
321     filter_chain_MouseEvent( p_sys->p_chain, p_mouse, p_fmt );
322     vlc_mutex_unlock( &p_sys->chain_lock );
323
324     return VLC_SUCCESS;
325 }
326
327 /**
328  * Display a subpicture
329  *
330  * Remove the reservation flag of a subpicture, which will cause it to be
331  * ready for display.
332  * \param p_spu the subpicture unit object
333  * \param p_subpic the subpicture to display
334  */
335 void spu_DisplaySubpicture( spu_t *p_spu, subpicture_t *p_subpic )
336 {
337     spu_private_t *p_sys = p_spu->p;
338
339     /* SPU_DEFAULT_CHANNEL always reset itself */
340     if( p_subpic->i_channel == SPU_DEFAULT_CHANNEL )
341         spu_ClearChannel( p_spu, SPU_DEFAULT_CHANNEL );
342
343     /* p_private is for spu only and cannot be non NULL here */
344     for( subpicture_region_t *r = p_subpic->p_region; r != NULL; r = r->p_next )
345         assert( r->p_private == NULL );
346
347     /* */
348     vlc_mutex_lock( &p_sys->lock );
349     if( SpuHeapPush( &p_sys->heap, p_subpic ) )
350     {
351         vlc_mutex_unlock( &p_sys->lock );
352         msg_Err( p_spu, "subpicture heap full" );
353         subpicture_Delete( p_subpic );
354         return;
355     }
356     vlc_mutex_unlock( &p_sys->lock );
357 }
358
359 /**
360  * This function renders all sub picture units in the list.
361  */
362 void spu_RenderSubpictures( spu_t *p_spu,
363                             picture_t *p_pic_dst, const video_format_t *p_fmt_dst,
364                             subpicture_t *p_subpic_list,
365                             const video_format_t *p_fmt_src,
366                             mtime_t render_subtitle_date )
367 {
368     spu_private_t *p_sys = p_spu->p;
369
370     const mtime_t render_osd_date = mdate();
371
372     const int i_source_video_width  = p_fmt_src->i_width;
373     const int i_source_video_height = p_fmt_src->i_height;
374
375     unsigned int i_subpicture;
376     subpicture_t *pp_subpicture[VOUT_MAX_SUBPICTURES];
377
378     unsigned int i_subtitle_region_count;
379     spu_area_t p_subtitle_area_buffer[VOUT_MAX_SUBPICTURES];
380     spu_area_t *p_subtitle_area;
381     int i_subtitle_area;
382
383     vlc_mutex_lock( &p_sys->lock );
384
385     /* Preprocess subpictures */
386     i_subpicture = 0;
387     i_subtitle_region_count = 0;
388     for( subpicture_t * p_subpic = p_subpic_list;
389             p_subpic != NULL;
390                 p_subpic = p_subpic->p_next )
391     {
392         SubpictureUpdate( p_subpic,
393                           p_fmt_src, p_fmt_dst,
394                           p_subpic->b_subtitle ? render_subtitle_date : render_osd_date );
395
396         /* */
397         if( p_subpic->b_subtitle )
398         {
399             for( subpicture_region_t *r = p_subpic->p_region; r != NULL; r = r->p_next )
400                 i_subtitle_region_count++;
401         }
402
403         /* */
404         pp_subpicture[i_subpicture++] = p_subpic;
405     }
406
407     /* Be sure we have at least 1 picture to process */
408     if( i_subpicture <= 0 )
409     {
410         vlc_mutex_unlock( &p_sys->lock );
411         return;
412     }
413
414     /* Now order subpicture array
415      * XXX The order is *really* important for overlap subtitles positionning */
416     qsort( pp_subpicture, i_subpicture, sizeof(*pp_subpicture), SubpictureCmp );
417
418     /* Allocate area array for subtitle overlap */
419     i_subtitle_area = 0;
420     p_subtitle_area = p_subtitle_area_buffer;
421     if( i_subtitle_region_count > sizeof(p_subtitle_area_buffer)/sizeof(*p_subtitle_area_buffer) )
422         p_subtitle_area = calloc( i_subtitle_region_count, sizeof(*p_subtitle_area) );
423
424     /* Create the blending module */
425     if( !p_sys->p_blend )
426         p_spu->p->p_blend = filter_NewBlend( VLC_OBJECT(p_spu), p_fmt_dst );
427
428     /* Process all subpictures and regions (in the right order) */
429     for( unsigned int i_index = 0; i_index < i_subpicture; i_index++ )
430     {
431         subpicture_t *p_subpic = pp_subpicture[i_index];
432         subpicture_region_t *p_region;
433
434         if( !p_subpic->p_region )
435             continue;
436
437         /* FIXME when possible use a better rendering size than source size
438          * (max of display size and source size for example) FIXME */
439         int i_render_width  = p_subpic->i_original_picture_width;
440         int i_render_height = p_subpic->i_original_picture_height;
441         if( !i_render_width || !i_render_height )
442         {
443             if( i_render_width != 0 || i_render_height != 0 )
444                 msg_Err( p_spu, "unsupported original picture size %dx%d",
445                          i_render_width, i_render_height );
446
447             p_subpic->i_original_picture_width  = i_render_width = i_source_video_width;
448             p_subpic->i_original_picture_height = i_render_height = i_source_video_height;
449         }
450
451         if( p_sys->p_text )
452         {
453             p_sys->p_text->fmt_out.video.i_width          =
454             p_sys->p_text->fmt_out.video.i_visible_width  = i_render_width;
455
456             p_sys->p_text->fmt_out.video.i_height         =
457             p_sys->p_text->fmt_out.video.i_visible_height = i_render_height;
458         }
459
460         /* Compute scaling from picture to source size */
461         spu_scale_t scale = spu_scale_createq( i_source_video_width,  i_render_width,
462                                                i_source_video_height, i_render_height );
463
464         /* Update scaling from source size to display size(p_fmt_dst) */
465         scale.w = scale.w * p_fmt_dst->i_width  / i_source_video_width;
466         scale.h = scale.h * p_fmt_dst->i_height / i_source_video_height;
467
468         /* Set default subpicture aspect ratio
469          * FIXME if we only handle 1 aspect ratio per picture, why is it set per
470          * region ? */
471         p_region = p_subpic->p_region;
472         if( !p_region->fmt.i_sar_num || !p_region->fmt.i_sar_den )
473         {
474             p_region->fmt.i_sar_den = p_fmt_dst->i_sar_den;
475             p_region->fmt.i_sar_num = p_fmt_dst->i_sar_num;
476         }
477
478         /* Take care of the aspect ratio */
479         if( p_region->fmt.i_sar_num * p_fmt_dst->i_sar_den !=
480             p_region->fmt.i_sar_den * p_fmt_dst->i_sar_num )
481         {
482             /* FIXME FIXME what about region->i_x/i_y ? */
483             scale.w = scale.w *
484                 (int64_t)p_region->fmt.i_sar_num * p_fmt_dst->i_sar_den /
485                 p_region->fmt.i_sar_den / p_fmt_dst->i_sar_num;
486         }
487
488         /* Render all regions
489          * We always transform non absolute subtitle into absolute one on the
490          * first rendering to allow good subtitle overlap support.
491          */
492         for( p_region = p_subpic->p_region; p_region != NULL; p_region = p_region->p_next )
493         {
494             spu_area_t area;
495
496             /* Check scale validity */
497             if( scale.w <= 0 || scale.h <= 0 )
498                 continue;
499
500             /* */
501             SpuRenderRegion( p_spu, p_pic_dst, &area,
502                              p_subpic, p_region, scale, p_fmt_dst,
503                              p_subtitle_area, i_subtitle_area,
504                              p_subpic->b_subtitle ? render_subtitle_date : render_osd_date );
505
506             if( p_subpic->b_subtitle )
507             {
508                 area = spu_area_unscaled( area, scale );
509                 if( !p_subpic->b_absolute && area.i_width > 0 && area.i_height > 0 )
510                 {
511                     p_region->i_x = area.i_x;
512                     p_region->i_y = area.i_y;
513                 }
514                 if( p_subtitle_area )
515                     p_subtitle_area[i_subtitle_area++] = area;
516             }
517         }
518         if( p_subpic->b_subtitle )
519             p_subpic->b_absolute = true;
520     }
521
522     /* */
523     if( p_subtitle_area != p_subtitle_area_buffer )
524         free( p_subtitle_area );
525
526     vlc_mutex_unlock( &p_sys->lock );
527 }
528
529 /*****************************************************************************
530  * spu_SortSubpictures: find the subpictures to display
531  *****************************************************************************
532  * This function parses all subpictures and decides which ones need to be
533  * displayed. If no picture has been selected, display_date will depend on
534  * the subpicture.
535  * We also check for ephemer DVD subpictures (subpictures that have
536  * to be removed if a newer one is available), which makes it a lot
537  * more difficult to guess if a subpicture has to be rendered or not.
538  *****************************************************************************/
539 subpicture_t *spu_SortSubpictures( spu_t *p_spu, mtime_t render_subtitle_date,
540                                    bool b_subtitle_only )
541 {
542     spu_private_t *p_sys = p_spu->p;
543     subpicture_t *p_subpic = NULL;
544     const mtime_t render_osd_date = mdate();
545
546     /* Update sub-filter chain */
547     vlc_mutex_lock( &p_sys->lock );
548     char *psz_chain_update = p_sys->psz_chain_update;
549     p_sys->psz_chain_update = NULL;
550     vlc_mutex_unlock( &p_sys->lock );
551
552     vlc_mutex_lock( &p_sys->chain_lock );
553     if( psz_chain_update )
554     {
555         filter_chain_Reset( p_sys->p_chain, NULL, NULL );
556
557         filter_chain_AppendFromString( p_spu->p->p_chain, psz_chain_update );
558
559         free( psz_chain_update );
560     }
561     /* Run subpicture filters */
562     filter_chain_SubFilter( p_sys->p_chain, render_osd_date );
563     vlc_mutex_unlock( &p_sys->chain_lock );
564
565     vlc_mutex_lock( &p_sys->lock );
566
567     /* Create a list of channels */
568     int pi_channel[VOUT_MAX_SUBPICTURES];
569     int i_channel_count = 0;
570
571     for( int i_index = 0; i_index < VOUT_MAX_SUBPICTURES; i_index++ )
572     {
573         spu_heap_entry_t *p_entry = &p_sys->heap.p_entry[i_index];
574         if( !p_entry->p_subpicture || p_entry->b_reject )
575             continue;
576         const int i_channel = p_entry->p_subpicture->i_channel;
577         int i;
578         for( i = 0; i < i_channel_count; i++ )
579         {
580             if( pi_channel[i] == i_channel )
581                 break;
582         }
583         if( i_channel_count <= i )
584             pi_channel[i_channel_count++] = i_channel;
585     }
586
587     /* We get an easily parsable chained list of subpictures which
588      * ends with NULL since p_subpic was initialized to NULL. */
589     for( int i = 0; i < i_channel_count; i++ )
590     {
591         const int i_channel = pi_channel[i];
592         subpicture_t *p_available_subpic[VOUT_MAX_SUBPICTURES];
593         bool         pb_available_late[VOUT_MAX_SUBPICTURES];
594         int          i_available = 0;
595
596         mtime_t      start_date = render_subtitle_date;
597         mtime_t      ephemer_subtitle_date = 0;
598         mtime_t      ephemer_osd_date = 0;
599         int64_t      i_ephemer_subtitle_order = INT64_MIN;
600         int64_t      i_ephemer_system_order = INT64_MIN;
601         int i_index;
602
603         /* Select available pictures */
604         for( i_index = 0; i_index < VOUT_MAX_SUBPICTURES; i_index++ )
605         {
606             spu_heap_entry_t *p_entry = &p_sys->heap.p_entry[i_index];
607             subpicture_t *p_current = p_entry->p_subpicture;
608             bool b_stop_valid;
609             bool b_late;
610
611             if( !p_current || p_entry->b_reject )
612             {
613                 if( p_entry->b_reject )
614                     SpuHeapDeleteAt( &p_sys->heap, i_index );
615                 continue;
616             }
617
618             if( p_current->i_channel != i_channel ||
619                 ( b_subtitle_only && !p_current->b_subtitle ) )
620             {
621                 continue;
622             }
623             const mtime_t render_date = p_current->b_subtitle ? render_subtitle_date : render_osd_date;
624             if( render_date &&
625                 render_date < p_current->i_start )
626             {
627                 /* Too early, come back next monday */
628                 continue;
629             }
630
631             mtime_t *pi_ephemer_date  = p_current->b_subtitle ? &ephemer_subtitle_date : &ephemer_osd_date;
632             int64_t *pi_ephemer_order = p_current->b_subtitle ? &i_ephemer_subtitle_order : &i_ephemer_system_order;
633             if( p_current->i_start >= *pi_ephemer_date )
634             {
635                 *pi_ephemer_date = p_current->i_start;
636                 if( p_current->i_order > *pi_ephemer_order )
637                     *pi_ephemer_order = p_current->i_order;
638             }
639
640             b_stop_valid = !p_current->b_ephemer || p_current->i_stop > p_current->i_start;
641
642             b_late = b_stop_valid && p_current->i_stop <= render_date;
643
644             /* start_date will be used for correct automatic overlap support
645              * in case picture that should not be displayed anymore (display_time)
646              * overlap with a picture to be displayed (p_current->i_start)  */
647             if( p_current->b_subtitle && !b_late && !p_current->b_ephemer )
648                 start_date = p_current->i_start;
649
650             /* */
651             p_available_subpic[i_available] = p_current;
652             pb_available_late[i_available] = b_late;
653             i_available++;
654         }
655
656         /* Only forced old picture display at the transition */
657         if( start_date < p_sys->i_last_sort_date )
658             start_date = p_sys->i_last_sort_date;
659         if( start_date <= 0 )
660             start_date = INT64_MAX;
661
662         /* Select pictures to be displayed */
663         for( i_index = 0; i_index < i_available; i_index++ )
664         {
665             subpicture_t *p_current = p_available_subpic[i_index];
666             bool b_late = pb_available_late[i_index];
667
668             const mtime_t stop_date = p_current->b_subtitle ? __MAX( start_date, p_sys->i_last_sort_date ) : render_osd_date;
669             const mtime_t ephemer_date = p_current->b_subtitle ? ephemer_subtitle_date : ephemer_osd_date;
670             const int64_t i_ephemer_order = p_current->b_subtitle ? i_ephemer_subtitle_order : i_ephemer_system_order;
671
672             /* Destroy late and obsolete ephemer subpictures */
673             bool b_rejet = b_late && p_current->i_stop <= stop_date;
674             if( p_current->b_ephemer )
675             {
676                 if( p_current->i_start < ephemer_date )
677                     b_rejet = true;
678                 else if( p_current->i_start == ephemer_date &&
679                          p_current->i_order < i_ephemer_order )
680                     b_rejet = true;
681             }
682
683             if( b_rejet )
684                 SpuHeapDeleteSubpicture( &p_sys->heap, p_current );
685             else
686                 SubpictureChain( &p_subpic, p_current );
687         }
688     }
689
690     p_sys->i_last_sort_date = render_subtitle_date;
691     vlc_mutex_unlock( &p_sys->lock );
692
693     return p_subpic;
694 }
695
696 void spu_OffsetSubtitleDate( spu_t *p_spu, mtime_t i_duration )
697 {
698     spu_private_t *p_sys = p_spu->p;
699
700     vlc_mutex_lock( &p_sys->lock );
701     for( int i = 0; i < VOUT_MAX_SUBPICTURES; i++ )
702     {
703         spu_heap_entry_t *p_entry = &p_sys->heap.p_entry[i];
704         subpicture_t *p_current = p_entry->p_subpicture;
705
706         if( p_current && p_current->b_subtitle )
707         {
708             if( p_current->i_start > 0 )
709                 p_current->i_start += i_duration;
710             if( p_current->i_stop > 0 )
711                 p_current->i_stop += i_duration;
712         }
713     }
714     vlc_mutex_unlock( &p_sys->lock );
715 }
716
717 int spu_RegisterChannel( spu_t *p_spu )
718 {
719     spu_private_t *p_sys = p_spu->p;
720
721     vlc_mutex_lock( &p_sys->lock );
722     int i_channel = p_sys->i_channel++;
723     vlc_mutex_unlock( &p_sys->lock );
724
725     return i_channel;
726 }
727
728 void spu_ClearChannel( spu_t *p_spu, int i_channel )
729 {
730     spu_private_t *p_sys = p_spu->p;
731
732     vlc_mutex_lock( &p_sys->lock );
733
734     for( int i_subpic = 0; i_subpic < VOUT_MAX_SUBPICTURES; i_subpic++ )
735     {
736         spu_heap_entry_t *p_entry = &p_sys->heap.p_entry[i_subpic];
737         subpicture_t *p_subpic = p_entry->p_subpicture;
738
739         if( !p_subpic )
740             continue;
741         if( p_subpic->i_channel != i_channel && ( i_channel != -1 || p_subpic->i_channel == SPU_DEFAULT_CHANNEL ) )
742             continue;
743
744         /* You cannot delete subpicture outside of spu_SortSubpictures */
745         p_entry->b_reject = true;
746     }
747
748     vlc_mutex_unlock( &p_sys->lock );
749 }
750
751 void spu_ChangeFilters( spu_t *p_spu, const char *psz_filters )
752 {
753     spu_private_t *p_sys = p_spu->p;
754
755     vlc_mutex_lock( &p_sys->lock );
756
757     free( p_sys->psz_chain_update );
758     p_sys->psz_chain_update = strdup( psz_filters );
759
760     vlc_mutex_unlock( &p_sys->lock );
761 }
762
763 void spu_ChangeMargin( spu_t *p_spu, int i_margin )
764 {
765     spu_private_t *p_sys = p_spu->p;
766
767     vlc_mutex_lock( &p_sys->lock );
768     p_sys->i_margin = i_margin;
769     vlc_mutex_unlock( &p_sys->lock );
770 }
771
772 /*****************************************************************************
773  * subpicture_t allocation
774  *****************************************************************************/
775 struct subpicture_private_t
776 {
777     video_format_t src;
778     video_format_t dst;
779 };
780
781 subpicture_t *subpicture_New( const subpicture_updater_t *p_upd )
782 {
783     subpicture_t *p_subpic = calloc( 1, sizeof(*p_subpic) );
784     if( !p_subpic )
785         return NULL;
786
787     p_subpic->i_order    = 0;
788     p_subpic->b_absolute = true;
789     p_subpic->b_fade     = false;
790     p_subpic->b_subtitle = false;
791     p_subpic->i_alpha    = 0xFF;
792     p_subpic->p_region   = NULL;
793
794     if( p_upd )
795     {
796         subpicture_private_t *p_private = malloc( sizeof(*p_private) );
797         if( !p_private )
798         {
799             free( p_subpic );
800             return NULL;
801         }
802         video_format_Init( &p_private->src, 0 );
803         video_format_Init( &p_private->dst, 0 );
804
805         p_subpic->updater   = *p_upd;
806         p_subpic->p_private = p_private;
807     }
808     else
809     {
810         p_subpic->p_private = NULL;
811
812         p_subpic->updater.pf_validate = NULL;
813         p_subpic->updater.pf_update   = NULL;
814         p_subpic->updater.pf_destroy  = NULL;
815         p_subpic->updater.p_sys       = NULL;
816     }
817     return p_subpic;
818 }
819
820 void subpicture_Delete( subpicture_t *p_subpic )
821 {
822     subpicture_region_ChainDelete( p_subpic->p_region );
823     p_subpic->p_region = NULL;
824
825     if( p_subpic->updater.pf_destroy )
826         p_subpic->updater.pf_destroy( p_subpic );
827
828     free( p_subpic->p_private );
829     free( p_subpic );
830 }
831
832 static void SubpictureChain( subpicture_t **pp_head, subpicture_t *p_subpic )
833 {
834     p_subpic->p_next = *pp_head;
835
836     *pp_head = p_subpic;
837 }
838
839 subpicture_t *subpicture_NewFromPicture( vlc_object_t *p_obj,
840                                          picture_t *p_picture, vlc_fourcc_t i_chroma )
841 {
842     /* */
843     video_format_t fmt_in = p_picture->format;
844
845     /* */
846     video_format_t fmt_out;
847     fmt_out = fmt_in;
848     fmt_out.i_chroma = i_chroma;
849
850     /* */
851     image_handler_t *p_image = image_HandlerCreate( p_obj );
852     if( !p_image )
853         return NULL;
854
855     picture_t *p_pip = image_Convert( p_image, p_picture, &fmt_in, &fmt_out );
856
857     image_HandlerDelete( p_image );
858
859     if( !p_pip )
860         return NULL;
861
862     subpicture_t *p_subpic = subpicture_New( NULL );
863     if( !p_subpic )
864     {
865          picture_Release( p_pip );
866          return NULL;
867     }
868
869     p_subpic->i_original_picture_width  = fmt_out.i_width;
870     p_subpic->i_original_picture_height = fmt_out.i_height;
871
872     fmt_out.i_sar_num =
873     fmt_out.i_sar_den = 0;
874
875     p_subpic->p_region = subpicture_region_New( &fmt_out );
876     if( p_subpic->p_region )
877     {
878         picture_Release( p_subpic->p_region->p_picture );
879         p_subpic->p_region->p_picture = p_pip;
880     }
881     else
882     {
883         picture_Release( p_pip );
884     }
885     return p_subpic;
886 }
887
888 static void SubpictureUpdate( subpicture_t *p_subpicture,
889                               const video_format_t *p_fmt_src,
890                               const video_format_t *p_fmt_dst,
891                               mtime_t i_ts )
892 {
893     subpicture_updater_t *p_upd = &p_subpicture->updater;
894     subpicture_private_t *p_private = p_subpicture->p_private;
895
896     if( !p_upd->pf_validate )
897         return;
898     if( !p_upd->pf_validate( p_subpicture,
899                           !video_format_IsSimilar( p_fmt_src,
900                                                    &p_private->src ), p_fmt_src,
901                           !video_format_IsSimilar( p_fmt_dst,
902                                                    &p_private->dst ), p_fmt_dst,
903                           i_ts ) )
904         return;
905
906     subpicture_region_ChainDelete( p_subpicture->p_region );
907     p_subpicture->p_region = NULL;
908
909     p_upd->pf_update( p_subpicture, p_fmt_src, p_fmt_dst, i_ts );
910
911     video_format_Clean( &p_private->src );
912     video_format_Clean( &p_private->dst );
913
914     video_format_Copy( &p_private->src, p_fmt_src );
915     video_format_Copy( &p_private->dst, p_fmt_dst );
916 }
917
918 /*****************************************************************************
919  * subpicture_region_t allocation
920  *****************************************************************************/
921 subpicture_region_t *subpicture_region_New( const video_format_t *p_fmt )
922 {
923     subpicture_region_t *p_region = calloc( 1, sizeof(*p_region ) );
924     if( !p_region )
925         return NULL;
926
927     p_region->fmt = *p_fmt;
928     p_region->fmt.p_palette = NULL;
929     if( p_fmt->i_chroma == VLC_CODEC_YUVP )
930     {
931         p_region->fmt.p_palette = calloc( 1, sizeof(*p_region->fmt.p_palette) );
932         if( p_fmt->p_palette )
933             *p_region->fmt.p_palette = *p_fmt->p_palette;
934     }
935     p_region->i_alpha = 0xff;
936     p_region->p_next = NULL;
937     p_region->p_private = NULL;
938     p_region->psz_text = NULL;
939     p_region->p_style = NULL;
940     p_region->p_picture = NULL;
941
942     if( p_fmt->i_chroma == VLC_CODEC_TEXT )
943         return p_region;
944
945     p_region->p_picture = picture_NewFromFormat( p_fmt );
946     if( !p_region->p_picture )
947     {
948         free( p_region->fmt.p_palette );
949         free( p_region );
950         return NULL;
951     }
952
953     return p_region;
954 }
955
956 /* */
957 void subpicture_region_Delete( subpicture_region_t *p_region )
958 {
959     if( !p_region )
960         return;
961
962     if( p_region->p_private )
963         SpuRegionPrivateDelete( p_region->p_private );
964
965     if( p_region->p_picture )
966         picture_Release( p_region->p_picture );
967
968     free( p_region->fmt.p_palette );
969
970     free( p_region->psz_text );
971     free( p_region->psz_html );
972     if( p_region->p_style )
973         text_style_Delete( p_region->p_style );
974     free( p_region );
975 }
976
977 /* */
978 void subpicture_region_ChainDelete( subpicture_region_t *p_head )
979 {
980     while( p_head )
981     {
982         subpicture_region_t *p_next = p_head->p_next;
983
984         subpicture_region_Delete( p_head );
985
986         p_head = p_next;
987     }
988 }
989
990
991
992 /*****************************************************************************
993  * heap managment
994  *****************************************************************************/
995 static void SpuHeapInit( spu_heap_t *p_heap )
996 {
997     for( int i = 0; i < VOUT_MAX_SUBPICTURES; i++ )
998     {
999         spu_heap_entry_t *e = &p_heap->p_entry[i];
1000
1001         e->p_subpicture = NULL;
1002         e->b_reject = false;
1003     }
1004 }
1005
1006 static int SpuHeapPush( spu_heap_t *p_heap, subpicture_t *p_subpic )
1007 {
1008     for( int i = 0; i < VOUT_MAX_SUBPICTURES; i++ )
1009     {
1010         spu_heap_entry_t *e = &p_heap->p_entry[i];
1011
1012         if( e->p_subpicture )
1013             continue;
1014
1015         e->p_subpicture = p_subpic;
1016         e->b_reject = false;
1017         return VLC_SUCCESS;
1018     }
1019     return VLC_EGENERIC;
1020 }
1021
1022 static void SpuHeapDeleteAt( spu_heap_t *p_heap, int i_index )
1023 {
1024     spu_heap_entry_t *e = &p_heap->p_entry[i_index];
1025
1026     if( e->p_subpicture )
1027         subpicture_Delete( e->p_subpicture );
1028
1029     e->p_subpicture = NULL;
1030 }
1031
1032 static int SpuHeapDeleteSubpicture( spu_heap_t *p_heap, subpicture_t *p_subpic )
1033 {
1034     for( int i = 0; i < VOUT_MAX_SUBPICTURES; i++ )
1035     {
1036         spu_heap_entry_t *e = &p_heap->p_entry[i];
1037
1038         if( e->p_subpicture != p_subpic )
1039             continue;
1040
1041         SpuHeapDeleteAt( p_heap, i );
1042         return VLC_SUCCESS;
1043     }
1044     return VLC_EGENERIC;
1045 }
1046
1047 static void SpuHeapClean( spu_heap_t *p_heap )
1048 {
1049     for( int i = 0; i < VOUT_MAX_SUBPICTURES; i++ )
1050     {
1051         spu_heap_entry_t *e = &p_heap->p_entry[i];
1052         if( e->p_subpicture )
1053             subpicture_Delete( e->p_subpicture );
1054     }
1055 }
1056
1057 static subpicture_region_private_t *SpuRegionPrivateNew( video_format_t *p_fmt )
1058 {
1059     subpicture_region_private_t *p_private = malloc( sizeof(*p_private) );
1060
1061     if( !p_private )
1062         return NULL;
1063
1064     p_private->fmt = *p_fmt;
1065     if( p_fmt->p_palette )
1066     {
1067         p_private->fmt.p_palette = malloc( sizeof(*p_private->fmt.p_palette) );
1068         if( p_private->fmt.p_palette )
1069             *p_private->fmt.p_palette = *p_fmt->p_palette;
1070     }
1071     p_private->p_picture = NULL;
1072
1073     return p_private;
1074 }
1075 static void SpuRegionPrivateDelete( subpicture_region_private_t *p_private )
1076 {
1077     if( p_private->p_picture )
1078         picture_Release( p_private->p_picture );
1079     free( p_private->fmt.p_palette );
1080     free( p_private );
1081 }
1082
1083 static void FilterRelease( filter_t *p_filter )
1084 {
1085     if( p_filter->p_module )
1086         module_unneed( p_filter, p_filter->p_module );
1087     if( p_filter->p_owner )
1088         free( p_filter->p_owner );
1089
1090     vlc_object_release( p_filter );
1091 }
1092
1093 static void SpuRenderCreateAndLoadText( spu_t *p_spu )
1094 {
1095     filter_t *p_text;
1096
1097     assert( !p_spu->p->p_text );
1098
1099     p_spu->p->p_text =
1100     p_text        = vlc_custom_create( p_spu, sizeof(filter_t),
1101                                        VLC_OBJECT_GENERIC, "spu text" );
1102     if( !p_text )
1103         return;
1104
1105     p_text->p_owner = xmalloc( sizeof(*p_text->p_owner) );
1106     p_text->p_owner->p_spu = p_spu;
1107
1108     es_format_Init( &p_text->fmt_in, VIDEO_ES, 0 );
1109
1110     es_format_Init( &p_text->fmt_out, VIDEO_ES, 0 );
1111     p_text->fmt_out.video.i_width =
1112     p_text->fmt_out.video.i_visible_width = 32;
1113     p_text->fmt_out.video.i_height =
1114     p_text->fmt_out.video.i_visible_height = 32;
1115
1116     p_text->pf_get_attachments = spu_get_attachments;
1117
1118     vlc_object_attach( p_text, p_spu );
1119
1120     /* FIXME TOCHECK shouldn't module_need( , , psz_modulename, false ) do the
1121      * same than these 2 calls ? */
1122     char *psz_modulename = var_CreateGetString( p_spu, "text-renderer" );
1123     if( psz_modulename && *psz_modulename )
1124     {
1125         p_text->p_module = module_need( p_text, "text renderer",
1126                                         psz_modulename, true );
1127     }
1128     free( psz_modulename );
1129
1130     if( !p_text->p_module )
1131         p_text->p_module = module_need( p_text, "text renderer", NULL, false );
1132
1133     /* Create a few variables used for enhanced text rendering */
1134     var_Create( p_text, "spu-duration", VLC_VAR_TIME );
1135     var_Create( p_text, "spu-elapsed", VLC_VAR_TIME );
1136     var_Create( p_text, "text-rerender", VLC_VAR_BOOL );
1137     var_Create( p_text, "scale", VLC_VAR_INTEGER );
1138 }
1139
1140 static filter_t *CreateAndLoadScale( vlc_object_t *p_obj,
1141                                      vlc_fourcc_t i_src_chroma, vlc_fourcc_t i_dst_chroma,
1142                                      bool b_resize )
1143 {
1144     filter_t *p_scale;
1145
1146     p_scale = vlc_custom_create( p_obj, sizeof(filter_t),
1147                                  VLC_OBJECT_GENERIC, "scale" );
1148     if( !p_scale )
1149         return NULL;
1150
1151     es_format_Init( &p_scale->fmt_in, VIDEO_ES, 0 );
1152     p_scale->fmt_in.video.i_chroma = i_src_chroma;
1153     p_scale->fmt_in.video.i_width =
1154     p_scale->fmt_in.video.i_height = 32;
1155
1156     es_format_Init( &p_scale->fmt_out, VIDEO_ES, 0 );
1157     p_scale->fmt_out.video.i_chroma = i_dst_chroma;
1158     p_scale->fmt_out.video.i_width =
1159     p_scale->fmt_out.video.i_height = b_resize ? 16 : 32;
1160
1161     p_scale->pf_video_buffer_new = spu_new_video_buffer;
1162     p_scale->pf_video_buffer_del = spu_del_video_buffer;
1163
1164     vlc_object_attach( p_scale, p_obj );
1165     p_scale->p_module = module_need( p_scale, "video filter2", NULL, false );
1166
1167     return p_scale;
1168 }
1169 static void SpuRenderCreateAndLoadScale( spu_t *p_spu )
1170 {
1171     assert( !p_spu->p->p_scale );
1172     assert( !p_spu->p->p_scale_yuvp );
1173     /* XXX p_spu->p_scale is used for all conversion/scaling except yuvp to
1174      * yuva/rgba */
1175     p_spu->p->p_scale = CreateAndLoadScale( VLC_OBJECT(p_spu),
1176                                             VLC_CODEC_YUVA, VLC_CODEC_YUVA, true );
1177     /* This one is used for YUVP to YUVA/RGBA without scaling
1178      * FIXME rename it */
1179     p_spu->p->p_scale_yuvp = CreateAndLoadScale( VLC_OBJECT(p_spu),
1180                                                  VLC_CODEC_YUVP, VLC_CODEC_YUVA, false );
1181 }
1182
1183 static void SpuRenderText( spu_t *p_spu, bool *pb_rerender_text,
1184                            subpicture_t *p_subpic, subpicture_region_t *p_region,
1185                            int i_min_scale_ratio, mtime_t render_date )
1186 {
1187     filter_t *p_text = p_spu->p->p_text;
1188
1189     assert( p_region->fmt.i_chroma == VLC_CODEC_TEXT );
1190
1191     if( !p_text || !p_text->p_module )
1192         goto exit;
1193
1194     /* Setup 3 variables which can be used to render
1195      * time-dependent text (and effects). The first indicates
1196      * the total amount of time the text will be on screen,
1197      * the second the amount of time it has already been on
1198      * screen (can be a negative value as text is layed out
1199      * before it is rendered) and the third is a feedback
1200      * variable from the renderer - if the renderer sets it
1201      * then this particular text is time-dependent, eg. the
1202      * visual progress bar inside the text in karaoke and the
1203      * text needs to be rendered multiple times in order for
1204      * the effect to work - we therefore need to return the
1205      * region to its original state at the end of the loop,
1206      * instead of leaving it in YUVA or YUVP.
1207      * Any renderer which is unaware of how to render
1208      * time-dependent text can happily ignore the variables
1209      * and render the text the same as usual - it should at
1210      * least show up on screen, but the effect won't change
1211      * the text over time.
1212      */
1213     var_SetTime( p_text, "spu-duration", p_subpic->i_stop - p_subpic->i_start );
1214     var_SetTime( p_text, "spu-elapsed", render_date );
1215     var_SetBool( p_text, "text-rerender", false );
1216     var_SetInteger( p_text, "scale", i_min_scale_ratio );
1217
1218     if( p_text->pf_render_html && p_region->psz_html )
1219     {
1220         p_text->pf_render_html( p_text, p_region, p_region );
1221     }
1222     else if( p_text->pf_render_text )
1223     {
1224         p_text->pf_render_text( p_text, p_region, p_region );
1225     }
1226     *pb_rerender_text = var_GetBool( p_text, "text-rerender" );
1227
1228 exit:
1229     p_region->i_align |= SUBPICTURE_RENDERED;
1230 }
1231
1232 /**
1233  * A few scale functions helpers.
1234  */
1235 static spu_scale_t spu_scale_create( int w, int h )
1236 {
1237     spu_scale_t s = { .w = w, .h = h };
1238     if( s.w <= 0 )
1239         s.w = SCALE_UNIT;
1240     if( s.h <= 0 )
1241         s.h = SCALE_UNIT;
1242     return s;
1243 }
1244 static spu_scale_t spu_scale_unit( void )
1245 {
1246     return spu_scale_create( SCALE_UNIT, SCALE_UNIT );
1247 }
1248 static spu_scale_t spu_scale_createq( int wn, int wd, int hn, int hd )
1249 {
1250     return spu_scale_create( wn * SCALE_UNIT / wd,
1251                              hn * SCALE_UNIT / hd );
1252 }
1253 static int spu_scale_w( int v, const spu_scale_t s )
1254 {
1255     return v * s.w / SCALE_UNIT;
1256 }
1257 static int spu_scale_h( int v, const spu_scale_t s )
1258 {
1259     return v * s.h / SCALE_UNIT;
1260 }
1261 static int spu_invscale_w( int v, const spu_scale_t s )
1262 {
1263     return v * SCALE_UNIT / s.w;
1264 }
1265 static int spu_invscale_h( int v, const spu_scale_t s )
1266 {
1267     return v * SCALE_UNIT / s.h;
1268 }
1269
1270 /**
1271  * A few area functions helpers
1272  */
1273 static spu_area_t spu_area_create( int x, int y, int w, int h, spu_scale_t s )
1274 {
1275     spu_area_t a = { .i_x = x, .i_y = y, .i_width = w, .i_height = h, .scale = s };
1276     return a;
1277 }
1278 static spu_area_t spu_area_scaled( spu_area_t a )
1279 {
1280     if( a.scale.w == SCALE_UNIT && a.scale.h == SCALE_UNIT )
1281         return a;
1282
1283     a.i_x = spu_scale_w( a.i_x, a.scale );
1284     a.i_y = spu_scale_h( a.i_y, a.scale );
1285
1286     a.i_width  = spu_scale_w( a.i_width,  a.scale );
1287     a.i_height = spu_scale_h( a.i_height, a.scale );
1288
1289     a.scale = spu_scale_unit();
1290     return a;
1291 }
1292 static spu_area_t spu_area_unscaled( spu_area_t a, spu_scale_t s )
1293 {
1294     if( a.scale.w == s.w && a.scale.h == s.h )
1295         return a;
1296
1297     a = spu_area_scaled( a );
1298
1299     a.i_x = spu_invscale_w( a.i_x, s );
1300     a.i_y = spu_invscale_h( a.i_y, s );
1301
1302     a.i_width  = spu_invscale_w( a.i_width, s );
1303     a.i_height = spu_invscale_h( a.i_height, s );
1304
1305     a.scale = s;
1306     return a;
1307 }
1308 static bool spu_area_overlap( spu_area_t a, spu_area_t b )
1309 {
1310     const int i_dx = 0;
1311     const int i_dy = 0;
1312
1313     a = spu_area_scaled( a );
1314     b = spu_area_scaled( b );
1315
1316     return  __MAX( a.i_x-i_dx, b.i_x ) < __MIN( a.i_x+a.i_width +i_dx, b.i_x+b.i_width  ) &&
1317             __MAX( a.i_y-i_dy, b.i_y ) < __MIN( a.i_y+a.i_height+i_dy, b.i_y+b.i_height );
1318 }
1319
1320 /**
1321  * Avoid area overlapping
1322  */
1323 static void SpuAreaFixOverlap( spu_area_t *p_dst,
1324                                const spu_area_t *p_sub, int i_sub, int i_align )
1325 {
1326     spu_area_t a = spu_area_scaled( *p_dst );
1327     bool b_moved = false;
1328     bool b_ok;
1329
1330     /* Check for overlap
1331      * XXX It is not fast O(n^2) but we should not have a lot of region */
1332     do
1333     {
1334         b_ok = true;
1335         for( int i = 0; i < i_sub; i++ )
1336         {
1337             spu_area_t sub = spu_area_scaled( p_sub[i] );
1338
1339             if( !spu_area_overlap( a, sub ) )
1340                 continue;
1341
1342             if( i_align & SUBPICTURE_ALIGN_TOP )
1343             {
1344                 /* We go down */
1345                 int i_y = sub.i_y + sub.i_height;
1346                 a.i_y = i_y;
1347                 b_moved = true;
1348             }
1349             else if( i_align & SUBPICTURE_ALIGN_BOTTOM )
1350             {
1351                 /* We go up */
1352                 int i_y = sub.i_y - a.i_height;
1353                 a.i_y = i_y;
1354                 b_moved = true;
1355             }
1356             else
1357             {
1358                 /* TODO what to do in this case? */
1359                 //fprintf( stderr, "Overlap with unsupported alignment\n" );
1360                 break;
1361             }
1362
1363             b_ok = false;
1364             break;
1365         }
1366     } while( !b_ok );
1367
1368     if( b_moved )
1369         *p_dst = spu_area_unscaled( a, p_dst->scale );
1370 }
1371
1372
1373 static void SpuAreaFitInside( spu_area_t *p_area, const spu_area_t *p_boundary )
1374 {
1375   spu_area_t a = spu_area_scaled( *p_area );
1376
1377   const int i_error_x = (a.i_x + a.i_width) - p_boundary->i_width;
1378   if( i_error_x > 0 )
1379       a.i_x -= i_error_x;
1380   if( a.i_x < 0 )
1381       a.i_x = 0;
1382
1383   const int i_error_y = (a.i_y + a.i_height) - p_boundary->i_height;
1384   if( i_error_y > 0 )
1385       a.i_y -= i_error_y;
1386   if( a.i_y < 0 )
1387       a.i_y = 0;
1388
1389   *p_area = spu_area_unscaled( a, p_area->scale );
1390 }
1391
1392 /**
1393  * Place a region
1394  */
1395 static void SpuRegionPlace( int *pi_x, int *pi_y,
1396                             const subpicture_t *p_subpic,
1397                             const subpicture_region_t *p_region )
1398 {
1399     const int i_delta_x = p_region->i_x;
1400     const int i_delta_y = p_region->i_y;
1401     int i_x, i_y;
1402
1403     assert( p_region->i_x != INT_MAX && p_region->i_y != INT_MAX );
1404     if( p_region->i_align & SUBPICTURE_ALIGN_TOP )
1405     {
1406         i_y = i_delta_y;
1407     }
1408     else if( p_region->i_align & SUBPICTURE_ALIGN_BOTTOM )
1409     {
1410         i_y = p_subpic->i_original_picture_height - p_region->fmt.i_height - i_delta_y;
1411     }
1412     else
1413     {
1414         i_y = p_subpic->i_original_picture_height / 2 - p_region->fmt.i_height / 2;
1415     }
1416
1417     if( p_region->i_align & SUBPICTURE_ALIGN_LEFT )
1418     {
1419         i_x = i_delta_x;
1420     }
1421     else if( p_region->i_align & SUBPICTURE_ALIGN_RIGHT )
1422     {
1423         i_x = p_subpic->i_original_picture_width - p_region->fmt.i_width - i_delta_x;
1424     }
1425     else
1426     {
1427         i_x = p_subpic->i_original_picture_width / 2 - p_region->fmt.i_width / 2;
1428     }
1429
1430     if( p_subpic->b_absolute )
1431     {
1432         i_x = i_delta_x;
1433         i_y = i_delta_y;
1434     }
1435
1436     *pi_x = i_x;
1437     *pi_y = i_y;
1438 }
1439
1440 /**
1441  * This function computes the current alpha value for a given region.
1442  */
1443 static int SpuRegionAlpha( subpicture_t *p_subpic, subpicture_region_t *p_region )
1444 {
1445     /* Compute alpha blend value */
1446     int i_fade_alpha = 255;
1447     if( p_subpic->b_fade )
1448     {
1449         mtime_t i_fade_start = ( p_subpic->i_stop +
1450                                  p_subpic->i_start ) / 2;
1451         mtime_t i_now = mdate();
1452
1453         if( i_now >= i_fade_start && p_subpic->i_stop > i_fade_start )
1454         {
1455             i_fade_alpha = 255 * ( p_subpic->i_stop - i_now ) /
1456                            ( p_subpic->i_stop - i_fade_start );
1457         }
1458     }
1459     return i_fade_alpha * p_subpic->i_alpha * p_region->i_alpha / 65025;
1460 }
1461
1462 /**
1463  * It will render the provided region onto p_pic_dst.
1464  */
1465
1466 static void SpuRenderRegion( spu_t *p_spu,
1467                              picture_t *p_pic_dst, spu_area_t *p_area,
1468                              subpicture_t *p_subpic, subpicture_region_t *p_region,
1469                              const spu_scale_t scale_size,
1470                              const video_format_t *p_fmt,
1471                              const spu_area_t *p_subtitle_area, int i_subtitle_area,
1472                              mtime_t render_date )
1473 {
1474     spu_private_t *p_sys = p_spu->p;
1475
1476     video_format_t fmt_original = p_region->fmt;
1477     bool b_rerender_text = false;
1478     bool b_restore_format = false;
1479     int i_x_offset;
1480     int i_y_offset;
1481
1482     video_format_t region_fmt;
1483     picture_t *p_region_picture;
1484
1485     /* Invalidate area by default */
1486     *p_area = spu_area_create( 0,0, 0,0, scale_size );
1487
1488     /* Render text region */
1489     if( p_region->fmt.i_chroma == VLC_CODEC_TEXT )
1490     {
1491         const int i_min_scale_ratio = SCALE_UNIT; /* FIXME what is the right value? (scale_size is not) */
1492         SpuRenderText( p_spu, &b_rerender_text, p_subpic, p_region,
1493                        i_min_scale_ratio, render_date );
1494         b_restore_format = b_rerender_text;
1495
1496         /* Check if the rendering has failed ... */
1497         if( p_region->fmt.i_chroma == VLC_CODEC_TEXT )
1498             goto exit;
1499     }
1500
1501     /* Force palette if requested
1502      * FIXME b_force_palette and b_force_crop are applied to all subpictures using palette
1503      * instead of only the right one (being the dvd spu).
1504      */
1505     const bool b_using_palette = p_region->fmt.i_chroma == VLC_CODEC_YUVP;
1506     const bool b_force_palette = b_using_palette && p_sys->b_force_palette;
1507     const bool b_force_crop    = b_force_palette && p_sys->b_force_crop;
1508     bool b_changed_palette     = false;
1509
1510
1511     /* Compute the margin which is expressed in destination pixel unit
1512      * The margin is applied only to subtitle and when no forced crop is
1513      * requested (dvd menu) */
1514     int i_margin_y = 0;
1515     if( !b_force_crop && p_subpic->b_subtitle )
1516         i_margin_y = spu_invscale_h( p_sys->i_margin, scale_size );
1517
1518     /* Place the picture
1519      * We compute the position in the rendered size */
1520     SpuRegionPlace( &i_x_offset, &i_y_offset,
1521                     p_subpic, p_region );
1522
1523     /* Save this position for subtitle overlap support
1524      * it is really important that there are given without scale_size applied */
1525     *p_area = spu_area_create( i_x_offset, i_y_offset,
1526                                p_region->fmt.i_width, p_region->fmt.i_height,
1527                                scale_size );
1528
1529     /* Handle overlapping subtitles when possible */
1530     if( p_subpic->b_subtitle && !p_subpic->b_absolute )
1531     {
1532         SpuAreaFixOverlap( p_area, p_subtitle_area, i_subtitle_area,
1533                            p_region->i_align );
1534     }
1535
1536     /* we copy the area: for the subtitle overlap support we want
1537      * to only save the area without margin applied */
1538     spu_area_t restrained = *p_area;
1539
1540     /* apply margin to subtitles and correct if they go over the picture edge */
1541     if( p_subpic->b_subtitle )
1542         restrained.i_y -= i_margin_y;
1543
1544     spu_area_t display = spu_area_create( 0, 0, p_fmt->i_width, p_fmt->i_height,
1545                                           spu_scale_unit() );
1546     SpuAreaFitInside( &restrained, &display );
1547
1548     /* Fix the position for the current scale_size */
1549     i_x_offset = spu_scale_w( restrained.i_x, restrained.scale );
1550     i_y_offset = spu_scale_h( restrained.i_y, restrained.scale );
1551
1552     /* */
1553     if( b_force_palette )
1554     {
1555         video_palette_t *p_palette = p_region->fmt.p_palette;
1556         video_palette_t palette;
1557
1558         /* We suppose DVD palette here */
1559         palette.i_entries = 4;
1560         for( int i = 0; i < 4; i++ )
1561             for( int j = 0; j < 4; j++ )
1562                 palette.palette[i][j] = p_sys->palette[i][j];
1563
1564         if( p_palette->i_entries == palette.i_entries )
1565         {
1566             for( int i = 0; i < p_palette->i_entries; i++ )
1567                 for( int j = 0; j < 4; j++ )
1568                     b_changed_palette |= p_palette->palette[i][j] != palette.palette[i][j];
1569         }
1570         else
1571         {
1572             b_changed_palette = true;
1573         }
1574         *p_palette = palette;
1575     }
1576
1577     /* */
1578     region_fmt = p_region->fmt;
1579     p_region_picture = p_region->p_picture;
1580
1581
1582     /* Scale from rendered size to destination size */
1583     if( p_sys->p_scale && p_sys->p_scale->p_module &&
1584         ( !b_using_palette || ( p_sys->p_scale_yuvp && p_sys->p_scale_yuvp->p_module ) ) &&
1585         ( scale_size.w != SCALE_UNIT || scale_size.h != SCALE_UNIT || b_using_palette ) )
1586     {
1587         const unsigned i_dst_width  = spu_scale_w( p_region->fmt.i_width, scale_size );
1588         const unsigned i_dst_height = spu_scale_h( p_region->fmt.i_height, scale_size );
1589
1590         /* Destroy the cache if unusable */
1591         if( p_region->p_private )
1592         {
1593             subpicture_region_private_t *p_private = p_region->p_private;
1594             bool b_changed = false;
1595
1596             /* Check resize changes */
1597             if( i_dst_width  != p_private->fmt.i_width ||
1598                 i_dst_height != p_private->fmt.i_height )
1599                 b_changed = true;
1600
1601             /* Check forced palette changes */
1602             if( b_changed_palette )
1603                 b_changed = true;
1604
1605             if( b_changed )
1606             {
1607                 SpuRegionPrivateDelete( p_private );
1608                 p_region->p_private = NULL;
1609             }
1610         }
1611
1612         /* Scale if needed into cache */
1613         if( !p_region->p_private && i_dst_width > 0 && i_dst_height > 0 )
1614         {
1615             filter_t *p_scale = p_sys->p_scale;
1616
1617             picture_t *p_picture = p_region->p_picture;
1618             picture_Hold( p_picture );
1619
1620             /* Convert YUVP to YUVA/RGBA first for better scaling quality */
1621             if( b_using_palette )
1622             {
1623                 filter_t *p_scale_yuvp = p_sys->p_scale_yuvp;
1624
1625                 p_scale_yuvp->fmt_in.video = p_region->fmt;
1626
1627                 /* TODO converting to RGBA for RGB video output is better */
1628                 p_scale_yuvp->fmt_out.video = p_region->fmt;
1629                 p_scale_yuvp->fmt_out.video.i_chroma = VLC_CODEC_YUVA;
1630
1631                 p_picture = p_scale_yuvp->pf_video_filter( p_scale_yuvp, p_picture );
1632                 if( !p_picture )
1633                 {
1634                     /* Well we will try conversion+scaling */
1635                     msg_Warn( p_spu, "%4.4s to %4.4s conversion failed",
1636                              (const char*)&p_scale_yuvp->fmt_in.video.i_chroma,
1637                              (const char*)&p_scale_yuvp->fmt_out.video.i_chroma );
1638                 }
1639             }
1640
1641             /* Conversion(except from YUVP)/Scaling */
1642             if( p_picture &&
1643                 ( p_picture->format.i_width != i_dst_width ||
1644                   p_picture->format.i_height != i_dst_height ) )
1645             {
1646                 p_scale->fmt_in.video = p_picture->format;
1647                 p_scale->fmt_out.video = p_picture->format;
1648
1649                 p_scale->fmt_out.video.i_width = i_dst_width;
1650                 p_scale->fmt_out.video.i_height = i_dst_height;
1651
1652                 p_scale->fmt_out.video.i_visible_width =
1653                     spu_scale_w( p_region->fmt.i_visible_width, scale_size );
1654                 p_scale->fmt_out.video.i_visible_height =
1655                     spu_scale_h( p_region->fmt.i_visible_height, scale_size );
1656
1657                 p_picture = p_scale->pf_video_filter( p_scale, p_picture );
1658                 if( !p_picture )
1659                     msg_Err( p_spu, "scaling failed" );
1660             }
1661
1662             /* */
1663             if( p_picture )
1664             {
1665                 p_region->p_private = SpuRegionPrivateNew( &p_picture->format );
1666                 if( p_region->p_private )
1667                 {
1668                     p_region->p_private->p_picture = p_picture;
1669                     if( !p_region->p_private->p_picture )
1670                     {
1671                         SpuRegionPrivateDelete( p_region->p_private );
1672                         p_region->p_private = NULL;
1673                     }
1674                 }
1675                 else
1676                 {
1677                     picture_Release( p_picture );
1678                 }
1679             }
1680         }
1681
1682         /* And use the scaled picture */
1683         if( p_region->p_private )
1684         {
1685             region_fmt = p_region->p_private->fmt;
1686             p_region_picture = p_region->p_private->p_picture;
1687         }
1688     }
1689
1690     /* Force cropping if requested */
1691     if( b_force_crop )
1692     {
1693         int i_crop_x = spu_scale_w( p_sys->i_crop_x, scale_size );
1694         int i_crop_y = spu_scale_h( p_sys->i_crop_y, scale_size );
1695         int i_crop_width = spu_scale_w( p_sys->i_crop_width, scale_size );
1696         int i_crop_height= spu_scale_h( p_sys->i_crop_height,scale_size );
1697
1698         /* Find the intersection */
1699         if( i_crop_x + i_crop_width <= i_x_offset ||
1700             i_x_offset + (int)region_fmt.i_visible_width < i_crop_x ||
1701             i_crop_y + i_crop_height <= i_y_offset ||
1702             i_y_offset + (int)region_fmt.i_visible_height < i_crop_y )
1703         {
1704             /* No intersection */
1705             region_fmt.i_visible_width =
1706             region_fmt.i_visible_height = 0;
1707         }
1708         else
1709         {
1710             int i_x, i_y, i_x_end, i_y_end;
1711             i_x = __MAX( i_crop_x, i_x_offset );
1712             i_y = __MAX( i_crop_y, i_y_offset );
1713             i_x_end = __MIN( i_crop_x + i_crop_width,
1714                            i_x_offset + (int)region_fmt.i_visible_width );
1715             i_y_end = __MIN( i_crop_y + i_crop_height,
1716                            i_y_offset + (int)region_fmt.i_visible_height );
1717
1718             region_fmt.i_x_offset = i_x - i_x_offset;
1719             region_fmt.i_y_offset = i_y - i_y_offset;
1720             region_fmt.i_visible_width = i_x_end - i_x;
1721             region_fmt.i_visible_height = i_y_end - i_y;
1722
1723             i_x_offset = __MAX( i_x, 0 );
1724             i_y_offset = __MAX( i_y, 0 );
1725         }
1726     }
1727
1728     /* Update the blender */
1729     if( filter_ConfigureBlend( p_spu->p->p_blend,
1730                                p_fmt->i_width, p_fmt->i_height,
1731                                &region_fmt ) ||
1732         filter_Blend( p_spu->p->p_blend,
1733                       p_pic_dst, i_x_offset, i_y_offset,
1734                       p_region_picture, SpuRegionAlpha( p_subpic, p_region ) ) )
1735     {
1736         msg_Err( p_spu, "blending %4.4s to %4.4s failed",
1737                  (char *)&p_sys->p_blend->fmt_in.video.i_chroma,
1738                  (char *)&p_sys->p_blend->fmt_out.video.i_chroma );
1739     }
1740
1741 exit:
1742     if( b_rerender_text )
1743     {
1744         /* Some forms of subtitles need to be re-rendered more than
1745          * once, eg. karaoke. We therefore restore the region to its
1746          * pre-rendered state, so the next time through everything is
1747          * calculated again.
1748          */
1749         if( p_region->p_picture )
1750         {
1751             picture_Release( p_region->p_picture );
1752             p_region->p_picture = NULL;
1753         }
1754         if( p_region->p_private )
1755         {
1756             SpuRegionPrivateDelete( p_region->p_private );
1757             p_region->p_private = NULL;
1758         }
1759         p_region->i_align &= ~SUBPICTURE_RENDERED;
1760     }
1761     if( b_restore_format )
1762         p_region->fmt = fmt_original;
1763 }
1764
1765 /**
1766  * This function compares two 64 bits integers.
1767  * It can be used by qsort.
1768  */
1769 static int IntegerCmp( int64_t i0, int64_t i1 )
1770 {
1771     return i0 < i1 ? -1 : i0 > i1 ? 1 : 0;
1772 }
1773 /**
1774  * This function compares 2 subpictures using the following properties
1775  * (ordered by priority)
1776  * 1. absolute positionning
1777  * 2. start time
1778  * 3. creation order (per channel)
1779  *
1780  * It can be used by qsort.
1781  *
1782  * XXX spu_RenderSubpictures depends heavily on this order.
1783  */
1784 static int SubpictureCmp( const void *s0, const void *s1 )
1785 {
1786     subpicture_t *p_subpic0 = *(subpicture_t**)s0;
1787     subpicture_t *p_subpic1 = *(subpicture_t**)s1;
1788     int r;
1789
1790     r = IntegerCmp( !p_subpic0->b_absolute, !p_subpic1->b_absolute );
1791     if( !r )
1792         r = IntegerCmp( p_subpic0->i_start, p_subpic1->i_start );
1793     if( !r )
1794         r = IntegerCmp( p_subpic0->i_channel, p_subpic1->i_channel );
1795     if( !r )
1796         r = IntegerCmp( p_subpic0->i_order, p_subpic1->i_order );
1797     return r;
1798 }
1799
1800 /*****************************************************************************
1801  * Object variables callbacks
1802  *****************************************************************************/
1803
1804 /*****************************************************************************
1805  * UpdateSPU: update subpicture settings
1806  *****************************************************************************
1807  * This function is called from CropCallback and at initialization time, to
1808  * retrieve crop information from the input.
1809  *****************************************************************************/
1810 static void UpdateSPU( spu_t *p_spu, vlc_object_t *p_object )
1811 {
1812     spu_private_t *p_sys = p_spu->p;
1813     vlc_value_t val;
1814
1815     vlc_mutex_lock( &p_sys->lock );
1816
1817     p_sys->b_force_palette = false;
1818     p_sys->b_force_crop = false;
1819
1820     if( var_Get( p_object, "highlight", &val ) || !val.b_bool )
1821     {
1822         vlc_mutex_unlock( &p_sys->lock );
1823         return;
1824     }
1825
1826     p_sys->b_force_crop = true;
1827     p_sys->i_crop_x = var_GetInteger( p_object, "x-start" );
1828     p_sys->i_crop_y = var_GetInteger( p_object, "y-start" );
1829     p_sys->i_crop_width  = var_GetInteger( p_object, "x-end" ) - p_sys->i_crop_x;
1830     p_sys->i_crop_height = var_GetInteger( p_object, "y-end" ) - p_sys->i_crop_y;
1831
1832     if( var_Get( p_object, "menu-palette", &val ) == VLC_SUCCESS )
1833     {
1834         memcpy( p_sys->palette, val.p_address, 16 );
1835         p_sys->b_force_palette = true;
1836     }
1837     vlc_mutex_unlock( &p_sys->lock );
1838
1839     msg_Dbg( p_object, "crop: %i,%i,%i,%i, palette forced: %i",
1840              p_sys->i_crop_x, p_sys->i_crop_y,
1841              p_sys->i_crop_width, p_sys->i_crop_height,
1842              p_sys->b_force_palette );
1843 }
1844
1845 /*****************************************************************************
1846  * CropCallback: called when the highlight properties are changed
1847  *****************************************************************************
1848  * This callback is called from the input thread when we need cropping
1849  *****************************************************************************/
1850 static int CropCallback( vlc_object_t *p_object, char const *psz_var,
1851                          vlc_value_t oldval, vlc_value_t newval, void *p_data )
1852 {
1853     VLC_UNUSED(oldval); VLC_UNUSED(newval); VLC_UNUSED(psz_var);
1854
1855     UpdateSPU( (spu_t *)p_data, p_object );
1856     return VLC_SUCCESS;
1857 }
1858
1859 /*****************************************************************************
1860  * Buffers allocation callbacks for the filters
1861  *****************************************************************************/
1862 static int spu_get_attachments( filter_t *p_filter,
1863                                 input_attachment_t ***ppp_attachment,
1864                                 int *pi_attachment )
1865 {
1866     spu_t *p_spu = p_filter->p_owner->p_spu;
1867
1868     int i_ret = VLC_EGENERIC;
1869     if( p_spu->p->p_input )
1870         i_ret = input_Control( (input_thread_t*)p_spu->p->p_input,
1871                                INPUT_GET_ATTACHMENTS,
1872                                ppp_attachment, pi_attachment );
1873     return i_ret;
1874 }
1875
1876 static subpicture_t *sub_new_buffer( filter_t *p_filter )
1877 {
1878     filter_owner_sys_t *p_sys = p_filter->p_owner;
1879
1880     subpicture_t *p_subpicture = subpicture_New( NULL );
1881     if( p_subpicture )
1882         p_subpicture->i_channel = p_sys->i_channel;
1883     return p_subpicture;
1884 }
1885 static void sub_del_buffer( filter_t *p_filter, subpicture_t *p_subpic )
1886 {
1887     VLC_UNUSED( p_filter );
1888     subpicture_Delete( p_subpic );
1889 }
1890 static picture_t *spu_new_video_buffer( filter_t *p_filter )
1891 {
1892     const video_format_t *p_fmt = &p_filter->fmt_out.video;
1893
1894     VLC_UNUSED(p_filter);
1895     return picture_NewFromFormat( p_fmt );
1896 }
1897 static void spu_del_video_buffer( filter_t *p_filter, picture_t *p_picture )
1898 {
1899     VLC_UNUSED(p_filter);
1900     picture_Release( p_picture );
1901 }
1902
1903 static int SubFilterAllocationInit( filter_t *p_filter, void *p_data )
1904 {
1905     spu_t *p_spu = p_data;
1906
1907     filter_owner_sys_t *p_sys = malloc( sizeof(filter_owner_sys_t) );
1908     if( !p_sys )
1909         return VLC_EGENERIC;
1910
1911     p_filter->pf_sub_buffer_new = sub_new_buffer;
1912     p_filter->pf_sub_buffer_del = sub_del_buffer;
1913
1914     p_filter->p_owner = p_sys;
1915     p_sys->i_channel = spu_RegisterChannel( p_spu );
1916     p_sys->p_spu = p_spu;
1917
1918     return VLC_SUCCESS;
1919 }
1920
1921 static void SubFilterAllocationClean( filter_t *p_filter )
1922 {
1923     filter_owner_sys_t *p_sys = p_filter->p_owner;
1924
1925     spu_ClearChannel( p_sys->p_spu, p_sys->i_channel );
1926     free( p_filter->p_owner );
1927 }
1928