* all: added a new access_filter module: record + one hotkey to start/stop
[vlc.git] / modules / audio_output / waveout.c
1 /*****************************************************************************
2  * waveout.c : Windows waveOut plugin for vlc
3  *****************************************************************************
4  * Copyright (C) 2001 VideoLAN
5  * $Id$
6  *
7  * Authors: Gildas Bazin <gbazin@videolan.org>
8  *      
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  * 
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <string.h>                                            /* strerror() */
28 #include <stdlib.h>                            /* calloc(), malloc(), free() */
29
30 #include <vlc/vlc.h>
31 #include <vlc/aout.h>
32 #include "aout_internal.h"
33
34 #include <windows.h>
35 #include <mmsystem.h>
36
37 #define FRAME_SIZE 4096              /* The size is in samples, not in bytes */
38 #define FRAMES_NUM 8
39
40 /*****************************************************************************
41  * Useful macros
42  *****************************************************************************/
43 #ifdef UNDER_CE
44 #   define DWORD_PTR DWORD
45 #endif
46
47 #ifndef WAVE_FORMAT_IEEE_FLOAT
48 #   define WAVE_FORMAT_IEEE_FLOAT 0x0003
49 #endif
50
51 #ifndef WAVE_FORMAT_DOLBY_AC3_SPDIF
52 #   define WAVE_FORMAT_DOLBY_AC3_SPDIF 0x0092
53 #endif
54
55 #ifndef WAVE_FORMAT_EXTENSIBLE
56 #define  WAVE_FORMAT_EXTENSIBLE   0xFFFE
57 #endif
58
59 #ifndef SPEAKER_FRONT_LEFT
60 #   define SPEAKER_FRONT_LEFT             0x1
61 #   define SPEAKER_FRONT_RIGHT            0x2
62 #   define SPEAKER_FRONT_CENTER           0x4
63 #   define SPEAKER_LOW_FREQUENCY          0x8
64 #   define SPEAKER_BACK_LEFT              0x10
65 #   define SPEAKER_BACK_RIGHT             0x20
66 #   define SPEAKER_FRONT_LEFT_OF_CENTER   0x40
67 #   define SPEAKER_FRONT_RIGHT_OF_CENTER  0x80
68 #   define SPEAKER_BACK_CENTER            0x100
69 #   define SPEAKER_SIDE_LEFT              0x200
70 #   define SPEAKER_SIDE_RIGHT             0x400
71 #   define SPEAKER_TOP_CENTER             0x800
72 #   define SPEAKER_TOP_FRONT_LEFT         0x1000
73 #   define SPEAKER_TOP_FRONT_CENTER       0x2000
74 #   define SPEAKER_TOP_FRONT_RIGHT        0x4000
75 #   define SPEAKER_TOP_BACK_LEFT          0x8000
76 #   define SPEAKER_TOP_BACK_CENTER        0x10000
77 #   define SPEAKER_TOP_BACK_RIGHT         0x20000
78 #   define SPEAKER_RESERVED               0x80000000
79 #endif
80
81 #ifndef _WAVEFORMATEXTENSIBLE_
82 typedef struct {
83     WAVEFORMATEX    Format;
84     union {
85         WORD wValidBitsPerSample;       /* bits of precision  */
86         WORD wSamplesPerBlock;          /* valid if wBitsPerSample==0 */
87         WORD wReserved;                 /* If neither applies, set to zero. */
88     } Samples;
89     DWORD           dwChannelMask;      /* which channels are */
90                                         /* present in stream  */
91     GUID            SubFormat;
92 } WAVEFORMATEXTENSIBLE, *PWAVEFORMATEXTENSIBLE;
93 #endif
94
95 static const GUID __KSDATAFORMAT_SUBTYPE_IEEE_FLOAT = {WAVE_FORMAT_IEEE_FLOAT, 0x0000, 0x0010, {0x80, 0x00, 0x00, 0xaa, 0x00, 0x38, 0x9b, 0x71}};
96 static const GUID __KSDATAFORMAT_SUBTYPE_PCM = {WAVE_FORMAT_PCM, 0x0000, 0x0010, {0x80, 0x00, 0x00, 0xaa, 0x00, 0x38, 0x9b, 0x71}};
97 static const GUID __KSDATAFORMAT_SUBTYPE_DOLBY_AC3_SPDIF = {WAVE_FORMAT_DOLBY_AC3_SPDIF, 0x0000, 0x0010, {0x80, 0x00, 0x00, 0xaa, 0x00, 0x38, 0x9b, 0x71}};
98
99 /*****************************************************************************
100  * Local prototypes
101  *****************************************************************************/
102 static int  Open         ( vlc_object_t * );
103 static void Close        ( vlc_object_t * );
104 static void Play         ( aout_instance_t * );
105
106 /*****************************************************************************
107  * notification_thread_t: waveOut event thread
108  *****************************************************************************/
109 typedef struct notification_thread_t
110 {
111     VLC_COMMON_MEMBERS
112     aout_instance_t *p_aout;
113
114 } notification_thread_t;
115
116 /* local functions */
117 static void Probe        ( aout_instance_t * );
118 static int OpenWaveOut   ( aout_instance_t *, int, int, int, int, vlc_bool_t );
119 static int OpenWaveOutPCM( aout_instance_t *, int*, int, int, int, vlc_bool_t );
120 static int PlayWaveOut   ( aout_instance_t *, HWAVEOUT, WAVEHDR *,
121                            aout_buffer_t * );
122
123 static void CALLBACK WaveOutCallback ( HWAVEOUT, UINT, DWORD, DWORD, DWORD );
124 static void WaveOutThread( notification_thread_t * );
125
126 static int VolumeInfos( aout_instance_t *, audio_volume_t * );
127 static int VolumeGet( aout_instance_t *, audio_volume_t * );
128 static int VolumeSet( aout_instance_t *, audio_volume_t );
129
130 /*****************************************************************************
131  * Module descriptor
132  *****************************************************************************/
133 #define FLOAT_TEXT N_("Use float32 output")
134 #define FLOAT_LONGTEXT N_( \
135     "The option allows you to enable or disable the high-quality float32 " \
136     "audio output mode (which is not well supported by some soundcards)." )
137
138 vlc_module_begin();
139     set_shortname( "WaveOut" );
140     set_description( _("Win32 waveOut extension output") );
141     set_capability( "audio output", 50 );
142     set_category( CAT_AUDIO );
143     set_subcategory( SUBCAT_AUDIO_AOUT );
144     add_bool( "waveout-float32", 1, 0, FLOAT_TEXT, FLOAT_LONGTEXT, VLC_TRUE );
145     set_callbacks( Open, Close );
146 vlc_module_end();
147
148 /*****************************************************************************
149  * aout_sys_t: waveOut audio output method descriptor
150  *****************************************************************************
151  * This structure is part of the audio output thread descriptor.
152  * It describes the waveOut specific properties of an audio device.
153  *****************************************************************************/
154 struct aout_sys_t
155 {
156     HWAVEOUT h_waveout;                        /* handle to waveout instance */
157
158     WAVEFORMATEXTENSIBLE waveformat;                         /* audio format */
159
160     WAVEHDR waveheader[FRAMES_NUM];
161
162     notification_thread_t *p_notif;                      /* WaveOutThread id */
163     HANDLE event;
164
165     int i_buffer_size;
166
167     byte_t *p_silence_buffer;               /* buffer we use to play silence */
168
169     vlc_bool_t b_chan_reorder;              /* do we need channel reordering */
170     int pi_chan_table[AOUT_CHAN_MAX];
171 };
172
173 static const uint32_t pi_channels_src[] =
174     { AOUT_CHAN_LEFT, AOUT_CHAN_RIGHT,
175       AOUT_CHAN_MIDDLELEFT, AOUT_CHAN_MIDDLERIGHT,
176       AOUT_CHAN_REARLEFT, AOUT_CHAN_REARRIGHT,
177       AOUT_CHAN_CENTER, AOUT_CHAN_LFE, 0 };
178 static const uint32_t pi_channels_in[] =
179     { SPEAKER_FRONT_LEFT, SPEAKER_FRONT_RIGHT,
180       SPEAKER_SIDE_LEFT, SPEAKER_SIDE_RIGHT,
181       SPEAKER_BACK_LEFT, SPEAKER_BACK_RIGHT,
182       SPEAKER_FRONT_CENTER, SPEAKER_LOW_FREQUENCY, 0 };
183 static const uint32_t pi_channels_out[] =
184     { SPEAKER_FRONT_LEFT, SPEAKER_FRONT_RIGHT,
185       SPEAKER_FRONT_CENTER, SPEAKER_LOW_FREQUENCY,
186       SPEAKER_BACK_LEFT, SPEAKER_BACK_RIGHT,
187       SPEAKER_SIDE_LEFT, SPEAKER_SIDE_RIGHT, 0 };
188
189 /*****************************************************************************
190  * Open: open the audio device
191  *****************************************************************************
192  * This function opens and setups Win32 waveOut
193  *****************************************************************************/
194 static int Open( vlc_object_t *p_this )
195 {
196     aout_instance_t *p_aout = (aout_instance_t *)p_this;
197     vlc_value_t val;
198     int i;
199
200     /* Allocate structure */
201     p_aout->output.p_sys = malloc( sizeof( aout_sys_t ) );
202
203     if( p_aout->output.p_sys == NULL )
204     {
205         msg_Err( p_aout, "out of memory" );
206         return VLC_EGENERIC;
207     }
208
209     p_aout->output.pf_play = Play;
210     p_aout->b_die = VLC_FALSE;
211
212     if( var_Type( p_aout, "audio-device" ) == 0 )
213     {
214         Probe( p_aout );
215     }
216
217     if( var_Get( p_aout, "audio-device", &val ) < 0 )
218     {
219         /* Probe() has failed. */
220         free( p_aout->output.p_sys );
221         return VLC_EGENERIC;
222     }
223
224     var_Create( p_aout, "waveout-float32", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
225
226     /* Open the device */
227     if( val.i_int == AOUT_VAR_SPDIF )
228     {
229         p_aout->output.output.i_format = VLC_FOURCC('s','p','d','i');
230
231         if( OpenWaveOut( p_aout, VLC_FOURCC('s','p','d','i'),
232                          p_aout->output.output.i_physical_channels,
233                          aout_FormatNbChannels( &p_aout->output.output ),
234                          p_aout->output.output.i_rate, VLC_FALSE )
235             != VLC_SUCCESS )
236         {
237             msg_Err( p_aout, "cannot open waveout audio device" );
238             free( p_aout->output.p_sys );
239             return VLC_EGENERIC;
240         }
241
242         /* Calculate the frame size in bytes */
243         p_aout->output.i_nb_samples = A52_FRAME_NB;
244         p_aout->output.output.i_bytes_per_frame = AOUT_SPDIF_SIZE;
245         p_aout->output.output.i_frame_length = A52_FRAME_NB;
246         p_aout->output.p_sys->i_buffer_size =
247             p_aout->output.output.i_bytes_per_frame;
248
249         aout_VolumeNoneInit( p_aout );
250     }
251     else
252     {
253         if( val.i_int == AOUT_VAR_5_1 )
254         {
255             p_aout->output.output.i_physical_channels
256                 = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER
257                    | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT
258                    | AOUT_CHAN_LFE;
259         }
260         else if( val.i_int == AOUT_VAR_2F2R )
261         {
262             p_aout->output.output.i_physical_channels
263                 = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT
264                    | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT;
265         }
266         else if( val.i_int == AOUT_VAR_MONO )
267         {
268             p_aout->output.output.i_physical_channels = AOUT_CHAN_CENTER;
269         }
270         else
271         {
272             p_aout->output.output.i_physical_channels
273                 = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT;
274         }
275
276         if( OpenWaveOutPCM( p_aout, &p_aout->output.output.i_format,
277                             p_aout->output.output.i_physical_channels,
278                             aout_FormatNbChannels( &p_aout->output.output ),
279                             p_aout->output.output.i_rate, VLC_FALSE )
280             != VLC_SUCCESS )
281         {
282             msg_Err( p_aout, "cannot open waveout audio device" );
283             free( p_aout->output.p_sys );
284             return VLC_EGENERIC;
285         }
286
287         /* Calculate the frame size in bytes */
288         p_aout->output.i_nb_samples = FRAME_SIZE;
289         aout_FormatPrepare( &p_aout->output.output );
290         p_aout->output.p_sys->i_buffer_size = FRAME_SIZE *
291             p_aout->output.output.i_bytes_per_frame;
292
293         aout_VolumeSoftInit( p_aout );
294
295         p_aout->output.pf_volume_infos = VolumeInfos;
296         p_aout->output.pf_volume_get = VolumeGet;
297         p_aout->output.pf_volume_set = VolumeSet;
298     }
299
300
301     waveOutReset( p_aout->output.p_sys->h_waveout );
302
303     /* Allocate silence buffer */
304     p_aout->output.p_sys->p_silence_buffer =
305         malloc( p_aout->output.p_sys->i_buffer_size );
306     if( p_aout->output.p_sys->p_silence_buffer == NULL )
307     {
308         free( p_aout->output.p_sys );
309         msg_Err( p_aout, "out of memory" );
310         return 1;
311     }
312
313     /* Zero the buffer. WinCE doesn't have calloc(). */
314     memset( p_aout->output.p_sys->p_silence_buffer, 0,
315             p_aout->output.p_sys->i_buffer_size );
316
317     /* Now we need to setup our waveOut play notification structure */
318     p_aout->output.p_sys->p_notif =
319         vlc_object_create( p_aout, sizeof(notification_thread_t) );
320     p_aout->output.p_sys->p_notif->p_aout = p_aout;
321     p_aout->output.p_sys->event = CreateEvent( NULL, FALSE, FALSE, NULL );
322
323     /* Then launch the notification thread */
324     if( vlc_thread_create( p_aout->output.p_sys->p_notif,
325                            "waveOut Notification Thread", WaveOutThread,
326                            VLC_THREAD_PRIORITY_HIGHEST, VLC_FALSE ) )
327     {
328         msg_Err( p_aout, "cannot create WaveOutThread" );
329     }
330
331     /* We need to kick off the playback in order to have the callback properly
332      * working */
333     for( i = 0; i < FRAMES_NUM; i++ )
334     {
335         p_aout->output.p_sys->waveheader[i].dwFlags = WHDR_DONE;
336         p_aout->output.p_sys->waveheader[i].dwUser = 0;
337     }
338     PlayWaveOut( p_aout, p_aout->output.p_sys->h_waveout,
339                  &p_aout->output.p_sys->waveheader[0], NULL );
340
341     return 0;
342 }
343
344 /*****************************************************************************
345  * Probe: probe the audio device for available formats and channels
346  *****************************************************************************/
347 static void Probe( aout_instance_t * p_aout )
348 {
349     vlc_value_t val, text;
350     int i_format;
351     unsigned int i_physical_channels;
352
353     var_Create( p_aout, "audio-device", VLC_VAR_INTEGER | VLC_VAR_HASCHOICE );
354     text.psz_string = _("Audio Device");
355     var_Change( p_aout, "audio-device", VLC_VAR_SETTEXT, &text, NULL );
356
357     /* Test for 5.1 support */
358     i_physical_channels = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT |
359                           AOUT_CHAN_CENTER | AOUT_CHAN_REARLEFT |
360                           AOUT_CHAN_REARRIGHT | AOUT_CHAN_LFE;
361     if( p_aout->output.output.i_physical_channels == i_physical_channels )
362     {
363         if( OpenWaveOutPCM( p_aout, &i_format,
364                             i_physical_channels, 6,
365                             p_aout->output.output.i_rate, VLC_TRUE )
366             == VLC_SUCCESS )
367         {
368             val.i_int = AOUT_VAR_5_1;
369             text.psz_string = N_("5.1");
370             var_Change( p_aout, "audio-device",
371                         VLC_VAR_ADDCHOICE, &val, &text );
372             msg_Dbg( p_aout, "device supports 5.1 channels" );
373         }
374     }
375
376     /* Test for 2 Front 2 Rear support */
377     i_physical_channels = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT |
378                           AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT;
379     if( ( p_aout->output.output.i_physical_channels & i_physical_channels )
380         == i_physical_channels )
381     {
382         if( OpenWaveOutPCM( p_aout, &i_format,
383                             i_physical_channels, 4,
384                             p_aout->output.output.i_rate, VLC_TRUE )
385             == VLC_SUCCESS )
386         {
387             val.i_int = AOUT_VAR_2F2R;
388             text.psz_string = N_("2 Front 2 Rear");
389             var_Change( p_aout, "audio-device",
390                         VLC_VAR_ADDCHOICE, &val, &text );
391             msg_Dbg( p_aout, "device supports 4 channels" );
392         }
393     }
394
395     /* Test for stereo support */
396     i_physical_channels = AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT;
397     if( OpenWaveOutPCM( p_aout, &i_format,
398                         i_physical_channels, 2,
399                         p_aout->output.output.i_rate, VLC_TRUE )
400         == VLC_SUCCESS )
401     {
402         val.i_int = AOUT_VAR_STEREO;
403         text.psz_string = N_("Stereo");
404         var_Change( p_aout, "audio-device", VLC_VAR_ADDCHOICE, &val, &text );
405         msg_Dbg( p_aout, "device supports 2 channels" );
406     }
407
408     /* Test for mono support */
409     i_physical_channels = AOUT_CHAN_CENTER;
410     if( OpenWaveOutPCM( p_aout, &i_format,
411                         i_physical_channels, 1,
412                         p_aout->output.output.i_rate, VLC_TRUE )
413         == VLC_SUCCESS )
414     {
415         val.i_int = AOUT_VAR_MONO;
416         text.psz_string = N_("Mono");
417         var_Change( p_aout, "audio-device", VLC_VAR_ADDCHOICE, &val, &text );
418         msg_Dbg( p_aout, "device supports 1 channel" );
419     }
420
421     /* Test for SPDIF support */
422     if ( AOUT_FMT_NON_LINEAR( &p_aout->output.output ) )
423     {
424         if( OpenWaveOut( p_aout, VLC_FOURCC('s','p','d','i'),
425                          p_aout->output.output.i_physical_channels,
426                          aout_FormatNbChannels( &p_aout->output.output ),
427                          p_aout->output.output.i_rate, VLC_TRUE )
428             == VLC_SUCCESS )
429         {
430             msg_Dbg( p_aout, "device supports A/52 over S/PDIF" );
431             val.i_int = AOUT_VAR_SPDIF;
432             text.psz_string = N_("A/52 over S/PDIF");
433             var_Change( p_aout, "audio-device",
434                         VLC_VAR_ADDCHOICE, &val, &text );
435             if( config_GetInt( p_aout, "spdif" ) )
436                 var_Set( p_aout, "audio-device", val );
437         }
438     }
439
440     var_Change( p_aout, "audio-device", VLC_VAR_CHOICESCOUNT, &val, NULL );
441     if( val.i_int <= 0 )
442     {
443         /* Probe() has failed. */
444         var_Destroy( p_aout, "audio-device" );
445         return;
446     }
447
448     var_AddCallback( p_aout, "audio-device", aout_ChannelsRestart, NULL );
449
450     val.b_bool = VLC_TRUE;
451     var_Set( p_aout, "intf-change", val );
452 }
453
454 /*****************************************************************************
455  * Play: play a sound buffer
456  *****************************************************************************
457  * This doesn't actually play the buffer. This just stores the buffer so it
458  * can be played by the callback thread.
459  *****************************************************************************/
460 static void Play( aout_instance_t *_p_aout )
461 {
462 }
463
464 /*****************************************************************************
465  * Close: close the audio device
466  *****************************************************************************/
467 static void Close( vlc_object_t *p_this )
468 {
469     aout_instance_t *p_aout = (aout_instance_t *)p_this;
470     aout_sys_t *p_sys = p_aout->output.p_sys;
471
472     /* Before calling waveOutClose we must reset the device */
473     p_aout->b_die = VLC_TRUE;
474
475     waveOutReset( p_sys->h_waveout );
476
477     /* wake up the audio thread */
478     SetEvent( p_sys->event );
479     vlc_thread_join( p_sys->p_notif );
480     vlc_object_destroy( p_sys->p_notif );
481     CloseHandle( p_sys->event );
482
483     /* Close the device */
484     if( waveOutClose( p_sys->h_waveout ) != MMSYSERR_NOERROR )
485     {
486         msg_Err( p_aout, "waveOutClose failed" );
487     }
488
489     free( p_sys->p_silence_buffer );
490     free( p_sys );
491 }
492
493 /*****************************************************************************
494  * OpenWaveOut: open the waveout sound device
495  ****************************************************************************/
496 static int OpenWaveOut( aout_instance_t *p_aout, int i_format,
497                         int i_channels, int i_nb_channels, int i_rate,
498                         vlc_bool_t b_probe )
499 {
500     MMRESULT result;
501     unsigned int i;
502
503     /* Set sound format */
504
505 #define waveformat p_aout->output.p_sys->waveformat
506
507     waveformat.dwChannelMask = 0;
508     for( i = 0; i < sizeof(pi_channels_src)/sizeof(uint32_t); i++ )
509     {
510         if( i_channels & pi_channels_src[i] )
511             waveformat.dwChannelMask |= pi_channels_in[i];
512     }
513
514     switch( i_format )
515     {
516     case VLC_FOURCC('s','p','d','i'):
517         i_nb_channels = 2;
518         /* To prevent channel re-ordering */
519         waveformat.dwChannelMask = SPEAKER_FRONT_LEFT | SPEAKER_FRONT_RIGHT;
520         waveformat.Format.wBitsPerSample = 16;
521         waveformat.Samples.wValidBitsPerSample =
522             waveformat.Format.wBitsPerSample;
523         waveformat.Format.wFormatTag = WAVE_FORMAT_DOLBY_AC3_SPDIF;
524         waveformat.SubFormat = __KSDATAFORMAT_SUBTYPE_DOLBY_AC3_SPDIF;
525         break;
526
527     case VLC_FOURCC('f','l','3','2'):
528         waveformat.Format.wBitsPerSample = sizeof(float) * 8;
529         waveformat.Samples.wValidBitsPerSample =
530             waveformat.Format.wBitsPerSample;
531         waveformat.Format.wFormatTag = WAVE_FORMAT_IEEE_FLOAT;
532         waveformat.SubFormat = __KSDATAFORMAT_SUBTYPE_IEEE_FLOAT;
533         break;
534
535     case VLC_FOURCC('s','1','6','l'):
536         waveformat.Format.wBitsPerSample = 16;
537         waveformat.Samples.wValidBitsPerSample =
538             waveformat.Format.wBitsPerSample;
539         waveformat.Format.wFormatTag = WAVE_FORMAT_PCM;
540         waveformat.SubFormat = __KSDATAFORMAT_SUBTYPE_PCM;
541         break;
542     }
543
544     waveformat.Format.nChannels = i_nb_channels;
545     waveformat.Format.nSamplesPerSec = i_rate;
546     waveformat.Format.nBlockAlign =
547         waveformat.Format.wBitsPerSample / 8 * i_nb_channels;
548     waveformat.Format.nAvgBytesPerSec =
549         waveformat.Format.nSamplesPerSec * waveformat.Format.nBlockAlign;
550
551     /* Only use the new WAVE_FORMAT_EXTENSIBLE format for multichannel audio */
552     if( i_nb_channels <= 2 )
553     {
554         waveformat.Format.cbSize = 0;
555     }
556     else
557     {
558         waveformat.Format.wFormatTag = WAVE_FORMAT_EXTENSIBLE;
559         waveformat.Format.cbSize =
560             sizeof(WAVEFORMATEXTENSIBLE) - sizeof(WAVEFORMATEX);
561     }
562
563     /* Open the device */
564     result = waveOutOpen( &p_aout->output.p_sys->h_waveout, WAVE_MAPPER,
565                           (WAVEFORMATEX *)&waveformat,
566                           (DWORD_PTR)WaveOutCallback, (DWORD_PTR)p_aout,
567                           CALLBACK_FUNCTION | (b_probe?WAVE_FORMAT_QUERY:0) );
568     if( result == WAVERR_BADFORMAT )
569     {
570         msg_Warn( p_aout, "waveOutOpen failed WAVERR_BADFORMAT" );
571         return VLC_EGENERIC;
572     }
573     if( result == MMSYSERR_ALLOCATED )
574     {
575         msg_Warn( p_aout, "waveOutOpen failed WAVERR_ALLOCATED" );
576         return VLC_EGENERIC;
577     }
578     if( result != MMSYSERR_NOERROR )
579     {
580         msg_Warn( p_aout, "waveOutOpen failed" );
581         return VLC_EGENERIC;
582     }
583
584     p_aout->output.p_sys->b_chan_reorder =
585         aout_CheckChannelReorder( pi_channels_in, pi_channels_out,
586                                   waveformat.dwChannelMask, i_nb_channels,
587                                   p_aout->output.p_sys->pi_chan_table );
588
589     if( p_aout->output.p_sys->b_chan_reorder )
590     {
591         msg_Dbg( p_aout, "channel reordering needed" );
592     }
593
594     return VLC_SUCCESS;
595
596 #undef waveformat
597
598 }
599
600 /*****************************************************************************
601  * OpenWaveOutPCM: open a PCM waveout sound device
602  ****************************************************************************/
603 static int OpenWaveOutPCM( aout_instance_t *p_aout, int *i_format,
604                            int i_channels, int i_nb_channels, int i_rate,
605                            vlc_bool_t b_probe )
606 {
607     vlc_value_t val;
608
609     var_Get( p_aout, "waveout-float32", &val );
610
611     if( !val.b_bool || OpenWaveOut( p_aout, VLC_FOURCC('f','l','3','2'),
612                                    i_channels, i_nb_channels, i_rate, b_probe )
613         != VLC_SUCCESS )
614     {
615         if ( OpenWaveOut( p_aout, VLC_FOURCC('s','1','6','l'),
616                           i_channels, i_nb_channels, i_rate, b_probe )
617              != VLC_SUCCESS )
618         {
619             return VLC_EGENERIC;
620         }
621         else
622         {
623             *i_format = VLC_FOURCC('s','1','6','l');
624             return VLC_SUCCESS;
625         }
626     }
627     else
628     {
629         *i_format = VLC_FOURCC('f','l','3','2');
630         return VLC_SUCCESS;
631     }
632 }
633
634 /*****************************************************************************
635  * PlayWaveOut: play a buffer through the WaveOut device
636  *****************************************************************************/
637 static int PlayWaveOut( aout_instance_t *p_aout, HWAVEOUT h_waveout,
638                         WAVEHDR *p_waveheader, aout_buffer_t *p_buffer )
639 {
640     MMRESULT result;
641
642     /* Prepare the buffer */
643     if( p_buffer != NULL )
644         p_waveheader->lpData = p_buffer->p_buffer;
645     else
646         /* Use silence buffer instead */
647         p_waveheader->lpData = p_aout->output.p_sys->p_silence_buffer;
648
649     p_waveheader->dwUser = p_buffer ? (DWORD_PTR)p_buffer : (DWORD_PTR)1;
650     p_waveheader->dwBufferLength = p_aout->output.p_sys->i_buffer_size;
651     p_waveheader->dwFlags = 0;
652
653     result = waveOutPrepareHeader( h_waveout, p_waveheader, sizeof(WAVEHDR) );
654     if( result != MMSYSERR_NOERROR )
655     {
656         msg_Err( p_aout, "waveOutPrepareHeader failed" );
657         return VLC_EGENERIC;
658     }
659
660     /* Send the buffer to the waveOut queue */
661     result = waveOutWrite( h_waveout, p_waveheader, sizeof(WAVEHDR) );
662     if( result != MMSYSERR_NOERROR )
663     {
664         msg_Err( p_aout, "waveOutWrite failed" );
665         return VLC_EGENERIC;
666     }
667
668     return VLC_SUCCESS;
669 }
670
671 /*****************************************************************************
672  * WaveOutCallback: what to do once WaveOut has played its sound samples
673  *****************************************************************************/
674 static void CALLBACK WaveOutCallback( HWAVEOUT h_waveout, UINT uMsg,
675                                       DWORD _p_aout,
676                                       DWORD dwParam1, DWORD dwParam2 )
677 {
678     aout_instance_t *p_aout = (aout_instance_t *)_p_aout;
679     int i, i_queued_frames = 0;
680
681     if( uMsg != WOM_DONE ) return;
682
683     if( p_aout->b_die ) return;
684
685     /* Find out the current latency */
686     for( i = 0; i < FRAMES_NUM; i++ )
687     {
688         /* Check if frame buf is available */
689         if( !(p_aout->output.p_sys->waveheader[i].dwFlags & WHDR_DONE) )
690         {
691             i_queued_frames++;
692         }
693     }
694
695     /* Don't wake up the thread too much */
696     if( i_queued_frames < FRAMES_NUM / 2 )
697         SetEvent( p_aout->output.p_sys->event );
698 }
699
700 /*****************************************************************************
701  * WaveOutThread: this thread will capture play notification events. 
702  *****************************************************************************
703  * We use this thread to feed new audio samples to the sound card because
704  * we are not authorized to use waveOutWrite() directly in the waveout
705  * callback.
706  *****************************************************************************/
707 static void WaveOutThread( notification_thread_t *p_notif )
708 {
709     aout_instance_t *p_aout = p_notif->p_aout;
710     aout_sys_t *p_sys = p_aout->output.p_sys;
711     aout_buffer_t *p_buffer = NULL;
712     WAVEHDR *p_waveheader = p_sys->waveheader;
713     int i, i_queued_frames;
714     vlc_bool_t b_sleek;
715
716     /* We don't want any resampling when using S/PDIF */
717     b_sleek = p_aout->output.output.i_format == VLC_FOURCC('s','p','d','i');
718
719     while( 1 )
720     {
721         WaitForSingleObject( p_sys->event, INFINITE );
722
723         /* Cleanup and find out the current latency */
724         i_queued_frames = 0;
725         for( i = 0; i < FRAMES_NUM; i++ )
726         {
727             if( (p_waveheader[i].dwFlags & WHDR_DONE) &&
728                 p_waveheader[i].dwUser )
729             {
730                 /* Unprepare and free the buffers which has just been played */
731                 waveOutUnprepareHeader( p_sys->h_waveout, &p_waveheader[i],
732                                         sizeof(WAVEHDR) );
733
734                 if( p_waveheader[i].dwUser != 1 )
735                     aout_BufferFree( (aout_buffer_t *)p_waveheader[i].dwUser );
736
737                 p_waveheader[i].dwUser = 0;
738             }
739
740             /* Check if frame buf is available */
741             if( !(p_waveheader[i].dwFlags & WHDR_DONE) )
742             {
743                 i_queued_frames++;
744             }
745         }
746
747         if( p_aout->b_die ) return;
748
749         /* Try to fill in as many frame buffers as possible */
750         for( i = 0; i < FRAMES_NUM; i++ )
751         {
752             /* Check if frame buf is available */
753             if( p_waveheader[i].dwFlags & WHDR_DONE )
754             {
755                 /* Take into account the latency */
756                 p_buffer = aout_OutputNextBuffer( p_aout,
757                     mdate() + 1000000 * i_queued_frames /
758                     p_aout->output.output.i_rate * p_aout->output.i_nb_samples,
759                     b_sleek );
760
761                 if( !p_buffer && i_queued_frames )
762                 {
763                     /* We aren't late so no need to play a blank sample */
764                     break;
765                 }
766
767                 /* Do the channel reordering */
768                 if( p_buffer && p_sys->b_chan_reorder )
769                 {
770                     aout_ChannelReorder( p_buffer->p_buffer,
771                         p_buffer->i_nb_bytes,
772                         p_sys->waveformat.Format.nChannels,
773                         p_sys->pi_chan_table,
774                         p_sys->waveformat.Format.wBitsPerSample );
775                 }
776
777                 PlayWaveOut( p_aout, p_sys->h_waveout,
778                              &p_waveheader[i], p_buffer );
779
780                 i_queued_frames++;
781             }
782         }
783     }
784 }
785
786 static int VolumeInfos( aout_instance_t * p_aout, audio_volume_t * pi_soft )
787 {
788     *pi_soft = AOUT_VOLUME_MAX / 2;
789     return 0;
790 }
791
792 static int VolumeGet( aout_instance_t * p_aout, audio_volume_t * pi_volume )
793 {
794     DWORD i_waveout_vol;
795
796 #ifdef UNDER_CE
797     waveOutGetVolume( 0, &i_waveout_vol );
798 #else
799     waveOutGetVolume( p_aout->output.p_sys->h_waveout, &i_waveout_vol );
800 #endif
801
802     i_waveout_vol &= 0xFFFF;
803     *pi_volume = p_aout->output.i_volume =
804         i_waveout_vol * AOUT_VOLUME_MAX / 2 / 0xFFFF;
805     return 0;
806 }
807
808 static int VolumeSet( aout_instance_t * p_aout, audio_volume_t i_volume )
809 {
810     unsigned long i_waveout_vol = i_volume * 0xFFFF * 2 / AOUT_VOLUME_MAX;
811     i_waveout_vol |= (i_waveout_vol << 16);
812
813 #ifdef UNDER_CE
814     waveOutSetVolume( 0, i_waveout_vol );
815 #else
816     waveOutSetVolume( p_aout->output.p_sys->h_waveout, i_waveout_vol );
817 #endif
818
819     p_aout->output.i_volume = i_volume;
820     return 0;
821 }