mp4.c 183 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
{
    /* might have some encap */
    if( p_track->fmt.i_cat == SPU_ES )
    {
        switch( p_track->fmt.i_codec )
        {
François Cartegnie's avatar
François Cartegnie committed
522
            case VLC_CODEC_TTML:
523 524 525 526
            case VLC_CODEC_TX3G:
            case VLC_CODEC_SPU:
            /* accept as-is */
            break;
527 528 529
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
530 531 532 533 534
        default:
            p_block->i_buffer = 0;
            break;
        }
    }
535 536 537 538
    else if( p_track->fmt.i_original_fourcc == ATOM_rrtp )
    {
        p_block = MP4_RTPHint_Convert( p_demux, p_block, p_track->fmt.i_codec );
    }
539 540 541 542

    return p_block;
}

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

549
    if ( p_track->b_chans_reorder )
550 551 552 553 554 555
    {
        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 );
    }
556

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

564 565 566 567 568
    /* ASF packets in mov */
    if( p_track->p_asf )
    {
        /* Fake a new stream from MP4 block */
        stream_t *p_stream = p_demux->s;
569
        p_demux->s = vlc_stream_MemoryNew( p_demux, p_block->p_buffer, p_block->i_buffer, true );
570 571 572 573 574 575
        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 );
576
            vlc_stream_Delete(p_demux->s);
577 578 579 580 581 582
        }
        block_Release(p_block);
        p_demux->s = p_stream;
    }
    else
        es_out_Send( p_demux->out, p_track->p_es, p_block );
583 584
}

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

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

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

600
    unsigned int    i;
601
    bool      b_enabled_es;
602

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

606
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
607
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
608 609 610 611 612 613 614 615
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
616
        case ATOM_uuid:
617
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
618
            break;
619 620 621 622 623
        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;
624
         default:
625
            return VLC_EGENERIC;
626
    }
627

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

633
    /* I need to seek */
634 635 636
    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 );
637

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

642
    p_sys->context.i_lastseqnumber = UINT32_MAX;
643

644 645
    MP4_Fragments_Init( &p_sys->fragments );

646
    p_demux->p_sys = p_sys;
647

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

651

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

706 707
    if( MP4_BoxCount( p_sys->p_root, "/moov/mvex" ) > 0 )
    {
708
        if ( p_sys->b_seekable )
709 710 711 712 713 714 715 716
        {
            /* 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 );
717 718 719 720

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

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

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

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

737
    if( p_sys->b_fragmented )
738 739
    {
        p_demux->pf_demux = DemuxAsLeaf;
740 741 742 743 744 745 746
        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;
747 748
    }

749
    /* the file need to have one moov box */
750 751
    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 )
752
    {
753
        MP4_Box_t *p_foov = MP4_BoxGet( p_sys->p_root, "/foov" );
754 755 756

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

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

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

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

775 776
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

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

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

789 790 791 792 793 794
            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" ) )
795
                {
796
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
797 798
                    continue;
                }
799 800
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
801
                {
802
                    ;
803 804 805
                }
                else
                {
806
                    char *psz_absolute;
807
                    char *psz_path = strdup( p_demux->psz_location );
808 809 810 811
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
812 813
                    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
814 815 816
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
817
                        input_item_node_Delete( p_subitems );
Christophe Mutricy's avatar
Christophe Mutricy committed
818
                        return VLC_ENOMEM;
Rémi Duraffort's avatar
Rémi Duraffort committed
819
                    }
820 821 822 823

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

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

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

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