]> git.sesse.net Git - vlc/blob - modules/codec/faad.c
x264.c: use x264_param_apply_profile
[vlc] / modules / codec / faad.c
1 /*****************************************************************************
2  * faad.c: AAC decoder using libfaad2
3  *****************************************************************************
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  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23  *****************************************************************************/
24
25 #ifdef HAVE_CONFIG_H
26 # include "config.h"
27 #endif
28
29 #include <vlc_common.h>
30 #include <vlc_plugin.h>
31 #include <vlc_input.h>
32 #include <vlc_aout.h>
33 #include <vlc_codec.h>
34 #include <vlc_cpu.h>
35
36 #include <faad.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_("AAC audio decoder (using libfaad2)") )
46     set_capability( "decoder", 100 )
47     set_category( CAT_INPUT )
48     set_subcategory( SUBCAT_INPUT_ACODEC )
49     set_callbacks( Open, Close )
50 vlc_module_end ()
51
52 /****************************************************************************
53  * Local prototypes
54  ****************************************************************************/
55 static aout_buffer_t *DecodeBlock( decoder_t *, block_t ** );
56 static void DoReordering( uint32_t *, uint32_t *, int, int, uint32_t * );
57
58 #define MAX_CHANNEL_POSITIONS 9
59
60 struct decoder_sys_t
61 {
62     /* faad handler */
63     faacDecHandle *hfaad;
64
65     /* samples */
66     date_t date;
67
68     /* temporary buffer */
69     uint8_t *p_buffer;
70     int     i_buffer;
71     size_t  i_buffer_size;
72
73     /* Channel positions of the current stream (for re-ordering) */
74     uint32_t pi_channel_positions[MAX_CHANNEL_POSITIONS];
75
76     bool b_sbr, b_ps;
77 };
78
79 static const uint32_t pi_channels_in[MAX_CHANNEL_POSITIONS] =
80     { FRONT_CHANNEL_CENTER, FRONT_CHANNEL_LEFT, FRONT_CHANNEL_RIGHT,
81       SIDE_CHANNEL_LEFT, SIDE_CHANNEL_RIGHT,
82       BACK_CHANNEL_LEFT, BACK_CHANNEL_RIGHT,
83       BACK_CHANNEL_CENTER, LFE_CHANNEL };
84 static const uint32_t pi_channels_out[MAX_CHANNEL_POSITIONS] =
85     { AOUT_CHAN_CENTER, AOUT_CHAN_LEFT, AOUT_CHAN_RIGHT,
86       AOUT_CHAN_MIDDLELEFT, AOUT_CHAN_MIDDLERIGHT,
87       AOUT_CHAN_REARLEFT, AOUT_CHAN_REARRIGHT,
88       AOUT_CHAN_REARCENTER, AOUT_CHAN_LFE };
89 static const uint32_t pi_channels_ordered[MAX_CHANNEL_POSITIONS] =
90     { AOUT_CHAN_LEFT, AOUT_CHAN_RIGHT,
91       AOUT_CHAN_MIDDLELEFT, AOUT_CHAN_MIDDLERIGHT,
92       AOUT_CHAN_REARLEFT, AOUT_CHAN_REARRIGHT,
93       AOUT_CHAN_CENTER, AOUT_CHAN_REARCENTER, AOUT_CHAN_LFE
94     };
95 static const uint32_t pi_channels_guessed[MAX_CHANNEL_POSITIONS] =
96     { 0, AOUT_CHAN_CENTER, AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT,
97       AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_LFE,
98       AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_REARLEFT
99           | AOUT_CHAN_REARRIGHT,
100       AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_REARLEFT
101           | AOUT_CHAN_REARRIGHT | AOUT_CHAN_CENTER,
102       AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_REARLEFT
103           | AOUT_CHAN_REARRIGHT | AOUT_CHAN_CENTER | AOUT_CHAN_LFE,
104       AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_MIDDLELEFT
105           | AOUT_CHAN_MIDDLERIGHT | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT
106           | AOUT_CHAN_CENTER,
107       AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_MIDDLELEFT
108           | AOUT_CHAN_MIDDLERIGHT | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT
109           | AOUT_CHAN_CENTER | AOUT_CHAN_LFE
110     };
111
112 /*****************************************************************************
113  * OpenDecoder: probe the decoder and return score
114  *****************************************************************************/
115 static int Open( vlc_object_t *p_this )
116 {
117     decoder_t *p_dec = (decoder_t*)p_this;
118     decoder_sys_t *p_sys = p_dec->p_sys;
119     faacDecConfiguration *cfg;
120
121     if( p_dec->fmt_in.i_codec != VLC_CODEC_MP4A )
122     {
123         return VLC_EGENERIC;
124     }
125
126     /* Allocate the memory needed to store the decoder's structure */
127     if( ( p_dec->p_sys = p_sys = malloc( sizeof(*p_sys) ) ) == NULL )
128         return VLC_ENOMEM;
129
130     /* Open a faad context */
131     if( ( p_sys->hfaad = faacDecOpen() ) == NULL )
132     {
133         msg_Err( p_dec, "cannot initialize faad" );
134         free( p_sys );
135         return VLC_EGENERIC;
136     }
137
138     /* Misc init */
139     date_Set( &p_sys->date, 0 );
140     p_dec->fmt_out.i_cat = AUDIO_ES;
141
142     if (HAVE_FPU)
143         p_dec->fmt_out.i_codec = VLC_CODEC_FL32;
144     else
145         p_dec->fmt_out.i_codec = VLC_CODEC_S16N;
146     p_dec->pf_decode_audio = DecodeBlock;
147
148     p_dec->fmt_out.audio.i_physical_channels =
149         p_dec->fmt_out.audio.i_original_channels = 0;
150
151     if( p_dec->fmt_in.i_extra > 0 )
152     {
153         /* We have a decoder config so init the handle */
154         unsigned long i_rate;
155         unsigned char i_channels;
156
157         if( faacDecInit2( p_sys->hfaad, p_dec->fmt_in.p_extra,
158                           p_dec->fmt_in.i_extra,
159                           &i_rate, &i_channels ) < 0 )
160         {
161             msg_Err( p_dec, "Failed to initialize faad using extra data" );
162             faacDecClose( p_sys->hfaad );
163             free( p_sys );
164             return VLC_EGENERIC;
165         }
166
167         p_dec->fmt_out.audio.i_rate = i_rate;
168         p_dec->fmt_out.audio.i_channels = i_channels;
169         p_dec->fmt_out.audio.i_physical_channels
170             = p_dec->fmt_out.audio.i_original_channels
171             = pi_channels_guessed[i_channels];
172         date_Init( &p_sys->date, i_rate, 1 );
173     }
174     else
175     {
176         /* Will be initalised from first frame */
177         p_dec->fmt_out.audio.i_rate = 0;
178         p_dec->fmt_out.audio.i_channels = 0;
179     }
180
181     /* Set the faad config */
182     cfg = faacDecGetCurrentConfiguration( p_sys->hfaad );
183     if (HAVE_FPU)
184         cfg->outputFormat = FAAD_FMT_FLOAT;
185     else
186         cfg->outputFormat = FAAD_FMT_16BIT;
187     faacDecSetConfiguration( p_sys->hfaad, cfg );
188
189     /* buffer */
190     p_sys->i_buffer = p_sys->i_buffer_size = 0;
191     p_sys->p_buffer = NULL;
192
193     /* Faad2 can't deal with truncated data (eg. from MPEG TS) */
194     p_dec->b_need_packetized = true;
195
196     p_sys->b_sbr = p_sys->b_ps = false;
197     return VLC_SUCCESS;
198 }
199
200 /*****************************************************************************
201  * DecodeBlock:
202  *****************************************************************************/
203 static aout_buffer_t *DecodeBlock( decoder_t *p_dec, block_t **pp_block )
204 {
205     decoder_sys_t *p_sys = p_dec->p_sys;
206     block_t *p_block;
207
208     if( !pp_block || !*pp_block ) return NULL;
209
210     p_block = *pp_block;
211
212     if( p_block->i_flags&(BLOCK_FLAG_DISCONTINUITY|BLOCK_FLAG_CORRUPTED) )
213     {
214         block_Release( p_block );
215         return NULL;
216     }
217
218     /* Remove ADTS header if we have decoder specific config */
219     if( p_dec->fmt_in.i_extra && p_block->i_buffer > 7 )
220     {
221         if( p_block->p_buffer[0] == 0xff &&
222             ( p_block->p_buffer[1] & 0xf0 ) == 0xf0 ) /* syncword */
223         {   /* ADTS header present */
224             size_t i_header_size; /* 7 bytes (+ 2 bytes for crc) */
225             i_header_size = 7 + ( ( p_block->p_buffer[1] & 0x01 ) ? 0 : 2 );
226             /* FIXME: multiple blocks per frame */
227             if( p_block->i_buffer > i_header_size )
228             {
229                 p_block->p_buffer += i_header_size;
230                 p_block->i_buffer -= i_header_size;
231             }
232         }
233     }
234
235     /* Append the block to the temporary buffer */
236     if( p_sys->i_buffer_size < p_sys->i_buffer + p_block->i_buffer )
237     {
238         size_t  i_buffer_size = p_sys->i_buffer + p_block->i_buffer;
239         uint8_t *p_buffer     = realloc( p_sys->p_buffer, i_buffer_size );
240         if( p_buffer )
241         {
242             p_sys->i_buffer_size = i_buffer_size;
243             p_sys->p_buffer      = p_buffer;
244         }
245         else
246         {
247             p_block->i_buffer = 0;
248         }
249     }
250
251     if( p_block->i_buffer > 0 )
252     {
253         vlc_memcpy( &p_sys->p_buffer[p_sys->i_buffer],
254                      p_block->p_buffer, p_block->i_buffer );
255         p_sys->i_buffer += p_block->i_buffer;
256         p_block->i_buffer = 0;
257     }
258
259     if( p_dec->fmt_out.audio.i_rate == 0 && p_dec->fmt_in.i_extra > 0 )
260     {
261         /* We have a decoder config so init the handle */
262         unsigned long i_rate;
263         unsigned char i_channels;
264
265         if( faacDecInit2( p_sys->hfaad, p_dec->fmt_in.p_extra,
266                           p_dec->fmt_in.i_extra,
267                           &i_rate, &i_channels ) >= 0 )
268         {
269             p_dec->fmt_out.audio.i_rate = i_rate;
270             p_dec->fmt_out.audio.i_channels = i_channels;
271             p_dec->fmt_out.audio.i_physical_channels
272                 = p_dec->fmt_out.audio.i_original_channels
273                 = pi_channels_guessed[i_channels];
274
275             date_Init( &p_sys->date, i_rate, 1 );
276         }
277     }
278
279     if( p_dec->fmt_out.audio.i_rate == 0 && p_sys->i_buffer )
280     {
281         unsigned long i_rate;
282         unsigned char i_channels;
283
284         /* Init faad with the first frame */
285         if( faacDecInit( p_sys->hfaad,
286                          p_sys->p_buffer, p_sys->i_buffer,
287                          &i_rate, &i_channels ) < 0 )
288         {
289             block_Release( p_block );
290             return NULL;
291         }
292
293         p_dec->fmt_out.audio.i_rate = i_rate;
294         p_dec->fmt_out.audio.i_channels = i_channels;
295         p_dec->fmt_out.audio.i_physical_channels
296             = p_dec->fmt_out.audio.i_original_channels
297             = pi_channels_guessed[i_channels];
298         date_Init( &p_sys->date, i_rate, 1 );
299     }
300
301     if( p_block->i_pts > VLC_TS_INVALID && p_block->i_pts != date_Get( &p_sys->date ) )
302     {
303         date_Set( &p_sys->date, p_block->i_pts );
304     }
305     else if( !date_Get( &p_sys->date ) )
306     {
307         /* We've just started the stream, wait for the first PTS. */
308         block_Release( p_block );
309         p_sys->i_buffer = 0;
310         return NULL;
311     }
312
313     /* Decode all data */
314     if( p_sys->i_buffer )
315     {
316         void *samples;
317         faacDecFrameInfo frame;
318         aout_buffer_t *p_out;
319         int i, j;
320
321         samples = faacDecDecode( p_sys->hfaad, &frame,
322                                  p_sys->p_buffer, p_sys->i_buffer );
323
324         if( frame.error > 0 )
325         {
326             msg_Warn( p_dec, "%s", faacDecGetErrorMessage( frame.error ) );
327
328             if( frame.error == 21 )
329             {
330                 /*
331                  * Once an "Unexpected channel configuration change" error
332                  * occurs, it will occurs afterwards, and we got no sound.
333                  * Reinitialization of the decoder is required.
334                  */
335                 unsigned long i_rate;
336                 unsigned char i_channels;
337                 faacDecHandle *hfaad;
338                 faacDecConfiguration *cfg,*oldcfg;
339
340                 oldcfg = faacDecGetCurrentConfiguration( p_sys->hfaad );
341                 hfaad = faacDecOpen();
342                 cfg = faacDecGetCurrentConfiguration( hfaad );
343                 if( oldcfg->defSampleRate )
344                     cfg->defSampleRate = oldcfg->defSampleRate;
345                 cfg->defObjectType = oldcfg->defObjectType;
346                 cfg->outputFormat = oldcfg->outputFormat;
347                 faacDecSetConfiguration( hfaad, cfg );
348
349                 if( faacDecInit( hfaad, p_sys->p_buffer, p_sys->i_buffer,
350                                 &i_rate,&i_channels ) < 0 )
351                 {
352                     /* reinitialization failed */
353                     faacDecClose( hfaad );
354                     faacDecSetConfiguration( p_sys->hfaad, oldcfg );
355                 }
356                 else
357                 {
358                     faacDecClose( p_sys->hfaad );
359                     p_sys->hfaad = hfaad;
360                     p_dec->fmt_out.audio.i_rate = i_rate;
361                     p_dec->fmt_out.audio.i_channels = i_channels;
362                     p_dec->fmt_out.audio.i_physical_channels
363                         = p_dec->fmt_out.audio.i_original_channels
364                         = pi_channels_guessed[i_channels];
365                     date_Init( &p_sys->date, i_rate, 1 );
366                 }
367             }
368
369             /* Flush the buffer */
370             p_sys->i_buffer = 0;
371             block_Release( p_block );
372             return NULL;
373         }
374
375         if( frame.channels <= 0 || frame.channels > 8 || frame.channels == 7 )
376         {
377             msg_Warn( p_dec, "invalid channels count: %i", frame.channels );
378
379             /* Flush the buffer */
380             p_sys->i_buffer -= frame.bytesconsumed;
381             if( p_sys->i_buffer > 0 )
382             {
383                 memmove( p_sys->p_buffer,&p_sys->p_buffer[frame.bytesconsumed],
384                          p_sys->i_buffer );
385             }
386             block_Release( p_block );
387             return NULL;
388         }
389
390         if( frame.samples <= 0 )
391         {
392             msg_Warn( p_dec, "decoded zero sample" );
393
394             /* Flush the buffer */
395             p_sys->i_buffer -= frame.bytesconsumed;
396             if( p_sys->i_buffer > 0 )
397             {
398                 memmove( p_sys->p_buffer,&p_sys->p_buffer[frame.bytesconsumed],
399                          p_sys->i_buffer );
400             }
401             block_Release( p_block );
402             return NULL;
403         }
404
405         /* We decoded a valid frame */
406         if( p_dec->fmt_out.audio.i_rate != frame.samplerate )
407         {
408             date_Init( &p_sys->date, frame.samplerate, 1 );
409             date_Set( &p_sys->date, p_block->i_pts );
410         }
411         p_block->i_pts = VLC_TS_INVALID;  /* PTS is valid only once */
412
413         p_dec->fmt_out.audio.i_rate = frame.samplerate;
414         p_dec->fmt_out.audio.i_channels = frame.channels;
415         p_dec->fmt_out.audio.i_physical_channels
416             = p_dec->fmt_out.audio.i_original_channels
417             = pi_channels_guessed[frame.channels];
418
419         /* Adjust stream info when dealing with SBR/PS */
420         bool b_sbr = (frame.sbr == 1) || (frame.sbr == 2);
421         if( p_sys->b_sbr != b_sbr || p_sys->b_ps != frame.ps )
422         {
423             const char *psz_ext = (b_sbr && frame.ps) ? "SBR+PS" :
424                                     b_sbr ? "SBR" : "PS";
425
426             msg_Dbg( p_dec, "AAC %s (channels: %u, samplerate: %lu)",
427                     psz_ext, frame.channels, frame.samplerate );
428
429             if( !p_dec->p_description )
430                 p_dec->p_description = vlc_meta_New();
431             if( p_dec->p_description )
432                 vlc_meta_AddExtra( p_dec->p_description, _("AAC extension"), psz_ext );
433
434             p_sys->b_sbr = b_sbr;
435             p_sys->b_ps = frame.ps;
436         }
437
438         /* Convert frame.channel_position to our own channel values */
439         p_dec->fmt_out.audio.i_physical_channels = 0;
440         for( i = 0; i < frame.channels; i++ )
441         {
442             /* Find the channel code */
443             for( j = 0; j < MAX_CHANNEL_POSITIONS; j++ )
444             {
445                 if( frame.channel_position[i] == pi_channels_in[j] )
446                     break;
447             }
448             if( j >= MAX_CHANNEL_POSITIONS )
449             {
450                 msg_Warn( p_dec, "unknown channel ordering" );
451                 /* Invent something */
452                 j = i;
453             }
454             /* */
455             p_sys->pi_channel_positions[i] = pi_channels_out[j];
456             if( p_dec->fmt_out.audio.i_physical_channels & pi_channels_out[j] )
457                 frame.channels--; /* We loose a duplicated channel */
458             else
459                 p_dec->fmt_out.audio.i_physical_channels |= pi_channels_out[j];
460         }
461         p_dec->fmt_out.audio.i_original_channels =
462             p_dec->fmt_out.audio.i_physical_channels;
463
464         p_out = decoder_NewAudioBuffer(p_dec, frame.samples/frame.channels);
465         if( p_out == NULL )
466         {
467             p_sys->i_buffer = 0;
468             block_Release( p_block );
469             return NULL;
470         }
471
472         p_out->i_pts = date_Get( &p_sys->date );
473         p_out->i_length = date_Increment( &p_sys->date,
474                                           frame.samples / frame.channels )
475                           - p_out->i_pts;
476
477         DoReordering( (uint32_t *)p_out->p_buffer, samples,
478                       frame.samples / frame.channels, frame.channels,
479                       p_sys->pi_channel_positions );
480
481         p_sys->i_buffer -= frame.bytesconsumed;
482         if( p_sys->i_buffer > 0 )
483         {
484             memmove( p_sys->p_buffer, &p_sys->p_buffer[frame.bytesconsumed],
485                      p_sys->i_buffer );
486         }
487
488         return p_out;
489     }
490
491     block_Release( p_block );
492     return NULL;
493 }
494
495 /*****************************************************************************
496  * Close:
497  *****************************************************************************/
498 static void Close( vlc_object_t *p_this )
499 {
500     decoder_t *p_dec = (decoder_t *)p_this;
501     decoder_sys_t *p_sys = p_dec->p_sys;
502
503     faacDecClose( p_sys->hfaad );
504     free( p_sys->p_buffer );
505     free( p_sys );
506 }
507
508 /*****************************************************************************
509  * DoReordering: do some channel re-ordering (the ac3 channel order is
510  *   different from the aac one).
511  *****************************************************************************/
512 static void DoReordering( uint32_t *p_out, uint32_t *p_in, int i_samples,
513                           int i_nb_channels, uint32_t *pi_chan_positions )
514 {
515     int pi_chan_table[MAX_CHANNEL_POSITIONS];
516     int i, j, k;
517
518     /* Find the channels mapping */
519     for( i = 0, j = 0; i < MAX_CHANNEL_POSITIONS; i++ )
520     {
521         for( k = 0; k < i_nb_channels; k++ )
522         {
523             if( pi_channels_ordered[i] == pi_chan_positions[k] )
524             {
525                 pi_chan_table[k] = j++;
526                 break;
527             }
528         }
529     }
530
531     /* Do the actual reordering */
532     if( HAVE_FPU )
533         for( i = 0; i < i_samples; i++ )
534             for( j = 0; j < i_nb_channels; j++ )
535                 p_out[i * i_nb_channels + pi_chan_table[j]] =
536                     p_in[i * i_nb_channels + j];
537     else
538         for( i = 0; i < i_samples; i++ )
539             for( j = 0; j < i_nb_channels; j++ )
540                 ((uint16_t *)p_out)[i * i_nb_channels + pi_chan_table[j]] =
541                     ((uint16_t *)p_in)[i * i_nb_channels + j];
542 }
543