mp4.c 170 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 <vlc_dialog.h>
37
#include <assert.h>
38
#include <limits.h>
39
#include "../codec/cc.h"
40

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

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

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

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

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

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

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

    mtime_t      i_pcr;

78 79 80
    uint64_t     i_moov_duration;
    uint64_t     i_duration;           /* Declared fragmented duration */
    uint64_t     i_cumulated_duration; /* Same as above, but not from probing */
81 82
    uint64_t     i_time;         /* time position of the presentation
                                  * in movie timescale */
83
    uint32_t     i_timescale;    /* movie time scale */
84 85
    unsigned int i_tracks;       /* number of tracks */
    mp4_track_t  *track;         /* array of track */
86
    float        f_fps;          /* number of frame per seconds */
87

88
    bool         b_fragmented;   /* fMP4 */
89 90
    bool         b_seekable;
    bool         b_fastseekable;
91
    bool         b_error;        /* unrecoverable */
92

93 94
    bool            b_index_probed;     /* mFra sync points index */
    bool            b_fragments_probed; /* moof segments index created */
95

96
    MP4_Box_t *p_moov;
97

98 99 100
    struct
    {
        uint32_t        i_current_box_type;
101
        MP4_Box_t      *p_fragment_atom;
102
        uint64_t        i_post_mdat_offset;
103
        uint32_t        i_lastseqnumber;
104 105
    } context;

106 107
    /* */
    MP4_Box_t    *p_tref_chap;
108 109 110

    /* */
    input_title_t *p_title;
111 112 113 114 115

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

    struct
    {
        int es_cat_filters;
    } hacks;
121 122

    mp4_fragments_index_t *p_fragsindex;
123 124
};

125
#define DEMUX_INCREMENT (CLOCK_FREQ / 4) /* How far the pcr will go, each round */
126 127
#define DEMUX_TRACK_MAX_PRELOAD (CLOCK_FREQ * 15) /* maximum preloading, to deal with interleaving */

128 129
#define VLC_DEMUXER_EOS (VLC_DEMUXER_EGENERIC - 1)

130
/*****************************************************************************
131
 * Declaration of local function
132
 *****************************************************************************/
133 134 135
static void MP4_TrackSetup( demux_t *, mp4_track_t *, MP4_Box_t  *, bool, bool );
static void MP4_TrackInit( mp4_track_t * );
static void MP4_TrackClean( es_out_t *, mp4_track_t * );
136

137 138
static void MP4_Block_Send( demux_t *, mp4_track_t *, block_t * );

139
static void MP4_TrackSelect  ( demux_t *, mp4_track_t *, bool );
Laurent Aimar's avatar
Laurent Aimar committed
140
static int  MP4_TrackSeek   ( demux_t *, mp4_track_t *, mtime_t );
141

Laurent Aimar's avatar
Laurent Aimar committed
142
static uint64_t MP4_TrackGetPos    ( mp4_track_t * );
143
static uint32_t MP4_TrackGetReadSize( mp4_track_t *, uint32_t * );
144
static int      MP4_TrackNextSample( demux_t *, mp4_track_t *, uint32_t );
Laurent Aimar's avatar
Laurent Aimar committed
145
static void     MP4_TrackSetELST( demux_t *, mp4_track_t *, int64_t );
Laurent Aimar's avatar
Laurent Aimar committed
146

147
static void     MP4_UpdateSeekpoint( demux_t *, int64_t );
148

149
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id );
150
static void MP4_GetDefaultSizeAndDuration( MP4_Box_t *p_moov,
151 152 153
                                           const MP4_Box_data_tfhd_t *p_tfhd_data,
                                           uint32_t *pi_default_size,
                                           uint32_t *pi_default_duration );
154

155 156
static stime_t GetMoovTrackDuration( demux_sys_t *p_sys, unsigned i_track_ID );

157
static int  ProbeFragments( demux_t *p_demux, bool b_force, bool *pb_fragmented );
158 159
static int  ProbeIndex( demux_t *p_demux );

160 161 162
static int FragCreateTrunIndex( demux_t *, MP4_Box_t *, MP4_Box_t *, stime_t, bool );

static int FragGetMoofBySidxIndex( demux_t *p_demux, mtime_t i_target_time,
163
                                   uint64_t *pi_moof_pos, mtime_t *pi_sampletime );
164
static int FragGetMoofByTfraIndex( demux_t *p_demux, const mtime_t i_target_time, unsigned i_track_ID,
165
                                   uint64_t *pi_moof_pos, mtime_t *pi_sampletime );
166
static void FragResetContext( demux_sys_t * );
167

168 169 170 171 172
/* 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 );

173 174 175 176
/* 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 );

177 178
/* Helpers */

179 180 181 182 183 184 185 186 187 188 189 190 191 192
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;
}

193 194
static uint32_t stream_ReadU32( stream_t *s, void *p_read, uint32_t i_toread )
{
195
    ssize_t i_return = 0;
196 197
    if ( i_toread > INT32_MAX )
    {
198
        i_return = vlc_stream_Read( s, p_read, (size_t) INT32_MAX );
199 200 201 202 203
        if ( i_return < INT32_MAX )
            return i_return;
        else
            i_toread -= INT32_MAX;
    }
204
    i_return += vlc_stream_Read( s, (uint8_t *)p_read + i_return, (size_t) i_toread );
205 206 207
    return i_return;
}

208 209
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id )
{
210 211
    if(!p_moov)
        return NULL;
212 213 214
    MP4_Box_t *p_trex = MP4_BoxGet( p_moov, "mvex/trex" );
    while( p_trex )
    {
215 216
        if ( p_trex->i_type == ATOM_trex &&
             BOXDATA(p_trex) && BOXDATA(p_trex)->i_track_ID == i_id )
217 218 219 220 221 222 223
                break;
        else
            p_trex = p_trex->p_next;
    }
    return p_trex;
}

224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240
/**
 * Return the track identified by tid
 */
static mp4_track_t *MP4_GetTrackByTrackID( demux_t *p_demux, const uint32_t tid )
{
    demux_sys_t *p_sys = p_demux->p_sys;

    mp4_track_t *ret = NULL;
    for( unsigned i = 0; i < p_sys->i_tracks; i++ )
    {
        ret = &p_sys->track[i];
        if( ret->i_track_ID == tid )
            return ret;
    }
    return NULL;
}

241 242 243 244 245 246 247
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 &&
248
            (p_tkhd = MP4_BoxGet( p_trak, "tkhd" )) && BOXDATA(p_tkhd) &&
249 250 251 252 253 254 255 256
            BOXDATA(p_tkhd)->i_track_ID == i_id )
                break;
        else
            p_trak = p_trak->p_next;
    }
    return p_trak;
}

257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272
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;
}

273 274 275 276 277 278 279 280 281 282
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;
}

283
/* Return time in microsecond of a track */
Laurent Aimar's avatar
Laurent Aimar committed
284
static inline int64_t MP4_TrackGetDTS( demux_t *p_demux, mp4_track_t *p_track )
Laurent Aimar's avatar
Laurent Aimar committed
285
{
286
    demux_sys_t *p_sys = p_demux->p_sys;
287
    const mp4_chunk_t *p_chunk = &p_track->chunk[p_track->i_chunk];
288 289

    unsigned int i_index = 0;
290 291
    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
292

293
    while( i_sample > 0 && i_index < p_chunk->i_entries_dts )
Laurent Aimar's avatar
Laurent Aimar committed
294
    {
295
        if( i_sample > p_chunk->p_sample_count_dts[i_index] )
Laurent Aimar's avatar
Laurent Aimar committed
296
        {
297 298 299
            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
300 301 302 303
            i_index++;
        }
        else
        {
304
            i_dts += i_sample * p_chunk->p_sample_delta_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
305 306 307 308
            break;
        }
    }

309 310 311
    /* now handle elst */
    if( p_track->p_elst )
    {
312
        MP4_Box_data_elst_t *elst = p_track->BOXDATA(p_elst);
313 314 315 316 317 318 319 320 321 322

        /* 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 */
323
        i_dts += MP4_rescale( p_track->i_elst_time, p_sys->i_timescale, p_track->i_timescale );
324 325 326 327

        if( i_dts < 0 ) i_dts = 0;
    }

328
    return MP4_rescale( i_dts, p_track->i_timescale, CLOCK_FREQ );
Laurent Aimar's avatar
Laurent Aimar committed
329
}
330

331 332
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
333
{
334
    VLC_UNUSED( p_demux );
335
    mp4_chunk_t *ck = &p_track->chunk[p_track->i_chunk];
336

Laurent Aimar's avatar
Laurent Aimar committed
337 338 339 340
    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 )
341
        return false;
Laurent Aimar's avatar
Laurent Aimar committed
342

343
    for( i_index = 0; i_index < ck->i_entries_pts ; i_index++ )
Laurent Aimar's avatar
Laurent Aimar committed
344 345
    {
        if( i_sample < ck->p_sample_count_pts[i_index] )
346
        {
347 348
            *pi_delta = MP4_rescale( ck->p_sample_offset_pts[i_index],
                                     p_track->i_timescale, CLOCK_FREQ );
349 350
            return true;
        }
Laurent Aimar's avatar
Laurent Aimar committed
351 352 353

        i_sample -= ck->p_sample_count_pts[i_index];
    }
354
    return false;
Laurent Aimar's avatar
Laurent Aimar committed
355 356
}

Laurent Aimar's avatar
Laurent Aimar committed
357 358
static inline int64_t MP4_GetMoviePTS(demux_sys_t *p_sys )
{
359
    return MP4_rescale( p_sys->i_time, p_sys->i_timescale, CLOCK_FREQ );
Laurent Aimar's avatar
Laurent Aimar committed
360
}
361

362 363
static void LoadChapter( demux_t  *p_demux );

364
static int LoadInitFrag( demux_t *p_demux )
365 366 367
{
    demux_sys_t *p_sys = p_demux->p_sys;

368 369
    /* Load all boxes ( except raw data ) */
    if( ( p_sys->p_root = MP4_BoxGetRoot( p_demux->s ) ) == NULL )
370
    {
371
        goto LoadInitFragError;
372
    }
373

374 375 376 377 378 379 380
    return VLC_SUCCESS;

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

381
static int CreateTracks( demux_t *p_demux, unsigned i_tracks )
382 383 384
{
    demux_sys_t *p_sys = p_demux->p_sys;

385 386 387 388
    if( SIZE_MAX / i_tracks < sizeof(mp4_track_t) )
        return VLC_EGENERIC;

    p_sys->track = malloc( i_tracks * sizeof(mp4_track_t)  );
389
    if( p_sys->track == NULL )
390 391
        return VLC_ENOMEM;
    p_sys->i_tracks = i_tracks;
392

393 394 395
    for( unsigned i=0; i<i_tracks; i++ )
        MP4_TrackInit( &p_sys->track[i] );

396 397 398
    return VLC_SUCCESS;
}

399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430
static block_t * MP4_WebVTT_Convert( demux_t *p_demux, block_t * p_block )
{
    stream_t *p_stream =
            vlc_stream_MemoryNew( p_demux, p_block->p_buffer,
                                  p_block->i_buffer, true );
    if( p_stream )
    {
        MP4_Box_t *p_vroot = MP4_BoxNew(ATOM_wvtt);
        if( p_vroot )
        {
            p_vroot->i_size = p_block->i_buffer;
            if ( MP4_ReadBoxContainerChildren( p_stream, p_vroot, NULL ) == 1 )
            {
                MP4_Box_t *p_payl = MP4_BoxGet( p_vroot, "vttc/payl" );
                if( p_payl && p_payl->i_size >= 9 )
                {
                    p_block->p_buffer += p_payl->i_pos + 8;
                    p_block->i_buffer = p_payl->i_size - 8;
                    p_block->p_buffer[p_block->i_buffer - 1] = '\0';
                }
                else p_block->i_buffer = 0;
#ifndef NDEBUG
                MP4_BoxDumpStructure(p_stream, p_vroot);
#endif
            }
            MP4_BoxFree(p_vroot);
        }
        vlc_stream_Delete( p_stream );
     }
    return p_block;
}

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

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

465
    /* cdt2 is optional */
466 467
    if ( i_remaining >= 10 &&
         (i_bytes = GetDWBE(p_read)) &&
468
         (i_bytes <= i_remaining) &&
469 470 471 472 473 474 475
         !memcmp("cdt2", &p_read[4], 4) )
    {
        p_read += 8;
        i_bytes -= 8;
        i_remaining -= 8;
        do
        {
476
            p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
477 478 479 480 481 482 483
            p_write[i_copied++] = p_read[0];
            p_write[i_copied++] = p_read[1];
            p_read += 2;
            i_bytes -= 2;
        } while( i_bytes >= 2 );
    }

484
    p_newblock->i_pts = p_block->i_dts;
485
    p_newblock->i_buffer = i_copied;
486 487 488
    p_newblock->i_flags = BLOCK_FLAG_TYPE_P;
    block_Release( p_block );

489 490 491
    return p_newblock;
}

492 493 494 495 496 497 498
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;
}

499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537
/* 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;
        }

538 539 540 541 542
        /* 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;

543 544
        if( tk != nexttk )
        {
545
            i_duration = MP4_rescale( i_duration, tk->i_timescale, CLOCK_FREQ );
546 547 548 549 550 551
            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;
552 553 554

            if( nexttk && nexttk->i_chunk > 0 ) /* new run number */
                nexttk->chunk[nexttk->i_chunk].i_virtual_run_number++;
555 556 557 558 559 560 561 562 563 564
        }

        tk = nexttk;
    }

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

565
static block_t * MP4_Block_Convert( demux_t *p_demux, const mp4_track_t *p_track, block_t *p_block )
566 567 568 569 570 571
{
    /* 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
572
            case VLC_CODEC_TTML:
573 574 575 576
            case VLC_CODEC_TX3G:
            case VLC_CODEC_SPU:
            /* accept as-is */
            break;
577 578 579
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
580 581 582 583
            case VLC_CODEC_SUBT:
                if( p_track->fmt.i_original_fourcc == ATOM_wvtt )
                    p_block = MP4_WebVTT_Convert( p_demux, p_block );
            break;
584 585 586 587 588
        default:
            p_block->i_buffer = 0;
            break;
        }
    }
589 590 591 592
    else if( p_track->fmt.i_original_fourcc == ATOM_rrtp )
    {
        p_block = MP4_RTPHint_Convert( p_demux, p_block, p_track->fmt.i_codec );
    }
593 594 595 596

    return p_block;
}

597 598
static void MP4_Block_Send( demux_t *p_demux, mp4_track_t *p_track, block_t *p_block )
{
599 600 601 602
    p_block = MP4_Block_Convert( p_demux, p_track, p_block );
    if( p_block == NULL )
        return;

603
    if ( p_track->b_chans_reorder )
604 605 606 607 608 609
    {
        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 );
    }
610

611
    p_block->i_flags |= p_track->i_block_flags;
612 613 614 615 616
    if( p_track->i_next_block_flags )
    {
        p_block->i_flags |= p_track->i_next_block_flags;
        p_track->i_next_block_flags = 0;
    }
617

618 619 620 621 622
    /* ASF packets in mov */
    if( p_track->p_asf )
    {
        /* Fake a new stream from MP4 block */
        stream_t *p_stream = p_demux->s;
623
        p_demux->s = vlc_stream_MemoryNew( p_demux, p_block->p_buffer, p_block->i_buffer, true );
624 625 626 627 628 629
        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 );
630
            vlc_stream_Delete(p_demux->s);
631 632 633 634 635 636
        }
        block_Release(p_block);
        p_demux->s = p_stream;
    }
    else
        es_out_Send( p_demux->out, p_track->p_es, p_block );
637 638
}

639
/*****************************************************************************
640
 * Open: check file and initializes MP4 structures
641
 *****************************************************************************/
642
static int Open( vlc_object_t * p_this )
643
{
Laurent Aimar's avatar
Laurent Aimar committed
644
    demux_t  *p_demux = (demux_t *)p_this;
645
    demux_sys_t     *p_sys;
646

Christophe Mutricy's avatar
Christophe Mutricy committed
647
    const uint8_t   *p_peek;
648

649
    MP4_Box_t       *p_ftyp;
650
    MP4_Box_t       *p_rmra;
651
    MP4_Box_t       *p_trak;
652 653
    const MP4_Box_t *p_mvhd = NULL;
    const MP4_Box_t *p_mvex = NULL;
654

655
    unsigned int    i;
656
    bool      b_enabled_es;
657

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

661
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
662
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
663 664 665 666 667 668 669 670
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
671
        case ATOM_uuid:
672
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
673
            break;
674 675 676 677 678
        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;
679
         default:
680
            return VLC_EGENERIC;
681
    }
682

683 684 685 686 687
    /* create our structure that will contains all data */
    p_sys = calloc( 1, sizeof( demux_sys_t ) );
    if ( !p_sys )
        return VLC_EGENERIC;

688
    /* I need to seek */
689
    vlc_stream_Control( p_demux->s, STREAM_CAN_SEEK, &p_sys->b_seekable );
690 691
    if( p_sys->b_seekable )
        vlc_stream_Control( p_demux->s, STREAM_CAN_FASTSEEK, &p_sys->b_fastseekable );
692

693
    /*Set exported functions */
Laurent Aimar's avatar
Laurent Aimar committed
694 695
    p_demux->pf_demux = Demux;
    p_demux->pf_control = Control;
696

697
    p_sys->context.i_lastseqnumber = UINT32_MAX;
698

699
    p_demux->p_sys = p_sys;
700

701
    if( LoadInitFrag( p_demux ) != VLC_SUCCESS )
702 703
        goto error;

704
    MP4_BoxDumpStructure( p_demux->s, p_sys->p_root );
705

706
    if( ( p_ftyp = MP4_BoxGet( p_sys->p_root, "/ftyp" ) ) )
707
    {
708
        switch( BOXDATA(p_ftyp)->i_major_brand )
709
        {
710
            case MAJOR_isom:
Laurent Aimar's avatar
Laurent Aimar committed
711
                msg_Dbg( p_demux,
François Cartegnie's avatar
François Cartegnie committed
712
                         "ISO Media (isom) version %d.",
713
                         BOXDATA(p_ftyp)->i_minor_version );
714
                break;
715 716 717 718
            case MAJOR_3gp4:
            case MAJOR_3gp5:
            case MAJOR_3gp6:
            case MAJOR_3gp7:
719 720
                msg_Dbg( p_demux, "3GPP Media Release: %4.4s",
                         (char *)&BOXDATA(p_ftyp)->i_major_brand );
721
                break;
722
            case MAJOR_qt__:
François Cartegnie's avatar
François Cartegnie committed
723
                msg_Dbg( p_demux, "Apple QuickTime media" );
724
                break;
725
            case MAJOR_isml:
François Cartegnie's avatar
François Cartegnie committed
726
                msg_Dbg( p_demux, "PIFF (= isml = fMP4) media" );
727
                break;
728
            case MAJOR_dash:
François Cartegnie's avatar
François Cartegnie committed
729
                msg_Dbg( p_demux, "DASH Stream" );
730
                break;
731 732 733 734 735
            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;
736
            default:
Laurent Aimar's avatar
Laurent Aimar committed
737
                msg_Dbg( p_demux,
François Cartegnie's avatar
François Cartegnie committed
738
                         "unrecognized major media specification (%4.4s).",
739
                          (char*)&BOXDATA(p_ftyp)->i_major_brand );
740 741
                break;
        }
742 743 744 745 746
        /* 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
747
                msg_Dbg( p_demux, "DASH Stream" );
748
            }
749 750 751 752
            else if (BOXDATA(p_ftyp)->i_compatible_brands[i] == VLC_FOURCC('s', 'm', 'o', 'o') )
            {
                msg_Dbg( p_demux, "Handling VLC Smooth Stream" );
            }
753
        }
754 755 756
    }
    else
    {
François Cartegnie's avatar
François Cartegnie committed
757
        msg_Dbg( p_demux, "file type box missing (assuming ISO Media)" );
758 759
    }

760 761 762
    /* the file need to have one moov box */
    p_sys->p_moov = MP4_BoxGet( p_sys->p_root, "/moov" );
    if( unlikely(!p_sys->p_moov) )
763
    {
764 765 766 767 768 769 770 771
        p_sys->p_moov = MP4_BoxGet( p_sys->p_root, "/foov" );
        if( !p_sys->p_moov )
        {
            msg_Err( p_demux, "MP4 plugin discarded (no moov,foov,moof box)" );
            goto error;
        }
        /* we have a free box as a moov, rename it */
        p_sys->p_moov->i_type = ATOM_moov;
772 773
    }

774
    p_mvhd = MP4_BoxGet( p_sys->p_moov, "mvhd" );
775
    if( p_mvhd && BOXDATA(p_mvhd) && BOXDATA(p_mvhd)->i_timescale )
776 777 778 779 780 781 782 783
    {
        p_sys->i_timescale = BOXDATA(p_mvhd)->i_timescale;
        p_sys->i_moov_duration = p_sys->i_duration = BOXDATA(p_mvhd)->i_duration;
        p_sys->i_cumulated_duration = BOXDATA(p_mvhd)->i_duration;
    }
    else
    {
        msg_Warn( p_demux, "No valid mvhd found" );
784
        goto error;
785 786
    }

787
    if( ( p_rmra = MP4_BoxGet( p_sys->p_root,  "/moov/rmra" ) ) )
788 789 790 791
    {
        int        i_count = MP4_BoxCount( p_rmra, "rmda" );
        int        i;

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

794
        input_thread_t *p_input = p_demux->p_input;
795
        input_item_t *p_current = input_GetItem( p_input );
796

797 798
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

799
        for( i = 0; i < i_count; i++ )
800
        {
801 802 803
            MP4_Box_t *p_rdrf = MP4_BoxGet( p_rmra, "rmda[%d]/rdrf", i );
            char      *psz_ref;
            uint32_t  i_ref_type;
804

805
            if( !p_rdrf || !BOXDATA(p_rdrf) || !( psz_ref = strdup( BOXDATA(p_rdrf)->psz_ref ) ) )
806
            {
807 808
                continue;
            }
809
            i_ref_type = BOXDATA(p_rdrf)->i_ref_type;
810

811 812 813 814 815 816
            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" ) )
817
                {
818
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
819
                    free( psz_ref );
820 821
                    continue;
                }
822 823
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
824
                {
825
                    ;
826 827 828
                }
                else
                {
829
                    char *psz_absolute;
830
                    char *psz_path = strdup( p_demux->psz_location );
831 832 833 834
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
835 836
                    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
837 838 839
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
840
                        input_item_node_Delete( p_subitems );
Christophe Mutricy's avatar
Christophe Mutricy committed
841
                        return VLC_ENOMEM;
Rémi Duraffort's avatar
Rémi Duraffort committed
842
                    }
843 844 845 846

                    free( psz_ref );
                    psz_ref = psz_absolute;
                    free( psz_path );
847
                }
848
                msg_Dbg( p_demux, "adding ref = `%s'", psz_ref );
849
                input_item_t *p_item = input_item_New( psz_ref, NULL );
850
                input_item_CopyOptions( p_item, p_current );
851
                input_item_node_AppendItem( p_subitems, p_item );
852
                input_item_Release( p_item );
853
            }
854
            else
855
            {
856
                msg_Err( p_demux, "unknown ref type=%4.4s FIXME (send a bug report)",
857
                         (char*)&BOXDATA(p_rdrf)->i_ref_type );
858
            }
859
            free( psz_ref );
860
        }
861
        input_item_node_PostAndDelete( p_subitems );
862 863
    }

864
    if( !(p_mvhd = MP4_BoxGet( p_sys->p_root, "/moov/mvhd" ) ) )
865
    {
866 867
        if( !p_rmra )
        {
Laurent Aimar's avatar
Laurent Aimar committed
868
            msg_Err( p_demux, "cannot find /moov/mvhd" );
869
            goto error;
870 871 872
        }
        else
        {
Laurent Aimar's avatar
Laurent Aimar committed
873 874
            msg_Warn( p_demux, "cannot find /moov/mvhd (pure ref file)" );
            p_demux->pf_demux = DemuxRef;
875
            return VLC_SUCCESS;
876
        }
877 878 879
    }
    else
    {
880
        p_sys->i_timescale = BOXDATA(p_mvhd)->i_timescale;
881 882 883 884 885
        if( p_sys->i_timescale == 0 )
        {
            msg_Err( p_this, "bad timescale" );
            goto error;
        }
886
    }
887

888 889
    const unsigned i_tracks = MP4_BoxCount( p_sys->p_root, "/moov/trak" );
    if( i_tracks < 1 )
890
    {
Laurent Aimar's avatar
Laurent Aimar committed
891
        msg_Err( p_demux, "cannot find any /moov/trak" );
892
        goto error;
893
    }
894
    msg_Dbg( p_demux, "found %u track%c", i_tracks, i_tracks ? 's':' ' );
895

896