avformat/avienc: Store pal8 palette
[ffmpeg.git] / libavformat / asfenc.c
1 /*
2  * ASF muxer
3  * Copyright (c) 2000, 2001 Fabrice Bellard
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/avassert.h"
23 #include "libavutil/dict.h"
24 #include "libavutil/mathematics.h"
25 #include "libavutil/parseutils.h"
26 #include "libavutil/opt.h"
27 #include "avformat.h"
28 #include "avlanguage.h"
29 #include "avio_internal.h"
30 #include "internal.h"
31 #include "riff.h"
32 #include "asf.h"
33
34 #define ASF_INDEXED_INTERVAL    10000000
35 #define ASF_INDEX_BLOCK         (1<<9)
36 #define ASF_PAYLOADS_PER_PACKET 63
37
38 #define ASF_PACKET_ERROR_CORRECTION_DATA_SIZE 0x2
39 #define ASF_PACKET_ERROR_CORRECTION_FLAGS          \
40     (ASF_PACKET_FLAG_ERROR_CORRECTION_PRESENT |    \
41      ASF_PACKET_ERROR_CORRECTION_DATA_SIZE)
42
43 #if (ASF_PACKET_ERROR_CORRECTION_FLAGS != 0)
44 #   define ASF_PACKET_ERROR_CORRECTION_FLAGS_FIELD_SIZE 1
45 #else
46 #   define ASF_PACKET_ERROR_CORRECTION_FLAGS_FIELD_SIZE 0
47 #endif
48
49 #define ASF_PPI_PROPERTY_FLAGS                                       \
50     (ASF_PL_FLAG_REPLICATED_DATA_LENGTH_FIELD_IS_BYTE           |    \
51      ASF_PL_FLAG_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_IS_DWORD |    \
52      ASF_PL_FLAG_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_IS_BYTE       |    \
53      ASF_PL_FLAG_STREAM_NUMBER_LENGTH_FIELD_IS_BYTE)
54
55 #define ASF_PPI_LENGTH_TYPE_FLAGS 0
56
57 #define ASF_PAYLOAD_FLAGS ASF_PL_FLAG_PAYLOAD_LENGTH_FIELD_IS_WORD
58
59 #if (ASF_PPI_FLAG_SEQUENCE_FIELD_IS_BYTE == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_SEQUENCE_FIELD_SIZE))
60 #   define ASF_PPI_SEQUENCE_FIELD_SIZE 1
61 #endif
62 #if (ASF_PPI_FLAG_SEQUENCE_FIELD_IS_WORD == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_SEQUENCE_FIELD_SIZE))
63 #   define ASF_PPI_SEQUENCE_FIELD_SIZE 2
64 #endif
65 #if (ASF_PPI_FLAG_SEQUENCE_FIELD_IS_DWORD == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_SEQUENCE_FIELD_SIZE))
66 #   define ASF_PPI_SEQUENCE_FIELD_SIZE 4
67 #endif
68 #ifndef ASF_PPI_SEQUENCE_FIELD_SIZE
69 #   define ASF_PPI_SEQUENCE_FIELD_SIZE 0
70 #endif
71
72 #if (ASF_PPI_FLAG_PACKET_LENGTH_FIELD_IS_BYTE == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_PACKET_LENGTH_FIELD_SIZE))
73 #   define ASF_PPI_PACKET_LENGTH_FIELD_SIZE 1
74 #endif
75 #if (ASF_PPI_FLAG_PACKET_LENGTH_FIELD_IS_WORD == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_PACKET_LENGTH_FIELD_SIZE))
76 #   define ASF_PPI_PACKET_LENGTH_FIELD_SIZE 2
77 #endif
78 #if (ASF_PPI_FLAG_PACKET_LENGTH_FIELD_IS_DWORD == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_PACKET_LENGTH_FIELD_SIZE))
79 #   define ASF_PPI_PACKET_LENGTH_FIELD_SIZE 4
80 #endif
81 #ifndef ASF_PPI_PACKET_LENGTH_FIELD_SIZE
82 #   define ASF_PPI_PACKET_LENGTH_FIELD_SIZE 0
83 #endif
84
85 #if (ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_BYTE == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_PADDING_LENGTH_FIELD_SIZE))
86 #   define ASF_PPI_PADDING_LENGTH_FIELD_SIZE 1
87 #endif
88 #if (ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_WORD == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_PADDING_LENGTH_FIELD_SIZE))
89 #   define ASF_PPI_PADDING_LENGTH_FIELD_SIZE 2
90 #endif
91 #if (ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_DWORD == (ASF_PPI_LENGTH_TYPE_FLAGS & ASF_PPI_MASK_PADDING_LENGTH_FIELD_SIZE))
92 #   define ASF_PPI_PADDING_LENGTH_FIELD_SIZE 4
93 #endif
94 #ifndef ASF_PPI_PADDING_LENGTH_FIELD_SIZE
95 #   define ASF_PPI_PADDING_LENGTH_FIELD_SIZE 0
96 #endif
97
98 #if (ASF_PL_FLAG_REPLICATED_DATA_LENGTH_FIELD_IS_BYTE == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_REPLICATED_DATA_LENGTH_FIELD_SIZE))
99 #   define ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE 1
100 #endif
101 #if (ASF_PL_FLAG_REPLICATED_DATA_LENGTH_FIELD_IS_WORD == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_REPLICATED_DATA_LENGTH_FIELD_SIZE))
102 #   define ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE 2
103 #endif
104 #if (ASF_PL_FLAG_REPLICATED_DATA_LENGTH_FIELD_IS_DWORD == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_REPLICATED_DATA_LENGTH_FIELD_SIZE))
105 #   define ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE 4
106 #endif
107 #ifndef ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE
108 #   define ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE 0
109 #endif
110
111 #if (ASF_PL_FLAG_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_IS_BYTE == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_SIZE))
112 #   define ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE 1
113 #endif
114 #if (ASF_PL_FLAG_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_IS_WORD == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_SIZE))
115 #   define ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE 2
116 #endif
117 #if (ASF_PL_FLAG_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_IS_DWORD == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_OFFSET_INTO_MEDIA_OBJECT_LENGTH_FIELD_SIZE))
118 #   define ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE 4
119 #endif
120 #ifndef ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE
121 #   define ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE 0
122 #endif
123
124 #if (ASF_PL_FLAG_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_IS_BYTE == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_SIZE))
125 #   define ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE 1
126 #endif
127 #if (ASF_PL_FLAG_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_IS_WORD == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_SIZE))
128 #   define ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE 2
129 #endif
130 #if (ASF_PL_FLAG_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_IS_DWORD == (ASF_PPI_PROPERTY_FLAGS & ASF_PL_MASK_MEDIA_OBJECT_NUMBER_LENGTH_FIELD_SIZE))
131 #   define ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE 4
132 #endif
133 #ifndef ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE
134 #   define ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE 0
135 #endif
136
137 #if (ASF_PL_FLAG_PAYLOAD_LENGTH_FIELD_IS_BYTE == (ASF_PAYLOAD_FLAGS & ASF_PL_MASK_PAYLOAD_LENGTH_FIELD_SIZE))
138 #   define ASF_PAYLOAD_LENGTH_FIELD_SIZE 1
139 #endif
140 #if (ASF_PL_FLAG_PAYLOAD_LENGTH_FIELD_IS_WORD == (ASF_PAYLOAD_FLAGS & ASF_PL_MASK_PAYLOAD_LENGTH_FIELD_SIZE))
141 #   define ASF_PAYLOAD_LENGTH_FIELD_SIZE 2
142 #endif
143 #ifndef ASF_PAYLOAD_LENGTH_FIELD_SIZE
144 #   define ASF_PAYLOAD_LENGTH_FIELD_SIZE 0
145 #endif
146
147 #define PACKET_HEADER_MIN_SIZE \
148     (ASF_PACKET_ERROR_CORRECTION_FLAGS_FIELD_SIZE +       \
149      ASF_PACKET_ERROR_CORRECTION_DATA_SIZE +              \
150      1 +        /* Length Type Flags */                   \
151      1 +        /* Property Flags */                      \
152      ASF_PPI_PACKET_LENGTH_FIELD_SIZE +                   \
153      ASF_PPI_SEQUENCE_FIELD_SIZE +                        \
154      ASF_PPI_PADDING_LENGTH_FIELD_SIZE +                  \
155      4 +        /* Send Time Field */                     \
156      2)         /* Duration Field */
157
158 // Replicated Data shall be at least 8 bytes long.
159 #define ASF_PAYLOAD_REPLICATED_DATA_LENGTH 0x08
160
161 #define PAYLOAD_HEADER_SIZE_SINGLE_PAYLOAD                \
162     (1 +     /* Stream Number */                          \
163      ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE +         \
164      ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE +    \
165      ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE +      \
166      ASF_PAYLOAD_REPLICATED_DATA_LENGTH)
167
168 #define PAYLOAD_HEADER_SIZE_MULTIPLE_PAYLOADS             \
169     (1 +        /* Stream Number */                       \
170      ASF_PAYLOAD_MEDIA_OBJECT_NUMBER_FIELD_SIZE +         \
171      ASF_PAYLOAD_OFFSET_INTO_MEDIA_OBJECT_FIELD_SIZE +    \
172      ASF_PAYLOAD_REPLICATED_DATA_LENGTH_FIELD_SIZE +      \
173      ASF_PAYLOAD_REPLICATED_DATA_LENGTH +                 \
174      ASF_PAYLOAD_LENGTH_FIELD_SIZE)
175
176 #define SINGLE_PAYLOAD_HEADERS                            \
177     (PACKET_HEADER_MIN_SIZE +                             \
178      PAYLOAD_HEADER_SIZE_SINGLE_PAYLOAD)
179
180 #define MULTI_PAYLOAD_HEADERS                             \
181     (PACKET_HEADER_MIN_SIZE +                             \
182      1 +         /* Payload Flags */                      \
183      2 * PAYLOAD_HEADER_SIZE_MULTIPLE_PAYLOADS)
184
185 #define DATA_HEADER_SIZE 50
186
187 #define PACKET_SIZE_MAX 65536
188 #define PACKET_SIZE_MIN 100
189
190 typedef struct ASFPayload {
191     uint8_t type;
192     uint16_t size;
193 } ASFPayload;
194
195 typedef struct ASFStream {
196     int num;
197     unsigned char seq;
198     /* use for reading */
199     AVPacket pkt;
200     int frag_offset;
201     int packet_obj_size;
202     int timestamp;
203     int64_t duration;
204     int skip_to_key;
205     int pkt_clean;
206
207     int ds_span;                /* descrambling  */
208     int ds_packet_size;
209     int ds_chunk_size;
210
211     int64_t packet_pos;
212
213     uint16_t stream_language_index;
214
215     int      palette_changed;
216     uint32_t palette[256];
217
218     int payload_ext_ct;
219     ASFPayload payload[8];
220 } ASFStream;
221
222 typedef struct ASFContext {
223     AVClass *av_class;
224     uint32_t seqno;
225     int is_streamed;
226     ASFStream streams[128];              ///< it's max number and it's not that big
227     const char *languages[128];
228     int nb_languages;
229     int64_t creation_time;
230     /* non streamed additonnal info */
231     uint64_t nb_packets;                 ///< how many packets are there in the file, invalid if broadcasting
232     int64_t duration;                    ///< in 100ns units
233     /* packet filling */
234     unsigned char multi_payloads_present;
235     int packet_size_left;
236     int64_t packet_timestamp_start;
237     int64_t packet_timestamp_end;
238     unsigned int packet_nb_payloads;
239     uint8_t packet_buf[PACKET_SIZE_MAX];
240     AVIOContext pb;
241     /* only for reading */
242     uint64_t data_offset;                ///< beginning of the first data packet
243
244     ASFIndex *index_ptr;
245     uint32_t nb_index_memory_alloc;
246     uint16_t maximum_packet;
247     uint32_t next_packet_number;
248     uint16_t next_packet_count;
249     uint64_t next_packet_offset;
250     int      next_start_sec;
251     int      end_sec;
252     int      packet_size;
253 } ASFContext;
254
255 static const AVCodecTag codec_asf_bmp_tags[] = {
256     { AV_CODEC_ID_MPEG4,     MKTAG('M', '4', 'S', '2') },
257     { AV_CODEC_ID_MPEG4,     MKTAG('M', 'P', '4', 'S') },
258     { AV_CODEC_ID_MSMPEG4V3, MKTAG('M', 'P', '4', '3') },
259     { AV_CODEC_ID_NONE,      0 },
260 };
261
262 #define PREROLL_TIME 3100
263
264 static void put_str16(AVIOContext *s, const char *tag)
265 {
266     int len;
267     uint8_t *pb;
268     AVIOContext *dyn_buf;
269     if (avio_open_dyn_buf(&dyn_buf) < 0)
270         return;
271
272     avio_put_str16le(dyn_buf, tag);
273     len = avio_close_dyn_buf(dyn_buf, &pb);
274     avio_wl16(s, len);
275     avio_write(s, pb, len);
276     av_freep(&pb);
277 }
278
279 static int64_t put_header(AVIOContext *pb, const ff_asf_guid *g)
280 {
281     int64_t pos;
282
283     pos = avio_tell(pb);
284     ff_put_guid(pb, g);
285     avio_wl64(pb, 24);
286     return pos;
287 }
288
289 /* update header size */
290 static void end_header(AVIOContext *pb, int64_t pos)
291 {
292     int64_t pos1;
293
294     pos1 = avio_tell(pb);
295     avio_seek(pb, pos + 16, SEEK_SET);
296     avio_wl64(pb, pos1 - pos);
297     avio_seek(pb, pos1, SEEK_SET);
298 }
299
300 /* write an asf chunk (only used in streaming case) */
301 static void put_chunk(AVFormatContext *s, int type,
302                       int payload_length, int flags)
303 {
304     ASFContext *asf = s->priv_data;
305     AVIOContext *pb = s->pb;
306     int length;
307
308     length = payload_length + 8;
309     avio_wl16(pb, type);
310     avio_wl16(pb, length);      // size
311     avio_wl32(pb, asf->seqno);  // sequence number
312     avio_wl16(pb, flags);       // unknown bytes
313     avio_wl16(pb, length);      // size_confirm
314     asf->seqno++;
315 }
316
317 /* convert from av time to windows time */
318 static int64_t unix_to_file_time(int64_t ti)
319 {
320     int64_t t;
321
322     t  = ti * INT64_C(10);
323     t += INT64_C(116444736000000000);
324     return t;
325 }
326
327 static int32_t get_send_time(ASFContext *asf, int64_t pres_time, uint64_t *offset)
328 {
329     int i;
330     int32_t send_time = 0;
331     *offset = asf->data_offset + DATA_HEADER_SIZE;
332     for (i = 0; i < asf->next_start_sec; i++) {
333         if (pres_time <= asf->index_ptr[i].send_time)
334             break;
335         send_time = asf->index_ptr[i].send_time;
336         *offset   = asf->index_ptr[i].offset;
337     }
338
339     return send_time / 10000;
340 }
341
342 static int asf_write_markers(AVFormatContext *s)
343 {
344     ASFContext *asf = s->priv_data;
345     AVIOContext *pb = s->pb;
346     int i;
347     AVRational scale = {1, 10000000};
348     int64_t hpos = put_header(pb, &ff_asf_marker_header);
349
350     ff_put_guid(pb, &ff_asf_reserved_4);// ASF spec mandates this reserved value
351     avio_wl32(pb, s->nb_chapters);     // markers count
352     avio_wl16(pb, 0);                  // ASF spec mandates 0 for this
353     avio_wl16(pb, 0);                  // name length 0, no name given
354
355     for (i = 0; i < s->nb_chapters; i++) {
356         AVChapter *c = s->chapters[i];
357         AVDictionaryEntry *t = av_dict_get(c->metadata, "title", NULL, 0);
358         int64_t pres_time = av_rescale_q(c->start, c->time_base, scale);
359         uint64_t offset;
360         int32_t send_time = get_send_time(asf, pres_time, &offset);
361         int len = 0;
362         uint8_t *buf;
363         AVIOContext *dyn_buf;
364         if (t) {
365             if (avio_open_dyn_buf(&dyn_buf) < 0)
366                 return AVERROR(ENOMEM);
367             avio_put_str16le(dyn_buf, t->value);
368             len = avio_close_dyn_buf(dyn_buf, &buf);
369         }
370         avio_wl64(pb, offset);            // offset of the packet with send_time
371         avio_wl64(pb, pres_time + PREROLL_TIME * 10000); // presentation time
372         avio_wl16(pb, 12 + len);          // entry length
373         avio_wl32(pb, send_time);         // send time
374         avio_wl32(pb, 0);                 // flags, should be 0
375         avio_wl32(pb, len / 2);           // marker desc length in WCHARS!
376         if (t) {
377             avio_write(pb, buf, len);     // marker desc
378             av_freep(&buf);
379         }
380     }
381     end_header(pb, hpos);
382     return 0;
383 }
384
385 /* write the header (used two times if non streamed) */
386 static int asf_write_header1(AVFormatContext *s, int64_t file_size,
387                              int64_t data_chunk_size)
388 {
389     ASFContext *asf = s->priv_data;
390     AVIOContext *pb = s->pb;
391     AVDictionaryEntry *tags[5];
392     int header_size, n, extra_size, extra_size2, wav_extra_size;
393     int has_title, has_aspect_ratio = 0;
394     int metadata_count;
395     AVCodecContext *enc;
396     int64_t header_offset, cur_pos, hpos;
397     int bit_rate;
398     int64_t duration;
399
400     ff_metadata_conv(&s->metadata, ff_asf_metadata_conv, NULL);
401
402     tags[0] = av_dict_get(s->metadata, "title", NULL, 0);
403     tags[1] = av_dict_get(s->metadata, "author", NULL, 0);
404     tags[2] = av_dict_get(s->metadata, "copyright", NULL, 0);
405     tags[3] = av_dict_get(s->metadata, "comment", NULL, 0);
406     tags[4] = av_dict_get(s->metadata, "rating", NULL, 0);
407
408     duration       = asf->duration + PREROLL_TIME * 10000;
409     has_title      = tags[0] || tags[1] || tags[2] || tags[3] || tags[4];
410
411     if (!file_size) {
412         if (ff_parse_creation_time_metadata(s, &asf->creation_time, 0) != 0)
413             av_dict_set(&s->metadata, "creation_time", NULL, 0);
414     }
415
416     metadata_count = av_dict_count(s->metadata);
417
418     bit_rate = 0;
419     for (n = 0; n < s->nb_streams; n++) {
420         AVDictionaryEntry *entry;
421         enc = s->streams[n]->codec;
422
423         avpriv_set_pts_info(s->streams[n], 32, 1, 1000); /* 32 bit pts in ms */
424
425         bit_rate += enc->bit_rate;
426         if (   enc->codec_type == AVMEDIA_TYPE_VIDEO
427             && enc->sample_aspect_ratio.num > 0
428             && enc->sample_aspect_ratio.den > 0)
429             has_aspect_ratio++;
430
431         entry = av_dict_get(s->streams[n]->metadata, "language", NULL, 0);
432         if (entry) {
433             const char *iso6391lang = av_convert_lang_to(entry->value, AV_LANG_ISO639_1);
434             if (iso6391lang) {
435                 int i;
436                 for (i = 0; i < asf->nb_languages; i++) {
437                     if (!strcmp(asf->languages[i], iso6391lang)) {
438                         asf->streams[n].stream_language_index = i;
439                         break;
440                     }
441                 }
442                 if (i >= asf->nb_languages) {
443                     asf->languages[asf->nb_languages] = iso6391lang;
444                     asf->streams[n].stream_language_index = asf->nb_languages;
445                     asf->nb_languages++;
446                 }
447             }
448         } else {
449             asf->streams[n].stream_language_index = 128;
450         }
451     }
452
453     if (asf->is_streamed) {
454         put_chunk(s, 0x4824, 0, 0xc00); /* start of stream (length will be patched later) */
455     }
456
457     ff_put_guid(pb, &ff_asf_header);
458     avio_wl64(pb, -1); /* header length, will be patched after */
459     avio_wl32(pb, 3 + has_title + !!metadata_count + s->nb_streams); /* number of chunks in header */
460     avio_w8(pb, 1); /* ??? */
461     avio_w8(pb, 2); /* ??? */
462
463     /* file header */
464     header_offset = avio_tell(pb);
465     hpos          = put_header(pb, &ff_asf_file_header);
466     ff_put_guid(pb, &ff_asf_my_guid);
467     avio_wl64(pb, file_size);
468     avio_wl64(pb, unix_to_file_time(asf->creation_time));
469     avio_wl64(pb, asf->nb_packets); /* number of packets */
470     avio_wl64(pb, duration); /* end time stamp (in 100ns units) */
471     avio_wl64(pb, asf->duration); /* duration (in 100ns units) */
472     avio_wl64(pb, PREROLL_TIME); /* start time stamp */
473     avio_wl32(pb, (asf->is_streamed || !pb->seekable) ? 3 : 2);  /* ??? */
474     avio_wl32(pb, s->packet_size); /* packet size */
475     avio_wl32(pb, s->packet_size); /* packet size */
476     avio_wl32(pb, bit_rate ? bit_rate : -1); /* Maximum data rate in bps */
477     end_header(pb, hpos);
478
479     /* header_extension */
480     hpos = put_header(pb, &ff_asf_head1_guid);
481     ff_put_guid(pb, &ff_asf_head2_guid);
482     avio_wl16(pb, 6);
483     avio_wl32(pb, 0); /* length, to be filled later */
484     if (asf->nb_languages) {
485         int64_t hpos2;
486         int i;
487
488         hpos2 = put_header(pb, &ff_asf_language_guid);
489         avio_wl16(pb, asf->nb_languages);
490         for (i = 0; i < asf->nb_languages; i++) {
491             avio_w8(pb, 6);
492             avio_put_str16le(pb, asf->languages[i]);
493         }
494         end_header(pb, hpos2);
495
496         for (n = 0; n < s->nb_streams; n++) {
497             int64_t es_pos;
498             if (asf->streams[n].stream_language_index > 127)
499                 continue;
500             es_pos = put_header(pb, &ff_asf_extended_stream_properties_object);
501             avio_wl64(pb, 0); /* start time */
502             avio_wl64(pb, 0); /* end time */
503             avio_wl32(pb, s->streams[n]->codec->bit_rate); /* data bitrate bps */
504             avio_wl32(pb, 5000); /* buffer size ms */
505             avio_wl32(pb, 0); /* initial buffer fullness */
506             avio_wl32(pb, s->streams[n]->codec->bit_rate); /* peak data bitrate */
507             avio_wl32(pb, 5000); /* maximum buffer size ms */
508             avio_wl32(pb, 0); /* max initial buffer fullness */
509             avio_wl32(pb, 0); /* max object size */
510             avio_wl32(pb, (!asf->is_streamed && pb->seekable) << 1); /* flags - seekable */
511             avio_wl16(pb, n + 1); /* stream number */
512             avio_wl16(pb, asf->streams[n].stream_language_index); /* language id index */
513             avio_wl64(pb, 0); /* avg time per frame */
514             avio_wl16(pb, 0); /* stream name count */
515             avio_wl16(pb, 0); /* payload extension system count */
516             end_header(pb, es_pos);
517         }
518     }
519     if (has_aspect_ratio) {
520         int64_t hpos2;
521         hpos2 = put_header(pb, &ff_asf_metadata_header);
522         avio_wl16(pb, 2 * has_aspect_ratio);
523         for (n = 0; n < s->nb_streams; n++) {
524             enc = s->streams[n]->codec;
525             if (   enc->codec_type == AVMEDIA_TYPE_VIDEO
526                 && enc->sample_aspect_ratio.num > 0
527                 && enc->sample_aspect_ratio.den > 0) {
528                 AVRational sar = enc->sample_aspect_ratio;
529                 avio_wl16(pb, 0);
530                 // the stream number is set like this below
531                 avio_wl16(pb, n + 1);
532                 avio_wl16(pb, 26); // name_len
533                 avio_wl16(pb,  3); // value_type
534                 avio_wl32(pb,  4); // value_len
535                 avio_put_str16le(pb, "AspectRatioX");
536                 avio_wl32(pb, sar.num);
537                 avio_wl16(pb, 0);
538                 // the stream number is set like this below
539                 avio_wl16(pb, n + 1);
540                 avio_wl16(pb, 26); // name_len
541                 avio_wl16(pb,  3); // value_type
542                 avio_wl32(pb,  4); // value_len
543                 avio_put_str16le(pb, "AspectRatioY");
544                 avio_wl32(pb, sar.den);
545             }
546         }
547         end_header(pb, hpos2);
548     }
549     {
550         int64_t pos1;
551         pos1 = avio_tell(pb);
552         avio_seek(pb, hpos + 42, SEEK_SET);
553         avio_wl32(pb, pos1 - hpos - 46);
554         avio_seek(pb, pos1, SEEK_SET);
555     }
556     end_header(pb, hpos);
557
558     /* title and other infos */
559     if (has_title) {
560         int len;
561         uint8_t *buf;
562         AVIOContext *dyn_buf;
563
564         if (avio_open_dyn_buf(&dyn_buf) < 0)
565             return AVERROR(ENOMEM);
566
567         hpos = put_header(pb, &ff_asf_comment_header);
568
569         for (n = 0; n < FF_ARRAY_ELEMS(tags); n++) {
570             len = tags[n] ? avio_put_str16le(dyn_buf, tags[n]->value) : 0;
571             avio_wl16(pb, len);
572         }
573         len = avio_close_dyn_buf(dyn_buf, &buf);
574         avio_write(pb, buf, len);
575         av_freep(&buf);
576         end_header(pb, hpos);
577     }
578     if (metadata_count) {
579         AVDictionaryEntry *tag = NULL;
580         hpos = put_header(pb, &ff_asf_extended_content_header);
581         avio_wl16(pb, metadata_count);
582         while ((tag = av_dict_get(s->metadata, "", tag, AV_DICT_IGNORE_SUFFIX))) {
583             put_str16(pb, tag->key);
584             avio_wl16(pb, 0);
585             put_str16(pb, tag->value);
586         }
587         end_header(pb, hpos);
588     }
589     /* chapters using ASF markers */
590     if (!asf->is_streamed && s->nb_chapters) {
591         int ret;
592         if ((ret = asf_write_markers(s)) < 0)
593             return ret;
594     }
595     /* stream headers */
596     for (n = 0; n < s->nb_streams; n++) {
597         int64_t es_pos;
598         //        ASFStream *stream = &asf->streams[n];
599
600         enc                 = s->streams[n]->codec;
601         asf->streams[n].num = n + 1;
602         asf->streams[n].seq = 1;
603
604         switch (enc->codec_type) {
605         case AVMEDIA_TYPE_AUDIO:
606             wav_extra_size = 0;
607             extra_size     = 18 + wav_extra_size;
608             extra_size2    = 8;
609             break;
610         default:
611         case AVMEDIA_TYPE_VIDEO:
612             wav_extra_size = enc->extradata_size;
613             extra_size     = 0x33 + wav_extra_size;
614             extra_size2    = 0;
615             break;
616         }
617
618         hpos = put_header(pb, &ff_asf_stream_header);
619         if (enc->codec_type == AVMEDIA_TYPE_AUDIO) {
620             ff_put_guid(pb, &ff_asf_audio_stream);
621             ff_put_guid(pb, &ff_asf_audio_conceal_spread);
622         } else {
623             ff_put_guid(pb, &ff_asf_video_stream);
624             ff_put_guid(pb, &ff_asf_video_conceal_none);
625         }
626         avio_wl64(pb, 0); /* ??? */
627         es_pos = avio_tell(pb);
628         avio_wl32(pb, extra_size); /* wav header len */
629         avio_wl32(pb, extra_size2); /* additional data len */
630         avio_wl16(pb, n + 1); /* stream number */
631         avio_wl32(pb, 0); /* ??? */
632
633         if (enc->codec_type == AVMEDIA_TYPE_AUDIO) {
634             /* WAVEFORMATEX header */
635             int wavsize = ff_put_wav_header(pb, enc, FF_PUT_WAV_HEADER_FORCE_WAVEFORMATEX);
636
637             if (wavsize < 0)
638                 return -1;
639             if (wavsize != extra_size) {
640                 cur_pos = avio_tell(pb);
641                 avio_seek(pb, es_pos, SEEK_SET);
642                 avio_wl32(pb, wavsize); /* wav header len */
643                 avio_seek(pb, cur_pos, SEEK_SET);
644             }
645             /* ERROR Correction */
646             avio_w8(pb, 0x01);
647             if (enc->codec_id == AV_CODEC_ID_ADPCM_G726 || !enc->block_align) {
648                 avio_wl16(pb, 0x0190);
649                 avio_wl16(pb, 0x0190);
650             } else {
651                 avio_wl16(pb, enc->block_align);
652                 avio_wl16(pb, enc->block_align);
653             }
654             avio_wl16(pb, 0x01);
655             avio_w8(pb, 0x00);
656         } else {
657             avio_wl32(pb, enc->width);
658             avio_wl32(pb, enc->height);
659             avio_w8(pb, 2); /* ??? */
660             avio_wl16(pb, 40 + enc->extradata_size); /* size */
661
662             /* BITMAPINFOHEADER header */
663             ff_put_bmp_header(pb, enc, ff_codec_bmp_tags, 1, 0);
664         }
665         end_header(pb, hpos);
666     }
667
668     /* media comments */
669
670     hpos = put_header(pb, &ff_asf_codec_comment_header);
671     ff_put_guid(pb, &ff_asf_codec_comment1_header);
672     avio_wl32(pb, s->nb_streams);
673     for (n = 0; n < s->nb_streams; n++) {
674         const AVCodecDescriptor *codec_desc;
675         const char *desc;
676
677         enc  = s->streams[n]->codec;
678         codec_desc = avcodec_descriptor_get(enc->codec_id);
679
680         if (enc->codec_type == AVMEDIA_TYPE_AUDIO)
681             avio_wl16(pb, 2);
682         else if (enc->codec_type == AVMEDIA_TYPE_VIDEO)
683             avio_wl16(pb, 1);
684         else
685             avio_wl16(pb, -1);
686
687         if (enc->codec_id == AV_CODEC_ID_WMAV2)
688             desc = "Windows Media Audio V8";
689         else
690             desc = codec_desc ? codec_desc->name : NULL;
691
692         if (desc) {
693             AVIOContext *dyn_buf;
694             uint8_t *buf;
695             int len;
696
697             if (avio_open_dyn_buf(&dyn_buf) < 0)
698                 return AVERROR(ENOMEM);
699
700             avio_put_str16le(dyn_buf, desc);
701             len = avio_close_dyn_buf(dyn_buf, &buf);
702             avio_wl16(pb, len / 2); // "number of characters" = length in bytes / 2
703
704             avio_write(pb, buf, len);
705             av_freep(&buf);
706         } else
707             avio_wl16(pb, 0);
708
709         avio_wl16(pb, 0); /* no parameters */
710
711         /* id */
712         if (enc->codec_type == AVMEDIA_TYPE_AUDIO) {
713             avio_wl16(pb, 2);
714             avio_wl16(pb, enc->codec_tag);
715         } else {
716             avio_wl16(pb, 4);
717             avio_wl32(pb, enc->codec_tag);
718         }
719         if (!enc->codec_tag)
720             return -1;
721     }
722     end_header(pb, hpos);
723
724     /* patch the header size fields */
725
726     cur_pos     = avio_tell(pb);
727     header_size = cur_pos - header_offset;
728     if (asf->is_streamed) {
729         header_size += 8 + 30 + DATA_HEADER_SIZE;
730
731         avio_seek(pb, header_offset - 10 - 30, SEEK_SET);
732         avio_wl16(pb, header_size);
733         avio_seek(pb, header_offset - 2 - 30, SEEK_SET);
734         avio_wl16(pb, header_size);
735
736         header_size -= 8 + 30 + DATA_HEADER_SIZE;
737     }
738     header_size += 24 + 6;
739     avio_seek(pb, header_offset - 14, SEEK_SET);
740     avio_wl64(pb, header_size);
741     avio_seek(pb, cur_pos, SEEK_SET);
742
743     /* movie chunk, followed by packets of packet_size */
744     asf->data_offset = cur_pos;
745     ff_put_guid(pb, &ff_asf_data_header);
746     avio_wl64(pb, data_chunk_size);
747     ff_put_guid(pb, &ff_asf_my_guid);
748     avio_wl64(pb, asf->nb_packets); /* nb packets */
749     avio_w8(pb, 1); /* ??? */
750     avio_w8(pb, 1); /* ??? */
751     return 0;
752 }
753
754 static int asf_write_header(AVFormatContext *s)
755 {
756     ASFContext *asf = s->priv_data;
757
758     s->packet_size  = asf->packet_size;
759     s->max_interleave_delta = 0;
760     asf->nb_packets = 0;
761
762     if (s->nb_streams > 127) {
763         av_log(s, AV_LOG_ERROR, "ASF can only handle 127 streams\n");
764         return AVERROR(EINVAL);
765     }
766
767     asf->index_ptr             = av_malloc(sizeof(ASFIndex) * ASF_INDEX_BLOCK);
768     if (!asf->index_ptr)
769         return AVERROR(ENOMEM);
770     asf->nb_index_memory_alloc = ASF_INDEX_BLOCK;
771     asf->maximum_packet        = 0;
772
773     /* the data-chunk-size has to be 50 (DATA_HEADER_SIZE), which is
774      * data_size - asf->data_offset at the moment this function is done.
775      * It is needed to use asf as a streamable format. */
776     if (asf_write_header1(s, 0, DATA_HEADER_SIZE) < 0) {
777         //av_free(asf);
778         av_freep(&asf->index_ptr);
779         return -1;
780     }
781
782     avio_flush(s->pb);
783
784     asf->packet_nb_payloads     = 0;
785     asf->packet_timestamp_start = -1;
786     asf->packet_timestamp_end   = -1;
787     ffio_init_context(&asf->pb, asf->packet_buf, s->packet_size, 1,
788                       NULL, NULL, NULL, NULL);
789
790     if (s->avoid_negative_ts < 0)
791         s->avoid_negative_ts = 1;
792
793     return 0;
794 }
795
796 static int asf_write_stream_header(AVFormatContext *s)
797 {
798     ASFContext *asf = s->priv_data;
799
800     asf->is_streamed = 1;
801
802     return asf_write_header(s);
803 }
804
805 static int put_payload_parsing_info(AVFormatContext *s,
806                                     unsigned sendtime, unsigned duration,
807                                     int nb_payloads, int padsize)
808 {
809     ASFContext *asf = s->priv_data;
810     AVIOContext *pb = s->pb;
811     int ppi_size, i;
812     int64_t start = avio_tell(pb);
813
814     int iLengthTypeFlags = ASF_PPI_LENGTH_TYPE_FLAGS;
815
816     padsize -= PACKET_HEADER_MIN_SIZE;
817     if (asf->multi_payloads_present)
818         padsize--;
819     av_assert0(padsize >= 0);
820
821     avio_w8(pb, ASF_PACKET_ERROR_CORRECTION_FLAGS);
822     for (i = 0; i < ASF_PACKET_ERROR_CORRECTION_DATA_SIZE; i++)
823         avio_w8(pb, 0x0);
824
825     if (asf->multi_payloads_present)
826         iLengthTypeFlags |= ASF_PPI_FLAG_MULTIPLE_PAYLOADS_PRESENT;
827
828     if (padsize > 0) {
829         if (padsize < 256)
830             iLengthTypeFlags |= ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_BYTE;
831         else
832             iLengthTypeFlags |= ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_WORD;
833     }
834     avio_w8(pb, iLengthTypeFlags);
835
836     avio_w8(pb, ASF_PPI_PROPERTY_FLAGS);
837
838     if (iLengthTypeFlags & ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_WORD)
839         avio_wl16(pb, padsize - 2);
840     if (iLengthTypeFlags & ASF_PPI_FLAG_PADDING_LENGTH_FIELD_IS_BYTE)
841         avio_w8(pb, padsize - 1);
842
843     avio_wl32(pb, sendtime);
844     avio_wl16(pb, duration);
845     if (asf->multi_payloads_present)
846         avio_w8(pb, nb_payloads | ASF_PAYLOAD_FLAGS);
847
848     ppi_size = avio_tell(pb) - start;
849
850     return ppi_size;
851 }
852
853 static void flush_packet(AVFormatContext *s)
854 {
855     ASFContext *asf = s->priv_data;
856     int packet_hdr_size, packet_filled_size;
857
858     av_assert0(asf->packet_timestamp_end >= asf->packet_timestamp_start);
859
860     if (asf->is_streamed)
861         put_chunk(s, 0x4424, s->packet_size, 0);
862
863     packet_hdr_size = put_payload_parsing_info(s,
864                                                asf->packet_timestamp_start,
865                                                asf->packet_timestamp_end - asf->packet_timestamp_start,
866                                                asf->packet_nb_payloads,
867                                                asf->packet_size_left);
868
869     packet_filled_size = asf->packet_size - asf->packet_size_left;
870     av_assert0(packet_hdr_size <= asf->packet_size_left);
871     memset(asf->packet_buf + packet_filled_size, 0, asf->packet_size_left);
872
873     avio_write(s->pb, asf->packet_buf, s->packet_size - packet_hdr_size);
874
875     avio_flush(s->pb);
876     asf->nb_packets++;
877     asf->packet_nb_payloads     = 0;
878     asf->packet_timestamp_start = -1;
879     asf->packet_timestamp_end   = -1;
880     ffio_init_context(&asf->pb, asf->packet_buf, s->packet_size, 1,
881                       NULL, NULL, NULL, NULL);
882 }
883
884 static void put_payload_header(AVFormatContext *s, ASFStream *stream,
885                                int64_t presentation_time, int m_obj_size,
886                                int m_obj_offset, int payload_len, int flags)
887 {
888     ASFContext *asf = s->priv_data;
889     AVIOContext *pb = &asf->pb;
890     int val;
891
892     val = stream->num;
893     if (flags & AV_PKT_FLAG_KEY)
894         val |= ASF_PL_FLAG_KEY_FRAME;
895     avio_w8(pb, val);
896
897     avio_w8(pb, stream->seq);     // Media object number
898     avio_wl32(pb, m_obj_offset);  // Offset Into Media Object
899
900     // Replicated Data shall be at least 8 bytes long.
901     // The first 4 bytes of data shall contain the
902     // Size of the Media Object that the payload belongs to.
903     // The next 4 bytes of data shall contain the
904     // Presentation Time for the media object that the payload belongs to.
905     avio_w8(pb, ASF_PAYLOAD_REPLICATED_DATA_LENGTH);
906
907     avio_wl32(pb, m_obj_size);        // Replicated Data - Media Object Size
908     avio_wl32(pb, (uint32_t) presentation_time); // Replicated Data - Presentation Time
909
910     if (asf->multi_payloads_present) {
911         avio_wl16(pb, payload_len);   // payload length
912     }
913 }
914
915 static void put_frame(AVFormatContext *s, ASFStream *stream, AVStream *avst,
916                       int64_t timestamp, const uint8_t *buf,
917                       int m_obj_size, int flags)
918 {
919     ASFContext *asf = s->priv_data;
920     int m_obj_offset, payload_len, frag_len1;
921
922     m_obj_offset = 0;
923     while (m_obj_offset < m_obj_size) {
924         payload_len = m_obj_size - m_obj_offset;
925         if (asf->packet_timestamp_start == -1) {
926             const int multi_payload_constant = (asf->packet_size - MULTI_PAYLOAD_HEADERS);
927             asf->multi_payloads_present = (payload_len < multi_payload_constant);
928
929             asf->packet_size_left = asf->packet_size;
930             if (asf->multi_payloads_present) {
931                 frag_len1 = multi_payload_constant - 1;
932             } else {
933                 frag_len1 = asf->packet_size - SINGLE_PAYLOAD_HEADERS;
934             }
935             asf->packet_timestamp_start = timestamp;
936         } else {
937             // multi payloads
938             frag_len1 = asf->packet_size_left -
939                         PAYLOAD_HEADER_SIZE_MULTIPLE_PAYLOADS -
940                         PACKET_HEADER_MIN_SIZE - 1;
941
942             if (frag_len1 < payload_len &&
943                 avst->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
944                 flush_packet(s);
945                 continue;
946             }
947             if (asf->packet_timestamp_start > INT64_MAX - UINT16_MAX ||
948                 timestamp > asf->packet_timestamp_start + UINT16_MAX) {
949                 flush_packet(s);
950                 continue;
951             }
952         }
953         if (frag_len1 > 0) {
954             if (payload_len > frag_len1)
955                 payload_len = frag_len1;
956             else if (payload_len == (frag_len1 - 1))
957                 payload_len = frag_len1 - 2;  // additional byte need to put padding length
958
959             put_payload_header(s, stream, timestamp + PREROLL_TIME,
960                                m_obj_size, m_obj_offset, payload_len, flags);
961             avio_write(&asf->pb, buf, payload_len);
962
963             if (asf->multi_payloads_present)
964                 asf->packet_size_left -= (payload_len + PAYLOAD_HEADER_SIZE_MULTIPLE_PAYLOADS);
965             else
966                 asf->packet_size_left -= (payload_len + PAYLOAD_HEADER_SIZE_SINGLE_PAYLOAD);
967             asf->packet_timestamp_end = timestamp;
968
969             asf->packet_nb_payloads++;
970         } else {
971             payload_len = 0;
972         }
973         m_obj_offset += payload_len;
974         buf          += payload_len;
975
976         if (!asf->multi_payloads_present)
977             flush_packet(s);
978         else if (asf->packet_size_left <= (PAYLOAD_HEADER_SIZE_MULTIPLE_PAYLOADS + PACKET_HEADER_MIN_SIZE + 1))
979             flush_packet(s);
980         else if (asf->packet_nb_payloads == ASF_PAYLOADS_PER_PACKET)
981             flush_packet(s);
982     }
983     stream->seq++;
984 }
985
986 static int update_index(AVFormatContext *s, int start_sec,
987                          uint32_t packet_number, uint16_t packet_count,
988                          uint64_t packet_offset)
989 {
990     ASFContext *asf = s->priv_data;
991
992     if (start_sec > asf->next_start_sec) {
993         int i;
994
995         if (!asf->next_start_sec) {
996             asf->next_packet_number = packet_number;
997             asf->next_packet_count  = packet_count;
998             asf->next_packet_offset = packet_offset;
999         }
1000
1001         if (start_sec > asf->nb_index_memory_alloc) {
1002             int err;
1003             asf->nb_index_memory_alloc = (start_sec + ASF_INDEX_BLOCK) & ~(ASF_INDEX_BLOCK - 1);
1004             if ((err = av_reallocp_array(&asf->index_ptr,
1005                                          asf->nb_index_memory_alloc,
1006                                          sizeof(*asf->index_ptr))) < 0) {
1007                 asf->nb_index_memory_alloc = 0;
1008                 return err;
1009             }
1010         }
1011         for (i = asf->next_start_sec; i < start_sec; i++) {
1012             asf->index_ptr[i].packet_number = asf->next_packet_number;
1013             asf->index_ptr[i].packet_count  = asf->next_packet_count;
1014             asf->index_ptr[i].send_time     = asf->next_start_sec * INT64_C(10000000);
1015             asf->index_ptr[i].offset        = asf->next_packet_offset;
1016
1017         }
1018     }
1019     asf->maximum_packet     = FFMAX(asf->maximum_packet, packet_count);
1020     asf->next_packet_number = packet_number;
1021     asf->next_packet_count  = packet_count;
1022     asf->next_packet_offset = packet_offset;
1023     asf->next_start_sec     = start_sec;
1024
1025     return 0;
1026 }
1027
1028 static int asf_write_packet(AVFormatContext *s, AVPacket *pkt)
1029 {
1030     ASFContext *asf = s->priv_data;
1031     AVIOContext *pb = s->pb;
1032     ASFStream *stream;
1033     AVCodecContext *codec;
1034     uint32_t packet_number;
1035     int64_t pts;
1036     int start_sec;
1037     int flags = pkt->flags;
1038     int ret;
1039     uint64_t offset = avio_tell(pb);
1040
1041     codec  = s->streams[pkt->stream_index]->codec;
1042     stream = &asf->streams[pkt->stream_index];
1043
1044     if (codec->codec_type == AVMEDIA_TYPE_AUDIO)
1045         flags &= ~AV_PKT_FLAG_KEY;
1046
1047     pts = (pkt->pts != AV_NOPTS_VALUE) ? pkt->pts : pkt->dts;
1048     av_assert0(pts != AV_NOPTS_VALUE);
1049     if (   pts < - PREROLL_TIME
1050         || pts > (INT_MAX-3)/10000LL * ASF_INDEXED_INTERVAL - PREROLL_TIME) {
1051         av_log(s, AV_LOG_ERROR, "input pts %"PRId64" is invalid\n", pts);
1052         return AVERROR(EINVAL);
1053     }
1054     pts *= 10000;
1055     asf->duration = FFMAX(asf->duration, pts + pkt->duration * 10000);
1056
1057     packet_number = asf->nb_packets;
1058     put_frame(s, stream, s->streams[pkt->stream_index],
1059               pkt->dts, pkt->data, pkt->size, flags);
1060
1061     start_sec = (int)((PREROLL_TIME * 10000 + pts + ASF_INDEXED_INTERVAL - 1)
1062               / ASF_INDEXED_INTERVAL);
1063
1064     /* check index */
1065     if ((!asf->is_streamed) && (flags & AV_PKT_FLAG_KEY)) {
1066         uint16_t packet_count = asf->nb_packets - packet_number;
1067         ret = update_index(s, start_sec, packet_number, packet_count, offset);
1068         if (ret < 0)
1069             return ret;
1070     }
1071     asf->end_sec = start_sec;
1072
1073     return 0;
1074 }
1075
1076 static int asf_write_index(AVFormatContext *s, const ASFIndex *index,
1077                            uint16_t max, uint32_t count)
1078 {
1079     AVIOContext *pb = s->pb;
1080     int i;
1081
1082     ff_put_guid(pb, &ff_asf_simple_index_header);
1083     avio_wl64(pb, 24 + 16 + 8 + 4 + 4 + (4 + 2) * count);
1084     ff_put_guid(pb, &ff_asf_my_guid);
1085     avio_wl64(pb, ASF_INDEXED_INTERVAL);
1086     avio_wl32(pb, max);
1087     avio_wl32(pb, count);
1088     for (i = 0; i < count; i++) {
1089         avio_wl32(pb, index[i].packet_number);
1090         avio_wl16(pb, index[i].packet_count);
1091     }
1092
1093     return 0;
1094 }
1095
1096 static int asf_write_trailer(AVFormatContext *s)
1097 {
1098     ASFContext *asf = s->priv_data;
1099     int64_t file_size, data_size;
1100     int ret;
1101
1102     /* flush the current packet */
1103     if (asf->pb.buf_ptr > asf->pb.buffer)
1104         flush_packet(s);
1105
1106     /* write index */
1107     data_size = avio_tell(s->pb);
1108     if (!asf->is_streamed && asf->next_start_sec) {
1109         if ((ret = update_index(s, asf->end_sec + 1, 0, 0, 0)) < 0)
1110             return ret;
1111         asf_write_index(s, asf->index_ptr, asf->maximum_packet, asf->next_start_sec);
1112     }
1113     avio_flush(s->pb);
1114
1115     if (asf->is_streamed || !s->pb->seekable) {
1116         put_chunk(s, 0x4524, 0, 0); /* end of stream */
1117     } else {
1118         /* rewrite an updated header */
1119         file_size = avio_tell(s->pb);
1120         avio_seek(s->pb, 0, SEEK_SET);
1121         asf_write_header1(s, file_size, data_size - asf->data_offset);
1122     }
1123
1124     av_freep(&asf->index_ptr);
1125     return 0;
1126 }
1127
1128 static const AVOption asf_options[] = {
1129     { "packet_size", "Packet size", offsetof(ASFContext, packet_size), AV_OPT_TYPE_INT, {.i64 = 3200}, PACKET_SIZE_MIN, PACKET_SIZE_MAX, AV_OPT_FLAG_ENCODING_PARAM },
1130     { NULL },
1131 };
1132
1133 #if CONFIG_ASF_MUXER
1134 static const AVClass asf_muxer_class = {
1135     .class_name     = "ASF muxer",
1136     .item_name      = av_default_item_name,
1137     .option         = asf_options,
1138     .version        = LIBAVUTIL_VERSION_INT,
1139 };
1140
1141 AVOutputFormat ff_asf_muxer = {
1142     .name           = "asf",
1143     .long_name      = NULL_IF_CONFIG_SMALL("ASF (Advanced / Active Streaming Format)"),
1144     .mime_type      = "video/x-ms-asf",
1145     .extensions     = "asf,wmv,wma",
1146     .priv_data_size = sizeof(ASFContext),
1147     .audio_codec    = AV_CODEC_ID_WMAV2,
1148     .video_codec    = AV_CODEC_ID_MSMPEG4V3,
1149     .write_header   = asf_write_header,
1150     .write_packet   = asf_write_packet,
1151     .write_trailer  = asf_write_trailer,
1152     .flags          = AVFMT_GLOBALHEADER,
1153     .codec_tag      = (const AVCodecTag * const []) {
1154         codec_asf_bmp_tags, ff_codec_bmp_tags, ff_codec_wav_tags, 0
1155     },
1156     .priv_class        = &asf_muxer_class,
1157 };
1158 #endif /* CONFIG_ASF_MUXER */
1159
1160 #if CONFIG_ASF_STREAM_MUXER
1161 static const AVClass asf_stream_muxer_class = {
1162     .class_name     = "ASF stream muxer",
1163     .item_name      = av_default_item_name,
1164     .option         = asf_options,
1165     .version        = LIBAVUTIL_VERSION_INT,
1166 };
1167
1168 AVOutputFormat ff_asf_stream_muxer = {
1169     .name           = "asf_stream",
1170     .long_name      = NULL_IF_CONFIG_SMALL("ASF (Advanced / Active Streaming Format)"),
1171     .mime_type      = "video/x-ms-asf",
1172     .extensions     = "asf,wmv,wma",
1173     .priv_data_size = sizeof(ASFContext),
1174     .audio_codec    = AV_CODEC_ID_WMAV2,
1175     .video_codec    = AV_CODEC_ID_MSMPEG4V3,
1176     .write_header   = asf_write_stream_header,
1177     .write_packet   = asf_write_packet,
1178     .write_trailer  = asf_write_trailer,
1179     .flags          = AVFMT_GLOBALHEADER,
1180     .codec_tag      = (const AVCodecTag * const []) {
1181         codec_asf_bmp_tags, ff_codec_bmp_tags, ff_codec_wav_tags, 0
1182     },
1183     .priv_class        = &asf_stream_muxer_class,
1184 };
1185 #endif /* CONFIG_ASF_STREAM_MUXER */