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
static block_t * MP4_Block_Read( demux_t *, const mp4_track_t *, int );
131 132
static void MP4_Block_Send( demux_t *, mp4_track_t *, block_t * );

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

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

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

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

145
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id );
146 147 148 149
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 );
150

151
static bool AddFragment( demux_t *p_demux, MP4_Box_t *p_moox );
152
static int  ProbeFragments( demux_t *p_demux, bool b_force );
153 154 155 156 157 158 159
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 );
160

161 162 163 164 165
/* 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 );

166 167 168 169
/* 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 );

170 171
/* Helpers */

172 173 174 175 176 177 178 179 180 181 182 183 184 185
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;
}

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

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 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248
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;
}

249 250 251 252 253 254 255 256 257 258
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;
}

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

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

    unsigned int i_index = 0;
269 270
    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
271

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

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

        /* 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 */
302
        i_dts += MP4_rescale( p_track->i_elst_time, p_sys->i_timescale, p_track->i_timescale );
303 304 305 306

        if( i_dts < 0 ) i_dts = 0;
    }

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

310 311
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
312
{
313
    VLC_UNUSED( p_demux );
314
    mp4_chunk_t *ck;
315 316
    ck = ( p_track->cchunk ) ? p_track->cchunk /* DemuxFrg */
                             : &p_track->chunk[p_track->i_chunk];
317

Laurent Aimar's avatar
Laurent Aimar committed
318 319 320 321
    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 )
322
        return false;
Laurent Aimar's avatar
Laurent Aimar committed
323

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

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

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

343 344
static void LoadChapter( demux_t  *p_demux );

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

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

355 356 357 358 359 360 361
    return VLC_SUCCESS;

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

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

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

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

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

392
    /* always need at least 10 bytes (atom size+header+1pair)*/
393 394
    if ( i_remaining < 10 ||
         !(i_bytes = GetDWBE(p_block->p_buffer)) ||
395
         (i_bytes > i_remaining) ||
396 397 398 399 400 401 402 403 404 405 406 407 408 409
         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
    {
410
        p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
411 412 413 414 415 416 417
        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 );

418
    /* cdt2 is optional */
419 420
    if ( i_remaining >= 10 &&
         (i_bytes = GetDWBE(p_read)) &&
421
         (i_bytes <= i_remaining) &&
422 423 424 425 426 427 428
         !memcmp("cdt2", &p_read[4], 4) )
    {
        p_read += 8;
        i_bytes -= 8;
        i_remaining -= 8;
        do
        {
429
            p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
430 431 432 433 434 435 436 437 438
            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;
439
    p_newblock->i_flags = BLOCK_FLAG_ORDERED_CAPTIONS;
440 441 442
    return p_newblock;
}

443 444 445 446 447 448 449
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;
}

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 488
/* 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;
        }

489 490 491 492 493
        /* 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;

494 495
        if( tk != nexttk )
        {
496
            i_duration = MP4_rescale( i_duration, tk->i_timescale, CLOCK_FREQ );
497 498 499 500 501 502
            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;
503 504 505

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

        tk = nexttk;
    }

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

516 517
static block_t * MP4_Block_Read( demux_t *p_demux, const mp4_track_t *p_track, int i_size )
{
518
    block_t *p_block = vlc_stream_Block( p_demux->s, i_size );
519 520 521 522 523 524 525 526 527 528 529 530
    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;
531 532 533
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
534 535 536 537 538
        default:
            p_block->i_buffer = 0;
            break;
        }
    }
539 540 541 542
    else if( p_track->fmt.i_original_fourcc == ATOM_rrtp )
    {
        p_block = MP4_RTPHint_Convert( p_demux, p_block, p_track->fmt.i_codec );
    }
543 544 545 546

    return p_block;
}

547 548
static void MP4_Block_Send( demux_t *p_demux, mp4_track_t *p_track, block_t *p_block )
{
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 643
    p_sys->context.i_lastseqnumber = 1;

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;
875

876 877
    /* Search t