mp4.c 138 KB
Newer Older
1 2 3
/*****************************************************************************
 * mp4.c : MP4 file input module for vlc
 *****************************************************************************
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
4
 * Copyright (C) 2001-2004, 2010 VLC authors and VideoLAN
5
 *
6
 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
7
 *
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
8 9 10
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation; either version 2.1 of the License, or
11
 * (at your option) any later version.
12
 *
13 14
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
15 16
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU Lesser General Public License for more details.
17
 *
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
18 19 20
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21 22 23 24 25 26
 *****************************************************************************/

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

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

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

Clément Stenac's avatar
Clément Stenac committed
34
#include <vlc_demux.h>
35 36
#include <vlc_charset.h>                           /* EnsureUTF8 */
#include <vlc_meta.h>                              /* vlc_meta_t, vlc_meta_ */
37
#include <vlc_input.h>
38
#include <assert.h>
39

40
#include "libmp4.h"
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
41
#include "id3genres.h"                             /* for ATOM_gnre */
42 43 44 45

/*****************************************************************************
 * Module descriptor
 *****************************************************************************/
46 47
static int  Open ( vlc_object_t * );
static void Close( vlc_object_t * );
48

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

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

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

    mtime_t      i_pcr;

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

81
    bool         b_fragmented;   /* fMP4 */
82 83
    bool         b_seekable;
    bool         b_fastseekable;
84

85 86
    /* */
    MP4_Box_t    *p_tref_chap;
87 88 89

    /* */
    input_title_t *p_title;
90 91
};

92
/*****************************************************************************
93
 * Declaration of local function
94
 *****************************************************************************/
95
static void MP4_TrackCreate ( demux_t *, mp4_track_t *, MP4_Box_t  *, bool b_force_enable );
96
static int MP4_frg_TrackCreate( demux_t *, mp4_track_t *, MP4_Box_t *);
Christophe Mutricy's avatar
Christophe Mutricy committed
97
static void MP4_TrackDestroy(  mp4_track_t * );
98

Laurent Aimar's avatar
Laurent Aimar committed
99 100
static int  MP4_TrackSelect ( demux_t *, mp4_track_t *, mtime_t );
static void MP4_TrackUnselect(demux_t *, mp4_track_t * );
101

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

Laurent Aimar's avatar
Laurent Aimar committed
104
static uint64_t MP4_TrackGetPos    ( mp4_track_t * );
105 106
static uint32_t MP4_TrackSampleSize( mp4_track_t *, uint32_t * );
static int      MP4_TrackNextSample( demux_t *, mp4_track_t *, uint32_t );
Laurent Aimar's avatar
Laurent Aimar committed
107
static void     MP4_TrackSetELST( demux_t *, mp4_track_t *, int64_t );
Laurent Aimar's avatar
Laurent Aimar committed
108

109
static void     MP4_UpdateSeekpoint( demux_t * );
110
static const char *MP4_ConvertMacCode( uint16_t );
111

112 113 114 115 116 117 118 119 120 121 122 123 124 125 126
static uint32_t stream_ReadU32( stream_t *s, void *p_read, uint32_t i_toread )
{
    uint32_t i_return = 0;
    if ( i_toread > INT32_MAX )
    {
        i_return = stream_Read( s, p_read, INT32_MAX );
        if ( i_return < INT32_MAX )
            return i_return;
        else
            i_toread -= INT32_MAX;
    }
    i_return += stream_Read( s, (uint8_t *)p_read + i_return, (int32_t) i_toread );
    return i_return;
}

127
/* Return time in microsecond of a track */
Laurent Aimar's avatar
Laurent Aimar committed
128
static inline int64_t MP4_TrackGetDTS( demux_t *p_demux, mp4_track_t *p_track )
Laurent Aimar's avatar
Laurent Aimar committed
129
{
130 131 132 133 134 135
    demux_sys_t *p_sys = p_demux->p_sys;
    mp4_chunk_t chunk;
    if( p_sys->b_fragmented )
        chunk = *p_track->cchunk;
    else
        chunk = p_track->chunk[p_track->i_chunk];
136 137 138 139

    unsigned int i_index = 0;
    unsigned int i_sample = p_track->i_sample - chunk.i_sample_first;
    int64_t i_dts = chunk.i_first_dts;
Laurent Aimar's avatar
Laurent Aimar committed
140 141 142

    while( i_sample > 0 )
    {
143
        if( i_sample > chunk.p_sample_count_dts[i_index] )
Laurent Aimar's avatar
Laurent Aimar committed
144
        {
145 146 147
            i_dts += chunk.p_sample_count_dts[i_index] *
                chunk.p_sample_delta_dts[i_index];
            i_sample -= chunk.p_sample_count_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
148 149 150 151
            i_index++;
        }
        else
        {
152
            i_dts += i_sample * chunk.p_sample_delta_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
153 154 155 156
            break;
        }
    }

157 158 159
    /* now handle elst */
    if( p_track->p_elst )
    {
Laurent Aimar's avatar
Laurent Aimar committed
160
        demux_sys_t         *p_sys = p_demux->p_sys;
161 162 163 164 165 166 167 168 169 170 171
        MP4_Box_data_elst_t *elst = p_track->p_elst->data.p_elst;

        /* 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 */
172 173
        i_dts += p_track->i_elst_time * p_track->i_timescale /
            p_sys->i_timescale;
174 175 176 177

        if( i_dts < 0 ) i_dts = 0;
    }

178
    return CLOCK_FREQ * i_dts / p_track->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
179
}
180

181
static inline int64_t MP4_TrackGetPTSDelta( demux_t *p_demux, mp4_track_t *p_track )
Laurent Aimar's avatar
Laurent Aimar committed
182
{
183 184 185 186 187 188 189
    demux_sys_t *p_sys = p_demux->p_sys;
    mp4_chunk_t *ck;
    if( p_sys->b_fragmented )
        ck = p_track->cchunk;
    else
        ck = &p_track->chunk[p_track->i_chunk];

Laurent Aimar's avatar
Laurent Aimar committed
190 191 192 193 194 195 196 197 198
    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 )
        return -1;

    for( i_index = 0;; i_index++ )
    {
        if( i_sample < ck->p_sample_count_pts[i_index] )
199
            return ck->p_sample_offset_pts[i_index] * CLOCK_FREQ /
200
                   (int64_t)p_track->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
201 202 203 204 205

        i_sample -= ck->p_sample_count_pts[i_index];
    }
}

Laurent Aimar's avatar
Laurent Aimar committed
206 207
static inline int64_t MP4_GetMoviePTS(demux_sys_t *p_sys )
{
208
    return CLOCK_FREQ * p_sys->i_time / p_sys->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
209
}
210

211 212
static void LoadChapter( demux_t  *p_demux );

213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235
static int LoadInitFrag( demux_t *p_demux, const bool b_smooth )
{
    demux_sys_t *p_sys = p_demux->p_sys;

    if( b_smooth ) /* Smooth Streaming */
    {
        if( ( p_sys->p_root = MP4_BoxGetSmooBox( p_demux->s ) ) == NULL )
        {
            goto LoadInitFragError;
        }
        else
        {
            MP4_Box_t *p_smoo = MP4_BoxGet( p_sys->p_root, "uuid" );
            if( !p_smoo || CmpUUID( &p_smoo->i_uuid, &SmooBoxUUID ) )
                goto LoadInitFragError;
            /* Get number of tracks */
            p_sys->i_tracks = 0;
            for( int i = 0; i < 3; i++ )
            {
                MP4_Box_t *p_stra = MP4_BoxGet( p_smoo, "uuid[%d]", i );
                if( p_stra && p_stra->data.p_stra->i_track_ID )
                    p_sys->i_tracks++;
                /* Get timescale and duration of the video track; */
236
                if( p_sys->i_timescale == 0 )
237 238 239
                {
                    p_sys->i_timescale = p_stra->data.p_stra->i_timescale;
                    p_sys->i_duration = p_stra->data.p_stra->i_duration;
240 241 242 243 244
                    if( p_sys->i_timescale == 0 )
                    {
                        msg_Err( p_demux, "bad timescale" );
                        goto LoadInitFragError;
                    }
245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263
                }
            }
        }
    }
    else
    {
        /* Load all boxes ( except raw data ) */
        if( ( p_sys->p_root = MP4_BoxGetRoot( p_demux->s ) ) == NULL )
        {
            goto LoadInitFragError;
        }
    }
    return VLC_SUCCESS;

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

264 265 266 267 268 269 270 271 272 273 274 275
/* Does lookup for remaining boxes */
static int ProbeFragments( demux_t *p_demux )
{
    demux_sys_t *p_sys = p_demux->p_sys;

    msg_Dbg( p_demux, "probing fragments from %"PRId64, stream_Tell( p_demux->s ) );

    MP4_ReadBoxContainerRaw( p_demux->s, p_sys->p_root );

    return VLC_SUCCESS;
}

276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321
static int InitTracks( demux_t *p_demux )
{
    demux_sys_t *p_sys = p_demux->p_sys;

    p_sys->track = calloc( p_sys->i_tracks, sizeof( mp4_track_t ) );
    if( p_sys->track == NULL )
        return VLC_EGENERIC;

    if( p_sys->b_fragmented )
    {
        mp4_track_t *p_track;
        for( uint16_t i = 0; i < p_sys->i_tracks; i++ )
        {
            p_track = &p_sys->track[i];
            p_track->cchunk = calloc( 1, sizeof( mp4_chunk_t ) );
            if( unlikely( !p_track->cchunk ) )
            {
                free( p_sys->track );
                return VLC_EGENERIC;
            }
        }
    }
    return VLC_SUCCESS;
}

static void CreateTracksFromSmooBox( demux_t *p_demux )
{
    demux_sys_t *p_sys = p_demux->p_sys;

    MP4_Box_t *p_smoo = MP4_BoxGet( p_sys->p_root, "uuid" );
    mp4_track_t *p_track;
    int j = 0;
    for( int i = 0; i < 3; i++ )
    {
        MP4_Box_t *p_stra = MP4_BoxGet( p_smoo, "uuid[%d]", i );
        if( !p_stra || p_stra->data.p_stra->i_track_ID == 0 )
            continue;
        else
        {
            p_track = &p_sys->track[j]; j++;
            MP4_frg_TrackCreate( p_demux, p_track, p_stra );
            p_track->p_es = es_out_Add( p_demux->out, &p_track->fmt );
        }
    }
}

322
/*****************************************************************************
323
 * Open: check file and initializes MP4 structures
324
 *****************************************************************************/
325
static int Open( vlc_object_t * p_this )
326
{
Laurent Aimar's avatar
Laurent Aimar committed
327
    demux_t  *p_demux = (demux_t *)p_this;
328
    demux_sys_t     *p_sys;
329

Christophe Mutricy's avatar
Christophe Mutricy committed
330
    const uint8_t   *p_peek;
331

332
    MP4_Box_t       *p_ftyp;
333
    MP4_Box_t       *p_rmra;
334 335
    MP4_Box_t       *p_mvhd;
    MP4_Box_t       *p_trak;
336

337
    unsigned int    i;
338
    bool      b_enabled_es;
339

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

343
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
344
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
345 346 347 348 349 350 351 352
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
353
        case ATOM_uuid:
354
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
355
            break;
356 357 358 359 360
        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;
361
         default:
362
            return VLC_EGENERIC;
363
    }
364

365 366 367 368 369
    /* create our structure that will contains all data */
    p_sys = calloc( 1, sizeof( demux_sys_t ) );
    if ( !p_sys )
        return VLC_EGENERIC;

370
    /* I need to seek */
371 372
    stream_Control( p_demux->s, STREAM_CAN_SEEK, &p_sys->b_seekable );
    if( !p_sys->b_seekable )
373
    {
374
        msg_Warn( p_demux, "MP4 plugin discarded (not seekable)" );
375
        free( p_sys );
376
        return VLC_EGENERIC;
377
    }
378
    stream_Control( p_demux->s, STREAM_CAN_FASTSEEK, &p_sys->b_fastseekable );
379

380
    /*Set exported functions */
Laurent Aimar's avatar
Laurent Aimar committed
381 382
    p_demux->pf_demux = Demux;
    p_demux->pf_control = Control;
383

384
    p_demux->p_sys = p_sys;
385

386 387 388 389 390 391 392 393 394 395 396 397
    /* Is it Smooth Streaming? */
    bool b_smooth = false;
    if( stream_Peek( p_demux->s, &p_peek, 24 ) < 24 ) return VLC_EGENERIC;
    if( !CmpUUID( (UUID_t *)(p_peek + 8), &SmooBoxUUID ) )
    {
        b_smooth = true;
        p_sys->b_fragmented = true;
    }

    if( LoadInitFrag( p_demux, b_smooth ) != VLC_SUCCESS )
        goto error;

398
    /* LoadInitFrag early failed */
399
    if( MP4_BoxCount( p_sys->p_root, "/moov/mvex" ) > 0 )
400
    {
401 402 403 404 405 406 407 408 409
        if ( p_sys->b_seekable )
        {
            /* Probe remaining to check if there's really fragments
               or if that file is just ready to append fragments */
            ProbeFragments( p_demux );
            p_sys->b_fragmented = !!MP4_BoxCount( p_sys->p_root, "/moof" );
        }
        else
            p_sys->b_fragmented = true;
410
    }
411

412 413 414 415 416 417 418 419 420 421 422 423
    if( p_sys->b_fragmented )
    {
        p_demux->pf_demux = DemuxFrg;
    }

    if( b_smooth )
    {
        if( InitTracks( p_demux ) != VLC_SUCCESS )
            goto error;
        CreateTracksFromSmooBox( p_demux );
        return VLC_SUCCESS;
    }
424
    else if( p_sys->b_fragmented )
425 426 427 428
    {
        /* We are not yet able to demux a fragmented MP4 file, using the 'mfra'
         * a file, and we let avformat do the job. */
        msg_Warn( p_demux, "MP4 plugin discarded "\
429
                "(fragmented, let avformat demux it)" );
430 431 432
        stream_Seek( p_demux->s, 0 ); /* rewind, for other demux */
        goto error;
    }
433
    else if( !p_sys->b_fastseekable )
434
    {
435 436
        msg_Warn( p_demux, "MP4 plugin discarded (not fast-seekable)" );
        stream_Seek( p_demux->s, 0 ); /* rewind, for other demux */
Laurent Aimar's avatar
Laurent Aimar committed
437
        goto error;
438 439
    }

Laurent Aimar's avatar
Laurent Aimar committed
440
    MP4_BoxDumpStructure( p_demux->s, p_sys->p_root );
441

442
    if( ( p_ftyp = MP4_BoxGet( p_sys->p_root, "/ftyp" ) ) )
443 444 445
    {
        switch( p_ftyp->data.p_ftyp->i_major_brand )
        {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
446
            case( ATOM_isom ):
Laurent Aimar's avatar
Laurent Aimar committed
447
                msg_Dbg( p_demux,
448 449
                         "ISO Media file (isom) version %d.",
                         p_ftyp->data.p_ftyp->i_minor_version );
450
                break;
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
451
            case( ATOM_3gp4 ):
452 453 454 455 456 457 458 459 460 461 462 463 464
            case( VLC_FOURCC( '3', 'g', 'p', '5' ) ):
            case( VLC_FOURCC( '3', 'g', 'p', '6' ) ):
            case( VLC_FOURCC( '3', 'g', 'p', '7' ) ):
                msg_Dbg( p_demux, "3GPP Media file Release: %c",
#ifdef WORDS_BIGENDIAN
                        p_ftyp->data.p_ftyp->i_major_brand
#else
                        p_ftyp->data.p_ftyp->i_major_brand >> 24
#endif
                        );
                break;
            case( VLC_FOURCC( 'q', 't', ' ', ' ') ):
                msg_Dbg( p_demux, "Apple QuickTime file" );
465
                break;
466 467 468
            case( VLC_FOURCC( 'i', 's', 'm', 'l') ):
                msg_Dbg( p_demux, "PIFF (= isml = fMP4) file" );
                break;
469
            default:
Laurent Aimar's avatar
Laurent Aimar committed
470
                msg_Dbg( p_demux,
471 472
                         "unrecognized major file specification (%4.4s).",
                          (char*)&p_ftyp->data.p_ftyp->i_major_brand );
473 474 475 476 477
                break;
        }
    }
    else
    {
Laurent Aimar's avatar
Laurent Aimar committed
478
        msg_Dbg( p_demux, "file type box missing (assuming ISO Media file)" );
479 480 481
    }

    /* the file need to have one moov box */
482
    if( MP4_BoxCount( p_sys->p_root, "/moov" ) <= 0 )
483
    {
484
        MP4_Box_t *p_foov = MP4_BoxGet( p_sys->p_root, "/foov" );
485 486 487

        if( !p_foov )
        {
488 489
            msg_Err( p_demux, "MP4 plugin discarded (no moov,foov,moof box)" );
            goto error;
490 491
        }
        /* we have a free box as a moov, rename it */
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
492
        p_foov->i_type = ATOM_moov;
493 494
    }

495
    if( ( p_rmra = MP4_BoxGet( p_sys->p_root,  "/moov/rmra" ) ) )
496 497 498 499
    {
        int        i_count = MP4_BoxCount( p_rmra, "rmda" );
        int        i;

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

502
        input_thread_t *p_input = demux_GetParentInput( p_demux );
503
        input_item_t *p_current = input_GetItem( p_input );
504

505 506
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

507
        for( i = 0; i < i_count; i++ )
508
        {
509 510 511
            MP4_Box_t *p_rdrf = MP4_BoxGet( p_rmra, "rmda[%d]/rdrf", i );
            char      *psz_ref;
            uint32_t  i_ref_type;
512

513
            if( !p_rdrf || !( psz_ref = strdup( p_rdrf->data.p_rdrf->psz_ref ) ) )
514
            {
515 516 517
                continue;
            }
            i_ref_type = p_rdrf->data.p_rdrf->i_ref_type;
518

519 520 521 522 523 524
            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" ) )
525
                {
526
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
527 528
                    continue;
                }
529 530
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
531
                {
532
                    ;
533 534 535
                }
                else
                {
536
                    char *psz_absolute;
537
                    char *psz_path = strdup( p_demux->psz_location );
538 539 540 541
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
542 543
                    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
544 545 546
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
547
                        input_item_node_Delete( p_subitems );
Rémi Duraffort's avatar
Rémi Duraffort committed
548
                        vlc_object_release( p_input) ;
Christophe Mutricy's avatar
Christophe Mutricy committed
549
                        return VLC_ENOMEM;
Rémi Duraffort's avatar
Rémi Duraffort committed
550
                    }
551 552 553 554

                    free( psz_ref );
                    psz_ref = psz_absolute;
                    free( psz_path );
555
                }
556
                msg_Dbg( p_demux, "adding ref = `%s'", psz_ref );
557 558 559 560
                input_item_t *p_item = input_item_New( psz_ref, NULL );
                input_item_CopyOptions( p_current, p_item );
                input_item_node_AppendItem( p_subitems, p_item );
                vlc_gc_decref( p_item );
561
            }
562
            else
563
            {
564 565
                msg_Err( p_demux, "unknown ref type=%4.4s FIXME (send a bug report)",
                         (char*)&p_rdrf->data.p_rdrf->i_ref_type );
566
            }
567
            free( psz_ref );
568
        }
569
        input_item_node_PostAndDelete( p_subitems );
570
        vlc_object_release( p_input );
571 572
    }

573
    if( !(p_mvhd = MP4_BoxGet( p_sys->p_root, "/moov/mvhd" ) ) )
574
    {
575 576
        if( !p_rmra )
        {
Laurent Aimar's avatar
Laurent Aimar committed
577
            msg_Err( p_demux, "cannot find /moov/mvhd" );
578
            goto error;
579 580 581
        }
        else
        {
Laurent Aimar's avatar
Laurent Aimar committed
582 583
            msg_Warn( p_demux, "cannot find /moov/mvhd (pure ref file)" );
            p_demux->pf_demux = DemuxRef;
584
            return VLC_SUCCESS;
585
        }
586 587 588
    }
    else
    {
589
        p_sys->i_timescale = p_mvhd->data.p_mvhd->i_timescale;
590 591 592 593 594
        if( p_sys->i_timescale == 0 )
        {
            msg_Err( p_this, "bad timescale" );
            goto error;
        }
595
        p_sys->i_duration = p_mvhd->data.p_mvhd->i_duration;
596
    }
597

598 599 600 601 602 603 604 605
    /* Try in mehd if fragmented */
    if ( p_sys->i_duration == 0 )
    {
        MP4_Box_t *p_mehd = MP4_BoxGet( p_demux->p_sys->p_root, "moov/mvex/mehd");
        if ( p_mehd )
            p_sys->i_duration = p_mehd->data.p_mehd->i_fragment_duration;
    }

606
    if( !( p_sys->i_tracks = MP4_BoxCount( p_sys->p_root, "/moov/trak" ) ) )
607
    {
Laurent Aimar's avatar
Laurent Aimar committed
608
        msg_Err( p_demux, "cannot find any /moov/trak" );
609
        goto error;
610
    }
611
    msg_Dbg( p_demux, "found %d track%c",
612 613
                        p_sys->i_tracks,
                        p_sys->i_tracks ? 's':' ' );
614

615
    if( InitTracks( p_demux ) != VLC_SUCCESS )
616
        goto error;
617

618 619
    /* Search the first chap reference (like quicktime) and
     * check that at least 1 stream is enabled */
620
    p_sys->p_tref_chap = NULL;
621
    b_enabled_es = false;
622 623 624 625
    for( i = 0; i < p_sys->i_tracks; i++ )
    {
        MP4_Box_t *p_trak = MP4_BoxGet( p_sys->p_root, "/moov/trak[%d]", i );

626 627 628 629 630 631 632 633

        MP4_Box_t *p_tkhd = MP4_BoxGet( p_trak, "tkhd" );
        if( p_tkhd && (p_tkhd->data.p_tkhd->i_flags&MP4_TRACK_ENABLED) )
            b_enabled_es = true;

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

Rémi Denis-Courmont's avatar
Typos  
Rémi Denis-Courmont committed
636
    /* now process each track and extract all useful information */
637
    for( i = 0; i < p_sys->i_tracks; i++ )
638
    {
639
        p_trak = MP4_BoxGet( p_sys->p_root, "/moov/trak[%d]", i );
640
        MP4_TrackCreate( p_demux, &p_sys->track[i], p_trak, !b_enabled_es );
641

642
        if( p_sys->track[i].b_ok && !p_sys->track[i].b_chapter )
643
        {
Laurent Aimar's avatar
Laurent Aimar committed
644
            const char *psz_cat;
645
            switch( p_sys->track[i].fmt.i_cat )
646 647 648 649 650 651 652
            {
                case( VIDEO_ES ):
                    psz_cat = "video";
                    break;
                case( AUDIO_ES ):
                    psz_cat = "audio";
                    break;
653 654 655 656
                case( SPU_ES ):
                    psz_cat = "subtitle";
                    break;

657
                default:
658
                    psz_cat = "unknown";
659 660
                    break;
            }
661

Laurent Aimar's avatar
Laurent Aimar committed
662
            msg_Dbg( p_demux, "adding track[Id 0x%x] %s (%s) language %s",
663 664 665 666
                     p_sys->track[i].i_track_ID, psz_cat,
                     p_sys->track[i].b_enable ? "enable":"disable",
                     p_sys->track[i].fmt.psz_language ?
                     p_sys->track[i].fmt.psz_language : "undef" );
667
        }
668 669 670 671 672 673 674
        else if( p_sys->track[i].b_ok && p_sys->track[i].b_chapter )
        {
            msg_Dbg( p_demux, "using track[Id 0x%x] for chapter language %s",
                     p_sys->track[i].i_track_ID,
                     p_sys->track[i].fmt.psz_language ?
                     p_sys->track[i].fmt.psz_language : "undef" );
        }
675 676
        else
        {
677 678
            msg_Dbg( p_demux, "ignoring track[Id 0x%x]",
                     p_sys->track[i].i_track_ID );
679 680
        }
    }
681

682 683
    /* */
    LoadChapter( p_demux );
684

685 686 687
    return VLC_SUCCESS;

error:
688
    if( p_sys->p_root )
Laurent Aimar's avatar
Laurent Aimar committed
689
    {
Laurent Aimar's avatar
Laurent Aimar committed
690
        MP4_BoxFree( p_demux->s, p_sys->p_root );
Laurent Aimar's avatar
Laurent Aimar committed
691
    }
692
    free( p_sys );
693
    return VLC_EGENERIC;
694 695 696
}

/*****************************************************************************
697
 * Demux: read packet and send them to decoders
698 699
 *****************************************************************************
 * TODO check for newly selected track (ie audio upt to now )
700
 *****************************************************************************/
Laurent Aimar's avatar
Laurent Aimar committed
701
static int Demux( demux_t *p_demux )
702
{
Laurent Aimar's avatar
Laurent Aimar committed
703
    demux_sys_t *p_sys = p_demux->p_sys;
704
    unsigned int i_track;
705

706 707 708 709

    unsigned int i_track_selected;

    /* check for newly selected/unselected track */
710 711
    for( i_track = 0, i_track_selected = 0; i_track < p_sys->i_tracks;
         i_track++ )
712
    {
Laurent Aimar's avatar
Laurent Aimar committed
713
        mp4_track_t *tk = &p_sys->track[i_track];
714
        bool b;
Laurent Aimar's avatar
Laurent Aimar committed
715

716
        if( !tk->b_ok || tk->b_chapter ||
717
            ( tk->b_selected && tk->i_sample >= tk->i_sample_count ) )
718
        {
719
            continue;
720
        }
721

722
        es_out_Control( p_demux->out, ES_OUT_GET_ES_STATE, tk->p_es, &b );
723

724 725 726 727 728 729 730 731 732 733 734 735
        if( tk->b_selected && !b )
        {
            MP4_TrackUnselect( p_demux, tk );
        }
        else if( !tk->b_selected && b)
        {
            MP4_TrackSelect( p_demux, tk, MP4_GetMoviePTS( p_sys ) );
        }

        if( tk->b_selected )
        {
            i_track_selected++;
736 737 738 739 740
        }
    }

    if( i_track_selected <= 0 )
    {
Laurent Aimar's avatar
 
Laurent Aimar committed
741 742 743
        p_sys->i_time += __MAX( p_sys->i_timescale / 10 , 1 );
        if( p_sys->i_timescale > 0 )
        {
744
            int64_t i_length = CLOCK_FREQ *
Laurent Aimar's avatar
 
Laurent Aimar committed
745 746 747 748 749 750 751
                               (mtime_t)p_sys->i_duration /
                               (mtime_t)p_sys->i_timescale;
            if( MP4_GetMoviePTS( p_sys ) >= i_length )
                return 0;
            return 1;
        }

Laurent Aimar's avatar
Laurent Aimar committed
752
        msg_Warn( p_demux, "no track selected, exiting..." );
Laurent Aimar's avatar
Laurent Aimar committed
753
        return 0;
754 755
    }

756 757 758
    /* */
    MP4_UpdateSeekpoint( p_demux );

759
    /* first wait for the good time to read a packet */
760
    p_sys->i_pcr = MP4_GetMoviePTS( p_sys );
761 762

    /* we will read 100ms for each stream so ...*/
763 764
    mtime_t i_targettime = p_sys->i_pcr + CLOCK_FREQ/10;
    bool b_data_sent = false;
765

766
    for( i_track = 0; i_track < p_sys->i_tracks; i_track++ )
767
    {
Laurent Aimar's avatar
Laurent Aimar committed
768 769
        mp4_track_t *tk = &p_sys->track[i_track];

770
        if( !tk->b_ok || tk->b_chapter || !tk->b_selected || tk->i_sample >= tk->i_sample_count )
771
            continue;
772

773 774
        while( MP4_TrackGetDTS( p_demux, tk ) < i_targettime
               || ( p_sys->i_pcr == VLC_TS_INVALID && !b_data_sent ) )
775
        {
776
#if 0
777
            msg_Dbg( p_demux, "tk(%i)=%lld mv=%lld", i_track,
Laurent Aimar's avatar
Laurent Aimar committed
778
                     MP4_TrackGetDTS( p_demux, tk ),
779 780
                     MP4_GetMoviePTS( p_sys ) );
#endif
781 782
            uint32_t i_nb_samples = 0;
            uint32_t i_samplessize = MP4_TrackSampleSize( tk, &i_nb_samples );
783
            if( i_samplessize > 0 )
784
            {
785
                block_t *p_block;
786
                int64_t i_delta, i_newpos;
787

788
                /* go,go go ! */
789 790
                i_newpos = MP4_TrackGetPos( tk );
                if( stream_Tell( p_demux->s ) != i_newpos )
791
                {
792 793 794 795 796 797 798
                    if( stream_Seek( p_demux->s, i_newpos ) )
                    {
                        msg_Warn( p_demux, "track[0x%x] will be disabled (eof?)",
                                  tk->i_track_ID );
                        MP4_TrackUnselect( p_demux, tk );
                        break;
                    }
799 800
                }

Laurent Aimar's avatar
Laurent Aimar committed
801
                /* now read pes */
802
                if( !(p_block = stream_Block( p_demux->s, i_samplessize )) )
803
                {
804 805
                    msg_Warn( p_demux, "track[0x%x] will be disabled (eof?)",
                              tk->i_track_ID );
Laurent Aimar's avatar
Laurent Aimar committed
806
                    MP4_TrackUnselect( p_demux, tk );
807 808
                    break;
                }
809
                else if( tk->fmt.i_cat == SPU_ES )
810
                {
811 812
                    if ( tk->fmt.i_codec != VLC_CODEC_TX3G &&
                         tk->fmt.i_codec != VLC_CODEC_SPU )
813
                        p_block->i_buffer = 0;
814
                }
815

Laurent Aimar's avatar
Laurent Aimar committed
816
                /* dts */
Laurent Aimar's avatar
Laurent Aimar committed
817
                p_block->i_dts = VLC_TS_0 + MP4_TrackGetDTS( p_demux, tk );
Laurent Aimar's avatar
Laurent Aimar committed
818
                /* pts */
819
                i_delta = MP4_TrackGetPTSDelta( p_demux, tk );
820
                if( i_delta != -1 )
Laurent Aimar's avatar
Laurent Aimar committed
821 822 823 824
                    p_block->i_pts = p_block->i_dts + i_delta;
                else if( tk->fmt.i_cat != VIDEO_ES )
                    p_block->i_pts = p_block->i_dts;
                else
Laurent Aimar's avatar
Laurent Aimar committed
825
                    p_block->i_pts = VLC_TS_INVALID;
826

827 828 829 830 831
                if ( !b_data_sent )
                {
                    es_out_Control( p_demux->out, ES_OUT_SET_PCR, VLC_TS_0 + p_sys->i_pcr );
                    b_data_sent = true;
                }
832
                es_out_Send( p_demux->out, tk->p_es, p_block );
Laurent Aimar's avatar
Laurent Aimar committed
833
            }
834

Laurent Aimar's avatar
Laurent Aimar committed
835
            /* Next sample */
836
            if( MP4_TrackNextSample( p_demux, tk, i_nb_samples ) )
Laurent Aimar's avatar
Laurent Aimar committed
837
                break;
838 839 840
        }
    }

841 842 843 844 845 846 847 848 849 850 851 852 853
    if ( b_data_sent )
    {
        p_sys->i_pcr = INT64_MAX;
        for( i_track = 0; i_track < p_sys->i_tracks; i_track++ )
        {
            mp4_track_t *tk = &p_sys->track[i_track];
            if ( !tk->b_ok || !tk->b_selected ) continue;
            p_sys->i_pcr = __MIN( MP4_TrackGetDTS( p_demux, tk ), p_sys->i_pcr );
            p_sys->i_time = p_sys->i_pcr * p_sys->i_timescale / CLOCK_FREQ;
        }
    }

    return b_data_sent;
854
}
855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876

static void MP4_UpdateSeekpoint( demux_t *p_demux )
{
    demux_sys_t *p_sys = p_demux->p_sys;
    int64_t i_time;
    int i;
    if( !p_sys->p_title )
        return;
    i_time = MP4_GetMoviePTS( p_sys );
    for( i = 0; i < p_sys->p_title->i_seekpoint; i++ )
    {
        if( i_time < p_sys->p_title->seekpoint[i]->i_time_offset )
            break;
    }
    i--;

    if( i != p_demux->info.i_seekpoint && i >= 0 )
    {
        p_demux->info.i_seekpoint = i;
        p_demux->info.i_update |= INPUT_UPDATE_SEEKPOINT;
    }
}
877
/*****************************************************************************
Sébastien Escudier's avatar
typos  
Sébastien Escudier committed
878
 * Seek: Go to i_date
879 880
******************************************************************************/
static int Seek( demux_t *p_demux, mtime_t i_date )
881
{
Laurent Aimar's avatar
Laurent Aimar committed
882
    demux_sys_t *p_sys = p_demux->p_sys;
883
    unsigned int i_track;
Laurent Aimar's avatar
Laurent Aimar committed
884

Frédéric Yhuel's avatar
Frédéric Yhuel committed
885
    /* First update global time */
886
    p_sys->i_time = i_date * p_sys->i_timescale / CLOCK_FREQ;
887
    p_sys->i_pcr  = VLC_TS_INVALID;
888

889
    /* Now for each stream try to go to this time */
890
    for( i_track = 0; i_track < p_sys->i_tracks; i_track++ )
891
    {
Laurent Aimar's avatar
Laurent Aimar committed
892
        mp4_track_t *tk = &p_sys->track[i_track];
893
        MP4_TrackSeek( p_demux, tk, i_date );
894
    }
895
    MP4_UpdateSeekpoint( p_demux );
896 897 898

    es_out_Control( p_demux->out, ES_OUT_SET_NEXT_DISPLAY_TIME, i_date );

899
    return VLC_SUCCESS;
900
}