[deb_ffmpeg.git] / ffmpeg / libavformat / rtpdec_asf.c

/*
 * Microsoft RTP/ASF support.
 * Copyright (c) 2008 Ronald S. Bultje
 *
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * FFmpeg is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with FFmpeg; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

/**
 * @file
 * @brief Microsoft RTP/ASF support
 * @author Ronald S. Bultje <rbultje@ronald.bitfreak.net>
 */

#include "libavutil/avassert.h"
#include "libavutil/base64.h"
#include "libavutil/avstring.h"
#include "libavutil/intreadwrite.h"
#include "rtp.h"
#include "rtpdec_formats.h"
#include "rtsp.h"
#include "asf.h"
#include "avio_internal.h"
#include "internal.h"

/**
 * From MSDN 2.2.1.4, we learn that ASF data packets over RTP should not
 * contain any padding. Unfortunately, the header min/max_pktsize are not
 * updated (thus making min_pktsize invalid). Here, we "fix" these faulty
 * min_pktsize values in the ASF file header.
 * @return 0 on success, <0 on failure (currently -1).
 */
static int rtp_asf_fix_header(uint8_t *buf, int len)
{
    uint8_t *p = buf, *end = buf + len;

    if (len < sizeof(ff_asf_guid) * 2 + 22 ||
        memcmp(p, ff_asf_header, sizeof(ff_asf_guid))) {
        return -1;
    }
    p += sizeof(ff_asf_guid) + 14;
    do {
        uint64_t chunksize = AV_RL64(p + sizeof(ff_asf_guid));
        if (memcmp(p, ff_asf_file_header, sizeof(ff_asf_guid))) {
            if (chunksize > end - p)
                return -1;
            p += chunksize;
            continue;
        }

        /* skip most of the file header, to min_pktsize */
        p += 6 * 8 + 3 * 4 + sizeof(ff_asf_guid) * 2;
        if (p + 8 <= end && AV_RL32(p) == AV_RL32(p + 4)) {
            /* and set that to zero */
            AV_WL32(p, 0);
            return 0;
        }
        break;
    } while (end - p >= sizeof(ff_asf_guid) + 8);

    return -1;
}

/**
 * The following code is basically a buffered AVIOContext,
 * with the added benefit of returning -EAGAIN (instead of 0)
 * on packet boundaries, such that the ASF demuxer can return
 * safely and resume business at the next packet.
 */
static int packetizer_read(void *opaque, uint8_t *buf, int buf_size)
{
    return AVERROR(EAGAIN);
}

static void init_packetizer(AVIOContext *pb, uint8_t *buf, int len)
{
    ffio_init_context(pb, buf, len, 0, NULL, packetizer_read, NULL, NULL);

    /* this "fills" the buffer with its current content */
    pb->pos     = len;
    pb->buf_end = buf + len;
}

int ff_wms_parse_sdp_a_line(AVFormatContext *s, const char *p)
{
    int ret = 0;
    if (av_strstart(p, "pgmpu:data:application/vnd.ms.wms-hdr.asfv1;base64,", &p)) {
        AVIOContext pb;
        RTSPState *rt = s->priv_data;
        AVDictionary *opts = NULL;
        int len = strlen(p) * 6 / 8;
        char *buf = av_mallocz(len);
        AVInputFormat *iformat;

        av_base64_decode(buf, p, len);

        if (rtp_asf_fix_header(buf, len) < 0)
            av_log(s, AV_LOG_ERROR,
                   "Failed to fix invalid RTSP-MS/ASF min_pktsize\n");
        init_packetizer(&pb, buf, len);
        if (rt->asf_ctx) {
            avformat_close_input(&rt->asf_ctx);
        }
        if (!(iformat = av_find_input_format("asf")))
            return AVERROR_DEMUXER_NOT_FOUND;
        if (!(rt->asf_ctx = avformat_alloc_context()))
            return AVERROR(ENOMEM);
        rt->asf_ctx->pb      = &pb;
        av_dict_set(&opts, "no_resync_search", "1", 0);

        if ((ret = ff_copy_whitelists(rt->asf_ctx, s)) < 0) {
            av_dict_free(&opts);
            return ret;
        }

        ret = avformat_open_input(&rt->asf_ctx, "", iformat, &opts);
        av_dict_free(&opts);
        if (ret < 0)
            return ret;
        av_dict_copy(&s->metadata, rt->asf_ctx->metadata, 0);
        rt->asf_pb_pos = avio_tell(&pb);
        av_free(buf);
        rt->asf_ctx->pb = NULL;
    }
    return ret;
}

static int asfrtp_parse_sdp_line(AVFormatContext *s, int stream_index,
                                 PayloadContext *asf, const char *line)
{
    if (stream_index < 0)
        return 0;
    if (av_strstart(line, "stream:", &line)) {
        RTSPState *rt = s->priv_data;

        s->streams[stream_index]->id = strtol(line, NULL, 10);

        if (rt->asf_ctx) {
            int i;

            for (i = 0; i < rt->asf_ctx->nb_streams; i++) {
                if (s->streams[stream_index]->id == rt->asf_ctx->streams[i]->id) {
                    *s->streams[stream_index]->codec =
                        *rt->asf_ctx->streams[i]->codec;
                    s->streams[stream_index]->need_parsing =
                        rt->asf_ctx->streams[i]->need_parsing;
                    rt->asf_ctx->streams[i]->codec->extradata_size = 0;
                    rt->asf_ctx->streams[i]->codec->extradata = NULL;
                    avpriv_set_pts_info(s->streams[stream_index], 32, 1, 1000);
                }
           }
        }
    }

    return 0;
}

struct PayloadContext {
    AVIOContext *pktbuf, pb;
    uint8_t *buf;
};

/**
 * @return 0 when a packet was written into /p pkt, and no more data is left;
 *         1 when a packet was written into /p pkt, and more packets might be left;
 *        <0 when not enough data was provided to return a full packet, or on error.
 */
static int asfrtp_parse_packet(AVFormatContext *s, PayloadContext *asf,
                               AVStream *st, AVPacket *pkt,
                               uint32_t *timestamp,
                               const uint8_t *buf, int len, uint16_t seq,
                               int flags)
{
    AVIOContext *pb = &asf->pb;
    int res, mflags, len_off;
    RTSPState *rt = s->priv_data;

    if (!rt->asf_ctx)
        return -1;

    if (len > 0) {
        int off, out_len = 0;

        if (len < 4)
            return -1;

        av_freep(&asf->buf);

        ffio_init_context(pb, (uint8_t *)buf, len, 0, NULL, NULL, NULL, NULL);

        while (avio_tell(pb) + 4 < len) {
            int start_off = avio_tell(pb);

            mflags = avio_r8(pb);
            if (mflags & 0x80)
                flags |= RTP_FLAG_KEY;
            len_off = avio_rb24(pb);
            if (mflags & 0x20)   /**< relative timestamp */
                avio_skip(pb, 4);
            if (mflags & 0x10)   /**< has duration */
                avio_skip(pb, 4);
            if (mflags & 0x8)    /**< has location ID */
                avio_skip(pb, 4);
            off = avio_tell(pb);

            if (!(mflags & 0x40)) {
                /**
                 * If 0x40 is not set, the len_off field specifies an offset
                 * of this packet's payload data in the complete (reassembled)
                 * ASF packet. This is used to spread one ASF packet over
                 * multiple RTP packets.
                 */
                if (asf->pktbuf && len_off != avio_tell(asf->pktbuf)) {
                    uint8_t *p;
                    avio_close_dyn_buf(asf->pktbuf, &p);
                    asf->pktbuf = NULL;
                    av_free(p);
                }
                if (!len_off && !asf->pktbuf &&
                    (res = avio_open_dyn_buf(&asf->pktbuf)) < 0)
                    return res;
                if (!asf->pktbuf)
                    return AVERROR(EIO);

                avio_write(asf->pktbuf, buf + off, len - off);
                avio_skip(pb, len - off);
                if (!(flags & RTP_FLAG_MARKER))
                    return -1;
                out_len     = avio_close_dyn_buf(asf->pktbuf, &asf->buf);
                asf->pktbuf = NULL;
            } else {
                /**
                 * If 0x40 is set, the len_off field specifies the length of
                 * the next ASF packet that can be read from this payload
                 * data alone. This is commonly the same as the payload size,
                 * but could be less in case of packet splitting (i.e.
                 * multiple ASF packets in one RTP packet).
                 */

                int cur_len = start_off + len_off - off;
                int prev_len = out_len;
                out_len += cur_len;
                if (FFMIN(cur_len, len - off) < 0)
                    return -1;
                if ((res = av_reallocp(&asf->buf, out_len)) < 0)
                    return res;
                memcpy(asf->buf + prev_len, buf + off,
                       FFMIN(cur_len, len - off));
                avio_skip(pb, cur_len);
            }
        }

        init_packetizer(pb, asf->buf, out_len);
        pb->pos += rt->asf_pb_pos;
        pb->eof_reached = 0;
        rt->asf_ctx->pb = pb;
    }

    for (;;) {
        int i;

        res = ff_read_packet(rt->asf_ctx, pkt);
        rt->asf_pb_pos = avio_tell(pb);
        if (res != 0)
            break;
        for (i = 0; i < s->nb_streams; i++) {
            if (s->streams[i]->id == rt->asf_ctx->streams[pkt->stream_index]->id) {
                pkt->stream_index = i;
                return 1; // FIXME: return 0 if last packet
            }
        }
        av_free_packet(pkt);
    }

    return res == 1 ? -1 : res;
}

static PayloadContext *asfrtp_new_context(void)
{
    return av_mallocz(sizeof(PayloadContext));
}

static void asfrtp_free_context(PayloadContext *asf)
{
    if (asf->pktbuf) {
        uint8_t *p = NULL;
        avio_close_dyn_buf(asf->pktbuf, &p);
        asf->pktbuf = NULL;
        av_free(p);
    }
    av_freep(&asf->buf);
    av_free(asf);
}

#define RTP_ASF_HANDLER(n, s, t) \
RTPDynamicProtocolHandler ff_ms_rtp_ ## n ## _handler = { \
    .enc_name         = s, \
    .codec_type       = t, \
    .codec_id         = AV_CODEC_ID_NONE, \
    .parse_sdp_a_line = asfrtp_parse_sdp_line, \
    .alloc            = asfrtp_new_context, \
    .free             = asfrtp_free_context, \
    .parse_packet     = asfrtp_parse_packet,   \
}

RTP_ASF_HANDLER(asf_pfv, "x-asf-pf",  AVMEDIA_TYPE_VIDEO);
RTP_ASF_HANDLER(asf_pfa, "x-asf-pf",  AVMEDIA_TYPE_AUDIO);
Commit	Line	Data
2ba45a60 DM	1	/*
	2	* Microsoft RTP/ASF support.
	3	* Copyright (c) 2008 Ronald S. Bultje
	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	/**
	23	* @file
	24	* @brief Microsoft RTP/ASF support
	25	* @author Ronald S. Bultje <rbultje@ronald.bitfreak.net>
	26	*/
	27
f6fa7814	28	#include "libavutil/avassert.h"
2ba45a60 DM	29	#include "libavutil/base64.h"
	30	#include "libavutil/avstring.h"
	31	#include "libavutil/intreadwrite.h"
	32	#include "rtp.h"
	33	#include "rtpdec_formats.h"
	34	#include "rtsp.h"
	35	#include "asf.h"
	36	#include "avio_internal.h"
	37	#include "internal.h"
	38
	39	/**
	40	* From MSDN 2.2.1.4, we learn that ASF data packets over RTP should not
	41	* contain any padding. Unfortunately, the header min/max_pktsize are not
	42	* updated (thus making min_pktsize invalid). Here, we "fix" these faulty
	43	* min_pktsize values in the ASF file header.
	44	* @return 0 on success, <0 on failure (currently -1).
	45	*/
	46	static int rtp_asf_fix_header(uint8_t *buf, int len)
	47	{
	48	uint8_t p = buf, end = buf + len;
	49
	50	if (len < sizeof(ff_asf_guid) * 2 + 22 \|\|
	51	memcmp(p, ff_asf_header, sizeof(ff_asf_guid))) {
	52	return -1;
	53	}
	54	p += sizeof(ff_asf_guid) + 14;
	55	do {
	56	uint64_t chunksize = AV_RL64(p + sizeof(ff_asf_guid));
	57	if (memcmp(p, ff_asf_file_header, sizeof(ff_asf_guid))) {
	58	if (chunksize > end - p)
	59	return -1;
	60	p += chunksize;
	61	continue;
	62	}
	63
	64	/* skip most of the file header, to min_pktsize */
	65	p += 6 * 8 + 3 * 4 + sizeof(ff_asf_guid) * 2;
	66	if (p + 8 <= end && AV_RL32(p) == AV_RL32(p + 4)) {
	67	/* and set that to zero */
	68	AV_WL32(p, 0);
	69	return 0;
	70	}
	71	break;
	72	} while (end - p >= sizeof(ff_asf_guid) + 8);
	73
	74	return -1;
	75	}
	76
	77	/**
	78	* The following code is basically a buffered AVIOContext,
	79	* with the added benefit of returning -EAGAIN (instead of 0)
	80	* on packet boundaries, such that the ASF demuxer can return
	81	* safely and resume business at the next packet.
	82	*/
	83	static int packetizer_read(void opaque, uint8_t buf, int buf_size)
	84	{
	85	return AVERROR(EAGAIN);
	86	}
	87
	88	static void init_packetizer(AVIOContext pb, uint8_t buf, int len)
	89	{
	90	ffio_init_context(pb, buf, len, 0, NULL, packetizer_read, NULL, NULL);
	91
	92	/* this "fills" the buffer with its current content */
93	pb->pos = len;
94	pb->buf_end = buf + len;
95	}
96
97	int ff_wms_parse_sdp_a_line(AVFormatContext s, const char p)
98	{
99	int ret = 0;
100	if (av_strstart(p, "pgmpu:data:application/vnd.ms.wms-hdr.asfv1;base64,", &p)) {
101	AVIOContext pb;
102	RTSPState *rt = s->priv_data;
103	AVDictionary *opts = NULL;
104	int len = strlen(p) * 6 / 8;
105	char *buf = av_mallocz(len);
f6fa7814 DM	106	AVInputFormat *iformat;
f6fa7814 DM	107
2ba45a60 DM	108	av_base64_decode(buf, p, len);
	109
	110	if (rtp_asf_fix_header(buf, len) < 0)
	111	av_log(s, AV_LOG_ERROR,
	112	"Failed to fix invalid RTSP-MS/ASF min_pktsize\n");
	113	init_packetizer(&pb, buf, len);
	114	if (rt->asf_ctx) {
	115	avformat_close_input(&rt->asf_ctx);
	116	}
f6fa7814 DM	117	if (!(iformat = av_find_input_format("asf")))
f6fa7814 DM	118	return AVERROR_DEMUXER_NOT_FOUND;
2ba45a60 DM	119	if (!(rt->asf_ctx = avformat_alloc_context()))
	120	return AVERROR(ENOMEM);
	121	rt->asf_ctx->pb = &pb;
	122	av_dict_set(&opts, "no_resync_search", "1", 0);
f6fa7814 DM	123
	124	if ((ret = ff_copy_whitelists(rt->asf_ctx, s)) < 0) {
	125	av_dict_free(&opts);
	126	return ret;
	127	}
	128
	129	ret = avformat_open_input(&rt->asf_ctx, "", iformat, &opts);
2ba45a60 DM	130	av_dict_free(&opts);
	131	if (ret < 0)
	132	return ret;
	133	av_dict_copy(&s->metadata, rt->asf_ctx->metadata, 0);
	134	rt->asf_pb_pos = avio_tell(&pb);
	135	av_free(buf);
	136	rt->asf_ctx->pb = NULL;
	137	}
	138	return ret;
	139	}
	140
	141	static int asfrtp_parse_sdp_line(AVFormatContext *s, int stream_index,
	142	PayloadContext asf, const char line)
	143	{
	144	if (stream_index < 0)
	145	return 0;
	146	if (av_strstart(line, "stream:", &line)) {
	147	RTSPState *rt = s->priv_data;
	148
	149	s->streams[stream_index]->id = strtol(line, NULL, 10);
	150
	151	if (rt->asf_ctx) {
	152	int i;
	153
	154	for (i = 0; i < rt->asf_ctx->nb_streams; i++) {
	155	if (s->streams[stream_index]->id == rt->asf_ctx->streams[i]->id) {
	156	*s->streams[stream_index]->codec =
	157	*rt->asf_ctx->streams[i]->codec;
	158	s->streams[stream_index]->need_parsing =
	159	rt->asf_ctx->streams[i]->need_parsing;
	160	rt->asf_ctx->streams[i]->codec->extradata_size = 0;
	161	rt->asf_ctx->streams[i]->codec->extradata = NULL;
	162	avpriv_set_pts_info(s->streams[stream_index], 32, 1, 1000);
	163	}
	164	}
	165	}
	166	}
	167
	168	return 0;
	169	}
	170
	171	struct PayloadContext {
	172	AVIOContext *pktbuf, pb;
	173	uint8_t *buf;
	174	};
	175
	176	/**
	177	* @return 0 when a packet was written into /p pkt, and no more data is left;
	178	* 1 when a packet was written into /p pkt, and more packets might be left;
	179	* <0 when not enough data was provided to return a full packet, or on error.
	180	*/
	181	static int asfrtp_parse_packet(AVFormatContext s, PayloadContext asf,
	182	AVStream st, AVPacket pkt,
	183	uint32_t *timestamp,
	184	const uint8_t *buf, int len, uint16_t seq,
	185	int flags)
	186	{
	187	AVIOContext *pb = &asf->pb;
	188	int res, mflags, len_off;
	189	RTSPState *rt = s->priv_data;
	190
	191	if (!rt->asf_ctx)
	192	return -1;
	193
194	if (len > 0) {
195	int off, out_len = 0;
196
197	if (len < 4)
198	return -1;
199
200	av_freep(&asf->buf);
201
202	ffio_init_context(pb, (uint8_t *)buf, len, 0, NULL, NULL, NULL, NULL);
203
204	while (avio_tell(pb) + 4 < len) {
205	int start_off = avio_tell(pb);
206
207	mflags = avio_r8(pb);
208	if (mflags & 0x80)
209	flags \|= RTP_FLAG_KEY;
210	len_off = avio_rb24(pb);
211	if (mflags & 0x20) /*< relative timestamp /
212	avio_skip(pb, 4);
213	if (mflags & 0x10) /*< has duration /
214	avio_skip(pb, 4);
215	if (mflags & 0x8) /*< has location ID /
216	avio_skip(pb, 4);
217	off = avio_tell(pb);
218
219	if (!(mflags & 0x40)) {
220	/**
221	* If 0x40 is not set, the len_off field specifies an offset
222	* of this packet's payload data in the complete (reassembled)
223	* ASF packet. This is used to spread one ASF packet over
224	* multiple RTP packets.
225	*/
226	if (asf->pktbuf && len_off != avio_tell(asf->pktbuf)) {
227	uint8_t *p;
228	avio_close_dyn_buf(asf->pktbuf, &p);
229	asf->pktbuf = NULL;
230	av_free(p);
231	}
232	if (!len_off && !asf->pktbuf &&
233	(res = avio_open_dyn_buf(&asf->pktbuf)) < 0)
234	return res;
235	if (!asf->pktbuf)
236	return AVERROR(EIO);
237
238	avio_write(asf->pktbuf, buf + off, len - off);
239	avio_skip(pb, len - off);
240	if (!(flags & RTP_FLAG_MARKER))
241	return -1;
242	out_len = avio_close_dyn_buf(asf->pktbuf, &asf->buf);
243	asf->pktbuf = NULL;
244	} else {
245	/**
246	* If 0x40 is set, the len_off field specifies the length of
247	* the next ASF packet that can be read from this payload
248	* data alone. This is commonly the same as the payload size,
249	* but could be less in case of packet splitting (i.e.
250	* multiple ASF packets in one RTP packet).
251	*/
252
253	int cur_len = start_off + len_off - off;
254	int prev_len = out_len;
255	out_len += cur_len;
256	if (FFMIN(cur_len, len - off) < 0)
257	return -1;
258	if ((res = av_reallocp(&asf->buf, out_len)) < 0)
259	return res;
260	memcpy(asf->buf + prev_len, buf + off,
261	FFMIN(cur_len, len - off));
262	avio_skip(pb, cur_len);
263	}
264	}
265
266	init_packetizer(pb, asf->buf, out_len);
267	pb->pos += rt->asf_pb_pos;
268	pb->eof_reached = 0;
269	rt->asf_ctx->pb = pb;
270	}
271
272	for (;;) {
273	int i;
274
275	res = ff_read_packet(rt->asf_ctx, pkt);
276	rt->asf_pb_pos = avio_tell(pb);
277	if (res != 0)
278	break;
279	for (i = 0; i < s->nb_streams; i++) {
280	if (s->streams[i]->id == rt->asf_ctx->streams[pkt->stream_index]->id) {
281	pkt->stream_index = i;
282	return 1; // FIXME: return 0 if last packet
283	}
284	}
285	av_free_packet(pkt);
286	}
287
288	return res == 1 ? -1 : res;
289	}
290
291	static PayloadContext *asfrtp_new_context(void)
292	{
293	return av_mallocz(sizeof(PayloadContext));
294	}
295
296	static void asfrtp_free_context(PayloadContext *asf)
297	{
298	if (asf->pktbuf) {
299	uint8_t *p = NULL;
300	avio_close_dyn_buf(asf->pktbuf, &p);
301	asf->pktbuf = NULL;
302	av_free(p);
303	}
304	av_freep(&asf->buf);
305	av_free(asf);
306	}
307
308	#define RTP_ASF_HANDLER(n, s, t) \
309	RTPDynamicProtocolHandler ff_ms_rtp_ ## n ## _handler = { \
310	.enc_name = s, \
311	.codec_type = t, \
312	.codec_id = AV_CODEC_ID_NONE, \
313	.parse_sdp_a_line = asfrtp_parse_sdp_line, \
314	.alloc = asfrtp_new_context, \
315	.free = asfrtp_free_context, \
316	.parse_packet = asfrtp_parse_packet, \
317	}
318
319	RTP_ASF_HANDLER(asf_pfv, "x-asf-pf", AVMEDIA_TYPE_VIDEO);
320	RTP_ASF_HANDLER(asf_pfa, "x-asf-pf", AVMEDIA_TYPE_AUDIO);