mov.c 63.1 KB
Newer Older
1
/*
2
 * MOV demuxer
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>

69
static const AVCodecTag mov_video_tags[] = {
70
/*  { CODEC_ID_, MKTAG('c', 'v', 'i', 'd') }, *//* Cinepak */
B
Baptiste Coudurier 已提交
71
    { CODEC_ID_RAWVIDEO, MKTAG('r', 'a', 'w', ' ') }, /* Uncompressed RGB */
72
/*  { 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
    { CODEC_ID_GIF, MKTAG('g', 'i', 'f', ' ') }, /* embedded gif files as frames (usually one "click to play movie" frame) */
85
/* 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_MSRLE, MKTAG('W', 'R', 'L', 'E') },
106
    { CODEC_ID_QDRAW, MKTAG('q', 'd', 'r', 'w') }, /* QuickDraw */
107
    { CODEC_ID_H264, MKTAG('a', 'v', 'c', '1') }, /* AVC-1/H.264 */
108
    { CODEC_ID_MPEG2VIDEO, MKTAG('h', 'd', 'v', '2') }, /* MPEG2 produced by Sony HD camera */
109
    { CODEC_ID_MPEG2VIDEO, MKTAG('h', 'd', 'v', '3') }, /* HDV produced by FCP */
110 111 112 113 114 115 116 117 118
    { 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 已提交
119
    { CODEC_ID_DVVIDEO, MKTAG('A', 'V', 'd', 'v') }, /* AVID DV */
120
    //{ CODEC_ID_JPEG2000, MKTAG('m', 'j', 'p', '2') }, /* JPEG 2000 produced by FCP */
K
Kostya Shishkov 已提交
121
    { CODEC_ID_TARGA, MKTAG('t', 'g', 'a', ' ') }, /* Truevision Targa */
K
Kostya Shishkov 已提交
122
    { CODEC_ID_TIFF, MKTAG('t', 'i', 'f', 'f') }, /* TIFF embedded in MOV */
123
    { CODEC_ID_RAWVIDEO, MKTAG('2', 'v', 'u', 'y') }, /* UNCOMPRESSED 8BIT 4:2:2 */
B
Baptiste Coudurier 已提交
124 125
    { CODEC_ID_VC1,  MKTAG('v', 'c', '-', '1') }, /* SMPTE RP 2025 */
    { CODEC_ID_WMV3, MKTAG('v', 'c', '-', '1') }, /* SMPTE RP 2025 */
B
Baptiste Coudurier 已提交
126
    { CODEC_ID_PNG,  MKTAG('p', 'n', 'g', ' ') },
127
    { CODEC_ID_NONE, 0 },
128 129
};

130
static const AVCodecTag mov_audio_tags[] = {
131
    { CODEC_ID_PCM_S32BE, MKTAG('i', 'n', '3', '2') },
132
    { CODEC_ID_PCM_S24BE, MKTAG('i', 'n', '2', '4') },
B
Baptiste Coudurier 已提交
133
    { CODEC_ID_PCM_S16BE, MKTAG('N', 'O', 'N', 'E') }, /* uncompressed */
134
    { CODEC_ID_PCM_S16BE, MKTAG('t', 'w', 'o', 's') }, /* 16 bits */
135
    { CODEC_ID_PCM_U8, MKTAG('r', 'a', 'w', ' ') }, /* 8 bits unsigned */
136 137 138
    { 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') }, /*  */
139
    { CODEC_ID_ADPCM_IMA_QT, MKTAG('i', 'm', 'a', '4') }, /* IMA-4 ADPCM */
B
Baptiste Coudurier 已提交
140
    { CODEC_ID_ADPCM_MS, MKTAG('m', 's', 0x00, 0x02) }, /* MS ADPCM */
141 142
    { 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 */
143

144
    { CODEC_ID_MP3, MKTAG('.', 'm', 'p', '3') }, /* MPEG layer 3 */ /* sample files at http://www.3ivx.com/showcase.html use this tag */
145 146 147 148
    { 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 */
149
    { CODEC_ID_AAC, MKTAG('m', 'p', '4', 'a') }, /* MPEG-4 AAC */
150
    /* The standard for mpeg4 audio is still not normalised AFAIK anyway */
151
    { CODEC_ID_AMR_NB, MKTAG('s', 'a', 'm', 'r') }, /* AMR-NB 3gp */
152
    { CODEC_ID_AMR_WB, MKTAG('s', 'a', 'w', 'b') }, /* AMR-WB 3gp */
153
    { CODEC_ID_AC3, MKTAG('m', 's', 0x20, 0x00) }, /* Dolby AC-3 */
154
    { CODEC_ID_ALAC,MKTAG('a', 'l', 'a', 'c') }, /* Apple Lossless */
R
Roberto Togni 已提交
155
    { CODEC_ID_QDM2,MKTAG('Q', 'D', 'M', '2') }, /* QDM2 */
156 157
    { CODEC_ID_DVAUDIO, MKTAG('v', 'd', 'v', 'a') },
    { CODEC_ID_DVAUDIO, MKTAG('d', 'v', 'c', 'a') },
B
Baptiste Coudurier 已提交
158
    { CODEC_ID_PCM_S16LE, MKTAG('l', 'p', 'c', 'm') },
159
    { CODEC_ID_NONE, 0 },
160 161 162 163 164 165 166 167 168 169 170 171 172
};

/* 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;

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

186 187 188 189 190
typedef struct MOV_mdat_atom_s {
    offset_t offset;
    int64_t size;
} MOV_mdat_atom_t;

191 192 193 194 195 196
typedef struct {
    uint8_t  version;
    uint32_t flags; // 24bit

    /* 0x03 ESDescrTag */
    uint16_t es_id;
197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215
#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
216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238
    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;

239 240
struct MOVParseTableEntry;

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

typedef struct MOVContext {
    AVFormatContext *fc;
270
    int time_scale;
B
Baptiste Coudurier 已提交
271
    int64_t duration; /* duration of the longest track */
272 273
    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 */
274
    int64_t mdat_offset;
275 276
    int total_streams;
    MOVStreamContext *streams[MAX_STREAMS];
277

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

    AVPaletteControl palette_control;
284 285
    MOV_mdat_atom_t *mdat_list;
    int mdat_count;
286 287
    DVDemuxContext *dv_demux;
    AVFormatContext *dv_fctx;
288
    int isom; /* 1 if file is ISO Media (mp4/3gp) */
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_default(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
309
{
310
    int64_t total_size = 0;
311
    MOV_atom_t a;
312 313
    int i;
    int err = 0;
314 315

    a.offset = atom.offset;
316

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

343
        a.size -= 8;
344

345 346
        if(a.size < 0)
            break;
347

348
        if (c->parse_table[i].type == 0) { /* skip leaf atoms data */
349
            url_fskip(pb, a.size);
350
        } else {
351 352
            offset_t start_pos = url_ftell(pb);
            int64_t left;
353
            err = (c->parse_table[i].func)(c, pb, a);
354 355 356
            left = a.size - url_ftell(pb) + start_pos;
            if (left > 0) /* skip garbage at atom end */
                url_fskip(pb, left);
357
        }
358

359
        a.offset += a.size;
360
        total_size += a.size;
361 362
    }

363 364
    if (!err && total_size < atom.size && atom.size < 0x7ffff) {
        url_fskip(pb, atom.size - total_size);
365 366
    }

367 368 369
    return err;
}

370
static int mov_read_ctab(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
371
{
372 373 374 375
#if 1
    url_fskip(pb, atom.size); // for now
#else
    VERY VERY BROKEN, NEVER execute this, needs rewrite
376 377
    unsigned int len;
    MOV_ctab_t *t;
378 379 380 381 382 383 384
    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) {
385 386 387
        t->clrs = av_malloc(len); // 16bit A R G B
        if (t->clrs)
            get_buffer(pb, t->clrs, len);
388
    }
389
#endif
390

391 392 393
    return 0;
}

394
static int mov_read_hdlr(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
395
{
396
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
397 398
    uint32_t type;
    uint32_t ctype;
399

400 401 402 403 404 405 406
    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 */

407 408
    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]);
409 410
    if(!ctype)
        c->isom = 1;
411 412 413 414
    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;
415 416
    else if(type == MKTAG('m', '1', 'a', ' '))
        st->codec->codec_id = CODEC_ID_MP2;
417 418 419 420
    else if(type == MKTAG('s', 'u', 'b', 'p')) {
        st->codec->codec_type = CODEC_TYPE_SUBTITLE;
        st->codec->codec_id = CODEC_ID_DVD_SUBTITLE;
    }
421 422 423 424
    get_be32(pb); /* component  manufacture */
    get_be32(pb); /* component flags */
    get_be32(pb); /* component flags mask */

425
    if(atom.size <= 24)
426
        return 0; /* nothing left to read */
427

428
    url_fskip(pb, atom.size - (url_ftell(pb) - atom.offset));
429 430 431
    return 0;
}

432
static int mov_mp4_read_descr_len(ByteIOContext *pb)
433
{
434
    int len = 0;
435 436
    int count = 4;
    while (count--) {
437
        int c = get_byte(pb);
438 439 440
        len = (len << 7) | (c & 0x7f);
        if (!(c & 0x80))
            break;
441 442 443 444
    }
    return len;
}

445
static int mov_mp4_read_descr(ByteIOContext *pb, int *tag)
446 447 448
{
    int len;
    *tag = get_byte(pb);
449
    len = mov_mp4_read_descr_len(pb);
450
    dprintf("MPEG4 description: tag=0x%02x len=%d\n", *tag, len);
451 452 453
    return len;
}

454
static int mov_read_esds(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
455 456 457 458
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
    int tag, len;
459

460 461
    /* Well, broken but suffisant for some MP4 streams */
    get_be32(pb); /* version + flags */
462
    len = mov_mp4_read_descr(pb, &tag);
463
    if (tag == MP4ESDescrTag) {
464 465
        get_be16(pb); /* ID */
        get_byte(pb); /* priority */
466
    } else
467
        get_be16(pb); /* ID */
468

469
    len = mov_mp4_read_descr(pb, &tag);
470
    if (tag == MP4DecConfigDescrTag) {
471 472 473 474 475 476
        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);

477
        st->codec->codec_id= codec_get_id(ff_mov_obj_type, sc->esds.object_type_id);
B
Baptiste Coudurier 已提交
478
        dprintf("esds object type id %d\n", sc->esds.object_type_id);
479 480
        len = mov_mp4_read_descr(pb, &tag);
        if (tag == MP4DecSpecificDescrTag) {
481
            dprintf("Specific MPEG4 header len=%d\n", len);
B
Baptiste Coudurier 已提交
482
            st->codec->extradata = av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
483 484 485
            if (st->codec->extradata) {
                get_buffer(pb, st->codec->extradata, len);
                st->codec->extradata_size = len;
486
                /* from mplayer */
B
Baptiste Coudurier 已提交
487
                if ((*st->codec->extradata >> 3) == 29) {
488 489
                    st->codec->codec_id = CODEC_ID_MP3ON4;
                }
490 491
            }
        }
492 493 494 495
    }
    return 0;
}

496 497
/* this atom contains actual media data */
static int mov_read_mdat(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
498
{
499 500
    if(atom.size == 0) /* wrong one (MP4) */
        return 0;
501 502 503 504
    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++;
505 506 507 508 509 510 511 512
    c->found_mdat=1;
    c->mdat_offset = atom.offset;
    if(c->found_moov)
        return 1; /* found both, just go */
    url_fskip(pb, atom.size);
    return 0; /* now go for moov */
}

513 514 515 516
static int mov_read_ftyp(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    uint32_t type = get_le32(pb);

517 518
    if (type != MKTAG('q','t',' ',' '))
        c->isom = 1;
519
    av_log(c->fc, AV_LOG_DEBUG, "ISO: File Type Major Brand: %.4s\n",(char *)&type);
520 521 522 523 524
    get_be32(pb); /* minor version */
    url_fskip(pb, atom.size - 8);
    return 0;
}

525 526 527 528
/* this atom should contain all header atoms */
static int mov_read_moov(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    int err;
529

530 531 532 533 534 535 536 537 538 539 540 541
    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 已提交
542 543 544
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
    int version = get_byte(pb);
545
    int lang;
546

547 548
    if (version > 1)
        return 1; /* unsupported */
549 550 551 552

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

B
clean  
Baptiste Coudurier 已提交
553 554 555 556 557 558 559
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
560

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

564
    lang = get_be16(pb); /* language */
B
clean  
Baptiste Coudurier 已提交
565
    ff_mov_lang_to_iso639(lang, st->language);
566 567 568 569 570 571 572
    get_be16(pb); /* quality */

    return 0;
}

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

B
Baptiste Coudurier 已提交
576 577 578 579 580 581 582
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
583 584
    c->time_scale = get_be32(pb); /* time scale */
#ifdef DEBUG
G
Gael Chardon 已提交
585
    av_log(NULL, AV_LOG_DEBUG, "time scale = %i\n", c->time_scale);
586
#endif
B
Baptiste Coudurier 已提交
587
    c->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606
    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;
}

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

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

614 615
    // currently SVQ3 decoder expect full STSD header - so let's fake it
    // this should be fixed and just SMI header should be passed
616 617
    av_free(st->codec->extradata);
    st->codec->extradata_size = 0x5a + atom.size;
B
Baptiste Coudurier 已提交
618
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
619 620

    if (st->codec->extradata) {
B
Baptiste Coudurier 已提交
621
        memcpy(st->codec->extradata, "SVQ3", 4); // fake
B
Baptiste Coudurier 已提交
622 623
        get_buffer(pb, st->codec->extradata + 0x5a, atom.size);
        dprintf("Reading SMI %"PRId64"  %s\n", atom.size, st->codec->extradata + 0x5a);
624
    } else
625
        url_fskip(pb, atom.size);
626 627 628

    return 0;
}
629

630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658
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 已提交
659
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
660 661

    if (st->codec->extradata) {
B
Baptiste Coudurier 已提交
662
        memcpy(st->codec->extradata + 4, "alac", 4); // fake
B
Baptiste Coudurier 已提交
663 664
        get_buffer(pb, st->codec->extradata + 8, 36 - 8);
        dprintf("Reading alac %d  %s\n", st->codec->extradata_size, st->codec->extradata);
665 666 667 668 669
    } else
        url_fskip(pb, atom.size);
    return 0;
}

R
Roberto Togni 已提交
670 671 672 673 674 675
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;
676

677 678 679 680
    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 已提交
681
        st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
682 683 684 685 686 687 688

        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);
689
    } else
690
        url_fskip(pb, atom.size);
R
Roberto Togni 已提交
691 692 693
    return 0;
}

694 695 696 697 698 699 700 701 702 703
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 已提交
704
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
705 706 707

    /* pass all jp2h atom to codec */
    if (st->codec->extradata) {
B
Baptiste Coudurier 已提交
708
        memcpy(st->codec->extradata + 4, "jp2h", 4);
B
Baptiste Coudurier 已提交
709
        get_buffer(pb, st->codec->extradata + 8, atom.size);
710 711 712 713 714
    } else
        url_fskip(pb, atom.size);
    return 0;
}

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

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

722
    av_free(st->codec->extradata);
723

724
    st->codec->extradata_size = atom.size;
B
Baptiste Coudurier 已提交
725
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
726

727
    if (st->codec->extradata) {
728
        get_buffer(pb, st->codec->extradata, atom.size);
729
    } else
730
        url_fskip(pb, atom.size);
731 732 733 734

    return 0;
}

735 736 737 738
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;
739
    unsigned int i, entries;
740 741 742 743 744

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

    entries = get_be32(pb);
745

746 747
    if(entries >= UINT_MAX/sizeof(int64_t))
        return -1;
748

749
    sc->chunk_count = entries;
B
Baptiste Coudurier 已提交
750
    sc->chunk_offsets = av_malloc(entries * sizeof(int64_t));
751 752 753 754 755 756 757 758 759 760 761 762
    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;
763

764 765 766 767 768 769
    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];
770
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
771 772
    int entries, frames_per_sample;
    uint32_t format;
773
    uint8_t codec_name[32];
774

775 776 777 778 779 780 781 782 783 784 785 786
    /* 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;

787 788 789 790 791
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);

792
    while(entries--) { //Parsing Sample description table
793
        enum CodecID id;
794
        MOV_atom_t a = { 0, 0, 0 };
795
        offset_t start_pos = url_ftell(pb);
796
        int size = get_be32(pb); /* size */
797
        format = get_le32(pb); /* data format */
798

799 800 801
        get_be32(pb); /* reserved */
        get_be16(pb); /* reserved */
        get_be16(pb); /* index */
802

803 804 805 806 807 808
        if (st->codec->codec_tag) {
            /* multiple fourcc, just skip for now */
            url_fskip(pb, size - (url_ftell(pb) - start_pos));
            continue;
        }

809
        st->codec->codec_tag = format;
810
        id = codec_get_id(mov_audio_tags, format);
811
        if (st->codec->codec_type != CODEC_TYPE_VIDEO && id > 0) {
812
            st->codec->codec_type = CODEC_TYPE_AUDIO;
813 814
        } else if (st->codec->codec_type != CODEC_TYPE_AUDIO && /* do not overwrite codec type */
                   format && format != MKTAG('m', 'p', '4', 's')) { /* skip old asf mpeg4 tag */
815
            id = codec_get_id(mov_video_tags, format);
816
            if (id <= 0)
817
                id = codec_get_id(codec_bmp_tags, format);
818 819 820 821
            if (id > 0)
                st->codec->codec_type = CODEC_TYPE_VIDEO;
        }

822 823 824 825 826
        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);

827
        if(st->codec->codec_type==CODEC_TYPE_VIDEO) {
828
            st->codec->codec_id = id;
829 830 831 832 833
            get_be16(pb); /* version */
            get_be16(pb); /* revision level */
            get_be32(pb); /* vendor */
            get_be32(pb); /* temporal quality */
            get_be32(pb); /* spacial quality */
834 835 836 837

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

838 839 840
            get_be32(pb); /* horiz resolution */
            get_be32(pb); /* vert resolution */
            get_be32(pb); /* data size, always 0 */
841
            frames_per_sample = get_be16(pb); /* frames per samples */
842
#ifdef DEBUG
843
            av_log(NULL, AV_LOG_DEBUG, "frames/samples = %d\n", frames_per_sample);
844
#endif
B
Baptiste Coudurier 已提交
845 846 847 848 849
            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;
            }
850

851
            st->codec->bits_per_sample = get_be16(pb); /* depth */
852
            st->codec->color_table_id = get_be16(pb); /* colortable id */
853

854
            /* figure out the palette situation */
855 856
            color_depth = st->codec->bits_per_sample & 0x1F;
            color_greyscale = st->codec->bits_per_sample & 0x20;
857 858

            /* if the depth is 2, 4, or 8 bpp, file is palettized */
859
            if ((color_depth == 2) || (color_depth == 4) ||
860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876
                (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;
                    }

877
                } else if (st->codec->color_table_id & 0x08) {
878 879 880 881

                    /* if flag bit 3 is set, use the default palette */
                    color_count = 1 << color_depth;
                    if (color_depth == 2)
M
Michael Niedermayer 已提交
882
                        color_table = ff_qt_default_palette_4;
883
                    else if (color_depth == 4)
M
Michael Niedermayer 已提交
884
                        color_table = ff_qt_default_palette_16;
885
                    else
M
Michael Niedermayer 已提交
886
                        color_table = ff_qt_default_palette_256;
887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918

                    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);
                    }
                }

919 920
                st->codec->palctrl = &c->palette_control;
                st->codec->palctrl->palette_changed = 1;
921
            } else
922
                st->codec->palctrl = NULL;
923
        } else if(st->codec->codec_type==CODEC_TYPE_AUDIO) {
924
            int bits_per_sample;
925
            uint16_t version = get_be16(pb);
926

927
            st->codec->codec_id = id;
928 929
            get_be16(pb); /* revision level */
            get_be32(pb); /* vendor */
930

931
            st->codec->channels = get_be16(pb);             /* channel count */
B
Baptiste Coudurier 已提交
932
            dprintf("audio channels %d\n", st->codec->channels);
933 934 935 936 937 938 939 940 941 942
            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) {
943 944 945 946 947
            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;
948
            case CODEC_ID_PCM_S16LE:
949 950 951
            case CODEC_ID_PCM_S16BE:
                if (st->codec->bits_per_sample == 8)
                    st->codec->codec_id = CODEC_ID_PCM_S8;
952 953
                else if (st->codec->bits_per_sample == 24)
                    st->codec->codec_id = CODEC_ID_PCM_S24BE;
954 955 956
                break;
            default:
                break;
957
            }
958

959
            //Read QT version 1 fields. In version 0 theese dont exist
960 961
            dprintf("version =%d, isom =%d\n",version,c->isom);
            if(!c->isom) {
B
Baptiste Coudurier 已提交
962 963 964 965 966 967 968 969 970 971 972 973 974 975 976
                if(version==1) {
                    sc->sample_size_v1.den = get_be32(pb); /* samples per packet */
                    get_be32(pb); /* bytes per packet */
                    sc->sample_size_v1.num = get_be32(pb); /* bytes per frame */
                    get_be32(pb); /* bytes per sample */
                } 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 */
                }
977
            }
978 979 980 981 982 983

            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;
            }
984 985 986
        } else {
            /* other codec type, just skip (rtp, mp4s, tmcd ...) */
            url_fskip(pb, size - (url_ftell(pb) - start_pos));
987
        }
988 989 990 991 992 993
        /* 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);
994
    }
995

996 997 998
    if(st->codec->codec_type==CODEC_TYPE_AUDIO && st->codec->sample_rate==0 && sc->time_scale>1) {
        st->codec->sample_rate= sc->time_scale;
    }
999

1000
    /* special codec parameters handling */
1001
    switch (st->codec->codec_id) {
1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013
#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;
1014
#ifdef CONFIG_LIBFAAD
1015
    case CODEC_ID_AAC:
1016 1017 1018
#endif
#ifdef CONFIG_VORBIS_DECODER
    case CODEC_ID_VORBIS:
1019
#endif
1020 1021 1022
    case CODEC_ID_MP3ON4:
        st->codec->sample_rate= 0; /* let decoder init parameters properly */
        break;
1023
#ifdef CONFIG_DV_DEMUXER
1024 1025 1026 1027 1028 1029 1030 1031 1032 1033
    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;
1034
#endif
1035 1036 1037 1038 1039 1040 1041 1042 1043
    /* 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;
1044
    case CODEC_ID_MP2:
1045
        st->codec->codec_type = CODEC_TYPE_AUDIO; /* force type after stsd for m1a hdlr */
1046 1047
        st->need_parsing = 1;
        break;
1048 1049 1050
    default:
        break;
    }
1051

1052 1053 1054
    return 0;
}

1055
static int mov_read_stsc(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1056
{
1057 1058
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1059
    unsigned int i, entries;
1060

1061 1062 1063 1064
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);
1065

1066 1067
    if(entries >= UINT_MAX / sizeof(MOV_sample_to_chunk_tbl))
        return -1;
1068

1069
#ifdef DEBUG
G
Gael Chardon 已提交
1070
av_log(NULL, AV_LOG_DEBUG, "track[%i].stsc.entries = %i\n", c->fc->nb_streams-1, entries);
1071
#endif
1072
    sc->sample_to_chunk_sz = entries;
B
Baptiste Coudurier 已提交
1073
    sc->sample_to_chunk = av_malloc(entries * sizeof(MOV_sample_to_chunk_tbl));
1074 1075
    if (!sc->sample_to_chunk)
        return -1;
1076 1077 1078 1079 1080 1081 1082 1083
    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;
}

1084 1085 1086 1087
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;
1088
    unsigned int i, entries;
1089 1090 1091 1092 1093

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

    entries = get_be32(pb);
1094

1095 1096
    if(entries >= UINT_MAX / sizeof(long))
        return -1;
1097

1098 1099
    sc->keyframe_count = entries;
#ifdef DEBUG
B
Baptiste Coudurier 已提交
1100
    av_log(NULL, AV_LOG_DEBUG, "keyframe_count = %d\n", sc->keyframe_count);
1101
#endif
B
Baptiste Coudurier 已提交
1102
    sc->keyframes = av_malloc(entries * sizeof(long));
1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113
    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;
}

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

1120 1121
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
1122

1123 1124 1125
    sample_size = get_be32(pb);
    if (!sc->sample_size) /* do not overwrite value computed in stsd */
        sc->sample_size = sample_size;
1126
    entries = get_be32(pb);
1127 1128 1129
    if(entries >= UINT_MAX / sizeof(long))
        return -1;

1130
    sc->sample_count = entries;
1131 1132 1133
    if (sample_size)
        return 0;

1134
#ifdef DEBUG
B
Baptiste Coudurier 已提交
1135
    av_log(NULL, AV_LOG_DEBUG, "sample_size = %d sample_count = %d\n", sc->sample_size, sc->sample_count);
1136
#endif
B
Baptiste Coudurier 已提交
1137
    sc->sample_sizes = av_malloc(entries * sizeof(long));
1138 1139
    if (!sc->sample_sizes)
        return -1;
1140 1141 1142
    for(i=0; i<entries; i++) {
        sc->sample_sizes[i] = get_be32(pb);
#ifdef DEBUG
1143
        av_log(NULL, AV_LOG_DEBUG, "sample_sizes[]=%ld\n", sc->sample_sizes[i]);
1144 1145 1146 1147 1148
#endif
    }
    return 0;
}

1149
static int mov_read_stts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1150
{
1151
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
1152
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1153
    unsigned int i, entries;
1154 1155
    int64_t duration=0;
    int64_t total_sample_count=0;
1156

1157 1158 1159
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
    entries = get_be32(pb);
M
cleanup  
Michael Niedermayer 已提交
1160
    if(entries >= UINT_MAX / sizeof(Time2Sample))
1161
        return -1;
1162

1163 1164
    sc->stts_count = entries;
    sc->stts_data = av_malloc(entries * sizeof(Time2Sample));
1165

1166
#ifdef DEBUG
G
Gael Chardon 已提交
1167
av_log(NULL, AV_LOG_DEBUG, "track[%i].stts.entries = %i\n", c->fc->nb_streams-1, entries);
1168
#endif
1169 1170 1171

    sc->time_rate=0;

1172
    for(i=0; i<entries; i++) {
M
cleanup  
Michael Niedermayer 已提交
1173 1174
        int sample_duration;
        int sample_count;
1175

1176
        sample_count=get_be32(pb);
1177
        sample_duration = get_be32(pb);
1178 1179 1180 1181
        sc->stts_data[i].count= sample_count;
        sc->stts_data[i].duration= sample_duration;

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

1183 1184
        dprintf("sample_count=%d, sample_duration=%d\n",sample_count,sample_duration);

B
Baptiste Coudurier 已提交
1185
        duration+=(int64_t)sample_duration*sample_count;
1186 1187 1188
        total_sample_count+=sample_count;
    }

1189 1190 1191
    st->nb_frames= total_sample_count;
    if(duration)
        st->duration= duration;
1192 1193 1194
    return 0;
}

M
Michael Niedermayer 已提交
1195 1196
static int mov_read_ctts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
1197 1198
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
M
Michael Niedermayer 已提交
1199 1200 1201 1202 1203 1204 1205 1206
    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;

1207 1208
    sc->ctts_count = entries;
    sc->ctts_data = av_malloc(entries * sizeof(Time2Sample));
M
Michael Niedermayer 已提交
1209

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

M
Michael Niedermayer 已提交
1212
    for(i=0; i<entries; i++) {
1213 1214 1215
        int count    =get_be32(pb);
        int duration =get_be32(pb);

1216 1217 1218 1219 1220 1221
        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;
        }
1222 1223 1224 1225
        sc->ctts_data[i].count   = count;
        sc->ctts_data[i].duration= duration;

        sc->time_rate= ff_gcd(sc->time_rate, duration);
M
Michael Niedermayer 已提交
1226 1227 1228 1229
    }
    return 0;
}

1230 1231 1232 1233 1234 1235 1236
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 已提交
1237
    sc = av_mallocz(sizeof(MOVStreamContext));
1238
    if (!sc) {
1239
        av_free(st);
1240 1241 1242 1243
        return -1;
    }

    st->priv_data = sc;
1244
    st->codec->codec_type = CODEC_TYPE_DATA;
F
Fabrice Bellard 已提交
1245
    st->start_time = 0; /* XXX: check */
1246 1247 1248 1249 1250 1251 1252
    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 已提交
1253 1254
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    int version = get_byte(pb);
1255 1256 1257 1258 1259 1260 1261 1262 1263 1264

    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 已提交
1265 1266 1267 1268 1269 1270 1271
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
1272 1273
    st->id = (int)get_be32(pb); /* track id (NOT 0 !)*/
    get_be32(pb); /* reserved */
F
Fabrice Bellard 已提交
1274
    st->start_time = 0; /* check */
B
Baptiste Coudurier 已提交
1275
    (version == 1) ? get_be64(pb) : get_be32(pb); /* highlevel (considering edits) duration in movie timebase */
1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286
    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 已提交
1287 1288
    get_be32(pb); /* track width */
    get_be32(pb); /* track height */
1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308

    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;
1309
    if (atom.type != MKTAG('m', 'd', 'a', 't')) {
1310 1311 1312 1313 1314 1315 1316 1317
        url_fskip(pb, atom.size);
        return 0;
    }
    err = mov_read_mdat(c, pb, atom);
    return err;
}

static int mov_read_cmov(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1318
{
1319
#ifdef CONFIG_ZLIB
1320
    ByteIOContext ctx;
1321 1322
    uint8_t *cmov_data;
    uint8_t *moov_data; /* uncompressed data */
1323 1324
    long cmov_len, moov_len;
    int ret;
1325

1326 1327 1328 1329
    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' )) {
1330
        av_log(NULL, AV_LOG_ERROR, "unknown compression for cmov atom !");
1331 1332 1333 1334 1335 1336
        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 */
1337
    cmov_len = atom.size - 6 * 4;
1338

B
Baptiste Coudurier 已提交
1339
    cmov_data = av_malloc(cmov_len);
1340 1341
    if (!cmov_data)
        return -1;
B
Baptiste Coudurier 已提交
1342
    moov_data = av_malloc(moov_len);
1343 1344 1345 1346 1347
    if (!moov_data) {
        av_free(cmov_data);
        return -1;
    }
    get_buffer(pb, cmov_data, cmov_len);
1348
    if(uncompress (moov_data, (uLongf *) &moov_len, (const Bytef *)cmov_data, cmov_len) != Z_OK)
1349
        return -1;
1350
    if(init_put_byte(&ctx, moov_data, moov_len, 0, NULL, NULL, NULL, NULL) != 0)
1351
        return -1;
1352 1353 1354
    atom.type = MKTAG( 'm', 'o', 'o', 'v' );
    atom.offset = 0;
    atom.size = moov_len;
1355
#ifdef DEBUG
M
Michael Niedermayer 已提交
1356
//    { int fd = open("/tmp/uncompheader.mov", O_WRONLY | O_CREAT); write(fd, moov_data, moov_len); close(fd); }
1357
#endif
1358
    ret = mov_read_default(c, &ctx, atom);
1359 1360 1361
    av_free(moov_data);
    av_free(cmov_data);
    return ret;
1362 1363 1364
#else
    av_log(c->fc, AV_LOG_ERROR, "this file requires zlib support compiled in\n");
    return -1;
1365
#endif
1366
}
1367

G
Gael Chardon 已提交
1368 1369 1370
/* edit list atom */
static int mov_read_elst(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
B
Baptiste Coudurier 已提交
1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383
    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 已提交
1384 1385
}

1386 1387
static const MOVParseTableEntry mov_default_parse_table[] = {
/* mp4 atoms */
1388
{ MKTAG( 'c', 'o', '6', '4' ), mov_read_stco },
M
Michael Niedermayer 已提交
1389
{ MKTAG( 'c', 't', 't', 's' ), mov_read_ctts }, /* composition time to sample */
1390
{ MKTAG( 'e', 'd', 't', 's' ), mov_read_default },
1391
{ MKTAG( 'e', 'l', 's', 't' ), mov_read_elst },
1392
{ MKTAG( 'e', 'n', 'd', 'a' ), mov_read_enda },
1393
{ MKTAG( 'f', 't', 'y', 'p' ), mov_read_ftyp },
1394
{ MKTAG( 'h', 'd', 'l', 'r' ), mov_read_hdlr },
1395
{ MKTAG( 'j', 'p', '2', 'h' ), mov_read_jp2h },
1396 1397 1398 1399 1400 1401
{ 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', 'v', 'h', 'd' ), mov_read_mvhd },
1402
{ MKTAG( 'S', 'M', 'I', ' ' ), mov_read_smi }, /* Sorenson extension ??? */
1403
{ MKTAG( 'a', 'l', 'a', 'c' ), mov_read_alac }, /* alac specific atom */
1404
{ MKTAG( 'a', 'v', 'c', 'C' ), mov_read_avcC },
1405 1406 1407 1408
{ MKTAG( 's', 't', 'b', 'l' ), mov_read_default },
{ MKTAG( 's', 't', 'c', 'o' ), mov_read_stco },
{ MKTAG( 's', 't', 's', 'c' ), mov_read_stsc },
{ MKTAG( 's', 't', 's', 'd' ), mov_read_stsd }, /* sample description */
1409
{ MKTAG( 's', 't', 's', 's' ), mov_read_stss }, /* sync sample */
1410 1411 1412 1413
{ 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 },
R
Roberto Togni 已提交
1414
{ MKTAG( 'w', 'a', 'v', 'e' ), mov_read_wave },
1415 1416 1417 1418
{ MKTAG( 'c', 't', 'a', 'b' ), mov_read_ctab },
{ MKTAG( 'e', 's', 'd', 's' ), mov_read_esds },
{ MKTAG( 'w', 'i', 'd', 'e' ), mov_read_wide }, /* place holder */
{ MKTAG( 'c', 'm', 'o', 'v' ), mov_read_cmov },
1419
{ 0L, NULL }
1420 1421 1422 1423 1424
};

static void mov_free_stream_context(MOVStreamContext *sc)
{
    if(sc) {
1425
        av_freep(&sc->ctts_data);
M
Michael Niedermayer 已提交
1426
        av_freep(&sc);
1427 1428 1429
    }
}

1430
/* XXX: is it sufficient ? */
F
Fabrice Bellard 已提交
1431 1432
static int mov_probe(AVProbeData *p)
{
1433 1434
    unsigned int offset;
    uint32_t tag;
1435
    int score = 0;
1436

F
Fabrice Bellard 已提交
1437 1438 1439
    /* check file header */
    if (p->buf_size <= 12)
        return 0;
1440 1441 1442 1443
    offset = 0;
    for(;;) {
        /* ignore invalid offset */
        if ((offset + 8) > (unsigned int)p->buf_size)
1444
            return score;
1445
        tag = AV_RL32(p->buf + offset + 4);
1446
        switch(tag) {
1447
        /* check for obvious tags */
1448
        case MKTAG( 'j', 'P', ' ', ' ' ): /* jpeg 2000 signature */
1449
        case MKTAG( 'm', 'o', 'o', 'v' ):
1450 1451
        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 已提交
1452
        case MKTAG( 'u', 'd', 't', 'a' ): /* Packet Video PVAuthor adds this and a lot of more junk */
1453
            return AVPROBE_SCORE_MAX;
1454 1455 1456 1457 1458 1459
        /* 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;
1460
        case MKTAG( 'f', 't', 'y', 'p' ):
1461
        case MKTAG( 's', 'k', 'i', 'p' ):
1462
        case MKTAG( 'u', 'u', 'i', 'd' ):
1463
            offset = AV_RB32(p->buf+offset) + offset;
1464 1465
            /* if we only find those cause probedata is too small at least rate them */
            score = AVPROBE_SCORE_MAX - 50;
1466 1467 1468
            break;
        default:
            /* unrecognized tag */
1469
            return score;
1470
        }
1471
    }
1472
    return score;
F
Fabrice Bellard 已提交
1473 1474
}

1475 1476 1477 1478 1479
static void mov_build_index(MOVContext *mov, AVStream *st)
{
    MOVStreamContext *sc = st->priv_data;
    offset_t current_offset;
    int64_t current_dts = 0;
B
Baptiste Coudurier 已提交
1480 1481 1482 1483
    unsigned int stts_index = 0;
    unsigned int stsc_index = 0;
    unsigned int stss_index = 0;
    unsigned int i, j, k;
1484

1485
    if (sc->sample_sizes || st->codec->codec_type == CODEC_TYPE_VIDEO || sc->dv_audio_container) {
B
Baptiste Coudurier 已提交
1486 1487 1488 1489
        unsigned int current_sample = 0;
        unsigned int stts_sample = 0;
        unsigned int keyframe, sample_size;
        unsigned int distance = 0;
1490 1491 1492 1493 1494 1495 1496

        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++) {
1497 1498 1499 1500
                if (current_sample >= sc->sample_count) {
                    av_log(mov->fc, AV_LOG_ERROR, "wrong sample count\n");
                    goto out;
                }
1501 1502 1503 1504 1505 1506 1507
                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];
1508
                dprintf("AVIndex stream %d, sample %d, offset %"PRIx64", dts %"PRId64", size %d, distance %d, keyframe %d\n",
1509 1510 1511 1512 1513 1514 1515
                        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++;
1516
                current_sample++;
1517 1518 1519 1520 1521 1522 1523
                if (stts_index + 1 < sc->stts_count && stts_sample == sc->stts_data[stts_index].count) {
                    stts_sample = 0;
                    stts_index++;
                }
            }
        }
    } else { /* read whole chunk */
B
Baptiste Coudurier 已提交
1524
        unsigned int chunk_samples, chunk_size, chunk_duration;
1525 1526 1527 1528 1529 1530 1531

        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 */
1532
            if (sc->sample_size > 1 || st->codec->codec_id == CODEC_ID_PCM_U8 || st->codec->codec_id == CODEC_ID_PCM_S8)
1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551
                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++) {
1552
                        dprintf("mdat %d, offset %"PRIx64", size %"PRId64", current offset %"PRIx64"\n",
1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577
                                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++;
                    }
                }
            }
1578
            dprintf("AVIndex stream %d, chunk %d, offset %"PRIx64", dts %"PRId64", size %d, duration %d\n",
1579 1580 1581 1582 1583
                    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;
        }
    }
1584
 out:
1585 1586
    /* adjust sample count to avindex entries */
    sc->sample_count = st->nb_index_entries;
1587 1588
}

Z
Zdenek Kabelac 已提交
1589
static int mov_read_header(AVFormatContext *s, AVFormatParameters *ap)
1590
{
1591
    MOVContext *mov = (MOVContext *) s->priv_data;
1592
    ByteIOContext *pb = &s->pb;
1593
    int i, err;
1594
    MOV_atom_t atom = { 0, 0, 0 };
1595 1596

    mov->fc = s;
1597
    mov->parse_table = mov_default_parse_table;
1598

1599
    if(!url_is_streamed(pb)) /* .mov and .mp4 aren't streamable anyway (only progressive download if moov is before mdat) */
1600
        atom.size = url_fsize(pb);
1601
    else
1602
        atom.size = 0x7FFFFFFFFFFFFFFFLL;
1603 1604

    /* check MOV header */
1605
    err = mov_read_default(mov, pb, atom);
1606
    if (err<0 || (!mov->found_moov && !mov->found_mdat)) {
1607 1608 1609
        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;
1610
    }
1611 1612
    dprintf("on_parse_exit_offset=%d\n", (int) url_ftell(pb));

1613 1614 1615 1616
    /* 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);

1617
    mov->total_streams = s->nb_streams;
1618

1619 1620
    for(i=0; i<mov->total_streams; i++) {
        MOVStreamContext *sc = mov->streams[i];
B
Baptiste Coudurier 已提交
1621 1622 1623 1624 1625 1626
        /* sanity checks */
        if(!sc->stts_count || !sc->chunk_count || !sc->sample_to_chunk_sz ||
           (!sc->sample_size && !sc->sample_count)){
            av_log(s, AV_LOG_ERROR, "missing mandatory atoms, broken header\n");
            return -1;
        }
1627 1628 1629 1630 1631 1632 1633 1634 1635
        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;
1636
        }
1637
        sc->ffindex = i;
1638
        mov_build_index(mov, s->streams[i]);
1639
    }
1640

1641 1642 1643 1644 1645 1646 1647 1648 1649
    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);
1650 1651 1652
    return 0;
}

Z
Zdenek Kabelac 已提交
1653
static int mov_read_packet(AVFormatContext *s, AVPacket *pkt)
1654
{
1655 1656 1657
    MOVContext *mov = s->priv_data;
    MOVStreamContext *sc = 0;
    AVIndexEntry *sample = 0;
1658
    int64_t best_dts = INT64_MAX;
1659
    int i;
1660

1661
    for (i = 0; i < mov->total_streams; i++) {
1662
        MOVStreamContext *msc = mov->streams[i];
1663

1664 1665 1666 1667
        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);

1668
            dprintf("stream %d, sample %ld, dts %"PRId64"\n", i, msc->current_sample, dts);
1669 1670 1671 1672
            if (dts < best_dts) {
                sample = current_sample;
                best_dts = dts;
                sc = msc;
1673
            }
1674 1675
        }
    }
1676 1677 1678 1679
    if (!sample)
        return -1;
    /* must be done just before reading, to avoid infinite loop on sample */
    sc->current_sample++;
1680
    if (sample->pos >= url_fsize(&s->pb)) {
1681
        av_log(mov->fc, AV_LOG_ERROR, "stream %d, offset 0x%"PRIx64": partial file\n", sc->ffindex, sample->pos);
1682
        return -1;
1683
    }
1684
#ifdef CONFIG_DV_DEMUXER
1685 1686 1687 1688
    if (sc->dv_audio_container) {
        dv_get_packet(mov->dv_demux, pkt);
        dprintf("dv audio pkt size %d\n", pkt->size);
    } else {
1689
#endif
1690 1691
        url_fseek(&s->pb, sample->pos, SEEK_SET);
        av_get_packet(&s->pb, pkt, sample->size);
1692
#ifdef CONFIG_DV_DEMUXER
1693 1694 1695 1696 1697 1698
        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;
        }
    }
1699
#endif
1700 1701 1702 1703 1704 1705 1706 1707 1708 1709
    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;
1710
        }
1711 1712
    } else {
        pkt->pts = pkt->dts;
1713
    }
1714 1715
    pkt->flags |= sample->flags & AVINDEX_KEYFRAME ? PKT_FLAG_KEY : 0;
    pkt->pos = sample->pos;
1716
    dprintf("stream %d, pts %"PRId64", dts %"PRId64", pos 0x%"PRIx64", duration %d\n", pkt->stream_index, pkt->pts, pkt->dts, pkt->pos, pkt->duration);
1717 1718
    return 0;
}
1719

1720 1721 1722 1723 1724
static int mov_seek_stream(AVStream *st, int64_t timestamp, int flags)
{
    MOVStreamContext *sc = st->priv_data;
    int sample, time_sample;
    int i;
1725

1726
    sample = av_index_search_timestamp(st, timestamp, flags);
1727
    dprintf("stream %d, timestamp %"PRId64", sample %d\n", st->index, timestamp, sample);
1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740
    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;
1741
            }
1742 1743
        }
    }
1744
    return sample;
1745 1746
}

1747
static int mov_read_seek(AVFormatContext *s, int stream_index, int64_t sample_time, int flags)
G
Gael Chardon 已提交
1748
{
1749 1750 1751 1752
    AVStream *st;
    int64_t seek_timestamp, timestamp;
    int sample;
    int i;
G
Gael Chardon 已提交
1753

1754
    if (stream_index >= s->nb_streams)
G
Gael Chardon 已提交
1755 1756
        return -1;

1757 1758 1759
    st = s->streams[stream_index];
    sample = mov_seek_stream(st, sample_time, flags);
    if (sample < 0)
G
Gael Chardon 已提交
1760 1761
        return -1;

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

1765 1766 1767 1768
    for (i = 0; i < s->nb_streams; i++) {
        st = s->streams[i];
        if (stream_index == i || st->discard == AVDISCARD_ALL)
            continue;
G
Gael Chardon 已提交
1769

1770 1771
        timestamp = av_rescale_q(seek_timestamp, s->streams[stream_index]->time_base, st->time_base);
        mov_seek_stream(st, timestamp, flags);
1772
    }
G
Gael Chardon 已提交
1773 1774 1775
    return 0;
}

Z
Zdenek Kabelac 已提交
1776
static int mov_read_close(AVFormatContext *s)
1777 1778
{
    int i;
1779
    MOVContext *mov = (MOVContext *) s->priv_data;
1780 1781
    for(i=0; i<mov->total_streams; i++)
        mov_free_stream_context(mov->streams[i]);
1782 1783
    /* free color tabs */
    for(i=0; i<mov->ctab_size; i++)
1784
        av_freep(&mov->ctab[i]);
1785 1786 1787 1788 1789 1790 1791 1792
    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);
    }
1793
    av_freep(&mov->ctab);
1794 1795 1796
    return 0;
}

1797
AVInputFormat mov_demuxer = {
1798 1799
    "mov,mp4,m4a,3gp,3g2,mj2",
    "QuickTime/MPEG4/Motion JPEG 2000 format",
F
Fabrice Bellard 已提交
1800 1801
    sizeof(MOVContext),
    mov_probe,
1802 1803 1804
    mov_read_header,
    mov_read_packet,
    mov_read_close,
G
Gael Chardon 已提交
1805
    mov_read_seek,
1806
};