git.sesse.net Git - vlc/blob - modules/packetizer/mpeg4audio.c

   1 /*****************************************************************************
   2  * mpeg4audio.c
   3  *****************************************************************************
   4  * Copyright (C) 2001, 2002 VideoLAN
   5  * $Id: mpeg4audio.c,v 1.7 2003/09/02 20:19:26 gbazin Exp $
   6  *
   7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
   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 <vlc/vlc.h>
  28 #include <vlc/aout.h>
  29 #include <vlc/decoder.h>
  30 #include <vlc/input.h>
  31 #include <vlc/sout.h>
  32 #include "codecs.h"
  33 #include <stdlib.h>                                      /* malloc(), free() */
  34 #include <string.h>                                              /* strdup() */
  35
  36 /*****************************************************************************
  37  * Local prototypes
  38  *****************************************************************************/
  39
  40 /* AAC Config in ES:
  41  *
  42  * AudioObjectType          5 bits
  43  * samplingFrequencyIndex   4 bits
  44  * if (samplingFrequencyIndex == 0xF)
  45  *  samplingFrequency   24 bits
  46  * channelConfiguration     4 bits
  47  * GA_SpecificConfig
  48  *  FrameLengthFlag         1 bit 1024 or 960
  49  *  DependsOnCoreCoder      1 bit (always 0)
  50  *  ExtensionFlag           1 bit (always 0)
  51  */
  52
  53 typedef struct packetizer_thread_s
  54 {
  55     /* Input properties */
  56     int                     b_adts;
  57
  58     decoder_fifo_t          *p_fifo;
  59     bit_stream_t            bit_stream;
  60
  61     /* Output properties */
  62     sout_packetizer_input_t *p_sout_input;
  63     sout_format_t           output_format;
  64
  65 //    mtime_t                 i_pts_start;
  66     mtime_t                 i_last_pts;
  67
  68     WAVEFORMATEX            *p_wf;
  69
  70     /* Extracted from AAC config */
  71     int                     i_sample_rate;
  72     int                     i_frame_size;   // 1024 or 960
  73
  74 } packetizer_thread_t;
  75
  76 static int  Open    ( vlc_object_t * );
  77 static int  Run     ( decoder_fifo_t * );
  78
  79 static int  InitThread           ( packetizer_thread_t * );
  80 static void PacketizeThreadMPEG4 ( packetizer_thread_t * );
  81 static void PacketizeThreadADTS  ( packetizer_thread_t * );
  82 static void EndThread            ( packetizer_thread_t * );
  83
  84 /*****************************************************************************
  85  * Module descriptor
  86  *****************************************************************************/
  87
  88 vlc_module_begin();
  89     set_description( _("MPEG4 Audio packetizer") );
  90     set_capability( "packetizer", 50 );
  91     set_callbacks( Open, NULL );
  92 vlc_module_end();
  93
  94
  95 /*****************************************************************************
  96  * OpenDecoder: probe the packetizer and return score
  97  *****************************************************************************
  98  * Tries to launch a decoder and return score so that the interface is able
  99  * to choose.
 100  *****************************************************************************/
 101 static int Open( vlc_object_t *p_this )
 102 {
 103     decoder_t *p_dec = (decoder_t*)p_this;
 104
 105     p_dec->pf_run = Run;
 106
 107     if( p_dec->p_fifo->i_fourcc == VLC_FOURCC( 'm', 'p', '4', 'a') )
 108     {
 109         return( VLC_SUCCESS );
 110     }
 111     else
 112     {
 113         return( VLC_EGENERIC );
 114     }
 115 }
 116
 117 /*****************************************************************************
 118  * RunDecoder: this function is called just after the thread is created
 119  *****************************************************************************/
 120 static int Run( decoder_fifo_t *p_fifo )
 121 {
 122     packetizer_thread_t *p_pack;
 123     int b_error;
 124
 125     msg_Info( p_fifo, "Running MPEG4 audio packetizer" );
 126     if( !( p_pack = malloc( sizeof( packetizer_thread_t ) ) ) )
 127     {
 128         msg_Err( p_fifo, "out of memory" );
 129         DecoderError( p_fifo );
 130         return( -1 );
 131     }
 132     memset( p_pack, 0, sizeof( packetizer_thread_t ) );
 133
 134     p_pack->p_fifo = p_fifo;
 135
 136     if( InitThread( p_pack ) != 0 )
 137     {
 138         DecoderError( p_fifo );
 139         return( -1 );
 140     }
 141
 142     while( ( !p_pack->p_fifo->b_die )&&( !p_pack->p_fifo->b_error ) )
 143     {
 144         if( p_pack->b_adts )
 145         {
 146             PacketizeThreadADTS( p_pack );
 147         }
 148         else
 149         {
 150             PacketizeThreadMPEG4( p_pack );
 151         }
 152     }
 153
 154
 155     if( ( b_error = p_pack->p_fifo->b_error ) )
 156     {
 157         DecoderError( p_pack->p_fifo );
 158     }
 159
 160     EndThread( p_pack );
 161     if( b_error )
 162     {
 163         return( -1 );
 164     }
 165
 166     return( 0 );
 167 }
 168
 169
 170 #define FREE( p ) if( p ) free( p ); p = NULL
 171
 172 /*****************************************************************************
 173  * InitThread: initialize data before entering main loop
 174  *****************************************************************************/
 175 static int i_sample_rates[] =
 176 {
 177     96000, 88200, 64000, 48000, 44100, 32000, 24000, 22050,
 178     16000, 12000, 11025, 8000,  7350,  0,     0,     0
 179 };
 180
 181 static int InitThread( packetizer_thread_t *p_pack )
 182 {
 183     WAVEFORMATEX    *p_wf;
 184
 185     p_wf = (WAVEFORMATEX*)p_pack->p_fifo->p_waveformatex;
 186
 187     if( p_wf && p_wf->cbSize > 0)
 188     {
 189         uint8_t *p_config = (uint8_t*)&p_wf[1];
 190         int     i_index;
 191
 192         p_pack->b_adts = 0;
 193
 194         i_index = ( ( p_config[0] << 1 ) | ( p_config[1] >> 7 ) )&0x0f;
 195         if( i_index != 0x0f )
 196         {
 197             p_pack->i_sample_rate = i_sample_rates[i_index];
 198             p_pack->i_frame_size  = ( ( p_config[1] >> 2 )&0x01 ) ? 960 : 1024;
 199         }
 200         else
 201         {
 202             p_pack->i_sample_rate = ( ( p_config[1]&0x7f ) << 17 ) | ( p_config[2] << 9 )|
 203                                       ( p_config[3] << 1 ) | ( p_config[4] >> 7 );
 204             p_pack->i_frame_size  = ( ( p_config[4] >> 2 )&0x01 ) ? 960 : 1024;
 205         }
 206         msg_Dbg( p_pack->p_fifo,
 207                  "aac %dHz %d samples/frame",
 208                  p_pack->i_sample_rate,
 209                  p_pack->i_frame_size );
 210
 211         p_pack->output_format.i_cat = AUDIO_ES;
 212         p_pack->output_format.i_fourcc = VLC_FOURCC( 'm', 'p', '4', 'a' );
 213         p_pack->output_format.i_sample_rate = p_pack->i_sample_rate;
 214         p_pack->output_format.i_channels    = p_wf->nChannels;
 215         p_pack->output_format.i_block_align = 0;
 216         p_pack->output_format.i_bitrate     = 0;
 217
 218         p_pack->output_format.i_extra_data = p_wf->cbSize;
 219         p_pack->output_format.p_extra_data = malloc( p_wf->cbSize );
 220         memcpy( p_pack->output_format.p_extra_data,
 221                 &p_wf[1],
 222                 p_wf->cbSize );
 223     }
 224     else
 225     {
 226         /* we will try to create a AAC Config from adts */
 227         p_pack->output_format.i_cat = UNKNOWN_ES;
 228         p_pack->output_format.i_fourcc = VLC_FOURCC( 'n', 'u', 'l', 'l' );
 229         p_pack->b_adts = 1;
 230
 231         if( InitBitstream( &p_pack->bit_stream, p_pack->p_fifo,
 232                NULL, NULL ) != VLC_SUCCESS )
 233         {
 234             msg_Err( p_pack->p_fifo, "cannot initialize bitstream" );
 235             return -1;
 236         }
 237
 238     }
 239
 240     p_pack->p_sout_input =
 241         sout_InputNew( p_pack->p_fifo,
 242                        &p_pack->output_format );
 243
 244     if( !p_pack->p_sout_input )
 245     {
 246         msg_Err( p_pack->p_fifo,
 247                  "cannot add a new stream" );
 248         return( -1 );
 249     }
 250
 251     p_pack->i_last_pts = 0;
 252     return( 0 );
 253 }
 254
 255 /*****************************************************************************
 256  * PacketizeThread: packetize an unit (here copy a complete pes)
 257  *****************************************************************************/
 258 static void PacketizeThreadMPEG4( packetizer_thread_t *p_pack )
 259 {
 260     sout_buffer_t   *p_sout_buffer;
 261     pes_packet_t    *p_pes;
 262     ssize_t         i_size;
 263     mtime_t         i_pts;
 264
 265     /* **** get samples count **** */
 266     input_ExtractPES( p_pack->p_fifo, &p_pes );
 267     if( !p_pes )
 268     {
 269         p_pack->p_fifo->b_error = 1;
 270         return;
 271     }
 272 #if 0
 273     if( p_pack->i_pts_start < 0 && p_pes->i_pts > 0 )
 274     {
 275         p_pack->i_pts_start = p_pes->i_pts;
 276     }
 277     p_pack->i_pts = p_pes->i_pts - p_pack->i_pts_start;
 278 #endif
 279
 280     i_pts = p_pes->i_pts;
 281
 282     if( i_pts <= 0 && p_pack->i_last_pts <= 0 )
 283     {
 284         msg_Dbg( p_pack->p_fifo, "need a starting pts" );
 285         input_DeletePES( p_pack->p_fifo->p_packets_mgt, p_pes );
 286         return;
 287     }
 288     i_size = p_pes->i_pes_size;
 289
 290     if( i_size > 0 )
 291     {
 292         data_packet_t   *p_data;
 293         ssize_t          i_buffer;
 294
 295         p_sout_buffer =
 296             sout_BufferNew( p_pack->p_sout_input->p_sout, i_size );
 297         if( !p_sout_buffer )
 298         {
 299             p_pack->p_fifo->b_error = 1;
 300             input_DeletePES( p_pack->p_fifo->p_packets_mgt, p_pes );
 301             return;
 302         }
 303         /* TODO: memcpy of the pes packet */
 304         for( i_buffer = 0, p_data = p_pes->p_first;
 305              p_data != NULL && i_buffer < i_size;
 306              p_data = p_data->p_next)
 307         {
 308             size_t          i_copy;
 309
 310             i_copy = __MIN( p_data->p_payload_end - p_data->p_payload_start,
 311                             i_size - i_buffer );
 312             if( i_copy > 0 )
 313             {
 314                 p_pack->p_fifo->p_vlc->pf_memcpy( p_sout_buffer->p_buffer + i_buffer,
 315                                                   p_data->p_payload_start,
 316                                                   i_copy );
 317             }
 318             i_buffer += i_copy;
 319         }
 320
 321         if( i_pts <= 0 )
 322         {
 323             i_pts = p_pack->i_last_pts +
 324                         (mtime_t)1000000 *
 325                         (mtime_t)p_pack->i_frame_size /
 326                         (mtime_t)p_pack->i_sample_rate;
 327         }
 328         p_pack->i_last_pts = i_pts;
 329
 330         p_sout_buffer->i_length = (mtime_t)1000000 *
 331                                   (mtime_t)p_pack->i_frame_size /
 332                                   (mtime_t)p_pack->i_sample_rate;
 333         p_sout_buffer->i_bitrate = 0;
 334         p_sout_buffer->i_dts = i_pts;
 335         p_sout_buffer->i_pts = i_pts;
 336
 337         sout_InputSendBuffer( p_pack->p_sout_input,
 338                                p_sout_buffer );
 339     }
 340
 341     input_DeletePES( p_pack->p_fifo->p_packets_mgt, p_pes );
 342 }
 343
 344
 345 static void PacketizeThreadADTS( packetizer_thread_t *p_pack )
 346 {
 347     msg_Err( p_pack->p_fifo, "adts stream unsupported" );
 348     p_pack->p_fifo->b_error = 1;
 349 }
 350
 351 /*****************************************************************************
 352  * EndThread : packetizer thread destruction
 353  *****************************************************************************/
 354 static void EndThread ( packetizer_thread_t *p_pack)
 355 {
 356     if( p_pack->p_sout_input )
 357     {
 358         sout_InputDelete( p_pack->p_sout_input );
 359     }
 360     if( p_pack->p_wf )
 361     {
 362         free( p_pack->p_wf );
 363     }
 364     free( p_pack );
 365 }