mp4.c 175 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"

zorglub's avatar
zorglub 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
vlc_module_begin ()
    set_category( CAT_INPUT )
    set_subcategory( SUBCAT_INPUT_DEMUX )
    set_description( N_("MP4 stream demuxer") )
50
    set_shortname( N_("MP4") )
51
    set_capability( "demux", 240 )
52
53
    set_callbacks( Open, Close )
vlc_module_end ()
54

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

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

    mtime_t      i_pcr;

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

79
    bool         b_fragmented;   /* fMP4 */
80
81
    bool         b_seekable;
    bool         b_fastseekable;
82
    bool         b_seekmode;
83

84
    bool            b_index_probed;
85
    bool            b_fragments_probed;
86
87

    mp4_fragments_t fragments;
88

89
90
91
92
93
    struct
    {
        mp4_fragment_t *p_fragment;
        uint32_t        i_current_box_type;
        uint32_t        i_mdatbytesleft;
94
        uint32_t        i_lastseqnumber;
95
96
    } context;

97
98
    /* */
    MP4_Box_t    *p_tref_chap;
99
100
101

    /* */
    input_title_t *p_title;
102
103
104
105
106

    /* ASF in MP4 */
    asf_packet_sys_t asfpacketsys;
    uint64_t i_preroll;         /* foobar */
    int64_t  i_preroll_start;
107
108
};

109
/*****************************************************************************
110
 * Declaration of local function
111
 *****************************************************************************/
112
static void MP4_TrackCreate ( demux_t *, mp4_track_t *, MP4_Box_t  *, bool, bool );
113
static void MP4_TrackDestroy( demux_t *, mp4_track_t * );
114

115
static block_t * MP4_Block_Read( demux_t *, const mp4_track_t *, int );
116
117
static void MP4_Block_Send( demux_t *, mp4_track_t *, block_t * );

Laurent Aimar's avatar
Laurent Aimar committed
118
119
static int  MP4_TrackSelect ( demux_t *, mp4_track_t *, mtime_t );
static void MP4_TrackUnselect(demux_t *, mp4_track_t * );
120

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

Laurent Aimar's avatar
Laurent Aimar committed
123
static uint64_t MP4_TrackGetPos    ( mp4_track_t * );
124
static uint32_t MP4_TrackGetReadSize( mp4_track_t *, uint32_t * );
125
static int      MP4_TrackNextSample( demux_t *, mp4_track_t *, uint32_t );
Laurent Aimar's avatar
Laurent Aimar committed
126
static void     MP4_TrackSetELST( demux_t *, mp4_track_t *, int64_t );
127
static bool     MP4_TrackIsInterleaved( const mp4_track_t * );
Laurent Aimar's avatar
Laurent Aimar committed
128

129
130
static void     MP4_UpdateSeekpoint( demux_t * );

131
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id );
132
133
134
135
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 );
136

137
static bool AddFragment( demux_t *p_demux, MP4_Box_t *p_moox );
138
static int  ProbeFragments( demux_t *p_demux, bool b_force );
139
140
141
142
143
144
145
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 );
146

147
148
149
150
151
/* 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 );

152
153
154
155
/* 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 );

156
157
/* Helpers */

158
159
static uint32_t stream_ReadU32( stream_t *s, void *p_read, uint32_t i_toread )
{
160
    ssize_t i_return = 0;
161
162
    if ( i_toread > INT32_MAX )
    {
163
        i_return = stream_Read( s, p_read, (size_t) INT32_MAX );
164
165
166
167
168
        if ( i_return < INT32_MAX )
            return i_return;
        else
            i_toread -= INT32_MAX;
    }
169
    i_return += stream_Read( s, (uint8_t *)p_read + i_return, (size_t) i_toread );
170
171
172
    return i_return;
}

173
174
static MP4_Box_t * MP4_GetTrexByTrackID( MP4_Box_t *p_moov, const uint32_t i_id )
{
175
176
    if(!p_moov)
        return NULL;
177
178
179
    MP4_Box_t *p_trex = MP4_BoxGet( p_moov, "mvex/trex" );
    while( p_trex )
    {
180
181
        if ( p_trex->i_type == ATOM_trex &&
             BOXDATA(p_trex) && BOXDATA(p_trex)->i_track_ID == i_id )
182
183
184
185
186
187
188
                break;
        else
            p_trex = p_trex->p_next;
    }
    return p_trex;
}

189
190
191
192
193
194
195
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 &&
196
            (p_tkhd = MP4_BoxGet( p_trak, "tkhd" )) && BOXDATA(p_tkhd) &&
197
198
199
200
201
202
203
204
            BOXDATA(p_tkhd)->i_track_ID == i_id )
                break;
        else
            p_trak = p_trak->p_next;
    }
    return p_trak;
}

205
206
207
208
209
210
211
212
213
214
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;
}

215
/* Return time in microsecond of a track */
Laurent Aimar's avatar
Laurent Aimar committed
216
static inline int64_t MP4_TrackGetDTS( demux_t *p_demux, mp4_track_t *p_track )
Laurent Aimar's avatar
Laurent Aimar committed
217
{
218
    demux_sys_t *p_sys = p_demux->p_sys;
219
    const mp4_chunk_t *p_chunk;
220
    if( p_sys->b_fragmented )
221
        p_chunk = p_track->cchunk;
222
    else
223
        p_chunk = &p_track->chunk[p_track->i_chunk];
224
225

    unsigned int i_index = 0;
226
227
    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
228

229
    while( i_sample > 0 && i_index < p_chunk->i_entries_dts )
Laurent Aimar's avatar
Laurent Aimar committed
230
    {
231
        if( i_sample > p_chunk->p_sample_count_dts[i_index] )
Laurent Aimar's avatar
Laurent Aimar committed
232
        {
233
234
235
            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
236
237
238
239
            i_index++;
        }
        else
        {
240
            i_dts += i_sample * p_chunk->p_sample_delta_dts[i_index];
Laurent Aimar's avatar
Laurent Aimar committed
241
242
243
244
            break;
        }
    }

245
246
247
    /* now handle elst */
    if( p_track->p_elst )
    {
Laurent Aimar's avatar
Laurent Aimar committed
248
        demux_sys_t         *p_sys = p_demux->p_sys;
249
        MP4_Box_data_elst_t *elst = p_track->BOXDATA(p_elst);
250
251
252
253
254
255
256
257
258
259

        /* 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 */
260
261
        i_dts += p_track->i_elst_time * p_track->i_timescale /
            p_sys->i_timescale;
262
263
264
265

        if( i_dts < 0 ) i_dts = 0;
    }

266
    return CLOCK_FREQ * i_dts / p_track->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
267
}
268

269
270
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
271
{
272
273
274
275
276
277
278
    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
279
280
281
282
    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 )
283
        return false;
Laurent Aimar's avatar
Laurent Aimar committed
284

285
    for( i_index = 0; i_index < ck->i_entries_pts ; i_index++ )
Laurent Aimar's avatar
Laurent Aimar committed
286
287
    {
        if( i_sample < ck->p_sample_count_pts[i_index] )
288
289
290
291
292
        {
            *pi_delta = ck->p_sample_offset_pts[i_index] * CLOCK_FREQ /
                        (int64_t)p_track->i_timescale;
            return true;
        }
Laurent Aimar's avatar
Laurent Aimar committed
293
294
295

        i_sample -= ck->p_sample_count_pts[i_index];
    }
296
    return false;
Laurent Aimar's avatar
Laurent Aimar committed
297
298
}

Laurent Aimar's avatar
Laurent Aimar committed
299
300
static inline int64_t MP4_GetMoviePTS(demux_sys_t *p_sys )
{
301
    return CLOCK_FREQ * p_sys->i_time / p_sys->i_timescale;
Laurent Aimar's avatar
Laurent Aimar committed
302
}
303

304
305
static void LoadChapter( demux_t  *p_demux );

306
static int LoadInitFrag( demux_t *p_demux )
307
308
309
{
    demux_sys_t *p_sys = p_demux->p_sys;

310
311
    /* Load all boxes ( except raw data ) */
    if( ( p_sys->p_root = MP4_BoxGetRoot( p_demux->s ) ) == NULL )
312
    {
313
        goto LoadInitFragError;
314
    }
315

316
317
318
319
320
321
322
    return VLC_SUCCESS;

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

323
static int AllocateTracks( demux_t *p_demux, unsigned i_tracks )
324
325
326
{
    demux_sys_t *p_sys = p_demux->p_sys;

327
    p_sys->track = calloc( i_tracks, sizeof( mp4_track_t ) );
328
    if( p_sys->track == NULL )
329
330
        return VLC_ENOMEM;
    p_sys->i_tracks = i_tracks;
331
332
333

    if( p_sys->b_fragmented )
    {
334
        for( unsigned i = 0; i < i_tracks; i++ )
335
        {
336
            mp4_track_t *p_track = &p_sys->track[i];
337
338
            p_track->cchunk = calloc( 1, sizeof( mp4_chunk_t ) );
            if( unlikely( !p_track->cchunk ) )
339
                return VLC_ENOMEM;
340
341
342
343
344
        }
    }
    return VLC_SUCCESS;
}

345
346
347
348
static block_t * MP4_EIA608_Convert( block_t * p_block )
{
    /* Rebuild codec data from encap */
    size_t i_copied = 0;
349
    size_t i_remaining = __MIN(p_block->i_buffer, INT64_MAX / 3);
350
351
352
    uint32_t i_bytes = 0;
    block_t *p_newblock;

353
    /* always need at least 10 bytes (atom size+header+1pair)*/
354
355
    if ( i_remaining < 10 ||
         !(i_bytes = GetDWBE(p_block->p_buffer)) ||
356
         (i_bytes > i_remaining) ||
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
         memcmp("cdat", &p_block->p_buffer[4], 4) ||
         !(p_newblock = block_Alloc( i_remaining * 3 - 8 )) )
    {
        p_block->i_buffer = 0;
        return p_block;
    }

    uint8_t *p_write = p_newblock->p_buffer;
    uint8_t *p_read = &p_block->p_buffer[8];
    i_bytes -= 8;
    i_remaining -= 8;

    do
    {
        p_write[i_copied++] = 0; /* cc1 == field 0 */
        p_write[i_copied++] = p_read[0];
        p_write[i_copied++] = p_read[1];
        p_read += 2;
        i_bytes -= 2;
        i_remaining -= 2;
    } while( i_bytes >= 2 );

379
    /* cdt2 is optional */
380
381
    if ( i_remaining >= 10 &&
         (i_bytes = GetDWBE(p_read)) &&
382
         (i_bytes <= i_remaining) &&
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
         !memcmp("cdt2", &p_read[4], 4) )
    {
        p_read += 8;
        i_bytes -= 8;
        i_remaining -= 8;
        do
        {
            p_write[i_copied++] = 0; /* cc1 == field 0 */
            p_write[i_copied++] = p_read[0];
            p_write[i_copied++] = p_read[1];
            p_read += 2;
            i_bytes -= 2;
        } while( i_bytes >= 2 );
    }

    block_Release( p_block );
    p_newblock->i_buffer = i_copied;
400
    p_newblock->i_flags = BLOCK_FLAG_ORDERED_CAPTIONS;
401
402
403
    return p_newblock;
}

404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
static block_t * MP4_Block_Read( demux_t *p_demux, const mp4_track_t *p_track, int i_size )
{
    block_t *p_block = stream_Block( p_demux->s, i_size );
    if ( !p_block )
        return NULL;

    /* might have some encap */
    if( p_track->fmt.i_cat == SPU_ES )
    {
        switch( p_track->fmt.i_codec )
        {
            case VLC_CODEC_TX3G:
            case VLC_CODEC_SPU:
            /* accept as-is */
            break;
419
420
421
            case VLC_CODEC_EIA608_1:
                p_block = MP4_EIA608_Convert( p_block );
            break;
422
423
424
425
426
        default:
            p_block->i_buffer = 0;
            break;
        }
    }
427
428
429
430
    else if( p_track->fmt.i_original_fourcc == ATOM_rrtp )
    {
        p_block = MP4_RTPHint_Convert( p_demux, p_block, p_track->fmt.i_codec );
    }
431
432
433
434

    return p_block;
}

435
436
437
438
439
440
441
442
443
static void MP4_Block_Send( demux_t *p_demux, mp4_track_t *p_track, block_t *p_block )
{
    if ( p_track->b_chans_reorder && aout_BitsPerSample( p_track->fmt.i_codec ) )
    {
        aout_ChannelReorder( p_block->p_buffer, p_block->i_buffer,
                             p_track->fmt.audio.i_channels,
                             p_track->rgi_chans_reordering,
                             p_track->fmt.i_codec );
    }
444

445
446
    p_block->i_flags |= p_track->i_block_flags;

447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
    /* ASF packets in mov */
    if( p_track->p_asf )
    {
        /* Fake a new stream from MP4 block */
        stream_t *p_stream = p_demux->s;
        p_demux->s = stream_MemoryNew( p_demux, p_block->p_buffer, p_block->i_buffer, true );
        if ( p_demux->s )
        {
            p_track->i_dts_backup = p_block->i_dts;
            p_track->i_pts_backup = p_block->i_pts;
            /* And demux it as ASF packet */
            DemuxASFPacket( &p_demux->p_sys->asfpacketsys, p_block->i_buffer, p_block->i_buffer );
            stream_Delete(p_demux->s);
        }
        block_Release(p_block);
        p_demux->s = p_stream;
    }
    else
        es_out_Send( p_demux->out, p_track->p_es, p_block );
466
467
}

468
/*****************************************************************************
469
 * Open: check file and initializes MP4 structures
470
 *****************************************************************************/
471
static int Open( vlc_object_t * p_this )
472
{
Laurent Aimar's avatar
Laurent Aimar committed
473
    demux_t  *p_demux = (demux_t *)p_this;
474
    demux_sys_t     *p_sys;
475

Christophe Mutricy's avatar
Christophe Mutricy committed
476
    const uint8_t   *p_peek;
477

478
    MP4_Box_t       *p_ftyp;
479
    MP4_Box_t       *p_rmra;
480
481
    MP4_Box_t       *p_mvhd;
    MP4_Box_t       *p_trak;
482

483
    unsigned int    i;
484
    bool      b_enabled_es;
485

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

489
    switch( VLC_FOURCC( p_peek[4], p_peek[5], p_peek[6], p_peek[7] ) )
490
    {
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
491
492
493
494
495
496
497
498
        case ATOM_moov:
        case ATOM_foov:
        case ATOM_moof:
        case ATOM_mdat:
        case ATOM_udta:
        case ATOM_free:
        case ATOM_skip:
        case ATOM_wide:
499
        case ATOM_uuid:
500
        case VLC_FOURCC( 'p', 'n', 'o', 't' ):
501
            break;
502
503
504
505
506
        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;
507
         default:
508
            return VLC_EGENERIC;
509
    }
510

511
512
513
514
515
    /* create our structure that will contains all data */
    p_sys = calloc( 1, sizeof( demux_sys_t ) );
    if ( !p_sys )
        return VLC_EGENERIC;

516
    /* I need to seek */
517
518
    stream_Control( p_demux->s, STREAM_CAN_SEEK, &p_sys->b_seekable );
    stream_Control( p_demux->s, STREAM_CAN_FASTSEEK, &p_sys->b_fastseekable );
519
    p_sys->b_seekmode = p_sys->b_fastseekable;
520

521
    /*Set exported functions */
Laurent Aimar's avatar
Laurent Aimar committed
522
523
    p_demux->pf_demux = Demux;
    p_demux->pf_control = Control;
524

525
526
    p_sys->context.i_lastseqnumber = 1;

527
528
    MP4_Fragments_Init( &p_sys->fragments );

529
    p_demux->p_sys = p_sys;
530

531
    if( LoadInitFrag( p_demux ) != VLC_SUCCESS )
532
533
        goto error;

534

535
    if( ( p_ftyp = MP4_BoxGet( p_sys->p_root, "/ftyp" ) ) )
536
    {
537
        switch( BOXDATA(p_ftyp)->i_major_brand )
538
        {
539
            case MAJOR_isom:
Laurent Aimar's avatar
Laurent Aimar committed
540
                msg_Dbg( p_demux,
François Cartegnie's avatar
François Cartegnie committed
541
                         "ISO Media (isom) version %d.",
542
                         BOXDATA(p_ftyp)->i_minor_version );
543
                break;
544
545
546
547
            case MAJOR_3gp4:
            case MAJOR_3gp5:
            case MAJOR_3gp6:
            case MAJOR_3gp7:
548
549
                msg_Dbg( p_demux, "3GPP Media Release: %4.4s",
                         (char *)&BOXDATA(p_ftyp)->i_major_brand );
550
                break;
551
            case MAJOR_qt__:
François Cartegnie's avatar
François Cartegnie committed
552
                msg_Dbg( p_demux, "Apple QuickTime media" );
553
                break;
554
            case MAJOR_isml:
François Cartegnie's avatar
François Cartegnie committed
555
                msg_Dbg( p_demux, "PIFF (= isml = fMP4) media" );
556
                break;
557
            case MAJOR_dash:
François Cartegnie's avatar
François Cartegnie committed
558
                msg_Dbg( p_demux, "DASH Stream" );
559
                break;
560
            default:
Laurent Aimar's avatar
Laurent Aimar committed
561
                msg_Dbg( p_demux,
François Cartegnie's avatar
François Cartegnie committed
562
                         "unrecognized major media specification (%4.4s).",
563
                          (char*)&BOXDATA(p_ftyp)->i_major_brand );
564
565
                break;
        }
566
567
568
569
570
        /* 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
571
                msg_Dbg( p_demux, "DASH Stream" );
572
            }
573
574
575
576
            else if (BOXDATA(p_ftyp)->i_compatible_brands[i] == VLC_FOURCC('s', 'm', 'o', 'o') )
            {
                msg_Dbg( p_demux, "Handling VLC Smooth Stream" );
            }
577
        }
578
579
580
    }
    else
    {
François Cartegnie's avatar
François Cartegnie committed
581
        msg_Dbg( p_demux, "file type box missing (assuming ISO Media)" );
582
583
    }

584
585
    if( MP4_BoxCount( p_sys->p_root, "/moov/mvex" ) > 0 )
    {
586
        if ( p_sys->b_seekable )
587
588
589
590
591
592
593
594
        {
            /* Probe remaining to check if there's really fragments
               or if that file is just ready to append fragments */
            ProbeFragments( p_demux, false );
            p_sys->b_fragmented = !!MP4_BoxCount( p_sys->p_root, "/moof" );

            if ( p_sys->b_fragmented && !p_sys->i_overall_duration )
                ProbeFragments( p_demux, true );
595
596
597
598
599
600
601

            MP4_Box_t *p_mdat = MP4_BoxGet( p_sys->p_root, "mdat" );
            if ( p_mdat )
            {
                stream_Seek( p_demux->s, p_mdat->i_pos );
                msg_Dbg( p_demux, "rewinding to mdat %"PRId64, p_mdat->i_pos );
            }
602
603
604
605
606
        }
        else
            p_sys->b_fragmented = true;
    }

607
    if ( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
608
609
        AddFragment( p_demux, MP4_BoxGet( p_sys->p_root, "/moov" ) );

610
    if ( !MP4_Fragment_Moov(&p_sys->fragments)->p_moox )
611
612
        goto error;

613
614
    MP4_BoxDumpStructure( p_demux->s, p_sys->p_root );

615
    if( p_sys->b_fragmented )
616
617
    {
        p_demux->pf_demux = DemuxAsLeaf;
618
619
620
621
622
623
624
        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;
625
626
    }

627
    /* the file need to have one moov box */
628
629
    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 )
630
    {
631
        MP4_Box_t *p_foov = MP4_BoxGet( p_sys->p_root, "/foov" );
632
633
634

        if( !p_foov )
        {
635
636
            msg_Err( p_demux, "MP4 plugin discarded (no moov,foov,moof box)" );
            goto error;
637
638
        }
        /* we have a free box as a moov, rename it */
Jean-Baptiste Kempf's avatar
Jean-Baptiste Kempf committed
639
        p_foov->i_type = ATOM_moov;
640
        MP4_Fragment_Moov(&p_sys->fragments)->p_moox = p_foov;
641
642
    }

643
    if( ( p_rmra = MP4_BoxGet( p_sys->p_root,  "/moov/rmra" ) ) )
644
645
646
647
    {
        int        i_count = MP4_BoxCount( p_rmra, "rmda" );
        int        i;

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

650
        input_thread_t *p_input = p_demux->p_input;
651
        input_item_t *p_current = input_GetItem( p_input );
652

653
654
        input_item_node_t *p_subitems = input_item_node_Create( p_current );

655
        for( i = 0; i < i_count; i++ )
656
        {
657
658
659
            MP4_Box_t *p_rdrf = MP4_BoxGet( p_rmra, "rmda[%d]/rdrf", i );
            char      *psz_ref;
            uint32_t  i_ref_type;
zorglub's avatar
zorglub committed
660

661
            if( !p_rdrf || !BOXDATA(p_rdrf) || !( psz_ref = strdup( BOXDATA(p_rdrf)->psz_ref ) ) )
662
            {
663
664
                continue;
            }
665
            i_ref_type = BOXDATA(p_rdrf)->i_ref_type;
666

667
668
669
670
671
672
            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" ) )
673
                {
674
                    msg_Dbg( p_demux, "ignoring pseudo ref =`%s'", psz_ref );
675
676
                    continue;
                }
677
678
                if( !strncmp( psz_ref, "http://", 7 ) ||
                    !strncmp( psz_ref, "rtsp://", 7 ) )
679
                {
680
                    ;
681
682
683
                }
                else
                {
684
                    char *psz_absolute;
685
                    char *psz_path = strdup( p_demux->psz_location );
686
687
688
689
                    char *end = strrchr( psz_path, '/' );
                    if( end ) end[1] = '\0';
                    else *psz_path = '\0';

Christophe Mutricy's avatar
Christophe Mutricy committed
690
691
                    if( asprintf( &psz_absolute, "%s://%s%s",
                                  p_demux->psz_access, psz_path, psz_ref ) < 0 )
ivoire's avatar
ivoire committed
692
693
694
                    {
                        free( psz_ref );
                        free( psz_path );
François Cartegnie's avatar
François Cartegnie committed
695
                        input_item_node_Delete( p_subitems );
Christophe Mutricy's avatar
Christophe Mutricy committed
696
                        return VLC_ENOMEM;
ivoire's avatar
ivoire committed
697
                    }
698
699
700
701

                    free( psz_ref );
                    psz_ref = psz_absolute;
                    free( psz_path );
702
                }
703
                msg_Dbg( p_demux, "adding ref = `%s'", psz_ref );
704
                input_item_t *p_item = input_item_New( psz_ref, NULL );
705
                input_item_CopyOptions( p_item, p_current );
706
707
                input_item_node_AppendItem( p_subitems, p_item );
                vlc_gc_decref( p_item );
708
            }
709
            else
zorglub's avatar
zorglub committed
710
            {
711
                msg_Err( p_demux, "unknown ref type=%4.4s FIXME (send a bug report)",
712
                         (char*)&BOXDATA(p_rdrf)->i_ref_type );
zorglub's avatar
zorglub committed
713
            }
714
            free( psz_ref );
715
        }
716
        input_item_node_PostAndDelete( p_subitems );
717
718
    }

719
    if( !(p_mvhd = MP4_BoxGet( p_sys->p_root, "/moov/mvhd" ) ) )
720
    {
721
722
        if( !p_rmra )
        {
Laurent Aimar's avatar
Laurent Aimar committed
723
            msg_Err( p_demux, "cannot find /moov/mvhd" );
724
            goto error;
725
726
727
        }
        else
        {
Laurent Aimar's avatar
Laurent Aimar committed
728
729
            msg_Warn( p_demux, "cannot find /moov/mvhd (pure ref file)" );
            p_demux->pf_demux = DemuxRef;
730
            return VLC_SUCCESS;
731
        }
732
733
734
    }
    else
    {
735
        p_sys->i_timescale = BOXDATA(p_mvhd)->i_timescale;
736
737
738
739
740
        if( p_sys->i_timescale == 0 )
        {
            msg_Err( p_this, "bad timescale" );
            goto error;
        }
741
    }
742

743
744
    const unsigned i_tracks = MP4_BoxCount( p_sys->p_root, "/moov/trak" );
    if( i_tracks < 1 )
745
    {
Laurent Aimar's avatar
Laurent Aimar committed
746
        msg_Err( p_demux, "cannot find any /moov/trak" );
747
        goto error;
748
    }
749
    msg_Dbg( p_demux, "found %u track%c", i_tracks, i_tracks ? 's':' ' );
750

751
    if( AllocateTracks( p_demux, i_tracks ) != VLC_SUCCESS )
752
        goto error;
753

754
755
    /* Search the first chap reference (like quicktime) and
     * check that at least 1 stream is enabled */
756
    p_sys->p_tref_chap = NULL;
757
    b_enabled_es = false;
758
759
760
761
    for( i = 0; i < p_sys->i_tracks; i++ )
    {
        MP4_Box_t *p_trak = MP4_BoxGet( p_sys->p_root, "/moov/trak[%d]", i );

762
763

        MP4_Box_t *p_tkhd = MP4_BoxGet( p_trak, "tkhd" );
764
        if( p_tkhd && BOXDATA(p_tkhd) && (BOXDATA(p_tkhd)->i_flags&MP4_TRACK_ENABLED) )
765
766
767
            b_enabled_es = true;

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

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

779
        if( p_sys->track[i].b_ok && !p_sys->track[i].b_chapters_source )
780
        {
Laurent Aimar's avatar
Laurent Aimar committed
781
            const char *psz_cat;
782
            switch( p_sys->track[i].fmt.i_cat )
783
784
785
786
787
788
789
            {
                case( VIDEO_ES ):
                    psz_cat = "video";
                    break;
                case( AUDIO_ES ):
                    psz_cat = "audio";
                    break;
790
791
792
793
                case( SPU_ES ):
                    psz_cat = "subtitle";
                    break;

794
                default:
795
                    psz_cat = "unknown";
796
797
                    break;
            }
798

Laurent Aimar's avatar
Laurent Aimar committed
799
            msg_Dbg( p_demux, "adding track[Id 0x%x] %s (%s) language %s",
800
801
802
803
                     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" );
804
        }
805
        else if( p_sys->track[i].b_ok && p_sys->track[i].b_chapters_source )
806
807
808
809
810
811
        {
            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" );
        }
812
813
        else
        {
814
815
            msg_Dbg( p_demux, "ignoring track[Id 0x%x]",
                     p_sys->track[i].i_track_ID );
816
817
        }
    }
818

819
820
821
822
823
824
825
826
827
828
    if ( p_sys->i_overall_duration == 0 )
    {
        /* Try in mehd if fragmented */
        MP4_Box_t *p_mehd = MP4_BoxGet( p_demux->p_sys->p_root, "moov/mvex/mehd");
        if ( p_mehd && p_mehd->data.p_mehd )
            p_sys->i_overall_duration = p_mehd->data.p_mehd->i_fragment_duration;
        else
        {
            for( i = 0; i < p_sys->i_tracks; i++ )
            {
829
                mtime_t i_duration = GetTrackTotalDuration( &p_sys->fragments, p_sys->track[i].i_track_ID );
830
831
832
833
834
                p_sys->i_overall_duration = __MAX( p_sys->i_overall_duration, (uint64_t)i_duration );
            }
        }
    }

835
#ifdef MP4_VERBOSE
836
    DumpFragments( VLC_OBJECT(p_demux), &p_sys->fragments, p_sys->i_timescale );
837
#endif
838

839
840
841
842
843
844
845
846
847
848
849
850
851
852
    if( !p_sys->b_fragmented && p_sys->i_tracks > 1 && p_sys->b_seekable && !p_sys->b_seekmode )
    {
        for( unsigned i = 0; i < p_sys->i_tracks; i++ )
        {
            mp4_track_t *tk = &p_sys->track[i];
            if( !MP4_TrackIsInterleaved( tk ) )
            {
                msg_Warn( p_demux, "that media doesn't look interleaved, will need to seek");
                p_sys->b_seekmode = true;
                break;
            }
        }
    }

853
854
    /* */
    LoadChapter( p_demux );
855

856
857
858
859
860
861
862
863
864
    p_sys->asfpacketsys.p_demux = p_demux;
    p_sys->asfpacketsys.pi_preroll = &p_sys->i_preroll;
    p_sys->asfpacketsys.pi_preroll_start = &p_sys->i_preroll_start;
    p_sys->asfpacketsys.pf_doskip = NULL;
    p_sys->asfpacketsys.pf_send = MP4ASF_Send;
    p_sys->asfpacketsys.pf_gettrackinfo = MP4ASF_GetTrackInfo;
    p_sys->asfpacketsys.pf_updatetime = NULL;
    p_sys->asfpacketsys.pf_setaspectratio = NULL;

865
866
867
    return VLC_SUCCESS;

error:
868
869
870
    if( stream_Tell( p_demux->s ) > 0 )
        stream_Seek( p_demux->s, 0 );

871
    if( p_sys->p_root )
Laurent Aimar's avatar
Laurent Aimar committed
872
    {
873
        MP4_BoxFree( p_sys->p_root );
Laurent Aimar's avatar
Laurent Aimar committed
874
    }
875
    free( p_sys );
876
    return VLC_EGENERIC;
877
878
}

879
880
881
882
883
const unsigned int SAMPLEHEADERSIZE = 4;
const unsigned int RTPPACKETSIZE = 12;
const unsigned int CONSTRUCTORSIZE = 16;

/*******************************************************************************
884
 * MP4_RTPHintToFrame: converts RTP Reception Hint Track sample to H.264 frame
885
 *******************************************************************************/
886
static block_t * MP4_RTPHintToFrame( demux_t *p_demux, block_t *p_block, uint32_t packetcount )
887
{
888
    uint8_t *p_slice = p_block->p_buffer + SAMPLEHEADERSIZE;
889
890
    block_t *p_newblock = NULL;
    size_t i_payload = 0;
891

892
    if( p_block->i_buffer < SAMPLEHEADERSIZE + RTPPACKETSIZE + CONSTRUCTORSIZE )
893
894
    {
        msg_Err( p_demux, "Sample not large enough for necessary structs");
895
896
        block_Release( p_block );
        return NULL;
897
898
    }

899
    for( uint32_t i = 0; i < packetcount; ++i )
900
    {
901
902
903
        if( (size_t)(p_slice - p_block->p_buffer) + RTPPACKETSIZE + CONSTRUCTORSIZE > p_block->i_buffer )
            goto error;

904
        /* skip RTP header in sample. Could be used to detect packet losses */
905
        p_slice += RTPPACKETSIZE;
906
907
908

        mp4_rtpsampleconstructor_t sample_cons;

909
910
911
912
913
914
915
        sample_cons.type =                      p_slice[0];
        sample_cons.trackrefindex =             p_slice[1];
        sample_cons.length =          GetWBE(  &p_slice[2] );
        sample_cons.samplenumber =    GetDWBE( &p_slice[4] );
        sample_cons.sampleoffset =    GetDWBE( &p_slice[8] );
        sample_cons.bytesperblock =   GetWBE(  &p_slice[12] );
        sample_cons.samplesperblock = GetWBE(  &p_slice[14] );
916
917

        /* skip packet constructor */
918
        p_slice += CONSTRUCTORSIZE;
919
920
921
922
923
924

        /* check that is RTPsampleconstructor, referencing itself and no weird audio stuff */
        if( sample_cons.type != 2||sample_cons.trackrefindex != -1
            ||sample_cons.samplesperblock != 1||sample_cons.bytesperblock != 1 )
        {
            msg_Err(p_demux, "Unhandled constructor in RTP Reception Hint Track. Type:%u", sample_cons.type);
925
            goto error;
Joni Räsänen's avatar