faad.c 15 KB
Newer Older
1 2 3
/*****************************************************************************
 * decoder.c: AAC decoder using libfaad2
 *****************************************************************************
4
 * Copyright (C) 2001, 2003 the VideoLAN team
5
 * $Id$
6 7
 *
 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8
 *          Gildas Bazin <gbazin@videolan.org>
9 10 11 12 13 14 15 16 17 18 19 20 21
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
Antoine Cellerier's avatar
Antoine Cellerier committed
22
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23 24
 *****************************************************************************/

25
#include <vlc/vlc.h>
Clément Stenac's avatar
Clément Stenac committed
26 27 28
#include <vlc_aout.h>
#include <vlc_codec.h>
#include <vlc_input.h>
29 30 31 32 33 34 35

#include <faad.h>

/*****************************************************************************
 * Module descriptor
 *****************************************************************************/
static int  Open( vlc_object_t * );
36
static void Close( vlc_object_t * );
37 38 39

vlc_module_begin();
    set_description( _("AAC audio decoder (using libfaad2)") );
40
    set_capability( "decoder", 100 );
Clément Stenac's avatar
Clément Stenac committed
41 42
    set_category( CAT_INPUT );
    set_subcategory( SUBCAT_INPUT_ACODEC );
43
    set_callbacks( Open, Close );
44 45 46 47 48
vlc_module_end();

/****************************************************************************
 * Local prototypes
 ****************************************************************************/
Gildas Bazin's avatar
 
Gildas Bazin committed
49
static aout_buffer_t *DecodeBlock( decoder_t *, block_t ** );
Gildas Bazin's avatar
 
Gildas Bazin committed
50 51 52 53
static void DoReordering( decoder_t *, uint32_t *, uint32_t *, int, int,
                          uint32_t * );

#define MAX_CHANNEL_POSITIONS 9
54 55 56 57 58 59 60

struct decoder_sys_t
{
    /* faad handler */
    faacDecHandle *hfaad;

    /* samples */
Gildas Bazin's avatar
 
Gildas Bazin committed
61
    audio_date_t date;
62 63

    /* temporary buffer */
Gildas Bazin's avatar
 
Gildas Bazin committed
64 65 66
    uint8_t *p_buffer;
    int     i_buffer;
    int     i_buffer_size;
67

Gildas Bazin's avatar
 
Gildas Bazin committed
68 69
    /* Channel positions of the current stream (for re-ordering) */
    uint32_t pi_channel_positions[MAX_CHANNEL_POSITIONS];
70 71

    vlc_bool_t b_sbr, b_ps;
72 73

    int i_input_rate;
74 75
};

Gildas Bazin's avatar
 
Gildas Bazin committed
76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92
static const uint32_t pi_channels_in[MAX_CHANNEL_POSITIONS] =
    { FRONT_CHANNEL_CENTER, FRONT_CHANNEL_LEFT, FRONT_CHANNEL_RIGHT,
      SIDE_CHANNEL_LEFT, SIDE_CHANNEL_RIGHT,
      BACK_CHANNEL_LEFT, BACK_CHANNEL_RIGHT,
      BACK_CHANNEL_CENTER, LFE_CHANNEL };
static const uint32_t pi_channels_out[MAX_CHANNEL_POSITIONS] =
    { AOUT_CHAN_CENTER, AOUT_CHAN_LEFT, AOUT_CHAN_RIGHT,
      AOUT_CHAN_MIDDLELEFT, AOUT_CHAN_MIDDLERIGHT,
      AOUT_CHAN_REARLEFT, AOUT_CHAN_REARRIGHT,
      AOUT_CHAN_REARCENTER, AOUT_CHAN_LFE };
static const uint32_t pi_channels_ordered[MAX_CHANNEL_POSITIONS] =
    { AOUT_CHAN_LEFT, AOUT_CHAN_RIGHT,
      AOUT_CHAN_MIDDLELEFT, AOUT_CHAN_MIDDLERIGHT,
      AOUT_CHAN_REARLEFT, AOUT_CHAN_REARRIGHT,
      AOUT_CHAN_CENTER, AOUT_CHAN_REARCENTER, AOUT_CHAN_LFE
    };

93
/*****************************************************************************
Gildas Bazin's avatar
 
Gildas Bazin committed
94
 * OpenDecoder: probe the decoder and return score
95
 *****************************************************************************/
Gildas Bazin's avatar
 
Gildas Bazin committed
96
static int Open( vlc_object_t *p_this )
97
{
Gildas Bazin's avatar
 
Gildas Bazin committed
98
    decoder_t *p_dec = (decoder_t*)p_this;
99 100 101
    decoder_sys_t *p_sys = p_dec->p_sys;
    faacDecConfiguration *cfg;

Gildas Bazin's avatar
 
Gildas Bazin committed
102
    if( p_dec->fmt_in.i_codec != VLC_FOURCC('m','p','4','a') )
103
    {
Gildas Bazin's avatar
 
Gildas Bazin committed
104 105 106 107 108 109 110 111 112
        return VLC_EGENERIC;
    }

    /* Allocate the memory needed to store the decoder's structure */
    if( ( p_dec->p_sys = p_sys =
          (decoder_sys_t *)malloc(sizeof(decoder_sys_t)) ) == NULL )
    {
        msg_Err( p_dec, "out of memory" );
        return VLC_EGENERIC;
113 114 115 116 117
    }

    /* Open a faad context */
    if( ( p_sys->hfaad = faacDecOpen() ) == NULL )
    {
Benjamin Pracht's avatar
Benjamin Pracht committed
118
        msg_Err( p_dec, "cannot initialize faad" );
119 120 121
        return VLC_EGENERIC;
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
122 123 124
    /* Misc init */
    aout_DateSet( &p_sys->date, 0 );
    p_dec->fmt_out.i_cat = AUDIO_ES;
125

126
    if (vlc_CPU() & CPU_CAPABILITY_FPU)
127 128
        p_dec->fmt_out.i_codec = VLC_FOURCC('f','l','3','2');
    else
129
        p_dec->fmt_out.i_codec = AOUT_FMT_S16_NE;
Gildas Bazin's avatar
 
Gildas Bazin committed
130 131
    p_dec->pf_decode_audio = DecodeBlock;

Gildas Bazin's avatar
 
Gildas Bazin committed
132 133 134
    p_dec->fmt_out.audio.i_physical_channels =
        p_dec->fmt_out.audio.i_original_channels = 0;

Gildas Bazin's avatar
 
Gildas Bazin committed
135
    if( p_dec->fmt_in.i_extra > 0 )
136 137
    {
        /* We have a decoder config so init the handle */
Gildas Bazin's avatar
 
Gildas Bazin committed
138 139
        unsigned long i_rate;
        unsigned char i_channels;
140

Gildas Bazin's avatar
 
Gildas Bazin committed
141 142
        if( faacDecInit2( p_sys->hfaad, p_dec->fmt_in.p_extra,
                          p_dec->fmt_in.i_extra,
143 144 145 146 147
                          &i_rate, &i_channels ) < 0 )
        {
            return VLC_EGENERIC;
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
148 149 150
        p_dec->fmt_out.audio.i_rate = i_rate;
        p_dec->fmt_out.audio.i_channels = i_channels;
        aout_DateInit( &p_sys->date, i_rate );
151 152 153 154
    }
    else
    {
        /* Will be initalised from first frame */
Gildas Bazin's avatar
 
Gildas Bazin committed
155 156
        p_dec->fmt_out.audio.i_rate = 0;
        p_dec->fmt_out.audio.i_channels = 0;
157 158
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
159
    /* Set the faad config */
160
    cfg = faacDecGetCurrentConfiguration( p_sys->hfaad );
161
    if (vlc_CPU() & CPU_CAPABILITY_FPU)
162 163
        cfg->outputFormat = FAAD_FMT_FLOAT;
    else
164
        cfg->outputFormat = FAAD_FMT_16BIT;
165 166 167
    faacDecSetConfiguration( p_sys->hfaad, cfg );

    /* buffer */
Gildas Bazin's avatar
 
Gildas Bazin committed
168 169
    p_sys->i_buffer = p_sys->i_buffer_size = 0;
    p_sys->p_buffer = 0;
170

171 172
    p_sys->i_input_rate = INPUT_RATE_DEFAULT;

173 174 175
    /* Faad2 can't deal with truncated data (eg. from MPEG TS) */
    p_dec->b_need_packetized = VLC_TRUE;

176
    p_sys->b_sbr = p_sys->b_ps = VLC_FALSE;
177 178 179 180
    return VLC_SUCCESS;
}

/*****************************************************************************
Gildas Bazin's avatar
 
Gildas Bazin committed
181
 * DecodeBlock:
182
 *****************************************************************************/
Gildas Bazin's avatar
 
Gildas Bazin committed
183
static aout_buffer_t *DecodeBlock( decoder_t *p_dec, block_t **pp_block )
184 185
{
    decoder_sys_t *p_sys = p_dec->p_sys;
Gildas Bazin's avatar
 
Gildas Bazin committed
186
    block_t *p_block;
187

Gildas Bazin's avatar
 
Gildas Bazin committed
188 189 190
    if( !pp_block || !*pp_block ) return NULL;

    p_block = *pp_block;
191

Laurent Aimar's avatar
Laurent Aimar committed
192
    if( p_block->i_flags&(BLOCK_FLAG_DISCONTINUITY|BLOCK_FLAG_CORRUPTED) )
193 194 195 196 197
    {
        block_Release( p_block );
        return NULL;
    }

198 199 200
    if( p_block->i_rate > 0 )
        p_sys->i_input_rate = p_block->i_rate;

201 202 203
    /* Append the block to the temporary buffer */
    if( p_sys->i_buffer_size < p_sys->i_buffer + p_block->i_buffer )
    {
Gildas Bazin's avatar
 
Gildas Bazin committed
204
        p_sys->i_buffer_size = p_sys->i_buffer + p_block->i_buffer;
205 206 207
        p_sys->p_buffer = realloc( p_sys->p_buffer, p_sys->i_buffer_size );
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
208 209 210 211 212 213 214 215
    if( p_block->i_buffer )
    {
        memcpy( &p_sys->p_buffer[p_sys->i_buffer],
                p_block->p_buffer, p_block->i_buffer );
        p_sys->i_buffer += p_block->i_buffer;
        p_block->i_buffer = 0;
    }

216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231
    if( p_dec->fmt_out.audio.i_rate == 0 && p_dec->fmt_in.i_extra > 0 )
    {
        /* We have a decoder config so init the handle */
        unsigned long i_rate;
        unsigned char i_channels;

        if( faacDecInit2( p_sys->hfaad, p_dec->fmt_in.p_extra,
                          p_dec->fmt_in.i_extra,
                          &i_rate, &i_channels ) >= 0 )
        {
            p_dec->fmt_out.audio.i_rate = i_rate;
            p_dec->fmt_out.audio.i_channels = i_channels;
            aout_DateInit( &p_sys->date, i_rate );
        }
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
232
    if( p_dec->fmt_out.audio.i_rate == 0 && p_sys->i_buffer )
233
    {
Gildas Bazin's avatar
 
Gildas Bazin committed
234 235
        unsigned long i_rate;
        unsigned char i_channels;
236 237 238 239 240 241

        /* Init faad with the first frame */
        if( faacDecInit( p_sys->hfaad,
                         p_sys->p_buffer, p_sys->i_buffer,
                         &i_rate, &i_channels ) < 0 )
        {
242
            block_Release( p_block );
Gildas Bazin's avatar
 
Gildas Bazin committed
243
            return NULL;
244
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260

        p_dec->fmt_out.audio.i_rate = i_rate;
        p_dec->fmt_out.audio.i_channels = i_channels;
        aout_DateInit( &p_sys->date, i_rate );
    }

    if( p_block->i_pts != 0 && p_block->i_pts != aout_DateGet( &p_sys->date ) )
    {
        aout_DateSet( &p_sys->date, p_block->i_pts );
    }
    else if( !aout_DateGet( &p_sys->date ) )
    {
        /* We've just started the stream, wait for the first PTS. */
        block_Release( p_block );
        p_sys->i_buffer = 0;
        return NULL;
261 262 263
    }

    /* Decode all data */
Gildas Bazin's avatar
 
Gildas Bazin committed
264
    if( p_sys->i_buffer )
265 266 267
    {
        void *samples;
        faacDecFrameInfo frame;
Gildas Bazin's avatar
 
Gildas Bazin committed
268
        aout_buffer_t *p_out;
Gildas Bazin's avatar
 
Gildas Bazin committed
269
        int i, j;
270 271

        samples = faacDecDecode( p_sys->hfaad, &frame,
Gildas Bazin's avatar
 
Gildas Bazin committed
272
                                 p_sys->p_buffer, p_sys->i_buffer );
273 274 275 276

        if( frame.error > 0 )
        {
            msg_Warn( p_dec, "%s", faacDecGetErrorMessage( frame.error ) );
Gildas Bazin's avatar
 
Gildas Bazin committed
277 278

            /* Flush the buffer */
279
            p_sys->i_buffer = 0;
280
            block_Release( p_block );
Gildas Bazin's avatar
 
Gildas Bazin committed
281
            return NULL;
282
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
283

Gildas Bazin's avatar
 
Gildas Bazin committed
284
        if( frame.channels <= 0 || frame.channels > 8 || frame.channels == 7 )
285
        {
Gildas Bazin's avatar
 
Gildas Bazin committed
286
            msg_Warn( p_dec, "invalid channels count: %i", frame.channels );
Gildas Bazin's avatar
 
Gildas Bazin committed
287 288

            /* Flush the buffer */
Gildas Bazin's avatar
 
Gildas Bazin committed
289 290 291 292 293 294
            p_sys->i_buffer -= frame.bytesconsumed;
            if( p_sys->i_buffer > 0 )
            {
                memmove( p_sys->p_buffer,&p_sys->p_buffer[frame.bytesconsumed],
                         p_sys->i_buffer );
            }
295
            block_Release( p_block );
Gildas Bazin's avatar
 
Gildas Bazin committed
296
            return NULL;
297
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
298

299 300
        if( frame.samples <= 0 )
        {
Benjamin Pracht's avatar
Benjamin Pracht committed
301
            msg_Warn( p_dec, "decoded zero sample" );
Gildas Bazin's avatar
 
Gildas Bazin committed
302 303

            /* Flush the buffer */
Gildas Bazin's avatar
 
Gildas Bazin committed
304 305 306 307 308 309
            p_sys->i_buffer -= frame.bytesconsumed;
            if( p_sys->i_buffer > 0 )
            {
                memmove( p_sys->p_buffer,&p_sys->p_buffer[frame.bytesconsumed],
                         p_sys->i_buffer );
            }
310
            block_Release( p_block );
Gildas Bazin's avatar
 
Gildas Bazin committed
311
            return NULL;
312 313
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
314 315
        /* We decoded a valid frame */
        if( p_dec->fmt_out.audio.i_rate != frame.samplerate )
316
        {
Gildas Bazin's avatar
 
Gildas Bazin committed
317 318
            aout_DateInit( &p_sys->date, frame.samplerate );
            aout_DateSet( &p_sys->date, p_block->i_pts );
319
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
320
        p_block->i_pts = 0;  /* PTS is valid only once */
321

Gildas Bazin's avatar
 
Gildas Bazin committed
322 323
        p_dec->fmt_out.audio.i_rate = frame.samplerate;
        p_dec->fmt_out.audio.i_channels = frame.channels;
324

325 326 327 328 329
        /* Adjust stream info when dealing with SBR/PS */
        if( (p_sys->b_sbr != frame.sbr || p_sys->b_ps != frame.ps) &&
            p_dec->p_parent->i_object_type == VLC_OBJECT_INPUT )
        {
          input_thread_t *p_input = (input_thread_t *)p_dec->p_parent;
Laurent Aimar's avatar
Laurent Aimar committed
330 331 332
          char *psz_cat;
          const char *psz_ext = (frame.sbr && frame.ps) ? "SBR+PS" :
                                    frame.sbr ? "SBR" : "PS";
333 334 335 336 337 338 339 340 341 342 343 344 345 346

          msg_Dbg( p_dec, "AAC %s (channels: %u, samplerate: %lu)",
                   psz_ext, frame.channels, frame.samplerate );

          asprintf( &psz_cat, _("Stream %d"), p_dec->fmt_in.i_id );
          input_Control( p_input, INPUT_ADD_INFO, psz_cat,
                          _("AAC extension"), "%s", psz_ext );
          input_Control( p_input, INPUT_ADD_INFO, psz_cat,
                         _("Channels"), "%d", frame.channels );
          input_Control( p_input, INPUT_ADD_INFO, psz_cat,
                         _("Sample rate"), _("%d Hz"), frame.samplerate );
          free( psz_cat );
          p_sys->b_sbr = frame.sbr; p_sys->b_ps = frame.ps;
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
347 348

        /* Convert frame.channel_position to our own channel values */
349
        p_dec->fmt_out.audio.i_physical_channels = 0;
Gildas Bazin's avatar
 
Gildas Bazin committed
350 351 352 353 354 355 356 357
        for( i = 0; i < frame.channels; i++ )
        {
            /* Find the channel code */
            for( j = 0; j < MAX_CHANNEL_POSITIONS; j++ )
            {
                if( frame.channel_position[i] == pi_channels_in[j] )
                    break;
            }
358
            if( j >= MAX_CHANNEL_POSITIONS )
359
            {
Derk-Jan Hartman's avatar
Derk-Jan Hartman committed
360
                msg_Warn( p_dec, "unknown channel ordering" );
361 362
                /* Invent something */
                j = i;
363
            }
364 365 366 367 368 369
            /* */
            p_sys->pi_channel_positions[i] = pi_channels_out[j];
            if( p_dec->fmt_out.audio.i_physical_channels & pi_channels_out[j] )
                frame.channels--; /* We loose a duplicated channel */
            else
                p_dec->fmt_out.audio.i_physical_channels |= pi_channels_out[j];
Gildas Bazin's avatar
 
Gildas Bazin committed
370 371 372 373 374
        }
        p_dec->fmt_out.audio.i_original_channels =
            p_dec->fmt_out.audio.i_physical_channels;

        p_out = p_dec->pf_aout_buffer_new(p_dec, frame.samples/frame.channels);
Gildas Bazin's avatar
 
Gildas Bazin committed
375
        if( p_out == NULL )
376
        {
Gildas Bazin's avatar
 
Gildas Bazin committed
377
            p_sys->i_buffer = 0;
378
            block_Release( p_block );
Gildas Bazin's avatar
 
Gildas Bazin committed
379
            return NULL;
380 381
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
382 383
        p_out->start_date = aout_DateGet( &p_sys->date );
        p_out->end_date = aout_DateIncrement( &p_sys->date,
384
            (frame.samples / frame.channels) * p_sys->i_input_rate / INPUT_RATE_DEFAULT );
Gildas Bazin's avatar
 
Gildas Bazin committed
385

Gildas Bazin's avatar
 
Gildas Bazin committed
386 387 388
        DoReordering( p_dec, (uint32_t *)p_out->p_buffer, samples,
                      frame.samples / frame.channels, frame.channels,
                      p_sys->pi_channel_positions );
389

Gildas Bazin's avatar
 
Gildas Bazin committed
390 391
        p_sys->i_buffer -= frame.bytesconsumed;
        if( p_sys->i_buffer > 0 )
392
        {
Gildas Bazin's avatar
 
Gildas Bazin committed
393 394
            memmove( p_sys->p_buffer, &p_sys->p_buffer[frame.bytesconsumed],
                     p_sys->i_buffer );
395 396
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
397
        return p_out;
398 399
    }

400
    block_Release( p_block );
Gildas Bazin's avatar
 
Gildas Bazin committed
401
    return NULL;
402 403 404
}

/*****************************************************************************
405
 * Close:
406
 *****************************************************************************/
407
static void Close( vlc_object_t *p_this )
408
{
Gildas Bazin's avatar
 
Gildas Bazin committed
409
    decoder_t *p_dec = (decoder_t *)p_this;
410 411 412
    decoder_sys_t *p_sys = p_dec->p_sys;

    faacDecClose( p_sys->hfaad );
413
    if( p_sys->p_buffer ) free( p_sys->p_buffer );
414 415
    free( p_sys );
}
Gildas Bazin's avatar
 
Gildas Bazin committed
416 417 418 419 420 421 422 423 424 425 426 427 428

/*****************************************************************************
 * DoReordering: do some channel re-ordering (the ac3 channel order is
 *   different from the aac one).
 *****************************************************************************/
static void DoReordering( decoder_t *p_dec,
                          uint32_t *p_out, uint32_t *p_in, int i_samples,
                          int i_nb_channels, uint32_t *pi_chan_positions )
{
    int pi_chan_table[MAX_CHANNEL_POSITIONS];
    int i, j, k;

    /* Find the channels mapping */
429
    for( k = 0, j = 0; k < i_nb_channels; k++ )
Gildas Bazin's avatar
 
Gildas Bazin committed
430
    {
431
        for( i = 0; i < MAX_CHANNEL_POSITIONS; i++ )
Gildas Bazin's avatar
 
Gildas Bazin committed
432 433 434 435 436 437 438 439 440 441
        {
            if( pi_channels_ordered[i] == pi_chan_positions[k] )
            {
                pi_chan_table[k] = j++;
                break;
            }
        }
    }

    /* Do the actual reordering */
442
    if( vlc_CPU() & CPU_CAPABILITY_FPU )
443 444 445 446 447 448 449 450 451
        for( i = 0; i < i_samples; i++ )
            for( j = 0; j < i_nb_channels; j++ )
                p_out[i * i_nb_channels + pi_chan_table[j]] =
                    p_in[i * i_nb_channels + j];
    else
        for( i = 0; i < i_samples; i++ )
            for( j = 0; j < i_nb_channels; j++ )
                ((uint16_t *)p_out)[i * i_nb_channels + pi_chan_table[j]] =
                    ((uint16_t *)p_in)[i * i_nb_channels + j];
Gildas Bazin's avatar
 
Gildas Bazin committed
452
}