]> git.sesse.net Git - vlc/blob - src/input/es_out.c
* src/input/input_dec.c: Copy block_t::i_flags to sout_buffer_t::i_flags
[vlc] / src / input / es_out.c
1 /*****************************************************************************
2  * es_out.c: Es Out handler for input.
3  *****************************************************************************
4  * Copyright (C) 2003-2004 VideoLAN
5  * $Id: es_out.c,v 1.25 2004/01/31 20:21:47 fenrir Exp $
6  *
7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <stdlib.h>
28
29 #include <vlc/vlc.h>
30 #include <vlc/input.h>
31 #include <vlc/decoder.h>
32
33 #include "vlc_playlist.h"
34 #include "codecs.h"
35 #include "iso_lang.h"
36
37 /*****************************************************************************
38  * Local prototypes
39  *****************************************************************************/
40 struct es_out_id_t
41 {
42     int             i_channel;
43     es_descriptor_t *p_es;
44 };
45
46 struct es_out_sys_t
47 {
48     input_thread_t *p_input;
49     vlc_bool_t      b_pcr_set;
50
51     /* all es */
52     int         i_id;
53
54     int         i_es;
55     es_out_id_t **es;
56
57     /* mode gestion */
58     vlc_bool_t  b_active;
59     int         i_mode;
60
61     /* es count */
62     int         i_audio;
63     int         i_video;
64     int         i_sub;
65
66     /* es to select */
67     int         i_audio_last;
68     int         i_sub_last;
69
70     /* current main es */
71     es_out_id_t *p_es_audio;
72     es_out_id_t *p_es_video;
73     es_out_id_t *p_es_sub;
74 };
75
76 static es_out_id_t *EsOutAdd    ( es_out_t *, es_format_t * );
77 static int          EsOutSend   ( es_out_t *, es_out_id_t *, block_t * );
78 static void         EsOutDel    ( es_out_t *, es_out_id_t * );
79 static int          EsOutControl( es_out_t *, int i_query, va_list );
80
81 static char *LanguageGetName( const char *psz_code );
82
83 /**
84  * Create a new es_out structure
85  *
86  * \param p_input The related input thread
87  * \return the new es_out_t
88  */
89 es_out_t *input_EsOutNew( input_thread_t *p_input )
90 {
91     es_out_t     *out = malloc( sizeof( es_out_t ) );
92     es_out_sys_t *p_sys = malloc( sizeof( es_out_sys_t ) );
93     vlc_value_t  val;
94
95     out->pf_add     = EsOutAdd;
96     out->pf_send    = EsOutSend;
97     out->pf_del     = EsOutDel;
98     out->pf_control = EsOutControl;
99     out->p_sys      = p_sys;
100
101     p_sys->p_input = p_input;
102     p_sys->b_pcr_set = VLC_FALSE;
103
104     p_sys->b_active = VLC_FALSE;
105     p_sys->i_mode   = ES_OUT_MODE_AUTO;
106
107     p_sys->i_id    = 1;
108
109     p_sys->i_es    = 0;
110     p_sys->es      = NULL;
111
112     p_sys->i_audio = 0;
113     p_sys->i_video = 0;
114     p_sys->i_sub   = 0;
115
116     var_Get( p_input, "audio-channel", &val );
117     p_sys->i_audio_last = val.i_int;
118
119     var_Get( p_input, "spu-channel", &val );
120     p_sys->i_sub_last = val.i_int;
121
122     p_sys->p_es_audio = NULL;
123     p_sys->p_es_video = NULL;
124     p_sys->p_es_sub   = NULL;
125
126     return out;
127 }
128
129 /**
130  * Deletes an es_out structure
131  *
132  * \param out  the es_out structure to destroy
133  * \return nothing
134  */
135 void input_EsOutDelete( es_out_t *out )
136 {
137     es_out_sys_t *p_sys = out->p_sys;
138     int i;
139
140     for( i = 0; i < p_sys->i_es; i++ )
141     {
142         free( p_sys->es[i] );
143     }
144     if( p_sys->es )
145     {
146         free( p_sys->es );
147     }
148     free( p_sys );
149     free( out );
150 }
151
152 /**
153  * Add a program
154  *
155  * \param out the es_out
156  * \param i_group ...
157  * \return a program descriptor for the new program
158  */
159 static pgrm_descriptor_t *EsOutAddProgram( es_out_t *out, int i_group )
160 {
161     input_thread_t    *p_input = out->p_sys->p_input;
162     pgrm_descriptor_t *p_prgm;
163     es_descriptor_t   *p_pmt;
164
165     /* FIXME we should use a object variable but a lot of place in src/input
166      * have to be changed */
167     int               i_select = config_GetInt( p_input, "program" );
168
169     /* create it */
170     p_prgm = input_AddProgram( p_input, i_group, 0 );
171
172     /* XXX welcome to kludge, add a dummy es, if you want to understand
173      * why have a look at input_SetProgram. Basicaly, it assume the first
174      * es to be the PMT, how that is stupid, nevertheless it is needed for
175      * the old ts demuxer */
176     p_pmt = input_AddES( p_input, p_prgm, 0, UNKNOWN_ES, NULL, 0 );
177     p_pmt->i_fourcc = VLC_FOURCC( 'n', 'u', 'l', 'l' );
178
179     /* Select i_select or the first by default */
180     if( p_input->stream.p_selected_program == NULL &&
181         ( i_select <= 0 || i_select == i_group ) )
182     {
183         p_input->stream.p_selected_program = p_prgm;
184     }
185
186     return p_prgm;
187 }
188
189 /**
190  * Select an ES given the current mode
191  * XXX: you need to take a the lock before (stream.stream_lock)
192  *
193  * \param out The es_out structure
194  * \param es es_out_id structure
195  * \param b_force ...
196  * \return nothing
197  */
198 static void EsOutSelect( es_out_t *out, es_out_id_t *es, vlc_bool_t b_force )
199 {
200     es_out_sys_t      *p_sys = out->p_sys;
201     input_thread_t    *p_input = p_sys->p_input;
202
203     int i_cat = es->p_es->i_cat;
204
205     if( !p_sys->b_active ||
206         ( !b_force && es->p_es->fmt.i_priority < 0 ) )
207     {
208         return;
209     }
210
211     if( p_sys->i_mode == ES_OUT_MODE_ALL || b_force )
212     {
213         if( !es->p_es->p_dec )
214         {
215             input_SelectES( p_input, es->p_es );
216         }
217     }
218     else if( p_sys->i_mode == ES_OUT_MODE_AUTO )
219     {
220         int i_wanted  = -1;
221
222         if( es->p_es->p_pgrm != NULL &&
223             es->p_es->p_pgrm != p_input->stream.p_selected_program )
224         {
225             return;
226         }
227
228         if( i_cat == AUDIO_ES )
229         {
230             if( p_sys->p_es_audio &&
231                 p_sys->p_es_audio->p_es->fmt.i_priority >=
232                     es->p_es->fmt.i_priority )
233             {
234                 return;
235             }
236             i_wanted  = p_sys->i_audio_last >= 0 ?
237                             p_sys->i_audio_last : es->i_channel;
238         }
239         else if( i_cat == SPU_ES )
240         {
241             if( p_sys->p_es_sub &&
242                 p_sys->p_es_sub->p_es->fmt.i_priority >=
243                     es->p_es->fmt.i_priority )
244             {
245                 return;
246             }
247             i_wanted  = p_sys->i_sub_last;
248         }
249         else if( i_cat == VIDEO_ES )
250         {
251             i_wanted  = es->i_channel;
252         }
253
254         if( i_wanted == es->i_channel && es->p_es->p_dec == NULL )
255         {
256             input_SelectES( p_input, es->p_es );
257         }
258     }
259
260     /* FIXME TODO handle priority here */
261     if( es->p_es->p_dec )
262     {
263         if( i_cat == AUDIO_ES )
264         {
265             if( p_sys->i_mode == ES_OUT_MODE_AUTO &&
266                 p_sys->p_es_audio && p_sys->p_es_audio->p_es->p_dec )
267             {
268                 input_UnselectES( p_input, p_sys->p_es_audio->p_es );
269             }
270             p_sys->p_es_audio = es;
271         }
272         else if( i_cat == SPU_ES )
273         {
274             if( p_sys->i_mode == ES_OUT_MODE_AUTO &&
275                 p_sys->p_es_sub && p_sys->p_es_sub->p_es->p_dec )
276             {
277                 input_UnselectES( p_input, p_sys->p_es_sub->p_es );
278             }
279             p_sys->p_es_sub = es;
280         }
281         else if( i_cat == VIDEO_ES )
282         {
283             p_sys->p_es_video = es;
284         }
285     }
286 }
287
288 /**
289  * Add an es_out
290  *
291  * \param out the es_out to add
292  * \param fmt the es_format of the es_out
293  * \return an es_out id
294  */
295 static es_out_id_t *EsOutAdd( es_out_t *out, es_format_t *fmt )
296 {
297     es_out_sys_t      *p_sys = out->p_sys;
298     playlist_t        *p_playlist = NULL;
299     input_thread_t    *p_input = p_sys->p_input;
300     es_out_id_t       *es = malloc( sizeof( es_out_id_t ) );
301     pgrm_descriptor_t *p_prgm = NULL;
302     char              psz_cat[sizeof( _("Stream ") ) + 10];
303     input_info_category_t *p_cat;
304     char              *psz_description;
305
306     vlc_mutex_lock( &p_input->stream.stream_lock );
307     if( fmt->i_group >= 0 )
308     {
309         /* search program */
310         p_prgm = input_FindProgram( p_input, fmt->i_group );
311
312         if( p_prgm == NULL )
313         {
314             /* Create it */
315             p_prgm = EsOutAddProgram( out, fmt->i_group );
316         }
317     }
318     if( fmt->i_id < 0 )
319     {
320         fmt->i_id = out->p_sys->i_id - 1;
321     }
322
323     psz_description = LanguageGetName( fmt->psz_language );
324     es->p_es = input_AddES( p_input,
325                             p_prgm,
326                             fmt->i_id + 1,
327                             fmt->i_cat,
328                             psz_description, 0 );
329     es->p_es->i_stream_id = fmt->i_id;
330     es->p_es->i_fourcc = fmt->i_codec;
331
332     switch( fmt->i_cat )
333     {
334         case AUDIO_ES:
335         {
336             WAVEFORMATEX *p_wf =
337                 malloc( sizeof( WAVEFORMATEX ) + fmt->i_extra);
338
339             p_wf->wFormatTag        = WAVE_FORMAT_UNKNOWN;
340             p_wf->nChannels         = fmt->audio.i_channels;
341             p_wf->nSamplesPerSec    = fmt->audio.i_rate;
342             p_wf->nAvgBytesPerSec   = fmt->i_bitrate / 8;
343             p_wf->nBlockAlign       = fmt->audio.i_blockalign;
344             p_wf->wBitsPerSample    = fmt->audio.i_bitspersample;
345             p_wf->cbSize            = fmt->i_extra;
346             if( fmt->i_extra > 0 )
347             {
348                 memcpy( &p_wf[1], fmt->p_extra, fmt->i_extra );
349             }
350             es->p_es->p_waveformatex = p_wf;
351
352             es->i_channel = p_sys->i_audio;
353             break;
354         }
355         case VIDEO_ES:
356         {
357             BITMAPINFOHEADER *p_bih = malloc( sizeof( BITMAPINFOHEADER ) +
358                                               fmt->i_extra );
359             p_bih->biSize           = sizeof(BITMAPINFOHEADER) + fmt->i_extra;
360             p_bih->biWidth          = fmt->video.i_width;
361             p_bih->biHeight         = fmt->video.i_height;
362             p_bih->biPlanes         = 1;
363             p_bih->biBitCount       = 24;
364             p_bih->biCompression    = fmt->i_codec;
365             p_bih->biSizeImage      = fmt->video.i_width *
366                                           fmt->video.i_height;
367             p_bih->biXPelsPerMeter  = 0;
368             p_bih->biYPelsPerMeter  = 0;
369             p_bih->biClrUsed        = 0;
370             p_bih->biClrImportant   = 0;
371
372             if( fmt->i_extra > 0 )
373             {
374                 memcpy( &p_bih[1], fmt->p_extra, fmt->i_extra );
375             }
376             es->p_es->p_bitmapinfoheader = p_bih;
377
378             es->i_channel = p_sys->i_video;
379             break;
380         }
381         case SPU_ES:
382         {
383             subtitle_data_t *p_sub = malloc( sizeof( subtitle_data_t ) );
384             memset( p_sub, 0, sizeof( subtitle_data_t ) );
385             if( fmt->i_extra > 0 )
386             {
387                 p_sub->psz_header = malloc( fmt->i_extra  + 1 );
388                 memcpy( p_sub->psz_header, fmt->p_extra , fmt->i_extra );
389                 /* just to be sure */
390                 ((uint8_t*)fmt->p_extra)[fmt->i_extra] = '\0';
391             }
392             /* FIXME beuuuuuurk */
393             es->p_es->p_demux_data = p_sub;
394
395             es->i_channel = p_sys->i_sub;
396             break;
397         }
398
399         default:
400             es->i_channel = 0;
401             break;
402     }
403
404     sprintf( psz_cat, _("Stream %d"), out->p_sys->i_id - 1 );
405     /* Get a category and the playlist */
406     if( ( p_cat = input_InfoCategory( p_input, psz_cat ) ) &&
407         ( p_playlist = (playlist_t *)vlc_object_find( p_input,
408                        VLC_OBJECT_PLAYLIST, FIND_ANYWHERE ) ) )
409     {
410         char *psz_type;
411         switch( fmt->i_cat )
412         {
413             case AUDIO_ES:
414                 psz_type = _("Audio");
415                 break;
416             case VIDEO_ES:
417                 psz_type = _("Video");
418                 break;
419             case SPU_ES:
420                 psz_type = _("Subtitle");
421                 break;
422             default:
423                 psz_type = NULL;
424                 break;
425         }
426         if( psz_type )
427         {
428             input_AddInfo( p_cat, _("Type"), psz_type );
429             playlist_AddInfo( p_playlist, -1, psz_cat, _("Type"), psz_type );
430         }
431         input_AddInfo( p_cat, _("Codec"), "%.4s", (char*)&fmt->i_codec );
432         playlist_AddInfo( p_playlist, -1, psz_cat, _("Codec"),
433                           "%.4s",(char*)&fmt->i_codec );
434         if( *psz_description )
435         {
436             input_AddInfo( p_cat, _("Language"), psz_description );
437             playlist_AddInfo( p_playlist, -1, psz_cat, _("Language"),
438                               "%s", psz_description );
439         }
440         if( fmt->psz_description && *fmt->psz_description )
441         {
442             input_AddInfo( p_cat, _("Description"), "%s", fmt->psz_description );
443             playlist_AddInfo( p_playlist, -1, psz_cat, _("Description"),
444                               "%s", fmt->psz_description );
445         }
446
447         /* Add information */
448         switch( fmt->i_cat )
449         {
450             case AUDIO_ES:
451                 if( fmt->audio.i_channels > 0 )
452                 {
453                     input_AddInfo( p_cat, _("Channels"),
454                                    "%d", fmt->audio.i_channels );
455                     playlist_AddInfo( p_playlist, -1, psz_cat, _("Channels"),
456                                       "%d", fmt->audio.i_channels );
457                 }
458                 if( fmt->audio.i_rate > 0 )
459                 {
460                     input_AddInfo( p_cat, _("Sample rate"),
461                                    _("%d Hz"), fmt->audio.i_rate );
462                     playlist_AddInfo( p_playlist, -1, psz_cat, _("Sample rate"),
463                                       _("%d Hz"), fmt->audio.i_rate );
464                 }
465                 if( fmt->audio.i_bitspersample > 0 )
466                 {
467                     input_AddInfo( p_cat, _("Bits per sample"),
468                                    "%d", fmt->audio.i_bitspersample );
469                     playlist_AddInfo( p_playlist, -1, psz_cat, _("Bits per sample"),
470                                       "%d", fmt->audio.i_bitspersample );
471                 }
472                 if( fmt->i_bitrate > 0 )
473                 {
474                     input_AddInfo( p_cat, _("Bitrate"),
475                                    _("%d bps"), fmt->i_bitrate );
476                     playlist_AddInfo( p_playlist, -1, psz_cat, _("Bitrate"),
477                                       _("%d bps"), fmt->i_bitrate );
478                 }
479                 break;
480
481             case VIDEO_ES:
482                 if( fmt->video.i_width > 0 && fmt->video.i_height > 0 )
483                 {
484                     input_AddInfo( p_cat, _("Resolution"), "%dx%d",
485                                    fmt->video.i_width, fmt->video.i_height );
486                     playlist_AddInfo( p_playlist, -1, psz_cat,
487                                     _("Resolution"), "%dx%d",
488                                     fmt->video.i_width, fmt->video.i_height );
489                 }
490                 if( fmt->video.i_visible_width > 0 &&
491                     fmt->video.i_visible_height > 0 )
492                 {
493                     input_AddInfo( p_cat, _("Display resolution"), "%dx%d",
494                                    fmt->video.i_visible_width,
495                                    fmt->video.i_visible_height);
496                      playlist_AddInfo( p_playlist, -1, psz_cat,
497                                        _("Display resolution"), "%dx%d",
498                                        fmt->video.i_visible_width,
499                                        fmt->video.i_visible_height);
500                 }
501                 break;
502
503             case SPU_ES:
504             default:
505                 break;
506         }
507         if( p_playlist ) vlc_object_release( p_playlist );
508     }
509     free( psz_description );
510
511     es_format_Copy( &es->p_es->fmt, fmt );
512
513     /* Apply mode
514      * XXX change that when we do group too */
515     if( 1 )
516     {
517         EsOutSelect( out, es, VLC_FALSE );
518     }
519     vlc_mutex_unlock( &p_input->stream.stream_lock );
520
521     TAB_APPEND( out->p_sys->i_es, out->p_sys->es, es );
522     p_sys->i_id++;  /* always incremented */
523     switch( fmt->i_cat )
524     {
525         case AUDIO_ES:
526             p_sys->i_audio++;
527             break;
528         case SPU_ES:
529             p_sys->i_sub++;
530             break;
531         case VIDEO_ES:
532             p_sys->i_video++;
533             break;
534     }
535
536     return es;
537 }
538
539 /**
540  * Send a block for the given es_out
541  *
542  * \param out the es_out to send from
543  * \param es the es_out_id
544  * \param p_block the data block to send
545  */
546 static int EsOutSend( es_out_t *out, es_out_id_t *es, block_t *p_block )
547 {
548     es_out_sys_t *p_sys = out->p_sys;
549
550     if( p_sys->b_pcr_set )
551     {
552         pgrm_descriptor_t *p_pgrm = es->p_es->p_pgrm;
553         input_thread_t    *p_input = p_sys->p_input;
554
555         if( p_pgrm == NULL )
556         {
557             p_pgrm = p_sys->p_input->stream.p_selected_program;
558         }
559
560         if( p_block->i_dts > 0 && p_pgrm )
561         {
562             p_block->i_dts =
563                 input_ClockGetTS( p_input, p_pgrm, p_block->i_dts * 9 / 100 );
564         }
565         if( p_block->i_pts > 0 && p_pgrm )
566         {
567             p_block->i_pts =
568                 input_ClockGetTS( p_input, p_pgrm, p_block->i_pts * 9 / 100 );
569         }
570     }
571
572     vlc_mutex_lock( &out->p_sys->p_input->stream.stream_lock );
573     p_block->i_rate = out->p_sys->p_input->stream.control.i_rate;
574     if( es->p_es->p_dec &&
575         (es->p_es->i_cat!=AUDIO_ES || !p_sys->p_input->stream.control.b_mute) )
576     {
577         input_DecodeBlock( es->p_es->p_dec, p_block );
578     }
579     else
580     {
581         block_Release( p_block );
582     }
583     vlc_mutex_unlock( &out->p_sys->p_input->stream.stream_lock );
584
585     return VLC_SUCCESS;
586 }
587
588 /*****************************************************************************
589  * EsOutDel:
590  *****************************************************************************/
591 static void EsOutDel( es_out_t *out, es_out_id_t *es )
592 {
593     es_out_sys_t *p_sys = out->p_sys;
594
595     TAB_REMOVE( p_sys->i_es, p_sys->es, es );
596
597     switch( es->p_es->i_cat )
598     {
599         case AUDIO_ES:
600             p_sys->i_audio--;
601             break;
602         case SPU_ES:
603             p_sys->i_sub--;
604             break;
605         case VIDEO_ES:
606             p_sys->i_video--;
607             break;
608     }
609
610     /* We don't try to reselect */
611     vlc_mutex_lock( &p_sys->p_input->stream.stream_lock );
612     if( es->p_es->p_dec )
613     {
614         input_UnselectES( p_sys->p_input, es->p_es );
615     }
616
617     if( es->p_es->p_waveformatex )
618     {
619         free( es->p_es->p_waveformatex );
620         es->p_es->p_waveformatex = NULL;
621     }
622     if( es->p_es->p_bitmapinfoheader )
623     {
624         free( es->p_es->p_bitmapinfoheader );
625         es->p_es->p_bitmapinfoheader = NULL;
626     }
627     input_DelES( p_sys->p_input, es->p_es );
628
629     if( p_sys->p_es_audio == es ) p_sys->p_es_audio = NULL;
630     if( p_sys->p_es_video == es ) p_sys->p_es_video = NULL;
631     if( p_sys->p_es_sub   == es ) p_sys->p_es_sub   = NULL;
632
633     vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
634
635     free( es );
636 }
637
638 /**
639  * Control query handler
640  *
641  * \param out the es_out to control
642  * \param i_query A es_out query as defined in include/ninput.h
643  * \param args a variable list of arguments for the query
644  * \return VLC_SUCCESS or an error code
645  */
646 static int EsOutControl( es_out_t *out, int i_query, va_list args )
647 {
648     es_out_sys_t *p_sys = out->p_sys;
649     vlc_bool_t  b, *pb;
650     int         i, *pi;
651
652     es_out_id_t *es;
653
654     switch( i_query )
655     {
656         case ES_OUT_SET_ES_STATE:
657             vlc_mutex_lock( &p_sys->p_input->stream.stream_lock );
658             es = (es_out_id_t*) va_arg( args, es_out_id_t * );
659             b = (vlc_bool_t) va_arg( args, vlc_bool_t );
660             if( b && es->p_es->p_dec == NULL )
661             {
662                 input_SelectES( p_sys->p_input, es->p_es );
663                 vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
664                 return es->p_es->p_dec ? VLC_SUCCESS : VLC_EGENERIC;
665             }
666             else if( !b && es->p_es->p_dec )
667             {
668                 input_UnselectES( p_sys->p_input, es->p_es );
669                 vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
670                 return VLC_SUCCESS;
671             }
672             vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
673             return VLC_SUCCESS;
674
675         case ES_OUT_GET_ES_STATE:
676             es = (es_out_id_t*) va_arg( args, es_out_id_t * );
677             pb = (vlc_bool_t*) va_arg( args, vlc_bool_t * );
678
679             *pb = es->p_es->p_dec ? VLC_TRUE : VLC_FALSE;
680             return VLC_SUCCESS;
681
682         case ES_OUT_SET_ACTIVE:
683         {
684             b = (vlc_bool_t) va_arg( args, vlc_bool_t );
685             p_sys->b_active = b;
686
687             if( b )
688             {
689                 vlc_value_t val;
690                 val.b_bool = VLC_TRUE;
691                 var_Set( p_sys->p_input, "intf-change", val );
692             }
693             return VLC_SUCCESS;
694         }
695
696         case ES_OUT_GET_ACTIVE:
697             pb = (vlc_bool_t*) va_arg( args, vlc_bool_t * );
698             *pb = p_sys->b_active;
699             return VLC_SUCCESS;
700
701         case ES_OUT_SET_MODE:
702             i = (int) va_arg( args, int );
703             if( i == ES_OUT_MODE_NONE || i == ES_OUT_MODE_ALL ||
704                 i == ES_OUT_MODE_AUTO )
705             {
706                 vlc_value_t val;
707
708                 p_sys->i_mode = i;
709
710                 /* Reapply policy mode */
711                 vlc_mutex_lock( &p_sys->p_input->stream.stream_lock );
712                 for( i = 0; i < p_sys->i_es; i++ )
713                 {
714                     if( p_sys->es[i]->p_es->p_dec )
715                     {
716                         input_UnselectES( p_sys->p_input, p_sys->es[i]->p_es );
717                     }
718                 }
719                 for( i = 0; i < p_sys->i_es; i++ )
720                 {
721                     EsOutSelect( out, p_sys->es[i], VLC_FALSE );
722                 }
723                 vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
724
725                 val.b_bool = VLC_TRUE;
726                 var_Set( p_sys->p_input, "intf-change", val );
727
728                 return VLC_SUCCESS;
729             }
730             return VLC_EGENERIC;
731
732         case ES_OUT_GET_MODE:
733             pi = (int*) va_arg( args, int* );
734             *pi = p_sys->i_mode;
735             return VLC_SUCCESS;
736
737         case ES_OUT_SET_ES:
738             es = (es_out_id_t*) va_arg( args, es_out_id_t * );
739             if( es == NULL )
740             {
741                 for( i = 0; i < p_sys->i_es; i++ )
742                 {
743                     vlc_mutex_lock( &p_sys->p_input->stream.stream_lock );
744                     if( p_sys->es[i]->p_es->p_dec )
745                     {
746                         input_UnselectES( p_sys->p_input, p_sys->es[i]->p_es );
747                     }
748                     vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
749                 }
750             }
751             else
752             {
753                 vlc_mutex_lock( &p_sys->p_input->stream.stream_lock );
754                 EsOutSelect( out, es, VLC_TRUE );
755                 vlc_mutex_unlock( &p_sys->p_input->stream.stream_lock );
756             }
757             return VLC_SUCCESS;
758
759         case ES_OUT_SET_PCR:
760         case ES_OUT_SET_GROUP_PCR:
761         {
762             pgrm_descriptor_t *p_prgm = NULL;
763             int64_t           i_pcr;
764
765             if( i_query == ES_OUT_SET_PCR )
766             {
767                 p_prgm = p_sys->p_input->stream.p_selected_program;
768             }
769             else
770             {
771                 int i_group = (int)va_arg( args, int );
772                 p_prgm = input_FindProgram( p_sys->p_input, i_group );
773                 if( p_prgm == NULL )
774                 {
775                     /* we create the requested program */
776                     p_prgm = EsOutAddProgram( out, i_group );
777                 }
778             }
779             i_pcr   = (int64_t)va_arg( args, int64_t );
780
781             /* search program */
782             if( p_prgm )
783             {
784                 input_ClockManageRef( p_sys->p_input, p_prgm, i_pcr * 9 / 100);
785             }
786             p_sys->b_pcr_set = VLC_TRUE;
787             return VLC_SUCCESS;
788         }
789
790         case ES_OUT_RESET_PCR:
791             for( i = 0; i < p_sys->p_input->stream.i_pgrm_number; i++ )
792             {
793                 p_sys->p_input->stream.pp_programs[i]->i_synchro_state = SYNCHRO_REINIT;
794             }
795             p_sys->b_pcr_set = VLC_TRUE;
796             return VLC_SUCCESS;
797
798         default:
799             msg_Err( p_sys->p_input, "unknown query in es_out_Control" );
800             return VLC_EGENERIC;
801     }
802 }
803
804 /****************************************************************************
805  * LanguageGetName: try to expend iso639 into plain name
806  ****************************************************************************/
807 static char *LanguageGetName( const char *psz_code )
808 {
809     const iso639_lang_t *pl;
810
811     if( psz_code == NULL )
812     {
813         return strdup( "" );
814     }
815
816     if( strlen( psz_code ) == 2 )
817     {
818         pl = GetLang_1( psz_code );
819     }
820     else if( strlen( psz_code ) == 3 )
821     {
822         pl = GetLang_2B( psz_code );
823         if( !strcmp( pl->psz_iso639_1, "??" ) )
824         {
825             pl = GetLang_2T( psz_code );
826         }
827     }
828     else
829     {
830         return strdup( psz_code );
831     }
832
833     if( !strcmp( pl->psz_iso639_1, "??" ) )
834     {
835        return strdup( psz_code );
836     }
837     else
838     {
839         if( *pl->psz_native_name )
840         {
841             return strdup( pl->psz_native_name );
842         }
843         return strdup( pl->psz_eng_name );
844     }
845 }