2 * ASF compatible demuxer
3 * Copyright (c) 2000, 2001 Fabrice Bellard.
5 * This file is part of FFmpeg.
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.
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.
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
22 #include "libavutil/common.h"
23 #include "libavcodec/mpegaudio.h"
29 extern void ff_mms_set_stream_selection(URLContext
*h
, AVFormatContext
*format
);
34 #define FRAME_HEADER_SIZE 17
35 // Fix Me! FRAME_HEADER_SIZE may be different.
37 static const GUID index_guid
= {
38 0x90, 0x08, 0x00, 0x33, 0xb1, 0xe5, 0xcf, 0x11, 0x89, 0xf4, 0x00, 0xa0, 0xc9, 0x03, 0x49, 0xcb
41 static const GUID stream_bitrate_guid
= { /* (http://get.to/sdp) */
42 0xce, 0x75, 0xf8, 0x7b, 0x8d, 0x46, 0xd1, 0x11, 0x8d, 0x82, 0x00, 0x60, 0x97, 0xc9, 0xa2, 0xb2
44 /**********************************/
50 #define PRINT_IF_GUID(g,cmp) \
51 if (!memcmp(g, &cmp, sizeof(GUID))) \
52 dprintf(NULL, "(GUID: %s) ", #cmp)
54 static void print_guid(const GUID
*g
)
57 PRINT_IF_GUID(g
, asf_header
);
58 else PRINT_IF_GUID(g
, file_header
);
59 else PRINT_IF_GUID(g
, stream_header
);
60 else PRINT_IF_GUID(g
, audio_stream
);
61 else PRINT_IF_GUID(g
, audio_conceal_none
);
62 else PRINT_IF_GUID(g
, video_stream
);
63 else PRINT_IF_GUID(g
, video_conceal_none
);
64 else PRINT_IF_GUID(g
, command_stream
);
65 else PRINT_IF_GUID(g
, comment_header
);
66 else PRINT_IF_GUID(g
, codec_comment_header
);
67 else PRINT_IF_GUID(g
, codec_comment1_header
);
68 else PRINT_IF_GUID(g
, data_header
);
69 else PRINT_IF_GUID(g
, index_guid
);
70 else PRINT_IF_GUID(g
, head1_guid
);
71 else PRINT_IF_GUID(g
, head2_guid
);
72 else PRINT_IF_GUID(g
, my_guid
);
73 else PRINT_IF_GUID(g
, ext_stream_header
);
74 else PRINT_IF_GUID(g
, extended_content_header
);
75 else PRINT_IF_GUID(g
, ext_stream_embed_stream_header
);
76 else PRINT_IF_GUID(g
, ext_stream_audio_stream
);
77 else PRINT_IF_GUID(g
, metadata_header
);
78 else PRINT_IF_GUID(g
, stream_bitrate_guid
);
80 dprintf(NULL
, "(GUID: unknown) ");
82 dprintf(NULL
, " 0x%02x,", (*g
)[i
]);
90 static void get_guid(ByteIOContext
*s
, GUID
*g
)
92 assert(sizeof(*g
) == 16);
93 get_buffer(s
, *g
, sizeof(*g
));
97 static void get_str16(ByteIOContext
*pb
, char *buf
, int buf_size
)
106 if ((q
- buf
) < buf_size
- 1)
114 static void get_str16_nolen(ByteIOContext
*pb
, int len
, char *buf
, int buf_size
)
120 PUT_UTF8(get_le16(pb
), tmp
, if (q
- buf
< buf_size
- 1) *q
++ = tmp
;)
125 static int asf_probe(AVProbeData
*pd
)
127 /* check file header */
128 if (!memcmp(pd
->buf
, &asf_header
, sizeof(GUID
)))
129 return AVPROBE_SCORE_MAX
;
134 static int get_value(ByteIOContext
*pb
, int type
){
136 case 2: return get_le32(pb
);
137 case 3: return get_le32(pb
);
138 case 4: return get_le64(pb
);
139 case 5: return get_le16(pb
);
140 default:return INT_MIN
;
144 static int asf_read_header(AVFormatContext
*s
, AVFormatParameters
*ap
)
146 ASFContext
*asf
= s
->priv_data
;
148 ByteIOContext
*pb
= s
->pb
;
154 uint32_t bitrate
[128];
156 memset(dar
, 0, sizeof(dar
));
157 memset(bitrate
, 0, sizeof(bitrate
));
160 if (memcmp(&g
, &asf_header
, sizeof(GUID
)))
166 memset(&asf
->asfid2avid
, -1, sizeof(asf
->asfid2avid
));
169 gsize
= get_le64(pb
);
170 dprintf(s
, "%08"PRIx64
": ", url_ftell(pb
) - 24);
172 dprintf(s
, " size=0x%"PRIx64
"\n", gsize
);
173 if (!memcmp(&g
, &data_header
, sizeof(GUID
))) {
174 asf
->data_object_offset
= url_ftell(pb
);
175 // if not streaming, gsize is not unlimited (how?), and there is enough space in the file..
176 if (!(asf
->hdr
.flags
& 0x01) && gsize
>= 100) {
177 asf
->data_object_size
= gsize
- 24;
179 asf
->data_object_size
= (uint64_t)-1;
185 if (!memcmp(&g
, &file_header
, sizeof(GUID
))) {
186 get_guid(pb
, &asf
->hdr
.guid
);
187 asf
->hdr
.file_size
= get_le64(pb
);
188 asf
->hdr
.create_time
= get_le64(pb
);
189 asf
->nb_packets
= get_le64(pb
);
190 asf
->hdr
.play_time
= get_le64(pb
);
191 asf
->hdr
.send_time
= get_le64(pb
);
192 asf
->hdr
.preroll
= get_le32(pb
);
193 asf
->hdr
.ignore
= get_le32(pb
);
194 asf
->hdr
.flags
= get_le32(pb
);
195 asf
->hdr
.min_pktsize
= get_le32(pb
);
196 asf
->hdr
.max_pktsize
= get_le32(pb
);
197 asf
->hdr
.max_bitrate
= get_le32(pb
);
198 asf
->packet_size
= asf
->hdr
.max_pktsize
;
199 } else if (!memcmp(&g
, &stream_header
, sizeof(GUID
))) {
201 int type_specific_size
, sizeX
;
204 int64_t pos1
, pos2
, start_time
;
205 int test_for_ext_stream_audio
, is_dvr_ms_audio
=0;
207 pos1
= url_ftell(pb
);
209 st
= av_new_stream(s
, 0);
211 return AVERROR(ENOMEM
);
212 av_set_pts_info(st
, 32, 1, 1000); /* 32 bit pts in ms */
213 asf_st
= av_mallocz(sizeof(ASFStream
));
215 return AVERROR(ENOMEM
);
216 st
->priv_data
= asf_st
;
217 start_time
= asf
->hdr
.preroll
;
219 if(!(asf
->hdr
.flags
& 0x01)) { // if we aren't streaming...
220 st
->duration
= asf
->hdr
.send_time
/
221 (10000000 / 1000) - start_time
;
225 test_for_ext_stream_audio
= 0;
226 if (!memcmp(&g
, &audio_stream
, sizeof(GUID
))) {
227 type
= CODEC_TYPE_AUDIO
;
228 } else if (!memcmp(&g
, &video_stream
, sizeof(GUID
))) {
229 type
= CODEC_TYPE_VIDEO
;
230 } else if (!memcmp(&g
, &command_stream
, sizeof(GUID
))) {
231 type
= CODEC_TYPE_DATA
;
232 } else if (!memcmp(&g
, &ext_stream_embed_stream_header
, sizeof(GUID
))) {
233 test_for_ext_stream_audio
= 1;
234 type
= CODEC_TYPE_UNKNOWN
;
239 total_size
= get_le64(pb
);
240 type_specific_size
= get_le32(pb
);
242 st
->id
= get_le16(pb
) & 0x7f; /* stream id */
243 // mapping of asf ID to AV stream ID;
244 asf
->asfid2avid
[st
->id
] = s
->nb_streams
- 1;
248 if (test_for_ext_stream_audio
) {
250 if (!memcmp(&g
, &ext_stream_audio_stream
, sizeof(GUID
))) {
251 type
= CODEC_TYPE_AUDIO
;
262 st
->codec
->codec_type
= type
;
263 if (type
== CODEC_TYPE_AUDIO
) {
264 get_wav_header(pb
, st
->codec
, type_specific_size
);
265 if (is_dvr_ms_audio
) {
266 // codec_id and codec_tag are unreliable in dvr_ms
267 // files. Set them later by probing stream.
268 st
->codec
->codec_id
= CODEC_ID_PROBE
;
269 st
->codec
->codec_tag
= 0;
271 st
->need_parsing
= AVSTREAM_PARSE_FULL
;
272 /* We have to init the frame size at some point .... */
273 pos2
= url_ftell(pb
);
274 if (gsize
>= (pos2
+ 8 - pos1
+ 24)) {
275 asf_st
->ds_span
= get_byte(pb
);
276 asf_st
->ds_packet_size
= get_le16(pb
);
277 asf_st
->ds_chunk_size
= get_le16(pb
);
278 get_le16(pb
); //ds_data_size
279 get_byte(pb
); //ds_silence_data
281 //printf("Descrambling: ps:%d cs:%d ds:%d s:%d sd:%d\n",
282 // asf_st->ds_packet_size, asf_st->ds_chunk_size,
283 // asf_st->ds_data_size, asf_st->ds_span, asf_st->ds_silence_data);
284 if (asf_st
->ds_span
> 1) {
285 if (!asf_st
->ds_chunk_size
286 || (asf_st
->ds_packet_size
/asf_st
->ds_chunk_size
<= 1)
287 || asf_st
->ds_packet_size
% asf_st
->ds_chunk_size
)
288 asf_st
->ds_span
= 0; // disable descrambling
290 switch (st
->codec
->codec_id
) {
292 st
->codec
->frame_size
= MPA_FRAME_SIZE
;
294 case CODEC_ID_PCM_S16LE
:
295 case CODEC_ID_PCM_S16BE
:
296 case CODEC_ID_PCM_U16LE
:
297 case CODEC_ID_PCM_U16BE
:
298 case CODEC_ID_PCM_S8
:
299 case CODEC_ID_PCM_U8
:
300 case CODEC_ID_PCM_ALAW
:
301 case CODEC_ID_PCM_MULAW
:
302 st
->codec
->frame_size
= 1;
305 /* This is probably wrong, but it prevents a crash later */
306 st
->codec
->frame_size
= 1;
309 } else if (type
== CODEC_TYPE_VIDEO
) {
313 size
= get_le16(pb
); /* size */
314 sizeX
= get_le32(pb
); /* size */
315 st
->codec
->width
= get_le32(pb
);
316 st
->codec
->height
= get_le32(pb
);
317 /* not available for asf */
318 get_le16(pb
); /* panes */
319 st
->codec
->bits_per_coded_sample
= get_le16(pb
); /* depth */
322 // av_log(NULL, AV_LOG_DEBUG, "size:%d tsize:%d sizeX:%d\n", size, total_size, sizeX);
325 st
->codec
->extradata_size
= size
- 40;
326 st
->codec
->extradata
= av_mallocz(st
->codec
->extradata_size
+ FF_INPUT_BUFFER_PADDING_SIZE
);
327 get_buffer(pb
, st
->codec
->extradata
, st
->codec
->extradata_size
);
330 /* Extract palette from extradata if bpp <= 8 */
331 /* This code assumes that extradata contains only palette */
332 /* This is true for all paletted codecs implemented in ffmpeg */
333 if (st
->codec
->extradata_size
&& (st
->codec
->bits_per_coded_sample
<= 8)) {
334 st
->codec
->palctrl
= av_mallocz(sizeof(AVPaletteControl
));
335 #ifdef WORDS_BIGENDIAN
336 for (i
= 0; i
< FFMIN(st
->codec
->extradata_size
, AVPALETTE_SIZE
)/4; i
++)
337 st
->codec
->palctrl
->palette
[i
] = bswap_32(((uint32_t*)st
->codec
->extradata
)[i
]);
339 memcpy(st
->codec
->palctrl
->palette
, st
->codec
->extradata
,
340 FFMIN(st
->codec
->extradata_size
, AVPALETTE_SIZE
));
342 st
->codec
->palctrl
->palette_changed
= 1;
345 st
->codec
->codec_tag
= tag1
;
346 st
->codec
->codec_id
= codec_get_id(codec_bmp_tags
, tag1
);
347 if(tag1
== MKTAG('D', 'V', 'R', ' '))
348 st
->need_parsing
= AVSTREAM_PARSE_FULL
;
350 pos2
= url_ftell(pb
);
351 url_fskip(pb
, gsize
- (pos2
- pos1
+ 24));
352 } else if (!memcmp(&g
, &comment_header
, sizeof(GUID
))) {
353 int len1
, len2
, len3
, len4
, len5
;
360 get_str16_nolen(pb
, len1
, s
->title
, sizeof(s
->title
));
361 get_str16_nolen(pb
, len2
, s
->author
, sizeof(s
->author
));
362 get_str16_nolen(pb
, len3
, s
->copyright
, sizeof(s
->copyright
));
363 get_str16_nolen(pb
, len4
, s
->comment
, sizeof(s
->comment
));
365 } else if (!memcmp(&g
, &stream_bitrate_guid
, sizeof(GUID
))) {
366 int stream_count
= get_le16(pb
);
369 // av_log(NULL, AV_LOG_ERROR, "stream bitrate properties\n");
370 // av_log(NULL, AV_LOG_ERROR, "streams %d\n", streams);
371 for(j
= 0; j
< stream_count
; j
++) {
372 int flags
, bitrate
, stream_id
;
375 bitrate
= get_le32(pb
);
376 stream_id
= (flags
& 0x7f);
377 // av_log(NULL, AV_LOG_ERROR, "flags: 0x%x stream id %d, bitrate %d\n", flags, stream_id, bitrate);
378 asf
->stream_bitrates
[stream_id
]= bitrate
;
380 } else if (!memcmp(&g
, &extended_content_header
, sizeof(GUID
))) {
383 desc_count
= get_le16(pb
);
384 for(i
=0;i
<desc_count
;i
++)
386 int name_len
,value_type
,value_len
;
387 uint64_t value_num
= 0;
390 name_len
= get_le16(pb
);
391 get_str16_nolen(pb
, name_len
, name
, sizeof(name
));
392 value_type
= get_le16(pb
);
393 value_len
= get_le16(pb
);
394 if (value_type
<= 1) // unicode or byte
396 if (!strcmp(name
,"WM/AlbumTitle")) get_str16_nolen(pb
, value_len
, s
->album
, sizeof(s
->album
));
397 else if(!strcmp(name
,"WM/Genre" )) get_str16_nolen(pb
, value_len
, s
->genre
, sizeof(s
->genre
));
398 else if(!strcmp(name
,"WM/Year" )) {
400 get_str16_nolen(pb
, value_len
, year
, sizeof(year
));
401 s
->year
= atoi(year
);
403 else if(!strcmp(name
,"WM/Track") && s
->track
== 0) {
405 get_str16_nolen(pb
, value_len
, track
, sizeof(track
));
406 s
->track
= strtol(track
, NULL
, 10) + 1;
408 else if(!strcmp(name
,"WM/TrackNumber")) {
410 get_str16_nolen(pb
, value_len
, track
, sizeof(track
));
411 s
->track
= strtol(track
, NULL
, 10);
413 else url_fskip(pb
, value_len
);
415 else if (value_type
<= 5) // boolean or DWORD or QWORD or WORD
417 value_num
= get_value(pb
, value_type
);
418 if (!strcmp(name
,"WM/Track" ) && s
->track
== 0) s
->track
= value_num
+ 1;
419 if (!strcmp(name
,"WM/TrackNumber")) s
->track
= value_num
;
421 url_fskip(pb
, value_len
);
423 } else if (!memcmp(&g
, &metadata_header
, sizeof(GUID
))) {
424 int n
, stream_num
, name_len
, value_len
, value_type
, value_num
;
430 get_le16(pb
); //lang_list_index
431 stream_num
= get_le16(pb
);
432 name_len
= get_le16(pb
);
433 value_type
= get_le16(pb
);
434 value_len
= get_le32(pb
);
436 get_str16_nolen(pb
, name_len
, name
, sizeof(name
));
437 //av_log(NULL, AV_LOG_ERROR, "%d %d %d %d %d <%s>\n", i, stream_num, name_len, value_type, value_len, name);
438 value_num
= get_le16(pb
);//we should use get_value() here but it does not work 2 is le16 here but le32 elsewhere
439 url_fskip(pb
, value_len
- 2);
442 if (!strcmp(name
, "AspectRatioX")) dar
[stream_num
].num
= value_num
;
443 else if(!strcmp(name
, "AspectRatioY")) dar
[stream_num
].den
= value_num
;
446 } else if (!memcmp(&g
, &ext_stream_header
, sizeof(GUID
))) {
447 int ext_len
, payload_ext_ct
, stream_ct
;
448 uint32_t ext_d
, leak_rate
, stream_num
;
450 pos_ex_st
= url_ftell(pb
);
452 get_le64(pb
); // starttime
453 get_le64(pb
); // endtime
454 leak_rate
= get_le32(pb
); // leak-datarate
455 get_le32(pb
); // bucket-datasize
456 get_le32(pb
); // init-bucket-fullness
457 get_le32(pb
); // alt-leak-datarate
458 get_le32(pb
); // alt-bucket-datasize
459 get_le32(pb
); // alt-init-bucket-fullness
460 get_le32(pb
); // max-object-size
461 get_le32(pb
); // flags (reliable,seekable,no_cleanpoints?,resend-live-cleanpoints, rest of bits reserved)
462 stream_num
= get_le16(pb
); // stream-num
463 get_le16(pb
); // stream-language-id-index
464 get_le64(pb
); // avg frametime in 100ns units
465 stream_ct
= get_le16(pb
); //stream-name-count
466 payload_ext_ct
= get_le16(pb
); //payload-extension-system-count
468 if (stream_num
< 128)
469 bitrate
[stream_num
] = leak_rate
;
471 for (i
=0; i
<stream_ct
; i
++){
473 ext_len
= get_le16(pb
);
474 url_fseek(pb
, ext_len
, SEEK_CUR
);
477 for (i
=0; i
<payload_ext_ct
; i
++){
480 ext_len
=get_le32(pb
);
481 url_fseek(pb
, ext_len
, SEEK_CUR
);
484 // there could be a optional stream properties object to follow
485 // if so the next iteration will pick it up
486 } else if (!memcmp(&g
, &head1_guid
, sizeof(GUID
))) {
492 } else if (!memcmp(&g
, &codec_comment_header
, sizeof(GUID
))) {
502 num
= get_le16(pb
); /* stream number */
503 get_str16(pb
, str
, sizeof(str
));
504 get_str16(pb
, str
, sizeof(str
));
509 if ((q
- tag
) < sizeof(tag
) - 1)
516 } else if (url_feof(pb
)) {
519 url_fseek(pb
, gsize
- 24, SEEK_CUR
);
528 asf
->data_offset
= url_ftell(pb
);
529 asf
->packet_size_left
= 0;
532 for(i
=0; i
<128; i
++){
533 int stream_num
= asf
->asfid2avid
[i
];
535 AVStream
*st
= s
->streams
[stream_num
];
536 if (!st
->codec
->bit_rate
)
537 st
->codec
->bit_rate
= bitrate
[i
];
538 if (dar
[i
].num
> 0 && dar
[i
].den
> 0)
539 av_reduce(&st
->sample_aspect_ratio
.num
,
540 &st
->sample_aspect_ratio
.den
,
541 dar
[i
].num
, dar
[i
].den
, INT_MAX
);
542 //av_log(NULL, AV_LOG_ERROR, "dar %d:%d sar=%d:%d\n", dar[i].num, dar[i].den, st->sample_aspect_ratio.num, st->sample_aspect_ratio.den);
549 #define DO_2BITS(bits, var, defval) \
552 case 3: var = get_le32(pb); rsize += 4; break; \
553 case 2: var = get_le16(pb); rsize += 2; break; \
554 case 1: var = get_byte(pb); rsize++; break; \
555 default: var = defval; break; \
560 * @return <0 in case of an error
562 static int asf_get_packet(AVFormatContext
*s
)
564 ASFContext
*asf
= s
->priv_data
;
565 ByteIOContext
*pb
= s
->pb
;
566 uint32_t packet_length
, padsize
;
570 off
= (url_ftell(s
->pb
) - s
->data_offset
) % asf
->packet_size
+ 3;
576 if(c
== 0x82 && !d
&& !e
)
582 av_log(s
, AV_LOG_ERROR
, "ff asf bad header %x at:%"PRId64
"\n", c
, url_ftell(pb
));
584 if ((c
& 0x8f) == 0x82) {
587 av_log(s
, AV_LOG_ERROR
, "ff asf bad non zero\n");
594 url_fseek(pb
, -1, SEEK_CUR
); //FIXME
597 asf
->packet_flags
= c
;
598 asf
->packet_property
= d
;
600 DO_2BITS(asf
->packet_flags
>> 5, packet_length
, asf
->packet_size
);
601 DO_2BITS(asf
->packet_flags
>> 1, padsize
, 0); // sequence ignored
602 DO_2BITS(asf
->packet_flags
>> 3, padsize
, 0); // padding length
604 //the following checks prevent overflows and infinite loops
605 if(packet_length
>= (1U<<29)){
606 av_log(s
, AV_LOG_ERROR
, "invalid packet_length %d at:%"PRId64
"\n", packet_length
, url_ftell(pb
));
609 if(padsize
>= packet_length
){
610 av_log(s
, AV_LOG_ERROR
, "invalid padsize %d at:%"PRId64
"\n", padsize
, url_ftell(pb
));
614 asf
->packet_timestamp
= get_le32(pb
);
615 get_le16(pb
); /* duration */
616 // rsize has at least 11 bytes which have to be present
618 if (asf
->packet_flags
& 0x01) {
619 asf
->packet_segsizetype
= get_byte(pb
); rsize
++;
620 asf
->packet_segments
= asf
->packet_segsizetype
& 0x3f;
622 asf
->packet_segments
= 1;
623 asf
->packet_segsizetype
= 0x80;
625 asf
->packet_size_left
= packet_length
- padsize
- rsize
;
626 if (packet_length
< asf
->hdr
.min_pktsize
)
627 padsize
+= asf
->hdr
.min_pktsize
- packet_length
;
628 asf
->packet_padsize
= padsize
;
629 dprintf(s
, "packet: size=%d padsize=%d left=%d\n", asf
->packet_size
, asf
->packet_padsize
, asf
->packet_size_left
);
635 * @return <0 if error
637 static int asf_read_frame_header(AVFormatContext
*s
){
638 ASFContext
*asf
= s
->priv_data
;
639 ByteIOContext
*pb
= s
->pb
;
641 int num
= get_byte(pb
);
644 asf
->packet_segments
--;
645 asf
->packet_key_frame
= num
>> 7;
646 asf
->stream_index
= asf
->asfid2avid
[num
& 0x7f];
647 // sequence should be ignored!
648 DO_2BITS(asf
->packet_property
>> 4, asf
->packet_seq
, 0);
649 DO_2BITS(asf
->packet_property
>> 2, asf
->packet_frag_offset
, 0);
650 DO_2BITS(asf
->packet_property
, asf
->packet_replic_size
, 0);
651 //printf("key:%d stream:%d seq:%d offset:%d replic_size:%d\n", asf->packet_key_frame, asf->stream_index, asf->packet_seq, //asf->packet_frag_offset, asf->packet_replic_size);
652 if (asf
->packet_replic_size
>= 8) {
653 asf
->packet_obj_size
= get_le32(pb
);
654 if(asf
->packet_obj_size
>= (1<<24) || asf
->packet_obj_size
<= 0){
655 av_log(s
, AV_LOG_ERROR
, "packet_obj_size invalid\n");
658 asf
->packet_frag_timestamp
= get_le32(pb
); // timestamp
659 if(asf
->packet_replic_size
>= 8+38+4){
660 // for(i=0; i<asf->packet_replic_size-8; i++)
661 // av_log(s, AV_LOG_DEBUG, "%02X ",get_byte(pb));
662 // av_log(s, AV_LOG_DEBUG, "\n");
668 url_fskip(pb
, asf
->packet_replic_size
- 8 - 38 - 4);
669 if(ts0
!= -1) asf
->packet_frag_timestamp
= ts0
/10000;
670 else asf
->packet_frag_timestamp
= AV_NOPTS_VALUE
;
672 url_fskip(pb
, asf
->packet_replic_size
- 8);
673 rsize
+= asf
->packet_replic_size
; // FIXME - check validity
674 } else if (asf
->packet_replic_size
==1){
675 // multipacket - frag_offset is beginning timestamp
676 asf
->packet_time_start
= asf
->packet_frag_offset
;
677 asf
->packet_frag_offset
= 0;
678 asf
->packet_frag_timestamp
= asf
->packet_timestamp
;
680 asf
->packet_time_delta
= get_byte(pb
);
682 }else if(asf
->packet_replic_size
!=0){
683 av_log(s
, AV_LOG_ERROR
, "unexpected packet_replic_size of %d\n", asf
->packet_replic_size
);
686 if (asf
->packet_flags
& 0x01) {
687 DO_2BITS(asf
->packet_segsizetype
>> 6, asf
->packet_frag_size
, 0); // 0 is illegal
688 if(asf
->packet_frag_size
> asf
->packet_size_left
- rsize
){
689 av_log(s
, AV_LOG_ERROR
, "packet_frag_size is invalid\n");
692 //printf("Fragsize %d\n", asf->packet_frag_size);
694 asf
->packet_frag_size
= asf
->packet_size_left
- rsize
;
695 //printf("Using rest %d %d %d\n", asf->packet_frag_size, asf->packet_size_left, rsize);
697 if (asf
->packet_replic_size
== 1) {
698 asf
->packet_multi_size
= asf
->packet_frag_size
;
699 if (asf
->packet_multi_size
> asf
->packet_size_left
)
702 asf
->packet_size_left
-= rsize
;
703 //printf("___objsize____ %d %d rs:%d\n", asf->packet_obj_size, asf->packet_frag_offset, rsize);
708 static int asf_read_packet(AVFormatContext
*s
, AVPacket
*pkt
)
710 ASFContext
*asf
= s
->priv_data
;
711 ASFStream
*asf_st
= 0;
712 ByteIOContext
*pb
= s
->pb
;
717 if (asf
->packet_size_left
< FRAME_HEADER_SIZE
718 || asf
->packet_segments
< 1) {
719 //asf->packet_size_left <= asf->packet_padsize) {
720 int ret
= asf
->packet_size_left
+ asf
->packet_padsize
;
721 //printf("PacketLeftSize:%d Pad:%d Pos:%"PRId64"\n", asf->packet_size_left, asf->packet_padsize, url_ftell(pb));
726 asf
->packet_pos
= url_ftell(s
->pb
);
727 if (asf
->data_object_size
!= (uint64_t)-1 &&
728 (asf
->packet_pos
- asf
->data_object_offset
>= asf
->data_object_size
))
729 return AVERROR(EIO
); /* Do not exceed the size of the data object */
730 ret
= asf_get_packet(s
);
731 //printf("READ ASF PACKET %d r:%d c:%d\n", ret, asf->packet_size_left, pc++);
733 assert(asf
->packet_size_left
< FRAME_HEADER_SIZE
|| asf
->packet_segments
< 1);
734 asf
->packet_time_start
= 0;
737 if (asf
->packet_time_start
== 0) {
738 if(asf_read_frame_header(s
) < 0){
739 asf
->packet_segments
= 0;
742 if (asf
->stream_index
< 0
743 || s
->streams
[asf
->stream_index
]->discard
>= AVDISCARD_ALL
744 || (!asf
->packet_key_frame
&& s
->streams
[asf
->stream_index
]->discard
>= AVDISCARD_NONKEY
)
746 asf
->packet_time_start
= 0;
747 /* unhandled packet (should not happen) */
748 url_fskip(pb
, asf
->packet_frag_size
);
749 asf
->packet_size_left
-= asf
->packet_frag_size
;
750 if(asf
->stream_index
< 0)
751 av_log(s
, AV_LOG_ERROR
, "ff asf skip %d (unknown stream)\n", asf
->packet_frag_size
);
754 asf
->asf_st
= s
->streams
[asf
->stream_index
]->priv_data
;
756 asf_st
= asf
->asf_st
;
758 if (asf
->packet_replic_size
== 1) {
759 // frag_offset is here used as the beginning timestamp
760 asf
->packet_frag_timestamp
= asf
->packet_time_start
;
761 asf
->packet_time_start
+= asf
->packet_time_delta
;
762 asf
->packet_obj_size
= asf
->packet_frag_size
= get_byte(pb
);
763 asf
->packet_size_left
--;
764 asf
->packet_multi_size
--;
765 if (asf
->packet_multi_size
< asf
->packet_obj_size
)
767 asf
->packet_time_start
= 0;
768 url_fskip(pb
, asf
->packet_multi_size
);
769 asf
->packet_size_left
-= asf
->packet_multi_size
;
772 asf
->packet_multi_size
-= asf
->packet_obj_size
;
773 //printf("COMPRESS size %d %d %d ms:%d\n", asf->packet_obj_size, asf->packet_frag_timestamp, asf->packet_size_left, asf->packet_multi_size);
775 if( /*asf->packet_frag_size == asf->packet_obj_size*/
776 asf_st
->frag_offset
+ asf
->packet_frag_size
<= asf_st
->pkt
.size
777 && asf_st
->frag_offset
+ asf
->packet_frag_size
> asf
->packet_obj_size
){
778 av_log(s
, AV_LOG_INFO
, "ignoring invalid packet_obj_size (%d %d %d %d)\n",
779 asf_st
->frag_offset
, asf
->packet_frag_size
,
780 asf
->packet_obj_size
, asf_st
->pkt
.size
);
781 asf
->packet_obj_size
= asf_st
->pkt
.size
;
784 if ( asf_st
->pkt
.size
!= asf
->packet_obj_size
785 || asf_st
->frag_offset
+ asf
->packet_frag_size
> asf_st
->pkt
.size
) { //FIXME is this condition sufficient?
786 if(asf_st
->pkt
.data
){
787 av_log(s
, AV_LOG_INFO
, "freeing incomplete packet size %d, new %d\n", asf_st
->pkt
.size
, asf
->packet_obj_size
);
788 asf_st
->frag_offset
= 0;
789 av_free_packet(&asf_st
->pkt
);
792 av_new_packet(&asf_st
->pkt
, asf
->packet_obj_size
);
793 asf_st
->seq
= asf
->packet_seq
;
794 asf_st
->pkt
.dts
= asf
->packet_frag_timestamp
;
795 asf_st
->pkt
.stream_index
= asf
->stream_index
;
797 asf_st
->packet_pos
= asf
->packet_pos
;
798 //printf("new packet: stream:%d key:%d packet_key:%d audio:%d size:%d\n",
799 //asf->stream_index, asf->packet_key_frame, asf_st->pkt.flags & PKT_FLAG_KEY,
800 //s->streams[asf->stream_index]->codec->codec_type == CODEC_TYPE_AUDIO, asf->packet_obj_size);
801 if (s
->streams
[asf
->stream_index
]->codec
->codec_type
== CODEC_TYPE_AUDIO
)
802 asf
->packet_key_frame
= 1;
803 if (asf
->packet_key_frame
)
804 asf_st
->pkt
.flags
|= PKT_FLAG_KEY
;
808 //printf("READ PACKET s:%d os:%d o:%d,%d l:%d DATA:%p\n",
809 // asf->packet_size, asf_st->pkt.size, asf->packet_frag_offset,
810 // asf_st->frag_offset, asf->packet_frag_size, asf_st->pkt.data);
811 asf
->packet_size_left
-= asf
->packet_frag_size
;
812 if (asf
->packet_size_left
< 0)
815 if( asf
->packet_frag_offset
>= asf_st
->pkt
.size
816 || asf
->packet_frag_size
> asf_st
->pkt
.size
- asf
->packet_frag_offset
){
817 av_log(s
, AV_LOG_ERROR
, "packet fragment position invalid %u,%u not in %u\n",
818 asf
->packet_frag_offset
, asf
->packet_frag_size
, asf_st
->pkt
.size
);
822 get_buffer(pb
, asf_st
->pkt
.data
+ asf
->packet_frag_offset
,
823 asf
->packet_frag_size
);
824 if (s
->key
&& s
->keylen
== 20)
825 ff_asfcrypt_dec(s
->key
, asf_st
->pkt
.data
+ asf
->packet_frag_offset
,
826 asf
->packet_frag_size
);
827 asf_st
->frag_offset
+= asf
->packet_frag_size
;
828 /* test if whole packet is read */
829 if (asf_st
->frag_offset
== asf_st
->pkt
.size
) {
830 //workaround for macroshit radio DVR-MS files
831 if( s
->streams
[asf
->stream_index
]->codec
->codec_id
== CODEC_ID_MPEG2VIDEO
832 && asf_st
->pkt
.size
> 100){
834 for(i
=0; i
<asf_st
->pkt
.size
&& !asf_st
->pkt
.data
[i
]; i
++);
835 if(i
== asf_st
->pkt
.size
){
836 av_log(s
, AV_LOG_DEBUG
, "discarding ms fart\n");
837 asf_st
->frag_offset
= 0;
838 av_free_packet(&asf_st
->pkt
);
844 if (asf_st
->ds_span
> 1) {
845 if(asf_st
->pkt
.size
!= asf_st
->ds_packet_size
* asf_st
->ds_span
){
846 av_log(s
, AV_LOG_ERROR
, "pkt.size != ds_packet_size * ds_span (%d %d %d)\n", asf_st
->pkt
.size
, asf_st
->ds_packet_size
, asf_st
->ds_span
);
848 /* packet descrambling */
849 uint8_t *newdata
= av_malloc(asf_st
->pkt
.size
);
852 while (offset
< asf_st
->pkt
.size
) {
853 int off
= offset
/ asf_st
->ds_chunk_size
;
854 int row
= off
/ asf_st
->ds_span
;
855 int col
= off
% asf_st
->ds_span
;
856 int idx
= row
+ col
* asf_st
->ds_packet_size
/ asf_st
->ds_chunk_size
;
857 //printf("off:%d row:%d col:%d idx:%d\n", off, row, col, idx);
859 assert(offset
+ asf_st
->ds_chunk_size
<= asf_st
->pkt
.size
);
860 assert(idx
+1 <= asf_st
->pkt
.size
/ asf_st
->ds_chunk_size
);
861 memcpy(newdata
+ offset
,
862 asf_st
->pkt
.data
+ idx
* asf_st
->ds_chunk_size
,
863 asf_st
->ds_chunk_size
);
864 offset
+= asf_st
->ds_chunk_size
;
866 av_free(asf_st
->pkt
.data
);
867 asf_st
->pkt
.data
= newdata
;
871 asf_st
->frag_offset
= 0;
873 //printf("packet %d %d\n", asf_st->pkt.size, asf->packet_frag_size);
874 asf_st
->pkt
.size
= 0;
875 asf_st
->pkt
.data
= 0;
876 break; // packet completed
882 // Added to support seeking after packets have been read
883 // If information is not reset, read_packet fails due to
884 // leftover information from previous reads
885 static void asf_reset_header(AVFormatContext
*s
)
887 ASFContext
*asf
= s
->priv_data
;
891 asf
->packet_nb_frames
= 0;
892 asf
->packet_size_left
= 0;
893 asf
->packet_segments
= 0;
894 asf
->packet_flags
= 0;
895 asf
->packet_property
= 0;
896 asf
->packet_timestamp
= 0;
897 asf
->packet_segsizetype
= 0;
898 asf
->packet_segments
= 0;
900 asf
->packet_replic_size
= 0;
901 asf
->packet_key_frame
= 0;
902 asf
->packet_padsize
= 0;
903 asf
->packet_frag_offset
= 0;
904 asf
->packet_frag_size
= 0;
905 asf
->packet_frag_timestamp
= 0;
906 asf
->packet_multi_size
= 0;
907 asf
->packet_obj_size
= 0;
908 asf
->packet_time_delta
= 0;
909 asf
->packet_time_start
= 0;
911 for(i
=0; i
<s
->nb_streams
; i
++){
912 asf_st
= s
->streams
[i
]->priv_data
;
913 av_free_packet(&asf_st
->pkt
);
914 asf_st
->frag_offset
=0;
920 static int asf_read_close(AVFormatContext
*s
)
925 for(i
=0;i
<s
->nb_streams
;i
++) {
926 AVStream
*st
= s
->streams
[i
];
927 av_free(st
->codec
->palctrl
);
932 static int64_t asf_read_pts(AVFormatContext
*s
, int stream_index
, int64_t *ppos
, int64_t pos_limit
)
934 ASFContext
*asf
= s
->priv_data
;
935 AVPacket pkt1
, *pkt
= &pkt1
;
940 int64_t start_pos
[s
->nb_streams
];
942 for(i
=0; i
<s
->nb_streams
; i
++){
946 pos
= (pos
+asf
->packet_size
-1-s
->data_offset
)/asf
->packet_size
*asf
->packet_size
+ s
->data_offset
;
948 url_fseek(s
->pb
, pos
, SEEK_SET
);
950 //printf("asf_read_pts\n");
953 if (av_read_frame(s
, pkt
) < 0){
954 av_log(s
, AV_LOG_INFO
, "asf_read_pts failed\n");
955 return AV_NOPTS_VALUE
;
961 if(pkt
->flags
&PKT_FLAG_KEY
){
962 i
= pkt
->stream_index
;
964 asf_st
= s
->streams
[i
]->priv_data
;
966 // assert((asf_st->packet_pos - s->data_offset) % asf->packet_size == 0);
967 pos
= asf_st
->packet_pos
;
969 av_add_index_entry(s
->streams
[i
], pos
, pts
, pkt
->size
, pos
- start_pos
[i
] + 1, AVINDEX_KEYFRAME
);
970 start_pos
[i
]= asf_st
->packet_pos
+ 1;
972 if(pkt
->stream_index
== stream_index
)
978 //printf("found keyframe at %"PRId64" stream %d stamp:%"PRId64"\n", *ppos, stream_index, pts);
983 static void asf_build_simple_index(AVFormatContext
*s
, int stream_index
)
986 ASFContext
*asf
= s
->priv_data
;
987 int64_t gsize
, itime
;
988 int64_t pos
, current_pos
, index_pts
;
992 current_pos
= url_ftell(s
->pb
);
994 url_fseek(s
->pb
, asf
->data_object_offset
+ asf
->data_object_size
, SEEK_SET
);
996 if (!memcmp(&g
, &index_guid
, sizeof(GUID
))) {
997 gsize
= get_le64(s
->pb
);
999 itime
=get_le64(s
->pb
);
1000 pct
=get_le32(s
->pb
);
1001 ict
=get_le32(s
->pb
);
1002 av_log(NULL
, AV_LOG_DEBUG
, "itime:0x%"PRIx64
", pct:%d, ict:%d\n",itime
,pct
,ict
);
1004 for (i
=0;i
<ict
;i
++){
1005 int pktnum
=get_le32(s
->pb
);
1006 int pktct
=get_le16(s
->pb
);
1007 av_log(NULL
, AV_LOG_DEBUG
, "pktnum:%d, pktct:%d\n", pktnum
, pktct
);
1009 pos
=s
->data_offset
+ asf
->packet_size
*(int64_t)pktnum
;
1010 index_pts
=av_rescale(itime
, i
, 10000);
1012 av_add_index_entry(s
->streams
[stream_index
], pos
, index_pts
, asf
->packet_size
, 0, AVINDEX_KEYFRAME
);
1016 url_fseek(s
->pb
, current_pos
, SEEK_SET
);
1019 static int asf_read_seek(AVFormatContext
*s
, int stream_index
, int64_t pts
, int flags
)
1021 ASFContext
*asf
= s
->priv_data
;
1022 AVStream
*st
= s
->streams
[stream_index
];
1026 if (asf
->packet_size
<= 0)
1029 /* Try using the protocol's read_seek if available */
1031 int ret
= av_url_read_fseek(s
->pb
, stream_index
, pts
, flags
);
1033 asf_reset_header(s
);
1034 if (ret
!= AVERROR(ENOSYS
))
1038 if (!asf
->index_read
)
1039 asf_build_simple_index(s
, stream_index
);
1041 if(!(asf
->index_read
&& st
->index_entries
)){
1042 if(av_seek_frame_binary(s
, stream_index
, pts
, flags
)<0)
1045 index
= av_index_search_timestamp(st
, pts
, flags
);
1049 /* find the position */
1050 pos
= st
->index_entries
[index
].pos
;
1051 pts
= st
->index_entries
[index
].timestamp
;
1053 // various attempts to find key frame have failed so far
1054 // asf_reset_header(s);
1055 // url_fseek(s->pb, pos, SEEK_SET);
1057 // for(i=0;i<16;i++){
1058 // pos = url_ftell(s->pb);
1059 // if (av_read_frame(s, &pkt) < 0){
1060 // av_log(s, AV_LOG_INFO, "seek failed\n");
1063 // asf_st = s->streams[stream_index]->priv_data;
1064 // pos += st->parser->frame_offset;
1066 // if (pkt.size > b) {
1071 // av_free_packet(&pkt);
1075 av_log(NULL
, AV_LOG_DEBUG
, "SEEKTO: %"PRId64
"\n", pos
);
1076 url_fseek(s
->pb
, pos
, SEEK_SET
);
1078 asf_reset_header(s
);
1082 AVInputFormat asf_demuxer
= {
1084 NULL_IF_CONFIG_SMALL("ASF format"),