* modules/audio_output/alsa.c: #ifdef DEBUG -> #ifdef ALSA_DEBUG
[vlc.git] / modules / audio_output / alsa.c
1 /*****************************************************************************
2  * alsa.c : alsa plugin for vlc
3  *****************************************************************************
4  * Copyright (C) 2000-2001 VideoLAN
5  * $Id: alsa.c,v 1.33 2003/07/27 16:20:53 gbazin Exp $
6  *
7  * Authors: Henri Fallon <henri@videolan.org> - Original Author
8  *          Jeffrey Baker <jwbaker@acm.org> - Port to ALSA 1.0 API
9  *          John Paul Lorenti <jpl31@columbia.edu> - Device selection
10  *          Arnaud de Bossoreille de Ribou <bozo@via.ecp.fr> - S/PDIF and aout3
11  *
12  * This program is free software; you can redistribute it and/or modify
13  * it under the terms of the GNU General Public License as published by
14  * the Free Software Foundation; either version 2 of the License, or
15  * (at your option) any later version.
16  *
17  * This program is distributed in the hope that it will be useful,
18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  * GNU General Public License for more details.
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
25  *****************************************************************************/
26
27 /*****************************************************************************
28  * Preamble
29  *****************************************************************************/
30 #include <errno.h>                                                 /* ENOMEM */
31 #include <string.h>                                            /* strerror() */
32 #include <stdlib.h>                            /* calloc(), malloc(), free() */
33
34 #include <vlc/vlc.h>
35
36 #include <vlc/aout.h>
37
38 #include "aout_internal.h"
39
40 /* ALSA part
41    Note: we use the new API which is available since 0.9.0beta10a. */
42 #define ALSA_PCM_NEW_HW_PARAMS_API
43 #define ALSA_PCM_NEW_SW_PARAMS_API
44 #include <alsa/asoundlib.h>
45
46 /*****************************************************************************
47  * aout_sys_t: ALSA audio output method descriptor
48  *****************************************************************************
49  * This structure is part of the audio output thread descriptor.
50  * It describes the ALSA specific properties of an audio device.
51  *****************************************************************************/
52 struct aout_sys_t
53 {
54     snd_pcm_t         * p_snd_pcm;
55     int                 i_period_time;
56
57 #ifdef ALSA_DEBUG
58     snd_output_t      * p_snd_stderr;
59 #endif
60
61     int b_playing;                                         /* playing status */
62     mtime_t start_date;
63
64     vlc_mutex_t lock;
65     vlc_cond_t  wait ;
66 };
67
68 #define A52_FRAME_NB 1536
69
70 /* These values are in frames.
71    To convert them to a number of bytes you have to multiply them by the
72    number of channel(s) (eg. 2 for stereo) and the size of a sample (eg.
73    2 for s16). */
74 #define ALSA_DEFAULT_PERIOD_SIZE        1024
75 #define ALSA_DEFAULT_BUFFER_SIZE        ( ALSA_DEFAULT_PERIOD_SIZE << 4 )
76 #define ALSA_SPDIF_PERIOD_SIZE          A52_FRAME_NB
77 #define ALSA_SPDIF_BUFFER_SIZE          ( ALSA_SPDIF_PERIOD_SIZE << 4 )
78 /* Why << 4 ? --Meuuh */
79 /* Why not ? --Bozo */
80 /* Right. --Meuuh */
81
82 #define DEFAULT_ALSA_DEVICE "default"
83
84 /*****************************************************************************
85  * Local prototypes
86  *****************************************************************************/
87 static int  Open         ( vlc_object_t * );
88 static void Close        ( vlc_object_t * );
89 static void Play         ( aout_instance_t * );
90 static int  ALSAThread   ( aout_instance_t * );
91 static void ALSAFill     ( aout_instance_t * );
92
93 /*****************************************************************************
94  * Module descriptor
95  *****************************************************************************/
96 vlc_module_begin();
97     add_category_hint( N_("ALSA"), NULL, VLC_FALSE );
98     add_string( "alsadev", DEFAULT_ALSA_DEVICE, aout_FindAndRestart,
99                 N_("ALSA device name"), NULL, VLC_FALSE );
100     set_description( _("ALSA audio output") );
101     set_capability( "audio output", 150 );
102     set_callbacks( Open, Close );
103 vlc_module_end();
104
105 /*****************************************************************************
106  * Probe: probe the audio device for available formats and channels
107  *****************************************************************************/
108 static void Probe( aout_instance_t * p_aout,
109                    const char * psz_device, const char * psz_iec_device,
110                    int i_snd_pcm_format )
111 {
112     struct aout_sys_t * p_sys = p_aout->output.p_sys;
113     vlc_value_t val, text;
114     int i_ret;
115
116     var_Create ( p_aout, "audio-device", VLC_VAR_INTEGER | VLC_VAR_HASCHOICE );
117     text.psz_string = _("Audio device");
118     var_Change( p_aout, "audio-device", VLC_VAR_SETTEXT, &text, NULL );
119
120     /* We'll open the audio device in non blocking mode so we can just exit
121      * when it is already in use, but for the real stuff we'll still use
122      * the blocking mode */
123
124     /* Now test linear PCM capabilities */
125     if ( !(i_ret = snd_pcm_open( &p_sys->p_snd_pcm, psz_device,
126                                  SND_PCM_STREAM_PLAYBACK,
127                                  SND_PCM_NONBLOCK ) ) )
128     {
129         int i_channels;
130         snd_pcm_hw_params_t * p_hw;
131         snd_pcm_hw_params_alloca (&p_hw);
132
133         if ( snd_pcm_hw_params_any( p_sys->p_snd_pcm, p_hw ) < 0 )
134         {
135             msg_Warn( p_aout, "unable to retrieve initial hardware parameters"
136                               ", disabling linear PCM audio" );
137             snd_pcm_close( p_sys->p_snd_pcm );
138             var_Destroy( p_aout, "audio-device" );
139             return;
140         }
141
142         if ( snd_pcm_hw_params_set_format( p_sys->p_snd_pcm, p_hw,
143                                            i_snd_pcm_format ) < 0 )
144         {
145             /* Assume a FPU enabled computer can handle float32 format.
146                If somebody tells us it's not always true then we'll have
147                to change this */
148             msg_Warn( p_aout, "unable to set stream sample size and word order"
149                               ", disabling linear PCM audio" );
150             snd_pcm_close( p_sys->p_snd_pcm );
151             var_Destroy( p_aout, "audio-device" );
152             return;
153         }
154
155         i_channels = aout_FormatNbChannels( &p_aout->output.output );
156
157         while ( i_channels > 0 )
158         {
159             /* Here we have to probe multi-channel capabilities but I have
160                no idea (at the moment) of how its managed by the ALSA
161                library.
162                It seems that '6' channels aren't well handled on a stereo
163                sound card like my i810 but it requires some more
164                investigations. That's why '4' and '6' cases are disabled.
165                -- Bozo */
166             if ( !snd_pcm_hw_params_test_channels( p_sys->p_snd_pcm, p_hw,
167                                                    i_channels ) )
168             {
169                 switch ( i_channels )
170                 {
171                 case 1:
172                     val.i_int = AOUT_VAR_MONO;
173                     text.psz_string = N_("Mono");
174                     var_Change( p_aout, "audio-device",
175                                 VLC_VAR_ADDCHOICE, &val, &text );
176                     break;
177                 case 2:
178                     val.i_int = AOUT_VAR_STEREO;
179                     text.psz_string = N_("Stereo");
180                     var_Change( p_aout, "audio-device",
181                                 VLC_VAR_ADDCHOICE, &val, &text );
182                     var_Set( p_aout, "audio-device", val );
183                     break;
184                 case 4:
185                     val.i_int = AOUT_VAR_2F2R;
186                     text.psz_string = N_("2 Front 2 Rear");
187                     var_Change( p_aout, "audio-device",
188                                 VLC_VAR_ADDCHOICE, &val, &text );
189                     break;
190                 case 6:
191                     val.i_int = AOUT_VAR_5_1;
192                     text.psz_string = N_("5.1");
193                     var_Change( p_aout, "audio-device",
194                                 VLC_VAR_ADDCHOICE, &val, &text );
195                     break;
196                 }
197             }
198
199             --i_channels;
200         }
201
202         /* Close the previously opened device */
203         snd_pcm_close( p_sys->p_snd_pcm );
204     }
205     else if ( i_ret == -EBUSY )
206     {
207         msg_Warn( p_aout, "audio device: %s is already in use", psz_device );
208     }
209
210     /* Test for S/PDIF device if needed */
211     if ( psz_iec_device )
212     {
213         /* Opening the device should be enough */
214         if ( !(i_ret = snd_pcm_open( &p_sys->p_snd_pcm, psz_iec_device,
215                                      SND_PCM_STREAM_PLAYBACK,
216                                      SND_PCM_NONBLOCK ) ) )
217         {
218             val.i_int = AOUT_VAR_SPDIF;
219             text.psz_string = N_("A/52 over S/PDIF");
220             var_Change( p_aout, "audio-device",
221                         VLC_VAR_ADDCHOICE, &val, &text );
222             if( config_GetInt( p_aout, "spdif" ) )
223                 var_Set( p_aout, "audio-device", val );
224
225             snd_pcm_close( p_sys->p_snd_pcm );
226         }
227         else if ( i_ret == -EBUSY )
228         {
229             msg_Warn( p_aout, "audio device: %s is already in use",
230                       psz_iec_device );
231         }
232     }
233
234     var_Change( p_aout, "audio-device", VLC_VAR_CHOICESCOUNT, &val, NULL );
235     if( val.i_int <= 0 )
236     {
237         /* Probe() has failed. */
238         var_Destroy( p_aout, "audio-device" );
239         return;
240     }
241
242     /* Add final settings to the variable */
243     var_AddCallback( p_aout, "audio-device", aout_ChannelsRestart, NULL );
244     val.b_bool = VLC_TRUE;
245     var_Set( p_aout, "intf-change", val );
246 }
247
248 /*****************************************************************************
249  * Open: create a handle and open an alsa device
250  *****************************************************************************
251  * This function opens an alsa device, through the alsa API.
252  *
253  * Note: the only heap-allocated string is psz_device. All the other pointers
254  * are references to psz_device or to stack-allocated data.
255  *****************************************************************************/
256 static int Open( vlc_object_t *p_this )
257 {
258     aout_instance_t * p_aout = (aout_instance_t *)p_this;
259     struct aout_sys_t * p_sys;
260     vlc_value_t val;
261
262     char psz_default_iec_device[128]; /* Buffer used to store the default
263                                          S/PDIF device */
264     char * psz_device, * psz_iec_device; /* device names for PCM and S/PDIF
265                                             output */
266
267     int i_vlc_pcm_format; /* Audio format for VLC's data */
268     int i_snd_pcm_format; /* Audio format for ALSA's data */
269
270     snd_pcm_uframes_t i_buffer_size = 0;
271     snd_pcm_uframes_t i_period_size = 0;
272     int i_channels = 0;
273
274     snd_pcm_hw_params_t *p_hw;
275     snd_pcm_sw_params_t *p_sw;
276
277     int i_snd_rc = -1;
278
279     /* Allocate structures */
280     p_aout->output.p_sys = p_sys = malloc( sizeof( aout_sys_t ) );
281     if( p_sys == NULL )
282     {
283         msg_Err( p_aout, "out of memory" );
284         return VLC_ENOMEM;
285     }
286     p_sys->b_playing = VLC_FALSE;
287     p_sys->start_date = 0;
288     vlc_cond_init( p_aout, &p_sys->wait );
289     vlc_mutex_init( p_aout, &p_sys->lock );
290
291     /* Get device name */
292     if( (psz_device = config_GetPsz( p_aout, "alsadev" )) == NULL )
293     {
294         msg_Err( p_aout, "no audio device given (maybe \"default\" ?)" );
295         free( p_sys );
296         return VLC_EGENERIC;
297     }
298
299     /* Choose the IEC device for S/PDIF output:
300        if the device is overriden by the user then it will be the one
301        otherwise we compute the default device based on the output format. */
302     if( AOUT_FMT_NON_LINEAR( &p_aout->output.output )
303         && !strcmp( psz_device, DEFAULT_ALSA_DEVICE ) )
304     {
305         snprintf( psz_default_iec_device, sizeof(psz_default_iec_device),
306                   "iec958:AES0=0x%x,AES1=0x%x,AES2=0x%x,AES3=0x%x",
307                   IEC958_AES0_CON_EMPHASIS_NONE | IEC958_AES0_NONAUDIO,
308                   IEC958_AES1_CON_ORIGINAL | IEC958_AES1_CON_PCM_CODER,
309                   0,
310                   ( p_aout->output.output.i_rate == 48000 ?
311                     IEC958_AES3_CON_FS_48000 :
312                     ( p_aout->output.output.i_rate == 44100 ?
313                       IEC958_AES3_CON_FS_44100 : IEC958_AES3_CON_FS_32000 ) ) );
314         psz_iec_device = psz_default_iec_device;
315     }
316     else if( AOUT_FMT_NON_LINEAR( &p_aout->output.output ) )
317     {
318         psz_iec_device = psz_device;
319     }
320     else
321     {
322         psz_iec_device = NULL;
323     }
324
325     /* Choose the linear PCM format (read the comment above about FPU
326        and float32) */
327     if( p_aout->p_libvlc->i_cpu & CPU_CAPABILITY_FPU )
328     {
329         i_vlc_pcm_format = VLC_FOURCC('f','l','3','2');
330         i_snd_pcm_format = SND_PCM_FORMAT_FLOAT;
331     }
332     else
333     {
334         i_vlc_pcm_format = AOUT_FMT_S16_NE;
335         i_snd_pcm_format = SND_PCM_FORMAT_S16;
336     }
337
338     /* If the variable doesn't exist then it's the first time we're called
339        and we have to probe the available audio formats and channels */
340     if ( var_Type( p_aout, "audio-device" ) == 0 )
341     {
342         Probe( p_aout, psz_device, psz_iec_device, i_snd_pcm_format );
343     }
344
345     if ( var_Get( p_aout, "audio-device", &val ) < 0 )
346     {
347         free( p_sys );
348         free( psz_device );
349         return VLC_EGENERIC;
350     }
351
352     if ( val.i_int == AOUT_VAR_SPDIF )
353     {
354         p_aout->output.output.i_format = VLC_FOURCC('s','p','d','i');
355     }
356     else if ( val.i_int == AOUT_VAR_5_1 )
357     {
358         p_aout->output.output.i_format = i_vlc_pcm_format;
359         p_aout->output.output.i_physical_channels
360             = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER
361                | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT
362                | AOUT_CHAN_LFE;
363     }
364     else if ( val.i_int == AOUT_VAR_2F2R )
365     {
366         p_aout->output.output.i_format = i_vlc_pcm_format;
367         p_aout->output.output.i_physical_channels
368             = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT
369                | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT;
370     }
371     else if ( val.i_int == AOUT_VAR_STEREO )
372     {
373         p_aout->output.output.i_format = i_vlc_pcm_format;
374         p_aout->output.output.i_physical_channels
375             = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT;
376     }
377     else if ( val.i_int == AOUT_VAR_MONO )
378     {
379         p_aout->output.output.i_format = i_vlc_pcm_format;
380         p_aout->output.output.i_physical_channels = AOUT_CHAN_CENTER;
381     }
382
383     else
384     {
385         /* This should not happen ! */
386         msg_Err( p_aout, "internal: can't find audio-device (%i)", val.i_int );
387         free( p_sys );
388         return VLC_EGENERIC;
389     }
390
391 #ifdef ALSA_DEBUG
392     snd_output_stdio_attach( &p_sys->p_snd_stderr, stderr, 0 );
393 #endif
394
395     /* Open the device */
396     if ( AOUT_FMT_NON_LINEAR( &p_aout->output.output ) )
397     {
398         if ( ( i_snd_rc = snd_pcm_open( &p_sys->p_snd_pcm, psz_iec_device,
399                             SND_PCM_STREAM_PLAYBACK, 0 ) ) < 0 )
400         {
401             msg_Err( p_aout, "cannot open ALSA device `%s' (%s)",
402                              psz_iec_device, snd_strerror( i_snd_rc ) );
403             free( p_sys );
404             free( psz_device );
405             return VLC_EGENERIC;
406         }
407         i_buffer_size = ALSA_SPDIF_BUFFER_SIZE;
408         i_snd_pcm_format = SND_PCM_FORMAT_S16;
409         i_channels = 2;
410
411         p_aout->output.i_nb_samples = i_period_size = ALSA_SPDIF_PERIOD_SIZE;
412         p_aout->output.output.i_bytes_per_frame = AOUT_SPDIF_SIZE;
413         p_aout->output.output.i_frame_length = A52_FRAME_NB;
414
415         aout_VolumeNoneInit( p_aout );
416     }
417     else
418     {
419         if ( ( i_snd_rc = snd_pcm_open( &p_sys->p_snd_pcm, psz_device,
420                             SND_PCM_STREAM_PLAYBACK, 0 ) ) < 0 )
421         {
422             msg_Err( p_aout, "cannot open ALSA device `%s' (%s)",
423                              psz_device, snd_strerror( i_snd_rc ) );
424             free( p_sys );
425             free( psz_device );
426             return VLC_EGENERIC;
427         }
428         i_buffer_size = ALSA_DEFAULT_BUFFER_SIZE;
429         i_channels = aout_FormatNbChannels( &p_aout->output.output );
430
431         p_aout->output.i_nb_samples = i_period_size = ALSA_DEFAULT_PERIOD_SIZE;
432
433         aout_VolumeSoftInit( p_aout );
434     }
435
436     /* Free psz_device so that all the remaining data is stack-allocated */
437     free( psz_device );
438
439     p_aout->output.pf_play = Play;
440
441     snd_pcm_hw_params_alloca(&p_hw);
442     snd_pcm_sw_params_alloca(&p_sw);
443
444     /* Get Initial hardware parameters */
445     if ( ( i_snd_rc = snd_pcm_hw_params_any( p_sys->p_snd_pcm, p_hw ) ) < 0 )
446     {
447         msg_Err( p_aout, "unable to retrieve initial hardware parameters (%s)",
448                          snd_strerror( i_snd_rc ) );
449         goto error;
450     }
451
452     /* Set format. */
453     if ( ( i_snd_rc = snd_pcm_hw_params_set_format( p_sys->p_snd_pcm, p_hw,
454                                                     i_snd_pcm_format ) ) < 0 )
455     {
456         msg_Err( p_aout, "unable to set stream sample size and word order (%s)",
457                          snd_strerror( i_snd_rc ) );
458         goto error;
459     }
460
461     if ( ( i_snd_rc = snd_pcm_hw_params_set_access( p_sys->p_snd_pcm, p_hw,
462                                     SND_PCM_ACCESS_RW_INTERLEAVED ) ) < 0 )
463     {
464         msg_Err( p_aout, "unable to set interleaved stream format (%s)",
465                          snd_strerror( i_snd_rc ) );
466         goto error;
467     }
468
469     /* Set channels. */
470     if ( ( i_snd_rc = snd_pcm_hw_params_set_channels( p_sys->p_snd_pcm, p_hw,
471                                                       i_channels ) ) < 0 )
472     {
473         msg_Err( p_aout, "unable to set number of output channels (%s)",
474                          snd_strerror( i_snd_rc ) );
475         goto error;
476     }
477
478     /* Set rate. */
479 #ifdef HAVE_ALSA_NEW_API
480     if ( ( i_snd_rc = snd_pcm_hw_params_set_rate_near( p_sys->p_snd_pcm, p_hw,
481                                 &p_aout->output.output.i_rate, NULL ) ) < 0 )
482 #else
483     if ( ( i_snd_rc = snd_pcm_hw_params_set_rate_near( p_sys->p_snd_pcm, p_hw,
484                                 p_aout->output.output.i_rate, NULL ) ) < 0 )
485 #endif
486     {
487         msg_Warn( p_aout, "The rate %d Hz is not supported by your hardware. "
488                   "Using %d Hz instead.\n", p_aout->output.output.i_rate,
489                   i_snd_rc );
490         p_aout->output.output.i_rate = i_snd_rc;
491     }
492
493     /* Set buffer size. */
494 #ifdef HAVE_ALSA_NEW_API
495     if ( ( i_snd_rc = snd_pcm_hw_params_set_buffer_size_near( p_sys->p_snd_pcm,
496                                     p_hw, &i_buffer_size ) ) < 0 )
497 #else
498     if ( ( i_snd_rc = snd_pcm_hw_params_set_buffer_size_near( p_sys->p_snd_pcm,
499                                     p_hw, i_buffer_size ) ) < 0 )
500 #endif
501     {
502         msg_Err( p_aout, "unable to set buffer size (%s)",
503                          snd_strerror( i_snd_rc ) );
504         goto error;
505     }
506
507     /* Set period size. */
508 #ifdef HAVE_ALSA_NEW_API
509     if ( ( i_snd_rc = snd_pcm_hw_params_set_period_size_near( p_sys->p_snd_pcm,
510                                     p_hw, &i_period_size, NULL ) ) < 0 )
511 #else
512     if ( ( i_snd_rc = snd_pcm_hw_params_set_period_size_near( p_sys->p_snd_pcm,
513                                     p_hw, i_period_size, NULL ) ) < 0 )
514 #endif
515     {
516         msg_Err( p_aout, "unable to set period size (%s)",
517                          snd_strerror( i_snd_rc ) );
518         goto error;
519     }
520     p_aout->output.i_nb_samples = i_period_size;
521
522     /* Commit hardware parameters. */
523     if ( ( i_snd_rc = snd_pcm_hw_params( p_sys->p_snd_pcm, p_hw ) ) < 0 )
524     {
525         msg_Err( p_aout, "unable to commit hardware configuration (%s)",
526                          snd_strerror( i_snd_rc ) );
527         goto error;
528     }
529
530 #ifdef HAVE_ALSA_NEW_API
531     if( ( i_snd_rc = snd_pcm_hw_params_get_period_time( p_hw,
532                                     &p_sys->i_period_time, NULL ) ) < 0 )
533 #else
534     if( ( p_sys->i_period_time =
535                   snd_pcm_hw_params_get_period_time( p_hw, NULL ) ) < 0 )
536 #endif
537     {
538         msg_Err( p_aout, "unable to get period time (%s)",
539                          snd_strerror( i_snd_rc ) );
540         goto error;
541     }
542
543     /* Get Initial software parameters */
544     snd_pcm_sw_params_current( p_sys->p_snd_pcm, p_sw );
545
546     i_snd_rc = snd_pcm_sw_params_set_sleep_min( p_sys->p_snd_pcm, p_sw, 0 );
547
548     i_snd_rc = snd_pcm_sw_params_set_avail_min( p_sys->p_snd_pcm, p_sw,
549                                                 p_aout->output.i_nb_samples );
550
551     /* Commit software parameters. */
552     if ( snd_pcm_sw_params( p_sys->p_snd_pcm, p_sw ) < 0 )
553     {
554         msg_Err( p_aout, "unable to set software configuration" );
555         goto error;
556     }
557
558 #ifdef ALSA_DEBUG
559     snd_output_printf( p_sys->p_snd_stderr, "\nALSA hardware setup:\n\n" );
560     snd_pcm_dump_hw_setup( p_sys->p_snd_pcm, p_sys->p_snd_stderr );
561     snd_output_printf( p_sys->p_snd_stderr, "\nALSA software setup:\n\n" );
562     snd_pcm_dump_sw_setup( p_sys->p_snd_pcm, p_sys->p_snd_stderr );
563     snd_output_printf( p_sys->p_snd_stderr, "\n" );
564 #endif
565
566     /* Create ALSA thread and wait for its readiness. */
567     if( vlc_thread_create( p_aout, "aout", ALSAThread,
568                            VLC_THREAD_PRIORITY_OUTPUT, VLC_FALSE ) )
569     {
570         msg_Err( p_aout, "cannot create ALSA thread (%s)", strerror(errno) );
571         goto error;
572     }
573
574     return 0;
575
576 error:
577     snd_pcm_close( p_sys->p_snd_pcm );
578 #ifdef ALSA_DEBUG
579     snd_output_close( p_sys->p_snd_stderr );
580 #endif
581     free( p_sys );
582     return VLC_EGENERIC;
583 }
584
585 /*****************************************************************************
586  * Play: nothing to do
587  *****************************************************************************/
588 static void Play( aout_instance_t *p_aout )
589 {
590     if( !p_aout->output.p_sys->b_playing )
591     {
592         p_aout->output.p_sys->b_playing = 1;
593
594         /* get the playing date of the first aout buffer */
595         p_aout->output.p_sys->start_date =
596             aout_FifoFirstDate( p_aout, &p_aout->output.fifo );
597
598         /* wake up the audio output thread */
599         vlc_mutex_lock( &p_aout->output.p_sys->lock );
600         vlc_cond_signal( &p_aout->output.p_sys->wait );
601         vlc_mutex_unlock( &p_aout->output.p_sys->lock );
602     }
603 }
604
605 /*****************************************************************************
606  * Close: close the ALSA device
607  *****************************************************************************/
608 static void Close( vlc_object_t *p_this )
609 {
610     aout_instance_t *p_aout = (aout_instance_t *)p_this;
611     struct aout_sys_t * p_sys = p_aout->output.p_sys;
612     int i_snd_rc;
613
614     /* make sure the audio output thread is waken up */
615     vlc_mutex_lock( &p_aout->output.p_sys->lock );
616     vlc_cond_signal( &p_aout->output.p_sys->wait );
617     vlc_mutex_unlock( &p_aout->output.p_sys->lock );
618
619     p_aout->b_die = VLC_TRUE;
620     vlc_thread_join( p_aout );
621     p_aout->b_die = VLC_FALSE;
622
623     i_snd_rc = snd_pcm_close( p_sys->p_snd_pcm );
624
625     if( i_snd_rc > 0 )
626     {
627         msg_Err( p_aout, "failed closing ALSA device (%s)",
628                          snd_strerror( i_snd_rc ) );
629     }
630
631 #ifdef ALSA_DEBUG
632     snd_output_close( p_sys->p_snd_stderr );
633 #endif
634
635     free( p_sys );
636 }
637
638 /*****************************************************************************
639  * ALSAThread: asynchronous thread used to DMA the data to the device
640  *****************************************************************************/
641 static int ALSAThread( aout_instance_t * p_aout )
642 {
643     /* Wait for the exact time to start playing (avoids resampling) */
644     vlc_mutex_lock( &p_aout->output.p_sys->lock );
645     if( !p_aout->output.p_sys->start_date )
646         vlc_cond_wait( &p_aout->output.p_sys->wait,
647                        &p_aout->output.p_sys->lock );
648     vlc_mutex_unlock( &p_aout->output.p_sys->lock );
649
650     mwait( p_aout->output.p_sys->start_date - AOUT_PTS_TOLERANCE / 4 );
651
652     while ( !p_aout->b_die )
653     {
654         ALSAFill( p_aout );
655     }
656
657     return 0;
658 }
659
660 /*****************************************************************************
661  * ALSAFill: function used to fill the ALSA buffer as much as possible
662  *****************************************************************************/
663 static void ALSAFill( aout_instance_t * p_aout )
664 {
665     struct aout_sys_t * p_sys = p_aout->output.p_sys;
666
667     aout_buffer_t * p_buffer;
668     snd_pcm_status_t * p_status;
669     snd_timestamp_t ts_next;
670     int i_snd_rc;
671     mtime_t next_date;
672
673     snd_pcm_status_alloca( &p_status );
674
675     /* Fill in the buffer until space or audio output buffer shortage */
676     {
677         /* Get the status */
678         i_snd_rc = snd_pcm_status( p_sys->p_snd_pcm, p_status );
679         if( i_snd_rc < 0 )
680         {
681             msg_Err( p_aout, "unable to get the device's status (%s)",
682                              snd_strerror( i_snd_rc ) );
683
684             msleep( p_sys->i_period_time >> 1 );
685             return;
686         }
687
688         /* Handle buffer underruns and reget the status */
689         if( snd_pcm_status_get_state( p_status ) == SND_PCM_STATE_XRUN )
690         {
691             /* Prepare the device */
692             i_snd_rc = snd_pcm_prepare( p_sys->p_snd_pcm );
693
694             if( i_snd_rc == 0 )
695             {
696                 msg_Warn( p_aout, "recovered from buffer underrun" );
697
698                 /* Reget the status */
699                 i_snd_rc = snd_pcm_status( p_sys->p_snd_pcm, p_status );
700                 if( i_snd_rc < 0 )
701                 {
702                     msg_Err( p_aout, "unable to get the device's status after "
703                              "recovery (%s)", snd_strerror( i_snd_rc ) );
704
705                     msleep( p_sys->i_period_time >> 1 );
706                     return;
707                 }
708             }
709             else
710             {
711                 msg_Err( p_aout, "unable to recover from buffer underrun" );
712
713                 msleep( p_sys->i_period_time >> 1 );
714                 return;
715             }
716         }
717
718         /* Here the device should be either in the RUNNING state either in
719            the PREPARE state. p_status is valid. */
720
721         snd_pcm_status_get_tstamp( p_status, &ts_next );
722         next_date = (mtime_t)ts_next.tv_sec * 1000000 + ts_next.tv_usec;
723         next_date += (mtime_t)snd_pcm_status_get_delay(p_status)
724                      * 1000000 / p_aout->output.output.i_rate;
725
726         p_buffer = aout_OutputNextBuffer( p_aout, next_date,
727                         (p_aout->output.output.i_format ==
728                          VLC_FOURCC('s','p','d','i')) );
729
730         /* Audio output buffer shortage -> stop the fill process and wait */
731         if( p_buffer == NULL )
732         {
733             msleep( p_sys->i_period_time >> 1 );
734             return;
735         }
736
737         i_snd_rc = snd_pcm_writei( p_sys->p_snd_pcm, p_buffer->p_buffer,
738                                    p_buffer->i_nb_samples );
739
740         if( i_snd_rc < 0 )
741         {
742             msg_Err( p_aout, "write failed (%s)",
743                              snd_strerror( i_snd_rc ) );
744         }
745
746         aout_BufferFree( p_buffer );
747     }
748 }