?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Add explanatory comments to the #endif part of multiple inclusion guards.
[mplayer/greg.git] / libmpdemux / demux_mov.c
blobc10330a3f94f5903bf9d4666b970cb4411cced4d
1 // QuickTime MOV file parser by A'rpi
2 // additional work by Atmos
3 // based on TOOLS/movinfo.c by A'rpi & Al3x
4 // compressed header support from moov.c of the openquicktime lib.
5 // References: http://openquicktime.sf.net/, http://www.heroinewarrior.com/
6 // http://www.geocities.com/SiliconValley/Lakes/2160/fformats/files/mov.pdf
7 // (above url no longer works, file mirrored somewhere? ::atmos)
8 // The QuickTime File Format PDF from Apple:
9 // http://developer.apple.com/techpubs/quicktime/qtdevdocs/PDF/QTFileFormat.pdf
10 // (Complete list of documentation at http://developer.apple.com/quicktime/)
11 // MP4-Lib sources from http://mpeg4ip.sf.net/ might be useful for .mp4
12 // as well as .mov specific stuff.
13 // All sort of Stuff about MPEG4:
14 // http://www.cmlab.csie.ntu.edu.tw/~pkhsiao/thesis.html
15 // I really recommend N4270-1.doc and N4270-2.doc which are exact specs
16 // of the MP4-File Format and the MPEG4 Specific extensions. ::atmos
17 // TSGS#15(02)0088
18 // http://www.3gpp.org/ftp/tsg_sa/TSG_SA/TSGS_15/Docs/pdf/SP-020088.pdf
19 // http://www.3gpp2.org/Public_html/specs/C.S0050-0_v1.0_121503.pdf
20
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <unistd.h>
24 #include <inttypes.h>
25
26 #include "config.h"
27
28 #ifdef MACOSX
29 #include <QuickTime/QuickTime.h>
30 #include <QuickTime/ImageCompression.h>
31 #include <QuickTime/ImageCodec.h>
32 #else
33 #include "loader/qtx/qtxsdk/components.h"
34 #endif
35
36 #include "mp_msg.h"
37 #include "help_mp.h"
38
39 #include "stream/stream.h"
40 #include "demuxer.h"
41 #include "stheader.h"
42
43 #include "libmpcodecs/img_format.h"
44
45 #include "libvo/sub.h"
46
47 #include "qtpalette.h"
48 #include "parse_mp4.h" // .MP4 specific stuff
49
50 #ifdef HAVE_ZLIB
51 #include <zlib.h>
52 #endif
53
54 #ifndef _FCNTL_H
55 #include <fcntl.h>
56 #endif
57
58 #define BE_16(x) (((unsigned char *)(x))[0] << 8 | \
59 ((unsigned char *)(x))[1])
60 #define BE_32(x) (((unsigned char *)(x))[0] << 24 | \
61 ((unsigned char *)(x))[1] << 16 | \
62 ((unsigned char *)(x))[2] << 8 | \
63 ((unsigned char *)(x))[3])
64
65 #define char2short(x,y) BE_16(&(x)[(y)])
66 #define char2int(x,y) BE_32(&(x)[(y)])
67
68 typedef struct {
69 unsigned int pts; // duration
70 unsigned int size;
71 off_t pos;
72 } mov_sample_t;
73
74 typedef struct {
75 unsigned int sample; // number of the first sample in the chunk
76 unsigned int size; // number of samples in the chunk
77 int desc; // for multiple codecs mode - not used
78 off_t pos;
79 } mov_chunk_t;
80
81 typedef struct {
82 unsigned int first;
83 unsigned int spc;
84 unsigned int sdid;
85 } mov_chunkmap_t;
86
87 typedef struct {
88 unsigned int num;
89 unsigned int dur;
90 } mov_durmap_t;
91
92 typedef struct {
93 unsigned int dur;
94 unsigned int pos;
95 int speed;
96 //
97 int frames;
98 int start_sample;
99 int start_frame;
100 int pts_offset;
101 } mov_editlist_t;
102
103 #define MOV_TRAK_UNKNOWN 0
104 #define MOV_TRAK_VIDEO 1
105 #define MOV_TRAK_AUDIO 2
106 #define MOV_TRAK_FLASH 3
107 #define MOV_TRAK_GENERIC 4
108 #define MOV_TRAK_CODE 5
109
110 typedef struct {
111 int id;
112 int type;
113 off_t pos;
114 //
115 unsigned int media_handler;
116 unsigned int data_handler;
117 //
118 int timescale;
119 unsigned int length;
120 int samplesize; // 0 = variable
121 int duration; // 0 = variable
122 int width,height; // for video
123 unsigned int fourcc;
124 unsigned int nchannels;
125 unsigned int samplebytes;
126 //
127 int tkdata_len; // track data
128 unsigned char* tkdata;
129 int stdata_len; // stream data
130 unsigned char* stdata;
131 //
132 unsigned char* stream_header;
133 int stream_header_len; // if >0, this header should be sent before the 1st frame
134 //
135 int samples_size;
136 mov_sample_t* samples;
137 int chunks_size;
138 mov_chunk_t* chunks;
139 int chunkmap_size;
140 mov_chunkmap_t* chunkmap;
141 int durmap_size;
142 mov_durmap_t* durmap;
143 int keyframes_size;
144 unsigned int* keyframes;
145 int editlist_size;
146 mov_editlist_t* editlist;
147 int editlist_pos;
148 //
149 void* desc; // image/sound/etc description (pointer to ImageDescription etc)
150 } mov_track_t;
151
152 void mov_build_index(mov_track_t* trak,int timescale){
153 int i,j,s;
154 int last=trak->chunks_size;
155 unsigned int pts=0;
156
157 #if 0
158 if (trak->chunks_size <= 0)
159 {
160 mp_msg(MSGT_DEMUX, MSGL_WARN, "No chunk offset table, trying to build one!\n");
161
162 trak->chunks_size = trak->samples_size; /* XXX: FIXME ! */
163 // audit: this code will be vulnerable if it is reenabled (currently #if 0)
164 trak->chunks = realloc(trak->chunks, sizeof(mov_chunk_t)*trak->chunks_size);
165
166 for (i=0; i < trak->chunks_size; i++)
167 trak->chunks[i].pos = -1;
168 }
169 #endif
170
171 mp_msg(MSGT_DEMUX, MSGL_V, "MOV track #%d: %d chunks, %d samples\n",trak->id,trak->chunks_size,trak->samples_size);
172 mp_msg(MSGT_DEMUX, MSGL_V, "pts=%d scale=%d time=%5.3f\n",trak->length,trak->timescale,(float)trak->length/(float)trak->timescale);
173
174 // process chunkmap:
175 i=trak->chunkmap_size;
176 while(i>0){
177 --i;
178 for(j=trak->chunkmap[i].first;j<last;j++){
179 trak->chunks[j].desc=trak->chunkmap[i].sdid;
180 trak->chunks[j].size=trak->chunkmap[i].spc;
181 }
182 last=trak->chunkmap[i].first;
183 }
184
185 #if 0
186 for (i=0; i < trak->chunks_size; i++)
187 {
188 /* fixup position */
189 if (trak->chunks[i].pos == -1)
190 if (i > 0)
191 trak->chunks[i].pos = trak->chunks[i-1].pos + trak->chunks[i-1].size;
192 else
193 trak->chunks[i].pos = 0; /* FIXME: set initial pos */
194 #endif
195
196 // calc pts of chunks:
197 s=0;
198 for(j=0;j<trak->chunks_size;j++){
199 trak->chunks[j].sample=s;
200 s+=trak->chunks[j].size;
201 }
202 i = 0;
203 for (j = 0; j < trak->durmap_size; j++)
204 i += trak->durmap[j].num;
205 if (i != s) {
206 mp_msg(MSGT_DEMUX, MSGL_WARN,
207 "MOV: durmap and chunkmap sample count differ (%i vs %i)\n", i, s);
208 if (i > s) s = i;
209 }
210
211 // workaround for fixed-size video frames (dv and uncompressed)
212 if(!trak->samples_size && trak->type!=MOV_TRAK_AUDIO){
213 trak->samples_size=s;
214 trak->samples=calloc(s, sizeof(mov_sample_t));
215 for(i=0;i<s;i++)
216 trak->samples[i].size=trak->samplesize;
217 trak->samplesize=0;
218 }
219
220 if(!trak->samples_size){
221 // constant sampesize
222 if(trak->durmap_size==1 || (trak->durmap_size==2 && trak->durmap[1].num==1)){
223 trak->duration=trak->durmap[0].dur;
224 } else mp_msg(MSGT_DEMUX, MSGL_ERR, "*** constant samplesize & variable duration not yet supported! ***\nContact the author if you have such sample file!\n");
225 return;
226 }
227
228 if (trak->samples_size < s) {
229 mp_msg(MSGT_DEMUX, MSGL_WARN,
230 "MOV: durmap or chunkmap bigger than sample count (%i vs %i)\n",
231 s, trak->samples_size);
232 trak->samples_size = s;
233 trak->samples = realloc_struct(trak->samples, s, sizeof(mov_sample_t));
234 }
235
236 // calc pts:
237 s=0;
238 for(j=0;j<trak->durmap_size;j++){
239 for(i=0;i<trak->durmap[j].num;i++){
240 trak->samples[s].pts=pts;
241 ++s;
242 pts+=trak->durmap[j].dur;
243 }
244 }
245
246 // calc sample offsets
247 s=0;
248 for(j=0;j<trak->chunks_size;j++){
249 off_t pos=trak->chunks[j].pos;
250 for(i=0;i<trak->chunks[j].size;i++){
251 trak->samples[s].pos=pos;
252 mp_msg(MSGT_DEMUX, MSGL_DBG3, "Sample %5d: pts=%8d off=0x%08X size=%d\n",s,
253 trak->samples[s].pts,
254 (int)trak->samples[s].pos,
255 trak->samples[s].size);
256 pos+=trak->samples[s].size;
257 ++s;
258 }
259 }
260
261 // precalc editlist entries
262 if(trak->editlist_size>0){
263 int frame=0;
264 int e_pts=0;
265 for(i=0;i<trak->editlist_size;i++){
266 mov_editlist_t* el=&trak->editlist[i];
267 int sample=0;
268 int pts=el->pos;
269 el->start_frame=frame;
270 if(pts<0){
271 // skip!
272 el->frames=0; continue;
273 }
274 // find start sample
275 for(;sample<trak->samples_size;sample++){
276 if(pts<=trak->samples[sample].pts) break;
277 }
278 el->start_sample=sample;
279 el->pts_offset=((long long)e_pts*(long long)trak->timescale)/(long long)timescale-trak->samples[sample].pts;
280 pts+=((long long)el->dur*(long long)trak->timescale)/(long long)timescale;
281 e_pts+=el->dur;
282 // find end sample
283 for(;sample<trak->samples_size;sample++){
284 if(pts<trak->samples[sample].pts) break;
285 }
286 el->frames=sample-el->start_sample;
287 frame+=el->frames;
288 mp_msg(MSGT_DEMUX,MSGL_V,"EL#%d: pts=%d 1st_sample=%d frames=%d (%5.3fs) pts_offs=%d\n",i,
289 el->pos,el->start_sample, el->frames,
290 (float)(el->dur)/(float)timescale, el->pts_offset);
291 }
292 }
293
294 }
295
296 #define MOV_MAX_TRACKS 256
297 #define MOV_MAX_SUBLEN 1024
298
299 typedef struct {
300 off_t moov_start;
301 off_t moov_end;
302 off_t mdat_start;
303 off_t mdat_end;
304 int track_db;
305 mov_track_t* tracks[MOV_MAX_TRACKS];
306 int timescale; // movie timescale
307 int duration; // movie duration (in movie timescale units)
308 subtitle subs;
309 char subtext[MOV_MAX_SUBLEN + 1];
310 int current_sub;
311 } mov_priv_t;
312
313 #define MOV_FOURCC(a,b,c,d) ((a<<24)|(b<<16)|(c<<8)|(d))
314
315 static int mov_check_file(demuxer_t* demuxer){
316 int flags=0;
317 int no=0;
318 mov_priv_t* priv=malloc(sizeof(mov_priv_t));
319
320 mp_msg(MSGT_DEMUX,MSGL_V,"Checking for MOV\n");
321
322 memset(priv,0,sizeof(mov_priv_t));
323 priv->current_sub = -1;
324
325 while(1){
326 int i;
327 int skipped=8;
328 off_t len=stream_read_dword(demuxer->stream);
329 unsigned int id=stream_read_dword(demuxer->stream);
330 if(stream_eof(demuxer->stream)) break; // EOF
331 if (len == 1) /* real size is 64bits - cjb */
332 {
333 #ifndef _LARGEFILE_SOURCE
334 if (stream_read_dword(demuxer->stream) != 0)
335 mp_msg(MSGT_DEMUX, MSGL_WARN, "64bit file, but you've compiled MPlayer without LARGEFILE support!\n");
336 len = stream_read_dword(demuxer->stream);
337 #else
338 len = stream_read_qword(demuxer->stream);
339 #endif
340 skipped += 8;
341 }
342 #if 0
343 else if (len == 0) /* deleted chunk */
344 {
345 /* XXX: CJB! is this right? - alex */
346 goto skip_chunk;
347 }
348 #endif
349 else if(len<8) break; // invalid chunk
350
351 switch(id){
352 case MOV_FOURCC('f','t','y','p'): {
353 unsigned int tmp;
354 // File Type Box (ftyp):
355 // char[4] major_brand (eg. 'isom')
356 // int minor_version (eg. 0x00000000)
357 // char[4] compatible_brands[] (eg. 'mp41')
358 // compatible_brands list spans to the end of box
359 #if 1
360 tmp = stream_read_dword(demuxer->stream);
361 switch(tmp) {
362 case MOV_FOURCC('i','s','o','m'):
363 mp_msg(MSGT_DEMUX,MSGL_V,"ISO: File Type Major Brand: ISO Base Media\n");
364 break;
365 case MOV_FOURCC('m','p','4','1'):
366 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: ISO/IEC 14496-1 (MPEG-4 system) v1\n");
367 break;
368 case MOV_FOURCC('m','p','4','2'):
369 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: ISO/IEC 14496-1 (MPEG-4 system) v2\n");
370 break;
371 case MOV_FOURCC('M','4','A',' '):
372 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: Apple iTunes AAC-LC Audio\n");
373 break;
374 case MOV_FOURCC('M','4','P',' '):
375 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: Apple iTunes AAC-LC Protected Audio\n");
376 break;
377 case MOV_FOURCC('q','t',' ',' '):
378 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: Original QuickTime\n");
379 break;
380 case MOV_FOURCC('3','g','p','1'):
381 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: 3GPP Profile 1\n");
382 break;
383 case MOV_FOURCC('3','g','p','2'):
384 case MOV_FOURCC('3','g','2','a'):
385 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: 3GPP Profile 2\n");
386 break;
387 case MOV_FOURCC('3','g','p','3'):
388 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: 3GPP Profile 3\n");
389 break;
390 case MOV_FOURCC('3','g','p','4'):
391 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: 3GPP Profile 4\n");
392 break;
393 case MOV_FOURCC('3','g','p','5'):
394 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: 3GPP Profile 5\n");
395 break;
396 case MOV_FOURCC('m','m','p','4'):
397 mp_msg(MSGT_DEMUX,MSGL_INFO,"ISO: File Type Major Brand: Mobile ISO/IEC 14496-1 (MPEG-4 system)\n");
398 break;
399 default:
400 tmp = be2me_32(tmp);
401 mp_msg(MSGT_DEMUX,MSGL_WARN,"ISO: Unknown File Type Major Brand: %.4s\n",(char *)&tmp);
402 }
403 mp_msg(MSGT_DEMUX,MSGL_V,"ISO: File Type Minor Version: %d\n",
404 stream_read_dword(demuxer->stream));
405 skipped += 8;
406 // List all compatible brands
407 for(i = 0; i < ((len-16)/4); i++) {
408 tmp = be2me_32(stream_read_dword(demuxer->stream));
409 mp_msg(MSGT_DEMUX,MSGL_V,"ISO: File Type Compatible Brand #%d: %.4s\n",i,(char *)&tmp);
410 skipped += 4;
411 }
412 #endif
413 } break;
414 case MOV_FOURCC('m','o','o','v'):
415 // case MOV_FOURCC('c','m','o','v'):
416 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: Movie header found!\n");
417 priv->moov_start=(off_t)stream_tell(demuxer->stream);
418 priv->moov_end=(off_t)priv->moov_start+len-skipped;
419 mp_msg(MSGT_DEMUX,MSGL_DBG2,"MOV: Movie header: start: %"PRIx64" end: %"PRIx64"\n",
420 (int64_t)priv->moov_start, (int64_t)priv->moov_end);
421 skipped+=8;
422 i = stream_read_dword(demuxer->stream)-8;
423 if(stream_read_dword(demuxer->stream)==MOV_FOURCC('r','m','r','a')){
424 skipped+=i;
425 mp_msg(MSGT_DEMUX,MSGL_INFO,"MOV: Reference Media file!!!\n");
426 //set demuxer type to playlist ...
427 demuxer->type=DEMUXER_TYPE_PLAYLIST;
428 while(i>0){
429 int len=stream_read_dword(demuxer->stream)-8;
430 int fcc=stream_read_dword(demuxer->stream);
431 if(len<0) break; // EOF!?
432 i-=8;
433 // printf("i=%d len=%d\n",i,len);
434 switch(fcc){
435 case MOV_FOURCC('r','m','d','a'):
436 continue;
437 case MOV_FOURCC('r','d','r','f'): {
438 int tmp=stream_read_dword(demuxer->stream);
439 int type=stream_read_dword_le(demuxer->stream);
440 int slen=stream_read_dword(demuxer->stream);
441 //char* s=malloc(slen+1);
442 //stream_read(demuxer->stream,s,slen);
443
444 //FIXME: also store type & data_rate ?
445 ds_read_packet(demuxer->video,
446 demuxer->stream,
447 slen,
448 0,
449 stream_tell(demuxer->stream),
450 0 // no flags
451 );
452 flags|=4;
453 mp_msg(MSGT_DEMUX,MSGL_V,"Added reference to playlist\n");
454 //s[slen]=0;
455 //mp_msg(MSGT_DEMUX,MSGL_INFO,"REF: [%.4s] %s\n",&type,s);
456 len-=12+slen;i-=12+slen; break;
457 }
458 case MOV_FOURCC('r','m','d','r'): {
459 int flags=stream_read_dword(demuxer->stream);
460 int rate=stream_read_dword(demuxer->stream);
461 mp_msg(MSGT_DEMUX,MSGL_V," min. data rate: %d bits/sec\n",rate);
462 len-=8; i-=8; break;
463 }
464 case MOV_FOURCC('r','m','q','u'): {
465 int q=stream_read_dword(demuxer->stream);
466 mp_msg(MSGT_DEMUX,MSGL_V," quality index: %d\n",q);
467 len-=4; i-=4; break;
468 }
469 }
470 i-=len;stream_skip(demuxer->stream,len);
471 }
472 }
473 flags|=1;
474 break;
475 case MOV_FOURCC('w','i','d','e'):
476 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: 'WIDE' chunk found!\n");
477 if(flags&2) break;
478 case MOV_FOURCC('m','d','a','t'):
479 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: Movie DATA found!\n");
480 priv->mdat_start=stream_tell(demuxer->stream);
481 priv->mdat_end=priv->mdat_start+len-skipped;
482 mp_msg(MSGT_DEMUX,MSGL_DBG2,"MOV: Movie data: start: %"PRIx64" end: %"PRIx64"\n",
483 (int64_t)priv->mdat_start, (int64_t)priv->mdat_end);
484 flags|=2;
485 if(flags==3){
486 // if we're over the headers, then we can stop parsing here!
487 demuxer->priv=priv;
488 return DEMUXER_TYPE_MOV;
489 }
490 break;
491 case MOV_FOURCC('f','r','e','e'):
492 case MOV_FOURCC('s','k','i','p'):
493 case MOV_FOURCC('j','u','n','k'):
494 mp_msg(MSGT_DEMUX,MSGL_DBG2,"MOV: free space (len: %"PRId64")\n", (int64_t)len);
495 /* unused, if you edit a mov, you can use space provided by free atoms (redefining it) */
496 break;
497 case MOV_FOURCC('p','n','o','t'):
498 case MOV_FOURCC('P','I','C','T'):
499 /* dunno what, but we shoudl ignore it */
500 break;
501 default:
502 if(no==0){ free(priv); return 0;} // first chunk is bad!
503 id = be2me_32(id);
504 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: unknown chunk: %.4s %d\n",(char *)&id,(int)len);
505 }
506 //skip_chunk:
507 if(!stream_skip(demuxer->stream,len-skipped)) break;
508 ++no;
509 }
510
511 if(flags==3){
512 demuxer->priv=priv;
513 return DEMUXER_TYPE_MOV;
514 }
515 free(priv);
516
517 if ((flags==5) || (flags==7)) // reference & header sent
518 return DEMUXER_TYPE_PLAYLIST;
519
520 if(flags==1)
521 mp_msg(MSGT_DEMUX,MSGL_WARN,"MOV: missing data (mdat) chunk! Maybe broken file...\n");
522 else if(flags==2)
523 mp_msg(MSGT_DEMUX,MSGL_WARN,"MOV: missing header (moov/cmov) chunk! Maybe broken file...\n");
524
525 return 0;
526 }
527
528 static void demux_close_mov(demuxer_t *demuxer) {
529 mov_priv_t* priv = demuxer->priv;
530 int i;
531 if (!priv)
532 return;
533 for (i = 0; i < MOV_MAX_TRACKS; i++) {
534 mov_track_t *track = priv->tracks[i];
535 if (track) {
536 free(track->tkdata);
537 free(track->stdata);
538 free(track->stream_header);
539 free(track->samples);
540 free(track->chunks);
541 free(track->chunkmap);
542 free(track->durmap);
543 free(track->keyframes);
544 free(track->editlist);
545 free(track->desc);
546 free(track);
547 }
548 }
549 free(priv);
550 }
551
552 unsigned int store_ughvlc(unsigned char *s, unsigned int v){
553 unsigned int n = 0;
554
555 while(v >= 0xff) {
556 *s++ = 0xff;
557 v -= 0xff;
558 n++;
559 }
560 *s = v;
561 n++;
562
563 return n;
564 }
565
566 static void init_vobsub(sh_sub_t *sh, mov_track_t *trak) {
567 int i;
568 uint8_t *pal = trak->stdata;
569 sh->type = 'v';
570 if (trak->stdata_len < 106)
571 return;
572 sh->has_palette = 1;
573 pal += 42;
574 for (i = 0; i < 16; i++) {
575 sh->palette[i] = BE_32(pal);
576 pal += 4;
577 }
578 }
579
580 static int lschunks_intrak(demuxer_t* demuxer, int level, unsigned int id,
581 off_t pos, off_t len, mov_track_t* trak);
582
583 static int gen_sh_audio(sh_audio_t* sh, mov_track_t* trak, int timescale) {
584 #if 0
585 struct {
586 int16_t version; // 0 or 1 (version 1 is qt3.0+)
587 int16_t revision; // 0
588 int32_t vendor_id; // 0
589 int16_t channels; // 1 or 2 (Mono/Stereo)
590 int16_t samplesize; // 8 or 16 (8Bit/16Bit)
591 int16_t compression_id; // if version 0 then 0
592 // if version 1 and vbr then -2 else 0
593 int16_t packet_size; // 0
594 uint16_t sample_rate; // samplerate (Hz)
595 // qt3.0+ (version == 1)
596 uint32_t samples_per_packet; // 0 or num uncompressed samples in a packet
597 // if 0 below three values are also 0
598 uint32_t bytes_per_packet; // 0 or num compressed bytes for one channel
599 uint32_t bytes_per_frame; // 0 or num compressed bytes for all channels
600 // (channels * bytes_per_packet)
601 uint32_t bytes_per_sample; // 0 or size of uncompressed sample
602 // if samples_per_packet and bytes_per_packet are constant (CBR)
603 // then bytes_per_frame and bytes_per_sample must be 0 (else is VBR)
604 // ---
605 // optional additional atom-based fields
606 // ([int32_t size,int32_t type,some data ],repeat)
607 } my_stdata;
608 #endif
609 int version, adjust;
610 int is_vorbis = 0;
611 sh->format=trak->fourcc;
612
613 // crude audio delay from editlist0 hack ::atm
614 if(trak->editlist_size>=1) {
615 if(trak->editlist[0].pos == -1) {
616 sh->stream_delay = (float)trak->editlist[0].dur/(float)timescale;
617 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: Initial Audio-Delay: %.3f sec\n", sh->stream_delay);
618 }
619 }
620
621
622 switch( sh->format ) {
623 case 0x726D6173: /* samr */
624 /* amr narrowband */
625 trak->samplebytes=sh->samplesize=1;
626 trak->nchannels=sh->channels=1;
627 sh->samplerate=8000;
628 break;
629
630 case 0x62776173: /* sawb */
631 /* amr wideband */
632 trak->samplebytes=sh->samplesize=1;
633 trak->nchannels=sh->channels=1;
634 sh->samplerate=16000;
635 break;
636
637 default:
638
639 // assumptions for below table: short is 16bit, int is 32bit, intfp is 16bit
640 // XXX: 32bit fixed point numbers (intfp) are only 2 Byte!
641 // short values are usually one byte leftpadded by zero
642 // int values are usually two byte leftpadded by zero
643 // stdata[]:
644 // 8 short version
645 // 10 short revision
646 // 12 int vendor_id
647 // 16 short channels
648 // 18 short samplesize
649 // 20 short compression_id
650 // 22 short packet_size (==0)
651 // 24 intfp sample_rate
652 // (26 short) unknown (==0)
653 // ---- qt3.0+ (version>=1)
654 // 28 int samples_per_packet
655 // 32 int bytes_per_packet
656 // 36 int bytes_per_frame
657 // 40 int bytes_per_sample
658 // there may be additional atoms following at 28 (version 0)
659 // or 44 (version 1), eg. esds atom of .MP4 files
660 // esds atom:
661 // 28 int atom size (bytes of int size, int type and data)
662 // 32 char[4] atom type (fourc charater code -> esds)
663 // 36 char[] atom data (len=size-8)
664
665 // TODO: fix parsing for files using version 2.
666 version=char2short(trak->stdata,8);
667 if (version > 1)
668 mp_msg(MSGT_DEMUX, MSGL_WARN, "MOV: version %d sound atom may not parse correctly!\n", version);
669 trak->samplebytes=sh->samplesize=char2short(trak->stdata,18)/8;
670
671 /* I can't find documentation, but so far this is the case. -Corey */
672 switch (char2short(trak->stdata,16)) {
673 case 1:
674 trak->nchannels = 1; break;
675 case 2:
676 trak->nchannels = 2; break;
677 case 3:
678 trak->nchannels = 6; break;
679 default:
680 mp_msg(MSGT_DEMUX, MSGL_WARN,
681 "MOV: unable to determine audio channels, assuming 2 (got %d)\n",
682 char2short(trak->stdata,16));
683 trak->nchannels = 2;
684 }
685 sh->channels = trak->nchannels;
686
687 /*printf("MOV: timescale: %d samplerate: %d durmap: %d (%d) -> %d (%d)\n",
688 trak->timescale, char2short(trak->stdata,24), trak->durmap[0].dur,
689 trak->durmap[0].num, trak->timescale/trak->durmap[0].dur,
690 char2short(trak->stdata,24)/trak->durmap[0].dur);*/
691 sh->samplerate=char2short(trak->stdata,24);
692 if((sh->samplerate < 7000) && trak->durmap && trak->durmap[0].dur > 1) {
693 switch(char2short(trak->stdata,24)/trak->durmap[0].dur) {
694 // TODO: add more cases.
695 case 31:
696 sh->samplerate = 32000; break;
697 case 43:
698 sh->samplerate = 44100; break;
699 case 47:
700 sh->samplerate = 48000; break;
701 default:
702 mp_msg(MSGT_DEMUX, MSGL_WARN,
703 "MOV: unable to determine audio samplerate, "
704 "assuming 44.1kHz (got %d)\n",
705 char2short(trak->stdata,24)/trak->durmap[0].dur);
706 sh->samplerate = 44100;
707 }
708 }
709 }
710 mp_msg(MSGT_DEMUX, MSGL_V, "Audio bits: %d chans: %d rate: %d\n",
711 sh->samplesize*8,sh->channels,sh->samplerate);
712
713 if(trak->stdata_len >= 44 && trak->stdata[9]>=1){
714 mp_msg(MSGT_DEMUX,MSGL_V,"Audio header: samp/pack=%d bytes/pack=%d bytes/frame=%d bytes/samp=%d \n",
715 char2int(trak->stdata,28),
716 char2int(trak->stdata,32),
717 char2int(trak->stdata,36),
718 char2int(trak->stdata,40));
719 if(trak->stdata_len>=44+8){
720 int len=char2int(trak->stdata,44);
721 int fcc=char2int(trak->stdata,48);
722 // we have extra audio headers!!!
723 mp_msg(MSGT_DEMUX,MSGL_V,"Audio extra header: len=%d fcc=0x%X\n",len,fcc);
724 if((len >= 4) &&
725 (char2int(trak->stdata,52) >= 12) &&
726 (char2int(trak->stdata,52+4) == MOV_FOURCC('f','r','m','a'))) {
727 switch(char2int(trak->stdata,52+8)) {
728 case MOV_FOURCC('a','l','a','c'):
729 if (len >= 36 + char2int(trak->stdata,52)) {
730 sh->codecdata_len = char2int(trak->stdata,52+char2int(trak->stdata,52));
731 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found alac atom (%d)!\n", sh->codecdata_len);
732 sh->codecdata = malloc(sh->codecdata_len);
733 memcpy(sh->codecdata, &trak->stdata[52+char2int(trak->stdata,52)], sh->codecdata_len);
734 }
735 break;
736 case MOV_FOURCC('i','n','2','4'):
737 case MOV_FOURCC('i','n','3','2'):
738 case MOV_FOURCC('f','l','3','2'):
739 case MOV_FOURCC('f','l','6','4'):
740 if ((len >= 22) &&
741 (char2int(trak->stdata,52+16)==MOV_FOURCC('e','n','d','a')) &&
742 (char2short(trak->stdata,52+20))) {
743 sh->format=char2int(trak->stdata,52+8);
744 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found little endian PCM data, reversed fourcc:%04x\n", sh->format);
745 }
746 break;
747 default:
748 if (len > 8 && len + 44 <= trak->stdata_len) {
749 sh->codecdata_len = len-8;
750 sh->codecdata = trak->stdata+44+8;
751 }
752 }
753 } else {
754 if (len > 8 && len + 44 <= trak->stdata_len) {
755 sh->codecdata_len = len-8;
756 sh->codecdata = trak->stdata+44+8;
757 }
758 }
759 }
760 }
761
762 switch (version) {
763 case 0:
764 adjust = 0; break;
765 case 1:
766 adjust = 48; break;
767 case 2:
768 adjust = 68; break;
769 default:
770 mp_msg(MSGT_DEMUX, MSGL_WARN, "MOV: unknown sound atom version (%d); may not work!\n", version);
771 adjust = 68;
772 }
773 if (trak->stdata_len >= 36 + adjust) {
774 int atom_len = char2int(trak->stdata,28+adjust);
775 switch(char2int(trak->stdata,32+adjust)) { // atom type
776 case MOV_FOURCC('e','s','d','s'): {
777 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found MPEG4 audio Elementary Stream Descriptor atom (%d)!\n", atom_len);
778 if(atom_len > 8) {
779 esds_t esds;
780 if(!mp4_parse_esds(&trak->stdata[36+adjust], atom_len-8, &esds)) {
781 /* 0xdd is a "user private" id, not an official allocated id (see http://www.mp4ra.org/object.html),
782 so perform some extra checks to be sure that this is really vorbis audio */
783 if(esds.objectTypeId==0xdd && esds.streamType==0x15 && sh->format==0x6134706D && esds.decoderConfigLen > 8)
784 {
785 //vorbis audio
786 unsigned char *buf[3];
787 unsigned short sizes[3];
788 int offset, len, k;
789 unsigned char *ptr = esds.decoderConfig;
790
791 if(ptr[0] != 0 || ptr[1] != 30) goto quit_vorbis_block; //wrong extradata layout
792
793 offset = len = 0;
794 for(k = 0; k < 3; k++)
795 {
796 sizes[k] = (ptr[offset]<<8) | ptr[offset+1];
797 len += sizes[k];
798 offset += 2;
799 if(offset + sizes[k] > esds.decoderConfigLen)
800 {
801 mp_msg(MSGT_DEMUX, MSGL_FATAL, "MOV: ERROR!, not enough vorbis extradata to read: offset = %d, k=%d, size=%d, len: %d\n", offset, k, sizes[k], esds.decoderConfigLen);
802 goto quit_vorbis_block;
803 }
804 buf[k] = malloc(sizes[k]);
805 if(!buf[k]) goto quit_vorbis_block;
806 memcpy(buf[k], &ptr[offset], sizes[k]);
807 offset += sizes[k];
808 }
809
810 sh->codecdata_len = len + len/255 + 64;
811 sh->codecdata = malloc(sh->codecdata_len);
812 ptr = sh->codecdata;
813
814 ptr[0] = 2;
815 offset = 1;
816 offset += store_ughvlc(&ptr[offset], sizes[0]);
817 offset += store_ughvlc(&ptr[offset], sizes[1]);
818 for(k = 0; k < 3; k++)
819 {
820 memcpy(&ptr[offset], buf[k], sizes[k]);
821 offset += sizes[k];
822 }
823
824 sh->codecdata_len = offset;
825 sh->codecdata = realloc(sh->codecdata, offset);
826 mp_msg(MSGT_DEMUX,MSGL_V, "demux_mov, vorbis extradata size: %d\n", offset);
827 is_vorbis = 1;
828 quit_vorbis_block:
829 sh->format = mmioFOURCC('v', 'r', 'b', 's');
830 }
831 sh->i_bps = esds.avgBitrate/8;
832
833 // printf("######## audio format = %d ########\n",esds.objectTypeId);
834 if(esds.objectTypeId==MP4OTI_MPEG1Audio || esds.objectTypeId==MP4OTI_MPEG2AudioPart3)
835 sh->format=0x55; // .mp3
836
837 if(esds.objectTypeId==MP4OTI_13kVoice) { // 13K Voice, defined by 3GPP2
838 sh->format=mmioFOURCC('Q', 'c', 'l', 'p');
839 trak->nchannels=sh->channels=1;
840 trak->samplebytes=sh->samplesize=1;
841 }
842
843 // dump away the codec specific configuration for the AAC decoder
844 if(esds.decoderConfigLen){
845 if( (esds.decoderConfig[0]>>3) == 29 )
846 sh->format = 0x1d61346d; // request multi-channel mp3 decoder
847 if(!is_vorbis)
848 {
849 sh->codecdata_len = esds.decoderConfigLen;
850 sh->codecdata = malloc(sh->codecdata_len);
851 memcpy(sh->codecdata, esds.decoderConfig, sh->codecdata_len);
852 }
853 }
854 }
855 mp4_free_esds(&esds); // freeup esds mem
856 #if 0
857 { FILE* f=fopen("esds.dat","wb");
858 fwrite(&trak->stdata[36],atom_len-8,1,f);
859 fclose(f); }
860 #endif
861 }
862 } break;
863 case MOV_FOURCC('a','l','a','c'): {
864 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found alac atom (%d)!\n", atom_len);
865 if(atom_len > 8) {
866 // copy all the atom (not only payload) for lavc alac decoder
867 sh->codecdata_len = atom_len;
868 sh->codecdata = malloc(sh->codecdata_len);
869 memcpy(sh->codecdata, &trak->stdata[28], sh->codecdata_len);
870 }
871 } break;
872 case MOV_FOURCC('d','a','m','r'):
873 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found AMR audio atom %c%c%c%c (%d)!\n", trak->stdata[32+adjust],trak->stdata[33+adjust],trak->stdata[34+adjust],trak->stdata[35+adjust], atom_len);
874 if (atom_len>14) {
875 mp_msg(MSGT_DEMUX, MSGL_V, "mov: vendor: %c%c%c%c Version: %d\n",trak->stdata[36+adjust],trak->stdata[37+adjust],trak->stdata[38+adjust], trak->stdata[39+adjust],trak->stdata[40+adjust]);
876 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Modes set: %02x%02x\n",trak->stdata[41+adjust],trak->stdata[42+adjust]);
877 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Mode change period: %d Frames per sample: %d\n",trak->stdata[43+adjust],trak->stdata[44+adjust]);
878 }
879 break;
880 default:
881 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found unknown audio atom %c%c%c%c (%d)!\n",
882 trak->stdata[32+adjust],trak->stdata[33+adjust],trak->stdata[34+adjust],trak->stdata[35+adjust],
883 atom_len);
884 }
885 }
886 mp_msg(MSGT_DEMUX, MSGL_V, "Fourcc: %.4s\n",(char *)&trak->fourcc);
887 #if 0
888 { FILE* f=fopen("stdata.dat","wb");
889 fwrite(trak->stdata,trak->stdata_len,1,f);
890 fclose(f); }
891 { FILE* f=fopen("tkdata.dat","wb");
892 fwrite(trak->tkdata,trak->tkdata_len,1,f);
893 fclose(f); }
894 #endif
895 // Emulate WAVEFORMATEX struct:
896 sh->wf=malloc(sizeof(WAVEFORMATEX) + (is_vorbis ? sh->codecdata_len : 0));
897 memset(sh->wf,0,sizeof(WAVEFORMATEX));
898 sh->wf->nChannels=sh->channels;
899 sh->wf->wBitsPerSample=(trak->stdata[18]<<8)+trak->stdata[19];
900 // sh->wf->nSamplesPerSec=trak->timescale;
901 sh->wf->nSamplesPerSec=sh->samplerate;
902 if(trak->stdata_len >= 44 && trak->stdata[9]>=1 && char2int(trak->stdata,28)>0){
903 //Audio header: samp/pack=4096 bytes/pack=743 bytes/frame=1486 bytes/samp=2
904 sh->wf->nAvgBytesPerSec=(sh->wf->nChannels*sh->wf->nSamplesPerSec*
905 char2int(trak->stdata,32)+char2int(trak->stdata,28)/2)
906 /char2int(trak->stdata,28);
907 sh->wf->nBlockAlign=char2int(trak->stdata,36);
908 } else {
909 sh->wf->nAvgBytesPerSec=sh->wf->nChannels*sh->wf->wBitsPerSample*sh->wf->nSamplesPerSec/8;
910 // workaround for ms11 ima4
911 if (sh->format == 0x1100736d && trak->stdata_len >= 36)
912 sh->wf->nBlockAlign=char2int(trak->stdata,36);
913 }
914
915 if(is_vorbis && sh->codecdata_len)
916 {
917 memcpy(sh->wf+1, sh->codecdata, sh->codecdata_len);
918 sh->wf->cbSize = sh->codecdata_len;
919 }
920 // Selection:
921 // if(demuxer->audio->id==-1 || demuxer->audio->id==priv->track_db){
922 // // (auto)selected audio track:
923 // demuxer->audio->id=priv->track_db;
924 // demuxer->audio->sh=sh; sh->ds=demuxer->audio;
925 // }
926 return 1;
927 }
928
929 static int gen_sh_video(sh_video_t* sh, mov_track_t* trak, int timescale) {
930 int depth, i, entry;
931 int flag, start, count_flag, end, palette_count, gray;
932 int hdr_ptr = 76; // the byte just after depth
933 unsigned char *palette_map;
934
935 depth = trak->stdata[75] | (trak->stdata[74] << 8);
936 if (trak->fourcc == mmioFOURCC('r', 'a', 'w', ' ')) {
937 sh->format = IMGFMT_RGB | depth;
938 } else
939 sh->format=trak->fourcc;
940
941 // crude video delay from editlist0 hack ::atm
942 if(trak->editlist_size>=1) {
943 if(trak->editlist[0].pos == -1) {
944 sh->stream_delay = (float)trak->editlist[0].dur/(float)timescale;
945 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: Initial Video-Delay: %.3f sec\n", sh->stream_delay);
946 }
947 }
948
949
950 if (trak->stdata_len < 78) {
951 mp_msg(MSGT_DEMUXER, MSGL_WARN,
952 "MOV: Invalid (%d bytes instead of >= 78) video trak desc\n",
953 trak->stdata_len);
954 return 0;
955 }
956 // stdata[]:
957 // 8 short version
958 // 10 short revision
959 // 12 int vendor_id
960 // 16 int temporal_quality
961 // 20 int spatial_quality
962 // 24 short width
963 // 26 short height
964 // 28 int h_dpi
965 // 32 int v_dpi
966 // 36 int 0
967 // 40 short frames_per_sample
968 // 42 char[4] compressor_name
969 // 74 short depth
970 // 76 short color_table_id
971 // additional atoms may follow,
972 // eg esds atom from .MP4 files
973 // 78 int atom size
974 // 82 char[4] atom type
975 // 86 ... atom data
976
977 { ImageDescription* id=malloc(8+trak->stdata_len); // safe
978 trak->desc=id;
979 id->idSize=8+trak->stdata_len;
980 // id->cType=bswap_32(trak->fourcc);
981 id->cType=le2me_32(trak->fourcc);
982 id->version=char2short(trak->stdata,8);
983 id->revisionLevel=char2short(trak->stdata,10);
984 id->vendor=char2int(trak->stdata,12);
985 id->temporalQuality=char2int(trak->stdata,16);
986 id->spatialQuality=char2int(trak->stdata,20);
987 id->width=char2short(trak->stdata,24);
988 id->height=char2short(trak->stdata,26);
989 id->hRes=char2int(trak->stdata,28);
990 id->vRes=char2int(trak->stdata,32);
991 id->dataSize=char2int(trak->stdata,36);
992 id->frameCount=char2short(trak->stdata,40);
993 memcpy(&id->name,trak->stdata+42,32);
994 id->depth=char2short(trak->stdata,74);
995 id->clutID=char2short(trak->stdata,76);
996 if(trak->stdata_len>78) memcpy(((char*)&id->clutID)+2,trak->stdata+78,trak->stdata_len-78);
997 sh->ImageDesc=id;
998 #if 0
999 { FILE *f=fopen("ImageDescription","wb");
1000 fwrite(id,id->idSize,1,f);
1001 fclose(f);
1002 }
1003 #endif
1004 }
1005
1006 if(trak->stdata_len >= 86) { // extra atoms found
1007 int pos=78;
1008 int atom_len;
1009 while(pos+8<=trak->stdata_len &&
1010 (pos+(atom_len=char2int(trak->stdata,pos)))<=trak->stdata_len){
1011 switch(char2int(trak->stdata,pos+4)) { // switch atom type
1012 case MOV_FOURCC('g','a','m','a'):
1013 // intfp with gamma value at which movie was captured
1014 // can be used to gamma correct movie display
1015 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found unsupported Gamma-Correction movie atom (%d)!\n",
1016 atom_len);
1017 break;
1018 case MOV_FOURCC('f','i','e','l'):
1019 // 2 char-values (8bit int) that specify field handling
1020 // see the Apple's QuickTime Fileformat PDF for more info
1021 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found unsupported Field-Handling movie atom (%d)!\n",
1022 atom_len);
1023 break;
1024 case MOV_FOURCC('m','j','q','t'):
1025 // Motion-JPEG default quantization table
1026 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found unsupported MJPEG-Quantization movie atom (%d)!\n",
1027 atom_len);
1028 break;
1029 case MOV_FOURCC('m','j','h','t'):
1030 // Motion-JPEG default huffman table
1031 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found unsupported MJPEG-Huffman movie atom (%d)!\n",
1032 atom_len);
1033 break;
1034 case MOV_FOURCC('e','s','d','s'):
1035 // MPEG4 Elementary Stream Descriptor header
1036 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found MPEG4 movie Elementary Stream Descriptor atom (%d)!\n", atom_len);
1037 // add code here to save esds header of length atom_len-8
1038 // beginning at stdata[86] to some variable to pass it
1039 // on to the decoder ::atmos
1040 if(atom_len > 8) {
1041 esds_t esds;
1042 if(!mp4_parse_esds(trak->stdata+pos+8, atom_len-8, &esds)) {
1043
1044 if(esds.objectTypeId==MP4OTI_MPEG2VisualSimple || esds.objectTypeId==MP4OTI_MPEG2VisualMain ||
1045 esds.objectTypeId==MP4OTI_MPEG2VisualSNR || esds.objectTypeId==MP4OTI_MPEG2VisualSpatial ||
1046 esds.objectTypeId==MP4OTI_MPEG2VisualHigh || esds.objectTypeId==MP4OTI_MPEG2Visual422)
1047 sh->format=mmioFOURCC('m', 'p', 'g', '2');
1048 else if(esds.objectTypeId==MP4OTI_MPEG1Visual)
1049 sh->format=mmioFOURCC('m', 'p', 'g', '1');
1050
1051 // dump away the codec specific configuration for the AAC decoder
1052 trak->stream_header_len = esds.decoderConfigLen;
1053 trak->stream_header = malloc(trak->stream_header_len);
1054 memcpy(trak->stream_header, esds.decoderConfig, trak->stream_header_len);
1055 }
1056 mp4_free_esds(&esds); // freeup esds mem
1057 }
1058 break;
1059 case MOV_FOURCC('a','v','c','C'):
1060 // AVC decoder configuration record
1061 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: AVC decoder configuration record atom (%d)!\n", atom_len);
1062 if(atom_len > 8) {
1063 int i, poffs, cnt;
1064 // Parse some parts of avcC, just for fun :)
1065 // real parsing is done by avc1 decoder
1066 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC version: %d\n", *(trak->stdata+pos+8));
1067 if (*(trak->stdata+pos+8) != 1)
1068 mp_msg(MSGT_DEMUX, MSGL_ERR, "MOV: unknown avcC version (%d). Expexct problems.\n", *(trak->stdata+pos+9));
1069 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC profile: %d\n", *(trak->stdata+pos+9));
1070 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC profile compatibility: %d\n", *(trak->stdata+pos+10));
1071 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC level: %d\n", *(trak->stdata+pos+11));
1072 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC nal length size: %d\n", ((*(trak->stdata+pos+12))&0x03)+1);
1073 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC number of sequence param sets: %d\n", cnt = (*(trak->stdata+pos+13) & 0x1f));
1074 poffs = pos + 14;
1075 for (i = 0; i < cnt; i++) {
1076 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC sps %d have length %d\n", i, BE_16(trak->stdata+poffs));
1077 poffs += BE_16(trak->stdata+poffs) + 2;
1078 }
1079 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC number of picture param sets: %d\n", *(trak->stdata+poffs));
1080 poffs++;
1081 for (i = 0; i < cnt; i++) {
1082 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: avcC pps %d have length %d\n", i, BE_16(trak->stdata+poffs));
1083 poffs += BE_16(trak->stdata+poffs) + 2;
1084 }
1085 // Copy avcC for the AVC decoder
1086 // This data will be put in extradata below, where BITMAPINFOHEADER is created
1087 trak->stream_header_len = atom_len-8;
1088 trak->stream_header = malloc(trak->stream_header_len);
1089 memcpy(trak->stream_header, trak->stdata+pos+8, trak->stream_header_len);
1090 }
1091 break;
1092 case MOV_FOURCC('d','2','6','3'):
1093 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found H.263 decoder atom %c%c%c%c (%d)!\n", trak->stdata[pos+4],trak->stdata[pos+5],trak->stdata[pos+6],trak->stdata[pos+7],atom_len);
1094 if (atom_len>10)
1095 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Vendor: %c%c%c%c H.263 level: %d H.263 profile: %d \n", trak->stdata[pos+8],trak->stdata[pos+9],trak->stdata[pos+10],trak->stdata[pos+11],trak->stdata[pos+12],trak->stdata[pos+13]);
1096 break;
1097 case 0:
1098 break;
1099 default:
1100 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: Found unknown movie atom %c%c%c%c (%d)!\n",
1101 trak->stdata[pos+4],trak->stdata[pos+5],trak->stdata[pos+6],trak->stdata[pos+7],
1102 atom_len);
1103 }
1104 if(atom_len<8) break;
1105 pos+=atom_len;
1106 // printf("pos=%d max=%d\n",pos,trak->stdata_len);
1107 }
1108 }
1109 sh->fps=trak->timescale/
1110 ((trak->durmap_size>=1)?(float)trak->durmap[0].dur:1);
1111 sh->frametime=1.0f/sh->fps;
1112
1113 sh->disp_w=trak->stdata[25]|(trak->stdata[24]<<8);
1114 sh->disp_h=trak->stdata[27]|(trak->stdata[26]<<8);
1115 // if image size is zero, fallback to display size
1116 if(!sh->disp_w && !sh->disp_h) {
1117 sh->disp_w=trak->tkdata[77]|(trak->tkdata[76]<<8);
1118 sh->disp_h=trak->tkdata[81]|(trak->tkdata[80]<<8);
1119 } else if(sh->disp_w!=(trak->tkdata[77]|(trak->tkdata[76]<<8))){
1120 // codec and display width differ... use display one for aspect
1121 sh->aspect=trak->tkdata[77]|(trak->tkdata[76]<<8);
1122 sh->aspect/=trak->tkdata[81]|(trak->tkdata[80]<<8);
1123 }
1124
1125 if(depth>32+8) mp_msg(MSGT_DEMUX, MSGL_INFO,"*** depth = 0x%X\n",depth);
1126
1127 // palettized?
1128 gray = 0;
1129 if (depth > 32) { depth&=31; gray = 1; } // depth > 32 means grayscale
1130 if ((depth == 2) || (depth == 4) || (depth == 8))
1131 palette_count = (1 << depth);
1132 else
1133 palette_count = 0;
1134
1135 // emulate BITMAPINFOHEADER:
1136 if (palette_count)
1137 {
1138 sh->bih=malloc(sizeof(BITMAPINFOHEADER) + palette_count * 4);
1139 memset(sh->bih,0,sizeof(BITMAPINFOHEADER) + palette_count * 4);
1140 sh->bih->biSize=40 + palette_count * 4;
1141 // fetch the relevant fields
1142 flag = BE_16(&trak->stdata[hdr_ptr]);
1143 hdr_ptr += 2;
1144 start = BE_32(&trak->stdata[hdr_ptr]);
1145 hdr_ptr += 4;
1146 count_flag = BE_16(&trak->stdata[hdr_ptr]);
1147 hdr_ptr += 2;
1148 end = BE_16(&trak->stdata[hdr_ptr]);
1149 hdr_ptr += 2;
1150 palette_map = (unsigned char *)sh->bih + 40;
1151 mp_msg(MSGT_DEMUX, MSGL_V, "Allocated %d entries for palette\n",
1152 palette_count);
1153 mp_msg(MSGT_DEMUX, MSGL_DBG2, "QT palette: start: %x, end: %x, count flag: %d, flags: %x\n",
1154 start, end, count_flag, flag);
1155
1156 /* XXX: problems with sample (statunit6.mov) with flag&0x4 set! - alex*/
1157
1158 // load default palette
1159 if (flag & 0x08)
1160 {
1161 if (gray)
1162 {
1163 mp_msg(MSGT_DEMUX, MSGL_V, "Using default QT grayscale palette\n");
1164 if (palette_count == 16)
1165 memcpy(palette_map, qt_default_grayscale_palette_16, 16 * 4);
1166 else if (palette_count == 256) {
1167 memcpy(palette_map, qt_default_grayscale_palette_256, 256 * 4);
1168 if (trak->fourcc == mmioFOURCC('c','v','i','d')) {
1169 int i;
1170 // Hack for grayscale CVID, negative palette
1171 // If you have samples where this is not required contact me (rxt)
1172 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: greyscale cvid with default palette,"
1173 " enabling negative palette hack.\n");
1174 for (i = 0; i < 256 * 4; i++)
1175 palette_map[i] = palette_map[i] ^ 0xff;
1176 }
1177 }
1178 }
1179 else
1180 {
1181 mp_msg(MSGT_DEMUX, MSGL_V, "Using default QT colour palette\n");
1182 if (palette_count == 4)
1183 memcpy(palette_map, qt_default_palette_4, 4 * 4);
1184 else if (palette_count == 16)
1185 memcpy(palette_map, qt_default_palette_16, 16 * 4);
1186 else if (palette_count == 256)
1187 memcpy(palette_map, qt_default_palette_256, 256 * 4);
1188 }
1189 }
1190 // load palette from file
1191 else
1192 {
1193 mp_msg(MSGT_DEMUX, MSGL_V, "Loading palette from file\n");
1194 for (i = start; i <= end; i++)
1195 {
1196 entry = BE_16(&trak->stdata[hdr_ptr]);
1197 hdr_ptr += 2;
1198 // apparently, if count_flag is set, entry is same as i
1199 if (count_flag & 0x8000)
1200 entry = i;
1201 // only care about top 8 bits of 16-bit R, G, or B value
1202 if (entry <= palette_count && entry >= 0)
1203 {
1204 palette_map[entry * 4 + 2] = trak->stdata[hdr_ptr + 0];
1205 palette_map[entry * 4 + 1] = trak->stdata[hdr_ptr + 2];
1206 palette_map[entry * 4 + 0] = trak->stdata[hdr_ptr + 4];
1207 mp_dbg(MSGT_DEMUX, MSGL_DBG2, "QT palette: added entry: %d of %d (colors: R:%x G:%x B:%x)\n",
1208 entry, palette_count,
1209 palette_map[entry * 4 + 2],
1210 palette_map[entry * 4 + 1],
1211 palette_map[entry * 4 + 0]);
1212 }
1213 else
1214 mp_msg(MSGT_DEMUX, MSGL_V, "QT palette: skipped entry (out of count): %d of %d\n",
1215 entry, palette_count);
1216 hdr_ptr += 6;
1217 }
1218 }
1219 }
1220 else
1221 {
1222 if (trak->fourcc == mmioFOURCC('a','v','c','1')) {
1223 if (trak->stream_header_len > 0xffffffff - sizeof(BITMAPINFOHEADER)) {
1224 mp_msg(MSGT_DEMUXER, MSGL_ERR, "Invalid extradata size %d, skipping\n",trak->stream_header_len);
1225 trak->stream_header_len = 0;
1226 }
1227 sh->bih=malloc(sizeof(BITMAPINFOHEADER) + trak->stream_header_len);
1228 memset(sh->bih,0,sizeof(BITMAPINFOHEADER) + trak->stream_header_len);
1229 sh->bih->biSize=40 + trak->stream_header_len;
1230 memcpy(((unsigned char *)sh->bih)+40, trak->stream_header, trak->stream_header_len);
1231 free (trak->stream_header);
1232 trak->stream_header_len = 0;
1233 trak->stream_header = NULL;
1234 } else {
1235 sh->bih=malloc(sizeof(BITMAPINFOHEADER));
1236 memset(sh->bih,0,sizeof(BITMAPINFOHEADER));
1237 sh->bih->biSize=40;
1238 }
1239 }
1240 sh->bih->biWidth=sh->disp_w;
1241 sh->bih->biHeight=sh->disp_h;
1242 sh->bih->biPlanes=0;
1243 sh->bih->biBitCount=depth;
1244 sh->bih->biCompression=trak->fourcc;
1245 sh->bih->biSizeImage=sh->bih->biWidth*sh->bih->biHeight;
1246
1247 mp_msg(MSGT_DEMUX, MSGL_V, "Image size: %d x %d (%d bpp)\n",sh->disp_w,sh->disp_h,sh->bih->biBitCount);
1248 if(trak->tkdata_len>81)
1249 mp_msg(MSGT_DEMUX, MSGL_V, "Display size: %d x %d\n",
1250 trak->tkdata[77]|(trak->tkdata[76]<<8),
1251 trak->tkdata[81]|(trak->tkdata[80]<<8));
1252 mp_msg(MSGT_DEMUX, MSGL_V, "Fourcc: %.4s Codec: '%.*s'\n",(char *)&trak->fourcc,trak->stdata[42]&31,trak->stdata+43);
1253
1254 // if(demuxer->video->id==-1 || demuxer->video->id==priv->track_db){
1255 // // (auto)selected video track:
1256 // demuxer->video->id=priv->track_db;
1257 // demuxer->video->sh=sh; sh->ds=demuxer->video;
1258 // }
1259 return 1;
1260 }
1261
1262 static void lschunks(demuxer_t* demuxer,int level,off_t endpos,mov_track_t* trak){
1263 mov_priv_t* priv=demuxer->priv;
1264 // printf("lschunks (level=%d,endpos=%x)\n", level, endpos);
1265 while(1){
1266 off_t pos;
1267 off_t len;
1268 unsigned int id;
1269 //
1270 pos=stream_tell(demuxer->stream);
1271 // printf("stream_tell==%d\n",pos);
1272 if(pos>=endpos) return; // END
1273 len=stream_read_dword(demuxer->stream);
1274 // printf("len==%d\n",len);
1275 if(len<8) return; // error
1276 len-=8;
1277 id=stream_read_dword(demuxer->stream);
1278 //
1279 mp_msg(MSGT_DEMUX,MSGL_DBG2,"lschunks %.4s %d\n",(char *)&id,(int)len);
1280 //
1281 if(trak){
1282 if (lschunks_intrak(demuxer, level, id, pos, len, trak) < 0)
1283 return;
1284 } else { /* not in track */
1285 switch(id) {
1286 case MOV_FOURCC('m','v','h','d'): {
1287 int version = stream_read_char(demuxer->stream);
1288 stream_skip(demuxer->stream, (version == 1) ? 19 : 11);
1289 priv->timescale=stream_read_dword(demuxer->stream);
1290 if (version == 1)
1291 priv->duration=stream_read_qword(demuxer->stream);
1292 else
1293 priv->duration=stream_read_dword(demuxer->stream);
1294 mp_msg(MSGT_DEMUX, MSGL_V,"MOV: %*sMovie header (%d bytes): tscale=%d dur=%d\n",level,"",(int)len,
1295 (int)priv->timescale,(int)priv->duration);
1296 break;
1297 }
1298 case MOV_FOURCC('t','r','a','k'): {
1299 // if(trak) printf("MOV: Warning! trak in trak?\n");
1300 if(priv->track_db>=MOV_MAX_TRACKS){
1301 mp_msg(MSGT_DEMUX,MSGL_WARN,MSGTR_MOVtooManyTrk);
1302 return;
1303 }
1304 if(!priv->track_db) mp_msg(MSGT_DEMUX, MSGL_V, "--------------\n");
1305 trak=malloc(sizeof(mov_track_t));
1306 memset(trak,0,sizeof(mov_track_t));
1307 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: Track #%d:\n",priv->track_db);
1308 trak->id=priv->track_db;
1309 priv->tracks[priv->track_db]=trak;
1310 lschunks(demuxer,level+1,pos+len,trak);
1311 mov_build_index(trak,priv->timescale);
1312 switch(trak->type){
1313 case MOV_TRAK_AUDIO: {
1314 sh_audio_t* sh=new_sh_audio(demuxer,priv->track_db);
1315 mp_msg(MSGT_DEMUX, MSGL_INFO, MSGTR_AudioID, "mov", priv->track_db);
1316 gen_sh_audio(sh, trak, priv->timescale);
1317 break;
1318 }
1319 case MOV_TRAK_VIDEO: {
1320 sh_video_t* sh=new_sh_video(demuxer,priv->track_db);
1321 mp_msg(MSGT_DEMUX, MSGL_INFO, MSGTR_VideoID, "mov", priv->track_db);
1322 gen_sh_video(sh, trak, priv->timescale);
1323 break;
1324 }
1325 case MOV_TRAK_GENERIC:
1326 if (trak->fourcc == mmioFOURCC('m','p','4','s') ||
1327 trak->fourcc == mmioFOURCC('t','x','3','g') ||
1328 trak->fourcc == mmioFOURCC('t','e','x','t')) {
1329 sh_sub_t *sh = new_sh_sub(demuxer, priv->track_db);
1330 mp_msg(MSGT_DEMUX, MSGL_INFO, MSGTR_SubtitleID, "mov", priv->track_db);
1331 if (trak->fourcc == mmioFOURCC('m','p','4','s'))
1332 init_vobsub(sh, trak);
1333 else
1334 sh->type = 't';
1335 } else
1336 mp_msg(MSGT_DEMUX, MSGL_V, "Generic track - not completely understood! (id: %d)\n",
1337 trak->id);
1338 /* XXX: Also this contains the FLASH data */
1339
1340 #if 0
1341 {
1342 int pos = stream_tell(demuxer->stream);
1343 int i;
1344 int fd;
1345 char name[20];
1346
1347 for (i=0; i<trak->samples_size; i++)
1348 {
1349 char buf[trak->samples[i].size];
1350 stream_seek(demuxer->stream, trak->samples[i].pos);
1351 snprintf((char *)&name[0], 20, "samp%d", i);
1352 fd = open((char *)&name[0], O_CREAT|O_WRONLY);
1353 stream_read(demuxer->stream, &buf[0], trak->samples[i].size);
1354 write(fd, &buf[0], trak->samples[i].size);
1355 close(fd);
1356 }
1357 for (i=0; i<trak->chunks_size; i++)
1358 {
1359 char buf[trak->length];
1360 stream_seek(demuxer->stream, trak->chunks[i].pos);
1361 snprintf((char *)&name[0], 20, "chunk%d", i);
1362 fd = open((char *)&name[0], O_CREAT|O_WRONLY);
1363 stream_read(demuxer->stream, &buf[0], trak->length);
1364 write(fd, &buf[0], trak->length);
1365 close(fd);
1366 }
1367 if (trak->samplesize > 0)
1368 {
1369 char *buf;
1370
1371 buf = malloc(trak->samplesize);
1372 stream_seek(demuxer->stream, trak->chunks[0].pos);
1373 snprintf((char *)&name[0], 20, "trak%d", trak->id);
1374 fd = open((char *)&name[0], O_CREAT|O_WRONLY);
1375 stream_read(demuxer->stream, buf, trak->samplesize);
1376 write(fd, buf, trak->samplesize);
1377 close(fd);
1378 }
1379 stream_seek(demuxer->stream, pos);
1380 }
1381 #endif
1382 break;
1383 default:
1384 mp_msg(MSGT_DEMUX, MSGL_V, "Unknown track type found (type: %d)\n", trak->type);
1385 break;
1386 }
1387 mp_msg(MSGT_DEMUX, MSGL_V, "--------------\n");
1388 priv->track_db++;
1389 trak=NULL;
1390 break;
1391 }
1392 #ifndef HAVE_ZLIB
1393 case MOV_FOURCC('c','m','o','v'): {
1394 mp_msg(MSGT_DEMUX,MSGL_ERR,MSGTR_MOVcomprhdr);
1395 return;
1396 }
1397 #else
1398 case MOV_FOURCC('m','o','o','v'):
1399 case MOV_FOURCC('c','m','o','v'): {
1400 // mp_msg(MSGT_DEMUX,MSGL_ERR,MSGTR_MOVcomprhdr);
1401 lschunks(demuxer,level+1,pos+len,NULL);
1402 break;
1403 }
1404 case MOV_FOURCC('d','c','o','m'): {
1405 // int temp=stream_read_dword(demuxer->stream);
1406 unsigned int algo=be2me_32(stream_read_dword(demuxer->stream));
1407 mp_msg(MSGT_DEMUX, MSGL_V, "Compressed header uses %.4s algo!\n",(char *)&algo);
1408 break;
1409 }
1410 case MOV_FOURCC('c','m','v','d'): {
1411 // int temp=stream_read_dword(demuxer->stream);
1412 unsigned int moov_sz=stream_read_dword(demuxer->stream);
1413 unsigned int cmov_sz=len-4;
1414 unsigned char* cmov_buf;
1415 unsigned char* moov_buf;
1416 int zret;
1417 z_stream zstrm;
1418 stream_t* backup;
1419
1420 if (moov_sz > SIZE_MAX - 16) {
1421 mp_msg(MSGT_DEMUX, MSGL_ERR, "Invalid cmvd atom size %d\n", moov_sz);
1422 break;
1423 }
1424 cmov_buf=malloc(cmov_sz);
1425 moov_buf=malloc(moov_sz+16);
1426 mp_msg(MSGT_DEMUX, MSGL_V, "Compressed header size: %d / %d\n",cmov_sz,moov_sz);
1427
1428 stream_read(demuxer->stream,cmov_buf,cmov_sz);
1429
1430 zstrm.zalloc = (alloc_func)0;
1431 zstrm.zfree = (free_func)0;
1432 zstrm.opaque = (voidpf)0;
1433 zstrm.next_in = cmov_buf;
1434 zstrm.avail_in = cmov_sz;
1435 zstrm.next_out = moov_buf;
1436 zstrm.avail_out = moov_sz;
1437
1438 zret = inflateInit(&zstrm);
1439 if (zret != Z_OK)
1440 { mp_msg(MSGT_DEMUX, MSGL_ERR, "QT cmov: inflateInit err %d\n",zret);
1441 return;
1442 }
1443 zret = inflate(&zstrm, Z_NO_FLUSH);
1444 if ((zret != Z_OK) && (zret != Z_STREAM_END))
1445 { mp_msg(MSGT_DEMUX, MSGL_ERR, "QT cmov inflate: ERR %d\n",zret);
1446 return;
1447 }
1448 #if 0
1449 else {
1450 FILE *DecOut;
1451 DecOut = fopen("Out.bin", "w");
1452 fwrite(moov_buf, 1, moov_sz, DecOut);
1453 fclose(DecOut);
1454 }
1455 #endif
1456 if(moov_sz != zstrm.total_out)
1457 mp_msg(MSGT_DEMUX, MSGL_WARN, "Warning! moov size differs cmov: %d zlib: %ld\n",moov_sz,zstrm.total_out);
1458 zret = inflateEnd(&zstrm);
1459
1460 backup=demuxer->stream;
1461 demuxer->stream=new_memory_stream(moov_buf,moov_sz);
1462 stream_skip(demuxer->stream,8);
1463 lschunks(demuxer,level+1,moov_sz,NULL); // parse uncompr. 'moov'
1464 //free_stream(demuxer->stream);
1465 demuxer->stream=backup;
1466 free(cmov_buf);
1467 free(moov_buf);
1468 break;
1469 }
1470 #endif
1471 case MOV_FOURCC('u','d','t','a'):
1472 {
1473 unsigned int udta_id;
1474 off_t udta_len;
1475 off_t udta_size = len;
1476
1477 mp_msg(MSGT_DEMUX, MSGL_DBG2, "mov: user data record found\n");
1478 mp_msg(MSGT_DEMUX, MSGL_V, "Quicktime Clip Info:\n");
1479
1480 while((len > 8) && (udta_size > 8))
1481 {
1482 udta_len = stream_read_dword(demuxer->stream);
1483 udta_id = stream_read_dword(demuxer->stream);
1484 udta_size -= 8;
1485 mp_msg(MSGT_DEMUX, MSGL_DBG2, "udta_id: %.4s (len: %"PRId64")\n", (char *)&udta_id, (int64_t)udta_len);
1486 switch (udta_id)
1487 {
1488 case MOV_FOURCC(0xa9,'c','p','y'):
1489 case MOV_FOURCC(0xa9,'d','a','y'):
1490 case MOV_FOURCC(0xa9,'d','i','r'):
1491 /* 0xa9,'e','d','1' - '9' : edit timestamps */
1492 case MOV_FOURCC(0xa9,'f','m','t'):
1493 case MOV_FOURCC(0xa9,'i','n','f'):
1494 case MOV_FOURCC(0xa9,'p','r','d'):
1495 case MOV_FOURCC(0xa9,'p','r','f'):
1496 case MOV_FOURCC(0xa9,'r','e','q'):
1497 case MOV_FOURCC(0xa9,'s','r','c'):
1498 case MOV_FOURCC('n','a','m','e'):
1499 case MOV_FOURCC(0xa9,'n','a','m'):
1500 case MOV_FOURCC(0xa9,'A','R','T'):
1501 case MOV_FOURCC(0xa9,'c','m','t'):
1502 case MOV_FOURCC(0xa9,'a','u','t'):
1503 case MOV_FOURCC(0xa9,'s','w','r'):
1504 {
1505 off_t text_len = stream_read_word(demuxer->stream);
1506 char text[text_len+2+1];
1507 stream_read(demuxer->stream, (char *)&text, text_len+2);
1508 text[text_len+2] = 0x0;
1509 switch(udta_id)
1510 {
1511 case MOV_FOURCC(0xa9,'a','u','t'):
1512 demux_info_add(demuxer, "author", &text[2]);
1513 mp_msg(MSGT_DEMUX, MSGL_V, " Author: %s\n", &text[2]);
1514 break;
1515 case MOV_FOURCC(0xa9,'c','p','y'):
1516 demux_info_add(demuxer, "copyright", &text[2]);
1517 mp_msg(MSGT_DEMUX, MSGL_V, " Copyright: %s\n", &text[2]);
1518 break;
1519 case MOV_FOURCC(0xa9,'i','n','f'):
1520 mp_msg(MSGT_DEMUX, MSGL_V, " Info: %s\n", &text[2]);
1521 break;
1522 case MOV_FOURCC('n','a','m','e'):
1523 case MOV_FOURCC(0xa9,'n','a','m'):
1524 demux_info_add(demuxer, "name", &text[2]);
1525 mp_msg(MSGT_DEMUX, MSGL_V, " Name: %s\n", &text[2]);
1526 break;
1527 case MOV_FOURCC(0xa9,'A','R','T'):
1528 mp_msg(MSGT_DEMUX, MSGL_V, " Artist: %s\n", &text[2]);
1529 break;
1530 case MOV_FOURCC(0xa9,'d','i','r'):
1531 mp_msg(MSGT_DEMUX, MSGL_V, " Director: %s\n", &text[2]);
1532 break;
1533 case MOV_FOURCC(0xa9,'c','m','t'):
1534 demux_info_add(demuxer, "comments", &text[2]);
1535 mp_msg(MSGT_DEMUX, MSGL_V, " Comment: %s\n", &text[2]);
1536 break;
1537 case MOV_FOURCC(0xa9,'r','e','q'):
1538 mp_msg(MSGT_DEMUX, MSGL_V, " Requirements: %s\n", &text[2]);
1539 break;
1540 case MOV_FOURCC(0xa9,'s','w','r'):
1541 demux_info_add(demuxer, "encoder", &text[2]);
1542 mp_msg(MSGT_DEMUX, MSGL_V, " Software: %s\n", &text[2]);
1543 break;
1544 case MOV_FOURCC(0xa9,'d','a','y'):
1545 mp_msg(MSGT_DEMUX, MSGL_V, " Creation timestamp: %s\n", &text[2]);
1546 break;
1547 case MOV_FOURCC(0xa9,'f','m','t'):
1548 mp_msg(MSGT_DEMUX, MSGL_V, " Format: %s\n", &text[2]);
1549 break;
1550 case MOV_FOURCC(0xa9,'p','r','d'):
1551 mp_msg(MSGT_DEMUX, MSGL_V, " Producer: %s\n", &text[2]);
1552 break;
1553 case MOV_FOURCC(0xa9,'p','r','f'):
1554 mp_msg(MSGT_DEMUX, MSGL_V, " Performer(s): %s\n", &text[2]);
1555 break;
1556 case MOV_FOURCC(0xa9,'s','r','c'):
1557 mp_msg(MSGT_DEMUX, MSGL_V, " Source providers: %s\n", &text[2]);
1558 break;
1559 }
1560 udta_size -= 4+text_len;
1561 break;
1562 }
1563 /* some other shits: WLOC - window location,
1564 LOOP - looping style,
1565 SelO - play only selected frames
1566 AllF - play all frames
1567 */
1568 case MOV_FOURCC('W','L','O','C'):
1569 case MOV_FOURCC('L','O','O','P'):
1570 case MOV_FOURCC('S','e','l','O'):
1571 case MOV_FOURCC('A','l','l','F'):
1572 default:
1573 {
1574 if( udta_len>udta_size)
1575 udta_len=udta_size;
1576 {
1577 char dump[udta_len-4];
1578 stream_read(demuxer->stream, (char *)&dump, udta_len-4-4);
1579 udta_size -= udta_len;
1580 }
1581 }
1582 }
1583 }
1584 break;
1585 } /* eof udta */
1586 default:
1587 id = be2me_32(id);
1588 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: unknown chunk: %.4s %d\n",(char *)&id,(int)len);
1589 } /* endof switch */
1590 } /* endof else */
1591
1592 pos+=len+8;
1593 if(pos>=endpos) break;
1594 if(!stream_seek(demuxer->stream,pos)) break;
1595 }
1596 }
1597
1598 static int lschunks_intrak(demuxer_t* demuxer, int level, unsigned int id,
1599 off_t pos, off_t len, mov_track_t* trak)
1600 {
1601 switch(id) {
1602 case MOV_FOURCC('m','d','a','t'): {
1603 mp_msg(MSGT_DEMUX,MSGL_WARN,"Hmm, strange MOV, parsing mdat in lschunks?\n");
1604 return -1;
1605 }
1606 case MOV_FOURCC('f','r','e','e'):
1607 case MOV_FOURCC('u','d','t','a'):
1608 /* here not supported :p */
1609 break;
1610 case MOV_FOURCC('t','k','h','d'): {
1611 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: %*sTrack header!\n", level, "");
1612 // read codec data
1613 trak->tkdata_len = len;
1614 trak->tkdata = malloc(trak->tkdata_len);
1615 stream_read(demuxer->stream, trak->tkdata, trak->tkdata_len);
1616 /*
1617 0 1 Version
1618 1 3 Flags
1619 4 4 Creation time
1620 8 4 Modification time
1621 12 4 Track ID
1622 16 4 Reserved
1623 20 4 Duration
1624 24 8 Reserved
1625 32 2 Layer
1626 34 2 Alternate group
1627 36 2 Volume
1628 38 2 Reserved
1629 40 36 Matrix structure
1630 76 4 Track width
1631 80 4 Track height
1632 */
1633 mp_msg(MSGT_DEMUX, MSGL_V,
1634 "tkhd len=%d ver=%d flags=0x%X id=%d dur=%d lay=%d vol=%d\n",
1635 trak->tkdata_len, trak->tkdata[0], trak->tkdata[1],
1636 char2int(trak->tkdata, 12), // id
1637 char2int(trak->tkdata, 20), // duration
1638 char2short(trak->tkdata, 32), // layer
1639 char2short(trak->tkdata, 36)); // volume
1640 break;
1641 }
1642 case MOV_FOURCC('m','d','h','d'): {
1643 int version = stream_read_char(demuxer->stream);
1644 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sMedia header!\n", level, "");
1645 stream_skip(demuxer->stream, (version == 1) ? 19 : 11);
1646 // read timescale
1647 trak->timescale = stream_read_dword(demuxer->stream);
1648 // read length
1649 if (version == 1)
1650 trak->length = stream_read_qword(demuxer->stream);
1651 else
1652 trak->length = stream_read_dword(demuxer->stream);
1653 break;
1654 }
1655 case MOV_FOURCC('h','d','l','r'): {
1656 unsigned int tmp = stream_read_dword(demuxer->stream);
1657 unsigned int type = stream_read_dword_le(demuxer->stream);
1658 unsigned int subtype = stream_read_dword_le(demuxer->stream);
1659 unsigned int manufact = stream_read_dword_le(demuxer->stream);
1660 unsigned int comp_flags = stream_read_dword(demuxer->stream);
1661 unsigned int comp_mask = stream_read_dword(demuxer->stream);
1662 int len = stream_read_char(demuxer->stream);
1663 char* str = malloc(len + 1);
1664 stream_read(demuxer->stream, str, len);
1665 str[len] = 0;
1666 mp_msg(MSGT_DEMUX, MSGL_V,
1667 "MOV: %*sHandler header: %.4s/%.4s (%.4s) %s\n", level, "",
1668 (char *)&type, (char *)&subtype, (char *)&manufact, str);
1669 free(str);
1670 switch(bswap_32(type)) {
1671 case MOV_FOURCC('m','h','l','r'):
1672 trak->media_handler = bswap_32(subtype);
1673 break;
1674 case MOV_FOURCC('d','h','l','r'):
1675 trak->data_handler = bswap_32(subtype);
1676 break;
1677 default:
1678 mp_msg(MSGT_DEMUX, MSGL_V,
1679 "MOV: unknown handler class: 0x%X (%.4s)\n",
1680 bswap_32(type), (char *)&type);
1681 }
1682 break;
1683 }
1684 case MOV_FOURCC('v','m','h','d'): {
1685 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sVideo header!\n", level, "");
1686 trak->type = MOV_TRAK_VIDEO;
1687 // read video data
1688 break;
1689 }
1690 case MOV_FOURCC('s','m','h','d'): {
1691 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sSound header!\n", level, "");
1692 trak->type = MOV_TRAK_AUDIO;
1693 // read audio data
1694 break;
1695 }
1696 case MOV_FOURCC('g','m','h','d'): {
1697 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sGeneric header!\n", level, "");
1698 trak->type = MOV_TRAK_GENERIC;
1699 break;
1700 }
1701 case MOV_FOURCC('n','m','h','d'): {
1702 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sGeneric header!\n", level, "");
1703 trak->type = MOV_TRAK_GENERIC;
1704 break;
1705 }
1706 case MOV_FOURCC('s','t','s','d'): {
1707 int i = stream_read_dword(demuxer->stream); // temp!
1708 int count = stream_read_dword(demuxer->stream);
1709 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sDescription list! (cnt:%d)\n",
1710 level, "", count);
1711 for (i = 0; i < count; i++) {
1712 off_t pos = stream_tell(demuxer->stream);
1713 off_t len = stream_read_dword(demuxer->stream);
1714 unsigned int fourcc = stream_read_dword_le(demuxer->stream);
1715 /* some files created with Broadcast 2000 (e.g. ilacetest.mov)
1716 contain raw I420 video but have a yv12 fourcc */
1717 if (fourcc == mmioFOURCC('y','v','1','2'))
1718 fourcc = mmioFOURCC('I','4','2','0');
1719 if (len < 8)
1720 break; // error
1721 mp_msg(MSGT_DEMUX, MSGL_V,
1722 "MOV: %*s desc #%d: %.4s (%"PRId64" bytes)\n", level, "",
1723 i, (char *)&fourcc, (int64_t)len - 16);
1724 if (fourcc != trak->fourcc && i)
1725 mp_msg(MSGT_DEMUX, MSGL_WARN, MSGTR_MOVvariableFourCC);
1726 // if(!i)
1727 {
1728 trak->fourcc = fourcc;
1729 // read type specific (audio/video/time/text etc) header
1730 // NOTE: trak type is not yet known at this point :(((
1731 trak->stdata_len = len - 8;
1732 trak->stdata = malloc(trak->stdata_len);
1733 stream_read(demuxer->stream, trak->stdata, trak->stdata_len);
1734 }
1735 if (!stream_seek(demuxer->stream, pos + len))
1736 break;
1737 }
1738 break;
1739 }
1740 case MOV_FOURCC('s','t','t','s'): {
1741 int temp = stream_read_dword(demuxer->stream);
1742 int len = stream_read_dword(demuxer->stream);
1743 int i;
1744 unsigned int pts = 0;
1745 mp_msg(MSGT_DEMUX, MSGL_V,
1746 "MOV: %*sSample duration table! (%d blocks)\n", level, "",
1747 len);
1748 trak->durmap = calloc(len, sizeof(mov_durmap_t));
1749 trak->durmap_size = len;
1750 for (i = 0; i < len; i++) {
1751 trak->durmap[i].num = stream_read_dword(demuxer->stream);
1752 trak->durmap[i].dur = stream_read_dword(demuxer->stream);
1753 pts += trak->durmap[i].num * trak->durmap[i].dur;
1754 }
1755 if (trak->length != pts)
1756 mp_msg(MSGT_DEMUX, MSGL_WARN, "Warning! pts=%d length=%d\n",
1757 pts, trak->length);
1758 break;
1759 }
1760 case MOV_FOURCC('s','t','s','c'): {
1761 int temp = stream_read_dword(demuxer->stream);
1762 int len = stream_read_dword(demuxer->stream);
1763 int ver = (temp << 24);
1764 int flags = (temp << 16) | (temp << 8) | temp;
1765 int i;
1766 mp_msg(MSGT_DEMUX, MSGL_V,
1767 "MOV: %*sSample->Chunk mapping table! (%d blocks) (ver:%d,flags:%d)\n", level, "",
1768 len, ver, flags);
1769 // read data:
1770 trak->chunkmap_size = len;
1771 trak->chunkmap = calloc(len, sizeof(mov_chunkmap_t));
1772 for (i = 0; i < len; i++) {
1773 trak->chunkmap[i].first = stream_read_dword(demuxer->stream) - 1;
1774 trak->chunkmap[i].spc = stream_read_dword(demuxer->stream);
1775 trak->chunkmap[i].sdid = stream_read_dword(demuxer->stream);
1776 }
1777 break;
1778 }
1779 case MOV_FOURCC('s','t','s','z'): {
1780 int temp = stream_read_dword(demuxer->stream);
1781 int ss=stream_read_dword(demuxer->stream);
1782 int ver = (temp << 24);
1783 int flags = (temp << 16) | (temp << 8) | temp;
1784 int entries = stream_read_dword(demuxer->stream);
1785 int i;
1786 mp_msg(MSGT_DEMUX, MSGL_V,
1787 "MOV: %*sSample size table! (entries=%d ss=%d) (ver:%d,flags:%d)\n", level, "",
1788 entries, ss, ver, flags);
1789 trak->samplesize = ss;
1790 if (!ss) {
1791 // variable samplesize
1792 trak->samples = realloc_struct(trak->samples, entries, sizeof(mov_sample_t));
1793 trak->samples_size = entries;
1794 for (i = 0; i < entries; i++)
1795 trak->samples[i].size = stream_read_dword(demuxer->stream);
1796 }
1797 break;
1798 }
1799 case MOV_FOURCC('s','t','c','o'): {
1800 int temp = stream_read_dword(demuxer->stream);
1801 int len = stream_read_dword(demuxer->stream);
1802 int i;
1803 mp_msg(MSGT_DEMUX, MSGL_V,
1804 "MOV: %*sChunk offset table! (%d chunks)\n", level, "",
1805 len);
1806 // extend array if needed:
1807 if (len > trak->chunks_size) {
1808 trak->chunks = realloc_struct(trak->chunks, len, sizeof(mov_chunk_t));
1809 trak->chunks_size = len;
1810 }
1811 // read elements:
1812 for(i = 0; i < len; i++)
1813 trak->chunks[i].pos = stream_read_dword(demuxer->stream);
1814 break;
1815 }
1816 case MOV_FOURCC('c','o','6','4'): {
1817 int temp = stream_read_dword(demuxer->stream);
1818 int len = stream_read_dword(demuxer->stream);
1819 int i;
1820 mp_msg(MSGT_DEMUX, MSGL_V,
1821 "MOV: %*s64bit chunk offset table! (%d chunks)\n", level, "",
1822 len);
1823 // extend array if needed:
1824 if (len > trak->chunks_size) {
1825 trak->chunks = realloc_struct(trak->chunks, len, sizeof(mov_chunk_t));
1826 trak->chunks_size = len;
1827 }
1828 // read elements:
1829 for (i = 0; i < len; i++) {
1830 #ifndef _LARGEFILE_SOURCE
1831 if (stream_read_dword(demuxer->stream) != 0)
1832 mp_msg(MSGT_DEMUX, MSGL_WARN, "Chunk %d has got 64bit address, but you've MPlayer compiled without LARGEFILE support!\n", i);
1833 trak->chunks[i].pos = stream_read_dword(demuxer->stream);
1834 #else
1835 trak->chunks[i].pos = stream_read_qword(demuxer->stream);
1836 #endif
1837 }
1838 break;
1839 }
1840 case MOV_FOURCC('s','t','s','s'): {
1841 int temp = stream_read_dword(demuxer->stream);
1842 int entries = stream_read_dword(demuxer->stream);
1843 int ver = (temp << 24);
1844 int flags = (temp << 16) | (temp<<8) | temp;
1845 int i;
1846 mp_msg(MSGT_DEMUX, MSGL_V,
1847 "MOV: %*sSyncing samples (keyframes) table! (%d entries) (ver:%d,flags:%d)\n", level, "",
1848 entries, ver, flags);
1849 trak->keyframes_size = entries;
1850 trak->keyframes = calloc(entries, sizeof(unsigned int));
1851 for (i = 0; i < entries; i++)
1852 trak->keyframes[i] = stream_read_dword(demuxer->stream) - 1;
1853 break;
1854 }
1855 case MOV_FOURCC('m','d','i','a'): {
1856 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sMedia stream!\n", level, "");
1857 lschunks(demuxer, level + 1, pos + len, trak);
1858 break;
1859 }
1860 case MOV_FOURCC('m','i','n','f'): {
1861 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sMedia info!\n", level, "");
1862 lschunks(demuxer, level + 1 ,pos + len, trak);
1863 break;
1864 }
1865 case MOV_FOURCC('s','t','b','l'): {
1866 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sSample info!\n", level, "");
1867 lschunks(demuxer, level + 1, pos + len, trak);
1868 break;
1869 }
1870 case MOV_FOURCC('e','d','t','s'): {
1871 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: %*sEdit atom!\n", level, "");
1872 lschunks(demuxer, level + 1, pos + len, trak);
1873 break;
1874 }
1875 case MOV_FOURCC('e','l','s','t'): {
1876 int temp = stream_read_dword(demuxer->stream);
1877 int entries = stream_read_dword(demuxer->stream);
1878 int ver = (temp << 24);
1879 int flags = (temp << 16) | (temp << 8) | temp;
1880 int i;
1881 mp_msg(MSGT_DEMUX, MSGL_V,
1882 "MOV: %*sEdit list table (%d entries) (ver:%d,flags:%d)\n", level, "",
1883 entries, ver, flags);
1884 #if 1
1885 trak->editlist_size = entries;
1886 trak->editlist = calloc(trak->editlist_size, sizeof(mov_editlist_t));
1887 for (i = 0; i < entries; i++) {
1888 int dur = stream_read_dword(demuxer->stream);
1889 int mt = stream_read_dword(demuxer->stream);
1890 int mr = stream_read_dword(demuxer->stream); // 16.16fp
1891 trak->editlist[i].dur = dur;
1892 trak->editlist[i].pos = mt;
1893 trak->editlist[i].speed = mr;
1894 mp_msg(MSGT_DEMUX, MSGL_V,
1895 "MOV: %*s entry#%d: duration: %d start time: %d speed: %3.1fx\n", level, "",
1896 i, dur, mt, (float)mr/65536.0f);
1897 }
1898 #endif
1899 break;
1900 }
1901 case MOV_FOURCC('c','o','d','e'): {
1902 /* XXX: Implement atom 'code' for FLASH support */
1903 break;
1904 }
1905 default:
1906 id = be2me_32(id);
1907 mp_msg(MSGT_DEMUX,MSGL_V,"MOV: unknown chunk: %.4s %d\n",(char *)&id,(int)len);
1908 break;
1909 }//switch(id)
1910 return 0;
1911 }
1912
1913 static demuxer_t* mov_read_header(demuxer_t* demuxer){
1914 mov_priv_t* priv=demuxer->priv;
1915 int t_no;
1916 int best_a_id=-1, best_a_len=0;
1917 int best_v_id=-1, best_v_len=0;
1918
1919 mp_msg(MSGT_DEMUX, MSGL_DBG3, "mov_read_header!\n");
1920
1921 // Parse header:
1922 stream_reset(demuxer->stream);
1923 if(!stream_seek(demuxer->stream,priv->moov_start))
1924 {
1925 mp_msg(MSGT_DEMUX,MSGL_ERR,"MOV: Cannot seek to the beginning of the Movie header (0x%"PRIx64")\n",
1926 (int64_t)priv->moov_start);
1927 return 0;
1928 }
1929 lschunks(demuxer, 0, priv->moov_end, NULL);
1930 // just in case we have hit eof while parsing...
1931 demuxer->stream->eof = 0;
1932 // mp_msg(MSGT_DEMUX, MSGL_INFO, "--------------\n");
1933
1934 // find the best (longest) streams:
1935 for(t_no=0;t_no<priv->track_db;t_no++){
1936 mov_track_t* trak=priv->tracks[t_no];
1937 int len=(trak->samplesize) ? trak->chunks_size : trak->samples_size;
1938 if(demuxer->a_streams[t_no]){ // need audio
1939 if(len>best_a_len){ best_a_len=len; best_a_id=t_no; }
1940 }
1941 if(demuxer->v_streams[t_no]){ // need video
1942 if(len>best_v_len){ best_v_len=len; best_v_id=t_no; }
1943 }
1944 }
1945 mp_msg(MSGT_DEMUX, MSGL_V, "MOV: longest streams: A: #%d (%d samples) V: #%d (%d samples)\n",
1946 best_a_id,best_a_len,best_v_id,best_v_len);
1947 if(demuxer->audio->id==-1 && best_a_id>=0) demuxer->audio->id=best_a_id;
1948 if(demuxer->video->id==-1 && best_v_id>=0) demuxer->video->id=best_v_id;
1949
1950 // setup sh pointers:
1951 if(demuxer->audio->id>=0){
1952 sh_audio_t* sh=demuxer->a_streams[demuxer->audio->id];
1953 if(sh){
1954 demuxer->audio->sh=sh; sh->ds=demuxer->audio;
1955 } else {
1956 mp_msg(MSGT_DEMUX, MSGL_ERR, "MOV: selected audio stream (%d) does not exist\n",demuxer->audio->id);
1957 demuxer->audio->id=-2;
1958 }
1959 }
1960 if(demuxer->video->id>=0){
1961 sh_video_t* sh=demuxer->v_streams[demuxer->video->id];
1962 if(sh){
1963 demuxer->video->sh=sh; sh->ds=demuxer->video;
1964 } else {
1965 mp_msg(MSGT_DEMUX, MSGL_ERR, "MOV: selected video stream (%d) does not exist\n",demuxer->video->id);
1966 demuxer->video->id=-2;
1967 }
1968 }
1969 if(demuxer->sub->id>=0){
1970 sh_sub_t* sh=demuxer->s_streams[demuxer->sub->id];
1971 if(sh){
1972 demuxer->sub->sh=sh;
1973 } else {
1974 mp_msg(MSGT_DEMUX, MSGL_ERR, "MOV: selected subtitle stream (%d) does not exist\n",demuxer->sub->id);
1975 demuxer->sub->id=-2;
1976 }
1977 }
1978
1979 if(demuxer->video->id<0 && demuxer->audio->id<0) {
1980 /* No AV streams found. Try to find an MPEG stream. */
1981 for(t_no=0;t_no<priv->track_db;t_no++){
1982 mov_track_t* trak=priv->tracks[t_no];
1983 if(trak->media_handler == MOV_FOURCC('M','P','E','G')) {
1984 stream_t *s;
1985 demuxer_t *od;
1986
1987 demuxer->video->id = t_no;
1988 s = new_ds_stream(demuxer->video);
1989 od = demux_open(s, DEMUXER_TYPE_MPEG_PS, -1, -1, -1, NULL);
1990 if(od) return new_demuxers_demuxer(od, od, od);
1991 demuxer->video->id = -2; //new linked demuxer couldn't be allocated
1992 break;
1993 }
1994 }
1995 }
1996
1997 #if 0
1998 if( mp_msg_test(MSGT_DEMUX,MSGL_DBG3) ){
1999 for(t_no=0;t_no<priv->track_db;t_no++){
2000 mov_track_t* trak=priv->tracks[t_no];
2001 if(trak->type==MOV_TRAK_GENERIC){
2002 int i;
2003 int fd;
2004 char name[20];
2005 mp_msg(MSGT_DEMUX, MSGL_INFO, "MOV: Track #%d: Extracting %d data chunks to files\n",t_no,trak->samples_size);
2006 for (i=0; i<trak->samples_size; i++)
2007 {
2008 int len=trak->samples[i].size;
2009 char buf[len];
2010 stream_seek(demuxer->stream, trak->samples[i].pos);
2011 snprintf(name, 20, "t%02d-s%03d.%s", t_no,i,
2012 (trak->media_handler==MOV_FOURCC('f','l','s','h')) ?
2013 "swf":"dump");
2014 fd = open(name, O_CREAT|O_WRONLY);
2015 // { int j;
2016 // for(j=0;j<trak->stdata_len-3; j++)
2017 // printf("stdata[%d]=0x%X ize=0x%X\n",j,char2int(trak->stdata,j),MOV_FOURCC('z','l','i','b'));
2018 // }
2019 if( //trak->media_handler==MOV_FOURCC('s','p','r','t') &&
2020 trak->stdata_len>=16 &&
2021 char2int(trak->stdata,12)==MOV_FOURCC('z','l','i','b')
2022 ){
2023 int newlen=stream_read_dword(demuxer->stream);
2024 #ifdef HAVE_ZLIB
2025 // unzip:
2026 z_stream zstrm;
2027 int zret;
2028 char buf2[newlen];
2029
2030 len-=4;
2031 stream_read(demuxer->stream, buf, len);
2032
2033 zstrm.zalloc = (alloc_func)0;
2034 zstrm.zfree = (free_func)0;
2035 zstrm.opaque = (voidpf)0;
2036 zstrm.next_in = buf;
2037 zstrm.avail_in = len;
2038 zstrm.next_out = buf2;
2039 zstrm.avail_out = newlen;
2040
2041 zret = inflateInit(&zstrm);
2042 zret = inflate(&zstrm, Z_NO_FLUSH);
2043 if(newlen != zstrm.total_out)
2044 mp_msg(MSGT_DEMUX, MSGL_WARN, "Warning! unzipped frame size differs hdr: %d zlib: %ld\n",newlen,zstrm.total_out);
2045
2046 write(fd, buf2, newlen);
2047 } else {
2048 #else
2049 len-=4;
2050 mp_msg(MSGT_DEMUX, MSGL_INFO, "******* ZLIB COMPRESSED SAMPLE!!!!! (%d->%d bytes) *******\n",len,newlen);
2051 }
2052 {
2053 #endif
2054 stream_read(demuxer->stream, buf, len);
2055 write(fd, buf, len);
2056 }
2057 close(fd);
2058 }
2059 }
2060 }
2061 }
2062 demuxer->stream->eof = 0;
2063 #endif
2064
2065 return demuxer;
2066 }
2067
2068 /**
2069 * \brief return the mov track that belongs to a demuxer stream
2070 * \param ds the demuxer stream, may be NULL
2071 * \return the mov track info structure belonging to the stream,
2072 * NULL if not found
2073 */
2074 static mov_track_t *stream_track(mov_priv_t *priv, demux_stream_t *ds) {
2075 if (ds && (ds->id >= 0) && (ds->id < priv->track_db))
2076 return priv->tracks[ds->id];
2077 return NULL;
2078 }
2079
2080 // return value:
2081 // 0 = EOF or no stream found
2082 // 1 = successfully read a packet
2083 static int demux_mov_fill_buffer(demuxer_t *demuxer,demux_stream_t* ds){
2084 mov_priv_t* priv=demuxer->priv;
2085 mov_track_t* trak=NULL;
2086 float pts;
2087 int x;
2088 off_t pos;
2089
2090 if (ds->eof) return 0;
2091 trak = stream_track(priv, ds);
2092 if (!trak) return 0;
2093
2094 if(trak->samplesize){
2095 // read chunk:
2096 if(trak->pos>=trak->chunks_size) return 0; // EOF
2097 stream_seek(demuxer->stream,trak->chunks[trak->pos].pos);
2098 pts=(float)(trak->chunks[trak->pos].sample*trak->duration)/(float)trak->timescale;
2099 if(trak->samplesize!=1)
2100 {
2101 mp_msg(MSGT_DEMUX, MSGL_DBG2, "WARNING! Samplesize(%d) != 1\n",
2102 trak->samplesize);
2103 if((trak->fourcc != MOV_FOURCC('t','w','o','s')) && (trak->fourcc != MOV_FOURCC('s','o','w','t')))
2104 x=trak->chunks[trak->pos].size*trak->samplesize;
2105 else
2106 x=trak->chunks[trak->pos].size;
2107 }
2108 else
2109 x=trak->chunks[trak->pos].size;
2110 // printf("X = %d\n", x);
2111 /* the following stuff is audio related */
2112 if (trak->type == MOV_TRAK_AUDIO){
2113 if(trak->stdata_len>=44 && trak->stdata[9]>=1 && char2int(trak->stdata,28)>0){
2114 // stsd version 1 - we have audio compression ratio info:
2115 x/=char2int(trak->stdata,28); // samples/packet
2116 // x*=char2int(trak->stdata,32); // bytes/packet
2117 x*=char2int(trak->stdata,36); // bytes/frame
2118 } else {
2119 if(ds->ss_div && ds->ss_mul){
2120 // workaround for buggy files like 7up-high-traffic-areas.mov,
2121 // with missing stsd v1 header containing compression rate
2122 x/=ds->ss_div; x*=ds->ss_mul; // compression ratio fix ! HACK !
2123 } else {
2124 x*=trak->nchannels;
2125 x*=trak->samplebytes;
2126 }
2127 }
2128 mp_msg(MSGT_DEMUX, MSGL_DBG2, "Audio sample %d bytes pts %5.3f\n",trak->chunks[trak->pos].size*trak->samplesize,pts);
2129 } /* MOV_TRAK_AUDIO */
2130 pos=trak->chunks[trak->pos].pos;
2131 } else {
2132 int frame=trak->pos;
2133 // editlist support:
2134 if(trak->type == MOV_TRAK_VIDEO && trak->editlist_size>=1){
2135 // find the right editlist entry:
2136 if(frame<trak->editlist[trak->editlist_pos].start_frame)
2137 trak->editlist_pos=0;
2138 while(trak->editlist_pos<trak->editlist_size-1 &&
2139 frame>=trak->editlist[trak->editlist_pos+1].start_frame)
2140 ++trak->editlist_pos;
2141 if(frame>=trak->editlist[trak->editlist_pos].start_frame+
2142 trak->editlist[trak->editlist_pos].frames) return 0; // EOF
2143 // calc real frame index:
2144 frame-=trak->editlist[trak->editlist_pos].start_frame;
2145 frame+=trak->editlist[trak->editlist_pos].start_sample;
2146 // calc pts:
2147 pts=(float)(trak->samples[frame].pts+
2148 trak->editlist[trak->editlist_pos].pts_offset)/(float)trak->timescale;
2149 } else {
2150 if(frame>=trak->samples_size) return 0; // EOF
2151 pts=(float)trak->samples[frame].pts/(float)trak->timescale;
2152 }
2153 // read sample:
2154 stream_seek(demuxer->stream,trak->samples[frame].pos);
2155 x=trak->samples[frame].size;
2156 pos=trak->samples[frame].pos;
2157 }
2158 if(trak->pos==0 && trak->stream_header_len>0){
2159 // we have to append the stream header...
2160 demux_packet_t* dp=new_demux_packet(x+trak->stream_header_len);
2161 memcpy(dp->buffer,trak->stream_header,trak->stream_header_len);
2162 stream_read(demuxer->stream,dp->buffer+trak->stream_header_len,x);
2163 free(trak->stream_header);
2164 trak->stream_header = NULL;
2165 trak->stream_header_len = 0;
2166 dp->pts=pts;
2167 dp->flags=0;
2168 dp->pos=pos; // FIXME?
2169 ds_add_packet(ds,dp);
2170 } else
2171 ds_read_packet(ds,demuxer->stream,x,pts,pos,0);
2172
2173 ++trak->pos;
2174
2175 trak = NULL;
2176 if (demuxer->sub->id >= 0 && demuxer->sub->id < priv->track_db)
2177 trak = priv->tracks[demuxer->sub->id];
2178 if (trak) {
2179 int samplenr = 0;
2180 while (samplenr < trak->samples_size) {
2181 double subpts = (double)trak->samples[samplenr].pts / (double)trak->timescale;
2182 if (subpts >= pts) break;
2183 samplenr++;
2184 }
2185 samplenr--;
2186 if (samplenr < 0)
2187 vo_sub = NULL;
2188 else if (samplenr != priv->current_sub) {
2189 sh_sub_t *sh = demuxer->sub->sh;
2190 off_t pos = trak->samples[samplenr].pos;
2191 int len = trak->samples[samplenr].size;
2192 double subpts = (double)trak->samples[samplenr].pts / (double)trak->timescale;
2193 stream_seek(demuxer->stream, pos);
2194 if (sh->type != 'v') {
2195 stream_skip(demuxer->stream, 2); // size
2196 len -= 2;
2197 if (len < 0) len = 0;
2198 if (len > MOV_MAX_SUBLEN) len = MOV_MAX_SUBLEN;
2199 sub_utf8 = 1;
2200 }
2201 ds_read_packet(demuxer->sub, demuxer->stream, len, subpts, pos, 0);
2202 priv->current_sub = samplenr;
2203 }
2204 }
2205
2206 return 1;
2207
2208 }
2209
2210 static float mov_seek_track(mov_track_t* trak,float pts,int flags){
2211
2212 // printf("MOV track seek called %5.3f \n",pts);
2213 if(flags&2) pts*=trak->length; else pts*=(float)trak->timescale;
2214
2215 if(trak->samplesize){
2216 int sample=pts/trak->duration;
2217 // printf("MOV track seek - chunk: %d (pts: %5.3f dur=%d) \n",sample,pts,trak->duration);
2218 if(!(flags&1)) sample+=trak->chunks[trak->pos].sample; // relative
2219 trak->pos=0;
2220 while(trak->pos<trak->chunks_size && trak->chunks[trak->pos].sample<sample) ++trak->pos;
2221 if (trak->pos == trak->chunks_size) return -1;
2222 pts=(float)(trak->chunks[trak->pos].sample*trak->duration)/(float)trak->timescale;
2223 } else {
2224 unsigned int ipts;
2225 if(!(flags&1)) pts+=trak->samples[trak->pos].pts;
2226 if(pts<0) pts=0;
2227 ipts=pts;
2228 //printf("MOV track seek - sample: %d \n",ipts);
2229 for(trak->pos=0;trak->pos<trak->samples_size;++trak->pos){
2230 if(trak->samples[trak->pos].pts>=ipts) break; // found it!
2231 }
2232 if (trak->pos == trak->samples_size) return -1;
2233 if(trak->keyframes_size){
2234 // find nearest keyframe
2235 int i;
2236 for(i=0;i<trak->keyframes_size;i++){
2237 if(trak->keyframes[i]>=trak->pos) break;
2238 }
2239 if (i == trak->keyframes_size) return -1;
2240 if(i>0 && (trak->keyframes[i]-trak->pos) > (trak->pos-trak->keyframes[i-1]))
2241 --i;
2242 trak->pos=trak->keyframes[i];
2243 // printf("nearest keyframe: %d \n",trak->pos);
2244 }
2245 pts=(float)trak->samples[trak->pos].pts/(float)trak->timescale;
2246 }
2247
2248 // printf("MOV track seek done: %5.3f \n",pts);
2249
2250 return pts;
2251 }
2252
2253 static void demux_seek_mov(demuxer_t *demuxer,float pts,float audio_delay,int flags){
2254 mov_priv_t* priv=demuxer->priv;
2255 demux_stream_t* ds;
2256 mov_track_t* trak;
2257
2258 // printf("MOV seek called %5.3f flag=%d \n",pts,flags);
2259
2260 ds=demuxer->video;
2261 trak = stream_track(priv, ds);
2262 if (trak) {
2263 //if(flags&2) pts*=(float)trak->length/(float)trak->timescale;
2264 //if(!(flags&1)) pts+=ds->pts;
2265 ds->pts=mov_seek_track(trak,pts,flags);
2266 if (ds->pts < 0) ds->eof = 1;
2267 else pts = ds->pts;
2268 flags=1; // absolute seconds
2269 }
2270
2271 ds=demuxer->audio;
2272 trak = stream_track(priv, ds);
2273 if (trak) {
2274 //if(flags&2) pts*=(float)trak->length/(float)trak->timescale;
2275 //if(!(flags&1)) pts+=ds->pts;
2276 ds->pts=mov_seek_track(trak,pts,flags);
2277 if (ds->pts < 0) ds->eof = 1;
2278 }
2279
2280 }
2281
2282 static int demux_mov_control(demuxer_t *demuxer, int cmd, void *arg){
2283 mov_track_t* track;
2284
2285 // try the video track
2286 track = stream_track(demuxer->priv, demuxer->video);
2287 if (!track || !track->length)
2288 // otherwise try to get the info from the audio track
2289 track = stream_track(demuxer->priv, demuxer->audio);
2290
2291 if (!track || !track->length)
2292 return DEMUXER_CTRL_DONTKNOW;
2293
2294 switch(cmd) {
2295 case DEMUXER_CTRL_GET_TIME_LENGTH:
2296 if (!track->timescale)
2297 return DEMUXER_CTRL_DONTKNOW;
2298 *((double *)arg) = (double)track->length / track->timescale;
2299 return DEMUXER_CTRL_OK;
2300
2301 case DEMUXER_CTRL_GET_PERCENT_POS:
2302 {
2303 off_t pos = track->pos;
2304 if (track->durmap_size >= 1)
2305 pos *= track->durmap[0].dur;
2306 *((int *)arg) = (int)(100 * pos / track->length);
2307 return DEMUXER_CTRL_OK;
2308 }
2309 }
2310 return DEMUXER_CTRL_NOTIMPL;
2311 }
2312
2313
2314 demuxer_desc_t demuxer_desc_mov = {
2315 "Quicktime/MP4 demuxer",
2316 "mov",
2317 "Quicktime/MOV",
2318 "Arpi, Al3x, Atmos, others",
2319 "Handles Quicktime, MP4, 3GP",
2320 DEMUXER_TYPE_MOV,
2321 0, // slow autodetect
2322 mov_check_file,
2323 demux_mov_fill_buffer,
2324 mov_read_header,
2325 demux_close_mov,
2326 demux_seek_mov,
2327 demux_mov_control
2328 };