c2dd544e4fdd30e2e187f3304cd72a347806d3b0
[vlc.git] / src / audio_output / input.c
1 /*****************************************************************************
2  * input.c : internal management of input streams for the audio output
3  *****************************************************************************
4  * Copyright (C) 2002-2007 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Christophe Massiot <massiot@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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27
28 #ifdef HAVE_CONFIG_H
29 # include "config.h"
30 #endif
31
32 #include <vlc_common.h>
33
34 #include <stdio.h>
35 #include <string.h>
36 #include <math.h>
37 #include <assert.h>
38
39 #include <vlc_input.h>
40 #include <vlc_vout.h>                  /* for vout_Request */
41
42 #ifdef HAVE_ALLOCA_H
43 #   include <alloca.h>
44 #endif
45 #include <vlc_aout.h>
46 #include <libvlc.h>
47
48 #include "aout_internal.h"
49
50 #define AOUT_ASSERT_MIXER_LOCKED vlc_assert_locked( &p_aout->mixer_lock )
51 #define AOUT_ASSERT_INPUT_LOCKED vlc_assert_locked( &p_input->lock )
52
53 static void inputFailure( aout_instance_t *, aout_input_t *, const char * );
54 static void inputDrop( aout_input_t *, aout_buffer_t * );
55 static void inputResamplingStop( aout_input_t *p_input );
56
57 static int VisualizationCallback( vlc_object_t *, char const *,
58                                   vlc_value_t, vlc_value_t, void * );
59 static int EqualizerCallback( vlc_object_t *, char const *,
60                               vlc_value_t, vlc_value_t, void * );
61 static int ReplayGainCallback( vlc_object_t *, char const *,
62                                vlc_value_t, vlc_value_t, void * );
63 static void ReplayGainSelect( aout_instance_t *, aout_input_t * );
64
65 static vout_thread_t *RequestVout( void *,
66                                    vout_thread_t *, video_format_t * );
67 /*****************************************************************************
68  * aout_InputNew : allocate a new input and rework the filter pipeline
69  *****************************************************************************/
70 int aout_InputNew( aout_instance_t * p_aout, aout_input_t * p_input, const aout_request_vout_t *p_request_vout )
71 {
72     audio_sample_format_t chain_input_format;
73     audio_sample_format_t chain_output_format;
74     vlc_value_t val, text;
75     char *psz_filters, *psz_visual, *psz_scaletempo;
76     int i_visual;
77
78     aout_FormatPrint( p_aout, "input", &p_input->input );
79
80     p_input->i_nb_resamplers = p_input->i_nb_filters = 0;
81
82     /* Prepare FIFO. */
83     aout_FifoInit( p_aout, &p_input->fifo, p_aout->mixer.mixer.i_rate );
84     p_input->p_first_byte_to_mix = NULL;
85
86     /* */
87     if( p_request_vout )
88     {
89         p_input->request_vout = *p_request_vout;
90     }
91     else
92     {
93         p_input->request_vout.pf_request_vout = RequestVout;
94         p_input->request_vout.p_private = p_aout;
95     }
96
97     /* Prepare format structure */
98     memcpy( &chain_input_format, &p_input->input,
99             sizeof(audio_sample_format_t) );
100     memcpy( &chain_output_format, &p_aout->mixer.mixer,
101             sizeof(audio_sample_format_t) );
102     chain_output_format.i_rate = p_input->input.i_rate;
103     aout_FormatPrepare( &chain_output_format );
104
105     /* Now add user filters */
106     if( var_Type( p_aout, "visual" ) == 0 )
107     {
108         var_Create( p_aout, "visual", VLC_VAR_STRING | VLC_VAR_HASCHOICE );
109         text.psz_string = _("Visualizations");
110         var_Change( p_aout, "visual", VLC_VAR_SETTEXT, &text, NULL );
111         val.psz_string = (char*)""; text.psz_string = _("Disable");
112         var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
113         val.psz_string = (char*)"spectrometer"; text.psz_string = _("Spectrometer");
114         var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
115         val.psz_string = (char*)"scope"; text.psz_string = _("Scope");
116         var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
117         val.psz_string = (char*)"spectrum"; text.psz_string = _("Spectrum");
118         var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
119         val.psz_string = (char*)"vuMeter"; text.psz_string = _("Vu meter");
120         var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
121
122         /* Look for goom plugin */
123         if( module_exists( "goom" ) )
124         {
125             val.psz_string = (char*)"goom"; text.psz_string = (char*)"Goom";
126             var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
127         }
128
129         /* Look for galaktos plugin */
130         if( module_exists( "galaktos" ) )
131         {
132             val.psz_string = (char*)"galaktos"; text.psz_string = (char*)"GaLaktos";
133             var_Change( p_aout, "visual", VLC_VAR_ADDCHOICE, &val, &text );
134         }
135
136         if( var_Get( p_aout, "effect-list", &val ) == VLC_SUCCESS )
137         {
138             var_SetString( p_aout, "visual", val.psz_string );
139             free( val.psz_string );
140         }
141         var_AddCallback( p_aout, "visual", VisualizationCallback, NULL );
142     }
143
144     if( var_Type( p_aout, "equalizer" ) == 0 )
145     {
146         module_config_t *p_config;
147         int i;
148
149         p_config = config_FindConfig( VLC_OBJECT(p_aout), "equalizer-preset" );
150         if( p_config && p_config->i_list )
151         {
152                var_Create( p_aout, "equalizer",
153                            VLC_VAR_STRING | VLC_VAR_HASCHOICE );
154             text.psz_string = _("Equalizer");
155             var_Change( p_aout, "equalizer", VLC_VAR_SETTEXT, &text, NULL );
156
157             val.psz_string = (char*)""; text.psz_string = _("Disable");
158             var_Change( p_aout, "equalizer", VLC_VAR_ADDCHOICE, &val, &text );
159
160             for( i = 0; i < p_config->i_list; i++ )
161             {
162                 val.psz_string = (char *)p_config->ppsz_list[i];
163                 text.psz_string = (char *)p_config->ppsz_list_text[i];
164                 var_Change( p_aout, "equalizer", VLC_VAR_ADDCHOICE,
165                             &val, &text );
166             }
167
168             var_AddCallback( p_aout, "equalizer", EqualizerCallback, NULL );
169         }
170     }
171
172     if( var_Type( p_aout, "audio-filter" ) == 0 )
173     {
174         var_Create( p_aout, "audio-filter",
175                     VLC_VAR_STRING | VLC_VAR_DOINHERIT );
176         text.psz_string = _("Audio filters");
177         var_Change( p_aout, "audio-filter", VLC_VAR_SETTEXT, &text, NULL );
178     }
179     if( var_Type( p_aout, "audio-visual" ) == 0 )
180     {
181         var_Create( p_aout, "audio-visual",
182                     VLC_VAR_STRING | VLC_VAR_DOINHERIT );
183         text.psz_string = _("Audio visualizations");
184         var_Change( p_aout, "audio-visual", VLC_VAR_SETTEXT, &text, NULL );
185     }
186
187     if( var_Type( p_aout, "audio-replay-gain-mode" ) == 0 )
188     {
189         module_config_t *p_config;
190         int i;
191
192         p_config = config_FindConfig( VLC_OBJECT(p_aout), "audio-replay-gain-mode" );
193         if( p_config && p_config->i_list )
194         {
195             var_Create( p_aout, "audio-replay-gain-mode",
196                         VLC_VAR_STRING | VLC_VAR_DOINHERIT );
197
198             text.psz_string = _("Replay gain");
199             var_Change( p_aout, "audio-replay-gain-mode", VLC_VAR_SETTEXT, &text, NULL );
200
201             for( i = 0; i < p_config->i_list; i++ )
202             {
203                 val.psz_string = (char *)p_config->ppsz_list[i];
204                 text.psz_string = (char *)p_config->ppsz_list_text[i];
205                 var_Change( p_aout, "audio-replay-gain-mode", VLC_VAR_ADDCHOICE,
206                             &val, &text );
207             }
208
209             var_AddCallback( p_aout, "audio-replay-gain-mode", ReplayGainCallback, NULL );
210         }
211     }
212     if( var_Type( p_aout, "audio-replay-gain-preamp" ) == 0 )
213     {
214         var_Create( p_aout, "audio-replay-gain-preamp",
215                     VLC_VAR_FLOAT | VLC_VAR_DOINHERIT );
216     }
217     if( var_Type( p_aout, "audio-replay-gain-default" ) == 0 )
218     {
219         var_Create( p_aout, "audio-replay-gain-default",
220                     VLC_VAR_FLOAT | VLC_VAR_DOINHERIT );
221     }
222     if( var_Type( p_aout, "audio-replay-gain-peak-protection" ) == 0 )
223     {
224         var_Create( p_aout, "audio-replay-gain-peak-protection",
225                     VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
226     }
227     if( var_Type( p_aout, "audio-time-stretch" ) == 0 )
228     {
229         var_Create( p_aout, "audio-time-stretch",
230                     VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
231     }
232
233     psz_filters = var_GetString( p_aout, "audio-filter" );
234     psz_visual = var_GetString( p_aout, "audio-visual");
235
236     psz_scaletempo = var_GetBool( p_aout, "audio-time-stretch" ) ? strdup( "scaletempo" ) : NULL;
237
238     /* parse user filter lists */
239     for( i_visual = 0; i_visual < 3 && !AOUT_FMT_NON_LINEAR(&chain_output_format); i_visual++ )
240     {
241         char *ppsz_array[] = { psz_scaletempo, psz_filters, psz_visual };
242         char *psz_next = NULL;
243         char *psz_parser = ppsz_array[i_visual];
244
245         if( psz_parser == NULL || !*psz_parser )
246             continue;
247
248         while( psz_parser && *psz_parser )
249         {
250             aout_filter_t * p_filter = NULL;
251
252             if( p_input->i_nb_filters >= AOUT_MAX_FILTERS )
253             {
254                 msg_Dbg( p_aout, "max filters reached (%d)", AOUT_MAX_FILTERS );
255                 break;
256             }
257
258             while( *psz_parser == ' ' && *psz_parser == ':' )
259             {
260                 psz_parser++;
261             }
262             if( ( psz_next = strchr( psz_parser , ':'  ) ) )
263             {
264                 *psz_next++ = '\0';
265             }
266             if( *psz_parser =='\0' )
267             {
268                 break;
269             }
270
271             /* Create a VLC object */
272             static const char typename[] = "audio filter";
273             p_filter = vlc_custom_create( p_aout, sizeof(*p_filter),
274                                           VLC_OBJECT_GENERIC, typename );
275             if( p_filter == NULL )
276             {
277                 msg_Err( p_aout, "cannot add user filter %s (skipped)",
278                          psz_parser );
279                 psz_parser = psz_next;
280                 continue;
281             }
282
283             vlc_object_attach( p_filter , p_aout );
284
285             p_filter->request_vout = p_input->request_vout;
286             p_filter->p_owner = malloc( sizeof(*p_filter->p_owner) );
287             p_filter->p_owner->p_aout  = p_aout;
288             p_filter->p_owner->p_input = p_input;
289
290             /* try to find the requested filter */
291             if( i_visual == 2 ) /* this can only be a visualization module */
292             {
293                 /* request format */
294                 memcpy( &p_filter->input, &chain_output_format,
295                         sizeof(audio_sample_format_t) );
296                 memcpy( &p_filter->output, &chain_output_format,
297                         sizeof(audio_sample_format_t) );
298
299                 p_filter->p_module = module_need( p_filter, "visualization",
300                                                   psz_parser, true );
301             }
302             else /* this can be a audio filter module as well as a visualization module */
303             {
304                 /* request format */
305                 memcpy( &p_filter->input, &chain_input_format,
306                         sizeof(audio_sample_format_t) );
307                 memcpy( &p_filter->output, &chain_output_format,
308                         sizeof(audio_sample_format_t) );
309
310                 p_filter->p_module = module_need( p_filter, "audio filter",
311                                               psz_parser, true );
312
313                 if ( p_filter->p_module == NULL )
314                 {
315                     /* if the filter requested a special format, retry */
316                     if ( !( AOUT_FMTS_IDENTICAL( &p_filter->input,
317                                                  &chain_input_format )
318                             && AOUT_FMTS_IDENTICAL( &p_filter->output,
319                                                     &chain_output_format ) ) )
320                     {
321                         aout_FormatPrepare( &p_filter->input );
322                         aout_FormatPrepare( &p_filter->output );
323                         p_filter->p_module = module_need( p_filter,
324                                                           "audio filter",
325                                                           psz_parser, true );
326                     }
327                     /* try visual filters */
328                     else
329                     {
330                         memcpy( &p_filter->input, &chain_output_format,
331                                 sizeof(audio_sample_format_t) );
332                         memcpy( &p_filter->output, &chain_output_format,
333                                 sizeof(audio_sample_format_t) );
334                         p_filter->p_module = module_need( p_filter,
335                                                           "visualization",
336                                                           psz_parser, true );
337                     }
338                 }
339             }
340
341             /* failure */
342             if ( p_filter->p_module == NULL )
343             {
344                 msg_Err( p_aout, "cannot add user filter %s (skipped)",
345                          psz_parser );
346
347                 free( p_filter->p_owner );
348                 vlc_object_detach( p_filter );
349                 vlc_object_release( p_filter );
350
351                 psz_parser = psz_next;
352                 continue;
353             }
354
355             /* complete the filter chain if necessary */
356             if ( !AOUT_FMTS_IDENTICAL( &chain_input_format, &p_filter->input ) )
357             {
358                 if ( aout_FiltersCreatePipeline( p_aout, p_input->pp_filters,
359                                                  &p_input->i_nb_filters,
360                                                  &chain_input_format,
361                                                  &p_filter->input ) < 0 )
362                 {
363                     msg_Err( p_aout, "cannot add user filter %s (skipped)",
364                              psz_parser );
365
366                     module_unneed( p_filter, p_filter->p_module );
367                     free( p_filter->p_owner );
368                     vlc_object_detach( p_filter );
369                     vlc_object_release( p_filter );
370
371                     psz_parser = psz_next;
372                     continue;
373                 }
374             }
375
376             /* success */
377             p_filter->b_continuity = false;
378             p_input->pp_filters[p_input->i_nb_filters++] = p_filter;
379             memcpy( &chain_input_format, &p_filter->output,
380                     sizeof( audio_sample_format_t ) );
381
382             /* next filter if any */
383             psz_parser = psz_next;
384         }
385     }
386     free( psz_visual );
387     free( psz_filters );
388     free( psz_scaletempo );
389
390     /* complete the filter chain if necessary */
391     if ( !AOUT_FMTS_IDENTICAL( &chain_input_format, &chain_output_format ) )
392     {
393         if ( aout_FiltersCreatePipeline( p_aout, p_input->pp_filters,
394                                          &p_input->i_nb_filters,
395                                          &chain_input_format,
396                                          &chain_output_format ) < 0 )
397         {
398             inputFailure( p_aout, p_input, "couldn't set an input pipeline" );
399             return -1;
400         }
401     }
402
403     /* Prepare hints for the buffer allocator. */
404     p_input->input_alloc.i_alloc_type = AOUT_ALLOC_HEAP;
405     p_input->input_alloc.i_bytes_per_sec = -1;
406
407     /* Create resamplers. */
408     if ( !AOUT_FMT_NON_LINEAR( &p_aout->mixer.mixer ) )
409     {
410         chain_output_format.i_rate = (__MAX(p_input->input.i_rate,
411                                             p_aout->mixer.mixer.i_rate)
412                                  * (100 + AOUT_MAX_RESAMPLING)) / 100;
413         if ( chain_output_format.i_rate == p_aout->mixer.mixer.i_rate )
414         {
415             /* Just in case... */
416             chain_output_format.i_rate++;
417         }
418         if ( aout_FiltersCreatePipeline( p_aout, p_input->pp_resamplers,
419                                          &p_input->i_nb_resamplers,
420                                          &chain_output_format,
421                                          &p_aout->mixer.mixer ) < 0 )
422         {
423             inputFailure( p_aout, p_input, "couldn't set a resampler pipeline");
424             return -1;
425         }
426
427         aout_FiltersHintBuffers( p_aout, p_input->pp_resamplers,
428                                  p_input->i_nb_resamplers,
429                                  &p_input->input_alloc );
430         p_input->input_alloc.i_alloc_type = AOUT_ALLOC_HEAP;
431
432         /* Setup the initial rate of the resampler */
433         p_input->pp_resamplers[0]->input.i_rate = p_input->input.i_rate;
434     }
435     p_input->i_resampling_type = AOUT_RESAMPLING_NONE;
436
437     p_input->p_playback_rate_filter = NULL;
438     for( int i = 0; i < p_input->i_nb_filters; i++ )
439     {
440         aout_filter_t *p_filter = p_input->pp_filters[i];
441         if( strcmp( "scaletempo", p_filter->psz_object_name ) == 0 )
442         {
443           p_input->p_playback_rate_filter = p_filter;
444           break;
445         }
446     }
447     if( ! p_input->p_playback_rate_filter && p_input->i_nb_resamplers > 0 )
448     {
449         p_input->p_playback_rate_filter = p_input->pp_resamplers[0];
450     }
451
452     aout_FiltersHintBuffers( p_aout, p_input->pp_filters,
453                              p_input->i_nb_filters,
454                              &p_input->input_alloc );
455     p_input->input_alloc.i_alloc_type = AOUT_ALLOC_HEAP;
456
457     /* i_bytes_per_sec is still == -1 if no filters */
458     p_input->input_alloc.i_bytes_per_sec = __MAX(
459                                     p_input->input_alloc.i_bytes_per_sec,
460                                     (int)(p_input->input.i_bytes_per_frame
461                                      * p_input->input.i_rate
462                                      / p_input->input.i_frame_length) );
463
464     ReplayGainSelect( p_aout, p_input );
465
466     /* Success */
467     p_input->b_error = false;
468     p_input->b_restart = false;
469     p_input->i_last_input_rate = INPUT_RATE_DEFAULT;
470
471     return 0;
472 }
473
474 /*****************************************************************************
475  * aout_InputDelete : delete an input
476  *****************************************************************************
477  * This function must be entered with the mixer lock.
478  *****************************************************************************/
479 int aout_InputDelete( aout_instance_t * p_aout, aout_input_t * p_input )
480 {
481     AOUT_ASSERT_MIXER_LOCKED;
482     if ( p_input->b_error ) return 0;
483
484     aout_FiltersDestroyPipeline( p_aout, p_input->pp_filters,
485                                  p_input->i_nb_filters );
486     p_input->i_nb_filters = 0;
487     aout_FiltersDestroyPipeline( p_aout, p_input->pp_resamplers,
488                                  p_input->i_nb_resamplers );
489     p_input->i_nb_resamplers = 0;
490     aout_FifoDestroy( p_aout, &p_input->fifo );
491
492     return 0;
493 }
494
495 /*****************************************************************************
496  * aout_InputPlay : play a buffer
497  *****************************************************************************
498  * This function must be entered with the input lock.
499  *****************************************************************************/
500 /* XXX Do not activate it !! */
501 //#define AOUT_PROCESS_BEFORE_CHEKS
502 int aout_InputPlay( aout_instance_t * p_aout, aout_input_t * p_input,
503                     aout_buffer_t * p_buffer, int i_input_rate )
504 {
505     mtime_t start_date;
506     AOUT_ASSERT_INPUT_LOCKED;
507
508     if( p_input->b_restart )
509     {
510         aout_fifo_t fifo;
511         uint8_t     *p_first_byte_to_mix;
512         bool        b_paused;
513         mtime_t     i_pause_date;
514
515         aout_lock_mixer( p_aout );
516         aout_lock_input_fifos( p_aout );
517
518         /* A little trick to avoid loosing our input fifo and properties */
519
520         p_first_byte_to_mix = p_input->p_first_byte_to_mix;
521         fifo = p_input->fifo;
522         b_paused = p_input->b_paused;
523         i_pause_date = p_input->i_pause_date;
524
525         aout_FifoInit( p_aout, &p_input->fifo, p_aout->mixer.mixer.i_rate );
526
527         aout_InputDelete( p_aout, p_input );
528
529         aout_InputNew( p_aout, p_input, &p_input->request_vout );
530         p_input->p_first_byte_to_mix = p_first_byte_to_mix;
531         p_input->fifo = fifo;
532         p_input->b_paused = b_paused;
533         p_input->i_pause_date = i_pause_date;
534
535         aout_unlock_input_fifos( p_aout );
536         aout_unlock_mixer( p_aout );
537     }
538
539     if( i_input_rate != INPUT_RATE_DEFAULT && p_input->p_playback_rate_filter == NULL )
540     {
541         inputDrop( p_input, p_buffer );
542         return 0;
543     }
544
545 #ifdef AOUT_PROCESS_BEFORE_CHEKS
546     /* Run pre-filters. */
547     aout_FiltersPlay( p_aout, p_input->pp_filters, p_input->i_nb_filters,
548                       &p_buffer );
549
550     /* Actually run the resampler now. */
551     if ( p_input->i_nb_resamplers > 0 )
552     {
553         const mtime_t i_date = p_buffer->start_date;
554         aout_FiltersPlay( p_aout, p_input->pp_resamplers,
555                           p_input->i_nb_resamplers,
556                           &p_buffer );
557     }
558
559     if( p_buffer->i_nb_samples <= 0 )
560     {
561         aout_BufferFree( p_buffer );
562         return 0;
563     }
564 #endif
565
566     /* Handle input rate change, but keep drift correction */
567     if( i_input_rate != p_input->i_last_input_rate )
568     {
569         unsigned int * const pi_rate = &p_input->p_playback_rate_filter->input.i_rate;
570 #define F(r,ir) ( INPUT_RATE_DEFAULT * (r) / (ir) )
571         const int i_delta = *pi_rate - F(p_input->input.i_rate,p_input->i_last_input_rate);
572         *pi_rate = F(p_input->input.i_rate + i_delta, i_input_rate);
573 #undef F
574         p_input->i_last_input_rate = i_input_rate;
575     }
576
577     /* We don't care if someone changes the start date behind our back after
578      * this. We'll deal with that when pushing the buffer, and compensate
579      * with the next incoming buffer. */
580     aout_lock_input_fifos( p_aout );
581     start_date = aout_FifoNextStart( p_aout, &p_input->fifo );
582     aout_unlock_input_fifos( p_aout );
583
584     if ( start_date != 0 && start_date < mdate() )
585     {
586         /* The decoder is _very_ late. This can only happen if the user
587          * pauses the stream (or if the decoder is buggy, which cannot
588          * happen :). */
589         msg_Warn( p_aout, "computed PTS is out of range (%"PRId64"), "
590                   "clearing out", mdate() - start_date );
591         aout_lock_input_fifos( p_aout );
592         aout_FifoSet( p_aout, &p_input->fifo, 0 );
593         p_input->p_first_byte_to_mix = NULL;
594         aout_unlock_input_fifos( p_aout );
595         if ( p_input->i_resampling_type != AOUT_RESAMPLING_NONE )
596             msg_Warn( p_aout, "timing screwed, stopping resampling" );
597         inputResamplingStop( p_input );
598         start_date = 0;
599     }
600
601     if ( p_buffer->start_date < mdate() + AOUT_MIN_PREPARE_TIME )
602     {
603         /* The decoder gives us f*cked up PTS. It's its business, but we
604          * can't present it anyway, so drop the buffer. */
605         msg_Warn( p_aout, "PTS is out of range (%"PRId64"), dropping buffer",
606                   mdate() - p_buffer->start_date );
607
608         inputDrop( p_input, p_buffer );
609         inputResamplingStop( p_input );
610         return 0;
611     }
612
613     /* If the audio drift is too big then it's not worth trying to resample
614      * the audio. */
615     mtime_t i_pts_tolerance = 3 * AOUT_PTS_TOLERANCE * i_input_rate / INPUT_RATE_DEFAULT;
616     if ( start_date != 0 &&
617          ( start_date < p_buffer->start_date - i_pts_tolerance ) )
618     {
619         msg_Warn( p_aout, "audio drift is too big (%"PRId64"), clearing out",
620                   start_date - p_buffer->start_date );
621         aout_lock_input_fifos( p_aout );
622         aout_FifoSet( p_aout, &p_input->fifo, 0 );
623         p_input->p_first_byte_to_mix = NULL;
624         aout_unlock_input_fifos( p_aout );
625         if ( p_input->i_resampling_type != AOUT_RESAMPLING_NONE )
626             msg_Warn( p_aout, "timing screwed, stopping resampling" );
627         inputResamplingStop( p_input );
628         start_date = 0;
629     }
630     else if ( start_date != 0 &&
631               ( start_date > p_buffer->start_date + i_pts_tolerance) )
632     {
633         msg_Warn( p_aout, "audio drift is too big (%"PRId64"), dropping buffer",
634                   start_date - p_buffer->start_date );
635         inputDrop( p_input, p_buffer );
636         return 0;
637     }
638
639     if ( start_date == 0 ) start_date = p_buffer->start_date;
640
641 #ifndef AOUT_PROCESS_BEFORE_CHEKS
642     /* Run pre-filters. */
643     aout_FiltersPlay( p_aout, p_input->pp_filters, p_input->i_nb_filters,
644                       &p_buffer );
645 #endif
646
647     /* Run the resampler if needed.
648      * We first need to calculate the output rate of this resampler. */
649     if ( ( p_input->i_resampling_type == AOUT_RESAMPLING_NONE ) &&
650          ( start_date < p_buffer->start_date - AOUT_PTS_TOLERANCE
651            || start_date > p_buffer->start_date + AOUT_PTS_TOLERANCE ) &&
652          p_input->i_nb_resamplers > 0 )
653     {
654         /* Can happen in several circumstances :
655          * 1. A problem at the input (clock drift)
656          * 2. A small pause triggered by the user
657          * 3. Some delay in the output stage, causing a loss of lip
658          *    synchronization
659          * Solution : resample the buffer to avoid a scratch.
660          */
661         mtime_t drift = p_buffer->start_date - start_date;
662
663         p_input->i_resamp_start_date = mdate();
664         p_input->i_resamp_start_drift = (int)drift;
665
666         if ( drift > 0 )
667             p_input->i_resampling_type = AOUT_RESAMPLING_DOWN;
668         else
669             p_input->i_resampling_type = AOUT_RESAMPLING_UP;
670
671         msg_Warn( p_aout, "buffer is %"PRId64" %s, triggering %ssampling",
672                           drift > 0 ? drift : -drift,
673                           drift > 0 ? "in advance" : "late",
674                           drift > 0 ? "down" : "up");
675     }
676
677     if ( p_input->i_resampling_type != AOUT_RESAMPLING_NONE )
678     {
679         /* Resampling has been triggered previously (because of dates
680          * mismatch). We want the resampling to happen progressively so
681          * it isn't too audible to the listener. */
682
683         if( p_input->i_resampling_type == AOUT_RESAMPLING_UP )
684         {
685             p_input->pp_resamplers[0]->input.i_rate += 2; /* Hz */
686         }
687         else
688         {
689             p_input->pp_resamplers[0]->input.i_rate -= 2; /* Hz */
690         }
691
692         /* Check if everything is back to normal, in which case we can stop the
693          * resampling */
694         unsigned int i_nominal_rate =
695           (p_input->pp_resamplers[0] == p_input->p_playback_rate_filter)
696           ? INPUT_RATE_DEFAULT * p_input->input.i_rate / i_input_rate
697           : p_input->input.i_rate;
698         if( p_input->pp_resamplers[0]->input.i_rate == i_nominal_rate )
699         {
700             p_input->i_resampling_type = AOUT_RESAMPLING_NONE;
701             msg_Warn( p_aout, "resampling stopped after %"PRIi64" usec "
702                       "(drift: %"PRIi64")",
703                       mdate() - p_input->i_resamp_start_date,
704                       p_buffer->start_date - start_date);
705         }
706         else if( abs( (int)(p_buffer->start_date - start_date) ) <
707                  abs( p_input->i_resamp_start_drift ) / 2 )
708         {
709             /* if we reduced the drift from half, then it is time to switch
710              * back the resampling direction. */
711             if( p_input->i_resampling_type == AOUT_RESAMPLING_UP )
712                 p_input->i_resampling_type = AOUT_RESAMPLING_DOWN;
713             else
714                 p_input->i_resampling_type = AOUT_RESAMPLING_UP;
715             p_input->i_resamp_start_drift = 0;
716         }
717         else if( p_input->i_resamp_start_drift &&
718                  ( abs( (int)(p_buffer->start_date - start_date) ) >
719                    abs( p_input->i_resamp_start_drift ) * 3 / 2 ) )
720         {
721             /* If the drift is increasing and not decreasing, than something
722              * is bad. We'd better stop the resampling right now. */
723             msg_Warn( p_aout, "timing screwed, stopping resampling" );
724             inputResamplingStop( p_input );
725         }
726     }
727
728 #ifndef AOUT_PROCESS_BEFORE_CHEKS
729     /* Actually run the resampler now. */
730     if ( p_input->i_nb_resamplers > 0 )
731     {
732         aout_FiltersPlay( p_aout, p_input->pp_resamplers,
733                           p_input->i_nb_resamplers,
734                           &p_buffer );
735     }
736
737     if( p_buffer->i_nb_samples <= 0 )
738     {
739         aout_BufferFree( p_buffer );
740         return 0;
741     }
742 #endif
743
744     /* Adding the start date will be managed by aout_FifoPush(). */
745     p_buffer->end_date = start_date +
746         (p_buffer->end_date - p_buffer->start_date);
747     p_buffer->start_date = start_date;
748
749     aout_lock_input_fifos( p_aout );
750     aout_FifoPush( p_aout, &p_input->fifo, p_buffer );
751     aout_unlock_input_fifos( p_aout );
752     return 0;
753 }
754
755 /*****************************************************************************
756  * static functions
757  *****************************************************************************/
758
759 static void inputFailure( aout_instance_t * p_aout, aout_input_t * p_input,
760                           const char * psz_error_message )
761 {
762     /* error message */
763     msg_Err( p_aout, "%s", psz_error_message );
764
765     /* clean up */
766     aout_FiltersDestroyPipeline( p_aout, p_input->pp_filters,
767                                  p_input->i_nb_filters );
768     aout_FiltersDestroyPipeline( p_aout, p_input->pp_resamplers,
769                                  p_input->i_nb_resamplers );
770     aout_FifoDestroy( p_aout, &p_input->fifo );
771     var_Destroy( p_aout, "visual" );
772     var_Destroy( p_aout, "equalizer" );
773     var_Destroy( p_aout, "audio-filter" );
774     var_Destroy( p_aout, "audio-visual" );
775
776     var_Destroy( p_aout, "audio-replay-gain-mode" );
777     var_Destroy( p_aout, "audio-replay-gain-default" );
778     var_Destroy( p_aout, "audio-replay-gain-preamp" );
779     var_Destroy( p_aout, "audio-replay-gain-peak-protection" );
780
781     /* error flag */
782     p_input->b_error = 1;
783 }
784
785 static void inputDrop( aout_input_t *p_input, aout_buffer_t *p_buffer )
786 {
787     aout_BufferFree( p_buffer );
788
789     p_input->i_buffer_lost++;
790 }
791
792 static void inputResamplingStop( aout_input_t *p_input )
793 {
794     p_input->i_resampling_type = AOUT_RESAMPLING_NONE;
795     if( p_input->i_nb_resamplers != 0 )
796     {
797         p_input->pp_resamplers[0]->input.i_rate =
798             ( p_input->pp_resamplers[0] == p_input->p_playback_rate_filter )
799             ? INPUT_RATE_DEFAULT * p_input->input.i_rate / p_input->i_last_input_rate
800             : p_input->input.i_rate;
801         p_input->pp_resamplers[0]->b_continuity = false;
802     }
803 }
804
805 static vout_thread_t *RequestVout( void *p_private,
806                                    vout_thread_t *p_vout, video_format_t *p_fmt )
807 {
808     aout_instance_t *p_aout = p_private;
809     return vout_Request( p_aout, p_vout, p_fmt );
810 }
811
812 static int ChangeFiltersString( aout_instance_t * p_aout, const char* psz_variable,
813                                  const char *psz_name, bool b_add )
814 {
815     return AoutChangeFilterString( VLC_OBJECT(p_aout), p_aout,
816                                    psz_variable, psz_name, b_add ) ? 1 : 0;
817 }
818
819 static int VisualizationCallback( vlc_object_t *p_this, char const *psz_cmd,
820                        vlc_value_t oldval, vlc_value_t newval, void *p_data )
821 {
822     aout_instance_t *p_aout = (aout_instance_t *)p_this;
823     char *psz_mode = newval.psz_string;
824     (void)psz_cmd; (void)oldval; (void)p_data;
825
826     if( !psz_mode || !*psz_mode )
827     {
828         ChangeFiltersString( p_aout, "audio-visual", "goom", false );
829         ChangeFiltersString( p_aout, "audio-visual", "visual", false );
830         ChangeFiltersString( p_aout, "audio-visual", "galaktos", false );
831     }
832     else
833     {
834         if( !strcmp( "goom", psz_mode ) )
835         {
836             ChangeFiltersString( p_aout, "audio-visual", "visual", false );
837             ChangeFiltersString( p_aout, "audio-visual", "goom", true );
838             ChangeFiltersString( p_aout, "audio-visual", "galaktos", false);
839         }
840         else if( !strcmp( "galaktos", psz_mode ) )
841         {
842             ChangeFiltersString( p_aout, "audio-visual", "visual", false );
843             ChangeFiltersString( p_aout, "audio-visual", "goom", false );
844             ChangeFiltersString( p_aout, "audio-visual", "galaktos", true );
845         }
846         else
847         {
848             var_Create( p_aout, "effect-list", VLC_VAR_STRING );
849             var_SetString( p_aout, "effect-list", psz_mode );
850
851             ChangeFiltersString( p_aout, "audio-visual", "goom", false );
852             ChangeFiltersString( p_aout, "audio-visual", "visual", true );
853             ChangeFiltersString( p_aout, "audio-visual", "galaktos", false);
854         }
855     }
856
857     /* That sucks */
858     AoutInputsMarkToRestart( p_aout );
859
860     return VLC_SUCCESS;
861 }
862
863 static int EqualizerCallback( vlc_object_t *p_this, char const *psz_cmd,
864                        vlc_value_t oldval, vlc_value_t newval, void *p_data )
865 {
866     aout_instance_t *p_aout = (aout_instance_t *)p_this;
867     char *psz_mode = newval.psz_string;
868     int i_ret;
869     (void)psz_cmd; (void)oldval; (void)p_data;
870
871     if( !psz_mode || !*psz_mode )
872     {
873         i_ret = ChangeFiltersString( p_aout, "audio-filter", "equalizer",
874                                      false );
875     }
876     else
877     {
878         var_Create( p_aout, "equalizer-preset", VLC_VAR_STRING );
879         var_SetString( p_aout, "equalizer-preset", psz_mode );
880         i_ret = ChangeFiltersString( p_aout, "audio-filter", "equalizer",
881                                      true );
882     }
883
884     /* That sucks */
885     if( i_ret == 1 )
886         AoutInputsMarkToRestart( p_aout );
887     return VLC_SUCCESS;
888 }
889
890 static int ReplayGainCallback( vlc_object_t *p_this, char const *psz_cmd,
891                                vlc_value_t oldval, vlc_value_t newval, void *p_data )
892 {
893     VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
894     VLC_UNUSED(newval); VLC_UNUSED(p_data);
895     aout_instance_t *p_aout = (aout_instance_t *)p_this;
896     int i;
897
898     aout_lock_mixer( p_aout );
899     for( i = 0; i < p_aout->i_nb_inputs; i++ )
900         ReplayGainSelect( p_aout, p_aout->pp_inputs[i] );
901
902     /* Restart the mixer (a trivial mixer may be in use) */
903     aout_MixerMultiplierSet( p_aout, p_aout->mixer.f_multiplier );
904     aout_unlock_mixer( p_aout );
905
906     return VLC_SUCCESS;
907 }
908
909 static void ReplayGainSelect( aout_instance_t *p_aout, aout_input_t *p_input )
910 {
911     char *psz_replay_gain = var_GetNonEmptyString( p_aout,
912                                                    "audio-replay-gain-mode" );
913     int i_mode;
914     int i_use;
915     float f_gain;
916
917     p_input->f_multiplier = 1.0;
918
919     if( !psz_replay_gain )
920         return;
921
922     /* Find select mode */
923     if( !strcmp( psz_replay_gain, "track" ) )
924         i_mode = AUDIO_REPLAY_GAIN_TRACK;
925     else if( !strcmp( psz_replay_gain, "album" ) )
926         i_mode = AUDIO_REPLAY_GAIN_ALBUM;
927     else
928         i_mode = AUDIO_REPLAY_GAIN_MAX;
929
930     /* If the select mode is not available, prefer the other one */
931     i_use = i_mode;
932     if( i_use != AUDIO_REPLAY_GAIN_MAX && !p_input->replay_gain.pb_gain[i_use] )
933     {
934         for( i_use = 0; i_use < AUDIO_REPLAY_GAIN_MAX; i_use++ )
935         {
936             if( p_input->replay_gain.pb_gain[i_use] )
937                 break;
938         }
939     }
940
941     /* */
942     if( i_use != AUDIO_REPLAY_GAIN_MAX )
943         f_gain = p_input->replay_gain.pf_gain[i_use] + var_GetFloat( p_aout, "audio-replay-gain-preamp" );
944     else if( i_mode != AUDIO_REPLAY_GAIN_MAX )
945         f_gain = var_GetFloat( p_aout, "audio-replay-gain-default" );
946     else
947         f_gain = 0.0;
948     p_input->f_multiplier = pow( 10.0, f_gain / 20.0 );
949
950     /* */
951     if( p_input->replay_gain.pb_peak[i_use] &&
952         var_GetBool( p_aout, "audio-replay-gain-peak-protection" ) &&
953         p_input->replay_gain.pf_peak[i_use] * p_input->f_multiplier > 1.0 )
954     {
955         p_input->f_multiplier = 1.0f / p_input->replay_gain.pf_peak[i_use];
956     }
957
958     free( psz_replay_gain );
959 }
960