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