Statistics
| Branch: | Revision:

ffmpeg / libavformat / mov.c @ 1d7d9935

History | View | Annotate | Download (63.1 KB)

1
/*
2
 * MOV demuxer
3
 * Copyright (c) 2001 Fabrice Bellard.
4
 *
5
 * This file is part of FFmpeg.
6
 *
7
 * FFmpeg is free software; you can redistribute it and/or
8
 * modify it under the terms of the GNU Lesser General Public
9
 * 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
14
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15
 * Lesser General Public License for more details.
16
 *
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

    
24
//#define DEBUG
25

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

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

    
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
 * - ffmpeg has nearly none of the usual QuickTime codecs,
44
 *   although I succesfully dumped raw and mp3 audio tracks off .mov files.
45
 *   Sample QuickTime files with mp3 audio can be found at: http://www.3ivx.com/showcase.html
46
 * - .mp4 parsing is still hazardous, although the format really is QuickTime with some minor changes
47
 *   (to make .mov parser crash maybe ?), despite what they say in the MPEG FAQ at
48
 *   http://mpeg.telecomitalialab.com/faq.htm
49
 * - the code is quite ugly... maybe I won't do it recursive next time :-)
50
 * - seek is not supported with files that contain edit list
51
 *
52
 * Funny I didn't know about http://sourceforge.net/projects/qt-ffmpeg/
53
 * when coding this :) (it's a writer anyway)
54
 *
55
 * Reference documents:
56
 * http://www.geocities.com/xhelmboyx/quicktime/formats/qtm-layout.txt
57
 * Apple:
58
 *  http://developer.apple.com/documentation/QuickTime/QTFF/
59
 *  http://developer.apple.com/documentation/QuickTime/QTFF/qtff.pdf
60
 * QuickTime is a trademark of Apple (AFAIK :))
61
 */
62

    
63
#include "qtpalette.h"
64

    
65

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

    
69
static const AVCodecTag mov_video_tags[] = {
70
/*  { CODEC_ID_, MKTAG('c', 'v', 'i', 'd') }, *//* Cinepak */
71
/*  { CODEC_ID_H263, 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
/* Graphics */
75
/* Animation */
76
/* Apple video */
77
/* 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
    { CODEC_ID_MJPEG, MKTAG('A', 'V', 'D', 'J') }, /* MJPEG with alpha-channel (AVID JFIF meridien compressed) */
83
/*    { 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
    { CODEC_ID_SVQ1, MKTAG('S', 'V', 'Q', '1') }, /* Sorenson Video v1 */
87
    { 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)*/
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 */
97
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', ' ') }, /* DV NTSC */
98
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', 'p') }, /* DV PAL */
99
    { CODEC_ID_VP3, MKTAG('V', 'P', '3', '1') }, /* On2 VP3 */
100
    { CODEC_ID_RPZA, MKTAG('r', 'p', 'z', 'a') }, /* Apple Video (RPZA) */
101
    { CODEC_ID_CINEPAK, MKTAG('c', 'v', 'i', 'd') }, /* Cinepak */
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
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '5', 'n') }, /* MPEG2 IMX NTSC 525/60 50mb/s produced by FCP */
111
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '5', 'p') }, /* MPEG2 IMX PAL 625/50 50mb/s produced by FCP */
112
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '3', 'n') }, /* MPEG2 IMX NTSC 525/60 30mb/s produced by FCP */
113
    { CODEC_ID_MPEG2VIDEO, MKTAG('m', 'x', '3', 'p') }, /* MPEG2 IMX PAL 625/50 30mb/s produced by FCP */
114
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'p', 'p') }, /* DVCPRO PAL produced by FCP */
115
    //{ CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'h', '5') }, /* DVCPRO HD 50i produced by FCP */
116
    //{ CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'h', '6') }, /* DVCPRO HD 60i produced by FCP */
117
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', '5', 'p') }, /* DVCPRO50 PAL produced by FCP */
118
    { CODEC_ID_DVVIDEO, MKTAG('d', 'v', '5', 'n') }, /* DVCPRO50 NTSC produced by FCP */
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 */
121
    { CODEC_ID_TARGA, MKTAG('t', 'g', 'a', ' ') }, /* Truevision Targa */
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 */
124
    { CODEC_ID_VC1,  MKTAG('v', 'c', '-', '1') }, /* SMPTE RP 2025 */
125
    { CODEC_ID_WMV3, MKTAG('v', 'c', '-', '1') }, /* SMPTE RP 2025 */
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') },
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
    { CODEC_ID_PCM_S16LE, MKTAG('s', 'o', 'w', 't') }, /*  */
137
    { CODEC_ID_PCM_MULAW, MKTAG('u', 'l', 'a', 'w') }, /*  */
138
    { CODEC_ID_PCM_ALAW, MKTAG('a', 'l', 'a', 'w') }, /*  */
139
    { CODEC_ID_ADPCM_IMA_QT, MKTAG('i', 'm', 'a', '4') }, /* IMA-4 ADPCM */
140
    { CODEC_ID_ADPCM_MS, MKTAG('m', 's', 0x00, 0x02) }, /* MS ADPCM */
141
    { CODEC_ID_MACE3, MKTAG('M', 'A', 'C', '3') }, /* Macintosh Audio Compression and Expansion 3:1 */
142
    { 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
    { CODEC_ID_MP2, 0x6D730055 }, /* MPEG layer 3 */
146
    { CODEC_ID_MP2, 0x5500736D }, /* MPEG layer 3 *//* XXX: check endianness */
147
/*    { CODEC_ID_OGG_VORBIS, MKTAG('O', 'g', 'g', 'S') }, *//* sample files at http://heroinewarrior.com/xmovie.php3 use this tag */
148
/* 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 */
155
    { CODEC_ID_QDM2,MKTAG('Q', 'D', 'M', '2') }, /* QDM2 */
156
    { CODEC_ID_DVAUDIO, MKTAG('v', 'd', 'v', 'a') },
157
    { CODEC_ID_DVAUDIO, MKTAG('d', 'v', 'c', 'a') },
158
    { CODEC_ID_PCM_S16LE, MKTAG('l', 'p', 'c', 'm') },
159
    { CODEC_ID_NONE, 0 },
160
};
161

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

    
167
typedef struct MOV_sample_to_chunk_tbl {
168
    long first;
169
    long count;
170
    long id;
171
} MOV_sample_to_chunk_tbl;
172

    
173
typedef struct {
174
    uint32_t type;
175
    int64_t offset;
176
    int64_t size; /* total size (excluding the size and type fields) */
177
} MOV_atom_t;
178

    
179
typedef struct {
180
    int seed;
181
    int flags;
182
    int size;
183
    void* clrs;
184
} MOV_ctab_t;
185

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

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

    
195
    /* 0x03 ESDescrTag */
196
    uint16_t es_id;
197
#define MP4ODescrTag                    0x01
198
#define MP4IODescrTag                   0x02
199
#define MP4ESDescrTag                   0x03
200
#define MP4DecConfigDescrTag            0x04
201
#define MP4DecSpecificDescrTag          0x05
202
#define MP4SLConfigDescrTag             0x06
203
#define MP4ContentIdDescrTag            0x07
204
#define MP4SupplContentIdDescrTag       0x08
205
#define MP4IPIPtrDescrTag               0x09
206
#define MP4IPMPPtrDescrTag              0x0A
207
#define MP4IPMPDescrTag                 0x0B
208
#define MP4RegistrationDescrTag         0x0D
209
#define MP4ESIDIncDescrTag              0x0E
210
#define MP4ESIDRefDescrTag              0x0F
211
#define MP4FileIODescrTag               0x10
212
#define MP4FileODescrTag                0x11
213
#define MP4ExtProfileLevelDescrTag      0x13
214
#define MP4ExtDescrTagsStart            0x80
215
#define MP4ExtDescrTagsEnd              0xFE
216
    uint8_t  stream_priority;
217

    
218
    /* 0x04 DecConfigDescrTag */
219
    uint8_t  object_type_id;
220
    uint8_t  stream_type;
221
    /* XXX: really streamType is
222
     * only 6bit, followed by:
223
     * 1bit  upStream
224
     * 1bit  reserved
225
     */
226
    uint32_t buffer_size_db; // 24
227
    uint32_t max_bitrate;
228
    uint32_t avg_bitrate;
229

    
230
    /* 0x05 DecSpecificDescrTag */
231
    uint8_t  decoder_cfg_len;
232
    uint8_t *decoder_cfg;
233

    
234
    /* 0x06 SLConfigDescrTag */
235
    uint8_t  sl_config_len;
236
    uint8_t *sl_config;
237
} MOV_esds_t;
238

    
239
struct MOVParseTableEntry;
240

    
241
typedef struct MOVStreamContext {
242
    int ffindex; /* the ffmpeg stream id */
243
    long next_chunk;
244
    unsigned int chunk_count;
245
    int64_t *chunk_offsets;
246
    unsigned int stts_count;
247
    Time2Sample *stts_data;
248
    unsigned int ctts_count;
249
    Time2Sample *ctts_data;
250
    unsigned int edit_count; /* number of 'edit' (elst atom) */
251
    unsigned int sample_to_chunk_sz;
252
    MOV_sample_to_chunk_tbl *sample_to_chunk;
253
    int sample_to_ctime_index;
254
    int sample_to_ctime_sample;
255
    unsigned int sample_size;
256
    unsigned int sample_count;
257
    long *sample_sizes;
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
} MOVStreamContext;
267

    
268
typedef struct MOVContext {
269
    AVFormatContext *fc;
270
    int time_scale;
271
    int64_t duration; /* duration of the longest track */
272
    int found_moov; /* when both 'moov' and 'mdat' sections has been found */
273
    int found_mdat; /* we suppose we have enough data to read the file */
274
    int64_t mdat_offset;
275
    int total_streams;
276
    MOVStreamContext *streams[MAX_STREAMS];
277

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

    
283
    AVPaletteControl palette_control;
284
    MOV_mdat_atom_t *mdat_list;
285
    int mdat_count;
286
    DVDemuxContext *dv_demux;
287
    AVFormatContext *dv_fctx;
288
    int isom; /* 1 if file is ISO Media (mp4/3gp) */
289
} MOVContext;
290

    
291

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

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

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

    
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
    int i;
313
    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
        a.size = atom.size;
321
        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
            a.offset += 8;
332
            total_size += 8;
333
        }
334
        if (a.size == 0) {
335
            a.size = atom.size - total_size;
336
            if (a.size <= 8)
337
                break;
338
        }
339
        for (i = 0; c->parse_table[i].type != 0L
340
             && c->parse_table[i].type != a.type; i++)
341
            /* empty */;
342

    
343
        a.size -= 8;
344

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

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

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

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

    
367
    return err;
368
}
369

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

    
391
    return 0;
392
}
393

    
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
    uint32_t type;
398
    uint32_t ctype;
399

    
400
    get_byte(pb); /* version */
401
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
402

    
403
    /* component type */
404
    ctype = get_le32(pb);
405
    type = get_le32(pb); /* component subtype */
406

    
407
    dprintf("ctype= %c%c%c%c (0x%08lx)\n", *((char *)&ctype), ((char *)&ctype)[1], ((char *)&ctype)[2], ((char *)&ctype)[3], (long) ctype);
408
    dprintf("stype= %c%c%c%c\n", *((char *)&type), ((char *)&type)[1], ((char *)&type)[2], ((char *)&type)[3]);
409
    if(!ctype)
410
        c->isom = 1;
411
    if(type == MKTAG('v', 'i', 'd', 'e'))
412
        st->codec->codec_type = CODEC_TYPE_VIDEO;
413
    else if(type == MKTAG('s', 'o', 'u', 'n'))
414
        st->codec->codec_type = CODEC_TYPE_AUDIO;
415
    else if(type == MKTAG('m', '1', 'a', ' '))
416
        st->codec->codec_id = CODEC_ID_MP2;
417
    else if(type == MKTAG('s', 'u', 'b', 'p')) {
418
        st->codec->codec_type = CODEC_TYPE_SUBTITLE;
419
        st->codec->codec_id = CODEC_ID_DVD_SUBTITLE;
420
    }
421
    get_be32(pb); /* component  manufacture */
422
    get_be32(pb); /* component flags */
423
    get_be32(pb); /* component flags mask */
424

    
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
    return 0;
430
}
431

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

    
445
static int mov_mp4_read_descr(ByteIOContext *pb, int *tag)
446
{
447
    int len;
448
    *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
    return len;
452
}
453

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

    
460
    /* Well, broken but suffisant for some MP4 streams */
461
    get_be32(pb); /* version + flags */
462
    len = mov_mp4_read_descr(pb, &tag);
463
    if (tag == MP4ESDescrTag) {
464
        get_be16(pb); /* ID */
465
        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
        sc->esds.object_type_id = get_byte(pb);
472
        sc->esds.stream_type = get_byte(pb);
473
        sc->esds.buffer_size_db = get_be24(pb);
474
        sc->esds.max_bitrate = get_be32(pb);
475
        sc->esds.avg_bitrate = get_be32(pb);
476

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

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

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

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

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

    
530
    err = mov_read_default(c, pb, atom);
531
    /* we parsed the 'moov' atom, we can terminate the parsing as soon as we find the 'mdat' */
532
    /* so we don't parse the whole file if over a network */
533
    c->found_moov=1;
534
    if(c->found_mdat)
535
        return 1; /* found both, just go */
536
    return 0; /* now go for mdat */
537
}
538

    
539

    
540
static int mov_read_mdhd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
541
{
542
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
543
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
544
    int version = get_byte(pb);
545
    int lang;
546

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

    
550
    get_byte(pb); get_byte(pb);
551
    get_byte(pb); /* flags */
552

    
553
    if (version == 1) {
554
        get_be64(pb);
555
        get_be64(pb);
556
    } else {
557
        get_be32(pb); /* creation time */
558
        get_be32(pb); /* modification time */
559
    }
560

    
561
    sc->time_scale = get_be32(pb);
562
    st->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
563

    
564
    lang = get_be16(pb); /* language */
565
    ff_mov_lang_to_iso639(lang, st->language);
566
    get_be16(pb); /* quality */
567

    
568
    return 0;
569
}
570

    
571
static int mov_read_mvhd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
572
{
573
    int version = get_byte(pb); /* version */
574
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
575

    
576
    if (version == 1) {
577
        get_be64(pb);
578
        get_be64(pb);
579
    } else {
580
        get_be32(pb); /* creation time */
581
        get_be32(pb); /* modification time */
582
    }
583
    c->time_scale = get_be32(pb); /* time scale */
584
#ifdef DEBUG
585
    av_log(NULL, AV_LOG_DEBUG, "time scale = %i\n", c->time_scale);
586
#endif
587
    c->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
588
    get_be32(pb); /* preferred scale */
589

    
590
    get_be16(pb); /* preferred volume */
591

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

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

    
596
    get_be32(pb); /* preview time */
597
    get_be32(pb); /* preview duration */
598
    get_be32(pb); /* poster time */
599
    get_be32(pb); /* selection time */
600
    get_be32(pb); /* selection duration */
601
    get_be32(pb); /* current time */
602
    get_be32(pb); /* next track ID */
603

    
604
    return 0;
605
}
606

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

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

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

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

    
627
    return 0;
628
}
629

    
630
static int mov_read_enda(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
631
{
632
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
633
    int little_endian = get_be16(pb);
634

    
635
    if (little_endian) {
636
        switch (st->codec->codec_id) {
637
        case CODEC_ID_PCM_S24BE:
638
            st->codec->codec_id = CODEC_ID_PCM_S24LE;
639
            break;
640
        case CODEC_ID_PCM_S32BE:
641
            st->codec->codec_id = CODEC_ID_PCM_S32LE;
642
            break;
643
        default:
644
            break;
645
        }
646
    }
647
    return 0;
648
}
649

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

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

    
657
    av_free(st->codec->extradata);
658
    st->codec->extradata_size = 36;
659
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
660

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

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

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

    
677
    if (st->codec->codec_id == CODEC_ID_QDM2) {
678
        // pass all frma atom to codec, needed at least for QDM2
679
        av_free(st->codec->extradata);
680
        st->codec->extradata_size = atom.size;
681
        st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
682

    
683
        if (st->codec->extradata) {
684
            get_buffer(pb, st->codec->extradata, atom.size);
685
        } else
686
            url_fskip(pb, atom.size);
687
    } else if (atom.size > 8) { /* to read frma, esds atoms */
688
        mov_read_default(c, pb, atom);
689
    } else
690
        url_fskip(pb, atom.size);
691
    return 0;
692
}
693

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

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

    
701
    av_free(st->codec->extradata);
702

    
703
    st->codec->extradata_size = atom.size + 8;
704
    st->codec->extradata = av_mallocz(st->codec->extradata_size + FF_INPUT_BUFFER_PADDING_SIZE);
705

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

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

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

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

    
724
    st->codec->extradata_size = atom.size;
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
    return 0;
733
}
734

    
735
static int mov_read_stco(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
736
{
737
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
738
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
739
    unsigned int i, entries;
740

    
741
    get_byte(pb); /* version */
742
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
743

    
744
    entries = get_be32(pb);
745

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

    
749
    sc->chunk_count = entries;
750
    sc->chunk_offsets = av_malloc(entries * sizeof(int64_t));
751
    if (!sc->chunk_offsets)
752
        return -1;
753
    if (atom.type == MKTAG('s', 't', 'c', 'o')) {
754
        for(i=0; i<entries; i++) {
755
            sc->chunk_offsets[i] = get_be32(pb);
756
        }
757
    } else if (atom.type == MKTAG('c', 'o', '6', '4')) {
758
        for(i=0; i<entries; i++) {
759
            sc->chunk_offsets[i] = get_be64(pb);
760
        }
761
    } else
762
        return -1;
763

    
764
    return 0;
765
}
766

    
767
static int mov_read_stsd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
768
{
769
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
770
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
771
    int entries, frames_per_sample;
772
    uint32_t format;
773
    uint8_t codec_name[32];
774

    
775
    /* for palette traversal */
776
    int color_depth;
777
    int color_start;
778
    int color_count;
779
    int color_end;
780
    int color_index;
781
    int color_dec;
782
    int color_greyscale;
783
    unsigned char *color_table;
784
    int j;
785
    unsigned char r, g, b;
786

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

    
790
    entries = get_be32(pb);
791

    
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
        get_be32(pb); /* reserved */
800
        get_be16(pb); /* reserved */
801
        get_be16(pb); /* index */
802

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

    
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
        } else if (st->codec->codec_type != CODEC_TYPE_AUDIO && /* do not overwrite codec type */
814
                   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
            if (id > 0)
819
                st->codec->codec_type = CODEC_TYPE_VIDEO;
820
        }
821

    
822
        dprintf("size=%d 4CC= %c%c%c%c codec_type=%d\n",
823
                size,
824
                (format >> 0) & 0xff, (format >> 8) & 0xff, (format >> 16) & 0xff, (format >> 24) & 0xff,
825
                st->codec->codec_type);
826

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

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

    
838
            get_be32(pb); /* horiz resolution */
839
            get_be32(pb); /* vert resolution */
840
            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
845
            get_buffer(pb, codec_name, 32); /* codec name, pascal string (FIXME: true for mp4?) */
846
            if (codec_name[0] <= 31) {
847
                memcpy(st->codec->codec_name, &codec_name[1],codec_name[0]);
848
                st->codec->codec_name[codec_name[0]] = 0;
849
            }
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
            color_depth = st->codec->bits_per_sample & 0x1F;
856
            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
                (color_depth == 8)) {
861

    
862
                if (color_greyscale) {
863

    
864
                    /* compute the greyscale palette */
865
                    color_count = 1 << color_depth;
866
                    color_index = 255;
867
                    color_dec = 256 / (color_count - 1);
868
                    for (j = 0; j < color_count; j++) {
869
                        r = g = b = color_index;
870
                        c->palette_control.palette[j] =
871
                            (r << 16) | (g << 8) | (b);
872
                        color_index -= color_dec;
873
                        if (color_index < 0)
874
                            color_index = 0;
875
                    }
876

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

    
879
                    /* if flag bit 3 is set, use the default palette */
880
                    color_count = 1 << color_depth;
881
                    if (color_depth == 2)
882
                        color_table = ff_qt_default_palette_4;
883
                    else if (color_depth == 4)
884
                        color_table = ff_qt_default_palette_16;
885
                    else
886
                        color_table = ff_qt_default_palette_256;
887

    
888
                    for (j = 0; j < color_count; j++) {
889
                        r = color_table[j * 4 + 0];
890
                        g = color_table[j * 4 + 1];
891
                        b = color_table[j * 4 + 2];
892
                        c->palette_control.palette[j] =
893
                            (r << 16) | (g << 8) | (b);
894
                    }
895

    
896
                } else {
897

    
898
                    /* load the palette from the file */
899
                    color_start = get_be32(pb);
900
                    color_count = get_be16(pb);
901
                    color_end = get_be16(pb);
902
                    for (j = color_start; j <= color_end; j++) {
903
                        /* each R, G, or B component is 16 bits;
904
                         * only use the top 8 bits; skip alpha bytes
905
                         * up front */
906
                        get_byte(pb);
907
                        get_byte(pb);
908
                        r = get_byte(pb);
909
                        get_byte(pb);
910
                        g = get_byte(pb);
911
                        get_byte(pb);
912
                        b = get_byte(pb);
913
                        get_byte(pb);
914
                        c->palette_control.palette[j] =
915
                            (r << 16) | (g << 8) | (b);
916
                    }
917
                }
918

    
919
                st->codec->palctrl = &c->palette_control;
920
                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
            get_be16(pb); /* revision level */
929
            get_be32(pb); /* vendor */
930

    
931
            st->codec->channels = get_be16(pb);             /* channel count */
932
            dprintf("audio channels %d\n", st->codec->channels);
933
            st->codec->bits_per_sample = get_be16(pb);      /* sample size */
934
            /* do we need to force to 16 for AMR ? */
935

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

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

    
942
            switch (st->codec->codec_id) {
943
            case CODEC_ID_PCM_S8:
944
            case CODEC_ID_PCM_U8:
945
                if (st->codec->bits_per_sample == 16)
946
                    st->codec->codec_id = CODEC_ID_PCM_S16BE;
947
                break;
948
            case CODEC_ID_PCM_S16LE:
949
            case CODEC_ID_PCM_S16BE:
950
                if (st->codec->bits_per_sample == 8)
951
                    st->codec->codec_id = CODEC_ID_PCM_S8;
952
                else if (st->codec->bits_per_sample == 24)
953
                    st->codec->codec_id = CODEC_ID_PCM_S24BE;
954
                break;
955
            default:
956
                break;
957
            }
958

    
959
            //Read QT version 1 fields. In version 0 theese dont exist
960
            dprintf("version =%d, isom =%d\n",version,c->isom);
961
            if(!c->isom) {
962
                if(version==1) {
963
                    sc->sample_size_v1.den = get_be32(pb); /* samples per packet */
964
                    get_be32(pb); /* bytes per packet */
965
                    sc->sample_size_v1.num = get_be32(pb); /* bytes per frame */
966
                    get_be32(pb); /* bytes per sample */
967
                } else if(version==2) {
968
                    get_be32(pb); /* sizeof struct only */
969
                    st->codec->sample_rate = av_int2dbl(get_be64(pb)); /* float 64 */
970
                    st->codec->channels = get_be32(pb);
971
                    get_be32(pb); /* always 0x7F000000 */
972
                    get_be32(pb); /* bits per channel if sound is uncompressed */
973
                    get_be32(pb); /* lcpm format specific flag */
974
                    get_be32(pb); /* bytes per audio packet if constant */
975
                    get_be32(pb); /* lpcm frames per audio packet if constant */
976
                }
977
            }
978

    
979
            bits_per_sample = av_get_bits_per_sample(st->codec->codec_id);
980
            if (bits_per_sample) {
981
                st->codec->bits_per_sample = bits_per_sample;
982
                sc->sample_size = (bits_per_sample >> 3) * st->codec->channels;
983
            }
984
        } else {
985
            /* other codec type, just skip (rtp, mp4s, tmcd ...) */
986
            url_fskip(pb, size - (url_ftell(pb) - start_pos));
987
        }
988
        /* this will read extra atoms at the end (wave, alac, damr, avcC, SMI ...) */
989
        a.size = size - (url_ftell(pb) - start_pos);
990
        if (a.size > 8)
991
            mov_read_default(c, pb, a);
992
        else if (a.size > 0)
993
            url_fskip(pb, a.size);
994
    }
995

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

    
1000
    /* special codec parameters handling */
1001
    switch (st->codec->codec_id) {
1002
#ifdef CONFIG_H261_DECODER
1003
    case CODEC_ID_H261:
1004
#endif
1005
#ifdef CONFIG_H263_DECODER
1006
    case CODEC_ID_H263:
1007
#endif
1008
#ifdef CONFIG_MPEG4_DECODER
1009
    case CODEC_ID_MPEG4:
1010
#endif
1011
        st->codec->width= 0; /* let decoder init width/height */
1012
        st->codec->height= 0;
1013
        break;
1014
#ifdef CONFIG_LIBFAAD
1015
    case CODEC_ID_AAC:
1016
#endif
1017
#ifdef CONFIG_VORBIS_DECODER
1018
    case CODEC_ID_VORBIS:
1019
#endif
1020
    case CODEC_ID_MP3ON4:
1021
        st->codec->sample_rate= 0; /* let decoder init parameters properly */
1022
        break;
1023
#ifdef CONFIG_DV_DEMUXER
1024
    case CODEC_ID_DVAUDIO:
1025
        c->dv_fctx = av_alloc_format_context();
1026
        c->dv_demux = dv_init_demux(c->dv_fctx);
1027
        if (!c->dv_demux) {
1028
            av_log(c->fc, AV_LOG_ERROR, "dv demux context init error\n");
1029
            return -1;
1030
        }
1031
        sc->dv_audio_container = 1;
1032
        st->codec->codec_id = CODEC_ID_PCM_S16LE;
1033
        break;
1034
#endif
1035
    /* no ifdef since parameters are always those */
1036
    case CODEC_ID_AMR_WB:
1037
        st->codec->sample_rate= 16000;
1038
        st->codec->channels= 1; /* really needed */
1039
        break;
1040
    case CODEC_ID_AMR_NB:
1041
        st->codec->sample_rate= 8000;
1042
        st->codec->channels= 1; /* really needed */
1043
        break;
1044
    case CODEC_ID_MP2:
1045
        st->codec->codec_type = CODEC_TYPE_AUDIO; /* force type after stsd for m1a hdlr */
1046
        st->need_parsing = 1;
1047
        break;
1048
    default:
1049
        break;
1050
    }
1051

    
1052
    return 0;
1053
}
1054

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

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

    
1064
    entries = get_be32(pb);
1065

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

    
1069
#ifdef DEBUG
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;
1073
    sc->sample_to_chunk = av_malloc(entries * sizeof(MOV_sample_to_chunk_tbl));
1074
    if (!sc->sample_to_chunk)
1075
        return -1;
1076
    for(i=0; i<entries; i++) {
1077
        sc->sample_to_chunk[i].first = get_be32(pb);
1078
        sc->sample_to_chunk[i].count = get_be32(pb);
1079
        sc->sample_to_chunk[i].id = get_be32(pb);
1080
    }
1081
    return 0;
1082
}
1083

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

    
1090
    get_byte(pb); /* version */
1091
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
1092

    
1093
    entries = get_be32(pb);
1094

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

    
1098
    sc->keyframe_count = entries;
1099
#ifdef DEBUG
1100
    av_log(NULL, AV_LOG_DEBUG, "keyframe_count = %d\n", sc->keyframe_count);
1101
#endif
1102
    sc->keyframes = av_malloc(entries * sizeof(long));
1103
    if (!sc->keyframes)
1104
        return -1;
1105
    for(i=0; i<entries; i++) {
1106
        sc->keyframes[i] = get_be32(pb);
1107
#ifdef DEBUG
1108
/*        av_log(NULL, AV_LOG_DEBUG, "keyframes[]=%ld\n", sc->keyframes[i]); */
1109
#endif
1110
    }
1111
    return 0;
1112
}
1113

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

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

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

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

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

    
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
    int64_t duration=0;
1155
    int64_t total_sample_count=0;
1156

    
1157
    get_byte(pb); /* version */
1158
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
1159
    entries = get_be32(pb);
1160
    if(entries >= UINT_MAX / sizeof(Time2Sample))
1161
        return -1;
1162

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

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

    
1170
    sc->time_rate=0;
1171

    
1172
    for(i=0; i<entries; i++) {
1173
        int sample_duration;
1174
        int sample_count;
1175

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

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

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

    
1185
        duration+=(int64_t)sample_duration*sample_count;
1186
        total_sample_count+=sample_count;
1187
    }
1188

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

    
1195
static int mov_read_ctts(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1196
{
1197
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
1198
    MOVStreamContext *sc = (MOVStreamContext *)st->priv_data;
1199
    unsigned int i, entries;
1200

    
1201
    get_byte(pb); /* version */
1202
    get_byte(pb); get_byte(pb); get_byte(pb); /* flags */
1203
    entries = get_be32(pb);
1204
    if(entries >= UINT_MAX / sizeof(Time2Sample))
1205
        return -1;
1206

    
1207
    sc->ctts_count = entries;
1208
    sc->ctts_data = av_malloc(entries * sizeof(Time2Sample));
1209

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

    
1212
    for(i=0; i<entries; i++) {
1213
        int count    =get_be32(pb);
1214
        int duration =get_be32(pb);
1215

    
1216
        if (duration < 0) {
1217
            av_log(c->fc, AV_LOG_ERROR, "negative ctts, ignoring\n");
1218
            sc->ctts_count = 0;
1219
            url_fskip(pb, 8 * (entries - i - 1));
1220
            break;
1221
        }
1222
        sc->ctts_data[i].count   = count;
1223
        sc->ctts_data[i].duration= duration;
1224

    
1225
        sc->time_rate= ff_gcd(sc->time_rate, duration);
1226
    }
1227
    return 0;
1228
}
1229

    
1230
static int mov_read_trak(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1231
{
1232
    AVStream *st;
1233
    MOVStreamContext *sc;
1234

    
1235
    st = av_new_stream(c->fc, c->fc->nb_streams);
1236
    if (!st) return -2;
1237
    sc = av_mallocz(sizeof(MOVStreamContext));
1238
    if (!sc) {
1239
        av_free(st);
1240
        return -1;
1241
    }
1242

    
1243
    st->priv_data = sc;
1244
    st->codec->codec_type = CODEC_TYPE_DATA;
1245
    st->start_time = 0; /* XXX: check */
1246
    c->streams[c->fc->nb_streams-1] = sc;
1247

    
1248
    return mov_read_default(c, pb, atom);
1249
}
1250

    
1251
static int mov_read_tkhd(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1252
{
1253
    AVStream *st = c->fc->streams[c->fc->nb_streams-1];
1254
    int version = get_byte(pb);
1255

    
1256
    get_byte(pb); get_byte(pb);
1257
    get_byte(pb); /* flags */
1258
    /*
1259
    MOV_TRACK_ENABLED 0x0001
1260
    MOV_TRACK_IN_MOVIE 0x0002
1261
    MOV_TRACK_IN_PREVIEW 0x0004
1262
    MOV_TRACK_IN_POSTER 0x0008
1263
    */
1264

    
1265
    if (version == 1) {
1266
        get_be64(pb);
1267
        get_be64(pb);
1268
    } else {
1269
        get_be32(pb); /* creation time */
1270
        get_be32(pb); /* modification time */
1271
    }
1272
    st->id = (int)get_be32(pb); /* track id (NOT 0 !)*/
1273
    get_be32(pb); /* reserved */
1274
    st->start_time = 0; /* check */
1275
    (version == 1) ? get_be64(pb) : get_be32(pb); /* highlevel (considering edits) duration in movie timebase */
1276
    get_be32(pb); /* reserved */
1277
    get_be32(pb); /* reserved */
1278

    
1279
    get_be16(pb); /* layer */
1280
    get_be16(pb); /* alternate group */
1281
    get_be16(pb); /* volume */
1282
    get_be16(pb); /* reserved */
1283

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

    
1286
    /* those are fixed-point */
1287
    get_be32(pb); /* track width */
1288
    get_be32(pb); /* track height */
1289

    
1290
    return 0;
1291
}
1292

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

    
1300
    if (atom.size < 8)
1301
        return 0; /* continue */
1302
    if (get_be32(pb) != 0) { /* 0 sized mdat atom... use the 'wide' atom size */
1303
        url_fskip(pb, atom.size - 4);
1304
        return 0;
1305
    }
1306
    atom.type = get_le32(pb);
1307
    atom.offset += 8;
1308
    atom.size -= 8;
1309
    if (atom.type != MKTAG('m', 'd', 'a', 't')) {
1310
        url_fskip(pb, atom.size);
1311
        return 0;
1312
    }
1313
    err = mov_read_mdat(c, pb, atom);
1314
    return err;
1315
}
1316

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

    
1326
    get_be32(pb); /* dcom atom */
1327
    if (get_le32(pb) != MKTAG( 'd', 'c', 'o', 'm' ))
1328
        return -1;
1329
    if (get_le32(pb) != MKTAG( 'z', 'l', 'i', 'b' )) {
1330
        av_log(NULL, AV_LOG_ERROR, "unknown compression for cmov atom !");
1331
        return -1;
1332
    }
1333
    get_be32(pb); /* cmvd atom */
1334
    if (get_le32(pb) != MKTAG( 'c', 'm', 'v', 'd' ))
1335
        return -1;
1336
    moov_len = get_be32(pb); /* uncompressed size */
1337
    cmov_len = atom.size - 6 * 4;
1338

    
1339
    cmov_data = av_malloc(cmov_len);
1340
    if (!cmov_data)
1341
        return -1;
1342
    moov_data = av_malloc(moov_len);
1343
    if (!moov_data) {
1344
        av_free(cmov_data);
1345
        return -1;
1346
    }
1347
    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
    atom.type = MKTAG( 'm', 'o', 'o', 'v' );
1353
    atom.offset = 0;
1354
    atom.size = moov_len;
1355
#ifdef DEBUG
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
    av_free(moov_data);
1360
    av_free(cmov_data);
1361
    return ret;
1362
#else
1363
    av_log(c->fc, AV_LOG_ERROR, "this file requires zlib support compiled in\n");
1364
    return -1;
1365
#endif
1366
}
1367

    
1368
/* edit list atom */
1369
static int mov_read_elst(MOVContext *c, ByteIOContext *pb, MOV_atom_t atom)
1370
{
1371
    int i, edit_count;
1372

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

    
1377
    for(i=0; i<edit_count; i++){
1378
        get_be32(pb); /* Track duration */
1379
        get_be32(pb); /* Media time */
1380
        get_be32(pb); /* Media rate */
1381
    }
1382
    dprintf("track[%i].edit_count = %i\n", c->fc->nb_streams-1, c->streams[c->fc->nb_streams-1]->edit_count);
1383
    return 0;
1384
}
1385

    
1386
static const MOVParseTableEntry mov_default_parse_table[] = {
1387
/* mp4 atoms */
1388
{ MKTAG( 'c', 'o', '6', '4' ), mov_read_stco },
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
{ MKTAG( 'm', 'd', 'a', 't' ), mov_read_mdat },
1397
{ MKTAG( 'm', 'd', 'h', 'd' ), mov_read_mdhd },
1398
{ MKTAG( 'm', 'd', 'i', 'a' ), mov_read_default },
1399
{ MKTAG( 'm', 'i', 'n', 'f' ), mov_read_default },
1400
{ MKTAG( 'm', 'o', 'o', 'v' ), mov_read_moov },
1401
{ 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
{ MKTAG( 's', 't', 'b', 'l' ), mov_read_default },
1406
{ MKTAG( 's', 't', 'c', 'o' ), mov_read_stco },
1407
{ MKTAG( 's', 't', 's', 'c' ), mov_read_stsc },
1408
{ MKTAG( 's', 't', 's', 'd' ), mov_read_stsd }, /* sample description */
1409
{ MKTAG( 's', 't', 's', 's' ), mov_read_stss }, /* sync sample */
1410
{ MKTAG( 's', 't', 's', 'z' ), mov_read_stsz }, /* sample size */
1411
{ MKTAG( 's', 't', 't', 's' ), mov_read_stts },
1412
{ MKTAG( 't', 'k', 'h', 'd' ), mov_read_tkhd }, /* track header */
1413
{ MKTAG( 't', 'r', 'a', 'k' ), mov_read_trak },
1414
{ MKTAG( 'w', 'a', 'v', 'e' ), mov_read_wave },
1415
{ MKTAG( 'c', 't', 'a', 'b' ), mov_read_ctab },
1416
{ MKTAG( 'e', 's', 'd', 's' ), mov_read_esds },
1417
{ MKTAG( 'w', 'i', 'd', 'e' ), mov_read_wide }, /* place holder */
1418
{ MKTAG( 'c', 'm', 'o', 'v' ), mov_read_cmov },
1419
{ 0L, NULL }
1420
};
1421

    
1422
static void mov_free_stream_context(MOVStreamContext *sc)
1423
{
1424
    if(sc) {
1425
        av_freep(&sc->ctts_data);
1426
        av_freep(&sc);
1427
    }
1428
}
1429

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

    
1437
    /* check file header */
1438
    if (p->buf_size <= 12)
1439
        return 0;
1440
    offset = 0;
1441
    for(;;) {
1442
        /* ignore invalid offset */
1443
        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
        case MKTAG( 'm', 'd', 'a', 't' ):
1451
        case MKTAG( 'p', 'n', 'o', 't' ): /* detect movs with preview pics like ew.mov and april.mov */
1452
        case MKTAG( 'u', 'd', 't', 'a' ): /* Packet Video PVAuthor adds this and a lot of more junk */
1453
            return AVPROBE_SCORE_MAX;
1454
        /* those are more common words, so rate then a bit less */
1455
        case MKTAG( 'w', 'i', 'd', 'e' ):
1456
        case MKTAG( 'f', 'r', 'e', 'e' ):
1457
        case MKTAG( 'j', 'u', 'n', 'k' ):
1458
        case MKTAG( 'p', 'i', 'c', 't' ):
1459
            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
            /* if we only find those cause probedata is too small at least rate them */
1465
            score = AVPROBE_SCORE_MAX - 50;
1466
            break;
1467
        default:
1468
            /* unrecognized tag */
1469
            return score;
1470
        }
1471
    }
1472
    return score;
1473
}
1474

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

    
1485
    if (sc->sample_sizes || st->codec->codec_type == CODEC_TYPE_VIDEO || sc->dv_audio_container) {
1486
        unsigned int current_sample = 0;
1487
        unsigned int stts_sample = 0;
1488
        unsigned int keyframe, sample_size;
1489
        unsigned int distance = 0;
1490

    
1491
        st->nb_frames = sc->sample_count;
1492
        for (i = 0; i < sc->chunk_count; i++) {
1493
            current_offset = sc->chunk_offsets[i];
1494
            if (stsc_index + 1 < sc->sample_to_chunk_sz && i + 1 == sc->sample_to_chunk[stsc_index + 1].first)
1495
                stsc_index++;
1496
            for (j = 0; j < sc->sample_to_chunk[stsc_index].count; j++) {
1497
                if (current_sample >= sc->sample_count) {
1498
                    av_log(mov->fc, AV_LOG_ERROR, "wrong sample count\n");
1499
                    goto out;
1500
                }
1501
                keyframe = !sc->keyframe_count || current_sample + 1 == sc->keyframes[stss_index];
1502
                if (keyframe) {
1503
                    distance = 0;
1504
                    if (stss_index + 1 < sc->keyframe_count)
1505
                        stss_index++;
1506
                }
1507
                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
                        st->index, current_sample, current_offset, current_dts, sample_size, distance, keyframe);
1510
                av_add_index_entry(st, current_offset, current_dts, sample_size, distance, keyframe ? AVINDEX_KEYFRAME : 0);
1511
                current_offset += sample_size;
1512
                assert(sc->stts_data[stts_index].duration % sc->time_rate == 0);
1513
                current_dts += sc->stts_data[stts_index].duration / sc->time_rate;
1514
                distance++;
1515
                stts_sample++;
1516
                current_sample++;
1517
                if (stts_index + 1 < sc->stts_count && stts_sample == sc->stts_data[stts_index].count) {
1518
                    stts_sample = 0;
1519
                    stts_index++;
1520
                }
1521
            }
1522
        }
1523
    } else { /* read whole chunk */
1524
        unsigned int chunk_samples, chunk_size, chunk_duration;
1525

    
1526
        for (i = 0; i < sc->chunk_count; i++) {
1527
            current_offset = sc->chunk_offsets[i];
1528
            if (stsc_index + 1 < sc->sample_to_chunk_sz && i + 1 == sc->sample_to_chunk[stsc_index + 1].first)
1529
                stsc_index++;
1530
            chunk_samples = sc->sample_to_chunk[stsc_index].count;
1531
            /* 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
                chunk_size = chunk_samples * sc->sample_size;
1534
            else if (sc->sample_size_v1.den > 0 && (chunk_samples * sc->sample_size_v1.num % sc->sample_size_v1.den == 0))
1535
                chunk_size = chunk_samples * sc->sample_size_v1.num / sc->sample_size_v1.den;
1536
            else { /* workaround to find nearest next chunk offset */
1537
                chunk_size = INT_MAX;
1538
                for (j = 0; j < mov->total_streams; j++) {
1539
                    MOVStreamContext *msc = mov->streams[j];
1540

    
1541
                    for (k = msc->next_chunk; k < msc->chunk_count; k++) {
1542
                        if (msc->chunk_offsets[k] > current_offset && msc->chunk_offsets[k] - current_offset < chunk_size) {
1543
                            chunk_size = msc->chunk_offsets[k] - current_offset;
1544
                            msc->next_chunk = k;
1545
                            break;
1546
                        }
1547
                    }
1548
                }
1549
                /* check for last chunk */
1550
                if (chunk_size == INT_MAX)
1551
                    for (j = 0; j < mov->mdat_count; j++) {
1552
                        dprintf("mdat %d, offset %"PRIx64", size %"PRId64", current offset %"PRIx64"\n",
1553
                                j, mov->mdat_list[j].offset, mov->mdat_list[j].size, current_offset);
1554
                        if (mov->mdat_list[j].offset <= current_offset && mov->mdat_list[j].offset + mov->mdat_list[j].size > current_offset)
1555
                            chunk_size = mov->mdat_list[j].offset + mov->mdat_list[j].size - current_offset;
1556
                    }
1557
                assert(chunk_size != INT_MAX);
1558
                for (j = 0; j < mov->total_streams; j++) {
1559
                    mov->streams[j]->next_chunk = 0;
1560
                }
1561
            }
1562
            av_add_index_entry(st, current_offset, current_dts, chunk_size, 0, AVINDEX_KEYFRAME);
1563
            /* get chunk duration */
1564
            chunk_duration = 0;
1565
            while (chunk_samples > 0) {
1566
                if (chunk_samples < sc->stts_data[stts_index].count) {
1567
                    chunk_duration += sc->stts_data[stts_index].duration * chunk_samples;
1568
                    sc->stts_data[stts_index].count -= chunk_samples;
1569
                    break;
1570
                } else {
1571
                    chunk_duration += sc->stts_data[stts_index].duration * chunk_samples;
1572
                    chunk_samples -= sc->stts_data[stts_index].count;
1573
                    if (stts_index + 1 < sc->stts_count) {
1574
                        stts_index++;
1575
                    }
1576
                }
1577
            }
1578
            dprintf("AVIndex stream %d, chunk %d, offset %"PRIx64", dts %"PRId64", size %d, duration %d\n",
1579
                    st->index, i, current_offset, current_dts, chunk_size, chunk_duration);
1580
            assert(chunk_duration % sc->time_rate == 0);
1581
            current_dts += chunk_duration / sc->time_rate;
1582
        }
1583
    }
1584
 out:
1585
    /* adjust sample count to avindex entries */
1586
    sc->sample_count = st->nb_index_entries;
1587
}
1588

    
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
        av_log(s, AV_LOG_ERROR, "mov: header not found !!! (err:%d, moov:%d, mdat:%d) pos:%"PRId64"\n",
1608
                err, mov->found_moov, mov->found_mdat, url_ftell(pb));
1609
        return -1;
1610
    }
1611
    dprintf("on_parse_exit_offset=%d\n", (int) url_ftell(pb));
1612

    
1613
    /* some cleanup : make sure we are on the mdat atom */
1614
    if(!url_is_streamed(pb) && (url_ftell(pb) != mov->mdat_offset))
1615
        url_fseek(pb, mov->mdat_offset, SEEK_SET);
1616

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

    
1619
    for(i=0; i<mov->total_streams; i++) {
1620
        MOVStreamContext *sc = mov->streams[i];
1621
        /* sanity checks */
1622
        if(!sc->stts_count || !sc->chunk_count || !sc->sample_to_chunk_sz ||
1623
           (!sc->sample_size && !sc->sample_count)){
1624
            av_log(s, AV_LOG_ERROR, "missing mandatory atoms, broken header\n");
1625
            return -1;
1626
        }
1627
        if(!sc->time_rate)
1628
            sc->time_rate=1;
1629
        if(!sc->time_scale)
1630
            sc->time_scale= mov->time_scale;
1631
        av_set_pts_info(s->streams[i], 64, sc->time_rate, sc->time_scale);
1632

    
1633
        if(s->streams[i]->duration != AV_NOPTS_VALUE){
1634
            assert(s->streams[i]->duration % sc->time_rate == 0);
1635
            s->streams[i]->duration /= sc->time_rate;
1636
        }
1637
        sc->ffindex = i;
1638
        mov_build_index(mov, s->streams[i]);
1639
    }
1640

    
1641
    for(i=0; i<mov->total_streams; i++) {
1642
        /* dont need those anymore */
1643
        av_freep(&mov->streams[i]->chunk_offsets);
1644
        av_freep(&mov->streams[i]->sample_to_chunk);
1645
        av_freep(&mov->streams[i]->sample_sizes);
1646
        av_freep(&mov->streams[i]->keyframes);
1647
        av_freep(&mov->streams[i]->stts_data);
1648
    }
1649
    av_freep(&mov->mdat_list);
1650
    return 0;
1651
}
1652

    
1653
static int mov_read_packet(AVFormatContext *s, AVPacket *pkt)
1654
{
1655
    MOVContext *mov = s->priv_data;
1656
    MOVStreamContext *sc = 0;
1657
    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
        if (s->streams[i]->discard != AVDISCARD_ALL && msc->current_sample < msc->sample_count) {
1665
            AVIndexEntry *current_sample = &s->streams[i]->index_entries[msc->current_sample];
1666
            int64_t dts = av_rescale(current_sample->timestamp * (int64_t)msc->time_rate, AV_TIME_BASE, msc->time_scale);
1667

    
1668
            dprintf("stream %d, sample %ld, dts %"PRId64"\n", i, msc->current_sample, dts);
1669
            if (dts < best_dts) {
1670
                sample = current_sample;
1671
                best_dts = dts;
1672
                sc = msc;
1673
            }
1674
        }
1675
    }
1676
    if (!sample)
1677
        return -1;
1678
    /* must be done just before reading, to avoid infinite loop on sample */
1679
    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
    if (sc->dv_audio_container) {
1686
        dv_get_packet(mov->dv_demux, pkt);
1687
        dprintf("dv audio pkt size %d\n", pkt->size);
1688
    } else {
1689
#endif
1690
        url_fseek(&s->pb, sample->pos, SEEK_SET);
1691
        av_get_packet(&s->pb, pkt, sample->size);
1692
#ifdef CONFIG_DV_DEMUXER
1693
        if (mov->dv_demux) {
1694
            void *pkt_destruct_func = pkt->destruct;
1695
            dv_produce_packet(mov->dv_demux, pkt, pkt->data, pkt->size);
1696
            pkt->destruct = pkt_destruct_func;
1697
        }
1698
    }
1699
#endif
1700
    pkt->stream_index = sc->ffindex;
1701
    pkt->dts = sample->timestamp;
1702
    if (sc->ctts_data) {
1703
        assert(sc->ctts_data[sc->sample_to_ctime_index].duration % sc->time_rate == 0);
1704
        pkt->pts = pkt->dts + sc->ctts_data[sc->sample_to_ctime_index].duration / sc->time_rate;
1705
        /* update ctts context */
1706
        sc->sample_to_ctime_sample++;
1707
        if (sc->sample_to_ctime_index < sc->ctts_count && sc->ctts_data[sc->sample_to_ctime_index].count == sc->sample_to_ctime_sample) {
1708
            sc->sample_to_ctime_index++;
1709
            sc->sample_to_ctime_sample = 0;
1710
        }
1711
    } else {
1712
        pkt->pts = pkt->dts;
1713
    }
1714
    pkt->flags |= sample->flags & AVINDEX_KEYFRAME ? PKT_FLAG_KEY : 0;
1715
    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
    return 0;
1718
}
1719

    
1720
static int mov_seek_stream(AVStream *st, int64_t timestamp, int flags)
1721
{
1722
    MOVStreamContext *sc = st->priv_data;
1723
    int sample, time_sample;
1724
    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
    if (sample < 0) /* not sure what to do */
1729
        return -1;
1730
    sc->current_sample = sample;
1731
    dprintf("stream %d, found sample %ld\n", st->index, sc->current_sample);
1732
    /* adjust ctts index */
1733
    if (sc->ctts_data) {
1734
        time_sample = 0;
1735
        for (i = 0; i < sc->ctts_count; i++) {
1736
            time_sample += sc->ctts_data[i].count;
1737
            if (time_sample >= sc->current_sample) {
1738
                sc->sample_to_ctime_index = i;
1739
                sc->sample_to_ctime_sample = time_sample - sc->current_sample;
1740
                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)
1748
{
1749
    AVStream *st;
1750
    int64_t seek_timestamp, timestamp;
1751
    int sample;
1752
    int i;
1753

    
1754
    if (stream_index >= s->nb_streams)
1755
        return -1;
1756

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

    
1762
    /* adjust seek timestamp to found sample timestamp */
1763
    seek_timestamp = st->index_entries[sample].timestamp;
1764

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

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

    
1776
static int mov_read_close(AVFormatContext *s)
1777
{
1778
    int i;
1779
    MOVContext *mov = (MOVContext *) s->priv_data;
1780
    for(i=0; i<mov->total_streams; i++)
1781
        mov_free_stream_context(mov->streams[i]);
1782
    /* free color tabs */
1783
    for(i=0; i<mov->ctab_size; i++)
1784
        av_freep(&mov->ctab[i]);
1785
    if(mov->dv_demux){
1786
        for(i=0; i<mov->dv_fctx->nb_streams; i++){
1787
            av_freep(&mov->dv_fctx->streams[i]->codec);
1788
            av_freep(&mov->dv_fctx->streams[i]);
1789
        }
1790
        av_freep(&mov->dv_fctx);
1791
        av_freep(&mov->dv_demux);
1792
    }
1793
    av_freep(&mov->ctab);
1794
    return 0;
1795
}
1796

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