62a419a11c0bf8e82716417a3ecf87f16ab0bf51
[vlc.git] / modules / demux / mpeg / es.c
1 /*****************************************************************************
2  * es.c : Generic audio ES input module for vlc
3  *****************************************************************************
4  * Copyright (C) 2001-2008 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 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28
29 #ifdef HAVE_CONFIG_H
30 # include "config.h"
31 #endif
32
33 #include <vlc_common.h>
34 #include <vlc_plugin.h>
35 #include <vlc_demux.h>
36 #include <vlc_codec.h>
37 #include <vlc_codecs.h>
38 #include <vlc_input.h>
39
40 #include "../../codec/a52.h"
41
42 /*****************************************************************************
43  * Module descriptor
44  *****************************************************************************/
45 static int  Open ( vlc_object_t * );
46 static void Close( vlc_object_t * );
47
48 vlc_module_begin ()
49     set_category( CAT_INPUT )
50     set_subcategory( SUBCAT_INPUT_DEMUX )
51     set_description( N_("MPEG-I/II/4 / A52 / DTS / MLP audio" ) )
52     set_capability( "demux", 155 )
53     set_callbacks( Open, Close )
54
55     add_shortcut( "mpga" )
56     add_shortcut( "mp3" )
57
58     add_shortcut( "m4a" )
59     add_shortcut( "mp4a" )
60     add_shortcut( "aac" )
61
62     add_shortcut( "ac3" )
63     add_shortcut( "a52" )
64
65     add_shortcut( "eac3" )
66
67     add_shortcut( "dts" )
68
69     add_shortcut( "mlp" )
70     add_shortcut( "thd" )
71 vlc_module_end ()
72
73 /*****************************************************************************
74  * Local prototypes
75  *****************************************************************************/
76 static int Demux  ( demux_t * );
77 static int Control( demux_t *, int, va_list );
78
79 typedef struct
80 {
81     vlc_fourcc_t i_codec;
82     bool       b_use_word;
83     const char *psz_name;
84     int  (*pf_probe)( demux_t *p_demux, int64_t *pi_offset );
85     int  (*pf_init)( demux_t *p_demux );
86 } codec_t;
87
88 struct demux_sys_t
89 {
90     codec_t codec;
91
92     es_out_id_t *p_es;
93
94     bool  b_start;
95     decoder_t   *p_packetizer;
96
97     mtime_t     i_pts;
98     mtime_t     i_time_offset;
99     int64_t     i_bytes;
100
101     bool        b_big_endian;
102     bool        b_estimate_bitrate;
103     int         i_bitrate_avg;  /* extracted from Xing header */
104
105     bool b_initial_sync_failed;
106
107     int i_packet_size;
108
109     int64_t i_stream_offset;
110
111     /* Mpga specific */
112     struct
113     {
114         int i_frames;
115         int i_bytes;
116         int i_bitrate_avg;
117         int i_frame_samples;
118     } xing;
119 };
120
121 static int MpgaProbe( demux_t *p_demux, int64_t *pi_offset );
122 static int MpgaInit( demux_t *p_demux );
123
124 static int AacProbe( demux_t *p_demux, int64_t *pi_offset );
125 static int AacInit( demux_t *p_demux );
126
127 static int EA52Probe( demux_t *p_demux, int64_t *pi_offset );
128 static int A52Probe( demux_t *p_demux, int64_t *pi_offset );
129 static int A52Init( demux_t *p_demux );
130
131 static int DtsProbe( demux_t *p_demux, int64_t *pi_offset );
132 static int DtsInit( demux_t *p_demux );
133
134 static int MlpProbe( demux_t *p_demux, int64_t *pi_offset );
135 static int MlpInit( demux_t *p_demux );
136
137 static const codec_t p_codec[] = {
138     { VLC_CODEC_MP4A, false, "mp4 audio",  AacProbe,  AacInit },
139     { VLC_CODEC_MPGA, false, "mpeg audio", MpgaProbe, MpgaInit },
140     { VLC_CODEC_A52, true,  "a52 audio",  A52Probe,  A52Init },
141     { VLC_CODEC_EAC3, true,  "eac3 audio", EA52Probe, A52Init },
142     { VLC_CODEC_DTS, false, "dts audio",  DtsProbe,  DtsInit },
143     { VLC_CODEC_TRUEHD, false, "mlp audio",  MlpProbe,  MlpInit },
144
145     { 0, false, NULL, NULL, NULL }
146 };
147
148 /*****************************************************************************
149  * Open: initializes demux structures
150  *****************************************************************************/
151 static int Open( vlc_object_t * p_this )
152 {
153     demux_t     *p_demux = (demux_t*)p_this;
154     demux_sys_t *p_sys;
155
156     es_format_t fmt;
157     int64_t i_offset;
158     int i_index;
159
160     for( i_index = 0; p_codec[i_index].i_codec != 0; i_index++ )
161     {
162         if( !p_codec[i_index].pf_probe( p_demux, &i_offset ) )
163             break;
164     }
165
166     if( p_codec[i_index].i_codec == 0 )
167         return VLC_EGENERIC;
168
169     DEMUX_INIT_COMMON(); p_sys = p_demux->p_sys;
170     memset( p_sys, 0, sizeof( demux_sys_t ) );
171     p_sys->codec = p_codec[i_index];
172     p_sys->p_es = NULL;
173     p_sys->b_start = true;
174     p_sys->i_stream_offset = i_offset;
175     p_sys->b_estimate_bitrate = true;
176     p_sys->i_bitrate_avg = 0;
177     p_sys->b_big_endian = false;
178
179     if( stream_Seek( p_demux->s, p_sys->i_stream_offset ) )
180     {
181         free( p_sys );
182         return VLC_EGENERIC;
183     }
184
185     if( p_sys->codec.pf_init( p_demux ) )
186     {
187         free( p_sys );
188         return VLC_EGENERIC;
189     }
190
191     msg_Dbg( p_demux, "detected format %4.4s", (const char*)&p_sys->codec.i_codec );
192
193     /* Load the audio packetizer */
194     es_format_Init( &fmt, AUDIO_ES, p_sys->codec.i_codec );
195     p_sys->p_packetizer = demux_PacketizerNew( p_demux, &fmt, p_sys->codec.psz_name );
196     if( !p_sys->p_packetizer )
197     {
198         free( p_sys );
199         return VLC_EGENERIC;
200     }
201     return VLC_SUCCESS;
202 }
203
204 /*****************************************************************************
205  * Demux: reads and demuxes data packets
206  *****************************************************************************
207  * Returns -1 in case of error, 0 in case of EOF, 1 otherwise
208  *****************************************************************************/
209 static int Demux( demux_t *p_demux )
210 {
211     demux_sys_t *p_sys = p_demux->p_sys;
212     block_t *p_block_in, *p_block_out;
213
214     if( p_sys->codec.b_use_word )
215     {
216         /* Make sure we are word aligned */
217         int64_t i_pos = stream_Tell( p_demux->s );
218         if( i_pos % 2 )
219             stream_Read( p_demux->s, NULL, 1 );
220     }
221
222     if( ( p_block_in = stream_Block( p_demux->s, p_sys->i_packet_size ) ) == NULL )
223         return 0;
224
225     if( p_sys->codec.b_use_word && !p_sys->b_big_endian && p_block_in->i_buffer > 0 )
226     {
227         /* Convert to big endian */
228         swab( p_block_in->p_buffer, p_block_in->p_buffer, p_block_in->i_buffer );
229     }
230
231     p_block_in->i_pts = p_block_in->i_dts = p_sys->b_start || p_sys->b_initial_sync_failed ? 1 : 0;
232     p_sys->b_initial_sync_failed = p_sys->b_start; /* Only try to resync once */
233
234     while( ( p_block_out = p_sys->p_packetizer->pf_packetize( p_sys->p_packetizer, &p_block_in ) ) )
235     {
236         p_sys->b_initial_sync_failed = false;
237         while( p_block_out )
238         {
239             block_t *p_next = p_block_out->p_next;
240
241             if( !p_sys->p_es )
242             {
243                 p_sys->p_packetizer->fmt_out.b_packetized = true;
244                 p_sys->p_es = es_out_Add( p_demux->out,
245                                           &p_sys->p_packetizer->fmt_out);
246
247
248                 /* Try the xing header */
249                 if( p_sys->xing.i_bytes && p_sys->xing.i_frames &&
250                     p_sys->xing.i_frame_samples )
251                 {
252                     p_sys->i_bitrate_avg = p_sys->xing.i_bytes * INT64_C(8) *
253                         p_sys->p_packetizer->fmt_out.audio.i_rate /
254                         p_sys->xing.i_frames / p_sys->xing.i_frame_samples;
255
256                     if( p_sys->i_bitrate_avg > 0 )
257                         p_sys->b_estimate_bitrate = false;
258                 }
259                 /* Use the bitrate as initual value */
260                 if( p_sys->b_estimate_bitrate )
261                     p_sys->i_bitrate_avg = p_sys->p_packetizer->fmt_out.i_bitrate;
262             }
263
264             p_sys->i_pts = p_block_out->i_pts;
265
266             /* Re-estimate bitrate */
267             if( p_sys->b_estimate_bitrate && p_sys->i_pts > 1 + INT64_C(500000) )
268                 p_sys->i_bitrate_avg = 8*INT64_C(1000000)*p_sys->i_bytes/(p_sys->i_pts-1);
269             p_sys->i_bytes += p_block_out->i_buffer;
270
271             /* Correct timestamp */
272             p_block_out->i_pts += p_sys->i_time_offset;
273             p_block_out->i_dts += p_sys->i_time_offset;
274
275             es_out_Control( p_demux->out, ES_OUT_SET_PCR, p_block_out->i_dts );
276
277             es_out_Send( p_demux->out, p_sys->p_es, p_block_out );
278
279             p_block_out = p_next;
280         }
281     }
282
283     if( p_sys->b_initial_sync_failed )
284         msg_Dbg( p_demux, "did not sync on first block" );
285     p_sys->b_start = false;
286     return 1;
287 }
288
289 /*****************************************************************************
290  * Close: frees unused data
291  *****************************************************************************/
292 static void Close( vlc_object_t * p_this )
293 {
294     demux_t     *p_demux = (demux_t*)p_this;
295     demux_sys_t *p_sys = p_demux->p_sys;
296
297     demux_PacketizerDestroy( p_sys->p_packetizer );
298     free( p_sys );
299 }
300
301 /*****************************************************************************
302  * Control:
303  *****************************************************************************/
304 static int Control( demux_t *p_demux, int i_query, va_list args )
305 {
306     demux_sys_t *p_sys  = p_demux->p_sys;
307     int64_t *pi64;
308     bool *pb_bool;
309     int i_ret;
310     va_list args_save;
311
312     va_copy ( args_save, args );
313
314     switch( i_query )
315     {
316         case DEMUX_HAS_UNSUPPORTED_META:
317             pb_bool = (bool*)va_arg( args, bool* );
318             *pb_bool = true;
319             return VLC_SUCCESS;
320
321         case DEMUX_GET_TIME:
322             pi64 = (int64_t*)va_arg( args, int64_t * );
323             *pi64 = p_sys->i_pts + p_sys->i_time_offset;
324             return VLC_SUCCESS;
325
326         case DEMUX_GET_LENGTH:
327             i_ret = demux_vaControlHelper( p_demux->s, p_sys->i_stream_offset, -1,
328                                             p_sys->i_bitrate_avg, 1, i_query,
329                                             args );
330             /* No bitrate, we can't have it precisely, but we can compute
331              * a raw approximation with time/position */
332             if( i_ret && !p_sys->i_bitrate_avg )
333             {
334                 float f_pos = (double)(uint64_t)( stream_Tell( p_demux->s ) ) /
335                               (double)(uint64_t)( stream_Size( p_demux->s ) );
336                 /* The first few seconds are guaranteed to be very whacky,
337                  * don't bother trying ... Too bad */
338                 if( f_pos < 0.01 ||
339                     (p_sys->i_pts + p_sys->i_time_offset) < 8000000 )
340                     return VLC_EGENERIC;
341
342                 pi64 = (int64_t *)va_arg( args_save, int64_t * );
343                 *pi64 = (p_sys->i_pts + p_sys->i_time_offset) / f_pos;
344                 return VLC_SUCCESS;
345             }
346             va_end( args_save );
347             return i_ret;
348
349         case DEMUX_SET_TIME:
350             /* FIXME TODO: implement a high precision seek (with mp3 parsing)
351              * needed for multi-input */
352         default:
353             i_ret = demux_vaControlHelper( p_demux->s, p_sys->i_stream_offset, -1,
354                                             p_sys->i_bitrate_avg, 1, i_query,
355                                             args );
356             if( !i_ret && p_sys->i_bitrate_avg > 0 &&
357                 (i_query == DEMUX_SET_POSITION || i_query == DEMUX_SET_TIME) )
358             {
359                 int64_t i_time = INT64_C(8000000) * ( stream_Tell(p_demux->s) - p_sys->i_stream_offset ) /
360                     p_sys->i_bitrate_avg;
361
362                 /* Fix time_offset */
363                 if( i_time >= 0 )
364                     p_sys->i_time_offset = i_time - p_sys->i_pts;
365             }
366             return i_ret;
367     }
368 }
369
370 /*****************************************************************************
371  * Mpeg I/II Audio
372  *****************************************************************************/
373 static int MpgaCheckSync( const uint8_t *p_peek )
374 {
375     uint32_t h = GetDWBE( p_peek );
376
377     if( ((( h >> 21 )&0x07FF) != 0x07FF )   /* header sync */
378         || (((h >> 17)&0x03) == 0 )         /* valid layer ?*/
379         || (((h >> 12)&0x0F) == 0x0F )
380         || (((h >> 12)&0x0F) == 0x00 )      /* valid bitrate ? */
381         || (((h >> 10) & 0x03) == 0x03 )    /* valide sampling freq ? */
382         || ((h & 0x03) == 0x02 ))           /* valid emphasis ? */
383     {
384         return false;
385     }
386     return true;
387 }
388
389 #define MPGA_VERSION( h )   ( 1 - (((h)>>19)&0x01) )
390 #define MPGA_MODE(h)        (((h)>> 6)&0x03)
391
392 static int MpgaGetFrameSamples( uint32_t h )
393 {
394     const int i_layer = 3 - (((h)>>17)&0x03);
395     switch( i_layer )
396     {
397     case 0:
398         return 384;
399     case 1:
400         return 1152;
401     case 2:
402         return MPGA_VERSION(h) ? 576 : 1152;
403     default:
404         return 0;
405     }
406 }
407
408 static int MpgaProbe( demux_t *p_demux, int64_t *pi_offset )
409 {
410     bool   b_forced;
411     bool   b_forced_demux;
412     int64_t i_offset;
413
414     const uint8_t     *p_peek;
415
416     b_forced = demux_IsPathExtension( p_demux, ".mp3" );
417     b_forced_demux = demux_IsForced( p_demux, "mp3" ) ||
418                      demux_IsForced( p_demux, "mpga" );
419
420     i_offset = stream_Tell( p_demux->s );
421     if( stream_Peek( p_demux->s, &p_peek, 4 ) < 4 )
422         return VLC_EGENERIC;
423
424     if( !MpgaCheckSync( p_peek ) )
425     {
426         bool b_ok = false;
427         int i_peek;
428
429         if( !b_forced_demux && !b_forced )
430             return VLC_EGENERIC;
431
432         i_peek = stream_Peek( p_demux->s, &p_peek, 8096 );
433         while( i_peek > 4 )
434         {
435             if( MpgaCheckSync( p_peek ) )
436             {
437                 b_ok = true;
438                 break;
439             }
440             p_peek += 1;
441             i_peek -= 1;
442             i_offset++;
443         }
444         if( !b_ok && !b_forced_demux )
445             return VLC_EGENERIC;
446     }
447     *pi_offset = i_offset;
448     return VLC_SUCCESS;
449 }
450
451 static void MpgaXingSkip( const uint8_t **pp_xing, int *pi_xing, int i_count )
452 {
453     if(i_count > *pi_xing )
454         i_count = *pi_xing;
455
456     (*pp_xing) += i_count;
457     (*pi_xing) -= i_count;
458 }
459
460 static uint32_t MpgaXingGetDWBE( const uint8_t **pp_xing, int *pi_xing, uint32_t i_default )
461 {
462     if( *pi_xing < 4 )
463         return i_default;
464
465     uint32_t v = GetDWBE( *pp_xing );
466
467     MpgaXingSkip( pp_xing, pi_xing, 4 );
468
469     return v;
470 }
471
472 static int MpgaInit( demux_t *p_demux )
473 {
474     demux_sys_t *p_sys = p_demux->p_sys;
475
476     const uint8_t *p_peek;
477     int i_peek;
478
479     /* */
480     p_sys->i_packet_size = 1024;
481
482     /* Load a potential xing header */
483     i_peek = stream_Peek( p_demux->s, &p_peek, 4 + 1024 );
484     if( i_peek < 4 + 21 )
485         return VLC_SUCCESS;
486
487     const uint32_t header = GetDWBE( p_peek );
488     if( !MpgaCheckSync( p_peek ) )
489         return VLC_SUCCESS;
490
491     /* Xing header */
492     const uint8_t *p_xing = p_peek;
493     int i_xing = i_peek;
494     int i_skip;
495
496     if( MPGA_VERSION( header ) == 0 )
497         i_skip = MPGA_MODE( header ) != 3 ? 36 : 21;
498     else
499         i_skip = MPGA_MODE( header ) != 3 ? 21 : 13;
500
501     if( i_skip + 8 >= i_xing || memcmp( &p_xing[i_skip], "Xing", 4 ) )
502         return VLC_SUCCESS;
503
504     const uint32_t i_flags = GetDWBE( &p_xing[i_skip+4] );
505
506     MpgaXingSkip( &p_xing, &i_xing, i_skip + 8 );
507
508     if( i_flags&0x01 )
509         p_sys->xing.i_frames = MpgaXingGetDWBE( &p_xing, &i_xing, 0 );
510     if( i_flags&0x02 )
511         p_sys->xing.i_bytes = MpgaXingGetDWBE( &p_xing, &i_xing, 0 );
512     if( i_flags&0x04 ) /* TODO Support XING TOC to improve seeking accuracy */
513         MpgaXingSkip( &p_xing, &i_xing, 100 );
514     if( i_flags&0x08 )
515     {
516         /* FIXME: doesn't return the right bitrage average, at least
517            with some MP3's */
518         p_sys->xing.i_bitrate_avg = MpgaXingGetDWBE( &p_xing, &i_xing, 0 );
519         msg_Dbg( p_demux, "xing vbr value present (%d)",
520                  p_sys->xing.i_bitrate_avg );
521     }
522
523     if( p_sys->xing.i_frames > 0 && p_sys->xing.i_bytes > 0 )
524     {
525         p_sys->xing.i_frame_samples = MpgaGetFrameSamples( header );
526         msg_Dbg( p_demux, "xing frames&bytes value present "
527                  "(%d bytes, %d frames, %d samples/frame)",
528                  p_sys->xing.i_bytes, p_sys->xing.i_frames,
529                  p_sys->xing.i_frame_samples );
530     }
531     return VLC_SUCCESS;
532 }
533
534 /*****************************************************************************
535  * AAC
536  *****************************************************************************/
537 static int AacProbe( demux_t *p_demux, int64_t *pi_offset )
538 {
539     bool   b_forced;
540     bool   b_forced_demux;
541
542     int64_t i_offset;
543     const uint8_t *p_peek;
544
545     b_forced = demux_IsPathExtension( p_demux, ".aac" ) ||
546                demux_IsPathExtension( p_demux, ".aacp" );
547     b_forced_demux = demux_IsForced( p_demux, "m4a" ) ||
548                      demux_IsForced( p_demux, "aac" ) ||
549                      demux_IsForced( p_demux, "mp4a" );
550
551     if( !b_forced_demux && !b_forced )
552         return VLC_EGENERIC;
553
554     i_offset = stream_Tell( p_demux->s );
555
556     /* peek the begining (10 is for adts header) */
557     if( stream_Peek( p_demux->s, &p_peek, 10 ) < 10 )
558     {
559         msg_Err( p_demux, "cannot peek" );
560         return VLC_EGENERIC;
561     }
562     if( !strncmp( (char *)p_peek, "ADIF", 4 ) )
563     {
564         msg_Err( p_demux, "ADIF file. Not yet supported. (Please report)" );
565         return VLC_EGENERIC;
566     }
567
568     *pi_offset = i_offset;
569     return VLC_SUCCESS;
570 }
571 static int AacInit( demux_t *p_demux )
572 {
573     demux_sys_t *p_sys = p_demux->p_sys;
574
575     p_sys->i_packet_size = 4096;
576
577     return VLC_SUCCESS;
578 }
579
580 /*****************************************************************************
581  * Wav header skipper
582  *****************************************************************************/
583 #define WAV_PROBE_SIZE (512*1024)
584 static int WavSkipHeader( demux_t *p_demux, int *pi_skip )
585 {
586     const uint8_t *p_peek;
587     int         i_peek = 0;
588
589     /* */
590     *pi_skip = 0;
591
592     /* Check if we are dealing with a WAV file */
593     if( stream_Peek( p_demux->s, &p_peek, 12+8 ) != 12 + 8 )
594         return VLC_SUCCESS;
595
596     if( memcmp( p_peek, "RIFF", 4 ) || memcmp( &p_peek[8], "WAVE", 4 ) )
597         return VLC_SUCCESS;
598
599     /* Find the wave format header */
600     i_peek = 12 + 8;
601     while( memcmp( p_peek + i_peek - 8, "fmt ", 4 ) )
602     {
603         uint32_t i_len = GetDWLE( p_peek + i_peek - 4 );
604         if( i_len > WAV_PROBE_SIZE || i_peek + i_len > WAV_PROBE_SIZE )
605             return VLC_EGENERIC;
606
607         i_peek += i_len + 8;
608         if( stream_Peek( p_demux->s, &p_peek, i_peek ) != i_peek )
609             return VLC_EGENERIC;
610     }
611
612     /* Sanity check the wave format header */
613     uint32_t i_len = GetDWLE( p_peek + i_peek - 4 );
614     if( i_len > WAV_PROBE_SIZE )
615         return VLC_EGENERIC;
616
617     i_peek += i_len + 8;
618     if( stream_Peek( p_demux->s, &p_peek, i_peek ) != i_peek )
619         return VLC_EGENERIC;
620     int i_format = GetWLE( p_peek + i_peek - i_len - 8 /* wFormatTag */ );
621     if( i_format != WAVE_FORMAT_PCM &&
622         i_format != WAVE_FORMAT_A52 &&
623         i_format != WAVE_FORMAT_DTS )
624         return VLC_EGENERIC;
625     if( GetWLE( p_peek + i_peek - i_len - 6 /* nChannels */ ) != 2 )
626         return VLC_EGENERIC;
627     if( GetDWLE( p_peek + i_peek - i_len - 4 /* nSamplesPerSec */ ) !=
628         44100 )
629         return VLC_EGENERIC;
630
631     /* Skip the wave header */
632     while( memcmp( p_peek + i_peek - 8, "data", 4 ) )
633     {
634         uint32_t i_len = GetDWLE( p_peek + i_peek - 4 );
635         if( i_len > WAV_PROBE_SIZE || i_peek + i_len > WAV_PROBE_SIZE )
636             return VLC_EGENERIC;
637
638         i_peek += i_len + 8;
639         if( stream_Peek( p_demux->s, &p_peek, i_peek ) != i_peek )
640             return VLC_EGENERIC;
641     }
642     *pi_skip = i_peek;
643     return VLC_SUCCESS;
644 }
645
646 static int GenericProbe( demux_t *p_demux, int64_t *pi_offset,
647                          const char * ppsz_name[],
648                          int (*pf_check)( const uint8_t * ), int i_check_size )
649 {
650     bool   b_forced_demux;
651
652     int64_t i_offset;
653     const uint8_t *p_peek;
654     int i_skip;
655
656     b_forced_demux = false;
657     for( int i = 0; ppsz_name[i] != NULL; i++ )
658     {
659         b_forced_demux |= demux_IsForced( p_demux, ppsz_name[i] );
660     }
661
662     i_offset = stream_Tell( p_demux->s );
663
664     if( WavSkipHeader( p_demux, &i_skip ) )
665     {
666         if( !b_forced_demux )
667             return VLC_EGENERIC;
668     }
669     const bool b_wav = i_skip > 0;
670
671     /* peek the begining
672      * It is common that wav files have some sort of garbage at the begining */
673     const int i_probe = i_skip + i_check_size + ( b_wav ? 16000 : 0);
674     const int i_peek = stream_Peek( p_demux->s, &p_peek, i_probe );
675     if( i_peek < i_skip + i_check_size )
676     {
677         msg_Err( p_demux, "cannot peek" );
678         return VLC_EGENERIC;
679     }
680     for( ;; )
681     {
682         if( i_skip + i_check_size > i_peek )
683         {
684             if( !b_forced_demux )
685                 return VLC_EGENERIC;
686             break;
687         }
688         const int i_size = pf_check( &p_peek[i_skip] );
689         if( i_size >= 0 )
690         {
691             if( i_size == 0 || 1)
692                 break;
693
694             /* If we have the frame size, check the next frame for
695              * extra robustness */
696             if( i_skip + i_check_size + i_size <= i_peek )
697             {
698                 if( pf_check( &p_peek[i_skip+i_size] ) >= 0 )
699                     break;
700             }
701         }
702         i_skip++;
703     }
704
705     *pi_offset = i_offset + i_skip;
706     return VLC_SUCCESS;
707 }
708
709 /*****************************************************************************
710  * A52
711  *****************************************************************************/
712 static int A52CheckSync( const uint8_t *p_peek, bool *p_big_endian, bool b_eac3 )
713 {
714     vlc_a52_header_t header;
715     uint8_t p_tmp[VLC_A52_HEADER_SIZE];
716
717     *p_big_endian =  p_peek[0] == 0x0b && p_peek[1] == 0x77;
718     if( !*p_big_endian )
719     {
720         swab( p_peek, p_tmp, VLC_A52_HEADER_SIZE );
721         p_peek = p_tmp;
722     }
723
724     if( vlc_a52_header_Parse( &header, p_peek, VLC_A52_HEADER_SIZE ) )
725         return VLC_EGENERIC;
726
727     if( !header.b_eac3 != !b_eac3 )
728         return VLC_EGENERIC;
729     return header.i_size;
730 }
731 static int EA52CheckSyncProbe( const uint8_t *p_peek )
732 {
733     bool b_dummy;
734     return A52CheckSync( p_peek, &b_dummy, true );
735 }
736
737 static int EA52Probe( demux_t *p_demux, int64_t *pi_offset )
738 {
739     const char *ppsz_name[] = { "eac3", NULL };
740
741     return GenericProbe( p_demux, pi_offset, ppsz_name, EA52CheckSyncProbe, VLC_A52_HEADER_SIZE );
742 }
743
744 static int A52CheckSyncProbe( const uint8_t *p_peek )
745 {
746     bool b_dummy;
747     return A52CheckSync( p_peek, &b_dummy, false );
748 }
749
750 static int A52Probe( demux_t *p_demux, int64_t *pi_offset )
751 {
752     const char *ppsz_name[] = { "a52", "ac3", NULL };
753
754     return GenericProbe( p_demux, pi_offset, ppsz_name, A52CheckSyncProbe, VLC_A52_HEADER_SIZE );
755 }
756
757 static int A52Init( demux_t *p_demux )
758 {
759     demux_sys_t *p_sys = p_demux->p_sys;
760
761     p_sys->b_big_endian = false;
762     p_sys->i_packet_size = 1024;
763
764     const uint8_t *p_peek;
765
766     /* peek the begining */
767     if( stream_Peek( p_demux->s, &p_peek, VLC_A52_HEADER_SIZE ) >= VLC_A52_HEADER_SIZE )
768     {
769         A52CheckSync( p_peek, &p_sys->b_big_endian, true );
770     }
771     return VLC_SUCCESS;
772 }
773
774 /*****************************************************************************
775  * DTS
776  *****************************************************************************/
777 static int DtsCheckSync( const uint8_t *p_peek )
778 {
779     /* TODO return frame size for robustness */
780
781     /* 14 bits, little endian version of the bitstream */
782     if( p_peek[0] == 0xff && p_peek[1] == 0x1f &&
783         p_peek[2] == 0x00 && p_peek[3] == 0xe8 &&
784         (p_peek[4] & 0xf0) == 0xf0 && p_peek[5] == 0x07 )
785     {
786         return 0;
787     }
788     /* 14 bits, big endian version of the bitstream */
789     else if( p_peek[0] == 0x1f && p_peek[1] == 0xff &&
790              p_peek[2] == 0xe8 && p_peek[3] == 0x00 &&
791              p_peek[4] == 0x07 && (p_peek[5] & 0xf0) == 0xf0)
792     {
793         return 0;
794     }
795     /* 16 bits, big endian version of the bitstream */
796     else if( p_peek[0] == 0x7f && p_peek[1] == 0xfe &&
797              p_peek[2] == 0x80 && p_peek[3] == 0x01 )
798     {
799         return 0;
800     }
801     /* 16 bits, little endian version of the bitstream */
802     else if( p_peek[0] == 0xfe && p_peek[1] == 0x7f &&
803              p_peek[2] == 0x01 && p_peek[3] == 0x80 )
804     {
805         return 0;
806     }
807
808     return VLC_EGENERIC;
809 }
810
811 static int DtsProbe( demux_t *p_demux, int64_t *pi_offset )
812 {
813     const char *ppsz_name[] = { "dts", NULL };
814
815     return GenericProbe( p_demux, pi_offset, ppsz_name, DtsCheckSync, 11 );
816 }
817 static int DtsInit( demux_t *p_demux )
818 {
819     demux_sys_t *p_sys = p_demux->p_sys;
820
821     p_sys->i_packet_size = 16384;
822
823     return VLC_SUCCESS;
824 }
825
826 /*****************************************************************************
827  * MLP
828  *****************************************************************************/
829 static int MlpCheckSync( const uint8_t *p_peek )
830 {
831     if( p_peek[4+0] != 0xf8 || p_peek[4+1] != 0x72 || p_peek[4+2] != 0x6f )
832         return -1;
833
834     if( p_peek[4+3] != 0xba && p_peek[4+3] != 0xbb )
835         return -1;
836
837     /* TODO checksum and real size for robustness */
838     return 0;
839 }
840 static int MlpProbe( demux_t *p_demux, int64_t *pi_offset )
841 {
842     const char *ppsz_name[] = { "mlp", "thd", NULL };
843
844     return GenericProbe( p_demux, pi_offset, ppsz_name, MlpCheckSync, 4+28+16*4 );
845 }
846 static int MlpInit( demux_t *p_demux )
847
848 {
849     demux_sys_t *p_sys = p_demux->p_sys;
850
851     p_sys->i_packet_size = 4096;
852
853     return VLC_SUCCESS;
854 }
855