58660e4836ddcd1cab0dbedd6603b5d4d5478dbe
[ffmpeg.git] / libavformat / movenc.c
1 /*
2  * MOV, 3GP, MP4 encoder.
3  * Copyright (c) 2003 Thomas Raivio.
4  * Copyright (c) 2004 Gildas Bazin <gbazin at videolan dot org>.
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20 #include "avformat.h"
21 #include "avi.h"
22 #include "avio.h"
23
24 #undef NDEBUG
25 #include <assert.h>
26
27 #define MOV_INDEX_CLUSTER_SIZE 16384
28 #define globalTimescale 1000
29
30 #define MODE_MP4 0
31 #define MODE_MOV 1
32 #define MODE_3GP 2
33 #define MODE_PSP 3 // example working PSP command line: 
34 // ffmpeg -i testinput.avi  -f psp -r 14.985 -s 320x240 -b 768 -ar 24000 -ab 32 M4V00001.MP4
35 #define MODE_3G2 4
36
37 typedef struct MOVIentry {
38     unsigned int flags, pos, size;
39     unsigned int samplesInChunk;
40     char         key_frame;
41     unsigned int entries;
42 } MOVIentry;
43
44 typedef struct MOVIndex {
45     int         mode;
46     int         entry;
47     int         mdat_size;
48     int         ents_allocated;
49     long        timescale;
50     long        time;
51     long        trackDuration;
52     long        sampleCount;
53     long        sampleDuration;
54     int         hasKeyframes;
55     int         trackID;
56     AVCodecContext *enc;
57
58     int         vosLen;
59     uint8_t     *vosData;
60     MOVIentry** cluster;
61 } MOVTrack;
62
63 typedef struct MOVContext {
64     int     mode;
65     long    time;
66     int     nb_streams;
67     int     mdat_written;
68     offset_t mdat_pos;
69     long    timescale;
70     MOVTrack tracks[MAX_STREAMS];
71 } MOVContext;
72
73 static int mov_write_esds_tag(ByteIOContext *pb, MOVTrack* track);
74
75 const CodecTag ff_mov_obj_type[] = {
76     { CODEC_ID_MPEG4     ,  32 },
77     { CODEC_ID_AAC       ,  64 },
78     { CODEC_ID_MPEG1VIDEO, 106 },
79     { CODEC_ID_MPEG2VIDEO,  96 },//mpeg2 profiles
80     { CODEC_ID_MP2       , 107 },//FIXME mpeg2 mpeg audio -> 105
81     { CODEC_ID_MP3       , 107 },//FIXME mpeg2 mpeg audio -> 105
82     { CODEC_ID_H264      , 241 },
83     { CODEC_ID_H263      , 242 },
84     { CODEC_ID_H261      , 243 },
85     { CODEC_ID_MJPEG     , 108 },
86     { CODEC_ID_PCM_S16LE , 224 },
87     { CODEC_ID_VORBIS    , 225 },
88     { CODEC_ID_AC3       , 226 },
89     { CODEC_ID_PCM_ALAW  , 227 },
90     { CODEC_ID_PCM_MULAW , 228 },
91     { CODEC_ID_PCM_S16BE , 230 },
92     { 0,0  },
93 };
94
95 //FIXME supprt 64bit varaint with wide placeholders
96 static int updateSize (ByteIOContext *pb, int pos)
97 {
98     long curpos = url_ftell(pb);
99     url_fseek(pb, pos, SEEK_SET);
100     put_be32(pb, curpos - pos); /* rewrite size */
101     url_fseek(pb, curpos, SEEK_SET);
102
103     return curpos - pos;
104 }
105
106 /* Chunk offset atom */
107 static int mov_write_stco_tag(ByteIOContext *pb, MOVTrack* track)
108 {
109     int i;
110     int pos = url_ftell(pb);
111     put_be32(pb, 0); /* size */
112     put_tag(pb, "stco");
113     put_be32(pb, 0); /* version & flags */
114     put_be32(pb, track->entry); /* entry count */
115     for (i=0; i<track->entry; i++) {
116         int cl = i / MOV_INDEX_CLUSTER_SIZE;
117         int id = i % MOV_INDEX_CLUSTER_SIZE;
118         put_be32(pb, track->cluster[cl][id].pos);
119     }
120     return updateSize (pb, pos);
121 }
122
123 /* Sample size atom */
124 static int mov_write_stsz_tag(ByteIOContext *pb, MOVTrack* track)
125 {
126     int equalChunks = 1;
127     int i, j, entries = 0, tst = -1, oldtst = -1;
128
129     int pos = url_ftell(pb);
130     put_be32(pb, 0); /* size */
131     put_tag(pb, "stsz");
132     put_be32(pb, 0); /* version & flags */
133
134     for (i=0; i<track->entry; i++) {
135         int cl = i / MOV_INDEX_CLUSTER_SIZE;
136         int id = i % MOV_INDEX_CLUSTER_SIZE;
137         tst = track->cluster[cl][id].size/track->cluster[cl][id].entries;
138         if(oldtst != -1 && tst != oldtst) {
139             equalChunks = 0;
140         }
141         oldtst = tst;
142         entries += track->cluster[cl][id].entries;
143     }
144     if (equalChunks) {
145         int sSize = track->cluster[0][0].size/track->cluster[0][0].entries;
146         put_be32(pb, sSize); // sample size 
147         put_be32(pb, entries); // sample count
148     }
149     else {
150         put_be32(pb, 0); // sample size 
151         put_be32(pb, entries); // sample count 
152         for (i=0; i<track->entry; i++) {
153             int cl = i / MOV_INDEX_CLUSTER_SIZE;
154             int id = i % MOV_INDEX_CLUSTER_SIZE;
155             for ( j=0; j<track->cluster[cl][id].entries; j++) {
156                 put_be32(pb, track->cluster[cl][id].size /
157                          track->cluster[cl][id].entries);
158             }
159         }
160     }
161     return updateSize (pb, pos);
162 }
163
164 /* Sample to chunk atom */
165 static int mov_write_stsc_tag(ByteIOContext *pb, MOVTrack* track)
166 {
167     int index = 0, oldval = -1, i, entryPos, curpos;
168
169     int pos = url_ftell(pb);
170     put_be32(pb, 0); /* size */
171     put_tag(pb, "stsc");
172     put_be32(pb, 0); // version & flags 
173     entryPos = url_ftell(pb);
174     put_be32(pb, track->entry); // entry count 
175     for (i=0; i<track->entry; i++) {
176         int cl = i / MOV_INDEX_CLUSTER_SIZE;
177         int id = i % MOV_INDEX_CLUSTER_SIZE;
178         if(oldval != track->cluster[cl][id].samplesInChunk)
179         {
180             put_be32(pb, i+1); // first chunk 
181             put_be32(pb, track->cluster[cl][id].samplesInChunk); // samples per chunk
182             put_be32(pb, 0x1); // sample description index 
183             oldval = track->cluster[cl][id].samplesInChunk;
184             index++;
185         }
186     }
187     curpos = url_ftell(pb);
188     url_fseek(pb, entryPos, SEEK_SET);
189     put_be32(pb, index); // rewrite size 
190     url_fseek(pb, curpos, SEEK_SET);
191
192     return updateSize (pb, pos);
193 }
194
195 /* Sync sample atom */
196 static int mov_write_stss_tag(ByteIOContext *pb, MOVTrack* track)
197 {
198     long curpos;
199     int i, index = 0, entryPos;
200     int pos = url_ftell(pb);
201     put_be32(pb, 0); // size 
202     put_tag(pb, "stss");
203     put_be32(pb, 0); // version & flags 
204     entryPos = url_ftell(pb);
205     put_be32(pb, track->entry); // entry count 
206     for (i=0; i<track->entry; i++) {
207         int cl = i / MOV_INDEX_CLUSTER_SIZE;
208         int id = i % MOV_INDEX_CLUSTER_SIZE;
209         if(track->cluster[cl][id].key_frame == 1) {
210             put_be32(pb, i+1);
211             index++;
212         }
213     }
214     curpos = url_ftell(pb);
215     url_fseek(pb, entryPos, SEEK_SET);
216     put_be32(pb, index); // rewrite size 
217     url_fseek(pb, curpos, SEEK_SET);
218     return updateSize (pb, pos);
219 }
220
221 static int mov_write_damr_tag(ByteIOContext *pb)
222 {
223     put_be32(pb, 0x11); /* size */
224     put_tag(pb, "damr");
225     put_tag(pb, "FFMP");
226     put_byte(pb, 0);
227
228     put_be16(pb, 0x80); /* Mode set (all modes for AMR_NB) */
229     put_be16(pb, 0xa); /* Mode change period (no restriction) */
230     //put_be16(pb, 0x81ff); /* Mode set (all modes for AMR_NB) */
231     //put_be16(pb, 1); /* Mode change period (no restriction) */
232     return 0x11;
233 }
234
235 static int mov_write_wave_tag(ByteIOContext *pb, MOVTrack* track)
236 {
237     int pos = url_ftell(pb);
238
239     put_be32(pb, 0);     /* size */
240     put_tag(pb, "wave");
241
242     put_be32(pb, 12);    /* size */
243     put_tag(pb, "frma");
244     put_tag(pb, "mp4a");
245
246     put_be32(pb, 12);    /* size */
247     put_tag(pb, "mp4a");
248     put_be32(pb, 0);
249
250     mov_write_esds_tag(pb, track);
251
252     put_be32(pb, 12);    /* size */
253     put_tag(pb, "srcq");
254     put_be32(pb, 0x40);
255
256     put_be32(pb, 8);     /* size */
257     put_be32(pb, 0);     /* null tag */
258
259     return updateSize (pb, pos);
260 }
261
262 const CodecTag codec_movaudio_tags[] = {
263     { CODEC_ID_PCM_MULAW, MKTAG('u', 'l', 'a', 'w') },
264     { CODEC_ID_PCM_ALAW, MKTAG('a', 'l', 'a', 'w') },
265     { CODEC_ID_ADPCM_IMA_QT, MKTAG('i', 'm', 'a', '4') },
266     { CODEC_ID_MACE3, MKTAG('M', 'A', 'C', '3') },
267     { CODEC_ID_MACE6, MKTAG('M', 'A', 'C', '6') },
268     { CODEC_ID_AAC, MKTAG('m', 'p', '4', 'a') },
269     { CODEC_ID_AMR_NB, MKTAG('s', 'a', 'm', 'r') },
270     { CODEC_ID_PCM_S16BE, MKTAG('t', 'w', 'o', 's') },
271     { CODEC_ID_PCM_S16LE, MKTAG('s', 'o', 'w', 't') },
272     { CODEC_ID_MP3, MKTAG('.', 'm', 'p', '3') },
273     { 0, 0 },
274 };
275
276 static int mov_write_audio_tag(ByteIOContext *pb, MOVTrack* track)
277 {
278     int pos = url_ftell(pb);
279     int tag;
280     
281     put_be32(pb, 0); /* size */
282
283     tag = track->enc->codec_tag;
284     if (!tag)
285     tag = codec_get_tag(codec_movaudio_tags, track->enc->codec_id);
286     // if no mac fcc found, try with Microsoft tags
287     if (!tag)
288     {
289         int tmp = codec_get_tag(codec_wav_tags, track->enc->codec_id);
290         tag = MKTAG('m', 's', ((tmp >> 8) & 0xff), (tmp & 0xff));
291     }
292     put_le32(pb, tag); // store it byteswapped
293
294     put_be32(pb, 0); /* Reserved */
295     put_be16(pb, 0); /* Reserved */
296     put_be16(pb, 1); /* Data-reference index, XXX  == 1 */
297
298     /* SoundDescription */
299     if(track->mode == MODE_MOV && track->enc->codec_id == CODEC_ID_AAC)
300         put_be16(pb, 1); /* Version 1 */
301     else
302         put_be16(pb, 0); /* Version 0 */
303     put_be16(pb, 0); /* Revision level */
304     put_be32(pb, 0); /* Reserved */
305
306     put_be16(pb, track->enc->channels); /* Number of channels */
307     /* TODO: Currently hard-coded to 16-bit, there doesn't seem
308                  to be a good way to get number of bits of audio */
309     put_be16(pb, 0x10); /* Reserved */
310
311     if(track->enc->codec_id == CODEC_ID_AAC ||
312        track->enc->codec_id == CODEC_ID_MP3)
313     {
314         put_be16(pb, 0xfffe); /* compression ID (vbr)*/
315     }
316     else
317     {
318         put_be16(pb, 0); /* compression ID (= 0) */
319     }
320     put_be16(pb, 0); /* packet size (= 0) */
321     put_be16(pb, track->timescale); /* Time scale */
322     put_be16(pb, 0); /* Reserved */
323
324     if(track->mode == MODE_MOV && track->enc->codec_id == CODEC_ID_AAC)
325     {
326         /* SoundDescription V1 extended info */
327         put_be32(pb, track->enc->frame_size); /* Samples per packet  */
328         put_be32(pb, 1536); /* Bytes per packet */
329         put_be32(pb, 2); /* Bytes per frame */
330         put_be32(pb, 2); /* Bytes per sample */
331     }
332
333     if(track->enc->codec_id == CODEC_ID_AAC) {
334         if( track->mode == MODE_MOV ) mov_write_wave_tag(pb, track);
335         else mov_write_esds_tag(pb, track);
336     }
337     if(track->enc->codec_id == CODEC_ID_AMR_NB)
338         mov_write_damr_tag(pb);
339     return updateSize (pb, pos);
340 }
341
342 static int mov_write_d263_tag(ByteIOContext *pb)
343 {
344     put_be32(pb, 0xf); /* size */
345     put_tag(pb, "d263");
346     put_tag(pb, "FFMP");
347     put_be16(pb, 0x0a);
348     put_byte(pb, 0);
349     return 0xf;
350 }
351
352 /* TODO: No idea about these values */
353 static int mov_write_svq3_tag(ByteIOContext *pb)
354 {
355     put_be32(pb, 0x15);
356     put_tag(pb, "SMI ");
357     put_tag(pb, "SEQH");
358     put_be32(pb, 0x5);
359     put_be32(pb, 0xe2c0211d);
360     put_be32(pb, 0xc0000000);
361     put_byte(pb, 0);   
362     return 0x15;
363 }
364
365 static unsigned int descrLength(unsigned int len)
366 {
367     if (len < 0x00000080)
368         return 2 + len;
369     else if (len < 0x00004000)
370         return 3 + len;
371     else if(len < 0x00200000)
372         return 4 + len;
373     else
374         return 5 + len;
375 }
376
377 static void putDescr(ByteIOContext *pb, int tag, int size)
378 {
379     uint32_t len;
380     uint8_t  vals[4];
381
382     len = size;
383     vals[3] = (uint8_t)(len & 0x7f);
384     len >>= 7;
385     vals[2] = (uint8_t)((len & 0x7f) | 0x80); 
386     len >>= 7;
387     vals[1] = (uint8_t)((len & 0x7f) | 0x80); 
388     len >>= 7;
389     vals[0] = (uint8_t)((len & 0x7f) | 0x80);
390
391     put_byte(pb, tag); // DescriptorTag
392
393     if (size < 0x00000080)
394     {
395         put_byte(pb, vals[3]);
396     }
397     else if (size < 0x00004000)
398     {
399         put_byte(pb, vals[2]);
400         put_byte(pb, vals[3]);
401     }
402     else if (size < 0x00200000)
403     {
404         put_byte(pb, vals[1]);
405         put_byte(pb, vals[2]);
406         put_byte(pb, vals[3]);
407     }
408     else if (size < 0x10000000)
409     {
410         put_byte(pb, vals[0]);
411         put_byte(pb, vals[1]);
412         put_byte(pb, vals[2]);
413         put_byte(pb, vals[3]);
414     }
415 }
416
417 static int mov_write_esds_tag(ByteIOContext *pb, MOVTrack* track) // Basic
418 {
419     int decoderSpecificInfoLen;
420     int pos = url_ftell(pb);
421     void *vosDataBackup=track->vosData;
422     int vosLenBackup=track->vosLen;
423     
424     // we should be able to have these passed in, via vosData, then we wouldn't need to attack this routine at all
425     static const char PSPAACData[]={0x13,0x10};
426     static const char PSPMP4Data[]={0x00,0x00,0x01,0xB0,0x03,0x00,0x00,0x01,0xB5,0x09,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x20,0x00,0x84,0x5D,0x4C,0x28,0x50,0x20,0xF0,0xA3,0x1F };
427     
428     
429     if (track->mode == MODE_PSP)  // fails on psp if this is not here
430     {
431         if (track->enc->codec_id == CODEC_ID_AAC)
432         {
433             track->vosLen = 2;
434             track->vosData = PSPAACData;
435         }
436
437         if (track->enc->codec_id == CODEC_ID_MPEG4)
438         {
439             track->vosLen = 28;
440             track->vosData = PSPMP4Data;
441         }
442     }
443
444     decoderSpecificInfoLen = track->vosLen ? descrLength(track->vosLen):0;
445
446     put_be32(pb, 0);               // size
447     put_tag(pb, "esds");
448     put_be32(pb, 0);               // Version
449
450     // ES descriptor
451     putDescr(pb, 0x03, 3 + descrLength(13 + decoderSpecificInfoLen) +
452              descrLength(1));
453     put_be16(pb, track->trackID);
454     put_byte(pb, 0x00);            // flags (= no flags)
455
456     // DecoderConfig descriptor
457     putDescr(pb, 0x04, 13 + decoderSpecificInfoLen);
458
459     // Object type indication
460     put_byte(pb, codec_get_tag(ff_mov_obj_type, track->enc->codec_id));
461
462     if(track->enc->codec_type == CODEC_TYPE_AUDIO)
463         put_byte(pb, 0x15);            // flags (= Audiostream)
464     else
465         put_byte(pb, 0x11);            // flags (= Visualstream)
466
467     put_byte(pb,  track->enc->rc_buffer_size>>(3+16));             // Buffersize DB (24 bits)
468     put_be16(pb, (track->enc->rc_buffer_size>>3)&0xFFFF);          // Buffersize DB
469
470     put_be32(pb, FFMAX(track->enc->bit_rate, track->enc->rc_max_rate));     // maxbitrate  (FIXME should be max rate in any 1 sec window)
471     if(track->enc->rc_max_rate != track->enc->rc_min_rate || track->enc->rc_min_rate==0)
472         put_be32(pb, 0);     // vbr
473     else
474         put_be32(pb, track->enc->rc_max_rate);     // avg bitrate
475
476     if (track->vosLen)
477     {
478         // DecoderSpecific info descriptor
479         putDescr(pb, 0x05, track->vosLen);
480         put_buffer(pb, track->vosData, track->vosLen);
481     }
482
483     track->vosData = vosDataBackup;
484     track->vosLen = vosLenBackup;
485
486     // SL descriptor
487     putDescr(pb, 0x06, 1);
488     put_byte(pb, 0x02);
489     return updateSize (pb, pos);
490 }
491
492 const CodecTag codec_movvideo_tags[] = {
493     { CODEC_ID_SVQ1, MKTAG('S', 'V', 'Q', '1') },
494     { CODEC_ID_SVQ3, MKTAG('S', 'V', 'Q', '3') },
495     { CODEC_ID_MPEG4, MKTAG('m', 'p', '4', 'v') },
496     { CODEC_ID_H263, MKTAG('s', '2', '6', '3') },
497     { CODEC_ID_DVVIDEO, MKTAG('d', 'v', 'c', ' ') },
498     { 0, 0 },
499 };
500
501 static int mov_write_video_tag(ByteIOContext *pb, MOVTrack* track)
502 {
503     int pos = url_ftell(pb);
504     char compressor_name[32];
505     int tag;
506
507     put_be32(pb, 0); /* size */
508
509     tag = track->enc->codec_tag;
510     if (!tag)
511     tag = codec_get_tag(codec_movvideo_tags, track->enc->codec_id);
512     // if no mac fcc found, try with Microsoft tags
513     if (!tag)
514         tag = codec_get_tag(codec_bmp_tags, track->enc->codec_id);
515     put_le32(pb, tag); // store it byteswapped
516
517     put_be32(pb, 0); /* Reserved */
518     put_be16(pb, 0); /* Reserved */
519     put_be16(pb, 1); /* Data-reference index */
520
521     put_be16(pb, 0); /* Codec stream version */
522     put_be16(pb, 0); /* Codec stream revision (=0) */
523     put_tag(pb, "FFMP"); /* Vendor */
524     if(track->enc->codec_id == CODEC_ID_RAWVIDEO) {
525         put_be32(pb, 0); /* Temporal Quality */
526         put_be32(pb, 0x400); /* Spatial Quality = lossless*/
527     } else {
528         put_be32(pb, 0x200); /* Temporal Quality = normal */
529         put_be32(pb, 0x200); /* Spatial Quality = normal */
530     }
531     put_be16(pb, track->enc->width); /* Video width */
532     put_be16(pb, track->enc->height); /* Video height */
533     put_be32(pb, 0x00480000); /* Horizontal resolution 72dpi */
534     put_be32(pb, 0x00480000); /* Vertical resolution 72dpi */
535     put_be32(pb, 0); /* Data size (= 0) */
536     put_be16(pb, 1); /* Frame count (= 1) */
537     
538     memset(compressor_name,0,32);
539     if (track->enc->codec && track->enc->codec->name)
540         strncpy(compressor_name,track->enc->codec->name,31);
541     put_byte(pb, strlen(compressor_name));
542     put_buffer(pb, compressor_name, 31);
543     
544     put_be16(pb, 0x18); /* Reserved */
545     put_be16(pb, 0xffff); /* Reserved */
546     if(track->enc->codec_id == CODEC_ID_MPEG4)
547         mov_write_esds_tag(pb, track);
548     else if(track->enc->codec_id == CODEC_ID_H263)
549         mov_write_d263_tag(pb);
550     else if(track->enc->codec_id == CODEC_ID_SVQ3)
551         mov_write_svq3_tag(pb);    
552
553     return updateSize (pb, pos);
554 }
555
556 static int mov_write_stsd_tag(ByteIOContext *pb, MOVTrack* track)
557 {
558     int pos = url_ftell(pb);
559     put_be32(pb, 0); /* size */
560     put_tag(pb, "stsd");
561     put_be32(pb, 0); /* version & flags */
562     put_be32(pb, 1); /* entry count */
563     if (track->enc->codec_type == CODEC_TYPE_VIDEO)
564         mov_write_video_tag(pb, track);
565     else if (track->enc->codec_type == CODEC_TYPE_AUDIO)
566         mov_write_audio_tag(pb, track);
567     return updateSize(pb, pos);
568 }
569
570 /* TODO: */
571 /* Time to sample atom */
572 static int mov_write_stts_tag(ByteIOContext *pb, MOVTrack* track)
573 {
574     put_be32(pb, 0x18); /* size */
575     put_tag(pb, "stts");
576     put_be32(pb, 0); /* version & flags */
577     put_be32(pb, 1); /* entry count */
578
579     put_be32(pb, track->sampleCount); /* sample count */
580     put_be32(pb, track->sampleDuration); /* sample duration */
581     return 0x18;
582 }
583
584 static int mov_write_dref_tag(ByteIOContext *pb)
585 {
586     put_be32(pb, 28); /* size */
587     put_tag(pb, "dref");
588     put_be32(pb, 0); /* version & flags */
589     put_be32(pb, 1); /* entry count */
590
591     put_be32(pb, 0xc); /* size */
592     put_tag(pb, "url ");
593     put_be32(pb, 1); /* version & flags */
594
595     return 28;
596 }
597
598 static int mov_write_stbl_tag(ByteIOContext *pb, MOVTrack* track)
599 {
600     int pos = url_ftell(pb);
601     put_be32(pb, 0); /* size */
602     put_tag(pb, "stbl");
603     mov_write_stsd_tag(pb, track);
604     mov_write_stts_tag(pb, track);
605     if (track->enc->codec_type == CODEC_TYPE_VIDEO &&
606         track->hasKeyframes)
607         mov_write_stss_tag(pb, track);
608     mov_write_stsc_tag(pb, track);
609     mov_write_stsz_tag(pb, track);
610     mov_write_stco_tag(pb, track);
611     return updateSize(pb, pos);
612 }
613
614 static int mov_write_dinf_tag(ByteIOContext *pb)
615 {
616     int pos = url_ftell(pb);
617     put_be32(pb, 0); /* size */
618     put_tag(pb, "dinf");
619     mov_write_dref_tag(pb);
620     return updateSize(pb, pos);
621 }
622
623 static int mov_write_smhd_tag(ByteIOContext *pb)
624 {
625     put_be32(pb, 16); /* size */
626     put_tag(pb, "smhd");
627     put_be32(pb, 0); /* version & flags */
628     put_be16(pb, 0); /* reserved (balance, normally = 0) */
629     put_be16(pb, 0); /* reserved */
630     return 16;
631 }
632
633 static int mov_write_vmhd_tag(ByteIOContext *pb)
634 {
635     put_be32(pb, 0x14); /* size (always 0x14) */
636     put_tag(pb, "vmhd");
637     put_be32(pb, 0x01); /* version & flags */
638     put_be64(pb, 0); /* reserved (graphics mode = copy) */
639     return 0x14;
640 }
641
642 static int mov_write_hdlr_tag(ByteIOContext *pb, MOVTrack* track)
643 {
644     char *descr, *hdlr, *hdlr_type;
645     int pos = url_ftell(pb);
646     
647     if (!track) { /* no media --> data handler */
648         hdlr = "dhlr";
649         hdlr_type = "url ";
650         descr = "DataHandler";
651     } else {
652         hdlr = (track->mode == MODE_MOV) ? "mhlr" : "\0\0\0\0";
653         if (track->enc->codec_type == CODEC_TYPE_VIDEO) {
654             hdlr_type = "vide";
655             descr = "VideoHandler";
656         } else {
657             hdlr_type = "soun";
658             descr = "SoundHandler";
659         }
660     }
661     
662     put_be32(pb, 0); /* size */
663     put_tag(pb, "hdlr");
664     put_be32(pb, 0); /* Version & flags */
665     put_buffer(pb, hdlr, 4); /* handler */
666     put_tag(pb, hdlr_type); /* handler type */
667     put_be32(pb ,0); /* reserved */
668     put_be32(pb ,0); /* reserved */
669     put_be32(pb ,0); /* reserved */
670     put_byte(pb, strlen(descr)); /* string counter */
671     put_buffer(pb, descr, strlen(descr)); /* handler description */
672     return updateSize(pb, pos);
673 }
674
675 static int mov_write_minf_tag(ByteIOContext *pb, MOVTrack* track)
676 {
677     int pos = url_ftell(pb);
678     put_be32(pb, 0); /* size */
679     put_tag(pb, "minf");
680     if(track->enc->codec_type == CODEC_TYPE_VIDEO)
681         mov_write_vmhd_tag(pb);
682     else
683         mov_write_smhd_tag(pb);
684     if (track->mode == MODE_MOV) /* FIXME: Why do it for MODE_MOV only ? */
685         mov_write_hdlr_tag(pb, NULL);
686     mov_write_dinf_tag(pb);
687     mov_write_stbl_tag(pb, track);
688     return updateSize(pb, pos);
689 }
690
691 static int mov_write_mdhd_tag(ByteIOContext *pb, MOVTrack* track)
692 {
693     put_be32(pb, 32); /* size */
694     put_tag(pb, "mdhd");
695     put_be32(pb, 0); /* Version & flags */
696     put_be32(pb, track->time); /* creation time */
697     put_be32(pb, track->time); /* modification time */
698     put_be32(pb, track->timescale); /* time scale (sample rate for audio) */ 
699     put_be32(pb, track->trackDuration); /* duration */
700     put_be16(pb, 0); /* language, 0 = english */
701     put_be16(pb, 0); /* reserved (quality) */
702     return 32;
703 }
704
705 static int mov_write_mdia_tag(ByteIOContext *pb, MOVTrack* track)
706 {
707     int pos = url_ftell(pb);
708     put_be32(pb, 0); /* size */
709     put_tag(pb, "mdia");
710     mov_write_mdhd_tag(pb, track);
711     mov_write_hdlr_tag(pb, track);
712     mov_write_minf_tag(pb, track);
713     return updateSize(pb, pos);
714 }
715
716 static int mov_write_tkhd_tag(ByteIOContext *pb, MOVTrack* track)
717 {
718     put_be32(pb, 0x5c); /* size (always 0x5c) */
719     put_tag(pb, "tkhd");
720     put_be32(pb, 0xf); /* version & flags (track enabled) */
721     put_be32(pb, track->time); /* creation time */
722     put_be32(pb, track->time); /* modification time */
723     put_be32(pb, track->trackID); /* track-id */
724     put_be32(pb, 0); /* reserved */
725     put_be32(pb, av_rescale_rnd(track->trackDuration, globalTimescale, track->timescale, AV_ROUND_UP)); /* duration */
726
727     put_be32(pb, 0); /* reserved */
728     put_be32(pb, 0); /* reserved */
729     put_be32(pb, 0x0); /* reserved (Layer & Alternate group) */
730     /* Volume, only for audio */
731     if(track->enc->codec_type == CODEC_TYPE_AUDIO)
732         put_be16(pb, 0x0100);
733     else
734         put_be16(pb, 0);
735     put_be16(pb, 0); /* reserved */
736
737     /* Matrix structure */
738     put_be32(pb, 0x00010000); /* reserved */
739     put_be32(pb, 0x0); /* reserved */
740     put_be32(pb, 0x0); /* reserved */
741     put_be32(pb, 0x0); /* reserved */
742     put_be32(pb, 0x00010000); /* reserved */
743     put_be32(pb, 0x0); /* reserved */
744     put_be32(pb, 0x0); /* reserved */
745     put_be32(pb, 0x0); /* reserved */
746     put_be32(pb, 0x40000000); /* reserved */
747
748     /* Track width and height, for visual only */
749     if(track->enc->codec_type == CODEC_TYPE_VIDEO) {
750         double sample_aspect_ratio = av_q2d(track->enc->sample_aspect_ratio);
751         if( !sample_aspect_ratio ) sample_aspect_ratio = 1;
752         put_be32(pb, sample_aspect_ratio * track->enc->width*0x10000);
753         put_be32(pb, track->enc->height*0x10000);
754     }
755     else {
756         put_be32(pb, 0);
757         put_be32(pb, 0);
758     }
759     return 0x5c;
760 }
761
762 // This box seems important for the psp playback ... without it the movie seems to hang
763 static int mov_write_edts_tag(ByteIOContext *pb, MOVTrack *track)
764 {
765     put_be32(pb, 0x24); /* size  */
766     put_tag(pb, "edts");
767     put_be32(pb, 0x1c); /* size  */
768     put_tag(pb, "elst");
769     put_be32(pb, 0x0);
770     put_be32(pb, 0x1);
771
772     put_be32(pb, av_rescale_rnd(track->trackDuration, globalTimescale, track->timescale, AV_ROUND_UP)); /* duration   ... doesn't seem to effect psp */
773
774     put_be32(pb, 0x0);
775     put_be32(pb, 0x00010000);
776     return 0x24;
777 }
778
779 // goes at the end of each track!  ... Critical for PSP playback ("Incompatible data" without it)
780 static int mov_write_uuid_tag_psp(ByteIOContext *pb, MOVTrack *mov)
781 {
782     put_be32(pb, 0x34); /* size ... reports as 28 in mp4box! */
783     put_tag(pb, "uuid");
784     put_tag(pb, "USMT");
785     put_be32(pb, 0x21d24fce);
786     put_be32(pb, 0xbb88695c);
787     put_be32(pb, 0xfac9c740);
788     put_be32(pb, 0x1c);     // another size here!
789     put_tag(pb, "MTDT");
790     put_be32(pb, 0x00010012);
791     put_be32(pb, 0x0a);
792     put_be32(pb, 0x55c40000);
793     put_be32(pb, 0x1);
794     put_be32(pb, 0x0);
795     return 0x34;
796 }
797
798 static int mov_write_trak_tag(ByteIOContext *pb, MOVTrack* track)
799 {
800     int pos = url_ftell(pb);
801     put_be32(pb, 0); /* size */
802     put_tag(pb, "trak");
803     mov_write_tkhd_tag(pb, track);
804     if (track->mode == MODE_PSP) 
805         mov_write_edts_tag(pb, track);  // PSP Movies require edts box
806     mov_write_mdia_tag(pb, track);
807     if (track->mode == MODE_PSP) 
808         mov_write_uuid_tag_psp(pb,track);  // PSP Movies require this uuid box
809     return updateSize(pb, pos);
810 }
811
812 #if 0
813 /* TODO: Not sorted out, but not necessary either */
814 static int mov_write_iods_tag(ByteIOContext *pb, MOVContext *mov)
815 {
816     put_be32(pb, 0x15); /* size */
817     put_tag(pb, "iods");
818     put_be32(pb, 0);    /* version & flags */
819     put_be16(pb, 0x1007);
820     put_byte(pb, 0);
821     put_be16(pb, 0x4fff);
822     put_be16(pb, 0xfffe);
823     put_be16(pb, 0x01ff);
824     return 0x15;
825 }
826 #endif
827
828 static int mov_write_mvhd_tag(ByteIOContext *pb, MOVContext *mov)
829 {
830     int maxTrackID = 1, maxTrackLen = 0, i;
831     int64_t maxTrackLenTemp;
832
833     put_be32(pb, 0x6c); /* size (always 0x6c) */
834     put_tag(pb, "mvhd");
835     put_be32(pb, 0); /* version & flags */
836     put_be32(pb, mov->time); /* creation time */
837     put_be32(pb, mov->time); /* modification time */
838     put_be32(pb, mov->timescale); /* timescale */
839     for (i=0; i<MAX_STREAMS; i++) {
840         if(mov->tracks[i].entry > 0) {
841             maxTrackLenTemp = av_rescale_rnd(mov->tracks[i].trackDuration, globalTimescale, mov->tracks[i].timescale, AV_ROUND_UP);
842             if(maxTrackLen < maxTrackLenTemp)
843                 maxTrackLen = maxTrackLenTemp;
844             if(maxTrackID < mov->tracks[i].trackID)
845                 maxTrackID = mov->tracks[i].trackID;
846         }
847     }
848     put_be32(pb, maxTrackLen); /* duration of longest track */
849
850     put_be32(pb, 0x00010000); /* reserved (preferred rate) 1.0 = normal */
851     put_be16(pb, 0x0100); /* reserved (preferred volume) 1.0 = normal */
852     put_be16(pb, 0); /* reserved */
853     put_be32(pb, 0); /* reserved */
854     put_be32(pb, 0); /* reserved */
855
856     /* Matrix structure */
857     put_be32(pb, 0x00010000); /* reserved */
858     put_be32(pb, 0x0); /* reserved */
859     put_be32(pb, 0x0); /* reserved */
860     put_be32(pb, 0x0); /* reserved */
861     put_be32(pb, 0x00010000); /* reserved */
862     put_be32(pb, 0x0); /* reserved */
863     put_be32(pb, 0x0); /* reserved */
864     put_be32(pb, 0x0); /* reserved */
865     put_be32(pb, 0x40000000); /* reserved */
866
867     put_be32(pb, 0); /* reserved (preview time) */
868     put_be32(pb, 0); /* reserved (preview duration) */
869     put_be32(pb, 0); /* reserved (poster time) */
870     put_be32(pb, 0); /* reserved (selection time) */
871     put_be32(pb, 0); /* reserved (selection duration) */
872     put_be32(pb, 0); /* reserved (current time) */
873     put_be32(pb, maxTrackID+1); /* Next track id */
874     return 0x6c;
875 }
876
877 static int mov_write_itunes_hdlr_tag(ByteIOContext *pb, MOVContext* mov,
878                                      AVFormatContext *s)
879 {
880     int pos = url_ftell(pb);
881     put_be32(pb, 0); /* size */
882     put_tag(pb, "hdlr");
883     put_be32(pb, 0);
884     put_be32(pb, 0);
885     put_tag(pb, "mdir");
886     put_tag(pb, "appl");
887     put_be32(pb, 0);
888     put_be32(pb, 0);
889     put_be16(pb, 0);
890     return updateSize(pb, pos);
891 }
892
893 /* helper function to write a data tag with the specified string as data */
894 static int mov_write_string_data_tag(ByteIOContext *pb, MOVContext* mov,
895                                      AVFormatContext *s, const char *data)
896 {
897     int pos = url_ftell(pb);
898     put_be32(pb, 0); /* size */
899     put_tag(pb, "data");
900     put_be32(pb, 1);
901     put_be32(pb, 0);
902     put_buffer(pb, data, strlen(data));
903     return updateSize(pb, pos);
904 }
905
906 /* iTunes name of the song/movie */
907 static int mov_write_nam_tag(ByteIOContext *pb, MOVContext* mov,
908                              AVFormatContext *s)
909 {
910     int size = 0;
911     if ( s->title[0] ) {
912         int pos = url_ftell(pb);
913         put_be32(pb, 0); /* size */
914         put_tag(pb, "\251nam");
915         mov_write_string_data_tag(pb, mov, s, s->title);
916         size = updateSize(pb, pos);
917     }
918     return size;
919 }
920
921 /* iTunes name of the artist/performer */
922 static int mov_write_ART_tag(ByteIOContext *pb, MOVContext* mov,
923                              AVFormatContext *s)
924 {
925     int size = 0;
926     if ( s->author[0] ) {
927         int pos = url_ftell(pb);
928         put_be32(pb, 0); /* size */
929         put_tag(pb, "\251ART");
930         // we use the author here as this is the only thing that we have...
931         mov_write_string_data_tag(pb, mov, s, s->author);
932         size = updateSize(pb, pos);
933     }
934     return size;
935 }
936
937 /* iTunes name of the writer */
938 static int mov_write_wrt_tag(ByteIOContext *pb, MOVContext* mov,
939                              AVFormatContext *s)
940 {
941     int size = 0;
942     if ( s->author[0] ) {
943         int pos = url_ftell(pb);
944         put_be32(pb, 0); /* size */
945         put_tag(pb, "\251wrt");
946         mov_write_string_data_tag(pb, mov, s, s->author);
947         size = updateSize(pb, pos);
948     }
949     return size;
950 }
951
952 /* iTunes name of the album */
953 static int mov_write_alb_tag(ByteIOContext *pb, MOVContext* mov,
954                              AVFormatContext *s)
955 {
956     int size = 0;
957     if ( s->album[0] ) {
958         int pos = url_ftell(pb);
959         put_be32(pb, 0); /* size */
960         put_tag(pb, "\251alb");
961         mov_write_string_data_tag(pb, mov, s, s->album);
962         size = updateSize(pb, pos);
963     }
964     return size;
965 }
966
967 /* iTunes year */
968 static int mov_write_day_tag(ByteIOContext *pb, MOVContext* mov,
969                              AVFormatContext *s)
970 {
971     char year[5];
972     int size = 0;
973     if ( s->year ) {
974         int pos = url_ftell(pb);
975         put_be32(pb, 0); /* size */
976         put_tag(pb, "\251day");
977         snprintf(year, 5, "%04d", s->year);
978         mov_write_string_data_tag(pb, mov, s, year);
979         size = updateSize(pb, pos);
980     }
981     return size;
982 }
983
984 /* iTunes tool used to create the file */
985 static int mov_write_too_tag(ByteIOContext *pb, MOVContext* mov,
986                              AVFormatContext *s)
987 {
988     int pos = url_ftell(pb);
989     put_be32(pb, 0); /* size */
990     put_tag(pb, "\251too");
991     mov_write_string_data_tag(pb, mov, s, LIBAVFORMAT_IDENT);
992     return updateSize(pb, pos);
993 }
994
995 /* iTunes comment */
996 static int mov_write_cmt_tag(ByteIOContext *pb, MOVContext* mov,
997                              AVFormatContext *s)
998 {
999     int size = 0;
1000     if ( s->comment[0] ) {
1001         int pos = url_ftell(pb);
1002         put_be32(pb, 0); /* size */
1003         put_tag(pb, "\251cmt");
1004         mov_write_string_data_tag(pb, mov, s, s->comment);
1005         size = updateSize(pb, pos);
1006     }
1007     return size;
1008 }
1009
1010 /* iTunes custom genre */
1011 static int mov_write_gen_tag(ByteIOContext *pb, MOVContext* mov,
1012                              AVFormatContext *s)
1013 {
1014     int size = 0;
1015     if ( s->genre[0] ) {
1016         int pos = url_ftell(pb);
1017         put_be32(pb, 0); /* size */
1018         put_tag(pb, "\251gen");
1019         mov_write_string_data_tag(pb, mov, s, s->genre);
1020         size = updateSize(pb, pos);
1021     }
1022     return size;
1023 }
1024
1025 /* iTunes track number */
1026 static int mov_write_trkn_tag(ByteIOContext *pb, MOVContext* mov,
1027                               AVFormatContext *s)
1028 {
1029     int size = 0;
1030     if ( s->track ) {
1031         int pos = url_ftell(pb);
1032         put_be32(pb, 0); /* size */
1033         put_tag(pb, "trkn");
1034         {
1035             int pos = url_ftell(pb);
1036             put_be32(pb, 0); /* size */
1037             put_tag(pb, "data");
1038             put_be32(pb, 0);        // 8 bytes empty
1039             put_be32(pb, 0);
1040             put_be16(pb, 0);        // empty
1041             put_be16(pb, s->track); // track number
1042             put_be16(pb, 0);        // total track number
1043             put_be16(pb, 0);        // empty
1044             updateSize(pb, pos);
1045         }
1046         size = updateSize(pb, pos);
1047     }
1048     return size;
1049 }
1050
1051 /* iTunes meta data list */
1052 static int mov_write_ilst_tag(ByteIOContext *pb, MOVContext* mov,
1053                               AVFormatContext *s)
1054 {
1055     int pos = url_ftell(pb);
1056     put_be32(pb, 0); /* size */
1057     put_tag(pb, "ilst");
1058     mov_write_nam_tag(pb, mov, s);
1059     mov_write_ART_tag(pb, mov, s);
1060     mov_write_wrt_tag(pb, mov, s);
1061     mov_write_alb_tag(pb, mov, s);
1062     mov_write_day_tag(pb, mov, s);
1063     mov_write_too_tag(pb, mov, s);
1064     mov_write_cmt_tag(pb, mov, s);
1065     mov_write_gen_tag(pb, mov, s);
1066     mov_write_trkn_tag(pb, mov, s);
1067     return updateSize(pb, pos);
1068 }
1069
1070 /* iTunes meta data tag */
1071 static int mov_write_meta_tag(ByteIOContext *pb, MOVContext* mov,
1072                               AVFormatContext *s)
1073 {
1074     int size = 0;
1075
1076     // only save meta tag if required
1077     if ( s->title[0] || s->author[0] || s->album[0] || s->year || 
1078          s->comment[0] || s->genre[0] || s->track ) {
1079         int pos = url_ftell(pb);
1080         put_be32(pb, 0); /* size */
1081         put_tag(pb, "meta");
1082         put_be32(pb, 0);
1083         mov_write_itunes_hdlr_tag(pb, mov, s);
1084         mov_write_ilst_tag(pb, mov, s);
1085         size = updateSize(pb, pos);
1086     }
1087     return size;
1088 }
1089     
1090 static int mov_write_udta_tag(ByteIOContext *pb, MOVContext* mov,
1091                               AVFormatContext *s)
1092 {
1093     int pos = url_ftell(pb);
1094     int i;
1095
1096     put_be32(pb, 0); /* size */
1097     put_tag(pb, "udta");
1098
1099     /* iTunes meta data */
1100     mov_write_meta_tag(pb, mov, s);
1101
1102     /* Requirements */
1103     for (i=0; i<MAX_STREAMS; i++) {
1104         if(mov->tracks[i].entry <= 0) continue;
1105         if (mov->tracks[i].enc->codec_id == CODEC_ID_AAC ||
1106             mov->tracks[i].enc->codec_id == CODEC_ID_MPEG4) {
1107             int pos = url_ftell(pb);
1108             put_be32(pb, 0); /* size */
1109             put_tag(pb, "\251req");
1110             put_be16(pb, sizeof("QuickTime 6.0 or greater") - 1);
1111             put_be16(pb, 0);
1112             put_buffer(pb, "QuickTime 6.0 or greater",
1113                        sizeof("QuickTime 6.0 or greater") - 1);
1114             updateSize(pb, pos);
1115             break;
1116         }
1117     }
1118
1119     /* Encoder */
1120     if(mov->tracks[0].enc && !(mov->tracks[0].enc->flags & CODEC_FLAG_BITEXACT))
1121     {
1122         int pos = url_ftell(pb);
1123         put_be32(pb, 0); /* size */
1124         put_tag(pb, "\251enc");
1125         put_be16(pb, sizeof(LIBAVFORMAT_IDENT) - 1); /* string length */
1126         put_be16(pb, 0);
1127         put_buffer(pb, LIBAVFORMAT_IDENT, sizeof(LIBAVFORMAT_IDENT) - 1);
1128         updateSize(pb, pos);
1129     }
1130
1131     if( s->title[0] )
1132     {
1133         int pos = url_ftell(pb);
1134         put_be32(pb, 0); /* size */
1135         put_tag(pb, "\251nam");
1136         put_be16(pb, strlen(s->title)); /* string length */
1137         put_be16(pb, 0);
1138         put_buffer(pb, s->title, strlen(s->title));
1139         updateSize(pb, pos);
1140     }
1141
1142     if( s->author[0] )
1143     {
1144         int pos = url_ftell(pb);
1145         put_be32(pb, 0); /* size */
1146         put_tag(pb, /*"\251aut"*/ "\251day" );
1147         put_be16(pb, strlen(s->author)); /* string length */
1148         put_be16(pb, 0);
1149         put_buffer(pb, s->author, strlen(s->author));
1150         updateSize(pb, pos);
1151     }
1152
1153     if( s->comment[0] )
1154     {
1155         int pos = url_ftell(pb);
1156         put_be32(pb, 0); /* size */
1157         put_tag(pb, "\251des");
1158         put_be16(pb, strlen(s->comment)); /* string length */
1159         put_be16(pb, 0);
1160         put_buffer(pb, s->comment, strlen(s->comment));
1161         updateSize(pb, pos);
1162     }
1163
1164     return updateSize(pb, pos);
1165 }
1166
1167 static int mov_write_moov_tag(ByteIOContext *pb, MOVContext *mov,
1168                               AVFormatContext *s)
1169 {
1170     int pos, i;
1171     pos = url_ftell(pb);
1172     put_be32(pb, 0); /* size placeholder*/
1173     put_tag(pb, "moov");
1174     mov->timescale = globalTimescale;
1175
1176     for (i=0; i<MAX_STREAMS; i++) {
1177         if(mov->tracks[i].entry <= 0) continue;
1178
1179         if(mov->tracks[i].enc->codec_type == CODEC_TYPE_VIDEO) {
1180             mov->tracks[i].timescale = mov->tracks[i].enc->time_base.den;
1181             mov->tracks[i].sampleDuration = mov->tracks[i].enc->time_base.num;
1182         }
1183         else if(mov->tracks[i].enc->codec_type == CODEC_TYPE_AUDIO) {
1184             /* If AMR, track timescale = 8000, AMR_WB = 16000 */
1185             if(mov->tracks[i].enc->codec_id == CODEC_ID_AMR_NB) {
1186                 mov->tracks[i].sampleDuration = 160;  // Bytes per chunk
1187                 mov->tracks[i].timescale = 8000;
1188             }
1189             else {
1190                 mov->tracks[i].timescale = mov->tracks[i].enc->sample_rate;
1191                 mov->tracks[i].sampleDuration = mov->tracks[i].enc->frame_size;
1192             }
1193         }
1194
1195         mov->tracks[i].trackDuration = 
1196             mov->tracks[i].sampleCount * mov->tracks[i].sampleDuration;
1197         mov->tracks[i].time = mov->time;
1198         mov->tracks[i].trackID = i+1;
1199     }
1200
1201     mov_write_mvhd_tag(pb, mov);
1202     //mov_write_iods_tag(pb, mov);
1203     for (i=0; i<MAX_STREAMS; i++) {
1204         if(mov->tracks[i].entry > 0) {
1205             mov_write_trak_tag(pb, &(mov->tracks[i]));
1206         }
1207     }
1208
1209     mov_write_udta_tag(pb, mov, s);
1210
1211     return updateSize(pb, pos);
1212 }
1213
1214 int mov_write_mdat_tag(ByteIOContext *pb, MOVContext* mov)
1215 {
1216     mov->mdat_pos = url_ftell(pb); 
1217     put_be32(pb, 0); /* size placeholder*/
1218     put_tag(pb, "mdat");
1219     return 0;
1220 }
1221
1222 /* TODO: This needs to be more general */
1223 int mov_write_ftyp_tag(ByteIOContext *pb, AVFormatContext *s)
1224 {
1225     MOVContext *mov = s->priv_data;
1226
1227     put_be32(pb, 0x14 ); /* size */
1228     put_tag(pb, "ftyp");
1229
1230     if ( mov->mode == MODE_3GP )
1231         put_tag(pb, "3gp4");
1232     else if ( mov->mode == MODE_3G2 )
1233         put_tag(pb, "3g2a");
1234     else if ( mov->mode == MODE_PSP )
1235         put_tag(pb, "MSNV");
1236     else
1237         put_tag(pb, "isom");
1238
1239     put_be32(pb, 0x200 );
1240
1241     if ( mov->mode == MODE_3GP )
1242         put_tag(pb, "3gp4");
1243     else if ( mov->mode == MODE_3G2 )
1244         put_tag(pb, "3g2a");
1245     else if ( mov->mode == MODE_PSP )
1246         put_tag(pb, "MSNV");
1247     else
1248         put_tag(pb, "mp41");
1249
1250     return 0x14;
1251 }
1252
1253 static void mov_write_uuidprof_tag(ByteIOContext *pb, AVFormatContext *s)
1254 {
1255     int AudioRate = s->streams[1]->codec.sample_rate;
1256     int FrameRate = ((s->streams[0]->codec.time_base.den) * (0x10000))/ (s->streams[0]->codec.time_base.num);
1257  
1258     //printf("audiorate = %d\n",AudioRate);
1259     //printf("framerate = %d / %d = 0x%x\n",s->streams[0]->codec.time_base.den,s->streams[0]->codec.time_base.num,FrameRate);
1260
1261     put_be32(pb, 0x94 ); /* size */
1262     put_tag(pb, "uuid");
1263     put_tag(pb, "PROF");
1264
1265     put_be32(pb, 0x21d24fce ); /* 96 bit UUID */
1266     put_be32(pb, 0xbb88695c );
1267     put_be32(pb, 0xfac9c740 );
1268
1269     put_be32(pb, 0x0 );  /* ? */
1270     put_be32(pb, 0x3 );  /* 3 sections ? */
1271
1272     put_be32(pb, 0x14 ); /* size */
1273     put_tag(pb, "FPRF");
1274     put_be32(pb, 0x0 );  /* ? */
1275     put_be32(pb, 0x0 );  /* ? */
1276     put_be32(pb, 0x0 );  /* ? */
1277
1278     put_be32(pb, 0x2c );  /* size */
1279     put_tag(pb, "APRF");   /* audio */
1280     put_be32(pb, 0x0 );
1281     put_be32(pb, 0x2 );
1282     put_tag(pb, "mp4a");
1283     put_be32(pb, 0x20f );
1284     put_be32(pb, 0x0 );
1285     put_be32(pb, 0x40 );
1286     put_be32(pb, 0x40 );
1287     put_be32(pb, AudioRate ); //24000   ... audio rate?
1288     put_be32(pb, 0x2 );
1289
1290     put_be32(pb, 0x34 );  /* size */
1291     put_tag(pb, "VPRF");   /* video */
1292     put_be32(pb, 0x0 );
1293     put_be32(pb, 0x1 );
1294     put_tag(pb, "mp4v");
1295     put_be32(pb, 0x103 );
1296     put_be32(pb, 0x0 );
1297     put_be32(pb, 0xc0 );
1298     put_be32(pb, 0xc0 );
1299     put_be32(pb, FrameRate);  // was 0xefc29   
1300     put_be32(pb, FrameRate );  // was 0xefc29
1301     put_be16(pb, s->streams[0]->codec.width);
1302     put_be16(pb, s->streams[0]->codec.height);
1303     put_be32(pb, 0x010001 );
1304 }
1305
1306 static int mov_write_header(AVFormatContext *s)
1307 {
1308     ByteIOContext *pb = &s->pb;
1309     MOVContext *mov = s->priv_data;
1310     int i;
1311
1312     for(i=0; i<s->nb_streams; i++){
1313         AVCodecContext *c= &s->streams[i]->codec;
1314
1315         if      (c->codec_type == CODEC_TYPE_VIDEO){
1316             if (!codec_get_tag(codec_movvideo_tags, c->codec_id)){
1317                 if(!codec_get_tag(codec_bmp_tags, c->codec_id))
1318                     return -1;
1319                 else
1320                     av_log(s, AV_LOG_INFO, "Warning, using MS style video codec tag, the file may be unplayable!\n");
1321             }
1322         }else if(c->codec_type == CODEC_TYPE_AUDIO){
1323             if (!codec_get_tag(codec_movaudio_tags, c->codec_id)){
1324                 if(!codec_get_tag(codec_wav_tags, c->codec_id))
1325                     return -1;
1326                 else
1327                     av_log(s, AV_LOG_INFO, "Warning, using MS style audio codec tag, the file may be unplayable!\n");
1328             }
1329         }
1330     }
1331
1332     /* Default mode == MP4 */
1333     mov->mode = MODE_MP4;
1334
1335     if (s->oformat != NULL) {
1336         if (!strcmp("3gp", s->oformat->name)) mov->mode = MODE_3GP;
1337         else if (!strcmp("3g2", s->oformat->name)) mov->mode = MODE_3G2;
1338         else if (!strcmp("mov", s->oformat->name)) mov->mode = MODE_MOV;
1339         else if (!strcmp("psp", s->oformat->name)) mov->mode = MODE_PSP;
1340
1341         if ( mov->mode == MODE_3GP || mov->mode == MODE_3G2 ||
1342              mov->mode == MODE_MP4 || mov->mode == MODE_PSP )
1343             mov_write_ftyp_tag(pb,s);
1344         if ( mov->mode == MODE_PSP ) {
1345             if ( s->nb_streams != 2 ) {
1346                 av_log(s, AV_LOG_ERROR, "PSP mode need one video and one audio stream\n");
1347                 return -1;
1348             }
1349             mov_write_uuidprof_tag(pb,s);
1350         }
1351     }
1352
1353     for (i=0; i<MAX_STREAMS; i++) {
1354         mov->tracks[i].mode = mov->mode;
1355     }
1356
1357     put_flush_packet(pb);
1358
1359     return 0;
1360 }
1361
1362 static int mov_write_packet(AVFormatContext *s, AVPacket *pkt)
1363 {
1364     MOVContext *mov = s->priv_data;
1365     ByteIOContext *pb = &s->pb;
1366     AVCodecContext *enc = &s->streams[pkt->stream_index]->codec;
1367     MOVTrack* trk = &mov->tracks[pkt->stream_index];
1368     int cl, id;
1369     unsigned int samplesInChunk = 0;
1370     int size= pkt->size;
1371
1372     if (url_is_streamed(&s->pb)) return 0; /* Can't handle that */
1373     if (!size) return 0; /* Discard 0 sized packets */
1374
1375     if (enc->codec_type == CODEC_TYPE_VIDEO ) {
1376         samplesInChunk = 1;
1377     }
1378     else if (enc->codec_type == CODEC_TYPE_AUDIO ) {
1379         if( enc->codec_id == CODEC_ID_AMR_NB) {
1380             /* We must find out how many AMR blocks there are in one packet */
1381             static uint16_t packed_size[16] =
1382                 {13, 14, 16, 18, 20, 21, 27, 32, 6, 0, 0, 0, 0, 0, 0, 0};
1383             int len = 0;
1384
1385             while (len < size && samplesInChunk < 100) {
1386                 len += packed_size[(pkt->data[len] >> 3) & 0x0F];
1387                 samplesInChunk++;
1388             }
1389         }
1390         else if(enc->codec_id == CODEC_ID_PCM_ALAW) {
1391             samplesInChunk = size/enc->channels;
1392         }
1393         else if(enc->codec_id == CODEC_ID_PCM_S16BE || enc->codec_id == CODEC_ID_PCM_S16LE) {
1394             samplesInChunk = size/(2*enc->channels);
1395         }           
1396         else {
1397             samplesInChunk = 1;
1398         }
1399     }
1400
1401     if ((enc->codec_id == CODEC_ID_MPEG4 || enc->codec_id == CODEC_ID_AAC)
1402         && trk->vosLen == 0) {
1403 //        assert(enc->extradata_size);
1404
1405         trk->vosLen = enc->extradata_size;
1406         trk->vosData = av_malloc(trk->vosLen);
1407         memcpy(trk->vosData, enc->extradata, trk->vosLen);
1408     }
1409
1410     cl = trk->entry / MOV_INDEX_CLUSTER_SIZE;
1411     id = trk->entry % MOV_INDEX_CLUSTER_SIZE;
1412
1413     if (trk->ents_allocated <= trk->entry) {
1414         trk->cluster = av_realloc(trk->cluster, (cl+1)*sizeof(void*)); 
1415         if (!trk->cluster)
1416             return -1;
1417         trk->cluster[cl] = av_malloc(MOV_INDEX_CLUSTER_SIZE*sizeof(MOVIentry));
1418         if (!trk->cluster[cl])
1419             return -1;
1420         trk->ents_allocated += MOV_INDEX_CLUSTER_SIZE;
1421     }
1422     if (mov->mdat_written == 0) {
1423         mov_write_mdat_tag(pb, mov);
1424         mov->mdat_written = 1;
1425         mov->time = s->timestamp + 0x7C25B080; //1970 based -> 1904 based
1426     }
1427
1428     trk->cluster[cl][id].pos = url_ftell(pb);
1429     trk->cluster[cl][id].samplesInChunk = samplesInChunk;
1430     trk->cluster[cl][id].size = size;
1431     trk->cluster[cl][id].entries = samplesInChunk;
1432     if(enc->codec_type == CODEC_TYPE_VIDEO) {
1433         trk->cluster[cl][id].key_frame = !!(pkt->flags & PKT_FLAG_KEY);
1434         if(trk->cluster[cl][id].key_frame)
1435             trk->hasKeyframes = 1;
1436     }
1437     trk->enc = enc;
1438     trk->entry++;
1439     trk->sampleCount += samplesInChunk;
1440     trk->mdat_size += size;
1441
1442     put_buffer(pb, pkt->data, size);
1443
1444     put_flush_packet(pb);
1445     return 0;
1446 }
1447
1448 static int mov_write_trailer(AVFormatContext *s)
1449 {
1450     MOVContext *mov = s->priv_data;
1451     ByteIOContext *pb = &s->pb;
1452     int res = 0;
1453     int i, j;
1454
1455     offset_t moov_pos = url_ftell(pb);
1456
1457     /* Write size of mdat tag */
1458     for (i=0, j=0; i<MAX_STREAMS; i++) {
1459         if(mov->tracks[i].ents_allocated > 0) {
1460             j += mov->tracks[i].mdat_size;
1461         }
1462     }
1463     url_fseek(pb, mov->mdat_pos, SEEK_SET);
1464     put_be32(pb, j+8);
1465     url_fseek(pb, moov_pos, SEEK_SET);
1466
1467     mov_write_moov_tag(pb, mov, s);
1468
1469     for (i=0; i<MAX_STREAMS; i++) {
1470         for (j=0; j<mov->tracks[i].ents_allocated/MOV_INDEX_CLUSTER_SIZE; j++) {
1471             av_free(mov->tracks[i].cluster[j]);
1472         }
1473         av_free(mov->tracks[i].cluster);
1474         if( mov->tracks[i].vosLen ) av_free( mov->tracks[i].vosData );
1475
1476         mov->tracks[i].cluster = NULL;
1477         mov->tracks[i].ents_allocated = mov->tracks[i].entry = 0;
1478     }
1479
1480     put_flush_packet(pb);
1481
1482     return res;
1483 }
1484
1485 static AVOutputFormat mov_oformat = {
1486     "mov",
1487     "mov format",
1488     NULL,
1489     "mov",
1490     sizeof(MOVContext),
1491     CODEC_ID_AAC,
1492     CODEC_ID_MPEG4,
1493     mov_write_header,
1494     mov_write_packet,
1495     mov_write_trailer,
1496     .flags = AVFMT_GLOBALHEADER,
1497 };
1498
1499 static AVOutputFormat _3gp_oformat = {
1500     "3gp",
1501     "3gp format",
1502     NULL,
1503     "3gp",
1504     sizeof(MOVContext),
1505     CODEC_ID_AMR_NB,
1506     CODEC_ID_H263,
1507     mov_write_header,
1508     mov_write_packet,
1509     mov_write_trailer,
1510     .flags = AVFMT_GLOBALHEADER,
1511 };
1512
1513 static AVOutputFormat mp4_oformat = {
1514     "mp4",
1515     "mp4 format",
1516     "application/mp4",
1517     "mp4,m4a",
1518     sizeof(MOVContext),
1519     CODEC_ID_AAC,
1520     CODEC_ID_MPEG4,
1521     mov_write_header,
1522     mov_write_packet,
1523     mov_write_trailer,
1524     .flags = AVFMT_GLOBALHEADER,
1525 };
1526
1527 static AVOutputFormat psp_oformat = {
1528     "psp",
1529     "psp mp4 format",
1530     NULL,
1531     "mp4,psp",
1532     sizeof(MOVContext),
1533     CODEC_ID_AAC,
1534     CODEC_ID_MPEG4,
1535     mov_write_header,
1536     mov_write_packet,
1537     mov_write_trailer,
1538 //    .flags = AVFMT_GLOBALHEADER,
1539 };
1540
1541 static AVOutputFormat _3g2_oformat = {
1542     "3g2",
1543     "3gp2 format",
1544     NULL,
1545     "3g2",
1546     sizeof(MOVContext),
1547     CODEC_ID_AMR_NB,
1548     CODEC_ID_H263,
1549     mov_write_header,
1550     mov_write_packet,
1551     mov_write_trailer,
1552     .flags = AVFMT_GLOBALHEADER,
1553 };
1554
1555 int movenc_init(void)
1556 {
1557     av_register_output_format(&mov_oformat);
1558     av_register_output_format(&_3gp_oformat);
1559     av_register_output_format(&mp4_oformat);
1560     av_register_output_format(&psp_oformat);
1561     av_register_output_format(&_3g2_oformat);
1562     return 0;
1563 }