modules/mux/wav.c

   1 /*****************************************************************************
   2  * wav.c: wav muxer module for vlc
   3  *****************************************************************************
   4  * Copyright (C) 2004, 2006 VLC authors and VideoLAN
   5  *
   6  * Authors: Gildas Bazin <gbazin@videolan.org>
   7  *
   8  * This program is free software; you can redistribute it and/or modify it
   9  * under the terms of the GNU Lesser General Public License as published by
  10  * the Free Software Foundation; either version 2.1 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  16  * GNU Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public License
  19  * along with this program; if not, write to the Free Software Foundation,
  20  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  21  *****************************************************************************/
  22
  23 /*****************************************************************************
  24  * Preamble
  25  *****************************************************************************/
  26
  27 #ifdef HAVE_CONFIG_H
  28 # include "config.h"
  29 #endif
  30
  31 #include <vlc_common.h>
  32 #include <vlc_plugin.h>
  33 #include <vlc_aout.h>
  34 #include <vlc_sout.h>
  35 #include <vlc_block.h>
  36 #include <vlc_codecs.h>
  37
  38 /*****************************************************************************
  39  * Module descriptor
  40  *****************************************************************************/
  41 static int  Open   ( vlc_object_t * );
  42 static void Close  ( vlc_object_t * );
  43
  44 vlc_module_begin ()
  45     set_description( N_("WAV muxer") )
  46     set_capability( "sout mux", 5 )
  47     set_category( CAT_SOUT )
  48     set_subcategory( SUBCAT_SOUT_MUX )
  49     set_callbacks( Open, Close )
  50     add_shortcut( "wav" )
  51 vlc_module_end ()
  52
  53 /*****************************************************************************
  54  * Exported prototypes
  55  *****************************************************************************/
  56 static int Control  ( sout_mux_t *, int, va_list );
  57 static int AddStream( sout_mux_t *, sout_input_t * );
  58 static void DelStream( sout_mux_t *, sout_input_t * );
  59 static int Mux      ( sout_mux_t * );
  60
  61 #define MAX_CHANNELS 6
  62
  63 typedef struct
  64 {
  65     bool b_used;
  66     bool b_header;
  67     bool b_ext;
  68
  69     uint32_t i_data;
  70
  71     /* Wave header for the output data */
  72     uint32_t waveheader[5];
  73     WAVEFORMATEXTENSIBLE waveformat;
  74     uint32_t waveheader2[2];
  75
  76     uint32_t i_channel_mask;
  77     uint8_t i_chans_to_reorder;            /* do we need channel reordering */
  78     uint8_t pi_chan_table[AOUT_CHAN_MAX];
  79 } sout_mux_sys_t;
  80
  81 static const uint32_t pi_channels_in[] =
  82     { WAVE_SPEAKER_FRONT_LEFT, WAVE_SPEAKER_FRONT_RIGHT,
  83       WAVE_SPEAKER_SIDE_LEFT, WAVE_SPEAKER_SIDE_RIGHT,
  84       WAVE_SPEAKER_BACK_LEFT, WAVE_SPEAKER_BACK_RIGHT, WAVE_SPEAKER_BACK_CENTER,
  85       WAVE_SPEAKER_FRONT_CENTER, WAVE_SPEAKER_LOW_FREQUENCY, 0 };
  86 static const uint32_t pi_channels_out[] =
  87     { WAVE_SPEAKER_FRONT_LEFT, WAVE_SPEAKER_FRONT_RIGHT,
  88       WAVE_SPEAKER_FRONT_CENTER, WAVE_SPEAKER_LOW_FREQUENCY,
  89       WAVE_SPEAKER_BACK_LEFT, WAVE_SPEAKER_BACK_RIGHT,
  90       WAVE_SPEAKER_BACK_CENTER,
  91       WAVE_SPEAKER_SIDE_LEFT, WAVE_SPEAKER_SIDE_RIGHT, 0 };
  92
  93 /*****************************************************************************
  94  * Open:
  95  *****************************************************************************/
  96 static int Open( vlc_object_t *p_this )
  97 {
  98     sout_mux_t *p_mux = (sout_mux_t*)p_this;
  99     sout_mux_sys_t  *p_sys;
 100
 101     p_mux->pf_control  = Control;
 102     p_mux->pf_addstream = AddStream;
 103     p_mux->pf_delstream = DelStream;
 104     p_mux->pf_mux       = Mux;
 105
 106     p_mux->p_sys = p_sys = malloc( sizeof( sout_mux_sys_t ) );
 107     if( !p_sys )
 108         return VLC_ENOMEM;
 109     p_sys->b_used   = false;
 110     p_sys->b_header = true;
 111     p_sys->i_data   = 0;
 112
 113     p_sys->i_chans_to_reorder = 0;
 114
 115     return VLC_SUCCESS;
 116 }
 117
 118 /*****************************************************************************
 119  * Close:
 120  *****************************************************************************/
 121 static void Close( vlc_object_t * p_this )
 122 {
 123     sout_mux_t *p_mux = (sout_mux_t*)p_this;
 124     sout_mux_sys_t *p_sys = p_mux->p_sys;
 125     free( p_sys );
 126 }
 127
 128 static int Control( sout_mux_t *p_mux, int i_query, va_list args )
 129 {
 130     VLC_UNUSED(p_mux);
 131     bool *pb_bool;
 132     char **ppsz;
 133
 134     switch( i_query )
 135     {
 136         case MUX_CAN_ADD_STREAM_WHILE_MUXING:
 137             pb_bool = va_arg( args, bool * );
 138             *pb_bool = false;
 139             return VLC_SUCCESS;
 140
 141         case MUX_GET_MIME:
 142             ppsz = va_arg( args, char ** );
 143             *ppsz = strdup( "audio/wav" );
 144             return VLC_SUCCESS;
 145
 146         default:
 147             return VLC_EGENERIC;
 148     }
 149 }
 150 static int AddStream( sout_mux_t *p_mux, sout_input_t *p_input )
 151 {
 152     GUID subformat_guid = {0, 0, 0x10,{0x80, 0, 0, 0xaa, 0, 0x38, 0x9b, 0x71}};
 153     sout_mux_sys_t *p_sys = p_mux->p_sys;
 154     WAVEFORMATEX *p_waveformat = &p_sys->waveformat.Format;
 155     int i_bytes_per_sample;
 156     uint16_t i_format;
 157     bool b_ext;
 158
 159     if( p_input->p_fmt->i_cat != AUDIO_ES )
 160     {
 161         msg_Dbg( p_mux, "not an audio stream" );
 162         return VLC_EGENERIC;
 163     }
 164
 165     if( p_sys->b_used )
 166     {
 167         msg_Dbg( p_mux, "can't add more than 1 stream" );
 168         return VLC_EGENERIC;
 169     }
 170
 171     msg_Dbg( p_mux, "adding %i input channels, %iHz",
 172              p_input->p_fmt->audio.i_channels,
 173              p_input->p_fmt->audio.i_rate );
 174
 175     p_sys->i_channel_mask = 0;
 176     if( p_input->p_fmt->audio.i_physical_channels )
 177     {
 178         for( unsigned i = 0; i < pi_vlc_chan_order_wg4[i]; i++ )
 179             if( p_input->p_fmt->audio.i_physical_channels & pi_vlc_chan_order_wg4[i])
 180                 p_sys->i_channel_mask |= pi_channels_in[i];
 181
 182         p_sys->i_chans_to_reorder =
 183             aout_CheckChannelReorder( pi_channels_in, pi_channels_out,
 184                                       p_sys->i_channel_mask,
 185                                       p_sys->pi_chan_table );
 186
 187         msg_Dbg( p_mux, "channel mask: %x, reordering: %u",
 188                  p_sys->i_channel_mask, p_sys->i_chans_to_reorder );
 189     }
 190
 191     fourcc_to_wf_tag( p_input->p_fmt->i_codec, &i_format );
 192     b_ext = p_sys->b_ext = p_input->p_fmt->audio.i_channels > 2;
 193
 194     /* Build a WAV header for the output data */
 195     p_sys->waveheader[0] = VLC_FOURCC('R', 'I', 'F', 'F'); /* MainChunkID */
 196     SetDWLE( &p_sys->waveheader[1], 0 ); /* Length */
 197     p_sys->waveheader[2] = VLC_FOURCC('W', 'A', 'V', 'E'); /* ChunkTypeID */
 198     p_sys->waveheader[3] = VLC_FOURCC('f', 'm', 't', ' '); /* SubChunkID */
 199     SetDWLE( &p_sys->waveheader[4], b_ext ? 40 : 16 ); /* SubChunkLength */
 200
 201     p_sys->waveheader2[0] = VLC_FOURCC('d', 'a', 't', 'a'); /* DataChunkID */
 202     SetDWLE( &p_sys->waveheader2[1], 0 ); /* DataLength */
 203
 204     /* Build a WAVEVFORMAT header for the output data */
 205     memset( &p_sys->waveformat, 0, sizeof(WAVEFORMATEXTENSIBLE) );
 206     SetWLE( &p_waveformat->wFormatTag,
 207             b_ext ? WAVE_FORMAT_EXTENSIBLE : i_format );
 208     SetWLE( &p_waveformat->nChannels,
 209             p_input->p_fmt->audio.i_channels );
 210     SetDWLE( &p_waveformat->nSamplesPerSec, p_input->p_fmt->audio.i_rate );
 211     i_bytes_per_sample = p_input->p_fmt->audio.i_channels *
 212         p_input->p_fmt->audio.i_bitspersample / 8;
 213     SetDWLE( &p_waveformat->nAvgBytesPerSec,
 214              i_bytes_per_sample * p_input->p_fmt->audio.i_rate );
 215     SetWLE( &p_waveformat->nBlockAlign, i_bytes_per_sample );
 216     SetWLE( &p_waveformat->wBitsPerSample,
 217             p_input->p_fmt->audio.i_bitspersample );
 218     SetWLE( &p_waveformat->cbSize, 22 );
 219     SetWLE( &p_sys->waveformat.Samples.wValidBitsPerSample,
 220             p_input->p_fmt->audio.i_bitspersample );
 221     SetDWLE( &p_sys->waveformat.dwChannelMask,
 222              p_sys->i_channel_mask );
 223     p_sys->waveformat.SubFormat = subformat_guid;
 224     p_sys->waveformat.SubFormat.Data1 = i_format;
 225
 226
 227     p_sys->b_used = true;
 228
 229     return VLC_SUCCESS;
 230 }
 231
 232 static block_t *GetHeader( sout_mux_t *p_mux )
 233 {
 234     sout_mux_sys_t *p_sys = p_mux->p_sys;
 235     block_t *p_block =
 236         block_Alloc( sizeof( WAVEFORMATEXTENSIBLE ) + 7 * 4 );
 237
 238     SetDWLE( &p_sys->waveheader[1],
 239              20 + (p_sys->b_ext ? 40 : 16) + p_sys->i_data ); /* Length */
 240     SetDWLE( &p_sys->waveheader2[1], p_sys->i_data ); /* DataLength */
 241
 242     memcpy( p_block->p_buffer, &p_sys->waveheader, 5 * 4 );
 243     memcpy( p_block->p_buffer + 5 * 4, &p_sys->waveformat,
 244             sizeof( WAVEFORMATEXTENSIBLE ) );
 245     memcpy( p_block->p_buffer + 5 * 4 +
 246             (p_sys->b_ext ? sizeof( WAVEFORMATEXTENSIBLE ) : 16),
 247             &p_sys->waveheader2, 2 * 4 );
 248     if( !p_sys->b_ext ) p_block->i_buffer -= 24;
 249     return p_block;
 250 }
 251
 252 static void DelStream( sout_mux_t *p_mux, sout_input_t *p_input )
 253 {
 254     VLC_UNUSED(p_input);
 255     msg_Dbg( p_mux, "removing input" );
 256
 257     msg_Dbg( p_mux, "writing header data" );
 258     if( sout_AccessOutSeek( p_mux->p_access, 0 ) == VLC_SUCCESS )
 259     {
 260         sout_AccessOutWrite( p_mux->p_access, GetHeader( p_mux ) );
 261     }
 262 }
 263
 264 static int Mux( sout_mux_t *p_mux )
 265 {
 266     sout_mux_sys_t *p_sys = p_mux->p_sys;
 267     sout_input_t *p_input;
 268
 269     if( !p_mux->i_nb_inputs ) return VLC_SUCCESS;
 270
 271     if( p_sys->b_header )
 272     {
 273         msg_Dbg( p_mux, "writing header data" );
 274         sout_AccessOutWrite( p_mux->p_access, GetHeader( p_mux ) );
 275     }
 276     p_sys->b_header = false;
 277
 278     p_input = p_mux->pp_inputs[0];
 279     while( block_FifoCount( p_input->p_fifo ) > 0 )
 280     {
 281         block_t *p_block = block_FifoGet( p_input->p_fifo );
 282         p_sys->i_data += p_block->i_buffer;
 283
 284         /* Do the channel reordering */
 285         if( p_sys->i_chans_to_reorder )
 286             aout_ChannelReorder( p_block->p_buffer, p_block->i_buffer,
 287                                  p_sys->i_chans_to_reorder,
 288                                  p_sys->pi_chan_table, p_input->p_fmt->i_codec );
 289
 290         sout_AccessOutWrite( p_mux->p_access, p_block );
 291     }
 292
 293     return VLC_SUCCESS;
 294 }