git.sesse.net Git - vlc/blob - modules/audio_filter/converter/mpgatofixed32.c

   1 /*****************************************************************************
   2  * mpgatofixed32.c: MPEG-1 & 2 audio layer I, II, III + MPEG 2.5 decoder,
   3  * using MAD (MPEG Audio Decoder)
   4  *****************************************************************************
   5  * Copyright (C) 2001 by Jean-Paul Saman
   6  * $Id: mpgatofixed32.c,v 1.9 2004/01/25 18:53:06 gbazin Exp $
   7  *
   8  * Authors: Christophe Massiot <massiot@via.ecp.fr>
   9  *          Jean-Paul Saman <jpsaman@wxs.nl>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  24  *****************************************************************************/
  25
  26 /*****************************************************************************
  27  * Preamble
  28  *****************************************************************************/
  29 #include <stdlib.h>                                      /* malloc(), free() */
  30 #include <string.h>                                              /* strdup() */
  31
  32 #include <mad.h>
  33
  34 #include <vlc/vlc.h>
  35 #include "audio_output.h"
  36 #include "aout_internal.h"
  37
  38 /*****************************************************************************
  39  * Local prototypes
  40  *****************************************************************************/
  41 static int  Create    ( vlc_object_t * );
  42 static void Destroy   ( vlc_object_t * );
  43 static void DoWork    ( aout_instance_t *, aout_filter_t *, aout_buffer_t *,
  44                         aout_buffer_t * );
  45
  46 /*****************************************************************************
  47  * Local structures
  48  *****************************************************************************/
  49 struct aout_filter_sys_t
  50 {
  51     struct mad_stream mad_stream;
  52     struct mad_frame mad_frame;
  53     struct mad_synth mad_synth;
  54 };
  55
  56 /*****************************************************************************
  57  * Module descriptor
  58  *****************************************************************************/
  59 vlc_module_begin();
  60     set_description( _("MPEG audio decoder") );
  61     set_capability( "audio filter", 100 );
  62     set_callbacks( Create, Destroy );
  63 vlc_module_end();
  64
  65 /*****************************************************************************
  66  * Create:
  67  *****************************************************************************/
  68 static int Create( vlc_object_t * _p_filter )
  69 {
  70     aout_filter_t * p_filter = (aout_filter_t *)_p_filter;
  71     struct aout_filter_sys_t * p_sys;
  72
  73     if ( (p_filter->input.i_format != VLC_FOURCC('m','p','g','a')
  74            && p_filter->input.i_format != VLC_FOURCC('m','p','g','3'))
  75             || (p_filter->output.i_format != VLC_FOURCC('f','l','3','2')
  76                  && p_filter->output.i_format != VLC_FOURCC('f','i','3','2')) )
  77     {
  78         return -1;
  79     }
  80
  81     if ( !AOUT_FMTS_SIMILAR( &p_filter->input, &p_filter->output ) )
  82     {
  83         return -1;
  84     }
  85
  86     /* Allocate the memory needed to store the module's structure */
  87     p_sys = p_filter->p_sys = malloc( sizeof(struct aout_filter_sys_t) );
  88     if( p_sys == NULL )
  89     {
  90         msg_Err( p_filter, "out of memory" );
  91         return -1;
  92     }
  93
  94     /* Initialize libmad */
  95     mad_stream_init( &p_sys->mad_stream );
  96     mad_frame_init( &p_sys->mad_frame );
  97     mad_synth_init( &p_sys->mad_synth );
  98     mad_stream_options( &p_sys->mad_stream, MAD_OPTION_IGNORECRC );
  99
 100     p_filter->pf_do_work = DoWork;
 101     p_filter->b_in_place = 0;
 102
 103     return 0;
 104 }
 105
 106 /*****************************************************************************
 107  * DoWork: decode an MPEG audio frame.
 108  *****************************************************************************/
 109 static void DoWork( aout_instance_t * p_aout, aout_filter_t * p_filter,
 110                     aout_buffer_t * p_in_buf, aout_buffer_t * p_out_buf )
 111 {
 112     struct aout_filter_sys_t * p_sys = p_filter->p_sys;
 113
 114
 115     p_out_buf->i_nb_samples = p_in_buf->i_nb_samples;
 116     p_out_buf->i_nb_bytes = p_in_buf->i_nb_samples * sizeof(vlc_fixed_t) *
 117                                aout_FormatNbChannels( &p_filter->input );
 118
 119     /* Do the actual decoding now. */
 120     mad_stream_buffer( &p_sys->mad_stream, p_in_buf->p_buffer,
 121                        p_in_buf->i_nb_bytes );
 122     if ( mad_frame_decode( &p_sys->mad_frame, &p_sys->mad_stream ) == -1 )
 123     {
 124         msg_Warn( p_aout, "libmad error: %s",
 125                   mad_stream_errorstr( &p_sys->mad_stream ) );
 126         if( p_filter->output.i_format == VLC_FOURCC('f','l','3','2') )
 127         {
 128             int i;
 129             int i_size = p_out_buf->i_nb_bytes / sizeof(float);
 130
 131             float * a = (float *)p_out_buf->p_buffer;
 132             for ( i = 0 ; i < i_size ; i++ )
 133                 *a++ = 0.0;
 134         }
 135         else
 136         {
 137             memset( p_out_buf->p_buffer, 0, p_out_buf->i_nb_bytes );
 138         }
 139         return;
 140     }
 141     mad_synth_frame( &p_sys->mad_synth, &p_sys->mad_frame );
 142
 143     if ( p_filter->output.i_format == VLC_FOURCC('f','i','3','2') )
 144     {
 145         /* Interleave and keep buffers in mad_fixed_t format */
 146         mad_fixed_t * p_samples = (mad_fixed_t *)p_out_buf->p_buffer;
 147         struct mad_pcm * p_pcm = &p_sys->mad_synth.pcm;
 148         unsigned int i_samples = p_pcm->length;
 149         mad_fixed_t const * p_left = p_pcm->samples[0];
 150         mad_fixed_t const * p_right = p_pcm->samples[1];
 151
 152         switch ( p_pcm->channels )
 153         {
 154         case 2:
 155             while ( i_samples-- )
 156             {
 157                 *p_samples++ = *p_left++;
 158                 *p_samples++ = *p_right++;
 159             }
 160             break;
 161
 162         case 1:
 163             p_filter->p_vlc->pf_memcpy( p_samples, p_left,
 164                                         i_samples * sizeof(mad_fixed_t) );
 165             break;
 166
 167         default:
 168             msg_Err( p_filter, "cannot interleave %i channels",
 169                      p_pcm->channels );
 170         }
 171     }
 172     else
 173     {
 174         /* float32 */
 175         float * p_samples = (float *)p_out_buf->p_buffer;
 176         struct mad_pcm * p_pcm = &p_sys->mad_synth.pcm;
 177         unsigned int i_samples = p_pcm->length;
 178         mad_fixed_t const * p_left = p_pcm->samples[0];
 179         mad_fixed_t const * p_right = p_pcm->samples[1];
 180
 181         switch ( p_pcm->channels )
 182         {
 183         case 2:
 184             while ( i_samples-- )
 185             {
 186                 *p_samples++ = (float)*p_left++ / (float)FIXED32_ONE;
 187                 *p_samples++ = (float)*p_right++ / (float)FIXED32_ONE;
 188             }
 189             break;
 190
 191         case 1:
 192             while ( i_samples-- )
 193             {
 194                 *p_samples++ = (float)*p_left++ / (float)FIXED32_ONE;
 195             }
 196             break;
 197
 198         default:
 199             msg_Err( p_filter, "cannot interleave %i channels",
 200                      p_pcm->channels );
 201         }
 202     }
 203 }
 204
 205 /*****************************************************************************
 206  * Destroy : deallocate data structures
 207  *****************************************************************************/
 208 static void Destroy( vlc_object_t * _p_filter )
 209 {
 210     aout_filter_t * p_filter = (aout_filter_t *)_p_filter;
 211     struct aout_filter_sys_t * p_sys = p_filter->p_sys;
 212
 213     mad_synth_finish( &p_sys->mad_synth );
 214     mad_frame_finish( &p_sys->mad_frame );
 215     mad_stream_finish( &p_sys->mad_stream );
 216     free( p_sys );
 217 }
 218