Fixed subtitle/osd memory leaks (subpicture_region_t->psz_text was not freed).
[vlc.git] / src / video_output / vout_subpictures.c
1 /*****************************************************************************
2  * vout_subpictures.c : subpicture management functions
3  *****************************************************************************
4  * Copyright (C) 2000-2005 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 #include <stdlib.h>                                                /* free() */
30 #include <stdio.h>                                              /* sprintf() */
31 #include <string.h>                                            /* strerror() */
32
33 #include <vlc/vlc.h>
34 #include <vlc_vout.h>
35 #include <vlc_block.h>
36 #include <vlc_filter.h>
37 #include <vlc_osd.h>
38
39 /*****************************************************************************
40  * Local prototypes
41  *****************************************************************************/
42 static void UpdateSPU   ( spu_t *, vlc_object_t * );
43 static int  CropCallback( vlc_object_t *, char const *,
44                           vlc_value_t, vlc_value_t, void * );
45
46 static int spu_vaControlDefault( spu_t *, int, va_list );
47
48 static subpicture_t *sub_new_buffer( filter_t * );
49 static void sub_del_buffer( filter_t *, subpicture_t * );
50 static subpicture_t *spu_new_buffer( filter_t * );
51 static void spu_del_buffer( filter_t *, subpicture_t * );
52 static picture_t *spu_new_video_buffer( filter_t * );
53 static void spu_del_video_buffer( filter_t *, picture_t * );
54
55 struct filter_owner_sys_t
56 {
57     spu_t *p_spu;
58     int i_channel;
59 };
60
61 /**
62  * Creates the subpicture unit
63  *
64  * \param p_this the parent object which creates the subpicture unit
65  */
66 spu_t *__spu_Create( vlc_object_t *p_this )
67 {
68     int i_index;
69     spu_t *p_spu = vlc_object_create( p_this, VLC_OBJECT_SPU );
70
71     for( i_index = 0; i_index < VOUT_MAX_SUBPICTURES; i_index++)
72     {
73         p_spu->p_subpicture[i_index].i_status = FREE_SUBPICTURE;
74     }
75
76     p_spu->p_blend = NULL;
77     p_spu->p_text = NULL;
78     p_spu->p_scale = NULL;
79     p_spu->i_filter = 0;
80     p_spu->pf_control = spu_vaControlDefault;
81
82     /* Register the default subpicture channel */
83     p_spu->i_channel = 2;
84
85     vlc_mutex_init( p_this, &p_spu->subpicture_lock );
86
87     vlc_object_attach( p_spu, p_this );
88
89     return p_spu;
90 }
91
92 /**
93  * Initialise the subpicture unit
94  *
95  * \param p_spu the subpicture unit object
96  */
97 int spu_Init( spu_t *p_spu )
98 {
99     char *psz_parser;
100     vlc_value_t val;
101
102     /* If the user requested a sub margin, we force the position. */
103     var_Create( p_spu, "sub-margin", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
104     var_Get( p_spu, "sub-margin", &val );
105     p_spu->i_margin = val.i_int;
106
107     var_Create( p_spu, "sub-filter", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
108     var_Get( p_spu, "sub-filter", &val );
109
110     psz_parser = val.psz_string;
111
112     while( psz_parser && *psz_parser )
113     {
114         config_chain_t *p_cfg; /* Do we ever need to free this ? */
115         char *psz_name;
116
117         psz_parser = config_ChainCreate( &psz_name, &p_cfg, psz_parser );
118
119         msg_Dbg( p_spu, "adding sub-filter: %s", psz_name );
120
121         p_spu->pp_filter[p_spu->i_filter] =
122             vlc_object_create( p_spu, VLC_OBJECT_FILTER );
123         vlc_object_attach( p_spu->pp_filter[p_spu->i_filter], p_spu );
124         p_spu->pp_filter[p_spu->i_filter]->pf_sub_buffer_new = sub_new_buffer;
125         p_spu->pp_filter[p_spu->i_filter]->pf_sub_buffer_del = sub_del_buffer;
126         p_spu->pp_filter[p_spu->i_filter]->p_cfg = p_cfg;;
127         p_spu->pp_filter[p_spu->i_filter]->p_module =
128             module_Need( p_spu->pp_filter[p_spu->i_filter],
129                          "sub filter", psz_name, 0 );
130         if( p_spu->pp_filter[p_spu->i_filter]->p_module )
131         {
132             filter_owner_sys_t *p_sys = malloc( sizeof(filter_owner_sys_t) );
133             p_spu->pp_filter[p_spu->i_filter]->p_owner = p_sys;
134             spu_Control( p_spu, SPU_CHANNEL_REGISTER, &p_sys->i_channel );
135             p_sys->p_spu = p_spu;
136             p_spu->i_filter++;
137         }
138         else
139         {
140             msg_Dbg( p_spu, "no sub filter found" );
141             vlc_object_detach( p_spu->pp_filter[p_spu->i_filter] );
142             vlc_object_destroy( p_spu->pp_filter[p_spu->i_filter] );
143         }
144
145         if( p_spu->i_filter >= 10 )
146         {
147             msg_Dbg( p_spu, "can't add anymore filters" );
148         }
149
150         free( psz_name );
151     }
152     if( val.psz_string ) free( val.psz_string );
153
154     return VLC_EGENERIC;
155 }
156
157 /**
158  * Destroy the subpicture unit
159  *
160  * \param p_this the parent object which destroys the subpicture unit
161  */
162 void spu_Destroy( spu_t *p_spu )
163 {
164     int i_index;
165
166     vlc_object_detach( p_spu );
167
168     /* Destroy all remaining subpictures */
169     for( i_index = 0; i_index < VOUT_MAX_SUBPICTURES; i_index++ )
170     {
171         if( p_spu->p_subpicture[i_index].i_status != FREE_SUBPICTURE )
172         {
173             spu_DestroySubpicture( p_spu, &p_spu->p_subpicture[i_index] );
174         }
175     }
176
177     if( p_spu->p_blend )
178     {
179         if( p_spu->p_blend->p_module )
180             module_Unneed( p_spu->p_blend, p_spu->p_blend->p_module );
181
182         vlc_object_detach( p_spu->p_blend );
183         vlc_object_destroy( p_spu->p_blend );
184     }
185
186     if( p_spu->p_text )
187     {
188         if( p_spu->p_text->p_module )
189             module_Unneed( p_spu->p_text, p_spu->p_text->p_module );
190
191         vlc_object_detach( p_spu->p_text );
192         vlc_object_destroy( p_spu->p_text );
193     }
194
195     if( p_spu->p_scale )
196     {
197         if( p_spu->p_scale->p_module )
198             module_Unneed( p_spu->p_scale, p_spu->p_scale->p_module );
199
200         vlc_object_detach( p_spu->p_scale );
201         vlc_object_destroy( p_spu->p_scale );
202     }
203
204     while( p_spu->i_filter-- )
205     {
206         module_Unneed( p_spu->pp_filter[p_spu->i_filter],
207                        p_spu->pp_filter[p_spu->i_filter]->p_module );
208         free( p_spu->pp_filter[p_spu->i_filter]->p_owner );
209         vlc_object_detach( p_spu->pp_filter[p_spu->i_filter] );
210         vlc_object_destroy( p_spu->pp_filter[p_spu->i_filter] );
211     }
212
213     vlc_mutex_destroy( &p_spu->subpicture_lock );
214     vlc_object_destroy( p_spu );
215 }
216
217 /**
218  * Attach/Detach the SPU from any input
219  *
220  * \param p_this the object in which to destroy the subpicture unit
221  * \param b_attach to select attach or detach
222  */
223 void spu_Attach( spu_t *p_spu, vlc_object_t *p_this, vlc_bool_t b_attach )
224 {
225     vlc_object_t *p_input;
226
227     p_input = vlc_object_find( p_this, VLC_OBJECT_INPUT, FIND_PARENT );
228     if( !p_input ) return;
229
230     if( b_attach )
231     {
232         UpdateSPU( p_spu, VLC_OBJECT(p_input) );
233         var_AddCallback( p_input, "highlight", CropCallback, p_spu );
234         vlc_object_release( p_input );
235     }
236     else
237     {
238         /* Delete callback */
239         var_DelCallback( p_input, "highlight", CropCallback, p_spu );
240         vlc_object_release( p_input );
241     }
242 }
243
244 /**
245  * Create a subpicture region
246  *
247  * \param p_this vlc_object_t
248  * \param p_fmt the format that this subpicture region should have
249  */
250 static void RegionPictureRelease( picture_t *p_pic )
251 {
252     if( p_pic->p_data_orig ) free( p_pic->p_data_orig );
253 }
254 subpicture_region_t *__spu_CreateRegion( vlc_object_t *p_this,
255                                          video_format_t *p_fmt )
256 {
257     subpicture_region_t *p_region = malloc( sizeof(subpicture_region_t) );
258     memset( p_region, 0, sizeof(subpicture_region_t) );
259     p_region->p_next = 0;
260     p_region->p_cache = 0;
261     p_region->fmt = *p_fmt;
262     p_region->psz_text = 0;
263     p_region->p_style = NULL;
264
265     if( p_fmt->i_chroma == VLC_FOURCC('Y','U','V','P') )
266         p_fmt->p_palette = p_region->fmt.p_palette =
267             malloc( sizeof(video_palette_t) );
268     else p_fmt->p_palette = p_region->fmt.p_palette = NULL;
269
270     p_region->picture.p_data_orig = NULL;
271
272     if( p_fmt->i_chroma == VLC_FOURCC('T','E','X','T') ) return p_region;
273
274     vout_AllocatePicture( p_this, &p_region->picture, p_fmt->i_chroma,
275                           p_fmt->i_width, p_fmt->i_height, p_fmt->i_aspect );
276
277     if( !p_region->picture.i_planes )
278     {
279         free( p_region );
280         free( p_fmt->p_palette );
281         return NULL;
282     }
283
284     p_region->picture.pf_release = RegionPictureRelease;
285
286     return p_region;
287 }
288
289 /**
290  * Make a subpicture region from an existing picture_t
291  *
292  * \param p_this vlc_object_t
293  * \param p_fmt the format that this subpicture region should have
294  * \param p_pic a pointer to the picture creating the region (not freed)
295  */
296 subpicture_region_t *__spu_MakeRegion( vlc_object_t *p_this,
297                                        video_format_t *p_fmt,
298                                        picture_t *p_pic )
299 {
300     subpicture_region_t *p_region = malloc( sizeof(subpicture_region_t) );
301     memset( p_region, 0, sizeof(subpicture_region_t) );
302     p_region->p_next = 0;
303     p_region->p_cache = 0;
304     p_region->fmt = *p_fmt;
305     p_region->psz_text = 0;
306     p_region->p_style = NULL;
307
308     if( p_fmt->i_chroma == VLC_FOURCC('Y','U','V','P') )
309         p_fmt->p_palette = p_region->fmt.p_palette =
310             malloc( sizeof(video_palette_t) );
311     else p_fmt->p_palette = p_region->fmt.p_palette = NULL;
312
313     memcpy( &p_region->picture, p_pic, sizeof(picture_t) );
314     p_region->picture.pf_release = RegionPictureRelease;
315
316     return p_region;
317 }
318
319 /**
320  * Destroy a subpicture region
321  *
322  * \param p_this vlc_object_t
323  * \param p_region the subpicture region to destroy
324  */
325 void __spu_DestroyRegion( vlc_object_t *p_this, subpicture_region_t *p_region )
326 {
327     if( !p_region ) return;
328     if( p_region->picture.pf_release )
329         p_region->picture.pf_release( &p_region->picture );
330     if( p_region->fmt.p_palette ) free( p_region->fmt.p_palette );
331     if( p_region->p_cache ) __spu_DestroyRegion( p_this, p_region->p_cache );
332
333     if( p_region->psz_text )
334         free( p_region->psz_text );
335     //free( p_region->p_style ); FIXME --fenrir plugin does not allocate the memory for it. I think it might lead to segfault, video renderer can live longer than the decoder
336     free( p_region );
337 }
338
339 /**
340  * Display a subpicture
341  *
342  * Remove the reservation flag of a subpicture, which will cause it to be
343  * ready for display.
344  * \param p_spu the subpicture unit object
345  * \param p_subpic the subpicture to display
346  */
347 void spu_DisplaySubpicture( spu_t *p_spu, subpicture_t *p_subpic )
348 {
349     /* Check if status is valid */
350     if( p_subpic->i_status != RESERVED_SUBPICTURE )
351     {
352         msg_Err( p_spu, "subpicture %p has invalid status #%d",
353                  p_subpic, p_subpic->i_status );
354     }
355
356     /* Remove reservation flag */
357     p_subpic->i_status = READY_SUBPICTURE;
358
359     if( p_subpic->i_channel == DEFAULT_CHAN )
360     {
361         p_subpic->i_channel = 0xFFFF;
362         spu_Control( p_spu, SPU_CHANNEL_CLEAR, DEFAULT_CHAN );
363         p_subpic->i_channel = DEFAULT_CHAN;
364     }
365 }
366
367 /**
368  * Allocate a subpicture in the spu heap.
369  *
370  * This function create a reserved subpicture in the spu heap.
371  * A null pointer is returned if the function fails. This method provides an
372  * already allocated zone of memory in the spu data fields. It needs locking
373  * since several pictures can be created by several producers threads.
374  * \param p_spu the subpicture unit in which to create the subpicture
375  * \return NULL on error, a reserved subpicture otherwise
376  */
377 subpicture_t *spu_CreateSubpicture( spu_t *p_spu )
378 {
379     int                 i_subpic;                        /* subpicture index */
380     subpicture_t *      p_subpic = NULL;            /* first free subpicture */
381
382     /* Get lock */
383     vlc_mutex_lock( &p_spu->subpicture_lock );
384
385     /*
386      * Look for an empty place
387      */
388     p_subpic = NULL;
389     for( i_subpic = 0; i_subpic < VOUT_MAX_SUBPICTURES; i_subpic++ )
390     {
391         if( p_spu->p_subpicture[i_subpic].i_status == FREE_SUBPICTURE )
392         {
393             /* Subpicture is empty and ready for allocation */
394             p_subpic = &p_spu->p_subpicture[i_subpic];
395             p_spu->p_subpicture[i_subpic].i_status = RESERVED_SUBPICTURE;
396             break;
397         }
398     }
399
400     /* If no free subpicture could be found */
401     if( p_subpic == NULL )
402     {
403         msg_Err( p_spu, "subpicture heap is full" );
404         vlc_mutex_unlock( &p_spu->subpicture_lock );
405         return NULL;
406     }
407
408     /* Copy subpicture information, set some default values */
409     memset( p_subpic, 0, sizeof(subpicture_t) );
410     p_subpic->i_status   = RESERVED_SUBPICTURE;
411     p_subpic->b_absolute = VLC_TRUE;
412     p_subpic->b_pausable = VLC_FALSE;
413     p_subpic->b_fade     = VLC_FALSE;
414     p_subpic->i_alpha    = 0xFF;
415     p_subpic->p_region   = 0;
416     p_subpic->pf_render  = 0;
417     p_subpic->pf_destroy = 0;
418     p_subpic->p_sys      = 0;
419     vlc_mutex_unlock( &p_spu->subpicture_lock );
420
421     p_subpic->pf_create_region = __spu_CreateRegion;
422     p_subpic->pf_make_region = __spu_MakeRegion;
423     p_subpic->pf_destroy_region = __spu_DestroyRegion;
424
425     return p_subpic;
426 }
427
428 /**
429  * Remove a subpicture from the heap
430  *
431  * This function frees a previously reserved subpicture.
432  * It is meant to be used when the construction of a picture aborted.
433  * This function does not need locking since reserved subpictures are ignored
434  * by the spu.
435  */
436 void spu_DestroySubpicture( spu_t *p_spu, subpicture_t *p_subpic )
437 {
438     /* Get lock */
439     vlc_mutex_lock( &p_spu->subpicture_lock );
440
441     /* There can be race conditions so we need to check the status */
442     if( p_subpic->i_status == FREE_SUBPICTURE )
443     {
444         vlc_mutex_unlock( &p_spu->subpicture_lock );
445         return;
446     }
447
448     /* Check if status is valid */
449     if( ( p_subpic->i_status != RESERVED_SUBPICTURE )
450            && ( p_subpic->i_status != READY_SUBPICTURE ) )
451     {
452         msg_Err( p_spu, "subpicture %p has invalid status %d",
453                          p_subpic, p_subpic->i_status );
454     }
455
456     while( p_subpic->p_region )
457     {
458         subpicture_region_t *p_region = p_subpic->p_region;
459         p_subpic->p_region = p_region->p_next;
460         spu_DestroyRegion( p_spu, p_region );
461     }
462
463     if( p_subpic->pf_destroy )
464     {
465         p_subpic->pf_destroy( p_subpic );
466     }
467
468     p_subpic->i_status = FREE_SUBPICTURE;
469
470     vlc_mutex_unlock( &p_spu->subpicture_lock );
471 }
472
473 /*****************************************************************************
474  * spu_RenderSubpictures: render a subpicture list
475  *****************************************************************************
476  * This function renders all sub picture units in the list.
477  *****************************************************************************/
478 void spu_RenderSubpictures( spu_t *p_spu, video_format_t *p_fmt,
479                             picture_t *p_pic_dst, picture_t *p_pic_src,
480                             subpicture_t *p_subpic,
481                             int i_scale_width_orig, int i_scale_height_orig )
482 {
483     /* Get lock */
484     vlc_mutex_lock( &p_spu->subpicture_lock );
485
486     /* Check i_status again to make sure spudec hasn't destroyed the subpic */
487     while( p_subpic != NULL && p_subpic->i_status != FREE_SUBPICTURE )
488     {
489         subpicture_region_t *p_region = p_subpic->p_region;
490         int i_scale_width, i_scale_height;
491         int i_subpic_x = p_subpic->i_x;
492
493         /* Load the blending module */
494         if( !p_spu->p_blend && p_region )
495         {
496             p_spu->p_blend = vlc_object_create( p_spu, VLC_OBJECT_FILTER );
497             vlc_object_attach( p_spu->p_blend, p_spu );
498             p_spu->p_blend->fmt_out.video.i_x_offset =
499                 p_spu->p_blend->fmt_out.video.i_y_offset = 0;
500             p_spu->p_blend->fmt_out.video.i_aspect = p_fmt->i_aspect;
501             p_spu->p_blend->fmt_out.video.i_chroma = p_fmt->i_chroma;
502             p_spu->p_blend->fmt_in.video.i_chroma = VLC_FOURCC('Y','U','V','P');
503
504             p_spu->p_blend->p_module =
505                 module_Need( p_spu->p_blend, "video blending", 0, 0 );
506         }
507
508         /* Load the text rendering module */
509         if( !p_spu->p_text && p_region && p_region->fmt.i_chroma == VLC_FOURCC('T','E','X','T') )
510         {
511             char *psz_modulename = NULL;
512
513             p_spu->p_text = vlc_object_create( p_spu, VLC_OBJECT_FILTER );
514             vlc_object_attach( p_spu->p_text, p_spu );
515
516             p_spu->p_text->fmt_out.video.i_width =
517                 p_spu->p_text->fmt_out.video.i_visible_width =
518                 p_fmt->i_width;
519             p_spu->p_text->fmt_out.video.i_height =
520                 p_spu->p_text->fmt_out.video.i_visible_height =
521                 p_fmt->i_height;
522
523             p_spu->p_text->pf_sub_buffer_new = spu_new_buffer;
524             p_spu->p_text->pf_sub_buffer_del = spu_del_buffer;
525
526             psz_modulename = var_CreateGetString( p_spu, "text-renderer" );
527             if( psz_modulename && *psz_modulename )
528             {
529                 p_spu->p_text->p_module =
530                     module_Need( p_spu->p_text, "text renderer", psz_modulename, VLC_TRUE );
531             }
532             if( !p_spu->p_text->p_module )
533             {
534                 p_spu->p_text->p_module =
535                     module_Need( p_spu->p_text, "text renderer", 0, 0 );
536             }
537             if( psz_modulename ) free( psz_modulename );
538         }
539         if( p_spu->p_text )
540         {
541             if( p_subpic->i_original_picture_height > 0 &&
542                 p_subpic->i_original_picture_width  > 0 )
543             {
544                 p_spu->p_text->fmt_out.video.i_width =
545                     p_spu->p_text->fmt_out.video.i_visible_width =
546                     p_subpic->i_original_picture_width;
547                 p_spu->p_text->fmt_out.video.i_height =
548                     p_spu->p_text->fmt_out.video.i_visible_height =
549                     p_subpic->i_original_picture_height;
550             }
551             else
552             {
553                 p_spu->p_text->fmt_out.video.i_width =
554                     p_spu->p_text->fmt_out.video.i_visible_width =
555                     p_fmt->i_width;
556                 p_spu->p_text->fmt_out.video.i_height =
557                     p_spu->p_text->fmt_out.video.i_visible_height =
558                     p_fmt->i_height;
559             }
560         }
561
562         i_scale_width = i_scale_width_orig;
563         i_scale_height = i_scale_height_orig;
564
565         if( p_subpic->i_original_picture_height > 0 &&
566             p_subpic->i_original_picture_width  > 0 )
567         {
568             i_scale_width = i_scale_width * p_fmt->i_width /
569                              p_subpic->i_original_picture_width;
570             i_scale_height = i_scale_height * p_fmt->i_height /
571                              p_subpic->i_original_picture_height;
572         }
573         else if( p_subpic->i_original_picture_height > 0 )
574         {
575             i_scale_height = i_scale_height * p_fmt->i_height /
576                              p_subpic->i_original_picture_height;
577             i_scale_width = i_scale_height * i_scale_height / p_fmt->i_height; 
578         }
579
580         /* Set default subpicture aspect ratio */
581         if( p_region && p_region->fmt.i_aspect &&
582             (!p_region->fmt.i_sar_num || !p_region->fmt.i_sar_den) )
583         {
584             p_region->fmt.i_sar_den = p_region->fmt.i_aspect;
585             p_region->fmt.i_sar_num = VOUT_ASPECT_FACTOR;
586         }
587         if( p_region &&
588             (!p_region->fmt.i_sar_num || !p_region->fmt.i_sar_den) )
589         {
590             p_region->fmt.i_sar_den = p_fmt->i_sar_den;
591             p_region->fmt.i_sar_num = p_fmt->i_sar_num;
592         }
593
594         /* Take care of the aspect ratio */
595         if( p_region && p_region->fmt.i_sar_num * p_fmt->i_sar_den !=
596             p_region->fmt.i_sar_den * p_fmt->i_sar_num )
597         {
598             i_scale_width = i_scale_width *
599                 (int64_t)p_region->fmt.i_sar_num * p_fmt->i_sar_den /
600                 p_region->fmt.i_sar_den / p_fmt->i_sar_num;
601             i_subpic_x = p_subpic->i_x * i_scale_width / 1000;
602         }
603
604         /* Load the scaling module */
605         if( !p_spu->p_scale && (i_scale_width != 1000 ||
606             i_scale_height != 1000) )
607         {
608             p_spu->p_scale = vlc_object_create( p_spu, VLC_OBJECT_FILTER );
609             vlc_object_attach( p_spu->p_scale, p_spu );
610             p_spu->p_scale->fmt_out.video.i_chroma =
611                 p_spu->p_scale->fmt_in.video.i_chroma =
612                     VLC_FOURCC('Y','U','V','P');
613             p_spu->p_scale->fmt_in.video.i_width =
614                 p_spu->p_scale->fmt_in.video.i_height = 32;
615             p_spu->p_scale->fmt_out.video.i_width =
616                 p_spu->p_scale->fmt_out.video.i_height = 16;
617
618             p_spu->p_scale->pf_vout_buffer_new = spu_new_video_buffer;
619             p_spu->p_scale->pf_vout_buffer_del = spu_del_video_buffer;
620             p_spu->p_scale->p_module =
621                 module_Need( p_spu->p_scale, "video filter2", 0, 0 );
622         }
623
624         while( p_region && p_spu->p_blend && p_spu->p_blend->pf_video_blend )
625         {
626             int i_fade_alpha = 255;
627             int i_x_offset = p_region->i_x + i_subpic_x;
628             int i_y_offset = p_region->i_y + p_subpic->i_y;
629
630             if( p_region->fmt.i_chroma == VLC_FOURCC('T','E','X','T') )
631             {
632                 if( p_spu->p_text && p_spu->p_text->p_module &&
633                     p_spu->p_text->pf_render_text )
634                 {
635                     p_region->i_align = p_subpic->i_flags;
636                     p_spu->p_text->pf_render_text( p_spu->p_text,
637                                                    p_region, p_region ); 
638                 }
639             }
640
641             /* Force palette if requested */
642             if( p_spu->b_force_palette && VLC_FOURCC('Y','U','V','P') ==
643                 p_region->fmt.i_chroma )
644             {
645                 memcpy( p_region->fmt.p_palette->palette,
646                         p_spu->palette, 16 );
647             }
648
649             /* Scale SPU if necessary */
650             if( p_region->p_cache )
651             {
652                 if( i_scale_width * p_region->fmt.i_width / 1000 !=
653                     p_region->p_cache->fmt.i_width ||
654                     i_scale_height * p_region->fmt.i_height / 1000 !=
655                     p_region->p_cache->fmt.i_height )
656                 {
657                     p_subpic->pf_destroy_region( VLC_OBJECT(p_spu),
658                                                  p_region->p_cache );
659                     p_region->p_cache = 0;
660                 }
661             }
662
663             if( (i_scale_width != 1000 || i_scale_height != 1000) &&
664                 p_spu->p_scale && !p_region->p_cache )
665             {
666                 picture_t *p_pic;
667
668                 p_spu->p_scale->fmt_in.video = p_region->fmt;
669                 p_spu->p_scale->fmt_out.video = p_region->fmt;
670
671                 p_region->p_cache =
672                     p_subpic->pf_create_region( VLC_OBJECT(p_spu),
673                         &p_spu->p_scale->fmt_out.video );
674                 if( p_spu->p_scale->fmt_out.video.p_palette )
675                     *p_spu->p_scale->fmt_out.video.p_palette =
676                         *p_region->fmt.p_palette;
677                 p_region->p_cache->p_next = p_region->p_next;
678
679                 vout_CopyPicture( p_spu, &p_region->p_cache->picture,
680                                   &p_region->picture );
681
682                 p_spu->p_scale->fmt_out.video.i_width =
683                     p_region->fmt.i_width * i_scale_width / 1000;
684                 p_spu->p_scale->fmt_out.video.i_visible_width =
685                     p_region->fmt.i_visible_width * i_scale_width / 1000;
686                 p_spu->p_scale->fmt_out.video.i_height =
687                     p_region->fmt.i_height * i_scale_height / 1000;
688                 p_spu->p_scale->fmt_out.video.i_visible_height =
689                     p_region->fmt.i_visible_height * i_scale_height / 1000;
690                 p_region->p_cache->fmt = p_spu->p_scale->fmt_out.video;
691                 p_region->p_cache->i_x = p_region->i_x * i_scale_width / 1000;
692                 p_region->p_cache->i_y = p_region->i_y * i_scale_height / 1000;
693
694                 p_pic = p_spu->p_scale->pf_video_filter(
695                                  p_spu->p_scale, &p_region->p_cache->picture );
696                 if( p_pic )
697                 {
698                     picture_t p_pic_tmp = p_region->p_cache->picture;
699                     p_region->p_cache->picture = *p_pic;
700                     *p_pic = p_pic_tmp;
701                     free( p_pic );
702                 }
703             }
704             if( (i_scale_width != 1000 || i_scale_height != 1000) &&
705                 p_spu->p_scale && p_region->p_cache )
706             {
707                 p_region = p_region->p_cache;
708             }
709
710             if( p_subpic->i_flags & SUBPICTURE_ALIGN_BOTTOM )
711             {
712                 i_y_offset = p_fmt->i_height - p_region->fmt.i_height -
713                     p_subpic->i_y;
714             }
715             else if ( !(p_subpic->i_flags & SUBPICTURE_ALIGN_TOP) )
716             {
717                 i_y_offset = p_fmt->i_height / 2 - p_region->fmt.i_height / 2;
718             }
719
720             if( p_subpic->i_flags & SUBPICTURE_ALIGN_RIGHT )
721             {
722                 i_x_offset = p_fmt->i_width - p_region->fmt.i_width -
723                     i_subpic_x;
724             }
725             else if ( !(p_subpic->i_flags & SUBPICTURE_ALIGN_LEFT) )
726             {
727                 i_x_offset = p_fmt->i_width / 2 - p_region->fmt.i_width / 2;
728             }
729
730             if( p_subpic->b_absolute )
731             {
732                 i_x_offset = p_region->i_x +
733                     i_subpic_x * i_scale_width / 1000;
734                 i_y_offset = p_region->i_y +
735                     p_subpic->i_y * i_scale_height / 1000;
736
737             }
738             
739             i_x_offset = __MAX( i_x_offset, 0 );
740             i_y_offset = __MAX( i_y_offset, 0 );
741
742             if( p_spu->i_margin != 0 && p_spu->b_force_crop == VLC_FALSE )
743             {
744                 int i_diff = 0;
745                 int i_low = i_y_offset - p_spu->i_margin;
746                 int i_high = i_y_offset + p_region->fmt.i_height - p_spu->i_margin;
747
748                 /* crop extra margin to keep within bounds */
749                 if( i_low < 0 ) i_diff = i_low;
750                 if( i_high > (int)p_fmt->i_height ) i_diff = i_high - p_fmt->i_height;
751                 i_y_offset -= ( p_spu->i_margin + i_diff );
752             }
753
754             p_spu->p_blend->fmt_in.video = p_region->fmt;
755
756             /* Force cropping if requested */
757             if( p_spu->b_force_crop )
758             {
759                 video_format_t *p_fmt = &p_spu->p_blend->fmt_in.video;
760                 int i_crop_x = p_spu->i_crop_x * i_scale_width / 1000;
761                 int i_crop_y = p_spu->i_crop_y * i_scale_height / 1000;
762                 int i_crop_width = p_spu->i_crop_width * i_scale_width / 1000;
763                 int i_crop_height = p_spu->i_crop_height * i_scale_height/1000;
764
765                 /* Find the intersection */
766                 if( i_crop_x + i_crop_width <= i_x_offset ||
767                     i_x_offset + (int)p_fmt->i_visible_width < i_crop_x ||
768                     i_crop_y + i_crop_height <= i_y_offset ||
769                     i_y_offset + (int)p_fmt->i_visible_height < i_crop_y )
770                 {
771                     /* No intersection */
772                     p_fmt->i_visible_width = p_fmt->i_visible_height = 0;
773                 }
774                 else
775                 {
776                     int i_x, i_y, i_x_end, i_y_end;
777                     i_x = __MAX( i_crop_x, i_x_offset );
778                     i_y = __MAX( i_crop_y, i_y_offset );
779                     i_x_end = __MIN( i_crop_x + i_crop_width,
780                                    i_x_offset + (int)p_fmt->i_visible_width );
781                     i_y_end = __MIN( i_crop_y + i_crop_height,
782                                    i_y_offset + (int)p_fmt->i_visible_height );
783
784                     p_fmt->i_x_offset = i_x - i_x_offset;
785                     p_fmt->i_y_offset = i_y - i_y_offset;
786                     p_fmt->i_visible_width = i_x_end - i_x;
787                     p_fmt->i_visible_height = i_y_end - i_y;
788
789                     i_x_offset = i_x;
790                     i_y_offset = i_y;
791                 }
792             }
793
794             /* Update the output picture size */
795             p_spu->p_blend->fmt_out.video.i_width =
796                 p_spu->p_blend->fmt_out.video.i_visible_width =
797                     p_fmt->i_width;
798             p_spu->p_blend->fmt_out.video.i_height =
799                 p_spu->p_blend->fmt_out.video.i_visible_height =
800                     p_fmt->i_height;
801
802             if( p_subpic->b_fade )
803             {
804                 mtime_t i_fade_start = ( p_subpic->i_stop +
805                                          p_subpic->i_start ) / 2;
806                 mtime_t i_now = mdate();
807                 if( i_now >= i_fade_start && p_subpic->i_stop > i_fade_start )
808                 {
809                     i_fade_alpha = 255 * ( p_subpic->i_stop - i_now ) /
810                                    ( p_subpic->i_stop - i_fade_start );
811                 }
812             }
813
814             i_x_offset = __MAX( i_x_offset, 0 );
815             i_y_offset = __MAX( i_y_offset, 0 );
816
817             p_spu->p_blend->pf_video_blend( p_spu->p_blend, p_pic_dst,
818                 p_pic_src, &p_region->picture, i_x_offset, i_y_offset,
819                 i_fade_alpha * p_subpic->i_alpha / 255 );
820
821             p_region = p_region->p_next;
822         }
823
824         p_subpic = p_subpic->p_next;
825     }
826
827     vlc_mutex_unlock( &p_spu->subpicture_lock );
828 }
829
830 /*****************************************************************************
831  * spu_SortSubpictures: find the subpictures to display
832  *****************************************************************************
833  * This function parses all subpictures and decides which ones need to be
834  * displayed. This operation does not need lock, since only READY_SUBPICTURE
835  * are handled. If no picture has been selected, display_date will depend on
836  * the subpicture.
837  * We also check for ephemer DVD subpictures (subpictures that have
838  * to be removed if a newer one is available), which makes it a lot
839  * more difficult to guess if a subpicture has to be rendered or not.
840  *****************************************************************************/
841 subpicture_t *spu_SortSubpictures( spu_t *p_spu, mtime_t display_date,
842                                    vlc_bool_t b_paused )
843 {
844     int i_index, i_channel;
845     subpicture_t *p_subpic = NULL;
846     subpicture_t *p_ephemer;
847     mtime_t      ephemer_date;
848
849     /* Run subpicture filters */
850     for( i_index = 0; i_index < p_spu->i_filter; i_index++ )
851     {
852         subpicture_t *p_subpic_filter;
853         p_subpic_filter = p_spu->pp_filter[i_index]->
854             pf_sub_filter( p_spu->pp_filter[i_index], display_date );
855         if( p_subpic_filter )
856         {
857             spu_DisplaySubpicture( p_spu, p_subpic_filter );
858         }
859     }
860
861     /* We get an easily parsable chained list of subpictures which
862      * ends with NULL since p_subpic was initialized to NULL. */
863     for( i_channel = 0; i_channel < p_spu->i_channel; i_channel++ )
864     {
865         p_ephemer = 0;
866         ephemer_date = 0;
867
868         for( i_index = 0; i_index < VOUT_MAX_SUBPICTURES; i_index++ )
869         {
870             if( p_spu->p_subpicture[i_index].i_channel != i_channel ||
871                 p_spu->p_subpicture[i_index].i_status != READY_SUBPICTURE )
872             {
873                 continue;
874             }
875             if( display_date &&
876                 display_date < p_spu->p_subpicture[i_index].i_start )
877             {
878                 /* Too early, come back next monday */
879                 continue;
880             }
881
882             if( p_spu->p_subpicture[i_index].i_start > ephemer_date )
883                 ephemer_date = p_spu->p_subpicture[i_index].i_start;
884
885             if( display_date > p_spu->p_subpicture[i_index].i_stop &&
886                 ( !p_spu->p_subpicture[i_index].b_ephemer ||
887                   p_spu->p_subpicture[i_index].i_stop >
888                   p_spu->p_subpicture[i_index].i_start ) &&
889                 !( p_spu->p_subpicture[i_index].b_pausable &&
890                    b_paused ) )
891             {
892                 /* Too late, destroy the subpic */
893                 spu_DestroySubpicture( p_spu, &p_spu->p_subpicture[i_index] );
894                 continue;
895             }
896
897             /* If this is an ephemer subpic, add it to our list */
898             if( p_spu->p_subpicture[i_index].b_ephemer )
899             {
900                 p_spu->p_subpicture[i_index].p_next = p_ephemer;
901                 p_ephemer = &p_spu->p_subpicture[i_index];
902
903                 continue;
904             }
905
906             p_spu->p_subpicture[i_index].p_next = p_subpic;
907             p_subpic = &p_spu->p_subpicture[i_index];
908         }
909
910         /* If we found ephemer subpictures, check if they have to be
911          * displayed or destroyed */
912         while( p_ephemer != NULL )
913         {
914             subpicture_t *p_tmp = p_ephemer;
915             p_ephemer = p_ephemer->p_next;
916
917             if( p_tmp->i_start < ephemer_date )
918             {
919                 /* Ephemer subpicture has lived too long */
920                 spu_DestroySubpicture( p_spu, p_tmp );
921             }
922             else
923             {
924                 /* Ephemer subpicture can still live a bit */
925                 p_tmp->p_next = p_subpic;
926                 p_subpic = p_tmp;
927             }
928         }
929     }
930
931     return p_subpic;
932 }
933
934 /*****************************************************************************
935  * SpuClearChannel: clear an spu channel
936  *****************************************************************************
937  * This function destroys the subpictures which belong to the spu channel
938  * corresponding to i_channel_id.
939  *****************************************************************************/
940 static void SpuClearChannel( spu_t *p_spu, int i_channel )
941 {
942     int          i_subpic;                               /* subpicture index */
943     subpicture_t *p_subpic = NULL;                  /* first free subpicture */
944
945     vlc_mutex_lock( &p_spu->subpicture_lock );
946
947     for( i_subpic = 0; i_subpic < VOUT_MAX_SUBPICTURES; i_subpic++ )
948     {
949         p_subpic = &p_spu->p_subpicture[i_subpic];
950         if( p_subpic->i_status == FREE_SUBPICTURE
951             || ( p_subpic->i_status != RESERVED_SUBPICTURE
952                  && p_subpic->i_status != READY_SUBPICTURE ) )
953         {
954             continue;
955         }
956
957         if( p_subpic->i_channel == i_channel )
958         {
959             while( p_subpic->p_region )
960             {
961                 subpicture_region_t *p_region = p_subpic->p_region;
962                 p_subpic->p_region = p_region->p_next;
963                 spu_DestroyRegion( p_spu, p_region );
964             }
965
966             if( p_subpic->pf_destroy ) p_subpic->pf_destroy( p_subpic );
967             p_subpic->i_status = FREE_SUBPICTURE;
968         }
969     }
970
971     vlc_mutex_unlock( &p_spu->subpicture_lock );
972 }
973
974 /*****************************************************************************
975  * spu_ControlDefault: default methods for the subpicture unit control.
976  *****************************************************************************/
977 static int spu_vaControlDefault( spu_t *p_spu, int i_query, va_list args )
978 {
979     int *pi, i;
980
981     switch( i_query )
982     {
983     case SPU_CHANNEL_REGISTER:
984         pi = (int *)va_arg( args, int * );
985         if( pi ) *pi = p_spu->i_channel++;
986         break;
987
988     case SPU_CHANNEL_CLEAR:
989         i = (int)va_arg( args, int );
990         SpuClearChannel( p_spu, i );
991         break;
992
993     default:
994         msg_Dbg( p_spu, "control query not supported" );
995         return VLC_EGENERIC;
996     }
997
998     return VLC_SUCCESS;
999 }
1000
1001 /*****************************************************************************
1002  * Object variables callbacks
1003  *****************************************************************************/
1004
1005 /*****************************************************************************
1006  * UpdateSPU: update subpicture settings
1007  *****************************************************************************
1008  * This function is called from CropCallback and at initialization time, to
1009  * retrieve crop information from the input.
1010  *****************************************************************************/
1011 static void UpdateSPU( spu_t *p_spu, vlc_object_t *p_object )
1012 {
1013     vlc_value_t val;
1014
1015     p_spu->b_force_palette = VLC_FALSE;
1016     p_spu->b_force_crop = VLC_FALSE;
1017
1018     if( var_Get( p_object, "highlight", &val ) || !val.b_bool ) return;
1019
1020     p_spu->b_force_crop = VLC_TRUE;
1021     var_Get( p_object, "x-start", &val );
1022     p_spu->i_crop_x = val.i_int;
1023     var_Get( p_object, "y-start", &val );
1024     p_spu->i_crop_y = val.i_int;
1025     var_Get( p_object, "x-end", &val );
1026     p_spu->i_crop_width = val.i_int - p_spu->i_crop_x;
1027     var_Get( p_object, "y-end", &val );
1028     p_spu->i_crop_height = val.i_int - p_spu->i_crop_y;
1029
1030     if( var_Get( p_object, "menu-palette", &val ) == VLC_SUCCESS )
1031     {
1032         memcpy( p_spu->palette, val.p_address, 16 );
1033         p_spu->b_force_palette = VLC_TRUE;
1034     }
1035
1036     msg_Dbg( p_object, "crop: %i,%i,%i,%i, palette forced: %i",
1037              p_spu->i_crop_x, p_spu->i_crop_y,
1038              p_spu->i_crop_width, p_spu->i_crop_height,
1039              p_spu->b_force_palette );
1040 }
1041
1042 /*****************************************************************************
1043  * CropCallback: called when the highlight properties are changed
1044  *****************************************************************************
1045  * This callback is called from the input thread when we need cropping
1046  *****************************************************************************/
1047 static int CropCallback( vlc_object_t *p_object, char const *psz_var,
1048                          vlc_value_t oldval, vlc_value_t newval, void *p_data )
1049 {
1050     UpdateSPU( (spu_t *)p_data, p_object );
1051     return VLC_SUCCESS;
1052 }
1053
1054 /*****************************************************************************
1055  * Buffers allocation callbacks for the filters
1056  *****************************************************************************/
1057 static subpicture_t *sub_new_buffer( filter_t *p_filter )
1058 {
1059     filter_owner_sys_t *p_sys = p_filter->p_owner;
1060     subpicture_t *p_subpicture = spu_CreateSubpicture( p_sys->p_spu );
1061     if( p_subpicture ) p_subpicture->i_channel = p_sys->i_channel;
1062     return p_subpicture;
1063 }
1064
1065 static void sub_del_buffer( filter_t *p_filter, subpicture_t *p_subpic )
1066 {
1067     filter_owner_sys_t *p_sys = p_filter->p_owner;
1068     spu_DestroySubpicture( p_sys->p_spu, p_subpic );
1069 }
1070
1071 static subpicture_t *spu_new_buffer( filter_t *p_filter )
1072 {
1073     subpicture_t *p_subpic = (subpicture_t *)malloc(sizeof(subpicture_t));
1074     memset( p_subpic, 0, sizeof(subpicture_t) );
1075     p_subpic->b_absolute = VLC_TRUE;
1076
1077     p_subpic->pf_create_region = __spu_CreateRegion;
1078     p_subpic->pf_make_region = __spu_MakeRegion;
1079     p_subpic->pf_destroy_region = __spu_DestroyRegion;
1080
1081     return p_subpic;
1082 }
1083
1084 static void spu_del_buffer( filter_t *p_filter, subpicture_t *p_subpic )
1085 {
1086     while( p_subpic->p_region )
1087     {
1088         subpicture_region_t *p_region = p_subpic->p_region;
1089         p_subpic->p_region = p_region->p_next;
1090         p_subpic->pf_destroy_region( VLC_OBJECT(p_filter), p_region );
1091     }
1092
1093     free( p_subpic );
1094 }
1095
1096 static picture_t *spu_new_video_buffer( filter_t *p_filter )
1097 {
1098     picture_t *p_picture = malloc( sizeof(picture_t) );
1099
1100     if( vout_AllocatePicture( p_filter, p_picture,
1101                               p_filter->fmt_out.video.i_chroma,
1102                               p_filter->fmt_out.video.i_width,
1103                               p_filter->fmt_out.video.i_height,
1104                               p_filter->fmt_out.video.i_aspect )
1105         != VLC_SUCCESS )
1106     {
1107         free( p_picture );
1108         return NULL;
1109     }
1110
1111     p_picture->pf_release = RegionPictureRelease;
1112
1113     return p_picture;
1114 }
1115
1116 static void spu_del_video_buffer( filter_t *p_filter, picture_t *p_pic )
1117 {
1118     if( p_pic && p_pic->p_data_orig ) free( p_pic->p_data_orig );
1119     if( p_pic ) free( p_pic );
1120 }