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