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

#include <limits.h>
21

22 23
//#define DEBUG

24 25
#include "avformat.h"
#include "avi.h"
26
#include "mov.h"
27

28 29 30 31
#ifdef CONFIG_ZLIB
#include <zlib.h>
#endif

32 33
/*
 * First version by Francois Revol revol@free.fr
34
 * Seek function by Gael Chardon gael.dev@4now.net
35
 *
36
 * Features and limitations:
37
 * - reads most of the QT files I have (at least the structure),
38
 *   the exceptions are .mov with zlib compressed headers ('cmov' section). It shouldn't be hard to implement.
39
 *   FIXED, Francois Revol, 07/17/2002
40 41 42 43 44 45 46
 * - 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 已提交
47
 * - seek is not supported with files that contain edit list
48
 *
49 50
 * Funny I didn't know about http://sourceforge.net/projects/qt-ffmpeg/
 * when coding this :) (it's a writer anyway)
51
 *
52 53 54
 * Reference documents:
 * http://www.geocities.com/xhelmboyx/quicktime/formats/qtm-layout.txt
 * Apple:
G
Gael Chardon 已提交
55
 *  http://developer.apple.com/documentation/QuickTime/QTFF/
56
 *  http://developer.apple.com/documentation/QuickTime/QTFF/qtff.pdf
57 58 59
 * QuickTime is a trademark of Apple (AFAIK :))
 */

60 61
#include "qtpalette.h"

G
Gael Chardon 已提交
62

63 64 65
#undef NDEBUG
#include <assert.h>

66
/* Allows seeking */
G
Gael Chardon 已提交
67 68
#define MOV_SEEK

69 70 71 72
/* Special handling for movies created with Minolta Dimaxe Xi*/
/* this fix should not interfere with other .mov files, but just in case*/
#define MOV_MINOLTA_FIX

73 74 75
/* some streams in QT (and in MP4 mostly) aren't either video nor audio */
/* so we first list them as this, then clean up the list of streams we give back, */
/* getting rid of these */
76
#define CODEC_TYPE_MOV_OTHER    (enum CodecType) 2
77

78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96
/* http://gpac.sourceforge.net/tutorial/mediatypes.htm */
const CodecTag ff_mov_obj_type[] = {
    { CODEC_ID_MPEG4     ,  32 },
    { CODEC_ID_H264      ,  33 },
    { CODEC_ID_AAC       ,  64 },
    { CODEC_ID_MPEG2VIDEO,  96 }, /* MPEG2 Simple */
    { CODEC_ID_MPEG2VIDEO,  97 }, /* MPEG2 Main */
    { CODEC_ID_MPEG2VIDEO,  98 }, /* MPEG2 SNR */
    { CODEC_ID_MPEG2VIDEO,  99 }, /* MPEG2 Spatial */
    { CODEC_ID_MPEG2VIDEO, 100 }, /* MPEG2 High */
    { CODEC_ID_MPEG2VIDEO, 101 }, /* MPEG2 422 */
    { CODEC_ID_AAC       , 102 }, /* MPEG2 AAC Main */
    { CODEC_ID_AAC       , 103 }, /* MPEG2 AAC Low */
    { CODEC_ID_AAC       , 104 }, /* MPEG2 AAC SSR */
    { CODEC_ID_MP3       , 105 },
    { CODEC_ID_MPEG1VIDEO, 106 },
    { CODEC_ID_MP2       , 107 },
    { CODEC_ID_MJPEG     , 108 },
    { CODEC_ID_PCM_S16LE , 224 },
97
    { CODEC_ID_VORBIS    , 221 },
98 99 100 101 102 103 104 105 106
    { CODEC_ID_AC3       , 226 },
    { CODEC_ID_PCM_ALAW  , 227 },
    { CODEC_ID_PCM_MULAW , 228 },
    { CODEC_ID_PCM_S16BE , 230 },
    { CODEC_ID_H263      , 242 },
    { CODEC_ID_H261      , 243 },
    { 0, 0 },
};

Z
Zdenek Kabelac 已提交
107
static const CodecTag mov_video_tags[] = {
108
/*  { CODEC_ID_, MKTAG('c', 'v', 'i', 'd') }, *//* Cinepak */
109 110
/*  { CODEC_ID_H263, MKTAG('r', 'a', 'w', ' ') }, *//* Uncompressed RGB */
/*  { CODEC_ID_H263, MKTAG('Y', 'u', 'v', '2') }, *//* Uncompressed YUV422 */
111
/*    { CODEC_ID_RAWVIDEO, MKTAG('A', 'V', 'U', 'I') }, *//* YUV with alpha-channel (AVID Uncompressed) */
112 113 114 115
/* Graphics */
/* Animation */
/* Apple video */
/* Kodak Photo CD */
116
    { CODEC_ID_MJPEG, MKTAG('j', 'p', 'e', 'g') }, /* PhotoJPEG */
117
    { CODEC_ID_MPEG1VIDEO, MKTAG('m', 'p', 'e', 'g') }, /* MPEG */
118
    { CODEC_ID_MJPEG, MKTAG('m', 'j', 'p', 'a') }, /* Motion-JPEG (format A) */
119
    { CODEC_ID_MJPEG, MKTAG('m', 'j', 'p', 'b') }, /* Motion-JPEG (format B) */
120 121
    { 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) */
122 123
/*    { CODEC_ID_GIF, MKTAG('g', 'i', 'f', ' ') }, *//* embedded gif files as frames (usually one "click to play movie" frame) */
/* Sorenson video */
124 125
    { CODEC_ID_SVQ1, MKTAG('S', 'V', 'Q', '1') }, /* Sorenson Video v1 */
    { CODEC_ID_SVQ1, MKTAG('s', 'v', 'q', '1') }, /* Sorenson Video v1 */
126
    { CODEC_ID_SVQ1, MKTAG('s', 'v', 'q', 'i') }, /* Sorenson Video v1 (from QT specs)*/
M
Michael Niedermayer 已提交
127
    { CODEC_ID_SVQ3, MKTAG('S', 'V', 'Q', '3') }, /* Sorenson Video v3 */
128
    { CODEC_ID_MPEG4, MKTAG('m', 'p', '4', 'v') },
129
    { CODEC_ID_MPEG4, MKTAG('D', 'I', 'V', 'X') }, /* OpenDiVX *//* sample files at http://heroinewarrior.com/xmovie.php3 use this tag */
130
    { CODEC_ID_MPEG4, MKTAG('X', 'V', 'I', 'D') },
131
    { CODEC_ID_MPEG4, MKTAG('3', 'I', 'V', '2') }, /* experimental: 3IVX files before ivx D4 4.5.1 */
132
/*    { CODEC_ID_, MKTAG('I', 'V', '5', '0') }, *//* Indeo 5.0 */
133
    { CODEC_ID_H263, MKTAG('h', '2', '6', '3') }, /* H263 */
134
    { CODEC_ID_H263, MKTAG('s', '2', '6', '3') }, /* H263 ?? works */
F
Fabrice Bellard 已提交
135 136
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', ' ') }, /* DV NTSC */
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', 'p') }, /* DV PAL */
137
/*    { CODEC_ID_DVVIDEO, MKTAG('A', 'V', 'd', 'v') }, *//* AVID dv */
138
    { CODEC_ID_VP3, MKTAG('V', 'P', '3', '1') }, /* On2 VP3 */
139 140
    { CODEC_ID_RPZA, MKTAG('r', 'p', 'z', 'a') }, /* Apple Video (RPZA) */
    { CODEC_ID_CINEPAK, MKTAG('c', 'v', 'i', 'd') }, /* Cinepak */
R
Roberto Togni 已提交
141
    { CODEC_ID_8BPS, MKTAG('8', 'B', 'P', 'S') }, /* Planar RGB (8BPS) */
142
    { CODEC_ID_SMC, MKTAG('s', 'm', 'c', ' ') }, /* Apple Graphics (SMC) */
143
    { CODEC_ID_QTRLE, MKTAG('r', 'l', 'e', ' ') }, /* Apple Animation (RLE) */
144
    { CODEC_ID_QDRAW, MKTAG('q', 'd', 'r', 'w') }, /* QuickDraw */
145
    { CODEC_ID_H264, MKTAG('a', 'v', 'c', '1') }, /* AVC-1/H.264 */
146
    { CODEC_ID_MPEG2VIDEO, MKTAG('h', 'd', 'v', '2') }, /* MPEG2 produced by Sony HD camera */
147
    { CODEC_ID_MPEG2VIDEO, MKTAG('h', 'd', 'v', '3') }, /* HDV produced by FCP */
148 149 150 151 152 153 154 155 156 157
    { 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 */
    //{ CODEC_ID_JPEG2000, MKTAG('m', 'j', 'p', '2') }, /* JPEG 2000 produced by FCP */
158
    { CODEC_ID_NONE, 0 },
159 160
};

Z
Zdenek Kabelac 已提交
161
static const CodecTag mov_audio_tags[] = {
162
    { CODEC_ID_PCM_S32BE, MKTAG('i', 'n', '3', '2') },
163
    { CODEC_ID_PCM_S24BE, MKTAG('i', 'n', '2', '4') },
164 165
/*    { CODEC_ID_PCM_S16BE, MKTAG('N', 'O', 'N', 'E') }, *//* uncompressed */
    { CODEC_ID_PCM_S16BE, MKTAG('t', 'w', 'o', 's') }, /* 16 bits */
166
    /* { CODEC_ID_PCM_S8, MKTAG('t', 'w', 'o', 's') },*/ /* 8 bits */
167
    { CODEC_ID_PCM_U8, MKTAG('r', 'a', 'w', ' ') }, /* 8 bits unsigned */
168 169 170
    { 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') }, /*  */
171
    { CODEC_ID_ADPCM_IMA_QT, MKTAG('i', 'm', 'a', '4') }, /* IMA-4 ADPCM */
172 173
    { 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 */
174 175 176 177 178 179

    { CODEC_ID_MP2, MKTAG('.', 'm', 'p', '3') }, /* MPEG layer 3 */ /* sample files at http://www.3ivx.com/showcase.html use this tag */
    { 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 */
180
    { CODEC_ID_AAC, MKTAG('m', 'p', '4', 'a') }, /* MPEG-4 AAC */
181
    /* The standard for mpeg4 audio is still not normalised AFAIK anyway */
182
    { CODEC_ID_AMR_NB, MKTAG('s', 'a', 'm', 'r') }, /* AMR-NB 3gp */
183
    { CODEC_ID_AMR_WB, MKTAG('s', 'a', 'w', 'b') }, /* AMR-WB 3gp */
184
    { CODEC_ID_AC3, MKTAG('m', 's', 0x20, 0x00) }, /* Dolby AC-3 */
185
    { CODEC_ID_ALAC,MKTAG('a', 'l', 'a', 'c') }, /* Apple Lossless */
R
Roberto Togni 已提交
186
    { CODEC_ID_QDM2,MKTAG('Q', 'D', 'M', '2') }, /* QDM2 */
187
    { CODEC_ID_NONE, 0 },
188 189
};

190 191
/* map numeric codes from mdhd atom to ISO 639 */
/* cf. QTFileFormat.pdf p253, qtff.pdf p205 */
192 193
/* http://developer.apple.com/documentation/mac/Text/Text-368.html */
/* deprecated by putting the code as 3*5bit ascii */
194
static const char *mov_mdhd_language_map[] = {
195
/* 0-9 */
196 197 198 199
"eng", "fra", "ger", "ita", "dut", "sve", "spa", "dan", "por", "nor",
"heb", "jpn", "ara", "fin", "gre", "ice", "mlt", "tur", "hr "/*scr*/, "chi"/*ace?*/,
"urd", "hin", "tha", "kor", "lit", "pol", "hun", "est", "lav",  NULL,
"fo ",  NULL, "rus", "chi",  NULL, "iri", "alb", "ron", "ces", "slk",
200
"slv", "yid", "sr ", "mac", "bul", "ukr", "bel", "uzb", "kaz", "aze",
201
/*?*/
202 203 204 205 206 207
"aze", "arm", "geo", "mol", "kir", "tgk", "tuk", "mon",  NULL, "pus",
"kur", "kas", "snd", "tib", "nep", "san", "mar", "ben", "asm", "guj",
"pa ", "ori", "mal", "kan", "tam", "tel",  NULL, "bur", "khm", "lao",
/*                   roman? arabic? */
"vie", "ind", "tgl", "may", "may", "amh", "tir", "orm", "som", "swa",
/*==rundi?*/
208
 NULL, "run",  NULL, "mlg", "epo",  NULL,  NULL,  NULL,  NULL,  NULL,
209
/* 100 */
210 211
 NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,
 NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,
212 213 214 215
 NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL,  NULL, "wel", "baq",
"cat", "lat", "que", "grn", "aym", "tat", "uig", "dzo", "jav"
};

216 217 218 219 220 221 222 223 224 225 226
/* 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;

227 228 229 230 231 232 233 234 235 236 237 238 239
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;

240 241 242 243 244 245
typedef struct {
    uint8_t  version;
    uint32_t flags; // 24bit

    /* 0x03 ESDescrTag */
    uint16_t es_id;
246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264
#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
265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287
    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;

288 289
struct MOVParseTableEntry;

290 291 292 293 294
typedef struct MOVStreamContext {
    int ffindex; /* the ffmpeg stream id */
    int is_ff_stream; /* Is this stream presented to ffmpeg ? i.e. is this an audio or video stream ? */
    long next_chunk;
    long chunk_count;
295
    int64_t *chunk_offsets;
M
cleanup  
Michael Niedermayer 已提交
296 297
    int stts_count;
    Time2Sample *stts_data;
M
Michael Niedermayer 已提交
298 299
    int ctts_count;
    Time2Sample *ctts_data;
M
cleanup  
Michael Niedermayer 已提交
300
    int edit_count;             /* number of 'edit' (elst atom) */
301 302
    long sample_to_chunk_sz;
    MOV_sample_to_chunk_tbl *sample_to_chunk;
303
    long sample_to_chunk_index;
304 305 306
    int sample_to_time_index;
    long sample_to_time_sample;
    uint64_t sample_to_time_time;
M
Michael Niedermayer 已提交
307 308
    int sample_to_ctime_index;
    int sample_to_ctime_sample;
309 310 311
    long sample_size;
    long sample_count;
    long *sample_sizes;
312 313
    long keyframe_count;
    long *keyframes;
314
    int time_scale;
315
    int time_rate;
316 317
    long current_sample;
    long left_in_chunk; /* how many samples before next chunk */
318
    MOV_esds_t esds;
319 320 321 322 323
} 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;
324
    int time_scale;
B
Baptiste Coudurier 已提交
325
    int64_t duration; /* duration of the longest track */
326 327
    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 */
328 329
    int64_t mdat_size;
    int64_t mdat_offset;
330
    int ni;                                         ///< non interleaved mode
331 332 333 334 335
    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];
336

337
    int64_t next_chunk_offset;
338
    MOVStreamContext *partial; /* != 0 : there is still to read in the current chunk */
339 340
    int ctab_size;
    MOV_ctab_t **ctab;           /* color tables */
341 342
    const struct MOVParseTableEntry *parse_table; /* could be eventually used to change the table */
    /* NOTE: for recursion save to/ restore from local variable! */
343 344

    AVPaletteControl palette_control;
345 346 347 348 349 350 351 352 353 354 355
} 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
 */
356
typedef int (*mov_parse_function)(MOVContext *ctx, ByteIOContext *pb, MOV_atom_t atom);
357 358 359

/* links atom IDs to parse functions */
typedef struct MOVParseTableEntry {
360
    uint32_t type;
361 362 363
    mov_parse_function func;
} MOVParseTableEntry;

364
static int ff_mov_lang_to_iso639(int code, char *to)
365
{
366 367 368 369 370 371 372 373 374 375 376
    int i;
    /* is it the mangled iso code? */
    /* see http://www.geocities.com/xhelmboyx/quicktime/formats/mp4-layout.txt */
    if (code > 138) {
        for (i = 2; i >= 0; i--) {
            to[i] = 0x60 + (code & 0x1f);
            code >>= 5;
        }
        return 1;
    }
    /* old fashion apple lang code */
377
    if (code >= (sizeof(mov_mdhd_language_map)/sizeof(char *)))
378
        return 0;
379
    if (!mov_mdhd_language_map[code])
380 381 382
        return 0;
    strncpy(to, mov_mdhd_language_map[code], 4);
    return 1;
383 384
}

385 386
extern int ff_mov_iso639_to_lang(const char *lang, int mp4); /* for movenc.c */
int ff_mov_iso639_to_lang(const char *lang, int mp4)
387
{
388
    int i, code = 0;
389

390 391
    /* old way, only for QT? */
    for (i = 0; !mp4 && (i < (sizeof(mov_mdhd_language_map)/sizeof(char *))); i++) {
392 393 394
        if (mov_mdhd_language_map[i] && !strcmp(lang, mov_mdhd_language_map[i]))
            return i;
    }
395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411
    /* XXX:can we do that in mov too? */
    if (!mp4)
        return 0;
    /* handle undefined as such */
    if (lang[0] == '\0')
        lang = "und";
    /* 5bit ascii */
    for (i = 0; i < 3; i++) {
        unsigned char c = (unsigned char)lang[i];
        if (c < 0x60)
            return 0;
        if (c > 0x60 + 0x1f)
            return 0;
        code <<= 5;
        code |= (c - 0x60);
    }
    return code;
412
}
413 414

static int mov_read_leaf(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
415
{
416 417 418
    if (atom.size>1)
        url_fskip(pb, atom.size);
/*        url_seek(pb, atom_offset+atom.size, SEEK_SET); */
419 420 421
    return 0;
}

422
static int mov_read_default(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
423
{
424
    int64_t total_size = 0;
425
    MOV_atom_t a;
426 427
    int i;
    int err = 0;
428 429

    a.offset = atom.offset;
430

431
    if (atom.size < 0)
432
        atom.size = 0x7fffffffffffffffLL;
433
    while(((total_size + 8) < atom.size) && !url_feof(pb) && !err) {
434 435
        a.size = atom.size;
        a.type=0L;
436
        if(atom.size >= 8) {
437
            a.size = get_be32(pb);
438
            a.type = get_le32(pb);
439
        }
440
        total_size += 8;
441
        a.offset += 8;
442
        dprintf("type: %08x  %.4s  sz: %"PRIx64"  %"PRIx64"   %"PRIx64"\n", a.type, (char*)&a.type, a.size, atom.size, total_size);
443
        if (a.size == 1) { /* 64 bit extended size */
444
            a.size = get_be64(pb) - 8;
445 446
            a.offset += 8;
            total_size += 8;
447
        }
448 449 450
        if (a.size == 0) {
            a.size = atom.size - total_size;
            if (a.size <= 8)
451
                break;
452 453 454 455
        }
        for (i = 0; c->parse_table[i].type != 0L
             && c->parse_table[i].type != a.type; i++)
            /* empty */;
456

457
        a.size -= 8;
458

459 460
        if(a.size < 0)
            break;
461

462
        if (c->parse_table[i].type == 0) { /* skip leaf atoms data */
463
            url_fskip(pb, a.size);
464 465 466
        } else {
            err = (c->parse_table[i].func)(c, pb, a);
        }
467

468
        a.offset += a.size;
469
        total_size += a.size;
470 471
    }

472 473
    if (!err && total_size < atom.size && atom.size < 0x7ffff) {
        url_fskip(pb, atom.size - total_size);
474 475
    }

476 477 478
    return err;
}

479
static int mov_read_ctab(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
480
{
481 482 483 484
#if 1
    url_fskip(pb, atom.size); // for now
#else
    VERY VERY BROKEN, NEVER execute this, needs rewrite
485 486
    unsigned int len;
    MOV_ctab_t *t;
487 488 489 490 491 492 493
    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) {
494 495 496
        t->clrs = av_malloc(len); // 16bit A R G B
        if (t->clrs)
            get_buffer(pb, t->clrs, len);
497
    }
498
#endif
499

500 501 502
    return 0;
}

503
static int mov_read_hdlr(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
504
{
505
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
506
    int len = 0;
507 508
    uint32_t type;
    uint32_t ctype;
509

510 511 512 513 514 515 516
    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 */

517 518
    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]);
519
    if(ctype == MKTAG('m', 'h', 'l', 'r')) /* MOV */
520
        c->mp4 = 0;
521
    else if(ctype == 0)
522
        c->mp4 = 1;
523 524 525 526
    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;
527 528 529 530
    get_be32(pb); /* component  manufacture */
    get_be32(pb); /* component flags */
    get_be32(pb); /* component flags mask */

531
    if(atom.size <= 24)
532 533 534
        return 0; /* nothing left to read */
    /* XXX: MP4 uses a C string, not a pascal one */
    /* component name */
535 536 537

    if(c->mp4) {
        /* .mp4: C string */
538
        while(get_byte(pb) && (++len < (atom.size - 24)));
539 540 541
    } else {
        /* .mov: PASCAL string */
        len = get_byte(pb);
542
        url_fskip(pb, len);
543
    }
544

545
    url_fskip(pb, atom.size - (url_ftell(pb) - atom.offset));
546 547 548
    return 0;
}

549
static int mov_mp4_read_descr_len(ByteIOContext *pb)
550
{
551
    int len = 0;
552 553
    int count = 4;
    while (count--) {
554
        int c = get_byte(pb);
555 556 557
        len = (len << 7) | (c & 0x7f);
        if (!(c & 0x80))
            break;
558 559 560 561
    }
    return len;
}

562
static int mov_mp4_read_descr(ByteIOContext *pb, int *tag)
563 564 565
{
    int len;
    *tag = get_byte(pb);
566
    len = mov_mp4_read_descr_len(pb);
567
    dprintf("MPEG4 description: tag=0x%02x len=%d\n", *tag, len);
568 569 570
    return len;
}

571
static int mov_read_esds(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
572 573 574
{
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
575
    int64_t start_pos = url_ftell(pb);
576
    int tag, len;
577

578 579
    /* Well, broken but suffisant for some MP4 streams */
    get_be32(pb); /* version + flags */
580
    len = mov_mp4_read_descr(pb, &tag);
581
    if (tag == MP4ESDescrTag) {
582 583
        get_be16(pb); /* ID */
        get_byte(pb); /* priority */
584
    } else
585
        get_be16(pb); /* ID */
586

587
    len = mov_mp4_read_descr(pb, &tag);
588
    if (tag == MP4DecConfigDescrTag) {
589 590 591 592 593 594
        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);

595
        st->codec->codec_id= codec_get_id(ff_mov_obj_type, sc->esds.object_type_id);
596 597
        len = mov_mp4_read_descr(pb, &tag);
        if (tag == MP4DecSpecificDescrTag) {
598
            dprintf("Specific MPEG4 header len=%d\n", len);
599 600 601 602 603 604
            st->codec->extradata = (uint8_t*) av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
            if (st->codec->extradata) {
                get_buffer(pb, st->codec->extradata, len);
                st->codec->extradata_size = len;
            }
        }
605 606
    }
    /* in any case, skip garbage */
607
    url_fskip(pb, atom.size - ((url_ftell(pb) - start_pos)));
608 609 610
    return 0;
}

611 612
/* this atom contains actual media data */
static int mov_read_mdat(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
613
{
614 615 616 617 618 619 620 621 622 623 624
    if(atom.size == 0) /* wrong one (MP4) */
        return 0;
    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 */
}

625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642
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 */
643
    case MKTAG('m', 'j', 'p', '2'): /* Motion Jpeg 2000 */
644 645
        c->mp4 = 1;
    case MKTAG('q', 't', ' ', ' '):
646
    default:
647 648 649 650 651 652 653
        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;
}

654 655 656 657
/* this atom should contain all header atoms */
static int mov_read_moov(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
    int err;
658

659 660 661 662 663 664 665 666 667 668 669 670
    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 已提交
671 672 673
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
    int version = get_byte(pb);
674
    int lang;
675

676 677
    if (version > 1)
        return 1; /* unsupported */
678 679 680 681

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

B
clean  
Baptiste Coudurier 已提交
682 683 684 685 686 687 688
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
689

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

693
    lang = get_be16(pb); /* language */
B
clean  
Baptiste Coudurier 已提交
694
    ff_mov_lang_to_iso639(lang, st->language);
695 696 697 698 699 700 701
    get_be16(pb); /* quality */

    return 0;
}

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

B
Baptiste Coudurier 已提交
705 706 707 708 709 710 711
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
712 713
    c->time_scale = get_be32(pb); /* time scale */
#ifdef DEBUG
G
Gael Chardon 已提交
714
    av_log(NULL, AV_LOG_DEBUG, "time scale = %i\n", c->time_scale);
715
#endif
B
Baptiste Coudurier 已提交
716
    c->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735
    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;
}

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

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

743 744
    // currently SVQ3 decoder expect full STSD header - so let's fake it
    // this should be fixed and just SMI header should be passed
745 746 747 748 749
    av_free(st->codec->extradata);
    st->codec->extradata_size = 0x5a + atom.size;
    st->codec->extradata = (uint8_t*) av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);

    if (st->codec->extradata) {
750 751
        strcpy(st->codec->extradata, "SVQ3"); // fake
        get_buffer(pb, st->codec->extradata + 0x5a, atom.size);
752
        dprintf("Reading SMI %"PRId64"  %s\n", atom.size, (char*)st->codec->extradata + 0x5a);
753
    } else
754
        url_fskip(pb, atom.size);
755 756 757

    return 0;
}
758

759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792
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;
    st->codec->extradata = (uint8_t*) av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);

    if (st->codec->extradata) {
        strcpy(st->codec->extradata + 4, "alac"); // fake
        get_buffer(pb, st->codec->extradata + 8, 36 - 8);
793
        dprintf("Reading alac %d  %s\n", st->codec->extradata_size, (char*)st->codec->extradata);
794 795 796 797 798
    } else
        url_fskip(pb, atom.size);
    return 0;
}

R
Roberto Togni 已提交
799 800
static int mov_read_wave(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
801
    offset_t start_pos = url_ftell(pb);
R
Roberto Togni 已提交
802 803 804 805
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];

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

807 808 809 810 811 812 813 814 815 816 817 818 819
    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;
        st->codec->extradata = (uint8_t*) av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);

        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);
    } else if (atom.size > 0)
820
        url_fskip(pb, atom.size);
821 822
    /* in any case, skip garbage */
    url_fskip(pb, atom.size - ((url_ftell(pb) - start_pos)));
R
Roberto Togni 已提交
823 824 825
    return 0;
}

826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846
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;
    st->codec->extradata = (uint8_t*) av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);

    /* pass all jp2h atom to codec */
    if (st->codec->extradata) {
        strcpy(st->codec->extradata + 4, "jp2h");
        get_buffer(pb, st->codec->extradata + 8, atom.size);
    } else
        url_fskip(pb, atom.size);
    return 0;
}

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

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

854
    av_free(st->codec->extradata);
855

856 857
    st->codec->extradata_size = atom.size;
    st->codec->extradata = (uint8_t*) av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
858

859
    if (st->codec->extradata) {
860
        get_buffer(pb, st->codec->extradata, atom.size);
861
    } else
862
        url_fskip(pb, atom.size);
863 864 865 866

    return 0;
}

867 868 869 870
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;
871
    unsigned int i, entries;
872 873 874 875 876

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

    entries = get_be32(pb);
877

878 879
    if(entries >= UINT_MAX/sizeof(int64_t))
        return -1;
880

881 882 883 884 885 886 887 888 889 890 891 892 893 894
    sc->chunk_count = entries;
    sc->chunk_offsets = (int64_t*) av_malloc(entries * sizeof(int64_t));
    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;
895

896 897
    for(i=0; i<c->fc->nb_streams; i++){
        MOVStreamContext *sc2 = (MOVStreamContext *)c->fc->streams[i]->priv_data;
M
Michael Niedermayer 已提交
898 899 900 901 902 903
        if(sc2 && sc2->chunk_offsets){
            int64_t first= sc2->chunk_offsets[0];
            int64_t last= sc2->chunk_offsets[sc2->chunk_count-1];
            if(first >= sc->chunk_offsets[entries-1] || last <= sc->chunk_offsets[0])
                c->ni=1;
        }
904
    }
905 906 907 908 909 910
    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];
911
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
912 913
    int entries, frames_per_sample;
    uint32_t format;
914
    uint8_t codec_name[32];
915

916 917 918 919 920 921 922 923 924 925 926 927
    /* 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;

928 929 930 931 932
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);

933
    while(entries--) { //Parsing Sample description table
934
        enum CodecID id;
935
        MOV_atom_t a = { 0, 0, 0 };
936
        offset_t start_pos = url_ftell(pb);
937
        int size = get_be32(pb); /* size */
938
        format = get_le32(pb); /* data format */
939

940 941 942
        get_be32(pb); /* reserved */
        get_be16(pb); /* reserved */
        get_be16(pb); /* index */
943

944 945 946 947
        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);
948
        st->codec->codec_tag = format;
949 950 951 952
        id = codec_get_id(mov_audio_tags, format);
        if (id > 0) {
            st->codec->codec_type = CODEC_TYPE_AUDIO;
        } else if (format != MKTAG('m', 'p', '4', 's')) { /* skip old asf mpeg4 tag */
953
            id = codec_get_id(mov_video_tags, format);
954
            if (id <= 0)
955
                id = codec_get_id(codec_bmp_tags, format);
956 957 958 959 960
            if (id > 0)
                st->codec->codec_type = CODEC_TYPE_VIDEO;
        }

        if(st->codec->codec_type==CODEC_TYPE_VIDEO) {
961
            st->codec->codec_id = id;
962 963 964 965 966
            get_be16(pb); /* version */
            get_be16(pb); /* revision level */
            get_be32(pb); /* vendor */
            get_be32(pb); /* temporal quality */
            get_be32(pb); /* spacial quality */
967
            if(st->codec->codec_id == CODEC_ID_MPEG4){ //FIXME this is silly
968 969 970
                get_be16(pb);
                get_be16(pb);
            }else{
971 972
                st->codec->width = get_be16(pb); /* width */
                st->codec->height = get_be16(pb); /* height */
973
            }
974 975 976
            get_be32(pb); /* horiz resolution */
            get_be32(pb); /* vert resolution */
            get_be32(pb); /* data size, always 0 */
977
            frames_per_sample = get_be16(pb); /* frames per samples */
978
#ifdef DEBUG
979
            av_log(NULL, AV_LOG_DEBUG, "frames/samples = %d\n", frames_per_sample);
980
#endif
B
Baptiste Coudurier 已提交
981 982 983 984 985
            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;
            }
986

987
            st->codec->bits_per_sample = get_be16(pb); /* depth */
988
            st->codec->color_table_id = get_be16(pb); /* colortable id */
989

990
/*          These are set in mov_read_stts and might already be set!
991 992
            st->codec->time_base.den      = 25;
            st->codec->time_base.num = 1;
993
*/
994 995

            /* figure out the palette situation */
996 997
            color_depth = st->codec->bits_per_sample & 0x1F;
            color_greyscale = st->codec->bits_per_sample & 0x20;
998 999

            /* if the depth is 2, 4, or 8 bpp, file is palettized */
1000
            if ((color_depth == 2) || (color_depth == 4) ||
1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017
                (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;
                    }

1018
                } else if (st->codec->color_table_id & 0x08) {
1019 1020 1021 1022

                    /* if flag bit 3 is set, use the default palette */
                    color_count = 1 << color_depth;
                    if (color_depth == 2)
M
Michael Niedermayer 已提交
1023
                        color_table = ff_qt_default_palette_4;
1024
                    else if (color_depth == 4)
M
Michael Niedermayer 已提交
1025
                        color_table = ff_qt_default_palette_16;
1026
                    else
M
Michael Niedermayer 已提交
1027
                        color_table = ff_qt_default_palette_256;
1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059

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

1060 1061
                st->codec->palctrl = &c->palette_control;
                st->codec->palctrl->palette_changed = 1;
1062
            } else
1063
                st->codec->palctrl = NULL;
1064 1065
        } else if(st->codec->codec_type==CODEC_TYPE_AUDIO) {
            uint16_t version = get_be16(pb);
1066

1067
            st->codec->codec_id = id;
1068 1069
            get_be16(pb); /* revision level */
            get_be32(pb); /* vendor */
1070

1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081
            st->codec->channels = get_be16(pb);             /* channel count */
            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) {
1082
            case CODEC_ID_PCM_S16LE:
1083 1084 1085
            case CODEC_ID_PCM_S16BE:
                if (st->codec->bits_per_sample == 8)
                    st->codec->codec_id = CODEC_ID_PCM_S8;
1086 1087
                st->codec->bit_rate = st->codec->sample_rate * 8;
                break;
1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102
            case CODEC_ID_PCM_U8:
                if (st->codec->bits_per_sample == 16)
                    st->codec->codec_id = CODEC_ID_PCM_S16BE;
                st->codec->bit_rate = st->codec->sample_rate * 8;
                break;
            case CODEC_ID_AMR_WB:
                st->codec->sample_rate = 16000; /* should really we ? */
                st->codec->channels=1; /* really needed */
                break;
            case CODEC_ID_AMR_NB:
                st->codec->sample_rate = 8000; /* should really we ? */
                st->codec->channels=1; /* really needed */
                break;
            default:
                break;
1103
            }
1104

1105 1106 1107 1108 1109 1110 1111
            //Read QT version 1 fields. In version 0 theese dont exist
            dprintf("version =%d mp4=%d\n",version,c->mp4);
            if(version==1) {
                get_be32(pb); /* samples per packet */
                get_be32(pb); /* bytes per packet */
                get_be32(pb); /* bytes per frame */
                get_be32(pb); /* bytes per sample */
1112 1113 1114 1115 1116 1117 1118 1119 1120
            } 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 */
1121
            }
1122 1123 1124
        } else {
            /* other codec type, just skip (rtp, mp4s, tmcd ...) */
            url_fskip(pb, size - (url_ftell(pb) - start_pos));
1125
        }
1126 1127 1128 1129 1130 1131
        /* 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);
1132
    }
1133

1134 1135 1136
    if(st->codec->codec_type==CODEC_TYPE_AUDIO && st->codec->sample_rate==0 && sc->time_scale>1) {
        st->codec->sample_rate= sc->time_scale;
    }
1137 1138 1139 1140 1141
#ifdef CONFIG_FAAD
    if(st->codec->codec_id ==CODEC_ID_AAC) {
        st->codec->sample_rate= 0; /* let faad init parameters properly */
    }
#endif
1142

1143 1144 1145
    return 0;
}

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

1152 1153 1154 1155
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */

    entries = get_be32(pb);
1156

1157 1158
    if(entries >= UINT_MAX / sizeof(MOV_sample_to_chunk_tbl))
        return -1;
1159

1160
#ifdef DEBUG
G
Gael Chardon 已提交
1161
av_log(NULL, AV_LOG_DEBUG, "track[%i].stsc.entries = %i\n", c->fc->nb_streams-1, entries);
1162
#endif
1163
    sc->sample_to_chunk_sz = entries;
1164 1165 1166
    sc->sample_to_chunk = (MOV_sample_to_chunk_tbl*) av_malloc(entries * sizeof(MOV_sample_to_chunk_tbl));
    if (!sc->sample_to_chunk)
        return -1;
1167 1168 1169 1170 1171 1172 1173 1174
    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;
}

1175 1176 1177 1178
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;
1179
    unsigned int i, entries;
1180 1181 1182 1183 1184

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

    entries = get_be32(pb);
1185

1186 1187
    if(entries >= UINT_MAX / sizeof(long))
        return -1;
1188

1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204
    sc->keyframe_count = entries;
#ifdef DEBUG
    av_log(NULL, AV_LOG_DEBUG, "keyframe_count = %ld\n", sc->keyframe_count);
#endif
    sc->keyframes = (long*) av_malloc(entries * sizeof(long));
    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;
}

1205
static int mov_read_stsz(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1206
{
1207 1208
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1209
    unsigned int i, entries;
1210

1211 1212
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
1213

1214 1215
    sc->sample_size = get_be32(pb);
    entries = get_be32(pb);
1216 1217 1218
    if(entries >= UINT_MAX / sizeof(long))
        return -1;

1219
    sc->sample_count = entries;
1220
#ifdef DEBUG
G
Gael Chardon 已提交
1221
    av_log(NULL, AV_LOG_DEBUG, "sample_size = %ld sample_count = %ld\n", sc->sample_size, sc->sample_count);
1222
#endif
1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247
    if(sc->sample_size) {
        /* override sample size for uncompressed sound */
        switch (st->codec->codec_id) {
        case CODEC_ID_PCM_S32BE:
        case CODEC_ID_PCM_S32LE:
            sc->sample_size = 4 * st->codec->channels;
            break;
        case CODEC_ID_PCM_S24BE:
        case CODEC_ID_PCM_S24LE:
            sc->sample_size = 3 * st->codec->channels;
            break;
        case CODEC_ID_PCM_S16BE:
        case CODEC_ID_PCM_S16LE:
            sc->sample_size = 2 * st->codec->channels;
            break;
        case CODEC_ID_PCM_MULAW:
        case CODEC_ID_PCM_ALAW:
        case CODEC_ID_PCM_S8:
        case CODEC_ID_PCM_U8:
            sc->sample_size = 1 * st->codec->channels;
            break;
        default:
            break;
        }
        assert(sc->sample_size);
1248
        return 0; /* there isn't any table following */
1249
    }
1250 1251 1252
    sc->sample_sizes = (long*) av_malloc(entries * sizeof(long));
    if (!sc->sample_sizes)
        return -1;
1253 1254 1255
    for(i=0; i<entries; i++) {
        sc->sample_sizes[i] = get_be32(pb);
#ifdef DEBUG
1256
        av_log(NULL, AV_LOG_DEBUG, "sample_sizes[]=%ld\n", sc->sample_sizes[i]);
1257 1258 1259 1260 1261
#endif
    }
    return 0;
}

1262
static int mov_read_stts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1263
{
1264
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
1265
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1266
    unsigned int i, entries;
1267 1268
    int64_t duration=0;
    int64_t total_sample_count=0;
1269

1270 1271 1272
    get_byte(pb); /* version */
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
    entries = get_be32(pb);
M
cleanup  
Michael Niedermayer 已提交
1273
    if(entries >= UINT_MAX / sizeof(Time2Sample))
1274
        return -1;
1275

1276 1277
    sc->stts_count = entries;
    sc->stts_data = av_malloc(entries * sizeof(Time2Sample));
1278

1279
#ifdef DEBUG
G
Gael Chardon 已提交
1280
av_log(NULL, AV_LOG_DEBUG, "track[%i].stts.entries = %i\n", c->fc->nb_streams-1, entries);
1281
#endif
1282 1283 1284

    sc->time_rate=0;

1285
    for(i=0; i<entries; i++) {
M
cleanup  
Michael Niedermayer 已提交
1286 1287
        int sample_duration;
        int sample_count;
1288

1289
        sample_count=get_be32(pb);
1290
        sample_duration = get_be32(pb);
1291 1292 1293 1294
        sc->stts_data[i].count= sample_count;
        sc->stts_data[i].duration= sample_duration;

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

1296 1297
        dprintf("sample_count=%d, sample_duration=%d\n",sample_count,sample_duration);

B
Baptiste Coudurier 已提交
1298
        duration+=(int64_t)sample_duration*sample_count;
1299 1300 1301
        total_sample_count+=sample_count;
    }

1302 1303 1304
    st->nb_frames= total_sample_count;
    if(duration)
        st->duration= duration;
1305 1306 1307
    return 0;
}

M
Michael Niedermayer 已提交
1308 1309
static int mov_read_ctts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
1310 1311
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
M
Michael Niedermayer 已提交
1312 1313 1314 1315 1316 1317 1318 1319
    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;

1320 1321
    sc->ctts_count = entries;
    sc->ctts_data = av_malloc(entries * sizeof(Time2Sample));
M
Michael Niedermayer 已提交
1322

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

M
Michael Niedermayer 已提交
1325
    for(i=0; i<entries; i++) {
1326 1327 1328 1329 1330 1331 1332
        int count    =get_be32(pb);
        int duration =get_be32(pb);

        sc->ctts_data[i].count   = count;
        sc->ctts_data[i].duration= duration;

        sc->time_rate= ff_gcd(sc->time_rate, duration);
M
Michael Niedermayer 已提交
1333 1334 1335 1336
    }
    return 0;
}

1337 1338 1339 1340 1341 1342 1343 1344 1345
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;
    sc = (MOVStreamContext*) av_mallocz(sizeof(MOVStreamContext));
    if (!sc) {
1346
        av_free(st);
1347 1348 1349 1350 1351
        return -1;
    }

    sc->sample_to_chunk_index = -1;
    st->priv_data = sc;
1352
    st->codec->codec_type = CODEC_TYPE_MOV_OTHER;
F
Fabrice Bellard 已提交
1353
    st->start_time = 0; /* XXX: check */
1354 1355 1356 1357 1358 1359 1360
    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 已提交
1361 1362
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
    int version = get_byte(pb);
1363 1364 1365 1366 1367 1368 1369 1370 1371 1372

    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 已提交
1373 1374 1375 1376 1377 1378 1379
    if (version == 1) {
        get_be64(pb);
        get_be64(pb);
    } else {
        get_be32(pb); /* creation time */
        get_be32(pb); /* modification time */
    }
1380 1381
    st->id = (int)get_be32(pb); /* track id (NOT 0 !)*/
    get_be32(pb); /* reserved */
F
Fabrice Bellard 已提交
1382
    st->start_time = 0; /* check */
B
Baptiste Coudurier 已提交
1383
    (version == 1) ? get_be64(pb) : get_be32(pb); /* highlevel (considering edits) duration in movie timebase */
1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394
    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 */
1395 1396
    /*st->codec->width =*/ get_be32(pb) >> 16; /* track width */
    /*st->codec->height =*/ get_be32(pb) >> 16; /* track height */
1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416

    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;
1417
    if (atom.type != MKTAG('m', 'd', 'a', 't')) {
1418 1419 1420 1421 1422 1423 1424 1425
        url_fskip(pb, atom.size);
        return 0;
    }
    err = mov_read_mdat(c, pb, atom);
    return err;
}


1426
#ifdef CONFIG_ZLIB
1427
static int null_read_packet(void *opaque, uint8_t *buf, int buf_size)
1428 1429 1430 1431
{
    return -1;
}

1432
static int mov_read_cmov(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1433 1434
{
    ByteIOContext ctx;
1435 1436
    uint8_t *cmov_data;
    uint8_t *moov_data; /* uncompressed data */
1437 1438
    long cmov_len, moov_len;
    int ret;
1439

1440 1441 1442 1443
    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' )) {
1444
        av_log(NULL, AV_LOG_ERROR, "unknown compression for cmov atom !");
1445 1446 1447 1448 1449 1450
        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 */
1451
    cmov_len = atom.size - 6 * 4;
1452

1453
    cmov_data = (uint8_t *) av_malloc(cmov_len);
1454 1455
    if (!cmov_data)
        return -1;
1456
    moov_data = (uint8_t *) av_malloc(moov_len);
1457 1458 1459 1460 1461
    if (!moov_data) {
        av_free(cmov_data);
        return -1;
    }
    get_buffer(pb, cmov_data, cmov_len);
1462
    if(uncompress (moov_data, (uLongf *) &moov_len, (const Bytef *)cmov_data, cmov_len) != Z_OK)
1463 1464 1465 1466
        return -1;
    if(init_put_byte(&ctx, moov_data, moov_len, 0, NULL, null_read_packet, NULL, NULL) != 0)
        return -1;
    ctx.buf_end = ctx.buffer + moov_len;
1467 1468 1469
    atom.type = MKTAG( 'm', 'o', 'o', 'v' );
    atom.offset = 0;
    atom.size = moov_len;
1470
#ifdef DEBUG
M
Michael Niedermayer 已提交
1471
//    { int fd = open("/tmp/uncompheader.mov", O_WRONLY | O_CREAT); write(fd, moov_data, moov_len); close(fd); }
1472
#endif
1473
    ret = mov_read_default(c, &ctx, atom);
1474 1475
    av_free(moov_data);
    av_free(cmov_data);
1476

1477 1478 1479 1480
    return ret;
}
#endif

G
Gael Chardon 已提交
1481 1482 1483
/* edit list atom */
static int mov_read_elst(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
{
1484
  int i, edit_count;
G
Gael Chardon 已提交
1485 1486 1487

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

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

1499 1500
static const MOVParseTableEntry mov_default_parse_table[] = {
/* mp4 atoms */
1501 1502 1503
{ 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 已提交
1504
{ MKTAG( 'c', 't', 't', 's' ), mov_read_ctts }, /* composition time to sample */
1505 1506 1507 1508
{ 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 },
1509
{ MKTAG( 'e', 'l', 's', 't' ), mov_read_elst },
1510
{ MKTAG( 'e', 'n', 'd', 'a' ), mov_read_enda },
1511
{ MKTAG( 'f', 'r', 'e', 'e' ), mov_read_leaf },
1512
{ MKTAG( 'f', 't', 'y', 'p' ), mov_read_ftyp },
1513 1514 1515 1516
{ 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 },
1517
{ MKTAG( 'j', 'p', '2', 'h' ), mov_read_jp2h },
1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530
{ 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 },
1531
{ MKTAG( 's', 'k', 'i', 'p' ), mov_read_leaf },
1532
{ MKTAG( 's', 'm', 'h', 'd' ), mov_read_leaf }, /* sound media info header */
1533
{ MKTAG( 'S', 'M', 'I', ' ' ), mov_read_smi }, /* Sorenson extension ??? */
1534
{ MKTAG( 'a', 'l', 'a', 'c' ), mov_read_alac }, /* alac specific atom */
1535
{ MKTAG( 'a', 'v', 'c', 'C' ), mov_read_avcC },
1536 1537 1538 1539 1540 1541
{ 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 },
1542
{ MKTAG( 's', 't', 's', 's' ), mov_read_stss }, /* sync sample */
1543 1544 1545 1546 1547 1548 1549 1550
{ 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 },
1551
{ MKTAG( 'u', 'u', 'i', 'd' ), mov_read_leaf },
1552
{ MKTAG( 'v', 'm', 'h', 'd' ), mov_read_leaf }, /* video media info header */
R
Roberto Togni 已提交
1553
{ MKTAG( 'w', 'a', 'v', 'e' ), mov_read_wave },
1554
/* extra mp4 */
1555
{ MKTAG( 'M', 'D', 'E', 'S' ), mov_read_leaf },
1556
/* QT atoms */
1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573
{ 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 },
1574
#ifdef CONFIG_ZLIB
1575
{ MKTAG( 'c', 'm', 'o', 'v' ), mov_read_cmov },
1576
#else
1577
{ MKTAG( 'c', 'm', 'o', 'v' ), mov_read_leaf },
1578
#endif
1579
{ 0L, mov_read_leaf }
1580 1581 1582 1583 1584
};

static void mov_free_stream_context(MOVStreamContext *sc)
{
    if(sc) {
M
Michael Niedermayer 已提交
1585 1586 1587 1588
        av_freep(&sc->chunk_offsets);
        av_freep(&sc->sample_to_chunk);
        av_freep(&sc->sample_sizes);
        av_freep(&sc->keyframes);
1589 1590
        av_freep(&sc->stts_data);
        av_freep(&sc->ctts_data);
M
Michael Niedermayer 已提交
1591
        av_freep(&sc);
1592 1593 1594
    }
}

1595
static inline uint32_t mov_to_tag(uint8_t *buf)
1596
{
1597
    return MKTAG(buf[0], buf[1], buf[2], buf[3]);
1598 1599
}

1600
static inline uint32_t to_be32(uint8_t *buf)
1601 1602 1603 1604
{
    return (buf[0] << 24) | (buf[1] << 16) | (buf[2] << 8) | buf[3];
}

1605
/* XXX: is it sufficient ? */
F
Fabrice Bellard 已提交
1606 1607
static int mov_probe(AVProbeData *p)
{
1608 1609
    unsigned int offset;
    uint32_t tag;
1610
    int score = 0;
1611

F
Fabrice Bellard 已提交
1612 1613 1614
    /* check file header */
    if (p->buf_size <= 12)
        return 0;
1615 1616 1617 1618
    offset = 0;
    for(;;) {
        /* ignore invalid offset */
        if ((offset + 8) > (unsigned int)p->buf_size)
1619
            return score;
1620
        tag = mov_to_tag(p->buf + offset + 4);
1621
        switch(tag) {
1622
        /* check for obvious tags */
1623
        case MKTAG( 'j', 'P', ' ', ' ' ): /* jpeg 2000 signature */
1624
        case MKTAG( 'm', 'o', 'o', 'v' ):
1625 1626
        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 已提交
1627
        case MKTAG( 'u', 'd', 't', 'a' ): /* Packet Video PVAuthor adds this and a lot of more junk */
1628
            return AVPROBE_SCORE_MAX;
1629 1630 1631 1632 1633 1634
        /* 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;
1635
        case MKTAG( 'f', 't', 'y', 'p' ):
1636
        case MKTAG( 's', 'k', 'i', 'p' ):
1637
        case MKTAG( 'u', 'u', 'i', 'd' ):
1638
            offset = to_be32(p->buf+offset) + offset;
1639 1640
            /* if we only find those cause probedata is too small at least rate them */
            score = AVPROBE_SCORE_MAX - 50;
1641 1642 1643
            break;
        default:
            /* unrecognized tag */
1644
            return score;
1645
        }
1646
    }
1647
    return score;
F
Fabrice Bellard 已提交
1648 1649
}

Z
Zdenek Kabelac 已提交
1650
static int mov_read_header(AVFormatContext *s, AVFormatParameters *ap)
1651
{
1652
    MOVContext *mov = (MOVContext *) s->priv_data;
1653
    ByteIOContext *pb = &s->pb;
Z
Zdenek Kabelac 已提交
1654
    int i, j, nb, err;
1655
    MOV_atom_t atom = { 0, 0, 0 };
1656 1657

    mov->fc = s;
1658
    mov->parse_table = mov_default_parse_table;
1659

1660
    if(!url_is_streamed(pb)) /* .mov and .mp4 aren't streamable anyway (only progressive download if moov is before mdat) */
1661
        atom.size = url_fsize(pb);
1662
    else
1663
        atom.size = 0x7FFFFFFFFFFFFFFFLL;
1664 1665

    /* check MOV header */
1666
    err = mov_read_default(mov, pb, atom);
1667
    if (err<0 || (!mov->found_moov && !mov->found_mdat)) {
1668 1669 1670
        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;
1671
    }
1672 1673
    dprintf("on_parse_exit_offset=%d\n", (int) url_ftell(pb));

1674 1675 1676 1677 1678 1679
    /* 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);

    mov->next_chunk_offset = mov->mdat_offset; /* initialise reading */
    mov->total_streams = nb = s->nb_streams;
1680

1681 1682
#if 1
    for(i=0; i<s->nb_streams;) {
1683
        if(s->streams[i]->codec->codec_type == CODEC_TYPE_MOV_OTHER) {/* not audio, not video, delete */
1684
            av_free(s->streams[i]);
1685 1686 1687 1688 1689 1690 1691
            for(j=i+1; j<s->nb_streams; j++)
                s->streams[j-1] = s->streams[j];
            s->nb_streams--;
        } else
            i++;
    }
    for(i=0; i<s->nb_streams;i++) {
1692 1693 1694 1695
        MOVStreamContext *sc = (MOVStreamContext *)s->streams[i]->priv_data;

        if(!sc->time_rate)
            sc->time_rate=1;
1696 1697
        if(!sc->time_scale)
            sc->time_scale= mov->time_scale;
1698 1699
        av_set_pts_info(s->streams[i], 64, sc->time_rate, sc->time_scale);

1700 1701 1702 1703
        if(s->streams[i]->duration != AV_NOPTS_VALUE){
            assert(s->streams[i]->duration % sc->time_rate == 0);
            s->streams[i]->duration /= sc->time_rate;
        }
1704

1705 1706 1707 1708 1709 1710 1711 1712 1713
        sc->ffindex = i;
        sc->is_ff_stream = 1;
    }
#endif
    return 0;
}

/* Yes, this is ugly... I didn't write the specs of QT :p */
/* XXX:remove useless commented code sometime */
Z
Zdenek Kabelac 已提交
1714
static int mov_read_packet(AVFormatContext *s, AVPacket *pkt)
1715
{
1716
    MOVContext *mov = (MOVContext *) s->priv_data;
1717
    MOVStreamContext *sc;
1718
    AVStream *st;
1719 1720
    int64_t offset = INT64_MAX;
    int64_t best_dts = INT64_MAX;
1721
    int i, a, b, m;
1722
    int next_sample= -99;
1723
    int size;
1724
    int idx;
1725
    size = 0x0FFFFFFF;
1726

1727
    if (mov->partial) {
1728 1729
        sc = mov->partial;
        idx = sc->sample_to_chunk_index;
1730

1731
        if (idx < 0) return 0;
1732
        dprintf("sc[ffid %d]->sample_size = %ld\n", sc->ffindex, sc->sample_size);
1733 1734 1735 1736 1737
        //size = sc->sample_sizes[sc->current_sample];
        // that ain't working...
        //size = (sc->sample_size)?sc->sample_size:sc->sample_sizes[sc->current_sample];
        size = (sc->sample_size > 1)?sc->sample_size:sc->sample_sizes[sc->current_sample];

1738 1739
        next_sample= sc->current_sample+1;

1740
        sc->left_in_chunk--;
1741

1742
        if (sc->left_in_chunk <= 0)
1743 1744 1745 1746 1747 1748 1749
            mov->partial = 0;
        offset = mov->next_chunk_offset;
        /* extract the sample */

        goto readchunk;
    }

1750
again:
1751
    sc = 0;
1752 1753
    if(offset == INT64_MAX)
        best_dts= INT64_MAX;
1754
    for(i=0; i<mov->total_streams; i++) {
1755
        MOVStreamContext *msc = mov->streams[i];
1756 1757 1758 1759 1760 1761 1762 1763 1764

        if ((msc->next_chunk < msc->chunk_count) && msc->next_chunk >= 0){
            if (msc->sample_to_time_index < msc->stts_count && mov->ni) {
                int64_t dts;
                int index= msc->sample_to_time_index;
                int sample= msc->sample_to_time_sample;
                int time= msc->sample_to_time_time;
                int duration = msc->stts_data[index].duration;
                int count = msc->stts_data[index].count;
1765
                if (sample + count <= msc->current_sample) {
1766 1767 1768 1769 1770
                    sample += count;
                    time   += count*duration;
                    index ++;
                    duration = msc->stts_data[index].duration;
                }
1771
                dts = time + (msc->current_sample - sample) * (int64_t)duration;
1772
                dts = av_rescale(dts, AV_TIME_BASE, msc->time_scale);
1773
                dprintf("stream: %d dts: %"PRId64" best_dts: %"PRId64" offset: %"PRId64"\n", i, dts, best_dts, offset);
1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784
                if(dts < best_dts){
                    best_dts= dts;
                    sc = msc;
                    offset = msc->chunk_offsets[msc->next_chunk];
                }
            }else{
                if ((msc->chunk_offsets[msc->next_chunk] < offset)) {
                    sc = msc;
                    offset = msc->chunk_offsets[msc->next_chunk];
                }
            }
1785 1786
        }
    }
1787
    if (!sc || offset==INT64_MAX)
1788
        return -1;
1789 1790 1791

    sc->next_chunk++;

1792
    if(mov->next_chunk_offset < offset) { /* some meta data */
1793
        url_fskip(&s->pb, (offset - mov->next_chunk_offset));
1794 1795 1796
        mov->next_chunk_offset = offset;
    }

1797
    if(!sc->is_ff_stream || (s->streams[sc->ffindex]->discard >= AVDISCARD_ALL)) {
1798
        url_fskip(&s->pb, (offset - mov->next_chunk_offset));
1799
        mov->next_chunk_offset = offset;
1800
        offset = INT64_MAX;
1801 1802 1803 1804 1805 1806
        goto again;
    }

    /* now get the chunk size... */

    for(i=0; i<mov->total_streams; i++) {
1807 1808
        MOVStreamContext *msc = mov->streams[i];
        if ((msc->next_chunk < msc->chunk_count)
1809 1810
            && msc->chunk_offsets[msc->next_chunk] - offset < size
            && msc->chunk_offsets[msc->next_chunk] > offset)
1811
            size = msc->chunk_offsets[msc->next_chunk] - offset;
1812
    }
Z
Zdenek Kabelac 已提交
1813 1814

#ifdef MOV_MINOLTA_FIX
1815
    //Make sure that size is according to sample_size (Needed by .mov files
Z
Zdenek Kabelac 已提交
1816 1817 1818
    //created on a Minolta Dimage Xi where audio chunks contains waste data in the end)
    //Maybe we should really not only check sc->sample_size, but also sc->sample_sizes
    //but I have no such movies
1819
    if (sc->sample_size > 0) {
Z
Zdenek Kabelac 已提交
1820 1821
        int foundsize=0;
        for(i=0; i<(sc->sample_to_chunk_sz); i++) {
1822
            if( (sc->sample_to_chunk[i].first)<=(sc->next_chunk) )
Z
Zdenek Kabelac 已提交
1823
            {
1824
                foundsize=sc->sample_to_chunk[i].count*sc->sample_size;
Z
Zdenek Kabelac 已提交
1825
            }
1826
            dprintf("sample_to_chunk first=%ld count=%ld, id=%ld\n", sc->sample_to_chunk[i].first, sc->sample_to_chunk[i].count, sc->sample_to_chunk[i].id);
Z
Zdenek Kabelac 已提交
1827 1828 1829 1830 1831 1832 1833 1834
        }
        if( (foundsize>0) && (foundsize<size) )
        {
            size=foundsize;
        }
    }
#endif //MOV_MINOLTA_FIX

1835 1836 1837 1838
    idx = sc->sample_to_chunk_index;
    if (idx + 1 < sc->sample_to_chunk_sz && sc->next_chunk >= sc->sample_to_chunk[idx + 1].first)
        idx++;
    sc->sample_to_chunk_index = idx;
1839
    /* split chunks into samples */
1840
    if (sc->sample_size == 0 || sc->sample_size > 100) {
1841
        if (idx >= 0 && sc->sample_to_chunk[idx].count != 1) {
1842
            mov->partial = sc;
1843 1844
            /* we'll have to get those samples before next chunk */
            sc->left_in_chunk = sc->sample_to_chunk[idx].count - 1;
1845
            size = (sc->sample_size > 1)?sc->sample_size:sc->sample_sizes[sc->current_sample];
1846
        }
1847

1848 1849 1850 1851 1852
        next_sample= sc->current_sample+1;
    }else if(idx < sc->sample_to_chunk_sz){
        next_sample= sc->current_sample + sc->sample_to_chunk[idx].count;
    }else
        next_sample= sc->current_sample;
1853 1854

readchunk:
1855
    dprintf("chunk: %"PRId64" -> %"PRId64" (%i)\n", offset, offset + size, size);
1856 1857 1858 1859 1860 1861
    if(size == 0x0FFFFFFF)
        size = mov->mdat_size + mov->mdat_offset - offset;
    if(size < 0)
        return -1;
    if(size == 0)
        return -1;
1862
    url_fseek(&s->pb, offset, SEEK_SET);
1863

M
Michael Niedermayer 已提交
1864
    av_get_packet(&s->pb, pkt, size);
1865
    pkt->stream_index = sc->ffindex;
1866

1867 1868
    // If the keyframes table exists, mark any samples that are in the table as key frames.
    // If no table exists, treat very sample as a key frame.
1869
    if (sc->keyframes) {
1870 1871
        a = 0;
        b = sc->keyframe_count - 1;
1872

1873 1874 1875 1876 1877 1878
        while (a < b) {
            m = (a + b + 1) >> 1;
            if (sc->keyframes[m] > sc->current_sample) {
                b = m - 1;
            } else {
                a = m;
1879
            }
1880
        }
1881

1882 1883 1884 1885 1886
        if (sc->keyframes[a] == sc->current_sample)
            pkt->flags |= PKT_FLAG_KEY;
    }
    else
        pkt->flags |= PKT_FLAG_KEY;
1887 1888

    mov->next_chunk_offset = offset + size;
1889 1890 1891

    /* find the corresponding dts */
    if (sc && sc->sample_to_time_index < sc->stts_count && pkt) {
M
cleanup  
Michael Niedermayer 已提交
1892
      unsigned int count;
M
Michael Niedermayer 已提交
1893
      uint64_t dts, pts;
M
cleanup  
Michael Niedermayer 已提交
1894 1895
      unsigned int duration = sc->stts_data[sc->sample_to_time_index].duration;
      count = sc->stts_data[sc->sample_to_time_index].count;
1896
      if ((sc->sample_to_time_sample + count) <= sc->current_sample) {
1897 1898 1899
        sc->sample_to_time_sample += count;
        sc->sample_to_time_time   += count*duration;
        sc->sample_to_time_index ++;
M
cleanup  
Michael Niedermayer 已提交
1900
        duration = sc->stts_data[sc->sample_to_time_index].duration;
1901
      }
1902
      dts = sc->sample_to_time_time + (sc->current_sample - sc->sample_to_time_sample) * (int64_t)duration;
M
Michael Niedermayer 已提交
1903 1904 1905 1906 1907
        /* find the corresponding pts */
        if (sc->sample_to_ctime_index < sc->ctts_count) {
            int duration = sc->ctts_data[sc->sample_to_ctime_index].duration;
            int count = sc->ctts_data[sc->sample_to_ctime_index].count;

1908
            if ((sc->sample_to_ctime_sample + count) <= sc->current_sample) {
M
Michael Niedermayer 已提交
1909 1910 1911 1912 1913 1914 1915
                sc->sample_to_ctime_sample += count;
                sc->sample_to_ctime_index ++;
                duration = sc->ctts_data[sc->sample_to_ctime_index].duration;
            }
            pts = dts + duration;
        }else
            pts = dts;
1916 1917 1918 1919 1920 1921 1922

        st= s->streams[ sc->ffindex ];
        assert(pts % st->time_base.num == 0);
        assert(dts % st->time_base.num == 0);

        pkt->pts = pts / st->time_base.num;
        pkt->dts = dts / st->time_base.num;
1923
        dprintf("stream #%d smp #%ld dts = %"PRId64" pts = %"PRId64" (smp:%ld time:%"PRId64" idx:%d ent:%d count:%d dur:%d)\n"
1924 1925 1926 1927 1928 1929 1930
                , pkt->stream_index, sc->current_sample-1, pkt->dts, pkt->pts
                , sc->sample_to_time_sample
                , sc->sample_to_time_time
                , sc->sample_to_time_index
                , sc->stts_count
                , count
                , duration);
M
Michael Niedermayer 已提交
1931
    }
1932

1933 1934 1935
    assert(next_sample>=0);
    sc->current_sample= next_sample;

1936 1937 1938
    return 0;
}

1939
#if defined(MOV_SEEK)
G
Gael Chardon 已提交
1940 1941 1942
/**
 * Seek method based on the one described in the Appendix C of QTFileFormat.pdf
 */
1943
static int mov_read_seek(AVFormatContext *s, int stream_index, int64_t sample_time, int flags)
G
Gael Chardon 已提交
1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957
{
    MOVContext* mov = (MOVContext *) s->priv_data;
    MOVStreamContext* sc;
    int32_t i, a, b, m;
    int64_t start_time;
    int32_t seek_sample, sample;
    int32_t duration;
    int32_t count;
    int32_t chunk;
    int32_t left_in_chunk;
    int64_t chunk_file_offset;
    int64_t sample_file_offset;
    int32_t first_chunk_sample;
    int32_t sample_to_chunk_idx;
1958 1959 1960
    int sample_to_time_index;
    long sample_to_time_sample = 0;
    uint64_t sample_to_time_time = 0;
G
Gael Chardon 已提交
1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972
    int mov_idx;

    // Find the corresponding mov stream
    for (mov_idx = 0; mov_idx < mov->total_streams; mov_idx++)
        if (mov->streams[mov_idx]->ffindex == stream_index)
            break;
    if (mov_idx == mov->total_streams) {
        av_log(s, AV_LOG_ERROR, "mov: requested stream was not found in mov streams (idx=%i)\n", stream_index);
        return -1;
    }
    sc = mov->streams[mov_idx];

1973 1974
    sample_time *= s->streams[stream_index]->time_base.num;

G
Gael Chardon 已提交
1975
    // Step 1. Find the edit that contains the requested time (elst)
1976
    if (sc->edit_count && 0) {
G
Gael Chardon 已提交
1977 1978 1979 1980 1981 1982
        // FIXME should handle edit list
        av_log(s, AV_LOG_ERROR, "mov: does not handle seeking in files that contain edit list (c:%d)\n", sc->edit_count);
        return -1;
    }

    // Step 2. Find the corresponding sample using the Time-to-sample atom (stts) */
1983
    dprintf("Searching for time %li in stream #%i (time_scale=%i)\n", (long)sample_time, mov_idx, sc->time_scale);
G
Gael Chardon 已提交
1984 1985
    start_time = 0; // FIXME use elst atom
    sample = 1; // sample are 0 based in table
1986

G
Gael Chardon 已提交
1987
    for (i = 0; i < sc->stts_count; i++) {
M
cleanup  
Michael Niedermayer 已提交
1988 1989
        count = sc->stts_data[i].count;
        duration = sc->stts_data[i].duration;
G
Gael Chardon 已提交
1990
        if ((start_time + count*duration) > sample_time) {
1991 1992 1993
            sample_to_time_time = start_time;
            sample_to_time_index = i;
            sample_to_time_sample = sample;
G
Gael Chardon 已提交
1994 1995 1996 1997 1998
            sample += (sample_time - start_time) / duration;
            break;
        }
        sample += count;
        start_time += count * duration;
1999 2000 2001
    }
    sample_to_time_time = start_time;
    sample_to_time_index = i;
G
Gael Chardon 已提交
2002 2003 2004
    /* NOTE: despite what qt doc say, the dt value (Display Time in qt vocabulary) computed with the stts atom
       is a decoding time stamp (dts) not a presentation time stamp. And as usual dts != pts for stream with b frames */

2005
    dprintf("Found time %li at sample #%u\n", (long)sample_time, sample);
G
Gael Chardon 已提交
2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022
    if (sample > sc->sample_count) {
        av_log(s, AV_LOG_ERROR, "mov: sample pos is too high, unable to seek (req. sample=%i, sample count=%ld)\n", sample, sc->sample_count);
        return -1;
    }

    // Step 3. Find the prior sync. sample using the Sync sample atom (stss)
    if (sc->keyframes) {
        a = 0;
        b = sc->keyframe_count - 1;
        while (a < b) {
            m = (a + b + 1) >> 1;
            if (sc->keyframes[m] > sample) {
                b = m - 1;
            } else {
                a = m;
            }
        }
2023 2024
        // for low latency prob: always use the previous keyframe, just uncomment the next line
        // if (a) a--;
G
Gael Chardon 已提交
2025 2026 2027 2028
        seek_sample = sc->keyframes[a];
    }
    else
        seek_sample = sample; // else all samples are key frames
2029
    dprintf("Found nearest keyframe at sample #%i \n", seek_sample);
G
Gael Chardon 已提交
2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041

    // Step 4. Find the chunk of the sample using the Sample-to-chunk-atom (stsc)
    for (first_chunk_sample = 1, i = 0; i < (sc->sample_to_chunk_sz - 1); i++) {
        b = (sc->sample_to_chunk[i + 1].first - sc->sample_to_chunk[i].first) * sc->sample_to_chunk[i].count;
        if (seek_sample >= first_chunk_sample && seek_sample < (first_chunk_sample + b))
            break;
        first_chunk_sample += b;
    }
    chunk = sc->sample_to_chunk[i].first + (seek_sample - first_chunk_sample) / sc->sample_to_chunk[i].count;
    left_in_chunk = sc->sample_to_chunk[i].count - (seek_sample - first_chunk_sample) % sc->sample_to_chunk[i].count;
    first_chunk_sample += ((seek_sample - first_chunk_sample) / sc->sample_to_chunk[i].count) * sc->sample_to_chunk[i].count;
    sample_to_chunk_idx = i;
2042
    dprintf("Sample was found in chunk #%i at sample offset %i (idx %i)\n", chunk, seek_sample - first_chunk_sample, sample_to_chunk_idx);
G
Gael Chardon 已提交
2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053

    // Step 5. Find the offset of the chunk using the chunk offset atom
    if (!sc->chunk_offsets) {
        av_log(s, AV_LOG_ERROR, "mov: no chunk offset atom, unable to seek\n");
        return -1;
    }
    if (chunk > sc->chunk_count) {
        av_log(s, AV_LOG_ERROR, "mov: chunk offset atom too short, unable to seek (req. chunk=%i, chunk count=%li)\n", chunk, sc->chunk_count);
        return -1;
    }
    chunk_file_offset = sc->chunk_offsets[chunk - 1];
2054
    dprintf("Chunk file offset is #%"PRIu64"\n", chunk_file_offset);
G
Gael Chardon 已提交
2055 2056 2057 2058 2059 2060 2061 2062 2063 2064

    // Step 6. Find the byte offset within the chunk using the sample size atom
    sample_file_offset = chunk_file_offset;
    if (sc->sample_size)
        sample_file_offset += (seek_sample - first_chunk_sample) * sc->sample_size;
    else {
        for (i = 0; i < (seek_sample - first_chunk_sample); i++) {
        sample_file_offset += sc->sample_sizes[first_chunk_sample + i - 1];
        }
    }
2065
    dprintf("Sample file offset is #%"PRIu64"\n", sample_file_offset);
G
Gael Chardon 已提交
2066 2067 2068 2069 2070 2071 2072 2073 2074 2075

    // Step 6. Update the parser
    mov->partial = sc;
    mov->next_chunk_offset = sample_file_offset;
    // Update current stream state
    sc->current_sample = seek_sample - 1;  // zero based
    sc->left_in_chunk = left_in_chunk;
    sc->next_chunk = chunk; // +1 -1 (zero based)
    sc->sample_to_chunk_index = sample_to_chunk_idx;

2076
    // Update other streams
G
Gael Chardon 已提交
2077
    for (i = 0; i<mov->total_streams; i++) {
2078
        MOVStreamContext *msc;
G
Gael Chardon 已提交
2079 2080
        if (i == mov_idx) continue;
        // Find the nearest 'next' chunk
2081
        msc = mov->streams[i];
G
Gael Chardon 已提交
2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094
        a = 0;
        b = msc->chunk_count - 1;
        while (a < b) {
            m = (a + b + 1) >> 1;
            if (msc->chunk_offsets[m] > chunk_file_offset) {
                b = m - 1;
            } else {
                a = m;
            }
        }
        msc->next_chunk = a;
        if (msc->chunk_offsets[a] < chunk_file_offset && a < (msc->chunk_count-1))
            msc->next_chunk ++;
2095
        dprintf("Nearest next chunk for stream #%i is #%li @%"PRId64"\n", i, msc->next_chunk+1, msc->chunk_offsets[msc->next_chunk]);
2096

G
Gael Chardon 已提交
2097 2098 2099 2100 2101 2102 2103 2104 2105 2106
        // Compute sample count and index in the sample_to_chunk table (what a pity)
        msc->sample_to_chunk_index = 0;
        msc->current_sample = 0;
        for(;  msc->sample_to_chunk_index < (msc->sample_to_chunk_sz - 1)
            && msc->sample_to_chunk[msc->sample_to_chunk_index + 1].first <= (1 + msc->next_chunk); msc->sample_to_chunk_index++) {
            msc->current_sample += (msc->sample_to_chunk[msc->sample_to_chunk_index + 1].first - msc->sample_to_chunk[msc->sample_to_chunk_index].first) \
            * msc->sample_to_chunk[msc->sample_to_chunk_index].count;
        }
        msc->current_sample += (msc->next_chunk - (msc->sample_to_chunk[msc->sample_to_chunk_index].first - 1)) * sc->sample_to_chunk[msc->sample_to_chunk_index].count;
        msc->left_in_chunk = msc->sample_to_chunk[msc->sample_to_chunk_index].count - 1;
2107 2108 2109 2110
        // Find corresponding position in stts (used later to compute dts)
        sample = 0;
        start_time = 0;
        for (msc->sample_to_time_index = 0; msc->sample_to_time_index < msc->stts_count; msc->sample_to_time_index++) {
M
cleanup  
Michael Niedermayer 已提交
2111 2112
            count = msc->stts_data[msc->sample_to_time_index].count;
            duration = msc->stts_data[msc->sample_to_time_index].duration;
2113 2114 2115 2116 2117 2118 2119
            if ((sample + count - 1) > msc->current_sample) {
                msc->sample_to_time_time = start_time;
                msc->sample_to_time_sample = sample;
                break;
            }
            sample += count;
            start_time += count * duration;
M
Michael Niedermayer 已提交
2120 2121 2122 2123 2124 2125 2126 2127 2128 2129
        }
        sample = 0;
        for (msc->sample_to_ctime_index = 0; msc->sample_to_ctime_index < msc->ctts_count; msc->sample_to_ctime_index++) {
            count = msc->ctts_data[msc->sample_to_ctime_index].count;
            duration = msc->ctts_data[msc->sample_to_ctime_index].duration;
            if ((sample + count - 1) > msc->current_sample) {
                msc->sample_to_ctime_sample = sample;
                break;
            }
            sample += count;
2130
        }
2131
        dprintf("Next Sample for stream #%i is #%li @%li\n", i, msc->current_sample + 1, msc->sample_to_chunk_index + 1);
2132
    }
G
Gael Chardon 已提交
2133 2134 2135 2136
    return 0;
}
#endif

Z
Zdenek Kabelac 已提交
2137
static int mov_read_close(AVFormatContext *s)
2138 2139
{
    int i;
2140
    MOVContext *mov = (MOVContext *) s->priv_data;
2141 2142
    for(i=0; i<mov->total_streams; i++)
        mov_free_stream_context(mov->streams[i]);
2143 2144
    /* free color tabs */
    for(i=0; i<mov->ctab_size; i++)
2145
        av_freep(&mov->ctab[i]);
2146
    av_freep(&mov->ctab);
2147 2148 2149
    return 0;
}

F
Fabrice Bellard 已提交
2150
static AVInputFormat mov_iformat = {
2151 2152
    "mov,mp4,m4a,3gp,3g2,mj2",
    "QuickTime/MPEG4/Motion JPEG 2000 format",
F
Fabrice Bellard 已提交
2153 2154
    sizeof(MOVContext),
    mov_probe,
2155 2156 2157
    mov_read_header,
    mov_read_packet,
    mov_read_close,
2158
#if defined(MOV_SEEK)
G
Gael Chardon 已提交
2159
    mov_read_seek,
2160
#endif
2161 2162
};

F
Fabrice Bellard 已提交
2163 2164 2165 2166 2167
int mov_init(void)
{
    av_register_input_format(&mov_iformat);
    return 0;
}