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