* all: new sout scheme. Now a chain of module are created that can
[vlc.git] / modules / packetizer / mpeg4audio.c
1 /*****************************************************************************
2  * mpeg4audio.c
3  *****************************************************************************
4  * Copyright (C) 2001, 2002 VideoLAN
5  * $Id: mpeg4audio.c,v 1.5 2003/04/13 20:00:21 fenrir 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_fifo_t *p_fifo = (decoder_fifo_t*) p_this;
104
105     p_fifo->pf_run = Run;
106
107     if( 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 }
365