mp4.c 182 KB
Newer Older
1 2 3
/*****************************************************************************
 * mp4.c : MP4 file input module for vlc
 *****************************************************************************
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
4
 * Copyright (C) 2001-2004, 2010 VLC authors and VideoLAN
5
 *
6
 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
7
 *
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
8 9 10
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation; either version 2.1 of the License, or
11
 * (at your option) any later version.
12
 *
13 14
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
15 16
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU Lesser General Public License for more details.
17
 *
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
18 19 20
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21
 *****************************************************************************/
22 23 24
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
25 26 27 28

/*****************************************************************************
 * Preamble
 *****************************************************************************/
29 30
#include "mp4.h"

Clément Stenac's avatar
Clément Stenac committed
31
#include <vlc_demux.h>
32
#include <vlc_charset.h>                           /* EnsureUTF8 */
33
#include <vlc_input.h>
34
#include <vlc_aout.h>
35
#include <vlc_plugin.h>
36
#include <assert.h>
37
#include <limits.h>
38
#include "../codec/cc.h"
39

40 41 42
/*****************************************************************************
 * Module descriptor
 *****************************************************************************/
43 44
static int  Open ( vlc_object_t * );
static void Close( vlc_object_t * );
45

46 47 48 49 50
#define CFG_PREFIX "mp4-"

#define MP4_M4A_TEXT     "M4A audio only"
#define MP4_M4A_LONGTEXT "Ignore non audio tracks from iTunes audio files"

51 52 53 54
vlc_module_begin ()
    set_category( CAT_INPUT )
    set_subcategory( SUBCAT_INPUT_DEMUX )
    set_description( N_("MP4 stream demuxer") )
55
    set_shortname( N_("MP4") )
56
    set_capability( "demux", 240 )
57
    set_callbacks( Open, Close )
58 59 60

    add_category_hint("Hacks", NULL, true)
    add_bool( CFG_PREFIX"m4a-audioonly", false, MP4_M4A_TEXT, MP4_M4A_LONGTEXT, true )
61
vlc_module_end ()
62

63 64 65
/*****************************************************************************
 * Local prototypes
 *****************************************************************************/
66
static int   Demux   ( demux_t * );
67
static int   DemuxRef( demux_t *p_demux ){ (void)p_demux; return 0;}
68
static int   DemuxFrg( demux_t * );
69
static int   DemuxAsLeaf( demux_t * );
70 71
static int   Seek    ( demux_t *, mtime_t );
static int   Control ( demux_t *, int, va_list );
72

73 74 75 76 77 78
struct demux_sys_t
{
    MP4_Box_t    *p_root;      /* container for the whole file */

    mtime_t      i_pcr;

79
    uint64_t     i_overall_duration; /* Full duration, including all fragments */
80 81
    uint64_t     i_time;         /* time position of the presentation
                                  * in movie timescale */
82
    uint32_t     i_timescale;    /* movie time scale */
83 84
    unsigned int i_tracks;       /* number of tracks */
    mp4_track_t  *track;         /* array of track */
85
    float        f_fps;          /* number of frame per seconds */
86

87
    bool         b_fragmented;   /* fMP4 */
88 89
    bool         b_seekable;
    bool         b_fastseekable;
90

91
    bool            b_index_probed;
92
    bool            b_fragments_probed;
93 94

    mp4_fragments_t fragments;
95

96 97 98 99 100
    struct
    {
        mp4_fragment_t *p_fragment;
        uint32_t        i_current_box_type;
        uint32_t        i_mdatbytesleft;
101
        uint32_t        i_lastseqnumber;
102 103
    } context;

104 105
    /* */
    MP4_Box_t    *p_tref_chap;
106 107 108

    /* */
    input_title_t *p_title;
109 110 111 112 113

    /* ASF in MP4 */
    asf_packet_sys_t asfpacketsys;
    uint64_t i_preroll;         /* foobar */
    int64_t  i_preroll_start;
114 115 116 117 118

    struct
    {
        int es_cat_filters;
    } hacks;
119 120
};

121 122 123
#define DEMUX_INCREMENT (CLOCK_FREQ / 8) /* How far the pcr will go, each round */
#define DEMUX_TRACK_MAX_PRELOAD (CLOCK_FREQ * 15) /* maximum preloading, to deal with interleaving */

124
/*****************************************************************************
125
 * Declaration of local function
126
 *****************************************************************************/
127
static void MP4_TrackCreate ( demux_t *, mp4_track_t *, MP4_Box_t  *, bool, bool );
128
static void MP4_TrackDestroy( demux_t *, mp4_track_t * );
129

130 131
static void MP4_Block_Send( demux_t *, mp4_track_t *, block_t * );

Laurent Aimar's avatar
Laurent Aimar committed
132 133
static int  MP4_TrackSelect ( demux_t *, mp4_track_t *, mtime_t );
static void MP4_TrackUnselect(demux_t *, mp4_track_t * );
134

Laurent Aimar's avatar
Laurent Aimar committed
135
static int  MP4_TrackSeek   ( demux_t *, mp4_track_t *, mtime_t );
136

Laurent Aimar's avatar
Laurent Aimar committed
137
static uint64_t MP4_TrackGetPos    ( mp4_track_t * );
138
static uint32_t MP4_TrackGetReadSize( mp4_track_t *, uint32_t * );
139
static int      MP4_TrackNextSample( demux_t *, mp4_track_t *, uint32_t );
Laurent Aimar's avatar
Laurent Aimar committed
140
static void     MP4_TrackSetELST( demux_t *, mp4_track_t *, int64_t );
Laurent Aimar's avatar
Laurent Aimar committed
141

142
static void     MP4_UpdateSeekpoint( demux_t *, int64_t );
143

144
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id );
145 146 147 148
static void MP4_GetDefaultSizeAndDuration( demux_t *p_demux,
                                           const MP4_Box_data_tfhd_t *p_tfhd_data,
                                           uint32_t *pi_default_size,
                                           uint32_t *pi_default_duration );
149

150
static bool AddFragment( demux_t *p_demux, MP4_Box_t *p_moox );
151
static int  ProbeFragments( demux_t *p_demux, bool b_force );
152 153 154 155 156 157 158
static int  ProbeIndex( demux_t *p_demux );

static int LeafIndexGetMoofPosByTime( demux_t *p_demux, const mtime_t i_target_time,
                                      uint64_t *pi_pos, mtime_t *pi_mooftime );
static int LeafGetTrackAndChunkByMOOVPos( demux_t *p_demux, uint64_t *pi_pos,
                                      mp4_track_t **pp_tk, unsigned int *pi_chunk );
static int LeafMapTrafTrunContextes( demux_t *p_demux, MP4_Box_t *p_moof );
159

160 161 162 163 164
/* ASF Handlers */
static asf_track_info_t * MP4ASF_GetTrackInfo( asf_packet_sys_t *p_packetsys, uint8_t i_stream_number );
static void MP4ASF_Send(asf_packet_sys_t *p_packetsys, uint8_t i_stream_number, block_t **pp_frame);
static void MP4ASF_ResetFrames( demux_sys_t *p_sys );

165 166 167 168
/* RTP Hint track */
static block_t * MP4_RTPHint_Convert( demux_t *p_demux, block_t *p_block, vlc_fourcc_t i_codec );
static block_t * MP4_RTPHintToFrame( demux_t *p_demux, block_t *p_block, uint32_t packetcount );

169 170
/* Helpers */

171 172 173 174 175 176 177 178 179 180 181 182 183 184
static int64_t MP4_rescale( int64_t i_value, uint32_t i_timescale, uint32_t i_newscale )
{
    if( i_timescale == i_newscale )
        return i_value;

    if( i_value <= INT64_MAX / i_newscale )
        return i_value * i_newscale / i_timescale;

    /* overflow */
    int64_t q = i_value / i_timescale;
    int64_t r = i_value % i_timescale;
    return q * i_newscale + r * i_newscale / i_timescale;
}

185 186
static uint32_t stream_ReadU32( stream_t *s, void *p_read, uint32_t i_toread )
{
187
    ssize_t i_return = 0;
188 189
    if ( i_toread > INT32_MAX )
    {
190
        i_return = vlc_stream_Read( s, p_read, (size_t) INT32_MAX );
191 192 193 194 195
        if ( i_return < INT32_MAX )
            return i_return;
        else
            i_toread -= INT32_MAX;
    }
196
    i_return += vlc_stream_Read( s, (uint8_t *)p_read + i_return, (size_t) i_toread );
197 198 199
    return i_return;
}

200 201
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id )
{
202 203
    if(!p_moov)
        return NULL;
204 205 206
    MP4_Box_t *p_trex = MP4_BoxGet( p_moov, "mvex/trex" );
    while( p_trex )
    {
207 208
        if ( p_trex->i_type == ATOM_trex &&
             BOXDATA(p_trex) && BOXDATA(p_trex)->i_track_ID == i_id )
209 210 211 212 213 214 215
                break;
        else
            p_trex = p_trex->p_next;
    }
    return p_trex;
}

216 217 218 219 220 221 222
static MP4_Box_t * MP4_GetTrakByTrackID( MP4_Box_t *p_moov, const uint32_t i_id )
{
    MP4_Box_t *p_trak = MP4_BoxGet( p_moov, "trak" );
    MP4_Box_t *p_tkhd;
    while( p_trak )
    {
        if( p_trak->i_type == ATOM_trak &&
223
            (p_tkhd = MP4_BoxGet( p_trak, "tkhd" )) && BOXDATA(p_tkhd) &&
224 225 226 227 228 229 230 231
            BOXDATA(p_tkhd)->i_track_ID == i_id )
                break;
        else
            p_trak = p_trak->p_next;
    }
    return p_trak;
}

232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247
static MP4_Box_t * MP4_GetTrafByTrackID( MP4_Box_t *p_moof, const uint32_t i_id )
{
    MP4_Box_t *p_traf = MP4_BoxGet( p_moof, "traf" );
    MP4_Box_t *p_tfhd;
    while( p_traf )
    {
        if( p_traf->i_type == ATOM_traf &&
            (p_tfhd = MP4_BoxGet( p_traf, "tfhd" )) && BOXDATA(p_tfhd) &&
            BOXDATA(p_tfhd)->i_track_ID == i_id )
                break;
        else
            p_traf = p_traf->p_next;
    }
    return p_traf;
}

248 249 250 251 252 253 254 255 256 257
static es_out_id_t * MP4_AddTrackES( es_out_t *out, mp4_track_t *p_track )
{
    es_out_id_t *p_es = es_out_Add( out, &p_track->fmt );
    /* Force SPU which isn't selected/defaulted */
    if( p_track->fmt.i_cat == SPU_ES && p_es && p_track->b_forced_spu )
        es_out_Control( out, ES_OUT_SET_ES_DEFAULT, p_es );

    return p_es;
}

258
/* Return time in microsecond of a track */
Laurent Aimar's avatar
Laurent Aimar committed
259
static inline int64_t MP4_TrackGetDTS( demux_t *p_demux, mp4_track_t *p_track )
Laurent Aimar's avatar
Laurent Aimar committed
260
{
261
    demux_sys_t *p_sys = p_demux->p_sys;
262
    const mp4_chunk_t *p_chunk;
263 264 265

    p_chunk = ( p_track->cchunk ) ? p_track->cchunk /* DemuxFrg */
                                  : &p_track->chunk[p_track->i_chunk];
266 267

    unsigned int i_index = 0;
268 269
    unsigned int i_sample = p_track->i_sample - p_chunk->i_sample_first;
    int64_t i_dts = p_chunk->i_first_dts;
Laurent Aimar's avatar
Laurent Aimar committed
270

271
    while( i_sample > 0 && i_index < p_chunk->i_entries_dts )
Laurent Aimar's avatar
Laurent Aimar committed
272
    {
273
        if( i_sample > p_chunk->p_sample_count_dts[i_index] )
Laurent Aimar's avatar
Laurent Aimar committed
274
        {
275 276 277
            i_dts += p_chunk->p_sample_count_dts[i_index] *
                p_chunk->p_sample_delta_dts[i_index];
            i_sample -= p_chunk->p_sample_count_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
278 279 280 281
            i_index++;
        }
        else
        {
282
            i_dts += i_sample * p_chunk->p_sample_delta_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
283 284 285 286
            break;
        }
    }

287 288 289
    /* now handle elst */
    if( p_track->p_elst )
    {
290
        MP4_Box_data_elst_t *elst = p_track->BOXDATA(p_elst);
291 292 293 294 295 296 297 298 299 300

        /* convert to offset */
        if( ( elst->i_media_rate_integer[p_track->i_elst] > 0 ||
              elst->i_media_rate_fraction[p_track->i_elst] > 0 ) &&
            elst->i_media_time[p_track->i_elst] > 0 )
        {
            i_dts -= elst->i_media_time[p_track->i_elst];
        }

        /* add i_elst_time */
301
        i_dts += MP4_rescale( p_track->i_elst_time, p_sys->i_timescale, p_track->i_timescale );
302 303 304 305

        if( i_dts < 0 ) i_dts = 0;
    }

306
    return MP4_rescale( i_dts, p_track->i_timescale, CLOCK_FREQ );
Laurent Aimar's avatar
Laurent Aimar committed
307
}
308

309 310
static inline bool MP4_TrackGetPTSDelta( demux_t *p_demux, mp4_track_t *p_track,
                                         int64_t *pi_delta )
Laurent Aimar's avatar
Laurent Aimar committed
311
{
312
    VLC_UNUSED( p_demux );
313
    mp4_chunk_t *ck;
314 315
    ck = ( p_track->cchunk ) ? p_track->cchunk /* DemuxFrg */
                             : &p_track->chunk[p_track->i_chunk];
316

Laurent Aimar's avatar
Laurent Aimar committed
317 318 319 320
    unsigned int i_index = 0;
    unsigned int i_sample = p_track->i_sample - ck->i_sample_first;

    if( ck->p_sample_count_pts == NULL || ck->p_sample_offset_pts == NULL )
321
        return false;
Laurent Aimar's avatar
Laurent Aimar committed
322

323
    for( i_index = 0; i_index < ck->i_entries_pts ; i_index++ )
Laurent Aimar's avatar
Laurent Aimar committed
324 325
    {
        if( i_sample < ck->p_sample_count_pts[i_index] )
326
        {
327 328
            *pi_delta = MP4_rescale( ck->p_sample_offset_pts[i_index],
                                     p_track->i_timescale, CLOCK_FREQ );
329 330
            return true;
        }
Laurent Aimar's avatar
Laurent Aimar committed
331 332 333

        i_sample -= ck->p_sample_count_pts[i_index];
    }
334
    return false;
Laurent Aimar's avatar
Laurent Aimar committed
335 336
}

Laurent Aimar's avatar
Laurent Aimar committed
337 338
static inline int64_t MP4_GetMoviePTS(demux_sys_t *p_sys )
{
339
    return MP4_rescale( p_sys->i_time, p_sys->i_timescale, CLOCK_FREQ );
Laurent Aimar's avatar
Laurent Aimar committed
340
}
341

342 343
static void LoadChapter( demux_t  *p_demux );

344
static int LoadInitFrag( demux_t *p_demux )
345 346 347
{
    demux_sys_t *p_sys = p_demux->p_sys;

348 349
    /* Load all boxes ( except raw data ) */
    if( ( p_sys->p_root = MP4_BoxGetRoot( p_demux->s ) ) == NULL )
350
    {
351
        goto LoadInitFragError;
352
    }
353

354 355 356 357 358 359 360
    return VLC_SUCCESS;

LoadInitFragError:
    msg_Warn( p_demux, "MP4 plugin discarded (not a valid initialization chunk)" );
    return VLC_EGENERIC;
}

361
static int AllocateTracks( demux_t *p_demux, unsigned i_tracks )
362 363 364
{
    demux_sys_t *p_sys = p_demux->p_sys;

365
    p_sys->track = calloc( i_tracks, sizeof( mp4_track_t ) );
366
    if( p_sys->track == NULL )
367 368
        return VLC_ENOMEM;
    p_sys->i_tracks = i_tracks;
369 370 371

    if( p_sys->b_fragmented )
    {
372
        for( unsigned i = 0; i < i_tracks; i++ )
373
        {
374
            mp4_track_t *p_track = &p_sys->track[i];
375 376
            p_track->cchunk = calloc( 1, sizeof( mp4_chunk_t ) );
            if( unlikely( !p_track->cchunk ) )
377
                return VLC_ENOMEM;
378 379 380 381 382
        }
    }
    return VLC_SUCCESS;
}

383 384 385 386
static block_t * MP4_EIA608_Convert( block_t * p_block )
{
    /* Rebuild codec data from encap */
    size_t i_copied = 0;
387
    size_t i_remaining = __MIN(p_block->i_buffer, INT64_MAX / 3);
388 389 390
    uint32_t i_bytes = 0;
    block_t *p_newblock;

391
    /* always need at least 10 bytes (atom size+header+1pair)*/
392 393
    if ( i_remaining < 10 ||
         !(i_bytes = GetDWBE(p_block->p_buffer)) ||
394
         (i_bytes > i_remaining) ||
395 396 397 398 399 400 401 402 403 404 405 406 407 408
         memcmp("cdat", &p_block->p_buffer[4], 4) ||
         !(p_newblock = block_Alloc( i_remaining * 3 - 8 )) )
    {
        p_block->i_buffer = 0;
        return p_block;
    }

    uint8_t *p_write = p_newblock->p_buffer;
    uint8_t *p_read = &p_block->p_buffer[8];
    i_bytes -= 8;
    i_remaining -= 8;

    do
    {
409
        p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
410 411 412 413 414 415 416
        p_write[i_copied++] = p_read[0];
        p_write[i_copied++] = p_read[1];
        p_read += 2;
        i_bytes -= 2;
        i_remaining -= 2;
    } while( i_bytes >= 2 );

417
    /* cdt2 is optional */
418 419
    if ( i_remaining >= 10 &&
         (i_bytes = GetDWBE(p_read)) &&
420
         (i_bytes <= i_remaining) &&
421 422 423 424 425 426 427
         !memcmp("cdt2", &p_read[4], 4) )
    {
        p_read += 8;
        i_bytes -= 8;
        i_remaining -= 8;
        do
        {
428
            p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
429 430 431 432 433 434 435 436 437
            p_write[i_copied++] = p_read[0];
            p_write[i_copied++] = p_read[1];
            p_read += 2;
            i_bytes -= 2;
        } while( i_bytes >= 2 );
    }

    block_Release( p_block );
    p_newblock->i_buffer = i_copied;
438
    p_newblock->i_flags = BLOCK_FLAG_ORDERED_CAPTIONS;
439 440 441
    return p_newblock;
}

442 443 444 445 446 447 448
static uint32_t MP4_TrackGetRunSeq( mp4_track_t *p_track )
{
    if( p_track->i_chunk_count > 0 )
        return p_track->chunk[p_track->i_chunk].i_virtual_run_number;
    return 0;
}

449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487
/* Analyzes chunks to find max interleave length
 * sets flat flag if no interleaving is in use */
static void MP4_GetInterleaving( demux_t *p_demux, uint64_t *pi_max_contiguous, bool *pb_flat )
{
    demux_sys_t *p_sys = p_demux->p_sys;
    *pi_max_contiguous = 0;
    *pb_flat = true;

    /* Find first recorded chunk */
    mp4_track_t *tk = NULL;
    uint64_t i_duration = 0;
    for( unsigned i=0; i < p_sys->i_tracks; i++ )
    {
        mp4_track_t *cur = &p_sys->track[i];
        if( !cur->i_chunk_count )
            continue;

        if( tk == NULL || cur->chunk[0].i_offset < tk->chunk[0].i_offset )
            tk = cur;
    }

    for( ; tk != NULL; )
    {
        i_duration += tk->chunk[tk->i_chunk].i_duration;
        tk->i_chunk++;

        /* Find next chunk in data order */
        mp4_track_t *nexttk = NULL;
        for( unsigned i=0; i < p_sys->i_tracks; i++ )
        {
            mp4_track_t *cur = &p_sys->track[i];
            if( cur->i_chunk == cur->i_chunk_count )
                continue;

            if( nexttk == NULL ||
                cur->chunk[cur->i_chunk].i_offset < nexttk->chunk[nexttk->i_chunk].i_offset )
                nexttk = cur;
        }

488 489 490 491 492
        /* copy previous run */
        if( nexttk && nexttk->i_chunk > 0 )
            nexttk->chunk[nexttk->i_chunk].i_virtual_run_number =
                    nexttk->chunk[nexttk->i_chunk - 1].i_virtual_run_number;

493 494
        if( tk != nexttk )
        {
495
            i_duration = MP4_rescale( i_duration, tk->i_timescale, CLOCK_FREQ );
496 497 498 499 500 501
            if( i_duration > *pi_max_contiguous )
                *pi_max_contiguous = i_duration;
            i_duration = 0;

            if( tk->i_chunk != tk->i_chunk_count )
                *pb_flat = false;
502 503 504

            if( nexttk && nexttk->i_chunk > 0 ) /* new run number */
                nexttk->chunk[nexttk->i_chunk].i_virtual_run_number++;
505 506 507 508 509 510 511 512 513 514
        }

        tk = nexttk;
    }

    /* reset */
    for( unsigned i=0; i < p_sys->i_tracks; i++ )
        p_sys->track[i].i_chunk = 0;
}

515
static block_t * MP4_Block_Convert( demux_t *p_demux, const mp4_track_t *p_track, block_t *p_block )
516 517 518 519 520 521 522 523 524 525
{
    /* might have some encap */
    if( p_track->fmt.i_cat == SPU_ES )
    {
        switch( p_track->fmt.i_codec )
        {
            case VLC_CODEC_TX3G:
            case VLC_CODEC_SPU:
            /* accept as-is */
            break;
526 527 528
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
529 530 531 532 533
        default:
            p_block->i_buffer = 0;
            break;
        }
    }
534 535 536 537
    else if( p_track->fmt.i_original_fourcc == ATOM_rrtp )
    {
        p_block = MP4_RTPHint_Convert( p_demux, p_block, p_track->fmt.i_codec );
    }
538 539 540 541

    return p_block;
}

542 543
static void MP4_Block_Send( demux_t *p_demux, mp4_track_t *p_track, block_t *p_block )
{
544 545 546 547
    p_block = MP4_Block_Convert( p_demux, p_track, p_block );
    if( p_block == NULL )
        return;

548
    if ( p_track->b_chans_reorder )
549 550 551 552 553 554
    {
        aout_ChannelReorder( p_block->p_buffer, p_block->i_buffer,
                             p_track->fmt.audio.i_channels,
                             p_track->rgi_chans_reordering,
                             p_track->fmt.i_codec );
    }
555

556
    p_block->i_flags |= p_track->i_block_flags;
557 558 559 560 561
    if( p_track->i_next_block_flags )
    {
        p_block->i_flags |= p_track->i_next_block_flags;
        p_track->i_next_block_flags = 0;
    }
562

563 564 565 566 567
    /* ASF packets in mov */
    if( p_track->p_asf )
    {
        /* Fake a new stream from MP4 block */
        stream_t *p_stream = p_demux->s;
568
        p_demux->s = vlc_stream_MemoryNew( p_demux, p_block->p_buffer, p_block->i_buffer, true );
569 570 571 572 573 574
        if ( p_demux->s )
        {
            p_track->i_dts_backup = p_block->i_dts;
            p_track->i_pts_backup = p_block->i_pts;
            /* And demux it as ASF packet */
            DemuxASFPacket( &p_demux->p_sys->asfpacketsys, p_block->i_buffer, p_block->i_buffer );
575
            vlc_stream_Delete(p_demux->s);
576 577 578 579 580 581
        }
        block_Release(p_block);
        p_demux->s = p_stream;
    }
    else
        es_out_Send( p_demux->out, p_track->p_es, p_block );
582 583
}

584
/*****************************************************************************
585
 * Open: check file and initializes MP4 structures
586
 *****************************************************************************/
587
static int Open( vlc_object_t * p_this )
588
{
Laurent Aimar's avatar
Laurent Aimar committed
589
    demux_t  *p_demux = (demux_t *)p_this;
590
    demux_sys_t     *p_sys;
591

Christophe Mutricy's avatar
Christophe Mutricy committed
592
    const uint8_t   *p_peek;
593

594
    MP4_Box_t       *p_ftyp;
595
    MP4_Box_t       *p_rmra;
596 597
    MP4_Box_t       *p_mvhd;
    MP4_Box_t       *p_trak;
598

599
    unsigned int    i;
600
    bool      b_enabled_es;
601

602
    /* A little test to see if it could be a mp4 */
603
    if( vlc_stream_Peek( p_demux->s, &p_peek, 11 ) < 11 ) return VLC_EGENERIC;
604

605
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
606
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
607 608 609 610 611 612 613 614
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
615
        case ATOM_uuid:
616
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
617
            break;
618 619 620 621 622
        case ATOM_ftyp:
            /* We don't yet support f4v, but avformat does. */
            if( p_peek[8] == 'f' && p_peek[9] == '4' && p_peek[10] == 'v' )
                return VLC_EGENERIC;
            break;
623
         default:
624
            return VLC_EGENERIC;
625
    }
626

627 628 629 630 631
    /* create our structure that will contains all data */
    p_sys = calloc( 1, sizeof( demux_sys_t ) );
    if ( !p_sys )
        return VLC_EGENERIC;

632
    /* I need to seek */
633 634 635
    vlc_stream_Control( p_demux->s, STREAM_CAN_SEEK, &p_sys->b_seekable );
    vlc_stream_Control( p_demux->s, STREAM_CAN_FASTSEEK,
                        &p_sys->b_fastseekable );
636

637
    /*Set exported functions */
Laurent Aimar's avatar
Laurent Aimar committed
638 639
    p_demux->pf_demux = Demux;
    p_demux->pf_control = Control;
640

641 642
    p_sys->context.i_lastseqnumber = 1;

643 644
    MP4_Fragments_Init( &p_sys->fragments );

645
    p_demux->p_sys = p_sys;
646

647
    if( LoadInitFrag( p_demux ) != VLC_SUCCESS )
648 649
        goto error;

650

651
    if( ( p_ftyp = MP4_BoxGet( p_sys->p_root, "/ftyp" ) ) )
652
    {
653
        switch( BOXDATA(p_ftyp)->i_major_brand )
654
        {
655
            case MAJOR_isom:
Laurent Aimar's avatar
Laurent Aimar committed
656
                msg_Dbg( p_demux,
François Cartegnie's avatar
François Cartegnie committed
657
                         "ISO Media (isom) version %d.",
658
                         BOXDATA(p_ftyp)->i_minor_version );
659
                break;
660 661 662 663
            case MAJOR_3gp4:
            case MAJOR_3gp5:
            case MAJOR_3gp6:
            case MAJOR_3gp7:
664 665
                msg_Dbg( p_demux, "3GPP Media Release: %4.4s",
                         (char *)&BOXDATA(p_ftyp)->i_major_brand );
666
                break;
667
            case MAJOR_qt__:
François Cartegnie's avatar
François Cartegnie committed
668
                msg_Dbg( p_demux, "Apple QuickTime media" );
669
                break;
670
            case MAJOR_isml:
François Cartegnie's avatar
François Cartegnie committed
671
                msg_Dbg( p_demux, "PIFF (= isml = fMP4) media" );
672
                break;
673
            case MAJOR_dash:
François Cartegnie's avatar
François Cartegnie committed
674
                msg_Dbg( p_demux, "DASH Stream" );
675
                break;
676 677 678 679 680
            case MAJOR_M4A:
                msg_Dbg( p_demux, "iTunes audio" );
                if( var_InheritBool( p_demux, CFG_PREFIX"m4a-audioonly" ) )
                    p_sys->hacks.es_cat_filters = AUDIO_ES;
                break;
681
            default:
Laurent Aimar's avatar
Laurent Aimar committed
682
                msg_Dbg( p_demux,
François Cartegnie's avatar
François Cartegnie committed
683
                         "unrecognized major media specification (%4.4s).",
684
                          (char*)&BOXDATA(p_ftyp)->i_major_brand );
685 686
                break;
        }
687 688 689 690 691
        /* also lookup in compatibility list */
        for(uint32_t i=0; i<BOXDATA(p_ftyp)->i_compatible_brands_count; i++)
        {
            if (BOXDATA(p_ftyp)->i_compatible_brands[i] == MAJOR_dash)
            {
François Cartegnie's avatar
François Cartegnie committed
692
                msg_Dbg( p_demux, "DASH Stream" );
693
            }
694 695 696 697
            else if (BOXDATA(p_ftyp)->i_compatible_brands[i] == VLC_FOURCC('s', 'm', 'o', 'o') )
            {
                msg_Dbg( p_demux, "Handling VLC Smooth Stream" );
            }
698
        }
699 700 701
    }
    else
    {
François Cartegnie's avatar
François Cartegnie committed
702
        msg_Dbg( p_demux, "file type box missing (assuming ISO Media)" );
703 704
    }

705 706
    if( MP4_BoxCount( p_sys->p_root, "/moov/mvex" ) > 0 )
    {
707
        if ( p_sys->b_seekable )
708 709 710 711 712 713 714 715
        {
            /* Probe remaining to check if there's really fragments
               or if that file is just ready to append fragments */
            ProbeFragments( p_demux, false );
            p_sys->b_fragmented = !!MP4_BoxCount( p_sys->p_root, "/moof" );

            if ( p_sys->b_fragmented && !p_sys->i_overall_duration )
                ProbeFragments( p_demux, true );
716 717 718 719

            MP4_Box_t *p_mdat = MP4_BoxGet( p_sys->p_root, "mdat" );
            if ( p_mdat )
            {
720
                vlc_stream_Seek( p_demux->s, p_mdat->i_pos );
721 722
                msg_Dbg( p_demux, "rewinding to mdat %"PRId64, p_mdat->i_pos );
            }
723 724 725 726 727
        }
        else
            p_sys->b_fragmented = true;
    }

728
    if ( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
729 730
        AddFragment( p_demux, MP4_BoxGet( p_sys->p_root, "/moov" ) );

731
    if ( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
732 733
        goto error;

734 735
    MP4_BoxDumpStructure( p_demux->s, p_sys->p_root );

736
    if( p_sys->b_fragmented )
737 738
    {
        p_demux->pf_demux = DemuxAsLeaf;
739 740 741 742 743 744 745
        msg_Dbg( p_demux, "Set experimental DemuxLeaf mode" );
    }

    if( !p_sys->b_seekable && p_demux->pf_demux == Demux )
    {
        msg_Warn( p_demux, "MP4 plugin discarded (not seekable)" );
        goto error;
746 747
    }

748
    /* the file need to have one moov box */
749 750
    MP4_Fragment_Moov(&p_sys->fragments)->p_moox = MP4_BoxGet( p_sys->p_root, "/moov", 0 );
    if( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
751
    {
752
        MP4_Box_t *p_foov = MP4_BoxGet( p_sys->p_root, "/foov" );
753 754 755

        if( !p_foov )
        {
756 757
            msg_Err( p_demux, "MP4 plugin discarded (no moov,foov,moof box)" );
            goto error;
758 759
        }
        /* we have a free box as a moov, rename it */
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
760
        p_foov->i_type = ATOM_moov;
761
        MP4_Fragment_Moov(&p_sys->fragments)->p_moox = p_foov;
762 763
    }

764
    if( ( p_rmra = MP4_BoxGet( p_sys->p_root,  "/moov/rmra" ) ) )
765 766 767 768
    {
        int        i_count = MP4_BoxCount( p_rmra, "rmda" );
        int        i;

Laurent Aimar's avatar
Laurent Aimar committed
769
        msg_Dbg( p_demux, "detected playlist mov file (%d ref)", i_count );
770

771
        input_thread_t *p_input = p_demux->p_input;
772
        input_item_t *p_current = input_GetItem( p_input );
773

774 775
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

776
        for( i = 0; i < i_count; i++ )
777
        {
778 779 780
            MP4_Box_t *p_rdrf = MP4_BoxGet( p_rmra, "rmda[%d]/rdrf", i );
            char      *psz_ref;
            uint32_t  i_ref_type;
781

782
            if( !p_rdrf || !BOXDATA(p_rdrf) || !( psz_ref = strdup( BOXDATA(p_rdrf)->psz_ref ) ) )
783
            {
784 785
                continue;
            }
786
            i_ref_type = BOXDATA(p_rdrf)->i_ref_type;
787

788 789 790 791 792 793
            msg_Dbg( p_demux, "new ref=`%s' type=%4.4s",
                     psz_ref, (char*)&i_ref_type );

            if( i_ref_type == VLC_FOURCC( 'u', 'r', 'l', ' ' ) )
            {
                if( strstr( psz_ref, "qt5gateQT" ) )
794
                {
795
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
796 797
                    continue;
                }
798 799
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
800
                {
801
                    ;
802 803 804
                }
                else
                {
805
                    char *psz_absolute;
806
                    char *psz_path = strdup( p_demux->psz_location );
807 808 809 810
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
811 812
                    if( asprintf( &psz_absolute, "%s://%s%s",
                                  p_demux->psz_access, psz_path, psz_ref ) < 0 )
Rémi Duraffort's avatar
Rémi Duraffort committed
813 814 815
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
816
                        input_item_node_Delete( p_subitems );
Christophe Mutricy's avatar
Christophe Mutricy committed
817
                        return VLC_ENOMEM;
Rémi Duraffort's avatar
Rémi Duraffort committed
818
                    }
819 820 821 822

                    free( psz_ref );
                    psz_ref = psz_absolute;
                    free( psz_path );
823
                }
824
                msg_Dbg( p_demux, "adding ref = `%s'", psz_ref );
825
                input_item_t *p_item = input_item_New( psz_ref, NULL );
826
                input_item_CopyOptions( p_item, p_current );
827 828
                input_item_node_AppendItem( p_subitems, p_item );
                vlc_gc_decref( p_item );
829
            }
830
            else
831
            {
832
                msg_Err( p_demux, "unknown ref type=%4.4s FIXME (send a bug report)",
833
                         (char*)&BOXDATA(p_rdrf)->i_ref_type );
834
            }
835
            free( psz_ref );
836
        }
837
        input_item_node_PostAndDelete( p_subitems );
838 839
    }

840
    if( !(p_mvhd = MP4_BoxGet( p_sys->p_root, "/moov/mvhd" ) ) )
841
    {
842 843
        if( !p_rmra )
        {
Laurent Aimar's avatar
Laurent Aimar committed
844
            msg_Err( p_demux, "cannot find /moov/mvhd" );
845
            goto error;
846 847 848
        }
        else
        {
Laurent Aimar's avatar
Laurent Aimar committed
849 850
            msg_Warn( p_demux, "cannot find /moov/mvhd (pure ref file)" );
            p_demux->pf_demux = DemuxRef;
851
            return VLC_SUCCESS;
852
        }
853 854 855
    }
    else
    {
856
        p_sys->i_timescale = BOXDATA(p_mvhd)->i_timescale;
857 858 859 860 861
        if( p_sys->i_timescale == 0 )
        {
            msg_Err( p_this, "bad timescale" );
            goto error;
        }
862
    }
863

864 865
    const unsigned i_tracks = MP4_BoxCount( p_sys->p_root, "/moov/trak" );
    if( i_tracks < 1 )
866
    {
Laurent Aimar's avatar
Laurent Aimar committed
867
        msg_Err( p_demux, "cannot find any /moov/trak" );
868
        goto error;
869
    }
870
    msg_Dbg( p_demux, "found %u track%c", i_tracks, i_tracks ? 's':' ' );
871

872
    if( AllocateTracks( p_demux, i_tracks ) != VLC_SUCCESS )
873
        goto error;
874

875 876
    /* Search the first chap reference (like quicktime) and
     * check that at least 1 stream is enabled */
877
    p_sys->p_tref_chap = NULL;
878
    b_enabled_es = false;
879 880 881 882
    for( i = 0; i < p_sys->i_tracks; i++ )
    {
        MP4_Box_t *p_trak = MP4_BoxGet( p_sys->p_root, "/moov/trak[%d]", i );

883 884

        MP4_Box_t *p_tkhd = MP4_BoxGet( p_trak, "tkhd" );
885
        if( p_tkhd && BOXDATA(p_tkhd) && (BOXDATA(p_tkhd)->i_flags&MP4_TRACK_ENABLED) )
886 887 888
            b_enabled_es = true;

        MP4_Box_t *p_chap = MP4_BoxGet( p_trak, "tref/chap", i );
889 890
        if( p_chap && p_chap->data.p_tref_generic &&
            p_chap->data.p_tref_generic->i_entry_count > 0 && !p_sys->p_tref_chap )
891
            p_sys->p_tref_chap = p_chap;
892 893
    }

Rémi Denis-Courmont's avatar
Typos  
Rémi Denis-Courmont committed
894
    /* now process each track and extract all useful information */
895
    for( i = 0; i < p_sys->i_tracks; i++ )
896
    {
897
        p_trak = MP4_BoxGet( p_sys->p_root, "/moov/trak[%d]", i );
898
        MP4_TrackCreate( p_demux, &p_sys->track[i], p_trak, true, !b_enabled_es );
899

900
        if( p_sys->track[i].b_ok && !p_sys->track[i].b_chapters_source )
Sam Hocevar's avatar