mp4.c 179 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 25 26
 *****************************************************************************/

/*****************************************************************************
 * Preamble
 *****************************************************************************/

27 28 29 30
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif

31 32
#include "mp4.h"

33
#include <vlc_plugin.h>
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
34

Clément Stenac's avatar
Clément Stenac committed
35
#include <vlc_demux.h>
36
#include <vlc_charset.h>                           /* EnsureUTF8 */
37
#include <vlc_input.h>
38
#include <vlc_aout.h>
39
#include <assert.h>
40
#include <limits.h>
41

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

48 49 50 51
vlc_module_begin ()
    set_category( CAT_INPUT )
    set_subcategory( SUBCAT_INPUT_DEMUX )
    set_description( N_("MP4 stream demuxer") )
52
    set_shortname( N_("MP4") )
53
    set_capability( "demux", 240 )
54 55
    set_callbacks( Open, Close )
vlc_module_end ()
56

57 58 59
/*****************************************************************************
 * Local prototypes
 *****************************************************************************/
60
static int   Demux   ( demux_t * );
61
static int   DemuxRef( demux_t *p_demux ){ (void)p_demux; return 0;}
62
static int   DemuxFrg( demux_t * );
63
static int   DemuxAsLeaf( demux_t * );
64 65
static int   Seek    ( demux_t *, mtime_t );
static int   Control ( demux_t *, int, va_list );
66

67 68 69 70 71 72
struct demux_sys_t
{
    MP4_Box_t    *p_root;      /* container for the whole file */

    mtime_t      i_pcr;

73
    uint64_t     i_overall_duration; /* Full duration, including all fragments */
74 75
    uint64_t     i_time;         /* time position of the presentation
                                  * in movie timescale */
76
    uint32_t     i_timescale;    /* movie time scale */
77 78
    unsigned int i_tracks;       /* number of tracks */
    mp4_track_t  *track;         /* array of track */
79
    float        f_fps;          /* number of frame per seconds */
80

81
    bool         b_fragmented;   /* fMP4 */
82 83
    bool         b_seekable;
    bool         b_fastseekable;
84
    bool         b_seekmode;
85
    bool         b_smooth;       /* Is it Smooth Streaming? */
86
    bool         b_dash;
87

88
    bool            b_index_probed;
89 90 91 92
    bool            b_fragments_probed;
    mp4_fragment_t  moovfragment; /* moov */
    mp4_fragment_t *p_fragments;  /* known fragments (moof following moov) */

93 94 95 96 97
    struct
    {
        mp4_fragment_t *p_fragment;
        uint32_t        i_current_box_type;
        uint32_t        i_mdatbytesleft;
98
        uint32_t        i_lastseqnumber;
99 100
    } context;

101 102
    /* */
    MP4_Box_t    *p_tref_chap;
103 104 105

    /* */
    input_title_t *p_title;
106 107 108 109 110

    /* ASF in MP4 */
    asf_packet_sys_t asfpacketsys;
    uint64_t i_preroll;         /* foobar */
    int64_t  i_preroll_start;
111 112
};

113
/*****************************************************************************
114
 * Declaration of local function
115
 *****************************************************************************/
116 117 118
static void MP4_TrackCreate ( demux_t *, mp4_track_t *, MP4_Box_t  *, bool, bool );
static int  MP4_SmoothTrackCreate( demux_t *, mp4_track_t *, const mp4_chunk_t *,
                                   const MP4_Box_t *, bool );
119
static void MP4_TrackDestroy( demux_t *, mp4_track_t * );
120

121
static block_t * MP4_Block_Read( demux_t *, const mp4_track_t *, int );
122 123
static void MP4_Block_Send( demux_t *, mp4_track_t *, block_t * );

Laurent Aimar's avatar
Laurent Aimar committed
124 125
static int  MP4_TrackSelect ( demux_t *, mp4_track_t *, mtime_t );
static void MP4_TrackUnselect(demux_t *, mp4_track_t * );
126

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

Laurent Aimar's avatar
Laurent Aimar committed
129
static uint64_t MP4_TrackGetPos    ( mp4_track_t * );
130
static uint32_t MP4_TrackGetReadSize( mp4_track_t *, uint32_t * );
131
static int      MP4_TrackNextSample( demux_t *, mp4_track_t *, uint32_t );
Laurent Aimar's avatar
Laurent Aimar committed
132
static void     MP4_TrackSetELST( demux_t *, mp4_track_t *, int64_t );
133
static bool     MP4_TrackIsInterleaved( const mp4_track_t * );
Laurent Aimar's avatar
Laurent Aimar committed
134

135 136
static void     MP4_UpdateSeekpoint( demux_t * );

137
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id );
138 139 140 141
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 );
142

143
static bool AddFragment( demux_t *p_demux, MP4_Box_t *p_moox );
144
static int  ProbeFragments( demux_t *p_demux, bool b_force );
145 146 147 148 149 150
static int  ProbeIndex( demux_t *p_demux );
static mp4_fragment_t *GetFragmentByPos( demux_t *p_demux, uint64_t i_pos, bool b_exact );
static mp4_fragment_t *GetFragmentByTime( demux_t *p_demux, const mtime_t i_time );

static int LeafIndexGetMoofPosByTime( demux_t *p_demux, const mtime_t i_target_time,
                                      uint64_t *pi_pos, mtime_t *pi_mooftime );
151
static mtime_t LeafGetTrackFragmentTimeOffset( demux_t *p_demux, mp4_fragment_t *, unsigned int );
152 153 154
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 );
155

156 157 158 159 160
/* 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 );

161 162
/* Helpers */

163 164 165 166 167 168 169 170 171 172 173 174 175 176 177
static uint32_t stream_ReadU32( stream_t *s, void *p_read, uint32_t i_toread )
{
    uint32_t i_return = 0;
    if ( i_toread > INT32_MAX )
    {
        i_return = stream_Read( s, p_read, INT32_MAX );
        if ( i_return < INT32_MAX )
            return i_return;
        else
            i_toread -= INT32_MAX;
    }
    i_return += stream_Read( s, (uint8_t *)p_read + i_return, (int32_t) i_toread );
    return i_return;
}

178 179 180 181 182 183 184 185 186 187 188 189
static bool MP4_stream_Tell( stream_t *s, uint64_t *pi_pos )
{
    int64_t i_pos = stream_Tell( s );
    if ( i_pos < 0 )
        return false;
    else
    {
        *pi_pos = (uint64_t) i_pos;
        return true;
    }
}

190 191 192 193 194 195 196 197 198 199 200
static mtime_t GetTrackDurationInFragment( const mp4_fragment_t *p_fragment,
                                           unsigned int i_track_ID )
{
    for( unsigned int i=0; i<p_fragment->i_durations; i++ )
    {
        if( i_track_ID == p_fragment->p_durations[i].i_track_ID )
            return p_fragment->p_durations[i].i_duration;
    }
    return 0;
}

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

217 218 219 220 221 222 223
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 &&
224
            (p_tkhd = MP4_BoxGet( p_trak, "tkhd" )) && BOXDATA(p_tkhd) &&
225 226 227 228 229 230 231 232
            BOXDATA(p_tkhd)->i_track_ID == i_id )
                break;
        else
            p_trak = p_trak->p_next;
    }
    return p_trak;
}

233
/* Return time in microsecond of a track */
Laurent Aimar's avatar
Laurent Aimar committed
234
static inline int64_t MP4_TrackGetDTS( demux_t *p_demux, mp4_track_t *p_track )
Laurent Aimar's avatar
Laurent Aimar committed
235
{
236
    demux_sys_t *p_sys = p_demux->p_sys;
237
    const mp4_chunk_t *p_chunk;
238
    if( p_sys->b_fragmented )
239
        p_chunk = p_track->cchunk;
240
    else
241
        p_chunk = &p_track->chunk[p_track->i_chunk];
242 243

    unsigned int i_index = 0;
244 245
    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
246

247
    while( i_sample > 0 && i_index < p_chunk->i_entries_dts )
Laurent Aimar's avatar
Laurent Aimar committed
248
    {
249
        if( i_sample > p_chunk->p_sample_count_dts[i_index] )
Laurent Aimar's avatar
Laurent Aimar committed
250
        {
251 252 253
            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
254 255 256 257
            i_index++;
        }
        else
        {
258
            i_dts += i_sample * p_chunk->p_sample_delta_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
259 260 261 262
            break;
        }
    }

263 264 265
    /* now handle elst */
    if( p_track->p_elst )
    {
Laurent Aimar's avatar
Laurent Aimar committed
266
        demux_sys_t         *p_sys = p_demux->p_sys;
267
        MP4_Box_data_elst_t *elst = p_track->BOXDATA(p_elst);
268 269 270 271 272 273 274 275 276 277

        /* 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 */
278 279
        i_dts += p_track->i_elst_time * p_track->i_timescale /
            p_sys->i_timescale;
280 281 282 283

        if( i_dts < 0 ) i_dts = 0;
    }

284
    return CLOCK_FREQ * i_dts / p_track->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
285
}
286

287 288
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
289
{
290 291 292 293 294 295 296
    demux_sys_t *p_sys = p_demux->p_sys;
    mp4_chunk_t *ck;
    if( p_sys->b_fragmented )
        ck = p_track->cchunk;
    else
        ck = &p_track->chunk[p_track->i_chunk];

Laurent Aimar's avatar
Laurent Aimar committed
297 298 299 300
    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 )
301
        return false;
Laurent Aimar's avatar
Laurent Aimar committed
302

303
    for( i_index = 0; i_index < ck->i_entries_pts ; i_index++ )
Laurent Aimar's avatar
Laurent Aimar committed
304 305
    {
        if( i_sample < ck->p_sample_count_pts[i_index] )
306 307 308 309 310
        {
            *pi_delta = ck->p_sample_offset_pts[i_index] * CLOCK_FREQ /
                        (int64_t)p_track->i_timescale;
            return true;
        }
Laurent Aimar's avatar
Laurent Aimar committed
311 312 313

        i_sample -= ck->p_sample_count_pts[i_index];
    }
314
    return false;
Laurent Aimar's avatar
Laurent Aimar committed
315 316
}

Laurent Aimar's avatar
Laurent Aimar committed
317 318
static inline int64_t MP4_GetMoviePTS(demux_sys_t *p_sys )
{
319
    return CLOCK_FREQ * p_sys->i_time / p_sys->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
320
}
321

322 323
static void LoadChapter( demux_t  *p_demux );

324
static int LoadInitFrag( demux_t *p_demux )
325 326 327
{
    demux_sys_t *p_sys = p_demux->p_sys;

328
    if( p_sys->b_smooth ) /* Smooth Streaming */
329 330 331 332 333 334 335 336 337 338 339 340 341 342 343
    {
        if( ( p_sys->p_root = MP4_BoxGetSmooBox( p_demux->s ) ) == NULL )
        {
            goto LoadInitFragError;
        }
        else
        {
            MP4_Box_t *p_smoo = MP4_BoxGet( p_sys->p_root, "uuid" );
            if( !p_smoo || CmpUUID( &p_smoo->i_uuid, &SmooBoxUUID ) )
                goto LoadInitFragError;
            /* Get number of tracks */
            p_sys->i_tracks = 0;
            for( int i = 0; i < 3; i++ )
            {
                MP4_Box_t *p_stra = MP4_BoxGet( p_smoo, "uuid[%d]", i );
344
                if( p_stra && BOXDATA(p_stra) && BOXDATA(p_stra)->i_track_ID )
345 346
                    p_sys->i_tracks++;
                /* Get timescale and duration of the video track; */
347
                if( p_sys->i_timescale == 0 )
348
                {
349 350 351 352 353
                    if ( p_stra && BOXDATA(p_stra) )
                    {
                        p_sys->i_timescale = BOXDATA(p_stra)->i_timescale;
                        p_sys->i_overall_duration = BOXDATA(p_stra)->i_duration;
                    }
354 355 356 357 358
                    if( p_sys->i_timescale == 0 )
                    {
                        msg_Err( p_demux, "bad timescale" );
                        goto LoadInitFragError;
                    }
359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377
                }
            }
        }
    }
    else
    {
        /* Load all boxes ( except raw data ) */
        if( ( p_sys->p_root = MP4_BoxGetRoot( p_demux->s ) ) == NULL )
        {
            goto LoadInitFragError;
        }
    }
    return VLC_SUCCESS;

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

378
static int AllocateTracks( demux_t *p_demux, unsigned i_tracks )
379 380 381
{
    demux_sys_t *p_sys = p_demux->p_sys;

382
    p_sys->track = calloc( i_tracks, sizeof( mp4_track_t ) );
383
    if( p_sys->track == NULL )
384 385
        return VLC_ENOMEM;
    p_sys->i_tracks = i_tracks;
386 387 388

    if( p_sys->b_fragmented )
    {
389
        for( unsigned i = 0; i < i_tracks; i++ )
390
        {
391
            mp4_track_t *p_track = &p_sys->track[i];
392 393
            p_track->cchunk = calloc( 1, sizeof( mp4_chunk_t ) );
            if( unlikely( !p_track->cchunk ) )
394
                return VLC_ENOMEM;
395 396 397 398 399
        }
    }
    return VLC_SUCCESS;
}

400
static int CreateTracksFromSmooBox( demux_t *p_demux )
401 402 403 404
{
    demux_sys_t *p_sys = p_demux->p_sys;

    MP4_Box_t *p_smoo = MP4_BoxGet( p_sys->p_root, "uuid" );
405 406 407 408 409 410 411 412 413 414 415 416
    if( CmpUUID( &p_smoo->i_uuid, &SmooBoxUUID ) )
        return VLC_EGENERIC;

    /* Smooth tracks are stra UUID box below smooth UUID box */
    const unsigned i_tracks = MP4_BoxCount( p_smoo, "uuid" );

    if( AllocateTracks( p_demux, i_tracks ) != VLC_SUCCESS )
        return VLC_EGENERIC;

    unsigned j = 0;
    MP4_Box_t *p_stra = MP4_BoxGet( p_smoo, "uuid" );
    while( p_stra && j < p_sys->i_tracks )
417
    {
418 419
        if( !CmpUUID( &p_stra->i_uuid, &StraBoxUUID ) &&
            BOXDATA(p_stra) && BOXDATA(p_stra)->i_track_ID > 0 )
420
        {
421
            mp4_track_t *p_track = &p_sys->track[j++];
422
            MP4_SmoothTrackCreate( p_demux, p_track, p_track->cchunk, p_stra, true );
423
        }
424
        p_stra = p_stra->p_next;
425
    }
426 427

    return VLC_SUCCESS;
428 429
}

430 431 432 433
static block_t * MP4_EIA608_Convert( block_t * p_block )
{
    /* Rebuild codec data from encap */
    size_t i_copied = 0;
434
    size_t i_remaining = __MIN(p_block->i_buffer, INT64_MAX / 3);
435 436 437
    uint32_t i_bytes = 0;
    block_t *p_newblock;

438
    /* always need at least 10 bytes (atom size+header+1pair)*/
439 440
    if ( i_remaining < 10 ||
         !(i_bytes = GetDWBE(p_block->p_buffer)) ||
441
         (i_bytes > i_remaining) ||
442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463
         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
    {
        p_write[i_copied++] = 0; /* cc1 == field 0 */
        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 );

464
    /* cdt2 is optional */
465 466
    if ( i_remaining >= 10 &&
         (i_bytes = GetDWBE(p_read)) &&
467
         (i_bytes <= i_remaining) &&
468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487
         !memcmp("cdt2", &p_read[4], 4) )
    {
        p_read += 8;
        i_bytes -= 8;
        i_remaining -= 8;
        do
        {
            p_write[i_copied++] = 0; /* cc1 == field 0 */
            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;
    return p_newblock;
}

488 489 490 491 492 493 494 495 496 497 498 499 500 501 502
static block_t * MP4_Block_Read( demux_t *p_demux, const mp4_track_t *p_track, int i_size )
{
    block_t *p_block = stream_Block( p_demux->s, i_size );
    if ( !p_block )
        return NULL;

    /* 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;
503 504 505
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
506 507 508 509 510 511 512 513 514
        default:
            p_block->i_buffer = 0;
            break;
        }
    }

    return p_block;
}

515 516 517 518 519 520 521 522 523
static void MP4_Block_Send( demux_t *p_demux, mp4_track_t *p_track, block_t *p_block )
{
    if ( p_track->b_chans_reorder && aout_BitsPerSample( p_track->fmt.i_codec ) )
    {
        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 );
    }
524

525 526
    p_block->i_flags |= p_track->i_block_flags;

527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545
    /* ASF packets in mov */
    if( p_track->p_asf )
    {
        /* Fake a new stream from MP4 block */
        stream_t *p_stream = p_demux->s;
        p_demux->s = stream_MemoryNew( p_demux, p_block->p_buffer, p_block->i_buffer, true );
        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 );
            stream_Delete(p_demux->s);
        }
        block_Release(p_block);
        p_demux->s = p_stream;
    }
    else
        es_out_Send( p_demux->out, p_track->p_es, p_block );
546 547
}

548
/*****************************************************************************
549
 * Open: check file and initializes MP4 structures
550
 *****************************************************************************/
551
static int Open( vlc_object_t * p_this )
552
{
Laurent Aimar's avatar
Laurent Aimar committed
553
    demux_t  *p_demux = (demux_t *)p_this;
554
    demux_sys_t     *p_sys;
555

Christophe Mutricy's avatar
Christophe Mutricy committed
556
    const uint8_t   *p_peek;
557

558
    MP4_Box_t       *p_ftyp;
559
    MP4_Box_t       *p_rmra;
560 561
    MP4_Box_t       *p_mvhd;
    MP4_Box_t       *p_trak;
562

563
    unsigned int    i;
564
    bool      b_enabled_es;
565

566
    /* A little test to see if it could be a mp4 */
567
    if( stream_Peek( p_demux->s, &p_peek, 11 ) < 11 ) return VLC_EGENERIC;
568

569
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
570
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
571 572 573 574 575 576 577 578
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
579
        case ATOM_uuid:
580
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
581
            break;
582 583 584 585 586
        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;
587
         default:
588
            return VLC_EGENERIC;
589
    }
590

591 592 593 594 595
    /* create our structure that will contains all data */
    p_sys = calloc( 1, sizeof( demux_sys_t ) );
    if ( !p_sys )
        return VLC_EGENERIC;

596
    /* I need to seek */
597 598
    stream_Control( p_demux->s, STREAM_CAN_SEEK, &p_sys->b_seekable );
    stream_Control( p_demux->s, STREAM_CAN_FASTSEEK, &p_sys->b_fastseekable );
599
    p_sys->b_seekmode = p_sys->b_fastseekable;
600

601
    /*Set exported functions */
Laurent Aimar's avatar
Laurent Aimar committed
602 603
    p_demux->pf_demux = Demux;
    p_demux->pf_control = Control;
604

605 606
    p_sys->context.i_lastseqnumber = 1;

607
    p_demux->p_sys = p_sys;
608

609 610 611
    if( stream_Peek( p_demux->s, &p_peek, 24 ) < 24 ) return VLC_EGENERIC;
    if( !CmpUUID( (UUID_t *)(p_peek + 8), &SmooBoxUUID ) )
    {
612
        p_sys->b_smooth = true;
613 614 615
        p_sys->b_fragmented = true;
    }

616
    if( LoadInitFrag( p_demux ) != VLC_SUCCESS )
617 618
        goto error;

619

620
    if( ( p_ftyp = MP4_BoxGet( p_sys->p_root, "/ftyp" ) ) )
621
    {
622
        switch( BOXDATA(p_ftyp)->i_major_brand )
623
        {
624
            case MAJOR_isom:
Laurent Aimar's avatar
Laurent Aimar committed
625
                msg_Dbg( p_demux,
626
                         "ISO Media file (isom) version %d.",
627
                         BOXDATA(p_ftyp)->i_minor_version );
628
                break;
629 630 631 632
            case MAJOR_3gp4:
            case MAJOR_3gp5:
            case MAJOR_3gp6:
            case MAJOR_3gp7:
633 634
                msg_Dbg( p_demux, "3GPP Media file Release: %c",
#ifdef WORDS_BIGENDIAN
635
                        BOXDATA(p_ftyp)->i_major_brand
636
#else
637
                        BOXDATA(p_ftyp)->i_major_brand >> 24
638 639 640
#endif
                        );
                break;
641
            case MAJOR_qt__:
642
                msg_Dbg( p_demux, "Apple QuickTime file" );
643
                break;
644
            case MAJOR_isml:
645 646
                msg_Dbg( p_demux, "PIFF (= isml = fMP4) file" );
                break;
647 648 649 650
            case MAJOR_dash:
                msg_Dbg( p_demux, "DASH Stream file" );
                p_sys->b_dash = true;
                break;
651
            default:
Laurent Aimar's avatar
Laurent Aimar committed
652
                msg_Dbg( p_demux,
653
                         "unrecognized major file specification (%4.4s).",
654
                          (char*)&BOXDATA(p_ftyp)->i_major_brand );
655 656
                break;
        }
657 658 659 660 661 662 663 664 665
        /* 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)
            {
                msg_Dbg( p_demux, "DASH Stream file" );
                p_sys->b_dash = true;
            }
        }
666 667 668
    }
    else
    {
Laurent Aimar's avatar
Laurent Aimar committed
669
        msg_Dbg( p_demux, "file type box missing (assuming ISO Media file)" );
670 671
    }

672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694
    if( MP4_BoxCount( p_sys->p_root, "/moov/mvex" ) > 0 )
    {
        if ( p_sys->b_seekable && !p_sys->b_smooth && !p_sys->b_dash )
        {
            /* 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 );
        }
        else
            p_sys->b_fragmented = true;
    }

    if ( !p_sys->moovfragment.p_moox )
        AddFragment( p_demux, MP4_BoxGet( p_sys->p_root, "/moov" ) );

    /* we always need a moov entry, but smooth has a workaround */
    if ( !p_sys->moovfragment.p_moox && !p_sys->b_smooth )
        goto error;

695 696
    MP4_BoxDumpStructure( p_demux->s, p_sys->p_root );

697 698
    if( p_sys->b_smooth )
    {
699
        if( CreateTracksFromSmooBox( p_demux ) != VLC_SUCCESS )
700
            goto error;
701

702
        p_demux->pf_demux = DemuxFrg;
703
        msg_Dbg( p_demux, "Set DemuxFrg mode" );
704
        return VLC_SUCCESS;
705 706 707 708
    }
    else if( p_sys->b_fragmented )
    {
        p_demux->pf_demux = DemuxAsLeaf;
709 710 711 712 713 714 715
        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;
716 717
    }

718
    /* the file need to have one moov box */
719 720
    p_sys->moovfragment.p_moox = MP4_BoxGet( p_sys->p_root, "/moov", 0 );
    if( !p_sys->moovfragment.p_moox )
721
    {
722
        MP4_Box_t *p_foov = MP4_BoxGet( p_sys->p_root, "/foov" );
723 724 725

        if( !p_foov )
        {
726 727
            msg_Err( p_demux, "MP4 plugin discarded (no moov,foov,moof box)" );
            goto error;
728 729
        }
        /* we have a free box as a moov, rename it */
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
730
        p_foov->i_type = ATOM_moov;
731
        p_sys->moovfragment.p_moox = p_foov;
732 733
    }

734
    if( ( p_rmra = MP4_BoxGet( p_sys->p_root,  "/moov/rmra" ) ) )
735 736 737 738
    {
        int        i_count = MP4_BoxCount( p_rmra, "rmda" );
        int        i;

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

741
        input_thread_t *p_input = p_demux->p_input;
742
        input_item_t *p_current = input_GetItem( p_input );
743

744 745
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

746
        for( i = 0; i < i_count; i++ )
747
        {
748 749 750
            MP4_Box_t *p_rdrf = MP4_BoxGet( p_rmra, "rmda[%d]/rdrf", i );
            char      *psz_ref;
            uint32_t  i_ref_type;
751

752
            if( !p_rdrf || !BOXDATA(p_rdrf) || !( psz_ref = strdup( BOXDATA(p_rdrf)->psz_ref ) ) )
753
            {
754 755
                continue;
            }
756
            i_ref_type = BOXDATA(p_rdrf)->i_ref_type;
757

758 759 760 761 762 763
            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" ) )
764
                {
765
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
766 767
                    continue;
                }
768 769
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
770
                {
771
                    ;
772 773 774
                }
                else
                {
775
                    char *psz_absolute;
776
                    char *psz_path = strdup( p_demux->psz_location );
777 778 779 780
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
781 782
                    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
783 784 785
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
786
                        input_item_node_Delete( p_subitems );
Christophe Mutricy's avatar
Christophe Mutricy committed
787
                        return VLC_ENOMEM;
Rémi Duraffort's avatar
Rémi Duraffort committed
788
                    }
789 790 791 792

                    free( psz_ref );
                    psz_ref = psz_absolute;
                    free( psz_path );
793
                }
794
                msg_Dbg( p_demux, "adding ref = `%s'", psz_ref );
795 796 797 798
                input_item_t *p_item = input_item_New( psz_ref, NULL );
                input_item_CopyOptions( p_current, p_item );
                input_item_node_AppendItem( p_subitems, p_item );
                vlc_gc_decref( p_item );
799
            }
800
            else
801
            {
802
                msg_Err( p_demux, "unknown ref type=%4.4s FIXME (send a bug report)",
803
                         (char*)&BOXDATA(p_rdrf)->i_ref_type );
804
            }
805
            free( psz_ref );
806
        }
807
        input_item_node_PostAndDelete( p_subitems );
808 809
    }

810
    if( !(p_mvhd = MP4_BoxGet( p_sys->p_root, "/moov/mvhd" ) ) )
811
    {
812 813
        if( !p_rmra )
        {
Laurent Aimar's avatar
Laurent Aimar committed
814
            msg_Err( p_demux, "cannot find /moov/mvhd" );
815
            goto error;
816 817 818
        }
        else
        {
Laurent Aimar's avatar
Laurent Aimar committed
819 820
            msg_Warn( p_demux, "cannot find /moov/mvhd (pure ref file)" );
            p_demux->pf_demux = DemuxRef;
821
            return VLC_SUCCESS;
822
        }
823 824 825
    }
    else
    {
826
        p_sys->i_timescale = BOXDATA(p_mvhd)->i_timescale;
827 828 829 830 831
        if( p_sys->i_timescale == 0 )
        {
            msg_Err( p_this, "bad timescale" );
            goto error;
        }
832
    }
833

834 835
    const unsigned i_tracks = MP4_BoxCount( p_sys->p_root, "/moov/trak" );
    if( i_tracks < 1 )
836
    {
Laurent Aimar's avatar
Laurent Aimar committed
837
        msg_Err( p_demux, "cannot find any /moov/trak" );
838
        goto error;
839
    }
840
    msg_Dbg( p_demux, "found %u track%c", i_tracks, i_tracks ? 's':' ' );
841

842
    if( AllocateTracks( p_demux, i_tracks ) != VLC_SUCCESS )
843
        goto error;
844

845 846
    /* Search the first chap reference (like quicktime) and
     * check that at least 1 stream is enabled */
847
    p_sys->p_tref_chap = NULL;
848
    b_enabled_es = false;
849 850 851 852
    for( i = 0; i < p_sys->i_tracks; i++ )
    {
        MP4_Box_t *p_trak = MP4_BoxGet( p_sys->p_root, "/moov/trak[%d]", i );

853 854

        MP4_Box_t *p_tkhd = MP4_BoxGet( p_trak, "tkhd" );
855
        if( p_tkhd && BOXDATA(p_tkhd) && (BOXDATA(p_tkhd)->i_flags&MP4_TRACK_ENABLED) )
856 857 858
            b_enabled_es = true;

        MP4_Box_t *p_chap = MP4_BoxGet( p_trak, "tref/chap", i );
859 860
        if( p_chap && p_chap->data.p_tref_generic &&
            p_chap->data.p_tref_generic->i_entry_count > 0 && !p_sys->p_tref_chap )
861
            p_sys->p_tref_chap = p_chap;
862 863
    }

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

870
        if( p_sys->track[i].b_ok && !p_sys->track[i].b_chapter )
871
        {
Laurent Aimar's avatar
Laurent Aimar committed
872
            const char *psz_cat;
873
            switch( p_sys->track[i].fmt.i_cat )
874 875 876 877 878 879 880
            {
                case( VIDEO_ES ):
                    psz_cat = "video";
                    break;
                case( AUDIO_ES ):
                    psz_cat = "audio";
                    break;
881 882 883 884
                case( SPU_ES ):
                    psz_cat = "subtitle";
                    break;

885
                default:
886
                    psz_cat = "unknown";
887 888
                    break;
            }
889

Laurent Aimar's avatar
Laurent Aimar committed
890
            msg_Dbg( p_demux, "adding track[Id 0x%x] %s (%s) language %s",
891 892 893 894
                     p_sys->track[i].i_track_ID, psz_cat,
                     p_sys->track[i].b_enable ? "enable":"disable",
                     p_sys->track[i].fmt.psz_language ?
                     p_sys->track[i].fmt.psz_language : "undef" );
895
        }
896 897 898 899 900 901 902
        else if( p_sys->track[i].b_ok && p_sys->track[i].b_chapter )
        {
            msg_Dbg( p_demux, "using track[Id 0x%x] for chapter language %s",
                     p_sys->track[i].i_track_ID,
                     p_sys->track[i].fmt.psz_language ?
                     p_sys->track[i].fmt.psz_language : "undef" );
        }
903 904
        else
        {
905 906
            msg_Dbg( p_demux, "ignoring track[Id 0x%x]",
                     p_sys->track[i].i_track_ID );
907 908
        }
    }
909

910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926
    if ( p_sys->i_overall_duration == 0 )
    {
        /* Try in mehd if fragmented */
        MP4_Box_t *p_mehd = MP4_BoxGet( p_demux->p_sys->p_root, "moov/mvex/mehd");
        if ( p_mehd && p_mehd->data.p_mehd )
            p_sys->i_overall_duration = p_mehd->data.p_mehd->i_fragment_duration;
        else
        {
            for( i = 0; i < p_sys->i_tracks; i++ )
            {
                mtime_t i_duration = GetTrackDurationInFragment( &p_sys->moovfragment,
                                                                 p_sys->track[i].i_track_ID );
                p_sys->i_overall_duration = __MAX( p_sys->i_overall_duration, (uint64_t)i_duration );
            }
        }
    }

927 928
#ifdef MP4_VERBOSE
    mtime_t i_total_duration = 0;
929
    mp4_fragment_t *p_fragment = &p_sys->moovfragment;