mp4.c 186 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 80 81
    uint64_t     i_moov_duration;
    uint64_t     i_duration;           /* Declared fragmented duration */
    uint64_t     i_cumulated_duration; /* Same as above, but not from probing */
82 83
    uint64_t     i_time;         /* time position of the presentation
                                  * in movie timescale */
84
    uint32_t     i_timescale;    /* movie time scale */
85 86
    unsigned int i_tracks;       /* number of tracks */
    mp4_track_t  *track;         /* array of track */
87
    float        f_fps;          /* number of frame per seconds */
88

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

93
    bool            b_index_probed;
94
    bool            b_fragments_probed;
95 96

    mp4_fragments_t fragments;
97

98 99 100 101 102
    struct
    {
        mp4_fragment_t *p_fragment;
        uint32_t        i_current_box_type;
        uint32_t        i_mdatbytesleft;
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
};

123 124 125
#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 */

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

132 133
static void MP4_Block_Send( demux_t *, mp4_track_t *, block_t * );

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

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

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

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

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

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

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

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

171 172
/* Helpers */

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

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

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

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

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

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

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

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

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

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

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

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

        if( i_dts < 0 ) i_dts = 0;
    }

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

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

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

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

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

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

344 345
static void LoadChapter( demux_t  *p_demux );

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

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

356 357 358 359 360 361 362
    return VLC_SUCCESS;

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

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

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

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

385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416
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;
}

417 418 419 420
static block_t * MP4_EIA608_Convert( block_t * p_block )
{
    /* Rebuild codec data from encap */
    size_t i_copied = 0;
421
    size_t i_remaining = __MIN(p_block->i_buffer, INT64_MAX / 3);
422 423 424
    uint32_t i_bytes = 0;
    block_t *p_newblock;

425
    /* always need at least 10 bytes (atom size+header+1pair)*/
426 427
    if ( i_remaining < 10 ||
         !(i_bytes = GetDWBE(p_block->p_buffer)) ||
428
         (i_bytes > i_remaining) ||
429 430 431 432 433 434 435 436 437 438 439 440 441 442
         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
    {
443
        p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
444 445 446 447 448 449 450
        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 );

451
    /* cdt2 is optional */
452 453
    if ( i_remaining >= 10 &&
         (i_bytes = GetDWBE(p_read)) &&
454
         (i_bytes <= i_remaining) &&
455 456 457 458 459 460 461
         !memcmp("cdt2", &p_read[4], 4) )
    {
        p_read += 8;
        i_bytes -= 8;
        i_remaining -= 8;
        do
        {
462
            p_write[i_copied++] = CC_PKT_BYTE0(0); /* cc1 == field 0 */
463 464 465 466 467 468 469 470 471
            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;
472
    p_newblock->i_flags = BLOCK_FLAG_ORDERED_CAPTIONS;
473 474 475
    return p_newblock;
}

476 477 478 479 480 481 482
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;
}

483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521
/* 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;
        }

522 523 524 525 526
        /* 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;

527 528
        if( tk != nexttk )
        {
529
            i_duration = MP4_rescale( i_duration, tk->i_timescale, CLOCK_FREQ );
530 531 532 533 534 535
            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;
536 537 538

            if( nexttk && nexttk->i_chunk > 0 ) /* new run number */
                nexttk->chunk[nexttk->i_chunk].i_virtual_run_number++;
539 540 541 542 543 544 545 546 547 548
        }

        tk = nexttk;
    }

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

549
static block_t * MP4_Block_Convert( demux_t *p_demux, const mp4_track_t *p_track, block_t *p_block )
550 551 552 553 554 555
{
    /* 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
556
            case VLC_CODEC_TTML:
557 558 559 560
            case VLC_CODEC_TX3G:
            case VLC_CODEC_SPU:
            /* accept as-is */
            break;
561 562 563
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
564 565 566 567
            case VLC_CODEC_SUBT:
                if( p_track->fmt.i_original_fourcc == ATOM_wvtt )
                    p_block = MP4_WebVTT_Convert( p_demux, p_block );
            break;
568 569 570 571 572
        default:
            p_block->i_buffer = 0;
            break;
        }
    }
573 574 575 576
    else if( p_track->fmt.i_original_fourcc == ATOM_rrtp )
    {
        p_block = MP4_RTPHint_Convert( p_demux, p_block, p_track->fmt.i_codec );
    }
577 578 579 580

    return p_block;
}

581 582
static void MP4_Block_Send( demux_t *p_demux, mp4_track_t *p_track, block_t *p_block )
{
583 584 585 586
    p_block = MP4_Block_Convert( p_demux, p_track, p_block );
    if( p_block == NULL )
        return;

587
    if ( p_track->b_chans_reorder )
588 589 590 591 592 593
    {
        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 );
    }
594

595
    p_block->i_flags |= p_track->i_block_flags;
596 597 598 599 600
    if( p_track->i_next_block_flags )
    {
        p_block->i_flags |= p_track->i_next_block_flags;
        p_track->i_next_block_flags = 0;
    }
601

602 603 604 605 606
    /* ASF packets in mov */
    if( p_track->p_asf )
    {
        /* Fake a new stream from MP4 block */
        stream_t *p_stream = p_demux->s;
607
        p_demux->s = vlc_stream_MemoryNew( p_demux, p_block->p_buffer, p_block->i_buffer, true );
608 609 610 611 612 613
        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 );
614
            vlc_stream_Delete(p_demux->s);
615 616 617 618 619 620
        }
        block_Release(p_block);
        p_demux->s = p_stream;
    }
    else
        es_out_Send( p_demux->out, p_track->p_es, p_block );
621 622
}

623
/*****************************************************************************
624
 * Open: check file and initializes MP4 structures
625
 *****************************************************************************/
626
static int Open( vlc_object_t * p_this )
627
{
Laurent Aimar's avatar
Laurent Aimar committed
628
    demux_t  *p_demux = (demux_t *)p_this;
629
    demux_sys_t     *p_sys;
630

Christophe Mutricy's avatar
Christophe Mutricy committed
631
    const uint8_t   *p_peek;
632

633
    MP4_Box_t       *p_ftyp;
634
    MP4_Box_t       *p_moov;
635
    MP4_Box_t       *p_rmra;
636
    MP4_Box_t       *p_trak;
637 638
    const MP4_Box_t *p_mvhd = NULL;
    const MP4_Box_t *p_mvex = NULL;
639

640
    unsigned int    i;
641
    bool      b_enabled_es;
642

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

646
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
647
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
648 649 650 651 652 653 654 655
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
656
        case ATOM_uuid:
657
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
658
            break;
659 660 661 662 663
        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;
664
         default:
665
            return VLC_EGENERIC;
666
    }
667

668 669 670 671 672
    /* create our structure that will contains all data */
    p_sys = calloc( 1, sizeof( demux_sys_t ) );
    if ( !p_sys )
        return VLC_EGENERIC;

673
    /* I need to seek */
674 675 676
    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 );
677

678
    /*Set exported functions */
Laurent Aimar's avatar
Laurent Aimar committed
679 680
    p_demux->pf_demux = Demux;
    p_demux->pf_control = Control;
681

682
    p_sys->context.i_lastseqnumber = UINT32_MAX;
683

684 685
    MP4_Fragments_Init( &p_sys->fragments );

686
    p_demux->p_sys = p_sys;
687

688
    if( LoadInitFrag( p_demux ) != VLC_SUCCESS )
689 690
        goto error;

691

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

746 747
    p_moov = MP4_BoxGet( p_sys->p_root, "/moov" );
    if( likely(p_moov) )
748
    {
749 750 751 752 753 754 755 756 757 758
        p_mvhd = MP4_BoxGet( p_moov, "mvhd" );
        if( p_mvhd && BOXDATA(p_mvhd) )
            p_sys->i_moov_duration = p_sys->i_duration = BOXDATA(p_mvhd)->i_duration;
        p_mvex = MP4_BoxGet( p_moov, "mvex" );
    }

    if( p_mvex != NULL )
    {
        const MP4_Box_t *p_mehd = MP4_BoxGet( p_mvex, "mehd");
        if ( p_mehd && BOXDATA(p_mehd) )
759
        {
760 761 762 763 764 765
            if( BOXDATA(p_mehd)->i_fragment_duration > p_sys->i_duration )
            {
                p_sys->b_fragmented = true;
                p_sys->i_duration = BOXDATA(p_mehd)->i_fragment_duration;
            }
        }
766

767 768 769 770 771 772 773 774 775
        if ( p_sys->b_seekable )
        {
            if( !p_sys->b_fragmented /* as unknown */ )
            {
                /* Probe remaining to check if there's really fragments
                   or if that file is just ready to append fragments */
                ProbeFragments( p_demux, (p_sys->i_duration == 0), &p_sys->b_fragmented );
                p_sys->b_fragmented = !! MP4_BoxGet( p_sys->p_root, "/moof" );
            }
776

777 778
            if( vlc_stream_Seek( p_demux->s, p_moov->i_pos ) != VLC_SUCCESS )
                goto error;
779
        }
780 781 782 783
        else /* Handle as fragmented by default as we can't see moof */
        {
            p_sys->context.p_fragment = &p_sys->fragments.moov;
            p_sys->context.i_current_box_type = ATOM_moov;
784
            p_sys->b_fragmented = true;
785
        }
786 787
    }

788
    if ( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
789 790
        AddFragment( p_demux, MP4_BoxGet( p_sys->p_root, "/moov" ) );

791
    if ( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
792 793
        goto error;

794 795
    MP4_BoxDumpStructure( p_demux->s, p_sys->p_root );

796
    if( p_sys->b_fragmented )
797 798
    {
        p_demux->pf_demux = DemuxAsLeaf;
799 800 801 802 803 804 805
        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;
806 807
    }

808
    /* the file need to have one moov box */
809 810
    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 )
811
    {
812
        MP4_Box_t *p_foov = MP4_BoxGet( p_sys->p_root, "/foov" );
813 814 815

        if( !p_foov )
        {
816 817
            msg_Err( p_demux, "MP4 plugin discarded (no moov,foov,moof box)" );
            goto error;
818 819
        }
        /* we have a free box as a moov, rename it */
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
820
        p_foov->i_type = ATOM_moov;
821
        MP4_Fragment_Moov(&p_sys->fragments)->p_moox = p_foov;
822 823
    }

824
    if( ( p_rmra = MP4_BoxGet( p_sys->p_root,  "/moov/rmra" ) ) )
825 826 827 828
    {
        int        i_count = MP4_BoxCount( p_rmra, "rmda" );
        int        i;

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

831
        input_thread_t *p_input = p_demux->p_input;
832
        input_item_t *p_current = input_GetItem( p_input );
833

834 835
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

836
        for( i = 0; i < i_count; i++ )
837
        {
838 839 840
            MP4_Box_t *p_rdrf = MP4_BoxGet( p_rmra, "rmda[%d]/rdrf", i );
            char      *psz_ref;
            uint32_t  i_ref_type;
841

842
            if( !p_rdrf || !BOXDATA(p_rdrf) || !( psz_ref = strdup( BOXDATA(p_rdrf)->psz_ref ) ) )
843
            {
844 845
                continue;
            }
846
            i_ref_type = BOXDATA(p_rdrf)->i_ref_type;
847

848 849 850 851 852 853
            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" ) )
854
                {
855
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
856
                    free( psz_ref );
857 858
                    continue;
                }
859 860
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
861
                {
862
                    ;
863 864 865
                }
                else
                {
866
                    char *psz_absolute;
867
                    char *psz_path = strdup( p_demux->psz_location );
868 869 870 871
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
872 873
                    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
874 875 876
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
877
                        input_item_node_Delete( p_subitems );
Christophe Mutricy's avatar
Christophe Mutricy committed
878
                        return VLC_ENOMEM;
Rémi Duraffort's avatar
Rémi Duraffort committed
879
                    }
880 881 882 883

                    free( psz_ref );
                    psz_ref = psz_absolute;
                    free( psz_path );
884
                }
885
                msg_Dbg( p_demux, "adding ref = `%s'", psz_ref );
886
                input_item_t *p_item = input_item_New( psz_ref, NULL );
887
                input_item_CopyOptions( p_item, p_current );
888 889
                input_item_node_AppendItem( p_subitems, p_item );
                vlc_gc_decref( p_item );
890
            }
891
            else
892
            {
893
                msg_Err( p_demux, "unknown ref type=%4.4s FIXME (send a bug report)",
894
                         (char*)&BOXDATA(p_rdrf)->i_ref_type );
895
            }
896
            free( psz_ref );
897
        }
898
        input_item_node_PostAndDelete( p_subitems );
899 900
    }

901
    if( !(p_mvhd = MP4_BoxGet( p_sys->p_root, "/moov/mvhd" ) ) )
902
    {