1 /*
2 * Windows Television (WTV) muxer
3 * Copyright (c) 2011 Zhentan Feng <spyfeng at gmail dot com>
4 * Copyright (c) 2011 Peter Ross <pross@xvid.org>
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 /**
23 * @file
24 * Windows Television (WTV) demuxer
25 * @author Zhentan Feng <spyfeng at gmail dot com>
26 */
27
28 #include "libavutil/intreadwrite.h"
29 #include "libavutil/avassert.h"
30 #include "avformat.h"
31 #include "avio_internal.h"
32 #include "internal.h"
33 #include "mpegts.h"
34 #include "wtv.h"
35
36 #define WTV_BIGSECTOR_SIZE (1 << WTV_BIGSECTOR_BITS)
37 #define INDEX_BASE 0x2
38 #define MAX_NB_INDEX 10
39
40 /* declare utf16le strings */
41 #define _ , 0,
42 static const uint8_t timeline_table_0_header_events[] =
43 {'t'_'i'_'m'_'e'_'l'_'i'_'n'_'e'_'.'_'t'_'a'_'b'_'l'_'e'_'.'_'0'_'.'_'h'_'e'_'a'_'d'_'e'_'r'_'.'_'E'_'v'_'e'_'n'_'t'_'s', 0};
44 static const uint8_t table_0_header_legacy_attrib[] =
45 {'t'_'a'_'b'_'l'_'e'_'.'_'0'_'.'_'h'_'e'_'a'_'d'_'e'_'r'_'.'_'l'_'e'_'g'_'a'_'c'_'y'_'_'_'a'_'t'_'t'_'r'_'i'_'b', 0};
46 static const uint8_t table_0_redirector_legacy_attrib[] =
47 {'t'_'a'_'b'_'l'_'e'_'.'_'0'_'.'_'r'_'e'_'d'_'i'_'r'_'e'_'c'_'t'_'o'_'r'_'.'_'l'_'e'_'g'_'a'_'c'_'y'_'_'_'a'_'t'_'t'_'r'_'i'_'b', 0};
48 static const uint8_t table_0_header_time[] =
49 {'t'_'a'_'b'_'l'_'e'_'.'_'0'_'.'_'h'_'e'_'a'_'d'_'e'_'r'_'.'_'t'_'i'_'m'_'e', 0};
50 static const uint8_t legacy_attrib[] =
51 {'l'_'e'_'g'_'a'_'c'_'y'_'_'_'a'_'t'_'t'_'r'_'i'_'b', 0};
52 #undef _
53
54 static const ff_asf_guid sub_wtv_guid =
55 {0x8C,0xC3,0xD2,0xC2,0x7E,0x9A,0xDA,0x11,0x8B,0xF7,0x00,0x07,0xE9,0x5E,0xAD,0x8D};
56
57 enum WtvFileIndex {
58 WTV_TIMELINE_TABLE_0_HEADER_EVENTS = 0,
59 WTV_TIMELINE_TABLE_0_ENTRIES_EVENTS,
60 WTV_TIMELINE,
61 WTV_TABLE_0_HEADER_LEGACY_ATTRIB,
62 WTV_TABLE_0_ENTRIES_LEGACY_ATTRIB,
63 WTV_TABLE_0_REDIRECTOR_LEGACY_ATTRIB,
64 WTV_TABLE_0_HEADER_TIME,
65 WTV_TABLE_0_ENTRIES_TIME,
66 WTV_FILES
67 };
68
69 typedef struct {
70 int64_t length;
71 const void *header;
72 int depth;
73 int first_sector;
74 } WtvFile;
75
76 typedef struct {
77 int64_t pos;
78 int64_t serial;
79 const ff_asf_guid * guid;
80 int stream_id;
81 } WtvChunkEntry;
82
83 typedef struct {
84 int64_t serial;
85 int64_t value;
86 } WtvSyncEntry;
87
88 typedef struct {
89 int64_t timeline_start_pos;
90 WtvFile file[WTV_FILES];
91 int64_t serial; /**< chunk serial number */
92 int64_t last_chunk_pos; /**< last chunk position */
93 int64_t last_timestamp_pos; /**< last timestamp chunk position */
94 int64_t first_index_pos; /**< first index_chunk position */
95
96 WtvChunkEntry index[MAX_NB_INDEX];
97 int nb_index;
98 int first_video_flag;
99
100 WtvSyncEntry *st_pairs; /* (serial, timestamp) pairs */
101 int nb_st_pairs;
102 WtvSyncEntry *sp_pairs; /* (serial, position) pairs */
103 int nb_sp_pairs;
104
105 int64_t last_pts;
106 int64_t last_serial;
107
108 AVPacket thumbnail;
109 } WtvContext;
110
111
add_serial_pair(WtvSyncEntry ** list,int * count,int64_t serial,int64_t value)112 static void add_serial_pair(WtvSyncEntry ** list, int * count, int64_t serial, int64_t value)
113 {
114 int new_count = *count + 1;
115 WtvSyncEntry *new_list = av_realloc(*list, new_count * sizeof(WtvSyncEntry));
116 if (!new_list)
117 return;
118 new_list[*count] = (WtvSyncEntry){serial, value};
119 *list = new_list;
120 *count = new_count;
121 }
122
123 typedef int WTVHeaderWriteFunc(AVIOContext *pb);
124
125 typedef struct {
126 const uint8_t *header;
127 int header_size;
128 WTVHeaderWriteFunc *write_header;
129 } WTVRootEntryTable;
130
131 #define write_pad(pb, size) ffio_fill(pb, 0, size)
132
133 /**
134 * Write chunk header. If header chunk (0x80000000 set) then add to list of header chunks
135 */
write_chunk_header(AVFormatContext * s,const ff_asf_guid * guid,int length,int stream_id)136 static void write_chunk_header(AVFormatContext *s, const ff_asf_guid *guid, int length, int stream_id)
137 {
138 WtvContext *wctx = s->priv_data;
139 AVIOContext *pb = s->pb;
140
141 wctx->last_chunk_pos = avio_tell(pb) - wctx->timeline_start_pos;
142 ff_put_guid(pb, guid);
143 avio_wl32(pb, 32 + length);
144 avio_wl32(pb, stream_id);
145 avio_wl64(pb, wctx->serial);
146
147 if ((stream_id & 0x80000000) && guid != &ff_index_guid) {
148 WtvChunkEntry *t = wctx->index + wctx->nb_index;
149 av_assert0(wctx->nb_index < MAX_NB_INDEX);
150 t->pos = wctx->last_chunk_pos;
151 t->serial = wctx->serial;
152 t->guid = guid;
153 t->stream_id = stream_id & 0x3FFFFFFF;
154 wctx->nb_index++;
155 }
156 }
157
write_chunk_header2(AVFormatContext * s,const ff_asf_guid * guid,int stream_id)158 static void write_chunk_header2(AVFormatContext *s, const ff_asf_guid *guid, int stream_id)
159 {
160 WtvContext *wctx = s->priv_data;
161 AVIOContext *pb = s->pb;
162
163 int64_t last_chunk_pos = wctx->last_chunk_pos;
164 write_chunk_header(s, guid, 0, stream_id); // length updated later
165 avio_wl64(pb, last_chunk_pos);
166 }
167
finish_chunk_noindex(AVFormatContext * s)168 static void finish_chunk_noindex(AVFormatContext *s)
169 {
170 WtvContext *wctx = s->priv_data;
171 AVIOContext *pb = s->pb;
172
173 // update the chunk_len field and pad.
174 int64_t chunk_len = avio_tell(pb) - (wctx->last_chunk_pos + wctx->timeline_start_pos);
175 avio_seek(pb, -(chunk_len - 16), SEEK_CUR);
176 avio_wl32(pb, chunk_len);
177 avio_seek(pb, chunk_len - (16 + 4), SEEK_CUR);
178
179 write_pad(pb, WTV_PAD8(chunk_len) - chunk_len);
180 wctx->serial++;
181 }
182
write_index(AVFormatContext * s)183 static void write_index(AVFormatContext *s)
184 {
185 AVIOContext *pb = s->pb;
186 WtvContext *wctx = s->priv_data;
187 int i;
188
189 write_chunk_header2(s, &ff_index_guid, 0x80000000);
190 avio_wl32(pb, 0);
191 avio_wl32(pb, 0);
192
193 for (i = 0; i < wctx->nb_index; i++) {
194 WtvChunkEntry *t = wctx->index + i;
195 ff_put_guid(pb, t->guid);
196 avio_wl64(pb, t->pos);
197 avio_wl32(pb, t->stream_id);
198 avio_wl32(pb, 0); // checksum?
199 avio_wl64(pb, t->serial);
200 }
201 wctx->nb_index = 0; // reset index
202 finish_chunk_noindex(s);
203
204 if (!wctx->first_index_pos)
205 wctx->first_index_pos = wctx->last_chunk_pos;
206 }
207
finish_chunk(AVFormatContext * s)208 static void finish_chunk(AVFormatContext *s)
209 {
210 WtvContext *wctx = s->priv_data;
211 finish_chunk_noindex(s);
212 if (wctx->nb_index == MAX_NB_INDEX)
213 write_index(s);
214 }
215
put_videoinfoheader2(AVIOContext * pb,AVStream * st)216 static void put_videoinfoheader2(AVIOContext *pb, AVStream *st)
217 {
218 unsigned int num, den;
219 AVRational dar = av_mul_q(st->sample_aspect_ratio, (AVRational){st->codec->width, st->codec->height});
220
221 av_reduce(&num, &den, dar.num, dar.den, 0xFFFFFFFF);
222
223 /* VIDEOINFOHEADER2 */
224 avio_wl32(pb, 0);
225 avio_wl32(pb, 0);
226 avio_wl32(pb, st->codec->width);
227 avio_wl32(pb, st->codec->height);
228
229 avio_wl32(pb, 0);
230 avio_wl32(pb, 0);
231 avio_wl32(pb, 0);
232 avio_wl32(pb, 0);
233
234 avio_wl32(pb, st->codec->bit_rate);
235 avio_wl32(pb, 0);
236 avio_wl64(pb, st->avg_frame_rate.num && st->avg_frame_rate.den ? INT64_C(10000000) / av_q2d(st->avg_frame_rate) : 0);
237 avio_wl32(pb, 0);
238 avio_wl32(pb, 0);
239
240 avio_wl32(pb, num);
241 avio_wl32(pb, den);
242 avio_wl32(pb, 0);
243 avio_wl32(pb, 0);
244
245 ff_put_bmp_header(pb, st->codec, ff_codec_bmp_tags, 0, 1);
246
247 if (st->codec->codec_id == AV_CODEC_ID_MPEG2VIDEO) {
248 int padding = (st->codec->extradata_size & 3) ? 4 - (st->codec->extradata_size & 3) : 0;
249 /* MPEG2VIDEOINFO */
250 avio_wl32(pb, 0);
251 avio_wl32(pb, st->codec->extradata_size + padding);
252 avio_wl32(pb, -1);
253 avio_wl32(pb, -1);
254 avio_wl32(pb, 0);
255 avio_write(pb, st->codec->extradata, st->codec->extradata_size);
256 ffio_fill(pb, 0, padding);
257 }
258 }
259
write_stream_codec_info(AVFormatContext * s,AVStream * st)260 static int write_stream_codec_info(AVFormatContext *s, AVStream *st)
261 {
262 const ff_asf_guid *g, *media_type, *format_type;
263 const AVCodecTag *tags;
264 AVIOContext *pb = s->pb;
265 int64_t hdr_pos_start;
266 int hdr_size = 0;
267
268 if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
269 g = get_codec_guid(st->codec->codec_id, ff_video_guids);
270 media_type = &ff_mediatype_video;
271 format_type = st->codec->codec_id == AV_CODEC_ID_MPEG2VIDEO ? &ff_format_mpeg2_video : &ff_format_videoinfo2;
272 tags = ff_codec_bmp_tags;
273 } else if (st->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
274 g = get_codec_guid(st->codec->codec_id, ff_codec_wav_guids);
275 media_type = &ff_mediatype_audio;
276 format_type = &ff_format_waveformatex;
277 tags = ff_codec_wav_tags;
278 } else {
279 av_log(s, AV_LOG_ERROR, "unknown codec_type (0x%x)\n", st->codec->codec_type);
280 return -1;
281 }
282
283 ff_put_guid(pb, media_type); // mediatype
284 ff_put_guid(pb, &ff_mediasubtype_cpfilters_processed); // subtype
285 write_pad(pb, 12);
286 ff_put_guid(pb,&ff_format_cpfilters_processed); // format type
287 avio_wl32(pb, 0); // size
288
289 hdr_pos_start = avio_tell(pb);
290 if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
291 put_videoinfoheader2(pb, st);
292 } else {
293 if (ff_put_wav_header(pb, st->codec, 0) < 0)
294 format_type = &ff_format_none;
295 }
296 hdr_size = avio_tell(pb) - hdr_pos_start;
297
298 // seek back write hdr_size
299 avio_seek(pb, -(hdr_size + 4), SEEK_CUR);
300 avio_wl32(pb, hdr_size + 32);
301 avio_seek(pb, hdr_size, SEEK_CUR);
302 if (g) {
303 ff_put_guid(pb, g); // actual_subtype
304 } else {
305 int tag = ff_codec_get_tag(tags, st->codec->codec_id);
306 if (!tag) {
307 av_log(s, AV_LOG_ERROR, "unsupported codec_id (0x%x)\n", st->codec->codec_id);
308 return -1;
309 }
310 avio_wl32(pb, tag);
311 avio_write(pb, (const uint8_t[]){FF_MEDIASUBTYPE_BASE_GUID}, 12);
312 }
313 ff_put_guid(pb, format_type); // actual_formattype
314
315 return 0;
316 }
317
write_stream_codec(AVFormatContext * s,AVStream * st)318 static int write_stream_codec(AVFormatContext *s, AVStream * st)
319 {
320 AVIOContext *pb = s->pb;
321 int ret;
322 write_chunk_header2(s, &ff_stream1_guid, 0x80000000 | 0x01);
323
324 avio_wl32(pb, 0x01);
325 write_pad(pb, 4);
326 write_pad(pb, 4);
327
328 ret = write_stream_codec_info(s, st);
329 if (ret < 0) {
330 av_log(s, AV_LOG_ERROR, "write stream codec info failed codec_type(0x%x)\n", st->codec->codec_type);
331 return -1;
332 }
333
334 finish_chunk(s);
335 return 0;
336 }
337
write_sync(AVFormatContext * s)338 static void write_sync(AVFormatContext *s)
339 {
340 AVIOContext *pb = s->pb;
341 WtvContext *wctx = s->priv_data;
342 int64_t last_chunk_pos = wctx->last_chunk_pos;
343
344 write_chunk_header(s, &ff_sync_guid, 0x18, 0);
345 avio_wl64(pb, wctx->first_index_pos);
346 avio_wl64(pb, wctx->last_timestamp_pos);
347 avio_wl64(pb, 0);
348
349 finish_chunk(s);
350 add_serial_pair(&wctx->sp_pairs, &wctx->nb_sp_pairs, wctx->serial, wctx->last_chunk_pos);
351
352 wctx->last_chunk_pos = last_chunk_pos;
353 }
354
write_stream_data(AVFormatContext * s,AVStream * st)355 static int write_stream_data(AVFormatContext *s, AVStream *st)
356 {
357 AVIOContext *pb = s->pb;
358 int ret;
359
360 write_chunk_header2(s, &ff_SBE2_STREAM_DESC_EVENT, 0x80000000 | (st->index + INDEX_BASE));
361 avio_wl32(pb, 0x00000001);
362 avio_wl32(pb, st->index + INDEX_BASE); //stream_id
363 avio_wl32(pb, 0x00000001);
364 write_pad(pb, 8);
365
366 ret = write_stream_codec_info(s, st);
367 if (ret < 0) {
368 av_log(s, AV_LOG_ERROR, "write stream codec info failed codec_type(0x%x)\n", st->codec->codec_type);
369 return -1;
370 }
371 finish_chunk(s);
372
373 avpriv_set_pts_info(st, 64, 1, 10000000);
374
375 return 0;
376 }
377
write_header(AVFormatContext * s)378 static int write_header(AVFormatContext *s)
379 {
380 AVIOContext *pb = s->pb;
381 WtvContext *wctx = s->priv_data;
382 int i, pad, ret;
383 AVStream *st;
384
385 wctx->last_chunk_pos = -1;
386 wctx->last_timestamp_pos = -1;
387
388 ff_put_guid(pb, &ff_wtv_guid);
389 ff_put_guid(pb, &sub_wtv_guid);
390
391 avio_wl32(pb, 0x01);
392 avio_wl32(pb, 0x02);
393 avio_wl32(pb, 1 << WTV_SECTOR_BITS);
394 avio_wl32(pb, 1 << WTV_BIGSECTOR_BITS);
395
396 //write initial root fields
397 avio_wl32(pb, 0); // root_size, update later
398 write_pad(pb, 4);
399 avio_wl32(pb, 0); // root_sector, update it later.
400
401 write_pad(pb, 32);
402 avio_wl32(pb, 0); // file ends pointer, update it later.
403
404 pad = (1 << WTV_SECTOR_BITS) - avio_tell(pb);
405 write_pad(pb, pad);
406
407 wctx->timeline_start_pos = avio_tell(pb);
408
409 wctx->serial = 1;
410 wctx->last_chunk_pos = -1;
411 wctx->first_video_flag = 1;
412
413 for (i = 0; i < s->nb_streams; i++) {
414 st = s->streams[i];
415 if (st->codec->codec_id == AV_CODEC_ID_MJPEG)
416 continue;
417 ret = write_stream_codec(s, st);
418 if (ret < 0) {
419 av_log(s, AV_LOG_ERROR, "write stream codec failed codec_type(0x%x)\n", st->codec->codec_type);
420 return -1;
421 }
422 if (!i)
423 write_sync(s);
424 }
425
426 for (i = 0; i < s->nb_streams; i++) {
427 st = s->streams[i];
428 if (st->codec->codec_id == AV_CODEC_ID_MJPEG)
429 continue;
430 ret = write_stream_data(s, st);
431 if (ret < 0) {
432 av_log(s, AV_LOG_ERROR, "write stream data failed codec_type(0x%x)\n", st->codec->codec_type);
433 return -1;
434 }
435 }
436
437 if (wctx->nb_index)
438 write_index(s);
439
440 return 0;
441 }
442
write_timestamp(AVFormatContext * s,AVPacket * pkt)443 static void write_timestamp(AVFormatContext *s, AVPacket *pkt)
444 {
445 AVIOContext *pb = s->pb;
446 WtvContext *wctx = s->priv_data;
447 AVCodecContext *enc = s->streams[pkt->stream_index]->codec;
448
449 write_chunk_header(s, &ff_timestamp_guid, 56, 0x40000000 | (INDEX_BASE + pkt->stream_index));
450 write_pad(pb, 8);
451 avio_wl64(pb, pkt->pts == AV_NOPTS_VALUE ? -1 : pkt->pts);
452 avio_wl64(pb, pkt->pts == AV_NOPTS_VALUE ? -1 : pkt->pts);
453 avio_wl64(pb, pkt->pts == AV_NOPTS_VALUE ? -1 : pkt->pts);
454 avio_wl64(pb, 0);
455 avio_wl64(pb, enc->codec_type == AVMEDIA_TYPE_VIDEO && (pkt->flags & AV_PKT_FLAG_KEY) ? 1 : 0);
456 avio_wl64(pb, 0);
457
458 wctx->last_timestamp_pos = wctx->last_chunk_pos;
459 }
460
write_packet(AVFormatContext * s,AVPacket * pkt)461 static int write_packet(AVFormatContext *s, AVPacket *pkt)
462 {
463 AVIOContext *pb = s->pb;
464 WtvContext *wctx = s->priv_data;
465 AVStream *st = s->streams[pkt->stream_index];
466
467 if (st->codec->codec_id == AV_CODEC_ID_MJPEG && !wctx->thumbnail.size) {
468 av_copy_packet(&wctx->thumbnail, pkt);
469 return 0;
470 } else if (st->codec->codec_id == AV_CODEC_ID_H264) {
471 int ret = ff_check_h264_startcode(s, st, pkt);
472 if (ret < 0)
473 return ret;
474 }
475
476 /* emit sync chunk and 'timeline.table.0.entries.Event' record every 50 frames */
477 if (wctx->serial - (wctx->nb_sp_pairs ? wctx->sp_pairs[wctx->nb_sp_pairs - 1].serial : 0) >= 50)
478 write_sync(s);
479
480 /* emit 'table.0.entries.time' record every 500ms */
481 if (pkt->pts != AV_NOPTS_VALUE && pkt->pts - (wctx->nb_st_pairs ? wctx->st_pairs[wctx->nb_st_pairs - 1].value : 0) >= 5000000)
482 add_serial_pair(&wctx->st_pairs, &wctx->nb_st_pairs, wctx->serial, pkt->pts);
483
484 if (pkt->pts != AV_NOPTS_VALUE && pkt->pts > wctx->last_pts) {
485 wctx->last_pts = pkt->pts;
486 wctx->last_serial = wctx->serial;
487 }
488
489 // write timestamp chunk
490 write_timestamp(s, pkt);
491
492 write_chunk_header(s, &ff_data_guid, pkt->size, INDEX_BASE + pkt->stream_index);
493 avio_write(pb, pkt->data, pkt->size);
494 write_pad(pb, WTV_PAD8(pkt->size) - pkt->size);
495
496 wctx->serial++;
497 return 0;
498 }
499
write_table0_header_events(AVIOContext * pb)500 static int write_table0_header_events(AVIOContext *pb)
501 {
502 avio_wl32(pb, 0x10);
503 write_pad(pb, 84);
504 avio_wl64(pb, 0x32);
505 return 96;
506 }
507
write_table0_header_legacy_attrib(AVIOContext * pb)508 static int write_table0_header_legacy_attrib(AVIOContext *pb)
509 {
510 int pad = 0;
511 avio_wl32(pb, 0xFFFFFFFF);
512 write_pad(pb, 12);
513 avio_write(pb, legacy_attrib, sizeof(legacy_attrib));
514 pad = WTV_PAD8(sizeof(legacy_attrib)) - sizeof(legacy_attrib);
515 write_pad(pb, pad);
516 write_pad(pb, 32);
517 return 48 + WTV_PAD8(sizeof(legacy_attrib));
518 }
519
write_table0_header_time(AVIOContext * pb)520 static int write_table0_header_time(AVIOContext *pb)
521 {
522 avio_wl32(pb, 0x10);
523 write_pad(pb, 76);
524 avio_wl64(pb, 0x40);
525 return 88;
526 }
527
528 static const WTVRootEntryTable wtv_root_entry_table[] = {
529 { timeline_table_0_header_events, sizeof(timeline_table_0_header_events), write_table0_header_events},
530 { ff_timeline_table_0_entries_Events_le16, sizeof(ff_timeline_table_0_entries_Events_le16), NULL},
531 { ff_timeline_le16, sizeof(ff_timeline_le16), NULL},
532 { table_0_header_legacy_attrib, sizeof(table_0_header_legacy_attrib), write_table0_header_legacy_attrib},
533 { ff_table_0_entries_legacy_attrib_le16, sizeof(ff_table_0_entries_legacy_attrib_le16), NULL},
534 { table_0_redirector_legacy_attrib, sizeof(table_0_redirector_legacy_attrib), NULL},
535 { table_0_header_time, sizeof(table_0_header_time), write_table0_header_time},
536 { ff_table_0_entries_time_le16, sizeof(ff_table_0_entries_time_le16), NULL},
537 };
538
write_root_table(AVFormatContext * s,int64_t sector_pos)539 static int write_root_table(AVFormatContext *s, int64_t sector_pos)
540 {
541 AVIOContext *pb = s->pb;
542 WtvContext *wctx = s->priv_data;
543 int size, pad;
544 int i;
545
546 const WTVRootEntryTable *h = wtv_root_entry_table;
547 for (i = 0; i < sizeof(wtv_root_entry_table)/sizeof(WTVRootEntryTable); i++, h++) {
548 WtvFile *w = &wctx->file[i];
549 int filename_padding = WTV_PAD8(h->header_size) - h->header_size;
550 WTVHeaderWriteFunc *write = h->write_header;
551 int len = 0;
552 int64_t len_pos;
553
554 ff_put_guid(pb, &ff_dir_entry_guid);
555 len_pos = avio_tell(pb);
556 avio_wl16(pb, 40 + h->header_size + filename_padding + 8); // maybe updated later
557 write_pad(pb, 6);
558 avio_wl64(pb, write ? 0 : w->length);// maybe update later
559 avio_wl32(pb, (h->header_size + filename_padding) >> 1);
560 write_pad(pb, 4);
561
562 avio_write(pb, h->header, h->header_size);
563 write_pad(pb, filename_padding);
564
565 if (write) {
566 len = write(pb);
567 // update length field
568 avio_seek(pb, len_pos, SEEK_SET);
569 avio_wl64(pb, 40 + h->header_size + filename_padding + len);
570 avio_wl64(pb, len |(ULLN(1)<<62) | (ULLN(1)<<60));
571 avio_seek(pb, 8 + h->header_size + filename_padding + len, SEEK_CUR);
572 } else {
573 avio_wl32(pb, w->first_sector);
574 avio_wl32(pb, w->depth);
575 }
576 }
577
578 // caculate root table size
579 size = avio_tell(pb) - sector_pos;
580 pad = WTV_SECTOR_SIZE- size;
581 write_pad(pb, pad);
582
583 return size;
584 }
585
write_fat(AVIOContext * pb,int start_sector,int nb_sectors,int shift)586 static void write_fat(AVIOContext *pb, int start_sector, int nb_sectors, int shift)
587 {
588 int i;
589 for (i = 0; i < nb_sectors; i++) {
590 avio_wl32(pb, start_sector + (i << shift));
591 }
592 // pad left sector pointer size
593 write_pad(pb, WTV_SECTOR_SIZE - ((nb_sectors << 2) % WTV_SECTOR_SIZE));
594 }
595
write_fat_sector(AVFormatContext * s,int64_t start_pos,int nb_sectors,int sector_bits,int depth)596 static int64_t write_fat_sector(AVFormatContext *s, int64_t start_pos, int nb_sectors, int sector_bits, int depth)
597 {
598 int64_t start_sector = start_pos >> WTV_SECTOR_BITS;
599 int shift = sector_bits - WTV_SECTOR_BITS;
600
601 int64_t fat = avio_tell(s->pb);
602 write_fat(s->pb, start_sector, nb_sectors, shift);
603
604 if (depth == 2) {
605 int64_t start_sector1 = fat >> WTV_SECTOR_BITS;
606 int nb_sectors1 = ((nb_sectors << 2) + WTV_SECTOR_SIZE - 1) / WTV_SECTOR_SIZE;
607 int64_t fat1 = avio_tell(s->pb);
608
609 write_fat(s->pb, start_sector1, nb_sectors1, 0);
610 return fat1;
611 }
612
613 return fat;
614 }
615
write_table_entries_events(AVFormatContext * s)616 static void write_table_entries_events(AVFormatContext *s)
617 {
618 AVIOContext *pb = s->pb;
619 WtvContext *wctx = s->priv_data;
620 int i;
621 for (i = 0; i < wctx->nb_sp_pairs; i++) {
622 avio_wl64(pb, wctx->sp_pairs[i].serial);
623 avio_wl64(pb, wctx->sp_pairs[i].value);
624 }
625 }
626
write_table_entries_time(AVFormatContext * s)627 static void write_table_entries_time(AVFormatContext *s)
628 {
629 AVIOContext *pb = s->pb;
630 WtvContext *wctx = s->priv_data;
631 int i;
632 for (i = 0; i < wctx->nb_st_pairs; i++) {
633 avio_wl64(pb, wctx->st_pairs[i].value);
634 avio_wl64(pb, wctx->st_pairs[i].serial);
635 }
636 avio_wl64(pb, wctx->last_pts);
637 avio_wl64(pb, wctx->last_serial);
638 }
639
write_metadata_header(AVIOContext * pb,int type,const char * key,int value_size)640 static void write_metadata_header(AVIOContext *pb, int type, const char *key, int value_size)
641 {
642 ff_put_guid(pb, &ff_metadata_guid);
643 avio_wl32(pb, type);
644 avio_wl32(pb, value_size);
645 avio_put_str16le(pb, key);
646 }
647
metadata_header_size(const char * key)648 static int metadata_header_size(const char *key)
649 {
650 return 16 + 4 + 4 + strlen(key)*2 + 2;
651 }
652
write_tag_int32(AVIOContext * pb,const char * key,int value)653 static void write_tag_int32(AVIOContext *pb, const char *key, int value)
654 {
655 write_metadata_header(pb, 0, key, 4);
656 avio_wl32(pb, value);
657 }
658
write_tag(AVIOContext * pb,const char * key,const char * value)659 static void write_tag(AVIOContext *pb, const char *key, const char *value)
660 {
661 write_metadata_header(pb, 1, key, strlen(value)*2 + 2);
662 avio_put_str16le(pb, value);
663 }
664
attachment_value_size(const AVPacket * pkt,const AVDictionaryEntry * e)665 static int attachment_value_size(const AVPacket *pkt, const AVDictionaryEntry *e)
666 {
667 return strlen("image/jpeg")*2 + 2 + 1 + (e ? strlen(e->value)*2 : 0) + 2 + 4 + pkt->size;
668 }
669
write_table_entries_attrib(AVFormatContext * s)670 static void write_table_entries_attrib(AVFormatContext *s)
671 {
672 WtvContext *wctx = s->priv_data;
673 AVIOContext *pb = s->pb;
674 AVDictionaryEntry *tag = 0;
675
676 //FIXME: translate special tags (e.g. WM/Bitrate) to binary representation
677 ff_metadata_conv(&s->metadata, ff_asf_metadata_conv, NULL);
678 while ((tag = av_dict_get(s->metadata, "", tag, AV_DICT_IGNORE_SUFFIX)))
679 write_tag(pb, tag->key, tag->value);
680
681 if (wctx->thumbnail.size) {
682 AVStream *st = s->streams[wctx->thumbnail.stream_index];
683 tag = av_dict_get(st->metadata, "title", NULL, 0);
684 write_metadata_header(pb, 2, "WM/Picture", attachment_value_size(&wctx->thumbnail, tag));
685
686 avio_put_str16le(pb, "image/jpeg");
687 avio_w8(pb, 0x10);
688 avio_put_str16le(pb, tag ? tag->value : "");
689
690 avio_wl32(pb, wctx->thumbnail.size);
691 avio_write(pb, wctx->thumbnail.data, wctx->thumbnail.size);
692
693 write_tag_int32(pb, "WM/MediaThumbType", 2);
694 }
695 }
696
write_table_redirector_legacy_attrib(AVFormatContext * s)697 static void write_table_redirector_legacy_attrib(AVFormatContext *s)
698 {
699 WtvContext *wctx = s->priv_data;
700 AVIOContext *pb = s->pb;
701 AVDictionaryEntry *tag = 0;
702 int64_t pos = 0;
703
704 //FIXME: translate special tags to binary representation
705 while ((tag = av_dict_get(s->metadata, "", tag, AV_DICT_IGNORE_SUFFIX))) {
706 avio_wl64(pb, pos);
707 pos += metadata_header_size(tag->key) + strlen(tag->value)*2 + 2;
708 }
709
710 if (wctx->thumbnail.size) {
711 AVStream *st = s->streams[wctx->thumbnail.stream_index];
712 avio_wl64(pb, pos);
713 pos += metadata_header_size("WM/Picture") + attachment_value_size(&wctx->thumbnail, av_dict_get(st->metadata, "title", NULL, 0));
714
715 avio_wl64(pb, pos);
716 pos += metadata_header_size("WM/MediaThumbType") + 4;
717 }
718 }
719
720 /**
721 * Pad the remainder of a file
722 * Write out fat table
723 * @return <0 on error
724 */
finish_file(AVFormatContext * s,enum WtvFileIndex index,int64_t start_pos)725 static int finish_file(AVFormatContext *s, enum WtvFileIndex index, int64_t start_pos)
726 {
727 WtvContext *wctx = s->priv_data;
728 AVIOContext *pb = s->pb;
729 WtvFile *w = &wctx->file[index];
730 int64_t end_pos = avio_tell(pb);
731 int sector_bits, nb_sectors, pad;
732
733 av_assert0(index < WTV_FILES);
734
735 w->length = (end_pos - start_pos);
736
737 // determine optimal fat table depth, sector_bits, nb_sectors
738 if (w->length <= WTV_SECTOR_SIZE) {
739 w->depth = 0;
740 sector_bits = WTV_SECTOR_BITS;
741 } else if (w->length <= (WTV_SECTOR_SIZE / 4) * WTV_SECTOR_SIZE) {
742 w->depth = 1;
743 sector_bits = WTV_SECTOR_BITS;
744 } else if (w->length <= (WTV_SECTOR_SIZE / 4) * WTV_BIGSECTOR_SIZE) {
745 w->depth = 1;
746 sector_bits = WTV_BIGSECTOR_BITS;
747 } else if (w->length <= (int64_t)(WTV_SECTOR_SIZE / 4) * (WTV_SECTOR_SIZE / 4) * WTV_SECTOR_SIZE) {
748 w->depth = 2;
749 sector_bits = WTV_SECTOR_BITS;
750 } else if (w->length <= (int64_t)(WTV_SECTOR_SIZE / 4) * (WTV_SECTOR_SIZE / 4) * WTV_BIGSECTOR_SIZE) {
751 w->depth = 2;
752 sector_bits = WTV_BIGSECTOR_BITS;
753 } else {
754 av_log(s, AV_LOG_ERROR, "unsupported file allocation table depth (%"PRIi64" bytes)\n", w->length);
755 return -1;
756 }
757
758 // determine the nb_sectors
759 nb_sectors = (int)(w->length >> sector_bits);
760
761 // pad sector of timeline
762 pad = (1 << sector_bits) - (w->length % (1 << sector_bits));
763 if (pad) {
764 nb_sectors++;
765 write_pad(pb, pad);
766 }
767
768 //write fat table
769 if (w->depth > 0) {
770 w->first_sector = write_fat_sector(s, start_pos, nb_sectors, sector_bits, w->depth) >> WTV_SECTOR_BITS;
771 } else {
772 w->first_sector = start_pos >> WTV_SECTOR_BITS;
773 }
774
775 w->length |= ULLN(1)<<60;
776 if (sector_bits == WTV_SECTOR_BITS)
777 w->length |= ULLN(1)<<63;
778
779 return 0;
780 }
781
write_trailer(AVFormatContext * s)782 static int write_trailer(AVFormatContext *s)
783 {
784 WtvContext *wctx = s->priv_data;
785 AVIOContext *pb = s->pb;
786 int root_size;
787 int64_t sector_pos;
788 int64_t start_pos, file_end_pos;
789
790 if (finish_file(s, WTV_TIMELINE, wctx->timeline_start_pos) < 0)
791 return -1;
792
793 start_pos = avio_tell(pb);
794 write_table_entries_events(s);
795 if (finish_file(s, WTV_TIMELINE_TABLE_0_ENTRIES_EVENTS, start_pos) < 0)
796 return -1;
797
798 start_pos = avio_tell(pb);
799 write_table_entries_attrib(s);
800 if (finish_file(s, WTV_TABLE_0_ENTRIES_LEGACY_ATTRIB, start_pos) < 0)
801 return -1;
802
803 start_pos = avio_tell(pb);
804 write_table_redirector_legacy_attrib(s);
805 if (finish_file(s, WTV_TABLE_0_REDIRECTOR_LEGACY_ATTRIB, start_pos) < 0)
806 return -1;
807
808 start_pos = avio_tell(pb);
809 write_table_entries_time(s);
810 if (finish_file(s, WTV_TABLE_0_ENTRIES_TIME, start_pos) < 0)
811 return -1;
812
813 // write root table
814 sector_pos = avio_tell(pb);
815 root_size = write_root_table(s, sector_pos);
816
817 file_end_pos = avio_tell(pb);
818 // update root value
819 avio_seek(pb, 0x30, SEEK_SET);
820 avio_wl32(pb, root_size);
821 avio_seek(pb, 4, SEEK_CUR);
822 avio_wl32(pb, sector_pos >> WTV_SECTOR_BITS);
823 avio_seek(pb, 0x5c, SEEK_SET);
824 avio_wl32(pb, file_end_pos >> WTV_SECTOR_BITS);
825
826 avio_flush(pb);
827
828 av_free(wctx->sp_pairs);
829 av_free(wctx->st_pairs);
830 av_free_packet(&wctx->thumbnail);
831 return 0;
832 }
833
834 AVOutputFormat ff_wtv_muxer = {
835 .name = "wtv",
836 .long_name = NULL_IF_CONFIG_SMALL("Windows Television (WTV)"),
837 .extensions = "wtv",
838 .priv_data_size = sizeof(WtvContext),
839 .audio_codec = AV_CODEC_ID_AC3,
840 .video_codec = AV_CODEC_ID_MPEG2VIDEO,
841 .write_header = write_header,
842 .write_packet = write_packet,
843 .write_trailer = write_trailer,
844 .codec_tag = (const AVCodecTag* const []){ ff_codec_bmp_tags,
845 ff_codec_wav_tags, 0 },
846 };
847