4ca6aea9f7efe84e617fe50f8deb4707dbf859d9
[ffmpeg.git] / libavformat / flvenc.c
1 /*
2  * FLV muxer
3  * Copyright (c) 2003 The FFmpeg Project
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include "libavutil/intreadwrite.h"
23 #include "libavutil/dict.h"
24 #include "libavutil/intfloat.h"
25 #include "libavutil/avassert.h"
26 #include "libavutil/mathematics.h"
27 #include "avio_internal.h"
28 #include "avio.h"
29 #include "avc.h"
30 #include "avformat.h"
31 #include "flv.h"
32 #include "internal.h"
33 #include "metadata.h"
34 #include "libavutil/opt.h"
35 #include "libavcodec/put_bits.h"
36 #include "libavcodec/aacenctab.h"
37
38
39 static const AVCodecTag flv_video_codec_ids[] = {
40     { AV_CODEC_ID_FLV1,     FLV_CODECID_H263 },
41     { AV_CODEC_ID_H263,     FLV_CODECID_REALH263 },
42     { AV_CODEC_ID_MPEG4,    FLV_CODECID_MPEG4 },
43     { AV_CODEC_ID_FLASHSV,  FLV_CODECID_SCREEN },
44     { AV_CODEC_ID_FLASHSV2, FLV_CODECID_SCREEN2 },
45     { AV_CODEC_ID_VP6F,     FLV_CODECID_VP6 },
46     { AV_CODEC_ID_VP6,      FLV_CODECID_VP6 },
47     { AV_CODEC_ID_VP6A,     FLV_CODECID_VP6A },
48     { AV_CODEC_ID_H264,     FLV_CODECID_H264 },
49     { AV_CODEC_ID_NONE,     0 }
50 };
51
52 static const AVCodecTag flv_audio_codec_ids[] = {
53     { AV_CODEC_ID_MP3,        FLV_CODECID_MP3        >> FLV_AUDIO_CODECID_OFFSET },
54     { AV_CODEC_ID_PCM_U8,     FLV_CODECID_PCM        >> FLV_AUDIO_CODECID_OFFSET },
55     { AV_CODEC_ID_PCM_S16BE,  FLV_CODECID_PCM        >> FLV_AUDIO_CODECID_OFFSET },
56     { AV_CODEC_ID_PCM_S16LE,  FLV_CODECID_PCM_LE     >> FLV_AUDIO_CODECID_OFFSET },
57     { AV_CODEC_ID_ADPCM_SWF,  FLV_CODECID_ADPCM      >> FLV_AUDIO_CODECID_OFFSET },
58     { AV_CODEC_ID_AAC,        FLV_CODECID_AAC        >> FLV_AUDIO_CODECID_OFFSET },
59     { AV_CODEC_ID_NELLYMOSER, FLV_CODECID_NELLYMOSER >> FLV_AUDIO_CODECID_OFFSET },
60     { AV_CODEC_ID_PCM_MULAW,  FLV_CODECID_PCM_MULAW  >> FLV_AUDIO_CODECID_OFFSET },
61     { AV_CODEC_ID_PCM_ALAW,   FLV_CODECID_PCM_ALAW   >> FLV_AUDIO_CODECID_OFFSET },
62     { AV_CODEC_ID_SPEEX,      FLV_CODECID_SPEEX      >> FLV_AUDIO_CODECID_OFFSET },
63     { AV_CODEC_ID_NONE,       0 }
64 };
65
66 typedef enum {
67     FLV_AAC_SEQ_HEADER_DETECT = (1 << 0),
68     FLV_NO_SEQUENCE_END = (1 << 1),
69     FLV_ADD_KEYFRAME_INDEX = (1 << 2),
70 } FLVFlags;
71
72 typedef struct FLVFileposition {
73     int64_t keyframe_position;
74     double keyframe_timestamp;
75     struct FLVFileposition *next;
76 } FLVFileposition;
77
78 typedef struct FLVContext {
79     AVClass *av_class;
80     int     reserved;
81     int64_t duration_offset;
82     int64_t filesize_offset;
83     int64_t duration;
84     int64_t delay;      ///< first dts delay (needed for AVC & Speex)
85
86     int64_t datastart_offset;
87     int64_t datasize_offset;
88     int64_t datasize;
89     int64_t videosize_offset;
90     int64_t videosize;
91     int64_t audiosize_offset;
92     int64_t audiosize;
93
94     int64_t metadata_size_pos;
95     int64_t metadata_totalsize_pos;
96     int64_t metadata_totalsize;
97     int64_t keyframe_index_size;
98
99     int64_t lasttimestamp_offset;
100     double lasttimestamp;
101     int64_t lastkeyframetimestamp_offset;
102     double lastkeyframetimestamp;
103     int64_t lastkeyframelocation_offset;
104     int64_t lastkeyframelocation;
105
106     int acurframeindex;
107     int64_t keyframes_info_offset;
108
109     int64_t filepositions_count;
110     FLVFileposition *filepositions;
111     FLVFileposition *head_filepositions;
112
113     AVCodecParameters *audio_par;
114     AVCodecParameters *video_par;
115     double framerate;
116     AVCodecParameters *data_par;
117
118     int flags;
119 } FLVContext;
120
121 typedef struct FLVStreamContext {
122     int64_t last_ts;    ///< last timestamp for each stream
123 } FLVStreamContext;
124
125 static int get_audio_flags(AVFormatContext *s, AVCodecParameters *par)
126 {
127     int flags = (par->bits_per_coded_sample == 16) ? FLV_SAMPLESSIZE_16BIT
128                                                    : FLV_SAMPLESSIZE_8BIT;
129
130     if (par->codec_id == AV_CODEC_ID_AAC) // specs force these parameters
131         return FLV_CODECID_AAC | FLV_SAMPLERATE_44100HZ |
132                FLV_SAMPLESSIZE_16BIT | FLV_STEREO;
133     else if (par->codec_id == AV_CODEC_ID_SPEEX) {
134         if (par->sample_rate != 16000) {
135             av_log(s, AV_LOG_ERROR,
136                    "FLV only supports wideband (16kHz) Speex audio\n");
137             return AVERROR(EINVAL);
138         }
139         if (par->channels != 1) {
140             av_log(s, AV_LOG_ERROR, "FLV only supports mono Speex audio\n");
141             return AVERROR(EINVAL);
142         }
143         return FLV_CODECID_SPEEX | FLV_SAMPLERATE_11025HZ | FLV_SAMPLESSIZE_16BIT;
144     } else {
145         switch (par->sample_rate) {
146         case 48000:
147             // 48khz mp3 is stored with 44k1 samplerate identifer
148             if (par->codec_id == AV_CODEC_ID_MP3) {
149                 flags |= FLV_SAMPLERATE_44100HZ;
150                 break;
151             } else {
152                 goto error;
153             }
154         case 44100:
155             flags |= FLV_SAMPLERATE_44100HZ;
156             break;
157         case 22050:
158             flags |= FLV_SAMPLERATE_22050HZ;
159             break;
160         case 11025:
161             flags |= FLV_SAMPLERATE_11025HZ;
162             break;
163         case 16000: // nellymoser only
164         case  8000: // nellymoser only
165         case  5512: // not MP3
166             if (par->codec_id != AV_CODEC_ID_MP3) {
167                 flags |= FLV_SAMPLERATE_SPECIAL;
168                 break;
169             }
170         default:
171 error:
172             av_log(s, AV_LOG_ERROR,
173                    "FLV does not support sample rate %d, "
174                    "choose from (44100, 22050, 11025)\n", par->sample_rate);
175             return AVERROR(EINVAL);
176         }
177     }
178
179     if (par->channels > 1)
180         flags |= FLV_STEREO;
181
182     switch (par->codec_id) {
183     case AV_CODEC_ID_MP3:
184         flags |= FLV_CODECID_MP3    | FLV_SAMPLESSIZE_16BIT;
185         break;
186     case AV_CODEC_ID_PCM_U8:
187         flags |= FLV_CODECID_PCM    | FLV_SAMPLESSIZE_8BIT;
188         break;
189     case AV_CODEC_ID_PCM_S16BE:
190         flags |= FLV_CODECID_PCM    | FLV_SAMPLESSIZE_16BIT;
191         break;
192     case AV_CODEC_ID_PCM_S16LE:
193         flags |= FLV_CODECID_PCM_LE | FLV_SAMPLESSIZE_16BIT;
194         break;
195     case AV_CODEC_ID_ADPCM_SWF:
196         flags |= FLV_CODECID_ADPCM  | FLV_SAMPLESSIZE_16BIT;
197         break;
198     case AV_CODEC_ID_NELLYMOSER:
199         if (par->sample_rate == 8000)
200             flags |= FLV_CODECID_NELLYMOSER_8KHZ_MONO  | FLV_SAMPLESSIZE_16BIT;
201         else if (par->sample_rate == 16000)
202             flags |= FLV_CODECID_NELLYMOSER_16KHZ_MONO | FLV_SAMPLESSIZE_16BIT;
203         else
204             flags |= FLV_CODECID_NELLYMOSER            | FLV_SAMPLESSIZE_16BIT;
205         break;
206     case AV_CODEC_ID_PCM_MULAW:
207         flags = FLV_CODECID_PCM_MULAW | FLV_SAMPLERATE_SPECIAL | FLV_SAMPLESSIZE_16BIT;
208         break;
209     case AV_CODEC_ID_PCM_ALAW:
210         flags = FLV_CODECID_PCM_ALAW  | FLV_SAMPLERATE_SPECIAL | FLV_SAMPLESSIZE_16BIT;
211         break;
212     case 0:
213         flags |= par->codec_tag << 4;
214         break;
215     default:
216         av_log(s, AV_LOG_ERROR, "Audio codec '%s' not compatible with FLV\n",
217                avcodec_get_name(par->codec_id));
218         return AVERROR(EINVAL);
219     }
220
221     return flags;
222 }
223
224 static void put_amf_string(AVIOContext *pb, const char *str)
225 {
226     size_t len = strlen(str);
227     avio_wb16(pb, len);
228     avio_write(pb, str, len);
229 }
230
231 static void put_avc_eos_tag(AVIOContext *pb, unsigned ts)
232 {
233     avio_w8(pb, FLV_TAG_TYPE_VIDEO);
234     avio_wb24(pb, 5);               /* Tag Data Size */
235     avio_wb24(pb, ts);              /* lower 24 bits of timestamp in ms */
236     avio_w8(pb, (ts >> 24) & 0x7F); /* MSB of ts in ms */
237     avio_wb24(pb, 0);               /* StreamId = 0 */
238     avio_w8(pb, 23);                /* ub[4] FrameType = 1, ub[4] CodecId = 7 */
239     avio_w8(pb, 2);                 /* AVC end of sequence */
240     avio_wb24(pb, 0);               /* Always 0 for AVC EOS. */
241     avio_wb32(pb, 16);              /* Size of FLV tag */
242 }
243
244 static void put_amf_double(AVIOContext *pb, double d)
245 {
246     avio_w8(pb, AMF_DATA_TYPE_NUMBER);
247     avio_wb64(pb, av_double2int(d));
248 }
249
250 static void put_amf_byte(AVIOContext *pb, unsigned char abyte)
251 {
252     avio_w8(pb, abyte);
253 }
254
255 static void put_amf_dword_array(AVIOContext *pb, uint32_t dw)
256 {
257     avio_w8(pb, AMF_DATA_TYPE_ARRAY);
258     avio_wb32(pb, dw);
259 }
260
261 static void put_amf_bool(AVIOContext *pb, int b)
262 {
263     avio_w8(pb, AMF_DATA_TYPE_BOOL);
264     avio_w8(pb, !!b);
265 }
266
267 static void write_metadata(AVFormatContext *s, unsigned int ts)
268 {
269     AVIOContext *pb = s->pb;
270     FLVContext *flv = s->priv_data;
271     int metadata_count = 0;
272     int64_t metadata_count_pos;
273     AVDictionaryEntry *tag = NULL;
274
275     /* write meta_tag */
276     avio_w8(pb, FLV_TAG_TYPE_META);            // tag type META
277     flv->metadata_size_pos = avio_tell(pb);
278     avio_wb24(pb, 0);           // size of data part (sum of all parts below)
279     avio_wb24(pb, ts);          // timestamp
280     avio_wb32(pb, 0);           // reserved
281
282     /* now data of data_size size */
283
284     /* first event name as a string */
285     avio_w8(pb, AMF_DATA_TYPE_STRING);
286     put_amf_string(pb, "onMetaData"); // 12 bytes
287
288     /* mixed array (hash) with size and string/type/data tuples */
289     avio_w8(pb, AMF_DATA_TYPE_MIXEDARRAY);
290     metadata_count_pos = avio_tell(pb);
291     metadata_count = 4 * !!flv->video_par +
292                      5 * !!flv->audio_par +
293                      1 * !!flv->data_par;
294     if (pb->seekable) {
295         metadata_count += 2; // +2 for duration and file size
296     }
297     avio_wb32(pb, metadata_count);
298
299     if (pb->seekable) {
300         put_amf_string(pb, "duration");
301         flv->duration_offset = avio_tell(pb);
302         // fill in the guessed duration, it'll be corrected later if incorrect
303         put_amf_double(pb, s->duration / AV_TIME_BASE);
304     }
305
306     if (flv->video_par) {
307         put_amf_string(pb, "width");
308         put_amf_double(pb, flv->video_par->width);
309
310         put_amf_string(pb, "height");
311         put_amf_double(pb, flv->video_par->height);
312
313         put_amf_string(pb, "videodatarate");
314         put_amf_double(pb, flv->video_par->bit_rate / 1024.0);
315
316         if (flv->framerate != 0.0) {
317             put_amf_string(pb, "framerate");
318             put_amf_double(pb, flv->framerate);
319             metadata_count++;
320         }
321
322         put_amf_string(pb, "videocodecid");
323         put_amf_double(pb, flv->video_par->codec_tag);
324     }
325
326     if (flv->audio_par) {
327         put_amf_string(pb, "audiodatarate");
328         put_amf_double(pb, flv->audio_par->bit_rate / 1024.0);
329
330         put_amf_string(pb, "audiosamplerate");
331         put_amf_double(pb, flv->audio_par->sample_rate);
332
333         put_amf_string(pb, "audiosamplesize");
334         put_amf_double(pb, flv->audio_par->codec_id == AV_CODEC_ID_PCM_U8 ? 8 : 16);
335
336         put_amf_string(pb, "stereo");
337         put_amf_bool(pb, flv->audio_par->channels == 2);
338
339         put_amf_string(pb, "audiocodecid");
340         put_amf_double(pb, flv->audio_par->codec_tag);
341     }
342
343     if (flv->data_par) {
344         put_amf_string(pb, "datastream");
345         put_amf_double(pb, 0.0);
346     }
347
348     ff_standardize_creation_time(s);
349     while ((tag = av_dict_get(s->metadata, "", tag, AV_DICT_IGNORE_SUFFIX))) {
350         if(   !strcmp(tag->key, "width")
351             ||!strcmp(tag->key, "height")
352             ||!strcmp(tag->key, "videodatarate")
353             ||!strcmp(tag->key, "framerate")
354             ||!strcmp(tag->key, "videocodecid")
355             ||!strcmp(tag->key, "audiodatarate")
356             ||!strcmp(tag->key, "audiosamplerate")
357             ||!strcmp(tag->key, "audiosamplesize")
358             ||!strcmp(tag->key, "stereo")
359             ||!strcmp(tag->key, "audiocodecid")
360             ||!strcmp(tag->key, "duration")
361             ||!strcmp(tag->key, "onMetaData")
362             ||!strcmp(tag->key, "datasize")
363             ||!strcmp(tag->key, "lasttimestamp")
364             ||!strcmp(tag->key, "totalframes")
365             ||!strcmp(tag->key, "hasAudio")
366             ||!strcmp(tag->key, "hasVideo")
367             ||!strcmp(tag->key, "hasCuePoints")
368             ||!strcmp(tag->key, "hasMetadata")
369             ||!strcmp(tag->key, "hasKeyframes")
370         ){
371             av_log(s, AV_LOG_DEBUG, "Ignoring metadata for %s\n", tag->key);
372             continue;
373         }
374         put_amf_string(pb, tag->key);
375         avio_w8(pb, AMF_DATA_TYPE_STRING);
376         put_amf_string(pb, tag->value);
377         metadata_count++;
378     }
379
380     if (pb->seekable) {
381         put_amf_string(pb, "filesize");
382         flv->filesize_offset = avio_tell(pb);
383         put_amf_double(pb, 0); // delayed write
384     }
385
386     if (flv->flags & FLV_ADD_KEYFRAME_INDEX) {
387         flv->acurframeindex = 0;
388         flv->keyframe_index_size = 0;
389
390         put_amf_string(pb, "hasVideo");
391         put_amf_bool(pb, !!flv->video_par);
392         metadata_count++;
393
394         put_amf_string(pb, "hasKeyframes");
395         put_amf_bool(pb, 1);
396         metadata_count++;
397
398         put_amf_string(pb, "hasAudio");
399         put_amf_bool(pb, !!flv->audio_par);
400         metadata_count++;
401
402         put_amf_string(pb, "hasMetadata");
403         put_amf_bool(pb, 1);
404         metadata_count++;
405
406         put_amf_string(pb, "canSeekToEnd");
407         put_amf_bool(pb, 1);
408         metadata_count++;
409
410         put_amf_string(pb, "datasize");
411         flv->datasize_offset = avio_tell(pb);
412         flv->datasize = 0;
413         put_amf_double(pb, flv->datasize);
414         metadata_count++;
415
416         put_amf_string(pb, "videosize");
417         flv->videosize_offset = avio_tell(pb);
418         flv->videosize = 0;
419         put_amf_double(pb, flv->videosize);
420         metadata_count++;
421
422         put_amf_string(pb, "audiosize");
423         flv->audiosize_offset = avio_tell(pb);
424         flv->audiosize = 0;
425         put_amf_double(pb, flv->audiosize);
426         metadata_count++;
427
428         put_amf_string(pb, "lasttimestamp");
429         flv->lasttimestamp_offset = avio_tell(pb);
430         flv->lasttimestamp = 0;
431         put_amf_double(pb, 0);
432         metadata_count++;
433
434         put_amf_string(pb, "lastkeyframetimestamp");
435         flv->lastkeyframetimestamp_offset = avio_tell(pb);
436         flv->lastkeyframetimestamp = 0;
437         put_amf_double(pb, 0);
438         metadata_count++;
439
440         put_amf_string(pb, "lastkeyframelocation");
441         flv->lastkeyframelocation_offset = avio_tell(pb);
442         flv->lastkeyframelocation = 0;
443         put_amf_double(pb, 0);
444         metadata_count++;
445
446         put_amf_string(pb, "keyframes");
447         put_amf_byte(pb, AMF_DATA_TYPE_OBJECT);
448         metadata_count++;
449
450         flv->keyframes_info_offset = avio_tell(pb);
451     }
452
453     put_amf_string(pb, "");
454     avio_w8(pb, AMF_END_OF_OBJECT);
455
456     /* write total size of tag */
457     flv->metadata_totalsize = avio_tell(pb) - flv->metadata_size_pos - 10;
458
459     avio_seek(pb, metadata_count_pos, SEEK_SET);
460     avio_wb32(pb, metadata_count);
461
462     avio_seek(pb, flv->metadata_size_pos, SEEK_SET);
463     avio_wb24(pb, flv->metadata_totalsize);
464     avio_skip(pb, flv->metadata_totalsize + 10 - 3);
465     flv->metadata_totalsize_pos = avio_tell(pb);
466     avio_wb32(pb, flv->metadata_totalsize + 11);
467 }
468
469 static int unsupported_codec(AVFormatContext *s,
470                              const char* type, int codec_id)
471 {
472     const AVCodecDescriptor *desc = avcodec_descriptor_get(codec_id);
473     av_log(s, AV_LOG_ERROR,
474            "%s codec %s not compatible with flv\n",
475             type,
476             desc ? desc->name : "unknown");
477     return AVERROR(ENOSYS);
478 }
479
480 static void flv_write_codec_header(AVFormatContext* s, AVCodecParameters* par) {
481     int64_t data_size;
482     AVIOContext *pb = s->pb;
483     FLVContext *flv = s->priv_data;
484
485     if (par->codec_id == AV_CODEC_ID_AAC || par->codec_id == AV_CODEC_ID_H264
486             || par->codec_id == AV_CODEC_ID_MPEG4) {
487         int64_t pos;
488         avio_w8(pb,
489                 par->codec_type == AVMEDIA_TYPE_VIDEO ?
490                         FLV_TAG_TYPE_VIDEO : FLV_TAG_TYPE_AUDIO);
491         avio_wb24(pb, 0); // size patched later
492         avio_wb24(pb, 0); // ts
493         avio_w8(pb, 0);   // ts ext
494         avio_wb24(pb, 0); // streamid
495         pos = avio_tell(pb);
496         if (par->codec_id == AV_CODEC_ID_AAC) {
497             avio_w8(pb, get_audio_flags(s, par));
498             avio_w8(pb, 0); // AAC sequence header
499
500             if (!par->extradata_size && (flv->flags & FLV_AAC_SEQ_HEADER_DETECT)) {
501                 PutBitContext pbc;
502                 int samplerate_index;
503                 int channels = flv->audio_par->channels
504                         - (flv->audio_par->channels == 8 ? 1 : 0);
505                 uint8_t data[2];
506
507                 for (samplerate_index = 0; samplerate_index < 16;
508                         samplerate_index++)
509                     if (flv->audio_par->sample_rate
510                             == mpeg4audio_sample_rates[samplerate_index])
511                         break;
512
513                 init_put_bits(&pbc, data, sizeof(data));
514                 put_bits(&pbc, 5, flv->audio_par->profile + 1); //profile
515                 put_bits(&pbc, 4, samplerate_index); //sample rate index
516                 put_bits(&pbc, 4, channels);
517                 put_bits(&pbc, 1, 0); //frame length - 1024 samples
518                 put_bits(&pbc, 1, 0); //does not depend on core coder
519                 put_bits(&pbc, 1, 0); //is not extension
520                 flush_put_bits(&pbc);
521
522                 avio_w8(pb, data[0]);
523                 avio_w8(pb, data[1]);
524
525                 av_log(s, AV_LOG_WARNING, "AAC sequence header: %02x %02x.\n",
526                         data[0], data[1]);
527             }
528             avio_write(pb, par->extradata, par->extradata_size);
529         } else {
530             avio_w8(pb, par->codec_tag | FLV_FRAME_KEY); // flags
531             avio_w8(pb, 0); // AVC sequence header
532             avio_wb24(pb, 0); // composition time
533             ff_isom_write_avcc(pb, par->extradata, par->extradata_size);
534         }
535         data_size = avio_tell(pb) - pos;
536         avio_seek(pb, -data_size - 10, SEEK_CUR);
537         avio_wb24(pb, data_size);
538         avio_skip(pb, data_size + 10 - 3);
539         avio_wb32(pb, data_size + 11); // previous tag size
540     }
541 }
542
543 static int flv_append_keyframe_info(AVFormatContext *s, FLVContext *flv, double ts, int64_t pos)
544 {
545     FLVFileposition *position = av_malloc(sizeof(FLVFileposition));
546
547     if (!position) {
548         av_log(s, AV_LOG_WARNING, "no mem for add keyframe index!\n");
549         return AVERROR(ENOMEM);
550     }
551
552     position->keyframe_timestamp = ts;
553     position->keyframe_position = pos;
554
555     if (!flv->filepositions_count) {
556         flv->filepositions = position;
557         flv->head_filepositions = flv->filepositions;
558         position->next = NULL;
559     } else {
560         flv->filepositions->next = position;
561         position->next = NULL;
562         flv->filepositions = flv->filepositions->next;
563     }
564
565     flv->filepositions_count++;
566
567     return 0;
568 }
569
570 static int shift_data(AVFormatContext *s)
571 {
572     int ret = 0;
573     int n = 0;
574     int64_t metadata_size = 0;
575     FLVContext *flv = s->priv_data;
576     int64_t pos, pos_end = avio_tell(s->pb);
577     uint8_t *buf, *read_buf[2];
578     int read_buf_id = 0;
579     int read_size[2];
580     AVIOContext *read_pb;
581
582     metadata_size = flv->filepositions_count * 9 * 2 + 10; /* filepositions and times value */
583     metadata_size += 2 + 13; /* filepositions String */
584     metadata_size += 2 + 5; /* times String */
585     metadata_size += 3; /* Object end */
586
587     flv->keyframe_index_size = metadata_size;
588
589     if (metadata_size < 0)
590         return metadata_size;
591
592     buf = av_malloc_array(metadata_size, 2);
593     if (!buf) {
594         return AVERROR(ENOMEM);
595     }
596     read_buf[0] = buf;
597     read_buf[1] = buf + metadata_size;
598
599     avio_seek(s->pb, flv->metadata_size_pos, SEEK_SET);
600     avio_wb24(s->pb, flv->metadata_totalsize + metadata_size);
601
602     avio_seek(s->pb, flv->metadata_totalsize_pos, SEEK_SET);
603     avio_wb32(s->pb, flv->metadata_totalsize + 11 + metadata_size);
604     avio_seek(s->pb, pos_end, SEEK_SET);
605
606     /* Shift the data: the AVIO context of the output can only be used for
607      * writing, so we re-open the same output, but for reading. It also avoids
608      * a read/seek/write/seek back and forth. */
609     avio_flush(s->pb);
610     ret = s->io_open(s, &read_pb, s->filename, AVIO_FLAG_READ, NULL);
611     if (ret < 0) {
612         av_log(s, AV_LOG_ERROR, "Unable to re-open %s output file for "
613                "the second pass (add_keyframe_index)\n", s->filename);
614         goto end;
615     }
616
617     /* mark the end of the shift to up to the last data we wrote, and get ready
618      * for writing */
619     pos_end = avio_tell(s->pb);
620     avio_seek(s->pb, flv->keyframes_info_offset + metadata_size, SEEK_SET);
621
622     /* start reading at where the keyframe index information will be placed */
623     avio_seek(read_pb, flv->keyframes_info_offset, SEEK_SET);
624     pos = avio_tell(read_pb);
625
626     /* shift data by chunk of at most keyframe *filepositions* and *times* size */
627     read_size[read_buf_id] = avio_read(read_pb, read_buf[read_buf_id], metadata_size);  \
628     read_buf_id ^= 1;
629     do {
630
631         read_size[read_buf_id] = avio_read(read_pb, read_buf[read_buf_id], metadata_size);  \
632         read_buf_id ^= 1;
633         n = read_size[read_buf_id];
634         if (n < 0)
635             break;
636         avio_write(s->pb, read_buf[read_buf_id], n);
637         pos += n;
638     } while (pos <= pos_end);
639
640     ff_format_io_close(s, &read_pb);
641
642 end:
643     av_free(buf);
644     return ret;
645 }
646
647
648 static int flv_write_header(AVFormatContext *s)
649 {
650     int i;
651     AVIOContext *pb = s->pb;
652     FLVContext *flv = s->priv_data;
653
654     for (i = 0; i < s->nb_streams; i++) {
655         AVCodecParameters *par = s->streams[i]->codecpar;
656         FLVStreamContext *sc;
657         switch (par->codec_type) {
658         case AVMEDIA_TYPE_VIDEO:
659             if (s->streams[i]->avg_frame_rate.den &&
660                 s->streams[i]->avg_frame_rate.num) {
661                 flv->framerate = av_q2d(s->streams[i]->avg_frame_rate);
662             }
663             if (flv->video_par) {
664                 av_log(s, AV_LOG_ERROR,
665                        "at most one video stream is supported in flv\n");
666                 return AVERROR(EINVAL);
667             }
668             flv->video_par = par;
669             if (!ff_codec_get_tag(flv_video_codec_ids, par->codec_id))
670                 return unsupported_codec(s, "Video", par->codec_id);
671
672             if (par->codec_id == AV_CODEC_ID_MPEG4 ||
673                 par->codec_id == AV_CODEC_ID_H263) {
674                 int error = s->strict_std_compliance > FF_COMPLIANCE_UNOFFICIAL;
675                 av_log(s, error ? AV_LOG_ERROR : AV_LOG_WARNING,
676                        "Codec %s is not supported in the official FLV specification,\n", avcodec_get_name(par->codec_id));
677
678                 if (error) {
679                     av_log(s, AV_LOG_ERROR,
680                            "use vstrict=-1 / -strict -1 to use it anyway.\n");
681                     return AVERROR(EINVAL);
682                 }
683             } else if (par->codec_id == AV_CODEC_ID_VP6) {
684                 av_log(s, AV_LOG_WARNING,
685                        "Muxing VP6 in flv will produce flipped video on playback.\n");
686             }
687             break;
688         case AVMEDIA_TYPE_AUDIO:
689             if (flv->audio_par) {
690                 av_log(s, AV_LOG_ERROR,
691                        "at most one audio stream is supported in flv\n");
692                 return AVERROR(EINVAL);
693             }
694             flv->audio_par = par;
695             if (get_audio_flags(s, par) < 0)
696                 return unsupported_codec(s, "Audio", par->codec_id);
697             if (par->codec_id == AV_CODEC_ID_PCM_S16BE)
698                 av_log(s, AV_LOG_WARNING,
699                        "16-bit big-endian audio in flv is valid but most likely unplayable (hardware dependent); use s16le\n");
700             break;
701         case AVMEDIA_TYPE_DATA:
702             if (par->codec_id != AV_CODEC_ID_TEXT && par->codec_id != AV_CODEC_ID_NONE)
703                 return unsupported_codec(s, "Data", par->codec_id);
704             flv->data_par = par;
705             break;
706         case AVMEDIA_TYPE_SUBTITLE:
707             if (par->codec_id != AV_CODEC_ID_TEXT) {
708                 av_log(s, AV_LOG_ERROR, "Subtitle codec '%s' for stream %d is not compatible with FLV\n",
709                        avcodec_get_name(par->codec_id), i);
710                 return AVERROR_INVALIDDATA;
711             }
712             flv->data_par = par;
713             break;
714         default:
715             av_log(s, AV_LOG_ERROR, "Codec type '%s' for stream %d is not compatible with FLV\n",
716                    av_get_media_type_string(par->codec_type), i);
717             return AVERROR(EINVAL);
718         }
719         avpriv_set_pts_info(s->streams[i], 32, 1, 1000); /* 32 bit pts in ms */
720
721         sc = av_mallocz(sizeof(FLVStreamContext));
722         if (!sc)
723             return AVERROR(ENOMEM);
724         s->streams[i]->priv_data = sc;
725         sc->last_ts = -1;
726     }
727
728     flv->delay = AV_NOPTS_VALUE;
729
730     avio_write(pb, "FLV", 3);
731     avio_w8(pb, 1);
732     avio_w8(pb, FLV_HEADER_FLAG_HASAUDIO * !!flv->audio_par +
733                 FLV_HEADER_FLAG_HASVIDEO * !!flv->video_par);
734     avio_wb32(pb, 9);
735     avio_wb32(pb, 0);
736
737     for (i = 0; i < s->nb_streams; i++)
738         if (s->streams[i]->codecpar->codec_tag == 5) {
739             avio_w8(pb, 8);     // message type
740             avio_wb24(pb, 0);   // include flags
741             avio_wb24(pb, 0);   // time stamp
742             avio_wb32(pb, 0);   // reserved
743             avio_wb32(pb, 11);  // size
744             flv->reserved = 5;
745         }
746
747     write_metadata(s, 0);
748
749     for (i = 0; i < s->nb_streams; i++) {
750         flv_write_codec_header(s, s->streams[i]->codecpar);
751     }
752
753     flv->datastart_offset = avio_tell(pb);
754     return 0;
755 }
756
757 static int flv_write_trailer(AVFormatContext *s)
758 {
759     int64_t file_size;
760     AVIOContext *pb = s->pb;
761     FLVContext *flv = s->priv_data;
762     int build_keyframes_idx = flv->flags & FLV_ADD_KEYFRAME_INDEX;
763     int i, res;
764     int64_t cur_pos = avio_tell(s->pb);
765
766     if (build_keyframes_idx) {
767         FLVFileposition *newflv_posinfo, *p;
768
769         avio_seek(pb, flv->videosize_offset, SEEK_SET);
770         put_amf_double(pb, flv->videosize);
771
772         avio_seek(pb, flv->audiosize_offset, SEEK_SET);
773         put_amf_double(pb, flv->audiosize);
774
775         avio_seek(pb, flv->lasttimestamp_offset, SEEK_SET);
776         put_amf_double(pb, flv->lasttimestamp);
777
778         avio_seek(pb, flv->lastkeyframetimestamp_offset, SEEK_SET);
779         put_amf_double(pb, flv->lastkeyframetimestamp);
780
781         avio_seek(pb, flv->lastkeyframelocation_offset, SEEK_SET);
782         put_amf_double(pb, flv->lastkeyframelocation + flv->keyframe_index_size);
783         avio_seek(pb, cur_pos, SEEK_SET);
784
785         res = shift_data(s);
786         if (res < 0) {
787              goto end;
788         }
789         avio_seek(pb, flv->keyframes_info_offset, SEEK_SET);
790         put_amf_string(pb, "filepositions");
791         put_amf_dword_array(pb, flv->filepositions_count);
792         for (newflv_posinfo = flv->head_filepositions; newflv_posinfo; newflv_posinfo = newflv_posinfo->next) {
793             put_amf_double(pb, newflv_posinfo->keyframe_position + flv->keyframe_index_size);
794         }
795
796         put_amf_string(pb, "times");
797         put_amf_dword_array(pb, flv->filepositions_count);
798         for (newflv_posinfo = flv->head_filepositions; newflv_posinfo; newflv_posinfo = newflv_posinfo->next) {
799             put_amf_double(pb, newflv_posinfo->keyframe_timestamp);
800         }
801
802         newflv_posinfo = flv->head_filepositions;
803         while (newflv_posinfo) {
804             p = newflv_posinfo->next;
805             if (p) {
806                 newflv_posinfo->next = p->next;
807                 av_free(p);
808                 p = NULL;
809             } else {
810                 av_free(newflv_posinfo);
811                 newflv_posinfo = NULL;
812             }
813         }
814
815         put_amf_string(pb, "");
816         avio_w8(pb, AMF_END_OF_OBJECT);
817
818         avio_seek(pb, cur_pos + flv->keyframe_index_size, SEEK_SET);
819     }
820
821 end:
822     if (flv->flags & FLV_NO_SEQUENCE_END) {
823         av_log(s, AV_LOG_DEBUG, "FLV no sequence end mode open\n");
824     } else {
825         /* Add EOS tag */
826         for (i = 0; i < s->nb_streams; i++) {
827             AVCodecParameters *par = s->streams[i]->codecpar;
828             FLVStreamContext *sc = s->streams[i]->priv_data;
829             if (par->codec_type == AVMEDIA_TYPE_VIDEO &&
830                     (par->codec_id == AV_CODEC_ID_H264 || par->codec_id == AV_CODEC_ID_MPEG4))
831                 put_avc_eos_tag(pb, sc->last_ts);
832         }
833     }
834
835     file_size = avio_tell(pb);
836
837     if (build_keyframes_idx) {
838         flv->datasize = file_size - flv->datastart_offset;
839         avio_seek(pb, flv->datasize_offset, SEEK_SET);
840         put_amf_double(pb, flv->datasize);
841     }
842     if (pb->seekable) {
843         /* update information */
844         if (avio_seek(pb, flv->duration_offset, SEEK_SET) < 0) {
845             av_log(s, AV_LOG_WARNING, "Failed to update header with correct duration.\n");
846         } else {
847             put_amf_double(pb, flv->duration / (double)1000);
848         }
849         if (avio_seek(pb, flv->filesize_offset, SEEK_SET) < 0) {
850             av_log(s, AV_LOG_WARNING, "Failed to update header with correct filesize.\n");
851         } else {
852             put_amf_double(pb, file_size);
853         }
854     }
855     avio_seek(pb, file_size, SEEK_SET);
856     return 0;
857 }
858
859 static int flv_write_packet(AVFormatContext *s, AVPacket *pkt)
860 {
861     AVIOContext *pb      = s->pb;
862     AVCodecParameters *par = s->streams[pkt->stream_index]->codecpar;
863     FLVContext *flv      = s->priv_data;
864     FLVStreamContext *sc = s->streams[pkt->stream_index]->priv_data;
865     unsigned ts;
866     int size = pkt->size;
867     uint8_t *data = NULL;
868     int flags = -1, flags_size, ret;
869     int64_t cur_offset = avio_tell(pb);
870
871     if (par->codec_id == AV_CODEC_ID_VP6F || par->codec_id == AV_CODEC_ID_VP6A ||
872         par->codec_id == AV_CODEC_ID_VP6  || par->codec_id == AV_CODEC_ID_AAC)
873         flags_size = 2;
874     else if (par->codec_id == AV_CODEC_ID_H264 || par->codec_id == AV_CODEC_ID_MPEG4)
875         flags_size = 5;
876     else
877         flags_size = 1;
878
879     if (par->codec_id == AV_CODEC_ID_AAC || par->codec_id == AV_CODEC_ID_H264
880             || par->codec_id == AV_CODEC_ID_MPEG4) {
881         int side_size = 0;
882         uint8_t *side = av_packet_get_side_data(pkt, AV_PKT_DATA_NEW_EXTRADATA, &side_size);
883         if (side && side_size > 0 && (side_size != par->extradata_size || memcmp(side, par->extradata, side_size))) {
884             av_free(par->extradata);
885             par->extradata = av_mallocz(side_size + AV_INPUT_BUFFER_PADDING_SIZE);
886             memcpy(par->extradata, side, side_size);
887             par->extradata_size = side_size;
888             flv_write_codec_header(s, par);
889         }
890     }
891
892     if (flv->delay == AV_NOPTS_VALUE)
893         flv->delay = -pkt->dts;
894
895     if (pkt->dts < -flv->delay) {
896         av_log(s, AV_LOG_WARNING,
897                "Packets are not in the proper order with respect to DTS\n");
898         return AVERROR(EINVAL);
899     }
900
901     ts = pkt->dts;
902
903     if (s->event_flags & AVSTREAM_EVENT_FLAG_METADATA_UPDATED) {
904         write_metadata(s, ts);
905         s->event_flags &= ~AVSTREAM_EVENT_FLAG_METADATA_UPDATED;
906     }
907
908     avio_write_marker(pb, av_rescale(ts, AV_TIME_BASE, 1000),
909                       pkt->flags & AV_PKT_FLAG_KEY && (flv->video_par ? par->codec_type == AVMEDIA_TYPE_VIDEO : 1) ? AVIO_DATA_MARKER_SYNC_POINT : AVIO_DATA_MARKER_BOUNDARY_POINT);
910
911     switch (par->codec_type) {
912     case AVMEDIA_TYPE_VIDEO:
913         avio_w8(pb, FLV_TAG_TYPE_VIDEO);
914
915         flags = ff_codec_get_tag(flv_video_codec_ids, par->codec_id);
916
917         flags |= pkt->flags & AV_PKT_FLAG_KEY ? FLV_FRAME_KEY : FLV_FRAME_INTER;
918         break;
919     case AVMEDIA_TYPE_AUDIO:
920         flags = get_audio_flags(s, par);
921
922         av_assert0(size);
923
924         avio_w8(pb, FLV_TAG_TYPE_AUDIO);
925         break;
926     case AVMEDIA_TYPE_SUBTITLE:
927     case AVMEDIA_TYPE_DATA:
928         avio_w8(pb, FLV_TAG_TYPE_META);
929         break;
930     default:
931         return AVERROR(EINVAL);
932     }
933
934     if (par->codec_id == AV_CODEC_ID_H264 || par->codec_id == AV_CODEC_ID_MPEG4) {
935         /* check if extradata looks like mp4 formatted */
936         if (par->extradata_size > 0 && *(uint8_t*)par->extradata != 1)
937             if ((ret = ff_avc_parse_nal_units_buf(pkt->data, &data, &size)) < 0)
938                 return ret;
939     } else if (par->codec_id == AV_CODEC_ID_AAC && pkt->size > 2 &&
940                (AV_RB16(pkt->data) & 0xfff0) == 0xfff0) {
941         if (!s->streams[pkt->stream_index]->nb_frames) {
942         av_log(s, AV_LOG_ERROR, "Malformed AAC bitstream detected: "
943                "use the audio bitstream filter 'aac_adtstoasc' to fix it "
944                "('-bsf:a aac_adtstoasc' option with ffmpeg)\n");
945         return AVERROR_INVALIDDATA;
946         }
947         av_log(s, AV_LOG_WARNING, "aac bitstream error\n");
948     }
949
950     /* check Speex packet duration */
951     if (par->codec_id == AV_CODEC_ID_SPEEX && ts - sc->last_ts > 160)
952         av_log(s, AV_LOG_WARNING, "Warning: Speex stream has more than "
953                                   "8 frames per packet. Adobe Flash "
954                                   "Player cannot handle this!\n");
955
956     if (sc->last_ts < ts)
957         sc->last_ts = ts;
958
959     if (size + flags_size >= 1<<24) {
960         av_log(s, AV_LOG_ERROR, "Too large packet with size %u >= %u\n",
961                size + flags_size, 1<<24);
962         return AVERROR(EINVAL);
963     }
964
965     avio_wb24(pb, size + flags_size);
966     avio_wb24(pb, ts & 0xFFFFFF);
967     avio_w8(pb, (ts >> 24) & 0x7F); // timestamps are 32 bits _signed_
968     avio_wb24(pb, flv->reserved);
969
970     if (par->codec_type == AVMEDIA_TYPE_DATA ||
971         par->codec_type == AVMEDIA_TYPE_SUBTITLE ) {
972         int data_size;
973         int64_t metadata_size_pos = avio_tell(pb);
974         if (par->codec_id == AV_CODEC_ID_TEXT) {
975             // legacy FFmpeg magic?
976             avio_w8(pb, AMF_DATA_TYPE_STRING);
977             put_amf_string(pb, "onTextData");
978             avio_w8(pb, AMF_DATA_TYPE_MIXEDARRAY);
979             avio_wb32(pb, 2);
980             put_amf_string(pb, "type");
981             avio_w8(pb, AMF_DATA_TYPE_STRING);
982             put_amf_string(pb, "Text");
983             put_amf_string(pb, "text");
984             avio_w8(pb, AMF_DATA_TYPE_STRING);
985             put_amf_string(pb, pkt->data);
986             put_amf_string(pb, "");
987             avio_w8(pb, AMF_END_OF_OBJECT);
988         } else {
989             // just pass the metadata through
990             avio_write(pb, data ? data : pkt->data, size);
991         }
992         /* write total size of tag */
993         data_size = avio_tell(pb) - metadata_size_pos;
994         avio_seek(pb, metadata_size_pos - 10, SEEK_SET);
995         avio_wb24(pb, data_size);
996         avio_seek(pb, data_size + 10 - 3, SEEK_CUR);
997         avio_wb32(pb, data_size + 11);
998     } else {
999         av_assert1(flags>=0);
1000         avio_w8(pb,flags);
1001         if (par->codec_id == AV_CODEC_ID_VP6)
1002             avio_w8(pb,0);
1003         if (par->codec_id == AV_CODEC_ID_VP6F || par->codec_id == AV_CODEC_ID_VP6A) {
1004             if (par->extradata_size)
1005                 avio_w8(pb, par->extradata[0]);
1006             else
1007                 avio_w8(pb, ((FFALIGN(par->width,  16) - par->width) << 4) |
1008                              (FFALIGN(par->height, 16) - par->height));
1009         } else if (par->codec_id == AV_CODEC_ID_AAC)
1010             avio_w8(pb, 1); // AAC raw
1011         else if (par->codec_id == AV_CODEC_ID_H264 || par->codec_id == AV_CODEC_ID_MPEG4) {
1012             avio_w8(pb, 1); // AVC NALU
1013             avio_wb24(pb, pkt->pts - pkt->dts);
1014         }
1015
1016         avio_write(pb, data ? data : pkt->data, size);
1017
1018         avio_wb32(pb, size + flags_size + 11); // previous tag size
1019         flv->duration = FFMAX(flv->duration,
1020                               pkt->pts + flv->delay + pkt->duration);
1021     }
1022
1023     if (flv->flags & FLV_ADD_KEYFRAME_INDEX) {
1024         switch (par->codec_type) {
1025             case AVMEDIA_TYPE_VIDEO:
1026                 flv->videosize += (avio_tell(pb) - cur_offset);
1027                 flv->lasttimestamp = flv->acurframeindex / flv->framerate;
1028                 if (pkt->flags & AV_PKT_FLAG_KEY) {
1029                     double ts = flv->acurframeindex / flv->framerate;
1030                     int64_t pos = cur_offset;
1031
1032                     flv->lastkeyframetimestamp = flv->acurframeindex / flv->framerate;
1033                     flv->lastkeyframelocation = pos;
1034                     flv_append_keyframe_info(s, flv, ts, pos);
1035                 }
1036                 flv->acurframeindex++;
1037                 break;
1038
1039             case AVMEDIA_TYPE_AUDIO:
1040                 flv->audiosize += (avio_tell(pb) - cur_offset);
1041                 break;
1042
1043             default:
1044                 av_log(s, AV_LOG_WARNING, "par->codec_type is type = [%d]\n", par->codec_type);
1045                 break;
1046         }
1047     }
1048
1049     av_free(data);
1050
1051     return pb->error;
1052 }
1053
1054 static const AVOption options[] = {
1055     { "flvflags", "FLV muxer flags", offsetof(FLVContext, flags), AV_OPT_TYPE_FLAGS, {.i64 = 0}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "flvflags" },
1056     { "aac_seq_header_detect", "Put AAC sequence header based on stream data", 0, AV_OPT_TYPE_CONST, {.i64 = FLV_AAC_SEQ_HEADER_DETECT}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "flvflags" },
1057     { "no_sequence_end", "disable sequence end for FLV", 0, AV_OPT_TYPE_CONST, {.i64 = FLV_NO_SEQUENCE_END}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "flvflags" },
1058     { "add_keyframe_index", "Add keyframe index metadata", 0, AV_OPT_TYPE_CONST, {.i64 = FLV_ADD_KEYFRAME_INDEX}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "flvflags" },
1059     { NULL },
1060 };
1061
1062 static const AVClass flv_muxer_class = {
1063     .class_name = "flv muxer",
1064     .item_name  = av_default_item_name,
1065     .option     = options,
1066     .version    = LIBAVUTIL_VERSION_INT,
1067 };
1068
1069 AVOutputFormat ff_flv_muxer = {
1070     .name           = "flv",
1071     .long_name      = NULL_IF_CONFIG_SMALL("FLV (Flash Video)"),
1072     .mime_type      = "video/x-flv",
1073     .extensions     = "flv",
1074     .priv_data_size = sizeof(FLVContext),
1075     .audio_codec    = CONFIG_LIBMP3LAME ? AV_CODEC_ID_MP3 : AV_CODEC_ID_ADPCM_SWF,
1076     .video_codec    = AV_CODEC_ID_FLV1,
1077     .write_header   = flv_write_header,
1078     .write_packet   = flv_write_packet,
1079     .write_trailer  = flv_write_trailer,
1080     .codec_tag      = (const AVCodecTag* const []) {
1081                           flv_video_codec_ids, flv_audio_codec_ids, 0
1082                       },
1083     .flags          = AVFMT_GLOBALHEADER | AVFMT_VARIABLE_FPS |
1084                       AVFMT_TS_NONSTRICT,
1085     .priv_class     = &flv_muxer_class,
1086 };