mov.c 65.4 KB
Newer Older
1 2
/*
 * MOV decoder.
F
Fabrice Bellard 已提交
3
 * Copyright (c) 2001 Fabrice Bellard.
4
 *
5 6 7
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
F
Fabrice Bellard 已提交
8 9
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
10
 * version 2.1 of the License, or (at your option) any later version.
11
 *
12
 * FFmpeg is distributed in the hope that it will be useful,
13
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
F
Fabrice Bellard 已提交
14 15
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
16
 *
F
Fabrice Bellard 已提交
17
 * You should have received a copy of the GNU Lesser General Public
18
 * License along with FFmpeg; if not, write to the Free Software
19
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20
 */
21 22

#include <limits.h>
23

B
Baptiste Coudurier 已提交
24
//#define DEBUG
25

26
#include "avformat.h"
27
#include "riff.h"
28
#include "isom.h"
29
#include "dv.h"
30

31 32 33 34
#ifdef CONFIG_ZLIB
#include <zlib.h>
#endif

35 36
/*
 * First version by Francois Revol revol@free.fr
37
 * Seek function by Gael Chardon gael.dev@4now.net
38
 *
39
 * Features and limitations:
40
 * - reads most of the QT files I have (at least the structure),
41
 *   the exceptions are .mov with zlib compressed headers ('cmov' section). It shouldn't be hard to implement.
42
 *   FIXED, Francois Revol, 07/17/2002
43 44 45 46 47 48 49
 * - ffmpeg has nearly none of the usual QuickTime codecs,
 *   although I succesfully dumped raw and mp3 audio tracks off .mov files.
 *   Sample QuickTime files with mp3 audio can be found at: http://www.3ivx.com/showcase.html
 * - .mp4 parsing is still hazardous, although the format really is QuickTime with some minor changes
 *   (to make .mov parser crash maybe ?), despite what they say in the MPEG FAQ at
 *   http://mpeg.telecomitalialab.com/faq.htm
 * - the code is quite ugly... maybe I won't do it recursive next time :-)
G
Gael Chardon 已提交
50
 * - seek is not supported with files that contain edit list
51
 *
52 53
 * Funny I didn't know about http://sourceforge.net/projects/qt-ffmpeg/
 * when coding this :) (it's a writer anyway)
54
 *
55 56 57
 * Reference documents:
 * http://www.geocities.com/xhelmboyx/quicktime/formats/qtm-layout.txt
 * Apple:
G
Gael Chardon 已提交
58
 *  http://developer.apple.com/documentation/QuickTime/QTFF/
59
 *  http://developer.apple.com/documentation/QuickTime/QTFF/qtff.pdf
60 61 62
 * QuickTime is a trademark of Apple (AFAIK :))
 */

63 64
#include "qtpalette.h"

G
Gael Chardon 已提交
65

66 67 68
#undef NDEBUG
#include <assert.h>

Z
Zdenek Kabelac 已提交
69
static const CodecTag mov_video_tags[] = {
70
/*  { CODEC_ID_, MKTAG('c', 'v', 'i', 'd') }, *//* Cinepak */
71 72
/*  { CODEC_ID_H263, MKTAG('r', 'a', 'w', ' ') }, *//* Uncompressed RGB */
/*  { CODEC_ID_H263, MKTAG('Y', 'u', 'v', '2') }, *//* Uncompressed YUV422 */
73
/*    { CODEC_ID_RAWVIDEO, MKTAG('A', 'V', 'U', 'I') }, *//* YUV with alpha-channel (AVID Uncompressed) */
74 75 76 77
/* Graphics */
/* Animation */
/* Apple video */
/* Kodak Photo CD */
78
    { CODEC_ID_MJPEG, MKTAG('j', 'p', 'e', 'g') }, /* PhotoJPEG */
79
    { CODEC_ID_MPEG1VIDEO, MKTAG('m', 'p', 'e', 'g') }, /* MPEG */
80
    { CODEC_ID_MJPEG, MKTAG('m', 'j', 'p', 'a') }, /* Motion-JPEG (format A) */
81
    { CODEC_ID_MJPEGB, MKTAG('m', 'j', 'p', 'b') }, /* Motion-JPEG (format B) */
82 83
    { CODEC_ID_MJPEG, MKTAG('A', 'V', 'D', 'J') }, /* MJPEG with alpha-channel (AVID JFIF meridien compressed) */
/*    { CODEC_ID_MJPEG, MKTAG('A', 'V', 'R', 'n') }, *//* MJPEG with alpha-channel (AVID ABVB/Truevision NuVista) */
84 85
/*    { CODEC_ID_GIF, MKTAG('g', 'i', 'f', ' ') }, *//* embedded gif files as frames (usually one "click to play movie" frame) */
/* Sorenson video */
86 87
    { CODEC_ID_SVQ1, MKTAG('S', 'V', 'Q', '1') }, /* Sorenson Video v1 */
    { CODEC_ID_SVQ1, MKTAG('s', 'v', 'q', '1') }, /* Sorenson Video v1 */
88
    { CODEC_ID_SVQ1, MKTAG('s', 'v', 'q', 'i') }, /* Sorenson Video v1 (from QT specs)*/
M
Michael Niedermayer 已提交
89
    { CODEC_ID_SVQ3, MKTAG('S', 'V', 'Q', '3') }, /* Sorenson Video v3 */
90
    { CODEC_ID_MPEG4, MKTAG('m', 'p', '4', 'v') },
91
    { CODEC_ID_MPEG4, MKTAG('D', 'I', 'V', 'X') }, /* OpenDiVX *//* sample files at http://heroinewarrior.com/xmovie.php3 use this tag */
92
    { CODEC_ID_MPEG4, MKTAG('X', 'V', 'I', 'D') },
93
    { CODEC_ID_MPEG4, MKTAG('3', 'I', 'V', '2') }, /* experimental: 3IVX files before ivx D4 4.5.1 */
94
/*    { CODEC_ID_, MKTAG('I', 'V', '5', '0') }, *//* Indeo 5.0 */
95
    { CODEC_ID_H263, MKTAG('h', '2', '6', '3') }, /* H263 */
96
    { CODEC_ID_H263, MKTAG('s', '2', '6', '3') }, /* H263 ?? works */
F
Fabrice Bellard 已提交
97 98
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', ' ') }, /* DV NTSC */
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', 'p') }, /* DV PAL */
99
    { CODEC_ID_VP3, MKTAG('V', 'P', '3', '1') }, /* On2 VP3 */
100 101
    { CODEC_ID_RPZA, MKTAG('r', 'p', 'z', 'a') }, /* Apple Video (RPZA) */
    { CODEC_ID_CINEPAK, MKTAG('c', 'v', 'i', 'd') }, /* Cinepak */
R
Roberto Togni 已提交
102
    { CODEC_ID_8BPS, MKTAG('8', 'B', 'P', 'S') }, /* Planar RGB (8BPS) */
103
    { CODEC_ID_SMC, MKTAG('s', 'm', 'c', ' ') }, /* Apple Graphics (SMC) */
104
    { CODEC_ID_QTRLE, MKTAG('r', 'l', 'e', ' ') }, /* Apple Animation (RLE) */
105
    { CODEC_ID_QDRAW, MKTAG('q', 'd', 'r', 'w') }, /* QuickDraw */
106
    { CODEC_ID_H264, MKTAG('a', 'v', 'c', '1') }, /* AVC-1/H.264 */
107
    { CODEC_ID_MPEG2VIDEO, MKTAG('h', 'd', 'v', '2') }, /* MPEG2 produced by Sony HD camera */
108
    { CODEC_ID_MPEG2VIDEO, MKTAG('h', 'd', 'v', '3') }, /* HDV produced by FCP */
109 110 111 112 113 114 115 116 117
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '5', 'n') }, /* MPEG2 IMX NTSC 525/60 50mb/s produced by FCP */
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '5', 'p') }, /* MPEG2 IMX PAL 625/50 50mb/s produced by FCP */
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '3', 'n') }, /* MPEG2 IMX NTSC 525/60 30mb/s produced by FCP */
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '3', 'p') }, /* MPEG2 IMX PAL 625/50 30mb/s produced by FCP */
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'p', 'p') }, /* DVCPRO PAL produced by FCP */
    //{ CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'h', '5') }, /* DVCPRO HD 50i produced by FCP */
    //{ CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'h', '6') }, /* DVCPRO HD 60i produced by FCP */
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', '5', 'p') }, /* DVCPRO50 PAL produced by FCP */
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', '5', 'n') }, /* DVCPRO50 NTSC produced by FCP */
B
Baptiste Coudurier 已提交
118
    { CODEC_ID_DVVIDEO, MKTAG('A', 'V', 'd', 'v') }, /* AVID DV */
119
    //{ CODEC_ID_JPEG2000, MKTAG('m', 'j', 'p', '2') }, /* JPEG 2000 produced by FCP */
K
Kostya Shishkov 已提交
120
    { CODEC_ID_TARGA, MKTAG('t', 'g', 'a', ' ') }, /* Truevision Targa */
K
Kostya Shishkov 已提交
121
    { CODEC_ID_TIFF, MKTAG('t', 'i', 'f', 'f') }, /* TIFF embedded in MOV */
122
    { CODEC_ID_RAWVIDEO, MKTAG('2', 'v', 'u', 'y') }, /* UNCOMPRESSED 8BIT 4:2:2 */
123
    { CODEC_ID_NONE, 0 },
124 125
};

Z
Zdenek Kabelac 已提交
126
static const CodecTag mov_audio_tags[] = {
127
    { CODEC_ID_PCM_S32BE, MKTAG('i', 'n', '3', '2') },
128
    { CODEC_ID_PCM_S24BE, MKTAG('i', 'n', '2', '4') },
B
Baptiste Coudurier 已提交
129
    { CODEC_ID_PCM_S16BE, MKTAG('N', 'O', 'N', 'E') }, /* uncompressed */
130
    { CODEC_ID_PCM_S16BE, MKTAG('t', 'w', 'o', 's') }, /* 16 bits */
131
    { CODEC_ID_PCM_U8, MKTAG('r', 'a', 'w', ' ') }, /* 8 bits unsigned */
132 133 134
    { CODEC_ID_PCM_S16LE, MKTAG('s', 'o', 'w', 't') }, /*  */
    { CODEC_ID_PCM_MULAW, MKTAG('u', 'l', 'a', 'w') }, /*  */
    { CODEC_ID_PCM_ALAW, MKTAG('a', 'l', 'a', 'w') }, /*  */
135
    { CODEC_ID_ADPCM_IMA_QT, MKTAG('i', 'm', 'a', '4') }, /* IMA-4 ADPCM */
B
Baptiste Coudurier 已提交
136
    { CODEC_ID_ADPCM_MS, MKTAG('m', 's', 0x00, 0x02) }, /* MS ADPCM */
137 138
    { CODEC_ID_MACE3, MKTAG('M', 'A', 'C', '3') }, /* Macintosh Audio Compression and Expansion 3:1 */
    { CODEC_ID_MACE6, MKTAG('M', 'A', 'C', '6') }, /* Macintosh Audio Compression and Expansion 6:1 */
139

140
    { CODEC_ID_MP3, MKTAG('.', 'm', 'p', '3') }, /* MPEG layer 3 */ /* sample files at http://www.3ivx.com/showcase.html use this tag */
141 142 143 144
    { CODEC_ID_MP2, 0x6D730055 }, /* MPEG layer 3 */
    { CODEC_ID_MP2, 0x5500736D }, /* MPEG layer 3 *//* XXX: check endianness */
/*    { CODEC_ID_OGG_VORBIS, MKTAG('O', 'g', 'g', 'S') }, *//* sample files at http://heroinewarrior.com/xmovie.php3 use this tag */
/* MP4 tags */
145
    { CODEC_ID_AAC, MKTAG('m', 'p', '4', 'a') }, /* MPEG-4 AAC */
146
    /* The standard for mpeg4 audio is still not normalised AFAIK anyway */
147
    { CODEC_ID_AMR_NB, MKTAG('s', 'a', 'm', 'r') }, /* AMR-NB 3gp */
148
    { CODEC_ID_AMR_WB, MKTAG('s', 'a', 'w', 'b') }, /* AMR-WB 3gp */
149
    { CODEC_ID_AC3, MKTAG('m', 's', 0x20, 0x00) }, /* Dolby AC-3 */
150
    { CODEC_ID_ALAC,MKTAG('a', 'l', 'a', 'c') }, /* Apple Lossless */
R
Roberto Togni 已提交
151
    { CODEC_ID_QDM2,MKTAG('Q', 'D', 'M', '2') }, /* QDM2 */
152 153
    { CODEC_ID_DVAUDIO, MKTAG('v', 'd', 'v', 'a') },
    { CODEC_ID_DVAUDIO, MKTAG('d', 'v', 'c', 'a') },
B
Baptiste Coudurier 已提交
154
    { CODEC_ID_PCM_S16LE, MKTAG('l', 'p', 'c', 'm') },
155
    { CODEC_ID_NONE, 0 },
156 157 158 159 160 161 162 163 164 165 166 167 168
};

/* the QuickTime file format is quite convoluted...
 * it has lots of index tables, each indexing something in another one...
 * Here we just use what is needed to read the chunks
 */

typedef struct MOV_sample_to_chunk_tbl {
    long first;
    long count;
    long id;
} MOV_sample_to_chunk_tbl;

169 170 171 172 173 174 175 176 177 178 179 180 181
typedef struct {
    uint32_t type;
    int64_t offset;
    int64_t size; /* total size (excluding the size and type fields) */
} MOV_atom_t;

typedef struct {
    int seed;
    int flags;
    int size;
    void* clrs;
} MOV_ctab_t;

182 183 184 185 186
typedef struct MOV_mdat_atom_s {
    offset_t offset;
    int64_t size;
} MOV_mdat_atom_t;

187 188 189 190 191 192
typedef struct {
    uint8_t  version;
    uint32_t flags; // 24bit

    /* 0x03 ESDescrTag */
    uint16_t es_id;
193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211
#define MP4ODescrTag                    0x01
#define MP4IODescrTag                   0x02
#define MP4ESDescrTag                   0x03
#define MP4DecConfigDescrTag            0x04
#define MP4DecSpecificDescrTag          0x05
#define MP4SLConfigDescrTag             0x06
#define MP4ContentIdDescrTag            0x07
#define MP4SupplContentIdDescrTag       0x08
#define MP4IPIPtrDescrTag               0x09
#define MP4IPMPPtrDescrTag              0x0A
#define MP4IPMPDescrTag                 0x0B
#define MP4RegistrationDescrTag         0x0D
#define MP4ESIDIncDescrTag              0x0E
#define MP4ESIDRefDescrTag              0x0F
#define MP4FileIODescrTag               0x10
#define MP4FileODescrTag                0x11
#define MP4ExtProfileLevelDescrTag      0x13
#define MP4ExtDescrTagsStart            0x80
#define MP4ExtDescrTagsEnd              0xFE
212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234
    uint8_t  stream_priority;

    /* 0x04 DecConfigDescrTag */
    uint8_t  object_type_id;
    uint8_t  stream_type;
    /* XXX: really streamType is
     * only 6bit, followed by:
     * 1bit  upStream
     * 1bit  reserved
     */
    uint32_t buffer_size_db; // 24
    uint32_t max_bitrate;
    uint32_t avg_bitrate;

    /* 0x05 DecSpecificDescrTag */
    uint8_t  decoder_cfg_len;
    uint8_t *decoder_cfg;

    /* 0x06 SLConfigDescrTag */
    uint8_t  sl_config_len;
    uint8_t *sl_config;
} MOV_esds_t;

235 236
struct MOVParseTableEntry;

237 238 239 240
typedef struct MOVStreamContext {
    int ffindex; /* the ffmpeg stream id */
    long next_chunk;
    long chunk_count;
241
    int64_t *chunk_offsets;
M
cleanup  
Michael Niedermayer 已提交
242 243
    int stts_count;
    Time2Sample *stts_data;
M
Michael Niedermayer 已提交
244 245
    int ctts_count;
    Time2Sample *ctts_data;
M
cleanup  
Michael Niedermayer 已提交
246
    int edit_count;             /* number of 'edit' (elst atom) */
247 248
    long sample_to_chunk_sz;
    MOV_sample_to_chunk_tbl *sample_to_chunk;
M
Michael Niedermayer 已提交
249 250
    int sample_to_ctime_index;
    int sample_to_ctime_sample;
251 252 253
    long sample_size;
    long sample_count;
    long *sample_sizes;
254 255
    long keyframe_count;
    long *keyframes;
256
    int time_scale;
257
    int time_rate;
258
    long current_sample;
259
    MOV_esds_t esds;
260
    AVRational sample_size_v1;
261
    int dv_audio_container;
262 263 264 265 266
} MOVStreamContext;

typedef struct MOVContext {
    int mp4; /* set to 1 as soon as we are sure that the file is an .mp4 file (even some header parsing depends on this) */
    AVFormatContext *fc;
267
    int time_scale;
B
Baptiste Coudurier 已提交
268
    int64_t duration; /* duration of the longest track */
269 270
    int found_moov; /* when both 'moov' and 'mdat' sections has been found */
    int found_mdat; /* we suppose we have enough data to read the file */
271 272
    int64_t mdat_size;
    int64_t mdat_offset;
273 274 275 276 277
    int total_streams;
    /* some streams listed here aren't presented to the ffmpeg API, since they aren't either video nor audio
     * but we need the info to be able to skip data from those streams in the 'mdat' section
     */
    MOVStreamContext *streams[MAX_STREAMS];
278

279 280
    int ctab_size;
    MOV_ctab_t **ctab;           /* color tables */
281 282
    const struct MOVParseTableEntry *parse_table; /* could be eventually used to change the table */
    /* NOTE: for recursion save to/ restore from local variable! */
283 284

    AVPaletteControl palette_control;
285 286
    MOV_mdat_atom_t *mdat_list;
    int mdat_count;
287 288
    DVDemuxContext *dv_demux;
    AVFormatContext *dv_fctx;
289 290 291 292 293 294 295 296 297 298 299
} MOVContext;


/* XXX: it's the first time I make a recursive parser I think... sorry if it's ugly :P */

/* those functions parse an atom */
/* return code:
 1: found what I wanted, exit
 0: continue to parse next atom
 -1: error occured, exit
 */
300
typedef int (*mov_parse_function)(MOVContext *ctx, ByteIOContext *pb, MOV_atom_t atom);
301 302 303

/* links atom IDs to parse functions */
typedef struct MOVParseTableEntry {
304
    uint32_t type;
305 306 307
    mov_parse_function func;
} MOVParseTableEntry;

308
static int mov_read_leaf(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
309
{
310 311 312
    if (atom.size>1)
        url_fskip(pb, atom.size);
/*        url_seek(pb, atom_offset+atom.size, SEEK_SET); */
313 314 315
    return 0;
}

316
static int mov_read_default(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
317
{
318
    int64_t total_size = 0;
319
    MOV_atom_t a;
320 321
    int i;
    int err = 0;
322 323

    a.offset = atom.offset;
324

325
    if (atom.size < 0)
326
        atom.size = 0x7fffffffffffffffLL;
327
    while(((total_size + 8) < atom.size) && !url_feof(pb) && !err) {
328 329
        a.size = atom.size;
        a.type=0L;
330
        if(atom.size >= 8) {
331
            a.size = get_be32(pb);
332
            a.type = get_le32(pb);
333
        }
334
        total_size += 8;
335
        a.offset += 8;
336
        dprintf("type: %08x  %.4s  sz: %"PRIx64"  %"PRIx64"   %"PRIx64"\n", a.type, (char*)&a.type, a.size, atom.size, total_size);
337
        if (a.size == 1) { /* 64 bit extended size */
338
            a.size = get_be64(pb) - 8;
339 340
            a.offset += 8;
            total_size += 8;
341
        }
342 343 344
        if (a.size == 0) {
            a.size = atom.size - total_size;
            if (a.size <= 8)
345
                break;
346 347 348 349
        }
        for (i = 0; c->parse_table[i].type != 0L
             && c->parse_table[i].type != a.type; i++)
            /* empty */;
350

351
        a.size -= 8;
352

353 354
        if(a.size < 0)
            break;
355

356
        if (c->parse_table[i].type == 0) { /* skip leaf atoms data */
357
            url_fskip(pb, a.size);
358
        } else {
359 360
            offset_t start_pos = url_ftell(pb);
            int64_t left;
361
            err = (c->parse_table[i].func)(c, pb, a);
362 363 364
            left = a.size - url_ftell(pb) + start_pos;
            if (left > 0) /* skip garbage at atom end */
                url_fskip(pb, left);
365
        }
366

367
        a.offset += a.size;
368
        total_size += a.size;
369 370
    }

371 372
    if (!err && total_size < atom.size && atom.size < 0x7ffff) {
        url_fskip(pb, atom.size - total_size);
373 374
    }

375 376 377
    return err;
}

378
static int mov_read_ctab(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
379
{
380 381 382 383
#if 1
    url_fskip(pb, atom.size); // for now
#else
    VERY VERY BROKEN, NEVER execute this, needs rewrite
384 385
    unsigned int len;
    MOV_ctab_t *t;
386 387 388 389 390 391 392
    c->ctab = av_realloc(c->ctab, ++c->ctab_size);
    t = c->ctab[c->ctab_size];
    t->seed = get_be32(pb);
    t->flags = get_be16(pb);
    t->size = get_be16(pb) + 1;
    len = 2 * t->size * 4;
    if (len > 0) {
393 394 395
        t->clrs = av_malloc(len); // 16bit A R G B
        if (t->clrs)
            get_buffer(pb, t->clrs, len);
396
    }
397
#endif
398

399 400 401
    return 0;
}

402
static int mov_read_hdlr(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
403
{
404
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
405
    int len = 0;
406 407
    uint32_t type;
    uint32_t ctype;
408

409 410 411 412 413 414 415
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    /* component type */
    ctype = get_le32(pb);
    type = get_le32(pb); /* component subtype */

416 417
    dprintf("ctype= %c%c%c%c (0x%08lx)\n", *((char *)&ctype), ((char *)&ctype)[1], ((char *)&ctype)[2], ((char *)&ctype)[3], (long) ctype);
    dprintf("stype= %c%c%c%c\n", *((char *)&type), ((char *)&type)[1], ((char *)&type)[2], ((char *)&type)[3]);
418
    if(ctype == MKTAG('m', 'h', 'l', 'r')) /* MOV */
419
        c->mp4 = 0;
420
    else if(ctype == 0)
421
        c->mp4 = 1;
422 423 424 425
    if(type == MKTAG('v', 'i', 'd', 'e'))
        st->codec->codec_type = CODEC_TYPE_VIDEO;
    else if(type == MKTAG('s', 'o', 'u', 'n'))
        st->codec->codec_type = CODEC_TYPE_AUDIO;
426 427 428 429
    get_be32(pb); /* component  manufacture */
    get_be32(pb); /* component flags */
    get_be32(pb); /* component flags mask */

430
    if(atom.size <= 24)
431 432 433
        return 0; /* nothing left to read */
    /* XXX: MP4 uses a C string, not a pascal one */
    /* component name */
434 435 436

    if(c->mp4) {
        /* .mp4: C string */
437
        while(get_byte(pb) && (++len < (atom.size - 24)));
438 439 440
    } else {
        /* .mov: PASCAL string */
        len = get_byte(pb);
441
        url_fskip(pb, len);
442
    }
443

444
    url_fskip(pb, atom.size - (url_ftell(pb) - atom.offset));
445 446 447
    return 0;
}

448
static int mov_mp4_read_descr_len(ByteIOContext *pb)
449
{
450
    int len = 0;
451 452
    int count = 4;
    while (count--) {
453
        int c = get_byte(pb);
454 455 456
        len = (len << 7) | (c & 0x7f);
        if (!(c & 0x80))
            break;
457 458 459 460
    }
    return len;
}

461
static int mov_mp4_read_descr(ByteIOContext *pb, int *tag)
462 463 464
{
    int len;
    *tag = get_byte(pb);
465
    len = mov_mp4_read_descr_len(pb);
466
    dprintf("MPEG4 description: tag=0x%02x len=%d\n", *tag, len);
467 468 469
    return len;
}

470
static int mov_read_esds(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
471 472 473 474
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
    int tag, len;
475

476 477
    /* Well, broken but suffisant for some MP4 streams */
    get_be32(pb); /* version + flags */
478
    len = mov_mp4_read_descr(pb, &tag);
479
    if (tag == MP4ESDescrTag) {
480 481
        get_be16(pb); /* ID */
        get_byte(pb); /* priority */
482
    } else
483
        get_be16(pb); /* ID */
484

485
    len = mov_mp4_read_descr(pb, &tag);
486
    if (tag == MP4DecConfigDescrTag) {
487 488 489 490 491 492
        sc->esds.object_type_id = get_byte(pb);
        sc->esds.stream_type = get_byte(pb);
        sc->esds.buffer_size_db = get_be24(pb);
        sc->esds.max_bitrate = get_be32(pb);
        sc->esds.avg_bitrate = get_be32(pb);

493
        st->codec->codec_id= codec_get_id(ff_mov_obj_type, sc->esds.object_type_id);
B
Baptiste Coudurier 已提交
494
        dprintf("esds object type id %d\n", sc->esds.object_type_id);
495 496
        len = mov_mp4_read_descr(pb, &tag);
        if (tag == MP4DecSpecificDescrTag) {
497
            dprintf("Specific MPEG4 header len=%d\n", len);
B
Baptiste Coudurier 已提交
498
            st->codec->extradata = av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
499 500 501
            if (st->codec->extradata) {
                get_buffer(pb, st->codec->extradata, len);
                st->codec->extradata_size = len;
502
                /* from mplayer */
B
Baptiste Coudurier 已提交
503
                if ((*st->codec->extradata >> 3) == 29) {
504 505
                    st->codec->codec_id = CODEC_ID_MP3ON4;
                }
506 507
            }
        }
508 509 510 511
    }
    return 0;
}

512 513
/* this atom contains actual media data */
static int mov_read_mdat(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
514
{
515 516
    if(atom.size == 0) /* wrong one (MP4) */
        return 0;
517 518 519 520
    c->mdat_list = av_realloc(c->mdat_list, (c->mdat_count + 1) * sizeof(*c->mdat_list));
    c->mdat_list[c->mdat_count].offset = atom.offset;
    c->mdat_list[c->mdat_count].size = atom.size;
    c->mdat_count++;
521 522 523 524 525 526 527 528 529
    c->found_mdat=1;
    c->mdat_offset = atom.offset;
    c->mdat_size = atom.size;
    if(c->found_moov)
        return 1; /* found both, just go */
    url_fskip(pb, atom.size);
    return 0; /* now go for moov */
}

530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547
static int mov_read_ftyp(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    uint32_t type = get_le32(pb);

    /* from mplayer */
    switch (type) {
    case MKTAG('i', 's', 'o', 'm'):
    case MKTAG('m', 'p', '4', '1'):
    case MKTAG('m', 'p', '4', '2'):
    case MKTAG('3', 'g', 'p', '1'):
    case MKTAG('3', 'g', 'p', '2'):
    case MKTAG('3', 'g', '2', 'a'):
    case MKTAG('3', 'g', 'p', '3'):
    case MKTAG('3', 'g', 'p', '4'):
    case MKTAG('3', 'g', 'p', '5'):
    case MKTAG('m', 'm', 'p', '4'): /* Mobile MP4 */
    case MKTAG('M', '4', 'A', ' '): /* Apple iTunes AAC-LC Audio */
    case MKTAG('M', '4', 'P', ' '): /* Apple iTunes AAC-LC Protected Audio */
548
    case MKTAG('m', 'j', 'p', '2'): /* Motion Jpeg 2000 */
549 550
        c->mp4 = 1;
    case MKTAG('q', 't', ' ', ' '):
551
    default:
552 553 554 555 556 557 558
        av_log(c->fc, AV_LOG_DEBUG, "ISO: File Type Major Brand: %.4s\n",(char *)&type);
    }
    get_be32(pb); /* minor version */
    url_fskip(pb, atom.size - 8);
    return 0;
}

559 560 561 562
/* this atom should contain all header atoms */
static int mov_read_moov(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    int err;
563

564 565 566 567 568 569 570 571 572 573 574 575
    err = mov_read_default(c, pb, atom);
    /* we parsed the 'moov' atom, we can terminate the parsing as soon as we find the 'mdat' */
    /* so we don't parse the whole file if over a network */
    c->found_moov=1;
    if(c->found_mdat)
        return 1; /* found both, just go */
    return 0; /* now go for mdat */
}


static int mov_read_mdhd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
B
clean  
Baptiste Coudurier 已提交
576 577 578
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
    int version = get_byte(pb);
579
    int lang;
580

581 582
    if (version > 1)
        return 1; /* unsupported */
583 584 585 586

    get_byte(pb); get_byte(pb);
    get_byte(pb); /* flags */

B
clean  
Baptiste Coudurier 已提交
587 588 589 590 591 592 593
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
594

B
clean  
Baptiste Coudurier 已提交
595 596
    sc->time_scale = get_be32(pb);
    st->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
597

598
    lang = get_be16(pb); /* language */
B
clean  
Baptiste Coudurier 已提交
599
    ff_mov_lang_to_iso639(lang, st->language);
600 601 602 603 604 605 606
    get_be16(pb); /* quality */

    return 0;
}

static int mov_read_mvhd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
B
Baptiste Coudurier 已提交
607
    int version = get_byte(pb); /* version */
608 609
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

B
Baptiste Coudurier 已提交
610 611 612 613 614 615 616
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
617 618
    c->time_scale = get_be32(pb); /* time scale */
#ifdef DEBUG
G
Gael Chardon 已提交
619
    av_log(NULL, AV_LOG_DEBUG, "time scale = %i\n", c->time_scale);
620
#endif
B
Baptiste Coudurier 已提交
621
    c->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640
    get_be32(pb); /* preferred scale */

    get_be16(pb); /* preferred volume */

    url_fskip(pb, 10); /* reserved */

    url_fskip(pb, 36); /* display matrix */

    get_be32(pb); /* preview time */
    get_be32(pb); /* preview duration */
    get_be32(pb); /* poster time */
    get_be32(pb); /* selection time */
    get_be32(pb); /* selection duration */
    get_be32(pb); /* current time */
    get_be32(pb); /* next track ID */

    return 0;
}

641 642 643 644
static int mov_read_smi(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];

645 646
    if((uint64_t)atom.size > (1<<30))
        return -1;
647

648 649
    // currently SVQ3 decoder expect full STSD header - so let's fake it
    // this should be fixed and just SMI header should be passed
650 651
    av_free(st->codec->extradata);
    st->codec->extradata_size = 0x5a + atom.size;
B
Baptiste Coudurier 已提交
652
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
653 654

    if (st->codec->extradata) {
655
        strcpy(st->codec->extradata, "SVQ3"); // fake
B
Baptiste Coudurier 已提交
656 657
        get_buffer(pb, st->codec->extradata + 0x5a, atom.size);
        dprintf("Reading SMI %"PRId64"  %s\n", atom.size, st->codec->extradata + 0x5a);
658
    } else
659
        url_fskip(pb, atom.size);
660 661 662

    return 0;
}
663

664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692
static int mov_read_enda(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    int little_endian = get_be16(pb);

    if (little_endian) {
        switch (st->codec->codec_id) {
        case CODEC_ID_PCM_S24BE:
            st->codec->codec_id = CODEC_ID_PCM_S24LE;
            break;
        case CODEC_ID_PCM_S32BE:
            st->codec->codec_id = CODEC_ID_PCM_S32LE;
            break;
        default:
            break;
        }
    }
    return 0;
}

static int mov_read_alac(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];

    // currently ALAC decoder expect full atom header - so let's fake it
    // this should be fixed and just ALAC header should be passed

    av_free(st->codec->extradata);
    st->codec->extradata_size = 36;
B
Baptiste Coudurier 已提交
693
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
694 695

    if (st->codec->extradata) {
B
Baptiste Coudurier 已提交
696 697 698
        strcpy(st->codec->extradata + 4, "alac"); // fake
        get_buffer(pb, st->codec->extradata + 8, 36 - 8);
        dprintf("Reading alac %d  %s\n", st->codec->extradata_size, st->codec->extradata);
699 700 701 702 703
    } else
        url_fskip(pb, atom.size);
    return 0;
}

R
Roberto Togni 已提交
704 705 706 707 708 709
static int mov_read_wave(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];

    if((uint64_t)atom.size > (1<<30))
        return -1;
710

711 712 713 714
    if (st->codec->codec_id == CODEC_ID_QDM2) {
        // pass all frma atom to codec, needed at least for QDM2
        av_free(st->codec->extradata);
        st->codec->extradata_size = atom.size;
B
Baptiste Coudurier 已提交
715
        st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
716 717 718 719 720 721 722

        if (st->codec->extradata) {
            get_buffer(pb, st->codec->extradata, atom.size);
        } else
            url_fskip(pb, atom.size);
    } else if (atom.size > 8) { /* to read frma, esds atoms */
        mov_read_default(c, pb, atom);
723
    } else
724
        url_fskip(pb, atom.size);
R
Roberto Togni 已提交
725 726 727
    return 0;
}

728 729 730 731 732 733 734 735 736 737
static int mov_read_jp2h(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];

    if((uint64_t)atom.size > (1<<30))
        return -1;

    av_free(st->codec->extradata);

    st->codec->extradata_size = atom.size + 8;
B
Baptiste Coudurier 已提交
738
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
739 740 741

    /* pass all jp2h atom to codec */
    if (st->codec->extradata) {
B
Baptiste Coudurier 已提交
742 743
        strcpy(st->codec->extradata + 4, "jp2h");
        get_buffer(pb, st->codec->extradata + 8, atom.size);
744 745 746 747 748
    } else
        url_fskip(pb, atom.size);
    return 0;
}

749 750 751 752
static int mov_read_avcC(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];

753 754 755
    if((uint64_t)atom.size > (1<<30))
        return -1;

756
    av_free(st->codec->extradata);
757

758
    st->codec->extradata_size = atom.size;
B
Baptiste Coudurier 已提交
759
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
760

761
    if (st->codec->extradata) {
762
        get_buffer(pb, st->codec->extradata, atom.size);
763
    } else
764
        url_fskip(pb, atom.size);
765 766 767 768

    return 0;
}

769 770 771 772
static int mov_read_stco(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
773
    unsigned int i, entries;
774 775 776 777 778

    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);
779

780 781
    if(entries >= UINT_MAX/sizeof(int64_t))
        return -1;
782

783
    sc->chunk_count = entries;
B
Baptiste Coudurier 已提交
784
    sc->chunk_offsets = av_malloc(entries * sizeof(int64_t));
785 786 787 788 789 790 791 792 793 794 795 796
    if (!sc->chunk_offsets)
        return -1;
    if (atom.type == MKTAG('s', 't', 'c', 'o')) {
        for(i=0; i<entries; i++) {
            sc->chunk_offsets[i] = get_be32(pb);
        }
    } else if (atom.type == MKTAG('c', 'o', '6', '4')) {
        for(i=0; i<entries; i++) {
            sc->chunk_offsets[i] = get_be64(pb);
        }
    } else
        return -1;
797

798 799 800 801 802 803
    return 0;
}

static int mov_read_stsd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
804
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
805 806
    int entries, frames_per_sample;
    uint32_t format;
807
    uint8_t codec_name[32];
808

809 810 811 812 813 814 815 816 817 818 819 820
    /* for palette traversal */
    int color_depth;
    int color_start;
    int color_count;
    int color_end;
    int color_index;
    int color_dec;
    int color_greyscale;
    unsigned char *color_table;
    int j;
    unsigned char r, g, b;

821 822 823 824 825
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);

826
    while(entries--) { //Parsing Sample description table
827
        enum CodecID id;
828
        MOV_atom_t a = { 0, 0, 0 };
829
        offset_t start_pos = url_ftell(pb);
830
        int size = get_be32(pb); /* size */
831
        format = get_le32(pb); /* data format */
832

833 834 835
        get_be32(pb); /* reserved */
        get_be16(pb); /* reserved */
        get_be16(pb); /* index */
836

837 838 839 840 841 842
        if (st->codec->codec_tag) {
            /* multiple fourcc, just skip for now */
            url_fskip(pb, size - (url_ftell(pb) - start_pos));
            continue;
        }

843
        st->codec->codec_tag = format;
844 845 846
        id = codec_get_id(mov_audio_tags, format);
        if (id > 0) {
            st->codec->codec_type = CODEC_TYPE_AUDIO;
847
        } else if (format && format != MKTAG('m', 'p', '4', 's')) { /* skip old asf mpeg4 tag */
848
            id = codec_get_id(mov_video_tags, format);
849
            if (id <= 0)
850
                id = codec_get_id(codec_bmp_tags, format);
851 852 853 854
            if (id > 0)
                st->codec->codec_type = CODEC_TYPE_VIDEO;
        }

855 856 857 858 859
        dprintf("size=%d 4CC= %c%c%c%c codec_type=%d\n",
                size,
                (format >> 0) & 0xff, (format >> 8) & 0xff, (format >> 16) & 0xff, (format >> 24) & 0xff,
                st->codec->codec_type);

860
        if(st->codec->codec_type==CODEC_TYPE_VIDEO) {
861
            st->codec->codec_id = id;
862 863 864 865 866
            get_be16(pb); /* version */
            get_be16(pb); /* revision level */
            get_be32(pb); /* vendor */
            get_be32(pb); /* temporal quality */
            get_be32(pb); /* spacial quality */
867 868 869 870

            st->codec->width = get_be16(pb); /* width */
            st->codec->height = get_be16(pb); /* height */

871 872 873
            get_be32(pb); /* horiz resolution */
            get_be32(pb); /* vert resolution */
            get_be32(pb); /* data size, always 0 */
874
            frames_per_sample = get_be16(pb); /* frames per samples */
875
#ifdef DEBUG
876
            av_log(NULL, AV_LOG_DEBUG, "frames/samples = %d\n", frames_per_sample);
877
#endif
B
Baptiste Coudurier 已提交
878 879 880 881 882
            get_buffer(pb, codec_name, 32); /* codec name, pascal string (FIXME: true for mp4?) */
            if (codec_name[0] <= 31) {
                memcpy(st->codec->codec_name, &codec_name[1],codec_name[0]);
                st->codec->codec_name[codec_name[0]] = 0;
            }
883

884
            st->codec->bits_per_sample = get_be16(pb); /* depth */
885
            st->codec->color_table_id = get_be16(pb); /* colortable id */
886

887
            /* figure out the palette situation */
888 889
            color_depth = st->codec->bits_per_sample & 0x1F;
            color_greyscale = st->codec->bits_per_sample & 0x20;
890 891

            /* if the depth is 2, 4, or 8 bpp, file is palettized */
892
            if ((color_depth == 2) || (color_depth == 4) ||
893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909
                (color_depth == 8)) {

                if (color_greyscale) {

                    /* compute the greyscale palette */
                    color_count = 1 << color_depth;
                    color_index = 255;
                    color_dec = 256 / (color_count - 1);
                    for (j = 0; j < color_count; j++) {
                        r = g = b = color_index;
                        c->palette_control.palette[j] =
                            (r << 16) | (g << 8) | (b);
                        color_index -= color_dec;
                        if (color_index < 0)
                            color_index = 0;
                    }

910
                } else if (st->codec->color_table_id & 0x08) {
911 912 913 914

                    /* if flag bit 3 is set, use the default palette */
                    color_count = 1 << color_depth;
                    if (color_depth == 2)
M
Michael Niedermayer 已提交
915
                        color_table = ff_qt_default_palette_4;
916
                    else if (color_depth == 4)
M
Michael Niedermayer 已提交
917
                        color_table = ff_qt_default_palette_16;
918
                    else
M
Michael Niedermayer 已提交
919
                        color_table = ff_qt_default_palette_256;
920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951

                    for (j = 0; j < color_count; j++) {
                        r = color_table[j * 4 + 0];
                        g = color_table[j * 4 + 1];
                        b = color_table[j * 4 + 2];
                        c->palette_control.palette[j] =
                            (r << 16) | (g << 8) | (b);
                    }

                } else {

                    /* load the palette from the file */
                    color_start = get_be32(pb);
                    color_count = get_be16(pb);
                    color_end = get_be16(pb);
                    for (j = color_start; j <= color_end; j++) {
                        /* each R, G, or B component is 16 bits;
                         * only use the top 8 bits; skip alpha bytes
                         * up front */
                        get_byte(pb);
                        get_byte(pb);
                        r = get_byte(pb);
                        get_byte(pb);
                        g = get_byte(pb);
                        get_byte(pb);
                        b = get_byte(pb);
                        get_byte(pb);
                        c->palette_control.palette[j] =
                            (r << 16) | (g << 8) | (b);
                    }
                }

952 953
                st->codec->palctrl = &c->palette_control;
                st->codec->palctrl->palette_changed = 1;
954
            } else
955
                st->codec->palctrl = NULL;
956
        } else if(st->codec->codec_type==CODEC_TYPE_AUDIO) {
957
            int bits_per_sample;
958
            uint16_t version = get_be16(pb);
959

960
            st->codec->codec_id = id;
961 962
            get_be16(pb); /* revision level */
            get_be32(pb); /* vendor */
963

964
            st->codec->channels = get_be16(pb);             /* channel count */
B
Baptiste Coudurier 已提交
965
            dprintf("audio channels %d\n", st->codec->channels);
966 967 968 969 970 971 972 973 974 975
            st->codec->bits_per_sample = get_be16(pb);      /* sample size */
            /* do we need to force to 16 for AMR ? */

            /* handle specific s8 codec */
            get_be16(pb); /* compression id = 0*/
            get_be16(pb); /* packet size = 0 */

            st->codec->sample_rate = ((get_be32(pb) >> 16));

            switch (st->codec->codec_id) {
976 977 978 979 980
            case CODEC_ID_PCM_S8:
            case CODEC_ID_PCM_U8:
                if (st->codec->bits_per_sample == 16)
                    st->codec->codec_id = CODEC_ID_PCM_S16BE;
                break;
981
            case CODEC_ID_PCM_S16LE:
982 983 984
            case CODEC_ID_PCM_S16BE:
                if (st->codec->bits_per_sample == 8)
                    st->codec->codec_id = CODEC_ID_PCM_S8;
985 986
                else if (st->codec->bits_per_sample == 24)
                    st->codec->codec_id = CODEC_ID_PCM_S24BE;
987 988 989
                break;
            default:
                break;
990
            }
991

992 993 994
            //Read QT version 1 fields. In version 0 theese dont exist
            dprintf("version =%d mp4=%d\n",version,c->mp4);
            if(version==1) {
995
                sc->sample_size_v1.den = get_be32(pb); /* samples per packet */
996
                get_be32(pb); /* bytes per packet */
997
                sc->sample_size_v1.num = get_be32(pb); /* bytes per frame */
998
                get_be32(pb); /* bytes per sample */
999 1000 1001 1002 1003 1004 1005 1006 1007
            } else if(version==2) {
                get_be32(pb); /* sizeof struct only */
                st->codec->sample_rate = av_int2dbl(get_be64(pb)); /* float 64 */
                st->codec->channels = get_be32(pb);
                get_be32(pb); /* always 0x7F000000 */
                get_be32(pb); /* bits per channel if sound is uncompressed */
                get_be32(pb); /* lcpm format specific flag */
                get_be32(pb); /* bytes per audio packet if constant */
                get_be32(pb); /* lpcm frames per audio packet if constant */
1008
            }
1009 1010 1011 1012 1013 1014

            bits_per_sample = av_get_bits_per_sample(st->codec->codec_id);
            if (bits_per_sample) {
                st->codec->bits_per_sample = bits_per_sample;
                sc->sample_size = (bits_per_sample >> 3) * st->codec->channels;
            }
1015 1016 1017
        } else {
            /* other codec type, just skip (rtp, mp4s, tmcd ...) */
            url_fskip(pb, size - (url_ftell(pb) - start_pos));
1018
        }
1019 1020 1021 1022 1023 1024
        /* this will read extra atoms at the end (wave, alac, damr, avcC, SMI ...) */
        a.size = size - (url_ftell(pb) - start_pos);
        if (a.size > 8)
            mov_read_default(c, pb, a);
        else if (a.size > 0)
            url_fskip(pb, a.size);
1025
    }
1026

1027 1028 1029
    if(st->codec->codec_type==CODEC_TYPE_AUDIO && st->codec->sample_rate==0 && sc->time_scale>1) {
        st->codec->sample_rate= sc->time_scale;
    }
1030

1031
    /* special codec parameters handling */
1032
    switch (st->codec->codec_id) {
1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044
#ifdef CONFIG_H261_DECODER
    case CODEC_ID_H261:
#endif
#ifdef CONFIG_H263_DECODER
    case CODEC_ID_H263:
#endif
#ifdef CONFIG_MPEG4_DECODER
    case CODEC_ID_MPEG4:
#endif
        st->codec->width= 0; /* let decoder init width/height */
        st->codec->height= 0;
        break;
1045
#ifdef CONFIG_FAAD
1046
    case CODEC_ID_AAC:
1047 1048 1049
#endif
#ifdef CONFIG_VORBIS_DECODER
    case CODEC_ID_VORBIS:
1050
#endif
1051 1052 1053
    case CODEC_ID_MP3ON4:
        st->codec->sample_rate= 0; /* let decoder init parameters properly */
        break;
1054
#ifdef CONFIG_DV_DEMUXER
1055 1056 1057 1058 1059 1060 1061 1062 1063 1064
    case CODEC_ID_DVAUDIO:
        c->dv_fctx = av_alloc_format_context();
        c->dv_demux = dv_init_demux(c->dv_fctx);
        if (!c->dv_demux) {
            av_log(c->fc, AV_LOG_ERROR, "dv demux context init error\n");
            return -1;
        }
        sc->dv_audio_container = 1;
        st->codec->codec_id = CODEC_ID_PCM_S16LE;
        break;
1065
#endif
1066 1067 1068 1069 1070 1071 1072 1073 1074
    /* no ifdef since parameters are always those */
    case CODEC_ID_AMR_WB:
        st->codec->sample_rate= 16000;
        st->codec->channels= 1; /* really needed */
        break;
    case CODEC_ID_AMR_NB:
        st->codec->sample_rate= 8000;
        st->codec->channels= 1; /* really needed */
        break;
1075 1076 1077
    case CODEC_ID_MP2:
        st->need_parsing = 1;
        break;
1078 1079 1080
    default:
        break;
    }
1081

1082 1083 1084
    return 0;
}

1085
static int mov_read_stsc(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1086
{
1087 1088
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1089
    unsigned int i, entries;
1090

1091 1092 1093 1094
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);
1095

1096 1097
    if(entries >= UINT_MAX / sizeof(MOV_sample_to_chunk_tbl))
        return -1;
1098

1099
#ifdef DEBUG
G
Gael Chardon 已提交
1100
av_log(NULL, AV_LOG_DEBUG, "track[%i].stsc.entries = %i\n", c->fc->nb_streams-1, entries);
1101
#endif
1102
    sc->sample_to_chunk_sz = entries;
B
Baptiste Coudurier 已提交
1103
    sc->sample_to_chunk = av_malloc(entries * sizeof(MOV_sample_to_chunk_tbl));
1104 1105
    if (!sc->sample_to_chunk)
        return -1;
1106 1107 1108 1109 1110 1111 1112 1113
    for(i=0; i<entries; i++) {
        sc->sample_to_chunk[i].first = get_be32(pb);
        sc->sample_to_chunk[i].count = get_be32(pb);
        sc->sample_to_chunk[i].id = get_be32(pb);
    }
    return 0;
}

1114 1115 1116 1117
static int mov_read_stss(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1118
    unsigned int i, entries;
1119 1120 1121 1122 1123

    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);
1124

1125 1126
    if(entries >= UINT_MAX / sizeof(long))
        return -1;
1127

1128 1129 1130 1131
    sc->keyframe_count = entries;
#ifdef DEBUG
    av_log(NULL, AV_LOG_DEBUG, "keyframe_count = %ld\n", sc->keyframe_count);
#endif
B
Baptiste Coudurier 已提交
1132
    sc->keyframes = av_malloc(entries * sizeof(long));
1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143
    if (!sc->keyframes)
        return -1;
    for(i=0; i<entries; i++) {
        sc->keyframes[i] = get_be32(pb);
#ifdef DEBUG
/*        av_log(NULL, AV_LOG_DEBUG, "keyframes[]=%ld\n", sc->keyframes[i]); */
#endif
    }
    return 0;
}

1144
static int mov_read_stsz(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1145
{
1146 1147
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1148
    unsigned int i, entries, sample_size;
1149

1150 1151
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
1152

1153 1154 1155
    sample_size = get_be32(pb);
    if (!sc->sample_size) /* do not overwrite value computed in stsd */
        sc->sample_size = sample_size;
1156
    entries = get_be32(pb);
1157 1158 1159
    if(entries >= UINT_MAX / sizeof(long))
        return -1;

1160
    sc->sample_count = entries;
1161 1162 1163
    if (sample_size)
        return 0;

1164
#ifdef DEBUG
G
Gael Chardon 已提交
1165
    av_log(NULL, AV_LOG_DEBUG, "sample_size = %ld sample_count = %ld\n", sc->sample_size, sc->sample_count);
1166
#endif
B
Baptiste Coudurier 已提交
1167
    sc->sample_sizes = av_malloc(entries * sizeof(long));
1168 1169
    if (!sc->sample_sizes)
        return -1;
1170 1171 1172
    for(i=0; i<entries; i++) {
        sc->sample_sizes[i] = get_be32(pb);
#ifdef DEBUG
1173
        av_log(NULL, AV_LOG_DEBUG, "sample_sizes[]=%ld\n", sc->sample_sizes[i]);
1174 1175 1176 1177 1178
#endif
    }
    return 0;
}

1179
static int mov_read_stts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1180
{
1181
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
1182
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1183
    unsigned int i, entries;
1184 1185
    int64_t duration=0;
    int64_t total_sample_count=0;
1186

1187 1188 1189
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
    entries = get_be32(pb);
M
cleanup  
Michael Niedermayer 已提交
1190
    if(entries >= UINT_MAX / sizeof(Time2Sample))
1191
        return -1;
1192

1193 1194
    sc->stts_count = entries;
    sc->stts_data = av_malloc(entries * sizeof(Time2Sample));
1195

1196
#ifdef DEBUG
G
Gael Chardon 已提交
1197
av_log(NULL, AV_LOG_DEBUG, "track[%i].stts.entries = %i\n", c->fc->nb_streams-1, entries);
1198
#endif
1199 1200 1201

    sc->time_rate=0;

1202
    for(i=0; i<entries; i++) {
M
cleanup  
Michael Niedermayer 已提交
1203 1204
        int sample_duration;
        int sample_count;
1205

1206
        sample_count=get_be32(pb);
1207
        sample_duration = get_be32(pb);
1208 1209 1210 1211
        sc->stts_data[i].count= sample_count;
        sc->stts_data[i].duration= sample_duration;

        sc->time_rate= ff_gcd(sc->time_rate, sample_duration);
1212

1213 1214
        dprintf("sample_count=%d, sample_duration=%d\n",sample_count,sample_duration);

B
Baptiste Coudurier 已提交
1215
        duration+=(int64_t)sample_duration*sample_count;
1216 1217 1218
        total_sample_count+=sample_count;
    }

1219 1220 1221
    st->nb_frames= total_sample_count;
    if(duration)
        st->duration= duration;
1222 1223 1224
    return 0;
}

M
Michael Niedermayer 已提交
1225 1226
static int mov_read_ctts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
1227 1228
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
M
Michael Niedermayer 已提交
1229 1230 1231 1232 1233 1234 1235 1236
    unsigned int i, entries;

    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
    entries = get_be32(pb);
    if(entries >= UINT_MAX / sizeof(Time2Sample))
        return -1;

1237 1238
    sc->ctts_count = entries;
    sc->ctts_data = av_malloc(entries * sizeof(Time2Sample));
M
Michael Niedermayer 已提交
1239

1240 1241
    dprintf("track[%i].ctts.entries = %i\n", c->fc->nb_streams-1, entries);

M
Michael Niedermayer 已提交
1242
    for(i=0; i<entries; i++) {
1243 1244 1245
        int count    =get_be32(pb);
        int duration =get_be32(pb);

1246 1247 1248 1249 1250 1251
        if (duration < 0) {
            av_log(c->fc, AV_LOG_ERROR, "negative ctts, ignoring\n");
            sc->ctts_count = 0;
            url_fskip(pb, 8 * (entries - i - 1));
            break;
        }
1252 1253 1254 1255
        sc->ctts_data[i].count   = count;
        sc->ctts_data[i].duration= duration;

        sc->time_rate= ff_gcd(sc->time_rate, duration);
M
Michael Niedermayer 已提交
1256 1257 1258 1259
    }
    return 0;
}

1260 1261 1262 1263 1264 1265 1266
static int mov_read_trak(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    AVStream *st;
    MOVStreamContext *sc;

    st = av_new_stream(c->fc, c->fc->nb_streams);
    if (!st) return -2;
B
Baptiste Coudurier 已提交
1267
    sc = av_mallocz(sizeof(MOVStreamContext));
1268
    if (!sc) {
1269
        av_free(st);
1270 1271 1272 1273
        return -1;
    }

    st->priv_data = sc;
1274
    st->codec->codec_type = CODEC_TYPE_DATA;
F
Fabrice Bellard 已提交
1275
    st->start_time = 0; /* XXX: check */
1276 1277 1278 1279 1280 1281 1282
    c->streams[c->fc->nb_streams-1] = sc;

    return mov_read_default(c, pb, atom);
}

static int mov_read_tkhd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
B
clean  
Baptiste Coudurier 已提交
1283 1284
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    int version = get_byte(pb);
1285 1286 1287 1288 1289 1290 1291 1292 1293 1294

    get_byte(pb); get_byte(pb);
    get_byte(pb); /* flags */
    /*
    MOV_TRACK_ENABLED 0x0001
    MOV_TRACK_IN_MOVIE 0x0002
    MOV_TRACK_IN_PREVIEW 0x0004
    MOV_TRACK_IN_POSTER 0x0008
    */

B
Baptiste Coudurier 已提交
1295 1296 1297 1298 1299 1300 1301
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
1302 1303
    st->id = (int)get_be32(pb); /* track id (NOT 0 !)*/
    get_be32(pb); /* reserved */
F
Fabrice Bellard 已提交
1304
    st->start_time = 0; /* check */
B
Baptiste Coudurier 已提交
1305
    (version == 1) ? get_be64(pb) : get_be32(pb); /* highlevel (considering edits) duration in movie timebase */
1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316
    get_be32(pb); /* reserved */
    get_be32(pb); /* reserved */

    get_be16(pb); /* layer */
    get_be16(pb); /* alternate group */
    get_be16(pb); /* volume */
    get_be16(pb); /* reserved */

    url_fskip(pb, 36); /* display matrix */

    /* those are fixed-point */
B
Baptiste Coudurier 已提交
1317 1318
    get_be32(pb); /* track width */
    get_be32(pb); /* track height */
1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338

    return 0;
}

/* this atom should be null (from specs), but some buggy files put the 'moov' atom inside it... */
/* like the files created with Adobe Premiere 5.0, for samples see */
/* http://graphics.tudelft.nl/~wouter/publications/soundtests/ */
static int mov_read_wide(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    int err;

    if (atom.size < 8)
        return 0; /* continue */
    if (get_be32(pb) != 0) { /* 0 sized mdat atom... use the 'wide' atom size */
        url_fskip(pb, atom.size - 4);
        return 0;
    }
    atom.type = get_le32(pb);
    atom.offset += 8;
    atom.size -= 8;
1339
    if (atom.type != MKTAG('m', 'd', 'a', 't')) {
1340 1341 1342 1343 1344 1345 1346 1347
        url_fskip(pb, atom.size);
        return 0;
    }
    err = mov_read_mdat(c, pb, atom);
    return err;
}


1348
#ifdef CONFIG_ZLIB
1349
static int null_read_packet(void *opaque, uint8_t *buf, int buf_size)
1350
{
1351
    return buf_size;
1352 1353
}

1354
static int mov_read_cmov(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1355 1356
{
    ByteIOContext ctx;
1357 1358
    uint8_t *cmov_data;
    uint8_t *moov_data; /* uncompressed data */
1359 1360
    long cmov_len, moov_len;
    int ret;
1361

1362 1363 1364 1365
    get_be32(pb); /* dcom atom */
    if (get_le32(pb) != MKTAG( 'd', 'c', 'o', 'm' ))
        return -1;
    if (get_le32(pb) != MKTAG( 'z', 'l', 'i', 'b' )) {
1366
        av_log(NULL, AV_LOG_ERROR, "unknown compression for cmov atom !");
1367 1368 1369 1370 1371 1372
        return -1;
    }
    get_be32(pb); /* cmvd atom */
    if (get_le32(pb) != MKTAG( 'c', 'm', 'v', 'd' ))
        return -1;
    moov_len = get_be32(pb); /* uncompressed size */
1373
    cmov_len = atom.size - 6 * 4;
1374

B
Baptiste Coudurier 已提交
1375
    cmov_data = av_malloc(cmov_len);
1376 1377
    if (!cmov_data)
        return -1;
B
Baptiste Coudurier 已提交
1378
    moov_data = av_malloc(moov_len);
1379 1380 1381 1382 1383
    if (!moov_data) {
        av_free(cmov_data);
        return -1;
    }
    get_buffer(pb, cmov_data, cmov_len);
1384
    if(uncompress (moov_data, (uLongf *) &moov_len, (const Bytef *)cmov_data, cmov_len) != Z_OK)
1385 1386 1387
        return -1;
    if(init_put_byte(&ctx, moov_data, moov_len, 0, NULL, null_read_packet, NULL, NULL) != 0)
        return -1;
1388 1389 1390
    atom.type = MKTAG( 'm', 'o', 'o', 'v' );
    atom.offset = 0;
    atom.size = moov_len;
1391
#ifdef DEBUG
M
Michael Niedermayer 已提交
1392
//    { int fd = open("/tmp/uncompheader.mov", O_WRONLY | O_CREAT); write(fd, moov_data, moov_len); close(fd); }
1393
#endif
1394
    ret = mov_read_default(c, &ctx, atom);
1395 1396
    av_free(moov_data);
    av_free(cmov_data);
1397

1398 1399 1400 1401
    return ret;
}
#endif

G
Gael Chardon 已提交
1402 1403 1404
/* edit list atom */
static int mov_read_elst(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
B
Baptiste Coudurier 已提交
1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417
    int i, edit_count;

    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
    edit_count= c->streams[c->fc->nb_streams-1]->edit_count = get_be32(pb);     /* entries */

    for(i=0; i<edit_count; i++){
        get_be32(pb); /* Track duration */
        get_be32(pb); /* Media time */
        get_be32(pb); /* Media rate */
    }
    dprintf("track[%i].edit_count = %i\n", c->fc->nb_streams-1, c->streams[c->fc->nb_streams-1]->edit_count);
    return 0;
G
Gael Chardon 已提交
1418 1419
}

1420 1421
static const MOVParseTableEntry mov_default_parse_table[] = {
/* mp4 atoms */
1422 1423 1424
{ MKTAG( 'c', 'o', '6', '4' ), mov_read_stco },
{ MKTAG( 'c', 'p', 'r', 't' ), mov_read_default },
{ MKTAG( 'c', 'r', 'h', 'd' ), mov_read_default },
M
Michael Niedermayer 已提交
1425
{ MKTAG( 'c', 't', 't', 's' ), mov_read_ctts }, /* composition time to sample */
1426 1427 1428 1429
{ MKTAG( 'd', 'i', 'n', 'f' ), mov_read_default }, /* data information */
{ MKTAG( 'd', 'p', 'n', 'd' ), mov_read_leaf },
{ MKTAG( 'd', 'r', 'e', 'f' ), mov_read_leaf },
{ MKTAG( 'e', 'd', 't', 's' ), mov_read_default },
1430
{ MKTAG( 'e', 'l', 's', 't' ), mov_read_elst },
1431
{ MKTAG( 'e', 'n', 'd', 'a' ), mov_read_enda },
1432
{ MKTAG( 'f', 'r', 'e', 'e' ), mov_read_leaf },
1433
{ MKTAG( 'f', 't', 'y', 'p' ), mov_read_ftyp },
1434 1435 1436 1437
{ MKTAG( 'h', 'd', 'l', 'r' ), mov_read_hdlr },
{ MKTAG( 'h', 'i', 'n', 't' ), mov_read_leaf },
{ MKTAG( 'h', 'm', 'h', 'd' ), mov_read_leaf },
{ MKTAG( 'i', 'o', 'd', 's' ), mov_read_leaf },
1438
{ MKTAG( 'j', 'p', '2', 'h' ), mov_read_jp2h },
1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451
{ MKTAG( 'm', 'd', 'a', 't' ), mov_read_mdat },
{ MKTAG( 'm', 'd', 'h', 'd' ), mov_read_mdhd },
{ MKTAG( 'm', 'd', 'i', 'a' ), mov_read_default },
{ MKTAG( 'm', 'i', 'n', 'f' ), mov_read_default },
{ MKTAG( 'm', 'o', 'o', 'v' ), mov_read_moov },
{ MKTAG( 'm', 'p', '4', 'a' ), mov_read_default },
{ MKTAG( 'm', 'p', '4', 's' ), mov_read_default },
{ MKTAG( 'm', 'p', '4', 'v' ), mov_read_default },
{ MKTAG( 'm', 'p', 'o', 'd' ), mov_read_leaf },
{ MKTAG( 'm', 'v', 'h', 'd' ), mov_read_mvhd },
{ MKTAG( 'n', 'm', 'h', 'd' ), mov_read_leaf },
{ MKTAG( 'o', 'd', 'h', 'd' ), mov_read_default },
{ MKTAG( 's', 'd', 'h', 'd' ), mov_read_default },
1452
{ MKTAG( 's', 'k', 'i', 'p' ), mov_read_leaf },
1453
{ MKTAG( 's', 'm', 'h', 'd' ), mov_read_leaf }, /* sound media info header */
1454
{ MKTAG( 'S', 'M', 'I', ' ' ), mov_read_smi }, /* Sorenson extension ??? */
1455
{ MKTAG( 'a', 'l', 'a', 'c' ), mov_read_alac }, /* alac specific atom */
1456
{ MKTAG( 'a', 'v', 'c', 'C' ), mov_read_avcC },
1457 1458 1459 1460 1461 1462
{ MKTAG( 's', 't', 'b', 'l' ), mov_read_default },
{ MKTAG( 's', 't', 'c', 'o' ), mov_read_stco },
{ MKTAG( 's', 't', 'd', 'p' ), mov_read_default },
{ MKTAG( 's', 't', 's', 'c' ), mov_read_stsc },
{ MKTAG( 's', 't', 's', 'd' ), mov_read_stsd }, /* sample description */
{ MKTAG( 's', 't', 's', 'h' ), mov_read_default },
1463
{ MKTAG( 's', 't', 's', 's' ), mov_read_stss }, /* sync sample */
1464 1465 1466 1467 1468 1469 1470 1471
{ MKTAG( 's', 't', 's', 'z' ), mov_read_stsz }, /* sample size */
{ MKTAG( 's', 't', 't', 's' ), mov_read_stts },
{ MKTAG( 't', 'k', 'h', 'd' ), mov_read_tkhd }, /* track header */
{ MKTAG( 't', 'r', 'a', 'k' ), mov_read_trak },
{ MKTAG( 't', 'r', 'e', 'f' ), mov_read_default }, /* not really */
{ MKTAG( 'u', 'd', 't', 'a' ), mov_read_leaf },
{ MKTAG( 'u', 'r', 'l', ' ' ), mov_read_leaf },
{ MKTAG( 'u', 'r', 'n', ' ' ), mov_read_leaf },
1472
{ MKTAG( 'u', 'u', 'i', 'd' ), mov_read_leaf },
1473
{ MKTAG( 'v', 'm', 'h', 'd' ), mov_read_leaf }, /* video media info header */
R
Roberto Togni 已提交
1474
{ MKTAG( 'w', 'a', 'v', 'e' ), mov_read_wave },
1475
/* extra mp4 */
1476
{ MKTAG( 'M', 'D', 'E', 'S' ), mov_read_leaf },
1477
/* QT atoms */
1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494
{ MKTAG( 'c', 'h', 'a', 'p' ), mov_read_leaf },
{ MKTAG( 'c', 'l', 'i', 'p' ), mov_read_default },
{ MKTAG( 'c', 'r', 'g', 'n' ), mov_read_leaf },
{ MKTAG( 'c', 't', 'a', 'b' ), mov_read_ctab },
{ MKTAG( 'e', 's', 'd', 's' ), mov_read_esds },
{ MKTAG( 'k', 'm', 'a', 't' ), mov_read_leaf },
{ MKTAG( 'm', 'a', 't', 't' ), mov_read_default },
{ MKTAG( 'r', 'd', 'r', 'f' ), mov_read_leaf },
{ MKTAG( 'r', 'm', 'd', 'a' ), mov_read_default },
{ MKTAG( 'r', 'm', 'd', 'r' ), mov_read_leaf },
{ MKTAG( 'r', 'm', 'r', 'a' ), mov_read_default },
{ MKTAG( 's', 'c', 'p', 't' ), mov_read_leaf },
{ MKTAG( 's', 's', 'r', 'c' ), mov_read_leaf },
{ MKTAG( 's', 'y', 'n', 'c' ), mov_read_leaf },
{ MKTAG( 't', 'c', 'm', 'd' ), mov_read_leaf },
{ MKTAG( 'w', 'i', 'd', 'e' ), mov_read_wide }, /* place holder */
//{ MKTAG( 'r', 'm', 'q', 'u' ), mov_read_leaf },
1495
#ifdef CONFIG_ZLIB
1496
{ MKTAG( 'c', 'm', 'o', 'v' ), mov_read_cmov },
1497
#else
1498
{ MKTAG( 'c', 'm', 'o', 'v' ), mov_read_leaf },
1499
#endif
1500
{ 0L, mov_read_leaf }
1501 1502 1503 1504 1505
};

static void mov_free_stream_context(MOVStreamContext *sc)
{
    if(sc) {
1506
        av_freep(&sc->ctts_data);
M
Michael Niedermayer 已提交
1507
        av_freep(&sc);
1508 1509 1510
    }
}

1511
/* XXX: is it sufficient ? */
F
Fabrice Bellard 已提交
1512 1513
static int mov_probe(AVProbeData *p)
{
1514 1515
    unsigned int offset;
    uint32_t tag;
1516
    int score = 0;
1517

F
Fabrice Bellard 已提交
1518 1519 1520
    /* check file header */
    if (p->buf_size <= 12)
        return 0;
1521 1522 1523 1524
    offset = 0;
    for(;;) {
        /* ignore invalid offset */
        if ((offset + 8) > (unsigned int)p->buf_size)
1525
            return score;
1526
        tag = LE_32(p->buf + offset + 4);
1527
        switch(tag) {
1528
        /* check for obvious tags */
1529
        case MKTAG( 'j', 'P', ' ', ' ' ): /* jpeg 2000 signature */
1530
        case MKTAG( 'm', 'o', 'o', 'v' ):
1531 1532
        case MKTAG( 'm', 'd', 'a', 't' ):
        case MKTAG( 'p', 'n', 'o', 't' ): /* detect movs with preview pics like ew.mov and april.mov */
Z
Zdenek Kabelac 已提交
1533
        case MKTAG( 'u', 'd', 't', 'a' ): /* Packet Video PVAuthor adds this and a lot of more junk */
1534
            return AVPROBE_SCORE_MAX;
1535 1536 1537 1538 1539 1540
        /* those are more common words, so rate then a bit less */
        case MKTAG( 'w', 'i', 'd', 'e' ):
        case MKTAG( 'f', 'r', 'e', 'e' ):
        case MKTAG( 'j', 'u', 'n', 'k' ):
        case MKTAG( 'p', 'i', 'c', 't' ):
            return AVPROBE_SCORE_MAX - 5;
1541
        case MKTAG( 'f', 't', 'y', 'p' ):
1542
        case MKTAG( 's', 'k', 'i', 'p' ):
1543
        case MKTAG( 'u', 'u', 'i', 'd' ):
1544
            offset = BE_32(p->buf+offset) + offset;
1545 1546
            /* if we only find those cause probedata is too small at least rate them */
            score = AVPROBE_SCORE_MAX - 50;
1547 1548 1549
            break;
        default:
            /* unrecognized tag */
1550
            return score;
1551
        }
1552
    }
1553
    return score;
F
Fabrice Bellard 已提交
1554 1555
}

1556 1557 1558 1559 1560 1561 1562 1563 1564 1565
static void mov_build_index(MOVContext *mov, AVStream *st)
{
    MOVStreamContext *sc = st->priv_data;
    offset_t current_offset;
    int64_t current_dts = 0;
    int stts_index = 0;
    int stsc_index = 0;
    int stss_index = 0;
    int i, j, k;

1566
    if (sc->sample_sizes || st->codec->codec_type == CODEC_TYPE_VIDEO || sc->dv_audio_container) {
1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609
        int keyframe, sample_size;
        int current_sample = 0;
        int stts_sample = 0;
        int distance = 0;

        st->nb_frames = sc->sample_count;
        for (i = 0; i < sc->chunk_count; i++) {
            current_offset = sc->chunk_offsets[i];
            if (stsc_index + 1 < sc->sample_to_chunk_sz && i + 1 == sc->sample_to_chunk[stsc_index + 1].first)
                stsc_index++;
            for (j = 0; j < sc->sample_to_chunk[stsc_index].count; j++) {
                keyframe = !sc->keyframe_count || current_sample + 1 == sc->keyframes[stss_index];
                if (keyframe) {
                    distance = 0;
                    if (stss_index + 1 < sc->keyframe_count)
                        stss_index++;
                }
                sample_size = sc->sample_size > 0 ? sc->sample_size : sc->sample_sizes[current_sample];
                dprintf("AVIndex stream %d, sample %d, offset %llx, dts %lld, size %d, distance %d, keyframe %d\n",
                        st->index, current_sample, current_offset, current_dts, sample_size, distance, keyframe);
                av_add_index_entry(st, current_offset, current_dts, sample_size, distance, keyframe ? AVINDEX_KEYFRAME : 0);
                current_offset += sample_size;
                assert(sc->stts_data[stts_index].duration % sc->time_rate == 0);
                current_dts += sc->stts_data[stts_index].duration / sc->time_rate;
                distance++;
                stts_sample++;
                if (current_sample + 1 < sc->sample_count)
                    current_sample++;
                if (stts_index + 1 < sc->stts_count && stts_sample == sc->stts_data[stts_index].count) {
                    stts_sample = 0;
                    stts_index++;
                }
            }
        }
    } else { /* read whole chunk */
        int chunk_samples, chunk_size, chunk_duration;

        for (i = 0; i < sc->chunk_count; i++) {
            current_offset = sc->chunk_offsets[i];
            if (stsc_index + 1 < sc->sample_to_chunk_sz && i + 1 == sc->sample_to_chunk[stsc_index + 1].first)
                stsc_index++;
            chunk_samples = sc->sample_to_chunk[stsc_index].count;
            /* get chunk size */
1610
            if (sc->sample_size > 1 || st->codec->codec_id == CODEC_ID_PCM_U8 || st->codec->codec_id == CODEC_ID_PCM_S8)
1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661
                chunk_size = chunk_samples * sc->sample_size;
            else if (sc->sample_size_v1.den > 0 && (chunk_samples * sc->sample_size_v1.num % sc->sample_size_v1.den == 0))
                chunk_size = chunk_samples * sc->sample_size_v1.num / sc->sample_size_v1.den;
            else { /* workaround to find nearest next chunk offset */
                chunk_size = INT_MAX;
                for (j = 0; j < mov->total_streams; j++) {
                    MOVStreamContext *msc = mov->streams[j];

                    for (k = msc->next_chunk; k < msc->chunk_count; k++) {
                        if (msc->chunk_offsets[k] > current_offset && msc->chunk_offsets[k] - current_offset < chunk_size) {
                            chunk_size = msc->chunk_offsets[k] - current_offset;
                            msc->next_chunk = k;
                            break;
                        }
                    }
                }
                /* check for last chunk */
                if (chunk_size == INT_MAX)
                    for (j = 0; j < mov->mdat_count; j++) {
                        dprintf("mdat %d, offset %llx, size %lld, current offset %llx\n",
                                j, mov->mdat_list[j].offset, mov->mdat_list[j].size, current_offset);
                        if (mov->mdat_list[j].offset <= current_offset && mov->mdat_list[j].offset + mov->mdat_list[j].size > current_offset)
                            chunk_size = mov->mdat_list[j].offset + mov->mdat_list[j].size - current_offset;
                    }
                assert(chunk_size != INT_MAX);
                for (j = 0; j < mov->total_streams; j++) {
                    mov->streams[j]->next_chunk = 0;
                }
            }
            av_add_index_entry(st, current_offset, current_dts, chunk_size, 0, AVINDEX_KEYFRAME);
            /* get chunk duration */
            chunk_duration = 0;
            while (chunk_samples > 0) {
                if (chunk_samples < sc->stts_data[stts_index].count) {
                    chunk_duration += sc->stts_data[stts_index].duration * chunk_samples;
                    sc->stts_data[stts_index].count -= chunk_samples;
                    break;
                } else {
                    chunk_duration += sc->stts_data[stts_index].duration * chunk_samples;
                    chunk_samples -= sc->stts_data[stts_index].count;
                    if (stts_index + 1 < sc->stts_count) {
                        stts_index++;
                    }
                }
            }
            dprintf("AVIndex stream %d, chunk %d, offset %llx, dts %lld, size %d, duration %d\n",
                    st->index, i, current_offset, current_dts, chunk_size, chunk_duration);
            assert(chunk_duration % sc->time_rate == 0);
            current_dts += chunk_duration / sc->time_rate;
        }
    }
1662 1663
    /* adjust sample count to avindex entries */
    sc->sample_count = st->nb_index_entries;
1664 1665
}

Z
Zdenek Kabelac 已提交
1666
static int mov_read_header(AVFormatContext *s, AVFormatParameters *ap)
1667
{
1668
    MOVContext *mov = (MOVContext *) s->priv_data;
1669
    ByteIOContext *pb = &s->pb;
1670
    int i, err;
1671
    MOV_atom_t atom = { 0, 0, 0 };
1672 1673

    mov->fc = s;
1674
    mov->parse_table = mov_default_parse_table;
1675

1676
    if(!url_is_streamed(pb)) /* .mov and .mp4 aren't streamable anyway (only progressive download if moov is before mdat) */
1677
        atom.size = url_fsize(pb);
1678
    else
1679
        atom.size = 0x7FFFFFFFFFFFFFFFLL;
1680 1681

    /* check MOV header */
1682
    err = mov_read_default(mov, pb, atom);
1683
    if (err<0 || (!mov->found_moov && !mov->found_mdat)) {
1684 1685 1686
        av_log(s, AV_LOG_ERROR, "mov: header not found !!! (err:%d, moov:%d, mdat:%d) pos:%"PRId64"\n",
                err, mov->found_moov, mov->found_mdat, url_ftell(pb));
        return -1;
1687
    }
1688 1689
    dprintf("on_parse_exit_offset=%d\n", (int) url_ftell(pb));

1690 1691 1692 1693
    /* some cleanup : make sure we are on the mdat atom */
    if(!url_is_streamed(pb) && (url_ftell(pb) != mov->mdat_offset))
        url_fseek(pb, mov->mdat_offset, SEEK_SET);

1694
    mov->total_streams = s->nb_streams;
1695

1696 1697
    for(i=0; i<mov->total_streams; i++) {
        MOVStreamContext *sc = mov->streams[i];
1698

1699 1700 1701 1702 1703 1704 1705 1706 1707
        if(!sc->time_rate)
            sc->time_rate=1;
        if(!sc->time_scale)
            sc->time_scale= mov->time_scale;
        av_set_pts_info(s->streams[i], 64, sc->time_rate, sc->time_scale);

        if(s->streams[i]->duration != AV_NOPTS_VALUE){
            assert(s->streams[i]->duration % sc->time_rate == 0);
            s->streams[i]->duration /= sc->time_rate;
1708
        }
1709
        sc->ffindex = i;
1710
        mov_build_index(mov, s->streams[i]);
1711
    }
1712

1713 1714 1715 1716 1717 1718 1719 1720 1721
    for(i=0; i<mov->total_streams; i++) {
        /* dont need those anymore */
        av_freep(&mov->streams[i]->chunk_offsets);
        av_freep(&mov->streams[i]->sample_to_chunk);
        av_freep(&mov->streams[i]->sample_sizes);
        av_freep(&mov->streams[i]->keyframes);
        av_freep(&mov->streams[i]->stts_data);
    }
    av_freep(&mov->mdat_list);
1722 1723 1724
    return 0;
}

Z
Zdenek Kabelac 已提交
1725
static int mov_read_packet(AVFormatContext *s, AVPacket *pkt)
1726
{
1727 1728 1729
    MOVContext *mov = s->priv_data;
    MOVStreamContext *sc = 0;
    AVIndexEntry *sample = 0;
1730
    int64_t best_dts = INT64_MAX;
1731
    int i;
1732

1733
    for (i = 0; i < mov->total_streams; i++) {
1734
        MOVStreamContext *msc = mov->streams[i];
1735

1736 1737 1738 1739 1740 1741 1742 1743 1744
        if (s->streams[i]->discard != AVDISCARD_ALL && msc->current_sample < msc->sample_count) {
            AVIndexEntry *current_sample = &s->streams[i]->index_entries[msc->current_sample];
            int64_t dts = av_rescale(current_sample->timestamp * (int64_t)msc->time_rate, AV_TIME_BASE, msc->time_scale);

            dprintf("stream %d, sample %ld, dts %lld\n", i, msc->current_sample, dts);
            if (dts < best_dts) {
                sample = current_sample;
                best_dts = dts;
                sc = msc;
1745
            }
1746 1747
        }
    }
1748 1749 1750 1751
    if (!sample)
        return -1;
    /* must be done just before reading, to avoid infinite loop on sample */
    sc->current_sample++;
1752
    if (sample->pos >= url_fsize(&s->pb)) {
1753
        av_log(mov->fc, AV_LOG_ERROR, "stream %d, offset 0x%"PRIx64": partial file\n", sc->ffindex, sample->pos);
1754
        return -1;
1755
    }
1756
#ifdef CONFIG_DV_DEMUXER
1757 1758 1759 1760
    if (sc->dv_audio_container) {
        dv_get_packet(mov->dv_demux, pkt);
        dprintf("dv audio pkt size %d\n", pkt->size);
    } else {
1761
#endif
1762 1763
        url_fseek(&s->pb, sample->pos, SEEK_SET);
        av_get_packet(&s->pb, pkt, sample->size);
1764
#ifdef CONFIG_DV_DEMUXER
1765 1766 1767 1768 1769 1770
        if (mov->dv_demux) {
            void *pkt_destruct_func = pkt->destruct;
            dv_produce_packet(mov->dv_demux, pkt, pkt->data, pkt->size);
            pkt->destruct = pkt_destruct_func;
        }
    }
1771
#endif
1772 1773 1774 1775 1776 1777 1778 1779 1780 1781
    pkt->stream_index = sc->ffindex;
    pkt->dts = sample->timestamp;
    if (sc->ctts_data) {
        assert(sc->ctts_data[sc->sample_to_ctime_index].duration % sc->time_rate == 0);
        pkt->pts = pkt->dts + sc->ctts_data[sc->sample_to_ctime_index].duration / sc->time_rate;
        /* update ctts context */
        sc->sample_to_ctime_sample++;
        if (sc->sample_to_ctime_index < sc->ctts_count && sc->ctts_data[sc->sample_to_ctime_index].count == sc->sample_to_ctime_sample) {
            sc->sample_to_ctime_index++;
            sc->sample_to_ctime_sample = 0;
1782
        }
1783 1784
    } else {
        pkt->pts = pkt->dts;
1785
    }
1786 1787 1788 1789 1790
    pkt->flags |= sample->flags & AVINDEX_KEYFRAME ? PKT_FLAG_KEY : 0;
    pkt->pos = sample->pos;
    dprintf("stream %d, pts %lld, dts %lld, pos 0x%llx, duration %d\n", pkt->stream_index, pkt->pts, pkt->dts, pkt->pos, pkt->duration);
    return 0;
}
1791

1792 1793 1794 1795 1796
static int mov_seek_stream(AVStream *st, int64_t timestamp, int flags)
{
    MOVStreamContext *sc = st->priv_data;
    int sample, time_sample;
    int i;
1797

1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812
    sample = av_index_search_timestamp(st, timestamp, flags);
    dprintf("stream %d, timestamp %lld, sample %d\n", st->index, timestamp, sample);
    if (sample < 0) /* not sure what to do */
        return -1;
    sc->current_sample = sample;
    dprintf("stream %d, found sample %ld\n", st->index, sc->current_sample);
    /* adjust ctts index */
    if (sc->ctts_data) {
        time_sample = 0;
        for (i = 0; i < sc->ctts_count; i++) {
            time_sample += sc->ctts_data[i].count;
            if (time_sample >= sc->current_sample) {
                sc->sample_to_ctime_index = i;
                sc->sample_to_ctime_sample = time_sample - sc->current_sample;
                break;
1813
            }
1814 1815
        }
    }
1816
    return sample;
1817 1818
}

1819
static int mov_read_seek(AVFormatContext *s, int stream_index, int64_t sample_time, int flags)
G
Gael Chardon 已提交
1820
{
1821 1822 1823 1824
    AVStream *st;
    int64_t seek_timestamp, timestamp;
    int sample;
    int i;
G
Gael Chardon 已提交
1825

1826
    if (stream_index >= s->nb_streams)
G
Gael Chardon 已提交
1827 1828
        return -1;

1829 1830 1831
    st = s->streams[stream_index];
    sample = mov_seek_stream(st, sample_time, flags);
    if (sample < 0)
G
Gael Chardon 已提交
1832 1833
        return -1;

1834 1835
    /* adjust seek timestamp to found sample timestamp */
    seek_timestamp = st->index_entries[sample].timestamp;
G
Gael Chardon 已提交
1836

1837 1838 1839 1840
    for (i = 0; i < s->nb_streams; i++) {
        st = s->streams[i];
        if (stream_index == i || st->discard == AVDISCARD_ALL)
            continue;
G
Gael Chardon 已提交
1841

1842 1843
        timestamp = av_rescale_q(seek_timestamp, s->streams[stream_index]->time_base, st->time_base);
        mov_seek_stream(st, timestamp, flags);
1844
    }
G
Gael Chardon 已提交
1845 1846 1847
    return 0;
}

Z
Zdenek Kabelac 已提交
1848
static int mov_read_close(AVFormatContext *s)
1849 1850
{
    int i;
1851
    MOVContext *mov = (MOVContext *) s->priv_data;
1852 1853
    for(i=0; i<mov->total_streams; i++)
        mov_free_stream_context(mov->streams[i]);
1854 1855
    /* free color tabs */
    for(i=0; i<mov->ctab_size; i++)
1856
        av_freep(&mov->ctab[i]);
1857 1858 1859 1860 1861 1862 1863 1864
    if(mov->dv_demux){
        for(i=0; i<mov->dv_fctx->nb_streams; i++){
            av_freep(&mov->dv_fctx->streams[i]->codec);
            av_freep(&mov->dv_fctx->streams[i]);
        }
        av_freep(&mov->dv_fctx);
        av_freep(&mov->dv_demux);
    }
1865
    av_freep(&mov->ctab);
1866 1867 1868
    return 0;
}

1869
AVInputFormat mov_demuxer = {
1870 1871
    "mov,mp4,m4a,3gp,3g2,mj2",
    "QuickTime/MPEG4/Motion JPEG 2000 format",
F
Fabrice Bellard 已提交
1872 1873
    sizeof(MOVContext),
    mov_probe,
1874 1875 1876
    mov_read_header,
    mov_read_packet,
    mov_read_close,
G
Gael Chardon 已提交
1877
    mov_read_seek,
1878
};