Parse strf mov atoms
[libav.git] / libavformat / mov.c
1 /*
2 * MOV demuxer
3 * Copyright (c) 2001 Fabrice Bellard
4 * Copyright (c) 2009 Baptiste Coudurier <baptiste dot coudurier at gmail dot com>
5 *
6 * This file is part of FFmpeg.
7 *
8 * FFmpeg is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * FFmpeg is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with FFmpeg; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 */
22
23 #include <limits.h>
24
25 //#define DEBUG
26 //#define DEBUG_METADATA
27 //#define MOV_EXPORT_ALL_METADATA
28
29 #include "libavutil/intreadwrite.h"
30 #include "libavutil/avstring.h"
31 #include "avformat.h"
32 #include "riff.h"
33 #include "isom.h"
34 #include "libavcodec/mpeg4audio.h"
35 #include "libavcodec/mpegaudiodata.h"
36 #include "libavcodec/get_bits.h"
37
38 #if CONFIG_ZLIB
39 #include <zlib.h>
40 #endif
41
42 /*
43 * First version by Francois Revol revol@free.fr
44 * Seek function by Gael Chardon gael.dev@4now.net
45 *
46 * Features and limitations:
47 * - reads most of the QT files I have (at least the structure),
48 * Sample QuickTime files with mp3 audio can be found at: http://www.3ivx.com/showcase.html
49 * - the code is quite ugly... maybe I won't do it recursive next time :-)
50 *
51 * Funny I didn't know about http://sourceforge.net/projects/qt-ffmpeg/
52 * when coding this :) (it's a writer anyway)
53 *
54 * Reference documents:
55 * http://www.geocities.com/xhelmboyx/quicktime/formats/qtm-layout.txt
56 * Apple:
57 * http://developer.apple.com/documentation/QuickTime/QTFF/
58 * http://developer.apple.com/documentation/QuickTime/QTFF/qtff.pdf
59 * QuickTime is a trademark of Apple (AFAIK :))
60 */
61
62 #include "qtpalette.h"
63
64
65 #undef NDEBUG
66 #include <assert.h>
67
68 /* XXX: it's the first time I make a recursive parser I think... sorry if it's ugly :P */
69
70 /* those functions parse an atom */
71 /* return code:
72 0: continue to parse next atom
73 <0: error occurred, exit
74 */
75 /* links atom IDs to parse functions */
76 typedef struct MOVParseTableEntry {
77 uint32_t type;
78 int (*parse)(MOVContext *ctx, ByteIOContext *pb, MOVAtom atom);
79 } MOVParseTableEntry;
80
81 static const MOVParseTableEntry mov_default_parse_table[];
82
83 static int mov_metadata_trkn(MOVContext *c, ByteIOContext *pb, unsigned len)
84 {
85 char buf[16];
86
87 get_be16(pb); // unknown
88 snprintf(buf, sizeof(buf), "%d", get_be16(pb));
89 av_metadata_set(&c->fc->metadata, "track", buf);
90
91 get_be16(pb); // total tracks
92
93 return 0;
94 }
95
96 static const uint32_t mac_to_unicode[128] = {
97 0x00C4,0x00C5,0x00C7,0x00C9,0x00D1,0x00D6,0x00DC,0x00E1,
98 0x00E0,0x00E2,0x00E4,0x00E3,0x00E5,0x00E7,0x00E9,0x00E8,
99 0x00EA,0x00EB,0x00ED,0x00EC,0x00EE,0x00EF,0x00F1,0x00F3,
100 0x00F2,0x00F4,0x00F6,0x00F5,0x00FA,0x00F9,0x00FB,0x00FC,
101 0x2020,0x00B0,0x00A2,0x00A3,0x00A7,0x2022,0x00B6,0x00DF,
102 0x00AE,0x00A9,0x2122,0x00B4,0x00A8,0x2260,0x00C6,0x00D8,
103 0x221E,0x00B1,0x2264,0x2265,0x00A5,0x00B5,0x2202,0x2211,
104 0x220F,0x03C0,0x222B,0x00AA,0x00BA,0x03A9,0x00E6,0x00F8,
105 0x00BF,0x00A1,0x00AC,0x221A,0x0192,0x2248,0x2206,0x00AB,
106 0x00BB,0x2026,0x00A0,0x00C0,0x00C3,0x00D5,0x0152,0x0153,
107 0x2013,0x2014,0x201C,0x201D,0x2018,0x2019,0x00F7,0x25CA,
108 0x00FF,0x0178,0x2044,0x20AC,0x2039,0x203A,0xFB01,0xFB02,
109 0x2021,0x00B7,0x201A,0x201E,0x2030,0x00C2,0x00CA,0x00C1,
110 0x00CB,0x00C8,0x00CD,0x00CE,0x00CF,0x00CC,0x00D3,0x00D4,
111 0xF8FF,0x00D2,0x00DA,0x00DB,0x00D9,0x0131,0x02C6,0x02DC,
112 0x00AF,0x02D8,0x02D9,0x02DA,0x00B8,0x02DD,0x02DB,0x02C7,
113 };
114
115 static int mov_read_mac_string(MOVContext *c, ByteIOContext *pb, int len,
116 char *dst, int dstlen)
117 {
118 char *p = dst;
119 char *end = dst+dstlen-1;
120 int i;
121
122 for (i = 0; i < len; i++) {
123 uint8_t t, c = get_byte(pb);
124 if (c < 0x80 && p < end)
125 *p++ = c;
126 else
127 PUT_UTF8(mac_to_unicode[c-0x80], t, if (p < end) *p++ = t;);
128 }
129 *p = 0;
130 return p - dst;
131 }
132
133 static int mov_read_udta_string(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
134 {
135 #ifdef MOV_EXPORT_ALL_METADATA
136 char tmp_key[5];
137 #endif
138 char str[1024], key2[16], language[4] = {0};
139 const char *key = NULL;
140 uint16_t str_size, langcode = 0;
141 uint32_t data_type = 0;
142 int (*parse)(MOVContext*, ByteIOContext*, unsigned) = NULL;
143
144 switch (atom.type) {
145 case MKTAG(0xa9,'n','a','m'): key = "title"; break;
146 case MKTAG(0xa9,'a','u','t'):
147 case MKTAG(0xa9,'A','R','T'): key = "author"; break;
148 case MKTAG(0xa9,'w','r','t'): key = "composer"; break;
149 case MKTAG( 'c','p','r','t'):
150 case MKTAG(0xa9,'c','p','y'): key = "copyright"; break;
151 case MKTAG(0xa9,'c','m','t'):
152 case MKTAG(0xa9,'i','n','f'): key = "comment"; break;
153 case MKTAG(0xa9,'a','l','b'): key = "album"; break;
154 case MKTAG(0xa9,'d','a','y'): key = "date"; break;
155 case MKTAG(0xa9,'g','e','n'): key = "genre"; break;
156 case MKTAG(0xa9,'t','o','o'):
157 case MKTAG(0xa9,'e','n','c'): key = "encoder"; break;
158 case MKTAG( 'd','e','s','c'): key = "description";break;
159 case MKTAG( 'l','d','e','s'): key = "synopsis"; break;
160 case MKTAG( 't','v','s','h'): key = "show"; break;
161 case MKTAG( 't','v','e','n'): key = "episode_id";break;
162 case MKTAG( 't','v','n','n'): key = "network"; break;
163 case MKTAG( 't','r','k','n'): key = "track";
164 parse = mov_metadata_trkn; break;
165 }
166
167 if (c->itunes_metadata && atom.size > 8) {
168 int data_size = get_be32(pb);
169 int tag = get_le32(pb);
170 if (tag == MKTAG('d','a','t','a')) {
171 data_type = get_be32(pb); // type
172 get_be32(pb); // unknown
173 str_size = data_size - 16;
174 atom.size -= 16;
175 } else return 0;
176 } else if (atom.size > 4 && key && !c->itunes_metadata) {
177 str_size = get_be16(pb); // string length
178 langcode = get_be16(pb);
179 ff_mov_lang_to_iso639(langcode, language);
180 atom.size -= 4;
181 } else
182 str_size = atom.size;
183
184 #ifdef MOV_EXPORT_ALL_METADATA
185 if (!key) {
186 snprintf(tmp_key, 5, "%.4s", (char*)&atom.type);
187 key = tmp_key;
188 }
189 #endif
190
191 if (!key)
192 return 0;
193 if (atom.size < 0)
194 return -1;
195
196 str_size = FFMIN3(sizeof(str)-1, str_size, atom.size);
197
198 if (parse)
199 parse(c, pb, str_size);
200 else {
201 if (data_type == 3 || (data_type == 0 && langcode < 0x800)) { // MAC Encoded
202 mov_read_mac_string(c, pb, str_size, str, sizeof(str));
203 } else {
204 get_buffer(pb, str, str_size);
205 str[str_size] = 0;
206 }
207 av_metadata_set(&c->fc->metadata, key, str);
208 if (*language && strcmp(language, "und")) {
209 snprintf(key2, sizeof(key2), "%s-%s", key, language);
210 av_metadata_set(&c->fc->metadata, key2, str);
211 }
212 }
213 #ifdef DEBUG_METADATA
214 av_log(c->fc, AV_LOG_DEBUG, "lang \"%3s\" ", language);
215 av_log(c->fc, AV_LOG_DEBUG, "tag \"%s\" value \"%s\" atom \"%.4s\" %d %lld\n",
216 key, str, (char*)&atom.type, str_size, atom.size);
217 #endif
218
219 return 0;
220 }
221
222 static int mov_read_default(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
223 {
224 int64_t total_size = 0;
225 MOVAtom a;
226 int i;
227
228 if (atom.size < 0)
229 atom.size = INT64_MAX;
230 while (total_size + 8 < atom.size && !url_feof(pb)) {
231 int (*parse)(MOVContext*, ByteIOContext*, MOVAtom) = NULL;
232 a.size = atom.size;
233 a.type=0;
234 if(atom.size >= 8) {
235 a.size = get_be32(pb);
236 a.type = get_le32(pb);
237 }
238 total_size += 8;
239 dprintf(c->fc, "type: %08x %.4s sz: %"PRIx64" %"PRIx64" %"PRIx64"\n",
240 a.type, (char*)&a.type, a.size, atom.size, total_size);
241 if (a.size == 1) { /* 64 bit extended size */
242 a.size = get_be64(pb) - 8;
243 total_size += 8;
244 }
245 if (a.size == 0) {
246 a.size = atom.size - total_size;
247 if (a.size <= 8)
248 break;
249 }
250 a.size -= 8;
251 if(a.size < 0)
252 break;
253 a.size = FFMIN(a.size, atom.size - total_size);
254
255 for (i = 0; mov_default_parse_table[i].type; i++)
256 if (mov_default_parse_table[i].type == a.type) {
257 parse = mov_default_parse_table[i].parse;
258 break;
259 }
260
261 // container is user data
262 if (!parse && (atom.type == MKTAG('u','d','t','a') ||
263 atom.type == MKTAG('i','l','s','t')))
264 parse = mov_read_udta_string;
265
266 if (!parse) { /* skip leaf atoms data */
267 url_fskip(pb, a.size);
268 } else {
269 int64_t start_pos = url_ftell(pb);
270 int64_t left;
271 int err = parse(c, pb, a);
272 if (err < 0)
273 return err;
274 if (c->found_moov && c->found_mdat &&
275 (url_is_streamed(pb) || start_pos + a.size == url_fsize(pb)))
276 return 0;
277 left = a.size - url_ftell(pb) + start_pos;
278 if (left > 0) /* skip garbage at atom end */
279 url_fskip(pb, left);
280 }
281
282 total_size += a.size;
283 }
284
285 if (total_size < atom.size && atom.size < 0x7ffff)
286 url_fskip(pb, atom.size - total_size);
287
288 return 0;
289 }
290
291 static int mov_read_dref(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
292 {
293 AVStream *st;
294 MOVStreamContext *sc;
295 int entries, i, j;
296
297 if (c->fc->nb_streams < 1)
298 return 0;
299 st = c->fc->streams[c->fc->nb_streams-1];
300 sc = st->priv_data;
301
302 get_be32(pb); // version + flags
303 entries = get_be32(pb);
304 if (entries >= UINT_MAX / sizeof(*sc->drefs))
305 return -1;
306 sc->drefs = av_mallocz(entries * sizeof(*sc->drefs));
307 if (!sc->drefs)
308 return AVERROR(ENOMEM);
309 sc->drefs_count = entries;
310
311 for (i = 0; i < sc->drefs_count; i++) {
312 MOVDref *dref = &sc->drefs[i];
313 uint32_t size = get_be32(pb);
314 int64_t next = url_ftell(pb) + size - 4;
315
316 dref->type = get_le32(pb);
317 get_be32(pb); // version + flags
318 dprintf(c->fc, "type %.4s size %d\n", (char*)&dref->type, size);
319
320 if (dref->type == MKTAG('a','l','i','s') && size > 150) {
321 /* macintosh alias record */
322 uint16_t volume_len, len;
323 int16_t type;
324
325 url_fskip(pb, 10);
326
327 volume_len = get_byte(pb);
328 volume_len = FFMIN(volume_len, 27);
329 get_buffer(pb, dref->volume, 27);
330 dref->volume[volume_len] = 0;
331 av_log(c->fc, AV_LOG_DEBUG, "volume %s, len %d\n", dref->volume, volume_len);
332
333 url_fskip(pb, 12);
334
335 len = get_byte(pb);
336 len = FFMIN(len, 63);
337 get_buffer(pb, dref->filename, 63);
338 dref->filename[len] = 0;
339 av_log(c->fc, AV_LOG_DEBUG, "filename %s, len %d\n", dref->filename, len);
340
341 url_fskip(pb, 16);
342
343 /* read next level up_from_alias/down_to_target */
344 dref->nlvl_from = get_be16(pb);
345 dref->nlvl_to = get_be16(pb);
346 av_log(c->fc, AV_LOG_DEBUG, "nlvl from %d, nlvl to %d\n",
347 dref->nlvl_from, dref->nlvl_to);
348
349 url_fskip(pb, 16);
350
351 for (type = 0; type != -1 && url_ftell(pb) < next; ) {
352 type = get_be16(pb);
353 len = get_be16(pb);
354 av_log(c->fc, AV_LOG_DEBUG, "type %d, len %d\n", type, len);
355 if (len&1)
356 len += 1;
357 if (type == 2) { // absolute path
358 av_free(dref->path);
359 dref->path = av_mallocz(len+1);
360 if (!dref->path)
361 return AVERROR(ENOMEM);
362 get_buffer(pb, dref->path, len);
363 if (len > volume_len && !strncmp(dref->path, dref->volume, volume_len)) {
364 len -= volume_len;
365 memmove(dref->path, dref->path+volume_len, len);
366 dref->path[len] = 0;
367 }
368 for (j = 0; j < len; j++)
369 if (dref->path[j] == ':')
370 dref->path[j] = '/';
371 av_log(c->fc, AV_LOG_DEBUG, "path %s\n", dref->path);
372 } else if (type == 0) { // directory name
373 av_free(dref->dir);
374 dref->dir = av_malloc(len+1);
375 if (!dref->dir)
376 return AVERROR(ENOMEM);
377 get_buffer(pb, dref->dir, len);
378 dref->dir[len] = 0;
379 for (j = 0; j < len; j++)
380 if (dref->dir[j] == ':')
381 dref->dir[j] = '/';
382 av_log(c->fc, AV_LOG_DEBUG, "dir %s\n", dref->dir);
383 } else
384 url_fskip(pb, len);
385 }
386 }
387 url_fseek(pb, next, SEEK_SET);
388 }
389 return 0;
390 }
391
392 static int mov_read_hdlr(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
393 {
394 AVStream *st;
395 uint32_t type;
396 uint32_t ctype;
397
398 if (c->fc->nb_streams < 1) // meta before first trak
399 return 0;
400
401 st = c->fc->streams[c->fc->nb_streams-1];
402
403 get_byte(pb); /* version */
404 get_be24(pb); /* flags */
405
406 /* component type */
407 ctype = get_le32(pb);
408 type = get_le32(pb); /* component subtype */
409
410 dprintf(c->fc, "ctype= %.4s (0x%08x)\n", (char*)&ctype, ctype);
411 dprintf(c->fc, "stype= %.4s\n", (char*)&type);
412
413 if (type == MKTAG('v','i','d','e'))
414 st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
415 else if(type == MKTAG('s','o','u','n'))
416 st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
417 else if(type == MKTAG('m','1','a',' '))
418 st->codec->codec_id = CODEC_ID_MP2;
419 else if(type == MKTAG('s','u','b','p'))
420 st->codec->codec_type = AVMEDIA_TYPE_SUBTITLE;
421
422 get_be32(pb); /* component manufacture */
423 get_be32(pb); /* component flags */
424 get_be32(pb); /* component flags mask */
425
426 return 0;
427 }
428
429 int ff_mp4_read_descr_len(ByteIOContext *pb)
430 {
431 int len = 0;
432 int count = 4;
433 while (count--) {
434 int c = get_byte(pb);
435 len = (len << 7) | (c & 0x7f);
436 if (!(c & 0x80))
437 break;
438 }
439 return len;
440 }
441
442 static int mp4_read_descr(AVFormatContext *fc, ByteIOContext *pb, int *tag)
443 {
444 int len;
445 *tag = get_byte(pb);
446 len = ff_mp4_read_descr_len(pb);
447 dprintf(fc, "MPEG4 description: tag=0x%02x len=%d\n", *tag, len);
448 return len;
449 }
450
451 #define MP4ESDescrTag 0x03
452 #define MP4DecConfigDescrTag 0x04
453 #define MP4DecSpecificDescrTag 0x05
454
455 static const AVCodecTag mp4_audio_types[] = {
456 { CODEC_ID_MP3ON4, AOT_PS }, /* old mp3on4 draft */
457 { CODEC_ID_MP3ON4, AOT_L1 }, /* layer 1 */
458 { CODEC_ID_MP3ON4, AOT_L2 }, /* layer 2 */
459 { CODEC_ID_MP3ON4, AOT_L3 }, /* layer 3 */
460 { CODEC_ID_MP4ALS, AOT_ALS }, /* MPEG-4 ALS */
461 { CODEC_ID_NONE, AOT_NULL },
462 };
463
464 int ff_mov_read_esds(AVFormatContext *fc, ByteIOContext *pb, MOVAtom atom)
465 {
466 AVStream *st;
467 int tag, len;
468
469 if (fc->nb_streams < 1)
470 return 0;
471 st = fc->streams[fc->nb_streams-1];
472
473 get_be32(pb); /* version + flags */
474 len = mp4_read_descr(fc, pb, &tag);
475 if (tag == MP4ESDescrTag) {
476 get_be16(pb); /* ID */
477 get_byte(pb); /* priority */
478 } else
479 get_be16(pb); /* ID */
480
481 len = mp4_read_descr(fc, pb, &tag);
482 if (tag == MP4DecConfigDescrTag) {
483 int object_type_id = get_byte(pb);
484 get_byte(pb); /* stream type */
485 get_be24(pb); /* buffer size db */
486 get_be32(pb); /* max bitrate */
487 get_be32(pb); /* avg bitrate */
488
489 st->codec->codec_id= ff_codec_get_id(ff_mp4_obj_type, object_type_id);
490 dprintf(fc, "esds object type id 0x%02x\n", object_type_id);
491 len = mp4_read_descr(fc, pb, &tag);
492 if (tag == MP4DecSpecificDescrTag) {
493 dprintf(fc, "Specific MPEG4 header len=%d\n", len);
494 if((uint64_t)len > (1<<30))
495 return -1;
496 st->codec->extradata = av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
497 if (!st->codec->extradata)
498 return AVERROR(ENOMEM);
499 get_buffer(pb, st->codec->extradata, len);
500 st->codec->extradata_size = len;
501 if (st->codec->codec_id == CODEC_ID_AAC) {
502 MPEG4AudioConfig cfg;
503 ff_mpeg4audio_get_config(&cfg, st->codec->extradata,
504 st->codec->extradata_size);
505 st->codec->channels = cfg.channels;
506 if (cfg.object_type == 29 && cfg.sampling_index < 3) // old mp3on4
507 st->codec->sample_rate = ff_mpa_freq_tab[cfg.sampling_index];
508 else
509 st->codec->sample_rate = cfg.sample_rate; // ext sample rate ?
510 dprintf(fc, "mp4a config channels %d obj %d ext obj %d "
511 "sample rate %d ext sample rate %d\n", st->codec->channels,
512 cfg.object_type, cfg.ext_object_type,
513 cfg.sample_rate, cfg.ext_sample_rate);
514 if (!(st->codec->codec_id = ff_codec_get_id(mp4_audio_types,
515 cfg.object_type)))
516 st->codec->codec_id = CODEC_ID_AAC;
517 }
518 }
519 }
520 return 0;
521 }
522
523 static int mov_read_esds(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
524 {
525 return ff_mov_read_esds(c->fc, pb, atom);
526 }
527
528 static int mov_read_pasp(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
529 {
530 const int num = get_be32(pb);
531 const int den = get_be32(pb);
532 AVStream *st;
533
534 if (c->fc->nb_streams < 1)
535 return 0;
536 st = c->fc->streams[c->fc->nb_streams-1];
537
538 if (den != 0) {
539 if ((st->sample_aspect_ratio.den != 1 || st->sample_aspect_ratio.num) && // default
540 (den != st->sample_aspect_ratio.den || num != st->sample_aspect_ratio.num))
541 av_log(c->fc, AV_LOG_WARNING,
542 "sample aspect ratio already set to %d:%d, overriding by 'pasp' atom\n",
543 st->sample_aspect_ratio.num, st->sample_aspect_ratio.den);
544 st->sample_aspect_ratio.num = num;
545 st->sample_aspect_ratio.den = den;
546 }
547 return 0;
548 }
549
550 /* this atom contains actual media data */
551 static int mov_read_mdat(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
552 {
553 if(atom.size == 0) /* wrong one (MP4) */
554 return 0;
555 c->found_mdat=1;
556 return 0; /* now go for moov */
557 }
558
559 /* read major brand, minor version and compatible brands and store them as metadata */
560 static int mov_read_ftyp(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
561 {
562 uint32_t minor_ver;
563 int comp_brand_size;
564 char minor_ver_str[11]; /* 32 bit integer -> 10 digits + null */
565 char* comp_brands_str;
566 uint8_t type[5] = {0};
567
568 get_buffer(pb, type, 4);
569 if (strcmp(type, "qt "))
570 c->isom = 1;
571 av_log(c->fc, AV_LOG_DEBUG, "ISO: File Type Major Brand: %.4s\n",(char *)&type);
572 av_metadata_set(&c->fc->metadata, "major_brand", type);
573 minor_ver = get_be32(pb); /* minor version */
574 snprintf(minor_ver_str, sizeof(minor_ver_str), "%d", minor_ver);
575 av_metadata_set(&c->fc->metadata, "minor_version", minor_ver_str);
576
577 comp_brand_size = atom.size - 8;
578 if (comp_brand_size < 0)
579 return -1;
580 comp_brands_str = av_malloc(comp_brand_size + 1); /* Add null terminator */
581 if (!comp_brands_str)
582 return AVERROR(ENOMEM);
583 get_buffer(pb, comp_brands_str, comp_brand_size);
584 comp_brands_str[comp_brand_size] = 0;
585 av_metadata_set(&c->fc->metadata, "compatible_brands", comp_brands_str);
586 av_freep(&comp_brands_str);
587
588 return 0;
589 }
590
591 /* this atom should contain all header atoms */
592 static int mov_read_moov(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
593 {
594 if (mov_read_default(c, pb, atom) < 0)
595 return -1;
596 /* we parsed the 'moov' atom, we can terminate the parsing as soon as we find the 'mdat' */
597 /* so we don't parse the whole file if over a network */
598 c->found_moov=1;
599 return 0; /* now go for mdat */
600 }
601
602 static int mov_read_moof(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
603 {
604 c->fragment.moof_offset = url_ftell(pb) - 8;
605 dprintf(c->fc, "moof offset %llx\n", c->fragment.moof_offset);
606 return mov_read_default(c, pb, atom);
607 }
608
609 static int mov_read_mdhd(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
610 {
611 AVStream *st;
612 MOVStreamContext *sc;
613 int version;
614 char language[4] = {0};
615 unsigned lang;
616
617 if (c->fc->nb_streams < 1)
618 return 0;
619 st = c->fc->streams[c->fc->nb_streams-1];
620 sc = st->priv_data;
621
622 version = get_byte(pb);
623 if (version > 1)
624 return -1; /* unsupported */
625
626 get_be24(pb); /* flags */
627 if (version == 1) {
628 get_be64(pb);
629 get_be64(pb);
630 } else {
631 get_be32(pb); /* creation time */
632 get_be32(pb); /* modification time */
633 }
634
635 sc->time_scale = get_be32(pb);
636 st->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
637
638 lang = get_be16(pb); /* language */
639 if (ff_mov_lang_to_iso639(lang, language))
640 av_metadata_set(&st->metadata, "language", language);
641 get_be16(pb); /* quality */
642
643 return 0;
644 }
645
646 static int mov_read_mvhd(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
647 {
648 int version = get_byte(pb); /* version */
649 get_be24(pb); /* flags */
650
651 if (version == 1) {
652 get_be64(pb);
653 get_be64(pb);
654 } else {
655 get_be32(pb); /* creation time */
656 get_be32(pb); /* modification time */
657 }
658 c->time_scale = get_be32(pb); /* time scale */
659
660 dprintf(c->fc, "time scale = %i\n", c->time_scale);
661
662 c->duration = (version == 1) ? get_be64(pb) : get_be32(pb); /* duration */
663 get_be32(pb); /* preferred scale */
664
665 get_be16(pb); /* preferred volume */
666
667 url_fskip(pb, 10); /* reserved */
668
669 url_fskip(pb, 36); /* display matrix */
670
671 get_be32(pb); /* preview time */
672 get_be32(pb); /* preview duration */
673 get_be32(pb); /* poster time */
674 get_be32(pb); /* selection time */
675 get_be32(pb); /* selection duration */
676 get_be32(pb); /* current time */
677 get_be32(pb); /* next track ID */
678
679 return 0;
680 }
681
682 static int mov_read_smi(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
683 {
684 AVStream *st;
685
686 if (c->fc->nb_streams < 1)
687 return 0;
688 st = c->fc->streams[c->fc->nb_streams-1];
689
690 if((uint64_t)atom.size > (1<<30))
691 return -1;
692
693 // currently SVQ3 decoder expect full STSD header - so let's fake it
694 // this should be fixed and just SMI header should be passed
695 av_free(st->codec->extradata);
696 st->codec->extradata = av_mallocz(atom.size + 0x5a + FF_INPUT_BUFFER_PADDING_SIZE);
697 if (!st->codec->extradata)
698 return AVERROR(ENOMEM);
699 st->codec->extradata_size = 0x5a + atom.size;
700 memcpy(st->codec->extradata, "SVQ3", 4); // fake
701 get_buffer(pb, st->codec->extradata + 0x5a, atom.size);
702 dprintf(c->fc, "Reading SMI %"PRId64" %s\n", atom.size, st->codec->extradata + 0x5a);
703 return 0;
704 }
705
706 static int mov_read_enda(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
707 {
708 AVStream *st;
709 int little_endian;
710
711 if (c->fc->nb_streams < 1)
712 return 0;
713 st = c->fc->streams[c->fc->nb_streams-1];
714
715 little_endian = get_be16(pb);
716 dprintf(c->fc, "enda %d\n", little_endian);
717 if (little_endian == 1) {
718 switch (st->codec->codec_id) {
719 case CODEC_ID_PCM_S24BE:
720 st->codec->codec_id = CODEC_ID_PCM_S24LE;
721 break;
722 case CODEC_ID_PCM_S32BE:
723 st->codec->codec_id = CODEC_ID_PCM_S32LE;
724 break;
725 case CODEC_ID_PCM_F32BE:
726 st->codec->codec_id = CODEC_ID_PCM_F32LE;
727 break;
728 case CODEC_ID_PCM_F64BE:
729 st->codec->codec_id = CODEC_ID_PCM_F64LE;
730 break;
731 default:
732 break;
733 }
734 }
735 return 0;
736 }
737
738 /* FIXME modify qdm2/svq3/h264 decoders to take full atom as extradata */
739 static int mov_read_extradata(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
740 {
741 AVStream *st;
742 uint64_t size;
743 uint8_t *buf;
744
745 if (c->fc->nb_streams < 1) // will happen with jp2 files
746 return 0;
747 st= c->fc->streams[c->fc->nb_streams-1];
748 size= (uint64_t)st->codec->extradata_size + atom.size + 8 + FF_INPUT_BUFFER_PADDING_SIZE;
749 if(size > INT_MAX || (uint64_t)atom.size > INT_MAX)
750 return -1;
751 buf= av_realloc(st->codec->extradata, size);
752 if(!buf)
753 return -1;
754 st->codec->extradata= buf;
755 buf+= st->codec->extradata_size;
756 st->codec->extradata_size= size - FF_INPUT_BUFFER_PADDING_SIZE;
757 AV_WB32( buf , atom.size + 8);
758 AV_WL32( buf + 4, atom.type);
759 get_buffer(pb, buf + 8, atom.size);
760 return 0;
761 }
762
763 static int mov_read_wave(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
764 {
765 AVStream *st;
766
767 if (c->fc->nb_streams < 1)
768 return 0;
769 st = c->fc->streams[c->fc->nb_streams-1];
770
771 if((uint64_t)atom.size > (1<<30))
772 return -1;
773
774 if (st->codec->codec_id == CODEC_ID_QDM2) {
775 // pass all frma atom to codec, needed at least for QDM2
776 av_free(st->codec->extradata);
777 st->codec->extradata = av_mallocz(atom.size + FF_INPUT_BUFFER_PADDING_SIZE);
778 if (!st->codec->extradata)
779 return AVERROR(ENOMEM);
780 st->codec->extradata_size = atom.size;
781 get_buffer(pb, st->codec->extradata, atom.size);
782 } else if (atom.size > 8) { /* to read frma, esds atoms */
783 if (mov_read_default(c, pb, atom) < 0)
784 return -1;
785 } else
786 url_fskip(pb, atom.size);
787 return 0;
788 }
789
790 /**
791 * This function reads atom content and puts data in extradata without tag
792 * nor size unlike mov_read_extradata.
793 */
794 static int mov_read_glbl(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
795 {
796 AVStream *st;
797
798 if (c->fc->nb_streams < 1)
799 return 0;
800 st = c->fc->streams[c->fc->nb_streams-1];
801
802 if((uint64_t)atom.size > (1<<30))
803 return -1;
804
805 av_free(st->codec->extradata);
806 st->codec->extradata = av_mallocz(atom.size + FF_INPUT_BUFFER_PADDING_SIZE);
807 if (!st->codec->extradata)
808 return AVERROR(ENOMEM);
809 st->codec->extradata_size = atom.size;
810 get_buffer(pb, st->codec->extradata, atom.size);
811 return 0;
812 }
813
814 /**
815 * An strf atom is a BITMAPINFOHEADER struct. This struct is 40 bytes itself,
816 * but can have extradata appended at the end after the 40 bytes belonging
817 * to the struct.
818 */
819 static int mov_read_strf(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
820 {
821 AVStream *st;
822
823 if (c->fc->nb_streams < 1)
824 return 0;
825 if (atom.size <= 40)
826 return 0;
827 st = c->fc->streams[c->fc->nb_streams-1];
828
829 if((uint64_t)atom.size > (1<<30))
830 return -1;
831
832 av_free(st->codec->extradata);
833 st->codec->extradata = av_mallocz(atom.size - 40 + FF_INPUT_BUFFER_PADDING_SIZE);
834 if (!st->codec->extradata)
835 return AVERROR(ENOMEM);
836 st->codec->extradata_size = atom.size - 40;
837 url_fskip(pb, 40);
838 get_buffer(pb, st->codec->extradata, atom.size - 40);
839 return 0;
840 }
841
842 static int mov_read_stco(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
843 {
844 AVStream *st;
845 MOVStreamContext *sc;
846 unsigned int i, entries;
847
848 if (c->fc->nb_streams < 1)
849 return 0;
850 st = c->fc->streams[c->fc->nb_streams-1];
851 sc = st->priv_data;
852
853 get_byte(pb); /* version */
854 get_be24(pb); /* flags */
855
856 entries = get_be32(pb);
857
858 if(entries >= UINT_MAX/sizeof(int64_t))
859 return -1;
860
861 sc->chunk_offsets = av_malloc(entries * sizeof(int64_t));
862 if (!sc->chunk_offsets)
863 return AVERROR(ENOMEM);
864 sc->chunk_count = entries;
865
866 if (atom.type == MKTAG('s','t','c','o'))
867 for(i=0; i<entries; i++)
868 sc->chunk_offsets[i] = get_be32(pb);
869 else if (atom.type == MKTAG('c','o','6','4'))
870 for(i=0; i<entries; i++)
871 sc->chunk_offsets[i] = get_be64(pb);
872 else
873 return -1;
874
875 return 0;
876 }
877
878 /**
879 * Compute codec id for 'lpcm' tag.
880 * See CoreAudioTypes and AudioStreamBasicDescription at Apple.
881 */
882 enum CodecID ff_mov_get_lpcm_codec_id(int bps, int flags)
883 {
884 if (flags & 1) { // floating point
885 if (flags & 2) { // big endian
886 if (bps == 32) return CODEC_ID_PCM_F32BE;
887 else if (bps == 64) return CODEC_ID_PCM_F64BE;
888 } else {
889 if (bps == 32) return CODEC_ID_PCM_F32LE;
890 else if (bps == 64) return CODEC_ID_PCM_F64LE;
891 }
892 } else {
893 if (flags & 2) {
894 if (bps == 8)
895 // signed integer
896 if (flags & 4) return CODEC_ID_PCM_S8;
897 else return CODEC_ID_PCM_U8;
898 else if (bps == 16) return CODEC_ID_PCM_S16BE;
899 else if (bps == 24) return CODEC_ID_PCM_S24BE;
900 else if (bps == 32) return CODEC_ID_PCM_S32BE;
901 } else {
902 if (bps == 8)
903 if (flags & 4) return CODEC_ID_PCM_S8;
904 else return CODEC_ID_PCM_U8;
905 else if (bps == 16) return CODEC_ID_PCM_S16LE;
906 else if (bps == 24) return CODEC_ID_PCM_S24LE;
907 else if (bps == 32) return CODEC_ID_PCM_S32LE;
908 }
909 }
910 return CODEC_ID_NONE;
911 }
912
913 static int mov_read_stsd(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
914 {
915 AVStream *st;
916 MOVStreamContext *sc;
917 int j, entries, pseudo_stream_id;
918
919 if (c->fc->nb_streams < 1)
920 return 0;
921 st = c->fc->streams[c->fc->nb_streams-1];
922 sc = st->priv_data;
923
924 get_byte(pb); /* version */
925 get_be24(pb); /* flags */
926
927 entries = get_be32(pb);
928
929 for(pseudo_stream_id=0; pseudo_stream_id<entries; pseudo_stream_id++) {
930 //Parsing Sample description table
931 enum CodecID id;
932 int dref_id = 1;
933 MOVAtom a = { 0 };
934 int64_t start_pos = url_ftell(pb);
935 int size = get_be32(pb); /* size */
936 uint32_t format = get_le32(pb); /* data format */
937
938 if (size >= 16) {
939 get_be32(pb); /* reserved */
940 get_be16(pb); /* reserved */
941 dref_id = get_be16(pb);
942 }
943
944 if (st->codec->codec_tag &&
945 st->codec->codec_tag != format &&
946 (c->fc->video_codec_id ? ff_codec_get_id(codec_movvideo_tags, format) != c->fc->video_codec_id
947 : st->codec->codec_tag != MKTAG('j','p','e','g'))
948 ){
949 /* Multiple fourcc, we skip JPEG. This is not correct, we should
950 * export it as a separate AVStream but this needs a few changes
951 * in the MOV demuxer, patch welcome. */
952 av_log(c->fc, AV_LOG_WARNING, "multiple fourcc not supported\n");
953 url_fskip(pb, size - (url_ftell(pb) - start_pos));
954 continue;
955 }
956 sc->pseudo_stream_id = st->codec->codec_tag ? -1 : pseudo_stream_id;
957 sc->dref_id= dref_id;
958
959 st->codec->codec_tag = format;
960 id = ff_codec_get_id(codec_movaudio_tags, format);
961 if (id<=0 && ((format&0xFFFF) == 'm'+('s'<<8) || (format&0xFFFF) == 'T'+('S'<<8)))
962 id = ff_codec_get_id(ff_codec_wav_tags, bswap_32(format)&0xFFFF);
963
964 if (st->codec->codec_type != AVMEDIA_TYPE_VIDEO && id > 0) {
965 st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
966 } else if (st->codec->codec_type != AVMEDIA_TYPE_AUDIO && /* do not overwrite codec type */
967 format && format != MKTAG('m','p','4','s')) { /* skip old asf mpeg4 tag */
968 id = ff_codec_get_id(codec_movvideo_tags, format);
969 if (id <= 0)
970 id = ff_codec_get_id(ff_codec_bmp_tags, format);
971 if (id > 0)
972 st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
973 else if(st->codec->codec_type == AVMEDIA_TYPE_DATA){
974 id = ff_codec_get_id(ff_codec_movsubtitle_tags, format);
975 if(id > 0)
976 st->codec->codec_type = AVMEDIA_TYPE_SUBTITLE;
977 }
978 }
979
980 dprintf(c->fc, "size=%d 4CC= %c%c%c%c codec_type=%d\n", size,
981 (format >> 0) & 0xff, (format >> 8) & 0xff, (format >> 16) & 0xff,
982 (format >> 24) & 0xff, st->codec->codec_type);
983
984 if(st->codec->codec_type==AVMEDIA_TYPE_VIDEO) {
985 unsigned int color_depth, len;
986 int color_greyscale;
987
988 st->codec->codec_id = id;
989 get_be16(pb); /* version */
990 get_be16(pb); /* revision level */
991 get_be32(pb); /* vendor */
992 get_be32(pb); /* temporal quality */
993 get_be32(pb); /* spatial quality */
994
995 st->codec->width = get_be16(pb); /* width */
996 st->codec->height = get_be16(pb); /* height */
997
998 get_be32(pb); /* horiz resolution */
999 get_be32(pb); /* vert resolution */
1000 get_be32(pb); /* data size, always 0 */
1001 get_be16(pb); /* frames per samples */
1002
1003 len = get_byte(pb); /* codec name, pascal string */
1004 if (len > 31)
1005 len = 31;
1006 mov_read_mac_string(c, pb, len, st->codec->codec_name, 32);
1007 if (len < 31)
1008 url_fskip(pb, 31 - len);
1009 /* codec_tag YV12 triggers an UV swap in rawdec.c */
1010 if (!memcmp(st->codec->codec_name, "Planar Y'CbCr 8-bit 4:2:0", 25))
1011 st->codec->codec_tag=MKTAG('I', '4', '2', '0');
1012
1013 st->codec->bits_per_coded_sample = get_be16(pb); /* depth */
1014 st->codec->color_table_id = get_be16(pb); /* colortable id */
1015 dprintf(c->fc, "depth %d, ctab id %d\n",
1016 st->codec->bits_per_coded_sample, st->codec->color_table_id);
1017 /* figure out the palette situation */
1018 color_depth = st->codec->bits_per_coded_sample & 0x1F;
1019 color_greyscale = st->codec->bits_per_coded_sample & 0x20;
1020
1021 /* if the depth is 2, 4, or 8 bpp, file is palettized */
1022 if ((color_depth == 2) || (color_depth == 4) ||
1023 (color_depth == 8)) {
1024 /* for palette traversal */
1025 unsigned int color_start, color_count, color_end;
1026 unsigned char r, g, b;
1027
1028 st->codec->palctrl = av_malloc(sizeof(*st->codec->palctrl));
1029 if (color_greyscale) {
1030 int color_index, color_dec;
1031 /* compute the greyscale palette */
1032 st->codec->bits_per_coded_sample = color_depth;
1033 color_count = 1 << color_depth;
1034 color_index = 255;
1035 color_dec = 256 / (color_count - 1);
1036 for (j = 0; j < color_count; j++) {
1037 r = g = b = color_index;
1038 st->codec->palctrl->palette[j] =
1039 (r << 16) | (g << 8) | (b);
1040 color_index -= color_dec;
1041 if (color_index < 0)
1042 color_index = 0;
1043 }
1044 } else if (st->codec->color_table_id) {
1045 const uint8_t *color_table;
1046 /* if flag bit 3 is set, use the default palette */
1047 color_count = 1 << color_depth;
1048 if (color_depth == 2)
1049 color_table = ff_qt_default_palette_4;
1050 else if (color_depth == 4)
1051 color_table = ff_qt_default_palette_16;
1052 else
1053 color_table = ff_qt_default_palette_256;
1054
1055 for (j = 0; j < color_count; j++) {
1056 r = color_table[j * 3 + 0];
1057 g = color_table[j * 3 + 1];
1058 b = color_table[j * 3 + 2];
1059 st->codec->palctrl->palette[j] =
1060 (r << 16) | (g << 8) | (b);
1061 }
1062 } else {
1063 /* load the palette from the file */
1064 color_start = get_be32(pb);
1065 color_count = get_be16(pb);
1066 color_end = get_be16(pb);
1067 if ((color_start <= 255) &&
1068 (color_end <= 255)) {
1069 for (j = color_start; j <= color_end; j++) {
1070 /* each R, G, or B component is 16 bits;
1071 * only use the top 8 bits; skip alpha bytes
1072 * up front */
1073 get_byte(pb);
1074 get_byte(pb);
1075 r = get_byte(pb);
1076 get_byte(pb);
1077 g = get_byte(pb);
1078 get_byte(pb);
1079 b = get_byte(pb);
1080 get_byte(pb);
1081 st->codec->palctrl->palette[j] =
1082 (r << 16) | (g << 8) | (b);
1083 }
1084 }
1085 }
1086 st->codec->palctrl->palette_changed = 1;
1087 }
1088 } else if(st->codec->codec_type==AVMEDIA_TYPE_AUDIO) {
1089 int bits_per_sample, flags;
1090 uint16_t version = get_be16(pb);
1091
1092 st->codec->codec_id = id;
1093 get_be16(pb); /* revision level */
1094 get_be32(pb); /* vendor */
1095
1096 st->codec->channels = get_be16(pb); /* channel count */
1097 dprintf(c->fc, "audio channels %d\n", st->codec->channels);
1098 st->codec->bits_per_coded_sample = get_be16(pb); /* sample size */
1099
1100 sc->audio_cid = get_be16(pb);
1101 get_be16(pb); /* packet size = 0 */
1102
1103 st->codec->sample_rate = ((get_be32(pb) >> 16));
1104
1105 //Read QT version 1 fields. In version 0 these do not exist.
1106 dprintf(c->fc, "version =%d, isom =%d\n",version,c->isom);
1107 if(!c->isom) {
1108 if(version==1) {
1109 sc->samples_per_frame = get_be32(pb);
1110 get_be32(pb); /* bytes per packet */
1111 sc->bytes_per_frame = get_be32(pb);
1112 get_be32(pb); /* bytes per sample */
1113 } else if(version==2) {
1114 get_be32(pb); /* sizeof struct only */
1115 st->codec->sample_rate = av_int2dbl(get_be64(pb)); /* float 64 */
1116 st->codec->channels = get_be32(pb);
1117 get_be32(pb); /* always 0x7F000000 */
1118 st->codec->bits_per_coded_sample = get_be32(pb); /* bits per channel if sound is uncompressed */
1119 flags = get_be32(pb); /* lpcm format specific flag */
1120 sc->bytes_per_frame = get_be32(pb); /* bytes per audio packet if constant */
1121 sc->samples_per_frame = get_be32(pb); /* lpcm frames per audio packet if constant */
1122 if (format == MKTAG('l','p','c','m'))
1123 st->codec->codec_id = ff_mov_get_lpcm_codec_id(st->codec->bits_per_coded_sample, flags);
1124 }
1125 }
1126
1127 switch (st->codec->codec_id) {
1128 case CODEC_ID_PCM_S8:
1129 case CODEC_ID_PCM_U8:
1130 if (st->codec->bits_per_coded_sample == 16)
1131 st->codec->codec_id = CODEC_ID_PCM_S16BE;
1132 break;
1133 case CODEC_ID_PCM_S16LE:
1134 case CODEC_ID_PCM_S16BE:
1135 if (st->codec->bits_per_coded_sample == 8)
1136 st->codec->codec_id = CODEC_ID_PCM_S8;
1137 else if (st->codec->bits_per_coded_sample == 24)
1138 st->codec->codec_id =
1139 st->codec->codec_id == CODEC_ID_PCM_S16BE ?
1140 CODEC_ID_PCM_S24BE : CODEC_ID_PCM_S24LE;
1141 break;
1142 /* set values for old format before stsd version 1 appeared */
1143 case CODEC_ID_MACE3:
1144 sc->samples_per_frame = 6;
1145 sc->bytes_per_frame = 2*st->codec->channels;
1146 break;
1147 case CODEC_ID_MACE6:
1148 sc->samples_per_frame = 6;
1149 sc->bytes_per_frame = 1*st->codec->channels;
1150 break;
1151 case CODEC_ID_ADPCM_IMA_QT:
1152 sc->samples_per_frame = 64;
1153 sc->bytes_per_frame = 34*st->codec->channels;
1154 break;
1155 case CODEC_ID_GSM:
1156 sc->samples_per_frame = 160;
1157 sc->bytes_per_frame = 33;
1158 break;
1159 default:
1160 break;
1161 }
1162
1163 bits_per_sample = av_get_bits_per_sample(st->codec->codec_id);
1164 if (bits_per_sample) {
1165 st->codec->bits_per_coded_sample = bits_per_sample;
1166 sc->sample_size = (bits_per_sample >> 3) * st->codec->channels;
1167 }
1168 } else if(st->codec->codec_type==AVMEDIA_TYPE_SUBTITLE){
1169 // ttxt stsd contains display flags, justification, background
1170 // color, fonts, and default styles, so fake an atom to read it
1171 MOVAtom fake_atom = { .size = size - (url_ftell(pb) - start_pos) };
1172 if (format != AV_RL32("mp4s")) // mp4s contains a regular esds atom
1173 mov_read_glbl(c, pb, fake_atom);
1174 st->codec->codec_id= id;
1175 st->codec->width = sc->width;
1176 st->codec->height = sc->height;
1177 } else {
1178 /* other codec type, just skip (rtp, mp4s, tmcd ...) */
1179 url_fskip(pb, size - (url_ftell(pb) - start_pos));
1180 }
1181 /* this will read extra atoms at the end (wave, alac, damr, avcC, SMI ...) */
1182 a.size = size - (url_ftell(pb) - start_pos);
1183 if (a.size > 8) {
1184 if (mov_read_default(c, pb, a) < 0)
1185 return -1;
1186 } else if (a.size > 0)
1187 url_fskip(pb, a.size);
1188 }
1189
1190 if(st->codec->codec_type==AVMEDIA_TYPE_AUDIO && st->codec->sample_rate==0 && sc->time_scale>1)
1191 st->codec->sample_rate= sc->time_scale;
1192
1193 /* special codec parameters handling */
1194 switch (st->codec->codec_id) {
1195 #if CONFIG_DV_DEMUXER
1196 case CODEC_ID_DVAUDIO:
1197 c->dv_fctx = avformat_alloc_context();
1198 c->dv_demux = dv_init_demux(c->dv_fctx);
1199 if (!c->dv_demux) {
1200 av_log(c->fc, AV_LOG_ERROR, "dv demux context init error\n");
1201 return -1;
1202 }
1203 sc->dv_audio_container = 1;
1204 st->codec->codec_id = CODEC_ID_PCM_S16LE;
1205 break;
1206 #endif
1207 /* no ifdef since parameters are always those */
1208 case CODEC_ID_QCELP:
1209 // force sample rate for qcelp when not stored in mov
1210 if (st->codec->codec_tag != MKTAG('Q','c','l','p'))
1211 st->codec->sample_rate = 8000;
1212 st->codec->frame_size= 160;
1213 st->codec->channels= 1; /* really needed */
1214 break;
1215 case CODEC_ID_AMR_NB:
1216 case CODEC_ID_AMR_WB:
1217 st->codec->frame_size= sc->samples_per_frame;
1218 st->codec->channels= 1; /* really needed */
1219 /* force sample rate for amr, stsd in 3gp does not store sample rate */
1220 if (st->codec->codec_id == CODEC_ID_AMR_NB)
1221 st->codec->sample_rate = 8000;
1222 else if (st->codec->codec_id == CODEC_ID_AMR_WB)
1223 st->codec->sample_rate = 16000;
1224 break;
1225 case CODEC_ID_MP2:
1226 case CODEC_ID_MP3:
1227 st->codec->codec_type = AVMEDIA_TYPE_AUDIO; /* force type after stsd for m1a hdlr */
1228 st->need_parsing = AVSTREAM_PARSE_FULL;
1229 break;
1230 case CODEC_ID_GSM:
1231 case CODEC_ID_ADPCM_MS:
1232 case CODEC_ID_ADPCM_IMA_WAV:
1233 st->codec->block_align = sc->bytes_per_frame;
1234 break;
1235 case CODEC_ID_ALAC:
1236 if (st->codec->extradata_size == 36) {
1237 st->codec->frame_size = AV_RB32(st->codec->extradata+12);
1238 st->codec->channels = AV_RB8 (st->codec->extradata+21);
1239 }
1240 break;
1241 default:
1242 break;
1243 }
1244
1245 return 0;
1246 }
1247
1248 static int mov_read_stsc(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1249 {
1250 AVStream *st;
1251 MOVStreamContext *sc;
1252 unsigned int i, entries;
1253
1254 if (c->fc->nb_streams < 1)
1255 return 0;
1256 st = c->fc->streams[c->fc->nb_streams-1];
1257 sc = st->priv_data;
1258
1259 get_byte(pb); /* version */
1260 get_be24(pb); /* flags */
1261
1262 entries = get_be32(pb);
1263
1264 dprintf(c->fc, "track[%i].stsc.entries = %i\n", c->fc->nb_streams-1, entries);
1265
1266 if(entries >= UINT_MAX / sizeof(*sc->stsc_data))
1267 return -1;
1268 sc->stsc_data = av_malloc(entries * sizeof(*sc->stsc_data));
1269 if (!sc->stsc_data)
1270 return AVERROR(ENOMEM);
1271 sc->stsc_count = entries;
1272
1273 for(i=0; i<entries; i++) {
1274 sc->stsc_data[i].first = get_be32(pb);
1275 sc->stsc_data[i].count = get_be32(pb);
1276 sc->stsc_data[i].id = get_be32(pb);
1277 }
1278 return 0;
1279 }
1280
1281 static int mov_read_stps(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1282 {
1283 AVStream *st;
1284 MOVStreamContext *sc;
1285 unsigned i, entries;
1286
1287 if (c->fc->nb_streams < 1)
1288 return 0;
1289 st = c->fc->streams[c->fc->nb_streams-1];
1290 sc = st->priv_data;
1291
1292 get_be32(pb); // version + flags
1293
1294 entries = get_be32(pb);
1295 if (entries >= UINT_MAX / sizeof(*sc->stps_data))
1296 return -1;
1297 sc->stps_data = av_malloc(entries * sizeof(*sc->stps_data));
1298 if (!sc->stps_data)
1299 return AVERROR(ENOMEM);
1300 sc->stps_count = entries;
1301
1302 for (i = 0; i < entries; i++) {
1303 sc->stps_data[i] = get_be32(pb);
1304 //dprintf(c->fc, "stps %d\n", sc->stps_data[i]);
1305 }
1306
1307 return 0;
1308 }
1309
1310 static int mov_read_stss(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1311 {
1312 AVStream *st;
1313 MOVStreamContext *sc;
1314 unsigned int i, entries;
1315
1316 if (c->fc->nb_streams < 1)
1317 return 0;
1318 st = c->fc->streams[c->fc->nb_streams-1];
1319 sc = st->priv_data;
1320
1321 get_byte(pb); /* version */
1322 get_be24(pb); /* flags */
1323
1324 entries = get_be32(pb);
1325
1326 dprintf(c->fc, "keyframe_count = %d\n", entries);
1327
1328 if(entries >= UINT_MAX / sizeof(int))
1329 return -1;
1330 sc->keyframes = av_malloc(entries * sizeof(int));
1331 if (!sc->keyframes)
1332 return AVERROR(ENOMEM);
1333 sc->keyframe_count = entries;
1334
1335 for(i=0; i<entries; i++) {
1336 sc->keyframes[i] = get_be32(pb);
1337 //dprintf(c->fc, "keyframes[]=%d\n", sc->keyframes[i]);
1338 }
1339 return 0;
1340 }
1341
1342 static int mov_read_stsz(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1343 {
1344 AVStream *st;
1345 MOVStreamContext *sc;
1346 unsigned int i, entries, sample_size, field_size, num_bytes;
1347 GetBitContext gb;
1348 unsigned char* buf;
1349
1350 if (c->fc->nb_streams < 1)
1351 return 0;
1352 st = c->fc->streams[c->fc->nb_streams-1];
1353 sc = st->priv_data;
1354
1355 get_byte(pb); /* version */
1356 get_be24(pb); /* flags */
1357
1358 if (atom.type == MKTAG('s','t','s','z')) {
1359 sample_size = get_be32(pb);
1360 if (!sc->sample_size) /* do not overwrite value computed in stsd */
1361 sc->sample_size = sample_size;
1362 field_size = 32;
1363 } else {
1364 sample_size = 0;
1365 get_be24(pb); /* reserved */
1366 field_size = get_byte(pb);
1367 }
1368 entries = get_be32(pb);
1369
1370 dprintf(c->fc, "sample_size = %d sample_count = %d\n", sc->sample_size, entries);
1371
1372 sc->sample_count = entries;
1373 if (sample_size)
1374 return 0;
1375
1376 if (field_size != 4 && field_size != 8 && field_size != 16 && field_size != 32) {
1377 av_log(c->fc, AV_LOG_ERROR, "Invalid sample field size %d\n", field_size);
1378 return -1;
1379 }
1380
1381 if (entries >= UINT_MAX / sizeof(int) || entries >= (UINT_MAX - 4) / field_size)
1382 return -1;
1383 sc->sample_sizes = av_malloc(entries * sizeof(int));
1384 if (!sc->sample_sizes)
1385 return AVERROR(ENOMEM);
1386
1387 num_bytes = (entries*field_size+4)>>3;
1388
1389 buf = av_malloc(num_bytes+FF_INPUT_BUFFER_PADDING_SIZE);
1390 if (!buf) {
1391 av_freep(&sc->sample_sizes);
1392 return AVERROR(ENOMEM);
1393 }
1394
1395 if (get_buffer(pb, buf, num_bytes) < num_bytes) {
1396 av_freep(&sc->sample_sizes);
1397 av_free(buf);
1398 return -1;
1399 }
1400
1401 init_get_bits(&gb, buf, 8*num_bytes);
1402
1403 for(i=0; i<entries; i++)
1404 sc->sample_sizes[i] = get_bits_long(&gb, field_size);
1405
1406 av_free(buf);
1407 return 0;
1408 }
1409
1410 static int mov_read_stts(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1411 {
1412 AVStream *st;
1413 MOVStreamContext *sc;
1414 unsigned int i, entries;
1415 int64_t duration=0;
1416 int64_t total_sample_count=0;
1417
1418 if (c->fc->nb_streams < 1)
1419 return 0;
1420 st = c->fc->streams[c->fc->nb_streams-1];
1421 sc = st->priv_data;
1422
1423 get_byte(pb); /* version */
1424 get_be24(pb); /* flags */
1425 entries = get_be32(pb);
1426
1427 dprintf(c->fc, "track[%i].stts.entries = %i\n", c->fc->nb_streams-1, entries);
1428
1429 if(entries >= UINT_MAX / sizeof(*sc->stts_data))
1430 return -1;
1431 sc->stts_data = av_malloc(entries * sizeof(*sc->stts_data));
1432 if (!sc->stts_data)
1433 return AVERROR(ENOMEM);
1434 sc->stts_count = entries;
1435
1436 for(i=0; i<entries; i++) {
1437 int sample_duration;
1438 int sample_count;
1439
1440 sample_count=get_be32(pb);
1441 sample_duration = get_be32(pb);
1442 sc->stts_data[i].count= sample_count;
1443 sc->stts_data[i].duration= sample_duration;
1444
1445 dprintf(c->fc, "sample_count=%d, sample_duration=%d\n",sample_count,sample_duration);
1446
1447 duration+=(int64_t)sample_duration*sample_count;
1448 total_sample_count+=sample_count;
1449 }
1450
1451 st->nb_frames= total_sample_count;
1452 if(duration)
1453 st->duration= duration;
1454 return 0;
1455 }
1456
1457 static int mov_read_ctts(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1458 {
1459 AVStream *st;
1460 MOVStreamContext *sc;
1461 unsigned int i, entries;
1462
1463 if (c->fc->nb_streams < 1)
1464 return 0;
1465 st = c->fc->streams[c->fc->nb_streams-1];
1466 sc = st->priv_data;
1467
1468 get_byte(pb); /* version */
1469 get_be24(pb); /* flags */
1470 entries = get_be32(pb);
1471
1472 dprintf(c->fc, "track[%i].ctts.entries = %i\n", c->fc->nb_streams-1, entries);
1473
1474 if(entries >= UINT_MAX / sizeof(*sc->ctts_data))
1475 return -1;
1476 sc->ctts_data = av_malloc(entries * sizeof(*sc->ctts_data));
1477 if (!sc->ctts_data)
1478 return AVERROR(ENOMEM);
1479 sc->ctts_count = entries;
1480
1481 for(i=0; i<entries; i++) {
1482 int count =get_be32(pb);
1483 int duration =get_be32(pb);
1484
1485 sc->ctts_data[i].count = count;
1486 sc->ctts_data[i].duration= duration;
1487 if (duration < 0)
1488 sc->dts_shift = FFMAX(sc->dts_shift, -duration);
1489 }
1490
1491 dprintf(c->fc, "dts shift %d\n", sc->dts_shift);
1492
1493 return 0;
1494 }
1495
1496 static void mov_build_index(MOVContext *mov, AVStream *st)
1497 {
1498 MOVStreamContext *sc = st->priv_data;
1499 int64_t current_offset;
1500 int64_t current_dts = 0;
1501 unsigned int stts_index = 0;
1502 unsigned int stsc_index = 0;
1503 unsigned int stss_index = 0;
1504 unsigned int stps_index = 0;
1505 unsigned int i, j;
1506 uint64_t stream_size = 0;
1507
1508 /* adjust first dts according to edit list */
1509 if (sc->time_offset) {
1510 int rescaled = sc->time_offset < 0 ? av_rescale(sc->time_offset, sc->time_scale, mov->time_scale) : sc->time_offset;
1511 current_dts = -rescaled;
1512 if (sc->ctts_data && sc->ctts_data[0].duration / sc->stts_data[0].duration > 16) {
1513 /* more than 16 frames delay, dts are likely wrong
1514 this happens with files created by iMovie */
1515 sc->wrong_dts = 1;
1516 st->codec->has_b_frames = 1;
1517 }
1518 }
1519
1520 /* only use old uncompressed audio chunk demuxing when stts specifies it */
1521 if (!(st->codec->codec_type == AVMEDIA_TYPE_AUDIO &&
1522 sc->stts_count == 1 && sc->stts_data[0].duration == 1)) {
1523 unsigned int current_sample = 0;
1524 unsigned int stts_sample = 0;
1525 unsigned int sample_size;
1526 unsigned int distance = 0;
1527 int key_off = sc->keyframes && sc->keyframes[0] == 1;
1528
1529 current_dts -= sc->dts_shift;
1530
1531 if (sc->sample_count >= UINT_MAX / sizeof(*st->index_entries))
1532 return;
1533 st->index_entries = av_malloc(sc->sample_count*sizeof(*st->index_entries));
1534 if (!st->index_entries)
1535 return;
1536 st->index_entries_allocated_size = sc->sample_count*sizeof(*st->index_entries);
1537
1538 for (i = 0; i < sc->chunk_count; i++) {
1539 current_offset = sc->chunk_offsets[i];
1540 if (stsc_index + 1 < sc->stsc_count &&
1541 i + 1 == sc->stsc_data[stsc_index + 1].first)
1542 stsc_index++;
1543 for (j = 0; j < sc->stsc_data[stsc_index].count; j++) {
1544 int keyframe = 0;
1545 if (current_sample >= sc->sample_count) {
1546 av_log(mov->fc, AV_LOG_ERROR, "wrong sample count\n");
1547 return;
1548 }
1549
1550 if (!sc->keyframe_count || current_sample+key_off == sc->keyframes[stss_index]) {
1551 keyframe = 1;
1552 if (stss_index + 1 < sc->keyframe_count)
1553 stss_index++;
1554 } else if (sc->stps_count && current_sample+key_off == sc->stps_data[stps_index]) {
1555 keyframe = 1;
1556 if (stps_index + 1 < sc->stps_count)
1557 stps_index++;
1558 }
1559 if (keyframe)
1560 distance = 0;
1561 sample_size = sc->sample_size > 0 ? sc->sample_size : sc->sample_sizes[current_sample];
1562 if(sc->pseudo_stream_id == -1 ||
1563 sc->stsc_data[stsc_index].id - 1 == sc->pseudo_stream_id) {
1564 AVIndexEntry *e = &st->index_entries[st->nb_index_entries++];
1565 e->pos = current_offset;
1566 e->timestamp = current_dts;
1567 e->size = sample_size;
1568 e->min_distance = distance;
1569 e->flags = keyframe ? AVINDEX_KEYFRAME : 0;
1570 dprintf(mov->fc, "AVIndex stream %d, sample %d, offset %"PRIx64", dts %"PRId64", "
1571 "size %d, distance %d, keyframe %d\n", st->index, current_sample,
1572 current_offset, current_dts, sample_size, distance, keyframe);
1573 }
1574
1575 current_offset += sample_size;
1576 stream_size += sample_size;
1577 current_dts += sc->stts_data[stts_index].duration;
1578 distance++;
1579 stts_sample++;
1580 current_sample++;
1581 if (stts_index + 1 < sc->stts_count && stts_sample == sc->stts_data[stts_index].count) {
1582 stts_sample = 0;
1583 stts_index++;
1584 }
1585 }
1586 }
1587 if (st->duration > 0)
1588 st->codec->bit_rate = stream_size*8*sc->time_scale/st->duration;
1589 } else {
1590 unsigned chunk_samples, total = 0;
1591
1592 // compute total chunk count
1593 for (i = 0; i < sc->stsc_count; i++) {
1594 unsigned count, chunk_count;
1595
1596 chunk_samples = sc->stsc_data[i].count;
1597 if (sc->samples_per_frame && chunk_samples % sc->samples_per_frame) {
1598 av_log(mov->fc, AV_LOG_ERROR, "error unaligned chunk\n");
1599 return;
1600 }
1601
1602 if (sc->samples_per_frame >= 160) { // gsm
1603 count = chunk_samples / sc->samples_per_frame;
1604 } else if (sc->samples_per_frame > 1) {
1605 unsigned samples = (1024/sc->samples_per_frame)*sc->samples_per_frame;
1606 count = (chunk_samples+samples-1) / samples;
1607 } else {
1608 count = (chunk_samples+1023) / 1024;
1609 }
1610
1611 if (i < sc->stsc_count - 1)
1612 chunk_count = sc->stsc_data[i+1].first - sc->stsc_data[i].first;
1613 else
1614 chunk_count = sc->chunk_count - (sc->stsc_data[i].first - 1);
1615 total += chunk_count * count;
1616 }
1617
1618 dprintf(mov->fc, "chunk count %d\n", total);
1619 if (total >= UINT_MAX / sizeof(*st->index_entries))
1620 return;
1621 st->index_entries = av_malloc(total*sizeof(*st->index_entries));
1622 if (!st->index_entries)
1623 return;
1624 st->index_entries_allocated_size = total*sizeof(*st->index_entries);
1625
1626 // populate index
1627 for (i = 0; i < sc->chunk_count; i++) {
1628 current_offset = sc->chunk_offsets[i];
1629 if (stsc_index + 1 < sc->stsc_count &&
1630 i + 1 == sc->stsc_data[stsc_index + 1].first)
1631 stsc_index++;
1632 chunk_samples = sc->stsc_data[stsc_index].count;
1633
1634 while (chunk_samples > 0) {
1635 AVIndexEntry *e;
1636 unsigned size, samples;
1637
1638 if (sc->samples_per_frame >= 160) { // gsm
1639 samples = sc->samples_per_frame;
1640 size = sc->bytes_per_frame;
1641 } else {
1642 if (sc->samples_per_frame > 1) {
1643 samples = FFMIN((1024 / sc->samples_per_frame)*
1644 sc->samples_per_frame, chunk_samples);
1645 size = (samples / sc->samples_per_frame) * sc->bytes_per_frame;
1646 } else {
1647 samples = FFMIN(1024, chunk_samples);
1648 size = samples * sc->sample_size;
1649 }
1650 }
1651
1652 if (st->nb_index_entries >= total) {
1653 av_log(mov->fc, AV_LOG_ERROR, "wrong chunk count %d\n", total);
1654 return;
1655 }
1656 e = &st->index_entries[st->nb_index_entries++];
1657 e->pos = current_offset;
1658 e->timestamp = current_dts;
1659 e->size = size;
1660 e->min_distance = 0;
1661 e->flags = AVINDEX_KEYFRAME;
1662 dprintf(mov->fc, "AVIndex stream %d, chunk %d, offset %"PRIx64", dts %"PRId64", "
1663 "size %d, duration %d\n", st->index, i, current_offset, current_dts,
1664 size, samples);
1665
1666 current_offset += size;
1667 current_dts += samples;
1668 chunk_samples -= samples;
1669 }
1670 }
1671 }
1672 }
1673
1674 static int mov_open_dref(ByteIOContext **pb, char *src, MOVDref *ref)
1675 {
1676 /* try relative path, we do not try the absolute because it can leak information about our
1677 system to an attacker */
1678 if (ref->nlvl_to > 0 && ref->nlvl_from > 0) {
1679 char filename[1024];
1680 char *src_path;
1681 int i, l;
1682
1683 /* find a source dir */
1684 src_path = strrchr(src, '/');
1685 if (src_path)
1686 src_path++;
1687 else
1688 src_path = src;
1689
1690 /* find a next level down to target */
1691 for (i = 0, l = strlen(ref->path) - 1; l >= 0; l--)
1692 if (ref->path[l] == '/') {
1693 if (i == ref->nlvl_to - 1)
1694 break;
1695 else
1696 i++;
1697 }
1698
1699 /* compose filename if next level down to target was found */
1700 if (i == ref->nlvl_to - 1 && src_path - src < sizeof(filename)) {
1701 memcpy(filename, src, src_path - src);
1702 filename[src_path - src] = 0;
1703
1704 for (i = 1; i < ref->nlvl_from; i++)
1705 av_strlcat(filename, "../", 1024);
1706
1707 av_strlcat(filename, ref->path + l + 1, 1024);
1708
1709 if (!url_fopen(pb, filename, URL_RDONLY))
1710 return 0;
1711 }
1712 }
1713
1714 return AVERROR(ENOENT);
1715 };
1716
1717 static int mov_read_trak(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1718 {
1719 AVStream *st;
1720 MOVStreamContext *sc;
1721 int ret;
1722
1723 st = av_new_stream(c->fc, c->fc->nb_streams);
1724 if (!st) return AVERROR(ENOMEM);
1725 sc = av_mallocz(sizeof(MOVStreamContext));
1726 if (!sc) return AVERROR(ENOMEM);
1727
1728 st->priv_data = sc;
1729 st->codec->codec_type = AVMEDIA_TYPE_DATA;
1730 sc->ffindex = st->index;
1731
1732 if ((ret = mov_read_default(c, pb, atom)) < 0)
1733 return ret;
1734
1735 /* sanity checks */
1736 if (sc->chunk_count && (!sc->stts_count || !sc->stsc_count ||
1737 (!sc->sample_size && !sc->sample_count))) {
1738 av_log(c->fc, AV_LOG_ERROR, "stream %d, missing mandatory atoms, broken header\n",
1739 st->index);
1740 return 0;
1741 }
1742
1743 if (!sc->time_scale) {
1744 av_log(c->fc, AV_LOG_WARNING, "stream %d, timescale not set\n", st->index);
1745 sc->time_scale = c->time_scale;
1746 if (!sc->time_scale)
1747 sc->time_scale = 1;
1748 }
1749
1750 av_set_pts_info(st, 64, 1, sc->time_scale);
1751
1752 if (st->codec->codec_type == AVMEDIA_TYPE_AUDIO &&
1753 !st->codec->frame_size && sc->stts_count == 1) {
1754 st->codec->frame_size = av_rescale(sc->stts_data[0].duration,
1755 st->codec->sample_rate, sc->time_scale);
1756 dprintf(c->fc, "frame size %d\n", st->codec->frame_size);
1757 }
1758
1759 mov_build_index(c, st);
1760
1761 if (sc->dref_id-1 < sc->drefs_count && sc->drefs[sc->dref_id-1].path) {
1762 MOVDref *dref = &sc->drefs[sc->dref_id - 1];
1763 if (mov_open_dref(&sc->pb, c->fc->filename, dref) < 0)
1764 av_log(c->fc, AV_LOG_ERROR,
1765 "stream %d, error opening alias: path='%s', dir='%s', "
1766 "filename='%s', volume='%s', nlvl_from=%d, nlvl_to=%d\n",
1767 st->index, dref->path, dref->dir, dref->filename,
1768 dref->volume, dref->nlvl_from, dref->nlvl_to);
1769 } else
1770 sc->pb = c->fc->pb;
1771
1772 if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
1773 if (st->codec->width != sc->width || st->codec->height != sc->height) {
1774 AVRational r = av_d2q(((double)st->codec->height * sc->width) /
1775 ((double)st->codec->width * sc->height), INT_MAX);
1776 if (st->sample_aspect_ratio.num)
1777 st->sample_aspect_ratio = av_mul_q(st->sample_aspect_ratio, r);
1778 else
1779 st->sample_aspect_ratio = r;
1780 }
1781
1782 av_reduce(&st->avg_frame_rate.num, &st->avg_frame_rate.den,
1783 sc->time_scale*st->nb_frames, st->duration, INT_MAX);
1784 }
1785
1786 switch (st->codec->codec_id) {
1787 #if CONFIG_H261_DECODER
1788 case CODEC_ID_H261:
1789 #endif
1790 #if CONFIG_H263_DECODER
1791 case CODEC_ID_H263:
1792 #endif
1793 #if CONFIG_H264_DECODER
1794 case CODEC_ID_H264:
1795 #endif
1796 #if CONFIG_MPEG4_DECODER
1797 case CODEC_ID_MPEG4:
1798 #endif
1799 st->codec->width = 0; /* let decoder init width/height */
1800 st->codec->height= 0;
1801 break;
1802 }
1803
1804 /* Do not need those anymore. */
1805 av_freep(&sc->chunk_offsets);
1806 av_freep(&sc->stsc_data);
1807 av_freep(&sc->sample_sizes);
1808 av_freep(&sc->keyframes);
1809 av_freep(&sc->stts_data);
1810 av_freep(&sc->stps_data);
1811
1812 return 0;
1813 }
1814
1815 static int mov_read_ilst(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1816 {
1817 int ret;
1818 c->itunes_metadata = 1;
1819 ret = mov_read_default(c, pb, atom);
1820 c->itunes_metadata = 0;
1821 return ret;
1822 }
1823
1824 static int mov_read_meta(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1825 {
1826 while (atom.size > 8) {
1827 uint32_t tag = get_le32(pb);
1828 atom.size -= 4;
1829 if (tag == MKTAG('h','d','l','r')) {
1830 url_fseek(pb, -8, SEEK_CUR);
1831 atom.size += 8;
1832 return mov_read_default(c, pb, atom);
1833 }
1834 }
1835 return 0;
1836 }
1837
1838 static int mov_read_tkhd(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1839 {
1840 int i;
1841 int width;
1842 int height;
1843 int64_t disp_transform[2];
1844 int display_matrix[3][2];
1845 AVStream *st;
1846 MOVStreamContext *sc;
1847 int version;
1848
1849 if (c->fc->nb_streams < 1)
1850 return 0;
1851 st = c->fc->streams[c->fc->nb_streams-1];
1852 sc = st->priv_data;
1853
1854 version = get_byte(pb);
1855 get_be24(pb); /* flags */
1856 /*
1857 MOV_TRACK_ENABLED 0x0001
1858 MOV_TRACK_IN_MOVIE 0x0002
1859 MOV_TRACK_IN_PREVIEW 0x0004
1860 MOV_TRACK_IN_POSTER 0x0008
1861 */
1862
1863 if (version == 1) {
1864 get_be64(pb);
1865 get_be64(pb);
1866 } else {
1867 get_be32(pb); /* creation time */
1868 get_be32(pb); /* modification time */
1869 }
1870 st->id = (int)get_be32(pb); /* track id (NOT 0 !)*/
1871 get_be32(pb); /* reserved */
1872
1873 /* highlevel (considering edits) duration in movie timebase */
1874 (version == 1) ? get_be64(pb) : get_be32(pb);
1875 get_be32(pb); /* reserved */
1876 get_be32(pb); /* reserved */
1877
1878 get_be16(pb); /* layer */
1879 get_be16(pb); /* alternate group */
1880 get_be16(pb); /* volume */
1881 get_be16(pb); /* reserved */
1882
1883 //read in the display matrix (outlined in ISO 14496-12, Section 6.2.2)
1884 // they're kept in fixed point format through all calculations
1885 // ignore u,v,z b/c we don't need the scale factor to calc aspect ratio
1886 for (i = 0; i < 3; i++) {
1887 display_matrix[i][0] = get_be32(pb); // 16.16 fixed point
1888 display_matrix[i][1] = get_be32(pb); // 16.16 fixed point
1889 get_be32(pb); // 2.30 fixed point (not used)
1890 }
1891
1892 width = get_be32(pb); // 16.16 fixed point track width
1893 height = get_be32(pb); // 16.16 fixed point track height
1894 sc->width = width >> 16;
1895 sc->height = height >> 16;
1896
1897 // transform the display width/height according to the matrix
1898 // skip this if the display matrix is the default identity matrix
1899 // or if it is rotating the picture, ex iPhone 3GS
1900 // to keep the same scale, use [width height 1<<16]
1901 if (width && height &&
1902 ((display_matrix[0][0] != 65536 ||
1903 display_matrix[1][1] != 65536) &&
1904 !display_matrix[0][1] &&
1905 !display_matrix[1][0] &&
1906 !display_matrix[2][0] && !display_matrix[2][1])) {
1907 for (i = 0; i < 2; i++)
1908 disp_transform[i] =
1909 (int64_t) width * display_matrix[0][i] +
1910 (int64_t) height * display_matrix[1][i] +
1911 ((int64_t) display_matrix[2][i] << 16);
1912
1913 //sample aspect ratio is new width/height divided by old width/height
1914 st->sample_aspect_ratio = av_d2q(
1915 ((double) disp_transform[0] * height) /
1916 ((double) disp_transform[1] * width), INT_MAX);
1917 }
1918 return 0;
1919 }
1920
1921 static int mov_read_tfhd(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1922 {
1923 MOVFragment *frag = &c->fragment;
1924 MOVTrackExt *trex = NULL;
1925 int flags, track_id, i;
1926
1927 get_byte(pb); /* version */
1928 flags = get_be24(pb);
1929
1930 track_id = get_be32(pb);
1931 if (!track_id)
1932 return -1;
1933 frag->track_id = track_id;
1934 for (i = 0; i < c->trex_count; i++)
1935 if (c->trex_data[i].track_id == frag->track_id) {
1936 trex = &c->trex_data[i];
1937 break;
1938 }
1939 if (!trex) {
1940 av_log(c->fc, AV_LOG_ERROR, "could not find corresponding trex\n");
1941 return -1;
1942 }
1943
1944 if (flags & 0x01) frag->base_data_offset = get_be64(pb);
1945 else frag->base_data_offset = frag->moof_offset;
1946 if (flags & 0x02) frag->stsd_id = get_be32(pb);
1947 else frag->stsd_id = trex->stsd_id;
1948
1949 frag->duration = flags & 0x08 ? get_be32(pb) : trex->duration;
1950 frag->size = flags & 0x10 ? get_be32(pb) : trex->size;
1951 frag->flags = flags & 0x20 ? get_be32(pb) : trex->flags;
1952 dprintf(c->fc, "frag flags 0x%x\n", frag->flags);
1953 return 0;
1954 }
1955
1956 static int mov_read_trex(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1957 {
1958 MOVTrackExt *trex;
1959
1960 if ((uint64_t)c->trex_count+1 >= UINT_MAX / sizeof(*c->trex_data))
1961 return -1;
1962 trex = av_realloc(c->trex_data, (c->trex_count+1)*sizeof(*c->trex_data));
1963 if (!trex)
1964 return AVERROR(ENOMEM);
1965 c->trex_data = trex;
1966 trex = &c->trex_data[c->trex_count++];
1967 get_byte(pb); /* version */
1968 get_be24(pb); /* flags */
1969 trex->track_id = get_be32(pb);
1970 trex->stsd_id = get_be32(pb);
1971 trex->duration = get_be32(pb);
1972 trex->size = get_be32(pb);
1973 trex->flags = get_be32(pb);
1974 return 0;
1975 }
1976
1977 static int mov_read_trun(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
1978 {
1979 MOVFragment *frag = &c->fragment;
1980 AVStream *st = NULL;
1981 MOVStreamContext *sc;
1982 uint64_t offset;
1983 int64_t dts;
1984 int data_offset = 0;
1985 unsigned entries, first_sample_flags = frag->flags;
1986 int flags, distance, i;
1987
1988 for (i = 0; i < c->fc->nb_streams; i++) {
1989 if (c->fc->streams[i]->id == frag->track_id) {
1990 st = c->fc->streams[i];
1991 break;
1992 }
1993 }
1994 if (!st) {
1995 av_log(c->fc, AV_LOG_ERROR, "could not find corresponding track id %d\n", frag->track_id);
1996 return -1;
1997 }
1998 sc = st->priv_data;
1999 if (sc->pseudo_stream_id+1 != frag->stsd_id)
2000 return 0;
2001 get_byte(pb); /* version */
2002 flags = get_be24(pb);
2003 entries = get_be32(pb);
2004 dprintf(c->fc, "flags 0x%x entries %d\n", flags, entries);
2005 if (flags & 0x001) data_offset = get_be32(pb);
2006 if (flags & 0x004) first_sample_flags = get_be32(pb);
2007 if (flags & 0x800) {
2008 MOVStts *ctts_data;
2009 if ((uint64_t)entries+sc->ctts_count >= UINT_MAX/sizeof(*sc->ctts_data))
2010 return -1;
2011 ctts_data = av_realloc(sc->ctts_data,
2012 (entries+sc->ctts_count)*sizeof(*sc->ctts_data));
2013 if (!ctts_data)
2014 return AVERROR(ENOMEM);
2015 sc->ctts_data = ctts_data;
2016 }
2017 dts = st->duration;
2018 offset = frag->base_data_offset + data_offset;
2019 distance = 0;
2020 dprintf(c->fc, "first sample flags 0x%x\n", first_sample_flags);
2021 for (i = 0; i < entries; i++) {
2022 unsigned sample_size = frag->size;
2023 int sample_flags = i ? frag->flags : first_sample_flags;
2024 unsigned sample_duration = frag->duration;
2025 int keyframe;
2026
2027 if (flags & 0x100) sample_duration = get_be32(pb);
2028 if (flags & 0x200) sample_size = get_be32(pb);
2029 if (flags & 0x400) sample_flags = get_be32(pb);
2030 if (flags & 0x800) {
2031 sc->ctts_data[sc->ctts_count].count = 1;
2032 sc->ctts_data[sc->ctts_count].duration = get_be32(pb);
2033 sc->ctts_count++;
2034 }
2035 if ((keyframe = st->codec->codec_type == AVMEDIA_TYPE_AUDIO ||
2036 (flags & 0x004 && !i && !sample_flags) || sample_flags & 0x2000000))
2037 distance = 0;
2038 av_add_index_entry(st, offset, dts, sample_size, distance,
2039 keyframe ? AVINDEX_KEYFRAME : 0);
2040 dprintf(c->fc, "AVIndex stream %d, sample %d, offset %"PRIx64", dts %"PRId64", "
2041 "size %d, distance %d, keyframe %d\n", st->index, sc->sample_count+i,
2042 offset, dts, sample_size, distance, keyframe);
2043 distance++;
2044 dts += sample_duration;
2045 offset += sample_size;
2046 }
2047 frag->moof_offset = offset;
2048 st->duration = dts;
2049 return 0;
2050 }
2051
2052 /* this atom should be null (from specs), but some buggy files put the 'moov' atom inside it... */
2053 /* like the files created with Adobe Premiere 5.0, for samples see */
2054 /* http://graphics.tudelft.nl/~wouter/publications/soundtests/ */
2055 static int mov_read_wide(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
2056 {
2057 int err;
2058
2059 if (atom.size < 8)
2060 return 0; /* continue */
2061 if (get_be32(pb) != 0) { /* 0 sized mdat atom... use the 'wide' atom size */
2062 url_fskip(pb, atom.size - 4);
2063 return 0;
2064 }
2065 atom.type = get_le32(pb);
2066 atom.size -= 8;
2067 if (atom.type != MKTAG('m','d','a','t')) {
2068 url_fskip(pb, atom.size);
2069 return 0;
2070 }
2071 err = mov_read_mdat(c, pb, atom);
2072 return err;
2073 }
2074
2075 static int mov_read_cmov(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
2076 {
2077 #if CONFIG_ZLIB
2078 ByteIOContext ctx;
2079 uint8_t *cmov_data;
2080 uint8_t *moov_data; /* uncompressed data */
2081 long cmov_len, moov_len;
2082 int ret = -1;
2083
2084 get_be32(pb); /* dcom atom */
2085 if (get_le32(pb) != MKTAG('d','c','o','m'))
2086 return -1;
2087 if (get_le32(pb) != MKTAG('z','l','i','b')) {
2088 av_log(c->fc, AV_LOG_ERROR, "unknown compression for cmov atom !");
2089 return -1;
2090 }
2091 get_be32(pb); /* cmvd atom */
2092 if (get_le32(pb) != MKTAG('c','m','v','d'))
2093 return -1;
2094 moov_len = get_be32(pb); /* uncompressed size */
2095 cmov_len = atom.size - 6 * 4;
2096
2097 cmov_data = av_malloc(cmov_len);
2098 if (!cmov_data)
2099 return AVERROR(ENOMEM);
2100 moov_data = av_malloc(moov_len);
2101 if (!moov_data) {
2102 av_free(cmov_data);
2103 return AVERROR(ENOMEM);
2104 }
2105 get_buffer(pb, cmov_data, cmov_len);
2106 if(uncompress (moov_data, (uLongf *) &moov_len, (const Bytef *)cmov_data, cmov_len) != Z_OK)
2107 goto free_and_return;
2108 if(init_put_byte(&ctx, moov_data, moov_len, 0, NULL, NULL, NULL, NULL) != 0)
2109 goto free_and_return;
2110 atom.type = MKTAG('m','o','o','v');
2111 atom.size = moov_len;
2112 #ifdef DEBUG
2113 // { int fd = open("/tmp/uncompheader.mov", O_WRONLY | O_CREAT); write(fd, moov_data, moov_len); close(fd); }
2114 #endif
2115 ret = mov_read_default(c, &ctx, atom);
2116 free_and_return:
2117 av_free(moov_data);
2118 av_free(cmov_data);
2119 return ret;
2120 #else
2121 av_log(c->fc, AV_LOG_ERROR, "this file requires zlib support compiled in\n");
2122 return -1;
2123 #endif
2124 }
2125
2126 /* edit list atom */
2127 static int mov_read_elst(MOVContext *c, ByteIOContext *pb, MOVAtom atom)
2128 {
2129 MOVStreamContext *sc;
2130 int i, edit_count;
2131
2132 if (c->fc->nb_streams < 1)
2133 return 0;
2134 sc = c->fc->streams[c->fc->nb_streams-1]->priv_data;
2135
2136 get_byte(pb); /* version */
2137 get_be24(pb); /* flags */
2138 edit_count = get_be32(pb); /* entries */
2139
2140 if((uint64_t)edit_count*12+8 > atom.size)
2141 return -1;
2142
2143 for(i=0; i<edit_count; i++){
2144 int time;
2145 int duration = get_be32(pb); /* Track duration */
2146 time = get_be32(pb); /* Media time */
2147 get_be32(pb); /* Media rate */
2148 if (i == 0 && time >= -1) {
2149 sc->time_offset = time != -1 ? time : -duration;
2150 }
2151 }
2152
2153 if(edit_count > 1)
2154 av_log(c->fc, AV_LOG_WARNING, "multiple edit list entries, "
2155 "a/v desync might occur, patch welcome\n");
2156
2157 dprintf(c->fc, "track[%i].edit_count = %i\n", c->fc->nb_streams-1, edit_count);
2158 return 0;
2159 }
2160
2161 static const MOVParseTableEntry mov_default_parse_table[] = {
2162 { MKTAG('a','v','s','s'), mov_read_extradata },
2163 { MKTAG('c','o','6','4'), mov_read_stco },
2164 { MKTAG('c','t','t','s'), mov_read_ctts }, /* composition time to sample */
2165 { MKTAG('d','i','n','f'), mov_read_default },
2166 { MKTAG('d','r','e','f'), mov_read_dref },
2167 { MKTAG('e','d','t','s'), mov_read_default },
2168 { MKTAG('e','l','s','t'), mov_read_elst },
2169 { MKTAG('e','n','d','a'), mov_read_enda },
2170 { MKTAG('f','i','e','l'), mov_read_extradata },
2171 { MKTAG('f','t','y','p'), mov_read_ftyp },
2172 { MKTAG('g','l','b','l'), mov_read_glbl },
2173 { MKTAG('h','d','l','r'), mov_read_hdlr },
2174 { MKTAG('i','l','s','t'), mov_read_ilst },
2175 { MKTAG('j','p','2','h'), mov_read_extradata },
2176 { MKTAG('m','d','a','t'), mov_read_mdat },
2177 { MKTAG('m','d','h','d'), mov_read_mdhd },
2178 { MKTAG('m','d','i','a'), mov_read_default },
2179 { MKTAG('m','e','t','a'), mov_read_meta },
2180 { MKTAG('m','i','n','f'), mov_read_default },
2181 { MKTAG('m','o','o','f'), mov_read_moof },
2182 { MKTAG('m','o','o','v'), mov_read_moov },
2183 { MKTAG('m','v','e','x'), mov_read_default },
2184 { MKTAG('m','v','h','d'), mov_read_mvhd },
2185 { MKTAG('S','M','I',' '), mov_read_smi }, /* Sorenson extension ??? */
2186 { MKTAG('a','l','a','c'), mov_read_extradata }, /* alac specific atom */
2187 { MKTAG('a','v','c','C'), mov_read_glbl },
2188 { MKTAG('p','a','s','p'), mov_read_pasp },
2189 { MKTAG('s','t','b','l'), mov_read_default },
2190 { MKTAG('s','t','c','o'), mov_read_stco },
2191 { MKTAG('s','t','p','s'), mov_read_stps },
2192 { MKTAG('s','t','r','f'), mov_read_strf },
2193 { MKTAG('s','t','s','c'), mov_read_stsc },
2194 { MKTAG('s','t','s','d'), mov_read_stsd }, /* sample description */
2195 { MKTAG('s','t','s','s'), mov_read_stss }, /* sync sample */
2196 { MKTAG('s','t','s','z'), mov_read_stsz }, /* sample size */
2197 { MKTAG('s','t','t','s'), mov_read_stts },
2198 { MKTAG('s','t','z','2'), mov_read_stsz }, /* compact sample size */
2199 { MKTAG('t','k','h','d'), mov_read_tkhd }, /* track header */
2200 { MKTAG('t','f','h','d'), mov_read_tfhd }, /* track fragment header */
2201 { MKTAG('t','r','a','k'), mov_read_trak },
2202 { MKTAG('t','r','a','f'), mov_read_default },
2203 { MKTAG('t','r','e','x'), mov_read_trex },
2204 { MKTAG('t','r','u','n'), mov_read_trun },
2205 { MKTAG('u','d','t','a'), mov_read_default },
2206 { MKTAG('w','a','v','e'), mov_read_wave },
2207 { MKTAG('e','s','d','s'), mov_read_esds },
2208 { MKTAG('w','i','d','e'), mov_read_wide }, /* place holder */
2209 { MKTAG('c','m','o','v'), mov_read_cmov },
2210 { 0, NULL }
2211 };
2212
2213 static int mov_probe(AVProbeData *p)
2214 {
2215 unsigned int offset;
2216 uint32_t tag;
2217 int score = 0;
2218
2219 /* check file header */
2220 offset = 0;
2221 for(;;) {
2222 /* ignore invalid offset */
2223 if ((offset + 8) > (unsigned int)p->buf_size)
2224 return score;
2225 tag = AV_RL32(p->buf + offset + 4);
2226 switch(tag) {
2227 /* check for obvious tags */
2228 case MKTAG('j','P',' ',' '): /* jpeg 2000 signature */
2229 case MKTAG('m','o','o','v'):
2230 case MKTAG('m','d','a','t'):
2231 case MKTAG('p','n','o','t'): /* detect movs with preview pics like ew.mov and april.mov */
2232 case MKTAG('u','d','t','a'): /* Packet Video PVAuthor adds this and a lot of more junk */
2233 case MKTAG('f','t','y','p'):
2234 return AVPROBE_SCORE_MAX;
2235 /* those are more common words, so rate then a bit less */
2236 case MKTAG('e','d','i','w'): /* xdcam files have reverted first tags */
2237 case MKTAG('w','i','d','e'):
2238 case MKTAG('f','r','e','e'):
2239 case MKTAG('j','u','n','k'):
2240 case MKTAG('p','i','c','t'):
2241 return AVPROBE_SCORE_MAX - 5;
2242 case MKTAG(0x82,0x82,0x7f,0x7d):
2243 case MKTAG('s','k','i','p'):
2244 case MKTAG('u','u','i','d'):
2245 case MKTAG('p','r','f','l'):
2246 offset = AV_RB32(p->buf+offset) + offset;
2247 /* if we only find those cause probedata is too small at least rate them */
2248 score = AVPROBE_SCORE_MAX - 50;
2249 break;
2250 default:
2251 /* unrecognized tag */
2252 return score;
2253 }
2254 }
2255 return score;
2256 }
2257
2258 static int mov_read_header(AVFormatContext *s, AVFormatParameters *ap)
2259 {
2260 MOVContext *mov = s->priv_data;
2261 ByteIOContext *pb = s->pb;
2262 int err;
2263 MOVAtom atom = { 0 };
2264
2265 mov->fc = s;
2266 /* .mov and .mp4 aren't streamable anyway (only progressive download if moov is before mdat) */
2267 if(!url_is_streamed(pb))
2268 atom.size = url_fsize(pb);
2269 else
2270 atom.size = INT64_MAX;
2271
2272 /* check MOV header */
2273 if ((err = mov_read_default(mov, pb, atom)) < 0) {
2274 av_log(s, AV_LOG_ERROR, "error reading header: %d\n", err);
2275 return err;
2276 }
2277 if (!mov->found_moov) {
2278 av_log(s, AV_LOG_ERROR, "moov atom not found\n");
2279 return -1;
2280 }
2281 dprintf(mov->fc, "on_parse_exit_offset=%lld\n", url_ftell(pb));
2282
2283 return 0;
2284 }
2285
2286 static AVIndexEntry *mov_find_next_sample(AVFormatContext *s, AVStream **st)
2287 {
2288 AVIndexEntry *sample = NULL;
2289 int64_t best_dts = INT64_MAX;
2290 int i;
2291 for (i = 0; i < s->nb_streams; i++) {
2292 AVStream *avst = s->streams[i];
2293 MOVStreamContext *msc = avst->priv_data;
2294 if (msc->pb && msc->current_sample < avst->nb_index_entries) {
2295 AVIndexEntry *current_sample = &avst->index_entries[msc->current_sample];
2296 int64_t dts = av_rescale(current_sample->timestamp, AV_TIME_BASE, msc->time_scale);
2297 dprintf(s, "stream %d, sample %d, dts %"PRId64"\n", i, msc->current_sample, dts);
2298 if (!sample || (url_is_streamed(s->pb) && current_sample->pos < sample->pos) ||
2299 (!url_is_streamed(s->pb) &&
2300 ((msc->pb != s->pb && dts < best_dts) || (msc->pb == s->pb &&
2301 ((FFABS(best_dts - dts) <= AV_TIME_BASE && current_sample->pos < sample->pos) ||
2302 (FFABS(best_dts - dts) > AV_TIME_BASE && dts < best_dts)))))) {
2303 sample = current_sample;
2304 best_dts = dts;
2305 *st = avst;
2306 }
2307 }
2308 }
2309 return sample;
2310 }
2311
2312 static int mov_read_packet(AVFormatContext *s, AVPacket *pkt)
2313 {
2314 MOVContext *mov = s->priv_data;
2315 MOVStreamContext *sc;
2316 AVIndexEntry *sample;
2317 AVStream *st = NULL;
2318 int ret;
2319 retry:
2320 sample = mov_find_next_sample(s, &st);
2321 if (!sample) {
2322 mov->found_mdat = 0;
2323 if (!url_is_streamed(s->pb) ||
2324 mov_read_default(mov, s->pb, (MOVAtom){ 0, INT64_MAX }) < 0 ||
2325 url_feof(s->pb))
2326 return AVERROR_EOF;
2327 dprintf(s, "read fragments, offset 0x%llx\n", url_ftell(s->pb));
2328 goto retry;
2329 }
2330 sc = st->priv_data;
2331 /* must be done just before reading, to avoid infinite loop on sample */
2332 sc->current_sample++;
2333
2334 if (st->discard != AVDISCARD_ALL) {
2335 if (url_fseek(sc->pb, sample->pos, SEEK_SET) != sample->pos) {
2336 av_log(mov->fc, AV_LOG_ERROR, "stream %d, offset 0x%"PRIx64": partial file\n",
2337 sc->ffindex, sample->pos);
2338 return -1;
2339 }
2340 ret = av_get_packet(sc->pb, pkt, sample->size);
2341 if (ret < 0)
2342 return ret;
2343 #if CONFIG_DV_DEMUXER
2344 if (mov->dv_demux && sc->dv_audio_container) {
2345 dv_produce_packet(mov->dv_demux, pkt, pkt->data, pkt->size);
2346 av_free(pkt->data);
2347 pkt->size = 0;
2348 ret = dv_get_packet(mov->dv_demux, pkt);
2349 if (ret < 0)
2350 return ret;
2351 }
2352 #endif
2353 }
2354
2355 pkt->stream_index = sc->ffindex;
2356 pkt->dts = sample->timestamp;
2357 if (sc->ctts_data) {
2358 pkt->pts = pkt->dts + sc->dts_shift + sc->ctts_data[sc->ctts_index].duration;
2359 /* update ctts context */
2360 sc->ctts_sample++;
2361 if (sc->ctts_index < sc->ctts_count &&
2362 sc->ctts_data[sc->ctts_index].count == sc->ctts_sample) {
2363 sc->ctts_index++;
2364 sc->ctts_sample = 0;
2365 }
2366 if (sc->wrong_dts)
2367 pkt->dts = AV_NOPTS_VALUE;
2368 } else {
2369 int64_t next_dts = (sc->current_sample < st->nb_index_entries) ?
2370 st->index_entries[sc->current_sample].timestamp : st->duration;
2371 pkt->duration = next_dts - pkt->dts;
2372 pkt->pts = pkt->dts;
2373 }
2374 if (st->discard == AVDISCARD_ALL)
2375 goto retry;
2376 pkt->flags |= sample->flags & AVINDEX_KEYFRAME ? AV_PKT_FLAG_KEY : 0;
2377 pkt->pos = sample->pos;
2378 dprintf(s, "stream %d, pts %"PRId64", dts %"PRId64", pos 0x%"PRIx64", duration %d\n",
2379 pkt->stream_index, pkt->pts, pkt->dts, pkt->pos, pkt->duration);
2380 return 0;
2381 }
2382
2383 static int mov_seek_stream(AVFormatContext *s, AVStream *st, int64_t timestamp, int flags)
2384 {
2385 MOVStreamContext *sc = st->priv_data;
2386 int sample, time_sample;
2387 int i;
2388
2389 sample = av_index_search_timestamp(st, timestamp, flags);
2390 dprintf(s, "stream %d, timestamp %"PRId64", sample %d\n", st->index, timestamp, sample);
2391 if (sample < 0) /* not sure what to do */
2392 return -1;
2393 sc->current_sample = sample;
2394 dprintf(s, "stream %d, found sample %d\n", st->index, sc->current_sample);
2395 /* adjust ctts index */
2396 if (sc->ctts_data) {
2397 time_sample = 0;
2398 for (i = 0; i < sc->ctts_count; i++) {
2399 int next = time_sample + sc->ctts_data[i].count;
2400 if (next > sc->current_sample) {
2401 sc->ctts_index = i;
2402 sc->ctts_sample = sc->current_sample - time_sample;
2403 break;
2404 }
2405 time_sample = next;
2406 }
2407 }
2408 return sample;
2409 }
2410
2411 static int mov_read_seek(AVFormatContext *s, int stream_index, int64_t sample_time, int flags)
2412 {
2413 AVStream *st;
2414 int64_t seek_timestamp, timestamp;
2415 int sample;
2416 int i;
2417
2418 if (stream_index >= s->nb_streams)
2419 return -1;
2420 if (sample_time < 0)
2421 sample_time = 0;
2422
2423 st = s->streams[stream_index];
2424 sample = mov_seek_stream(s, st, sample_time, flags);
2425 if (sample < 0)
2426 return -1;
2427
2428 /* adjust seek timestamp to found sample timestamp */
2429 seek_timestamp = st->index_entries[sample].timestamp;
2430
2431 for (i = 0; i < s->nb_streams; i++) {
2432 st = s->streams[i];
2433 if (stream_index == i)
2434 continue;
2435
2436 timestamp = av_rescale_q(seek_timestamp, s->streams[stream_index]->time_base, st->time_base);
2437 mov_seek_stream(s, st, timestamp, flags);
2438 }
2439 return 0;
2440 }
2441
2442 static int mov_read_close(AVFormatContext *s)
2443 {
2444 MOVContext *mov = s->priv_data;
2445 int i, j;
2446
2447 for (i = 0; i < s->nb_streams; i++) {
2448 AVStream *st = s->streams[i];
2449 MOVStreamContext *sc = st->priv_data;
2450
2451 av_freep(&sc->ctts_data);
2452 for (j = 0; j < sc->drefs_count; j++) {
2453 av_freep(&sc->drefs[j].path);
2454 av_freep(&sc->drefs[j].dir);
2455 }
2456 av_freep(&sc->drefs);
2457 if (sc->pb && sc->pb != s->pb)
2458 url_fclose(sc->pb);
2459
2460 av_freep(&st->codec->palctrl);
2461 }
2462
2463 if (mov->dv_demux) {
2464 for(i = 0; i < mov->dv_fctx->nb_streams; i++) {
2465 av_freep(&mov->dv_fctx->streams[i]->codec);
2466 av_freep(&mov->dv_fctx->streams[i]);
2467 }
2468 av_freep(&mov->dv_fctx);
2469 av_freep(&mov->dv_demux);
2470 }
2471
2472 av_freep(&mov->trex_data);
2473
2474 return 0;
2475 }
2476
2477 AVInputFormat mov_demuxer = {
2478 "mov,mp4,m4a,3gp,3g2,mj2",
2479 NULL_IF_CONFIG_SMALL("QuickTime/MPEG-4/Motion JPEG 2000 format"),
2480 sizeof(MOVContext),
2481 mov_probe,
2482 mov_read_header,
2483 mov_read_packet,
2484 mov_read_close,
2485 mov_read_seek,
2486 };