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

/*
 * MMS protocol over HTTP
 * Copyright (c) 2010 Zhentan Feng <spyfeng at gmail dot com>
 *
 * 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
 */

/*
 * Reference
 * Windows Media HTTP Streaming Protocol.
 * http://msdn.microsoft.com/en-us/library/cc251059(PROT.10).aspx
 */

#include <string.h>
#include "libavutil/intreadwrite.h"
#include "libavutil/avstring.h"
#include "libavutil/opt.h"
#include "internal.h"
#include "mms.h"
#include "asf.h"
#include "http.h"
#include "url.h"

#define CHUNK_HEADER_LENGTH 4   // 2bytes chunk type and 2bytes chunk length.
#define EXT_HEADER_LENGTH   8   // 4bytes sequence, 2bytes useless and 2bytes chunk length.

// see Ref 2.2.1.8
#define USERAGENT  "User-Agent: NSPlayer/4.1.0.3856\r\n"
// see Ref 2.2.1.4.33
// the guid value can be changed to any valid value.
#define CLIENTGUID "Pragma: xClientGUID={c77e7400-738a-11d2-9add-0020af0a3278}\r\n"

// see Ref 2.2.3 for packet type define:
// chunk type contains 2 fields: Frame and PacketID.
// Frame is 0x24 or 0xA4(rarely), different PacketID indicates different packet type.
typedef enum {
    CHUNK_TYPE_DATA          = 0x4424,
    CHUNK_TYPE_ASF_HEADER    = 0x4824,
    CHUNK_TYPE_END           = 0x4524,
    CHUNK_TYPE_STREAM_CHANGE = 0x4324,
} ChunkType;

typedef struct {
    MMSContext mms;
    uint8_t location[1024];
    int request_seq;  ///< request packet sequence
    int chunk_seq;    ///< data packet sequence
} MMSHContext;

static int mmsh_close(URLContext *h)
{
    MMSHContext *mmsh = (MMSHContext *)h->priv_data;
    MMSContext *mms   = &mmsh->mms;
    if (mms->mms_hd)
        ffurl_closep(&mms->mms_hd);
    av_freep(&mms->streams);
    av_freep(&mms->asf_header);
    return 0;
}

static ChunkType get_chunk_header(MMSHContext *mmsh, int *len)
{
    MMSContext *mms = &mmsh->mms;
    uint8_t chunk_header[CHUNK_HEADER_LENGTH];
    uint8_t ext_header[EXT_HEADER_LENGTH];
    ChunkType chunk_type;
    int chunk_len, res, ext_header_len;

    res = ffurl_read_complete(mms->mms_hd, chunk_header, CHUNK_HEADER_LENGTH);
    if (res != CHUNK_HEADER_LENGTH) {
        av_log(NULL, AV_LOG_ERROR, "Read data packet header failed!\n");
        return AVERROR(EIO);
    }
    chunk_type = AV_RL16(chunk_header);
    chunk_len  = AV_RL16(chunk_header + 2);

    switch (chunk_type) {
    case CHUNK_TYPE_END:
    case CHUNK_TYPE_STREAM_CHANGE:
        ext_header_len = 4;
        break;
    case CHUNK_TYPE_ASF_HEADER:
    case CHUNK_TYPE_DATA:
        ext_header_len = 8;
        break;
    default:
        av_log(NULL, AV_LOG_ERROR, "Strange chunk type %d\n", chunk_type);
        return AVERROR_INVALIDDATA;
    }

    res = ffurl_read_complete(mms->mms_hd, ext_header, ext_header_len);
    if (res != ext_header_len) {
        av_log(NULL, AV_LOG_ERROR, "Read ext header failed!\n");
        return AVERROR(EIO);
    }
    *len = chunk_len - ext_header_len;
    if (chunk_type == CHUNK_TYPE_END || chunk_type == CHUNK_TYPE_DATA)
        mmsh->chunk_seq = AV_RL32(ext_header);
    return chunk_type;
}

static int read_data_packet(MMSHContext *mmsh, const int len)
{
    MMSContext *mms   = &mmsh->mms;
    int res;
    if (len > sizeof(mms->in_buffer)) {
        av_log(NULL, AV_LOG_ERROR,
               "Data packet length %d exceeds the in_buffer size %"SIZE_SPECIFIER"\n",
               len, sizeof(mms->in_buffer));
        return AVERROR(EIO);
    }
    res = ffurl_read_complete(mms->mms_hd, mms->in_buffer, len);
    av_dlog(NULL, "Data packet len = %d\n", len);
    if (res != len) {
        av_log(NULL, AV_LOG_ERROR, "Read data packet failed!\n");
        return AVERROR(EIO);
    }
    if (len > mms->asf_packet_len) {
        av_log(NULL, AV_LOG_ERROR,
               "Chunk length %d exceed packet length %d\n",len, mms->asf_packet_len);
        return AVERROR_INVALIDDATA;
    } else {
        memset(mms->in_buffer + len, 0, mms->asf_packet_len - len); // padding
    }
    mms->read_in_ptr      = mms->in_buffer;
    mms->remaining_in_len = mms->asf_packet_len;
    return 0;
}

static int get_http_header_data(MMSHContext *mmsh)
{
    MMSContext *mms = &mmsh->mms;
    int res, len;
    ChunkType chunk_type;

    for (;;) {
        len = 0;
        res = chunk_type = get_chunk_header(mmsh, &len);
        if (res < 0) {
            return res;
        } else if (chunk_type == CHUNK_TYPE_ASF_HEADER){
            // get asf header and stored it
            if (!mms->header_parsed) {
                if (mms->asf_header) {
                    if (len != mms->asf_header_size) {
                        mms->asf_header_size = len;
                        av_dlog(NULL, "Header len changed from %d to %d\n",
                                mms->asf_header_size, len);
                        av_freep(&mms->asf_header);
                    }
                }
                mms->asf_header = av_mallocz(len);
                if (!mms->asf_header) {
                    return AVERROR(ENOMEM);
                }
                mms->asf_header_size = len;
            }
            if (len > mms->asf_header_size) {
                av_log(NULL, AV_LOG_ERROR,
                       "Asf header packet len = %d exceed the asf header buf size %d\n",
                       len, mms->asf_header_size);
                return AVERROR(EIO);
            }
            res = ffurl_read_complete(mms->mms_hd, mms->asf_header, len);
            if (res != len) {
                av_log(NULL, AV_LOG_ERROR,
                       "Recv asf header data len %d != expected len %d\n", res, len);
                return AVERROR(EIO);
            }
            mms->asf_header_size = len;
            if (!mms->header_parsed) {
                res = ff_mms_asf_header_parser(mms);
                mms->header_parsed = 1;
                return res;
            }
        } else if (chunk_type == CHUNK_TYPE_DATA) {
            // read data packet and do padding
            return read_data_packet(mmsh, len);
        } else {
            if (len) {
                if (len > sizeof(mms->in_buffer)) {
                    av_log(NULL, AV_LOG_ERROR,
                           "Other packet len = %d exceed the in_buffer size %"SIZE_SPECIFIER"\n",
                           len, sizeof(mms->in_buffer));
                    return AVERROR(EIO);
                }
                res = ffurl_read_complete(mms->mms_hd, mms->in_buffer, len);
                if (res != len) {
                    av_log(NULL, AV_LOG_ERROR, "Read other chunk type data failed!\n");
                    return AVERROR(EIO);
                } else {
                    av_dlog(NULL, "Skip chunk type %d \n", chunk_type);
                    continue;
                }
            }
        }
    }
}

static int mmsh_open_internal(URLContext *h, const char *uri, int flags, int timestamp, int64_t pos)
{
    int i, port, err;
    char httpname[256], path[256], host[128];
    char *stream_selection = NULL;
    char headers[1024];
    MMSHContext *mmsh = h->priv_data;
    MMSContext *mms;

    mmsh->request_seq = h->is_streamed = 1;
    mms = &mmsh->mms;
    av_strlcpy(mmsh->location, uri, sizeof(mmsh->location));

    av_url_split(NULL, 0, NULL, 0,
        host, sizeof(host), &port, path, sizeof(path), mmsh->location);
    if (port<0)
        port = 80; // default mmsh protocol port
    ff_url_join(httpname, sizeof(httpname), "http", NULL, host, port, "%s", path);

    if (ffurl_alloc(&mms->mms_hd, httpname, AVIO_FLAG_READ,
                    &h->interrupt_callback) < 0) {
        return AVERROR(EIO);
    }

    snprintf(headers, sizeof(headers),
             "Accept: */*\r\n"
             USERAGENT
             "Host: %s:%d\r\n"
             "Pragma: no-cache,rate=1.000000,stream-time=0,"
             "stream-offset=0:0,request-context=%u,max-duration=0\r\n"
             CLIENTGUID
             "Connection: Close\r\n",
             host, port, mmsh->request_seq++);
    av_opt_set(mms->mms_hd->priv_data, "headers", headers, 0);

    err = ffurl_connect(mms->mms_hd, NULL);
    if (err) {
        goto fail;
    }
    err = get_http_header_data(mmsh);
    if (err) {
        av_log(NULL, AV_LOG_ERROR, "Get http header data failed!\n");
        goto fail;
    }

    // close the socket and then reopen it for sending the second play request.
    ffurl_close(mms->mms_hd);
    memset(headers, 0, sizeof(headers));
    if ((err = ffurl_alloc(&mms->mms_hd, httpname, AVIO_FLAG_READ,
                           &h->interrupt_callback)) < 0) {
        goto fail;
    }
    stream_selection = av_mallocz(mms->stream_num * 19 + 1);
    if (!stream_selection)
        return AVERROR(ENOMEM);
    for (i = 0; i < mms->stream_num; i++) {
        char tmp[20];
        err = snprintf(tmp, sizeof(tmp), "ffff:%d:0 ", mms->streams[i].id);
        if (err < 0)
            goto fail;
        av_strlcat(stream_selection, tmp, mms->stream_num * 19 + 1);
    }
    // send play request
    err = snprintf(headers, sizeof(headers),
                   "Accept: */*\r\n"
                   USERAGENT
                   "Host: %s:%d\r\n"
                   "Pragma: no-cache,rate=1.000000,request-context=%u\r\n"
                   "Pragma: xPlayStrm=1\r\n"
                   CLIENTGUID
                   "Pragma: stream-switch-count=%d\r\n"
                   "Pragma: stream-switch-entry=%s\r\n"
                   "Pragma: no-cache,rate=1.000000,stream-time=%u"
                   "Connection: Close\r\n",
                   host, port, mmsh->request_seq++, mms->stream_num, stream_selection, timestamp);
    av_freep(&stream_selection);
    if (err < 0) {
        av_log(NULL, AV_LOG_ERROR, "Build play request failed!\n");
        goto fail;
    }
    av_dlog(NULL, "out_buffer is %s", headers);
    av_opt_set(mms->mms_hd->priv_data, "headers", headers, 0);

    err = ffurl_connect(mms->mms_hd, NULL);
    if (err) {
          goto fail;
    }

    err = get_http_header_data(mmsh);
    if (err) {
        av_log(NULL, AV_LOG_ERROR, "Get http header data failed!\n");
        goto fail;
    }

    av_dlog(NULL, "Connection successfully open\n");
    return 0;
fail:
    av_freep(&stream_selection);
    mmsh_close(h);
    av_dlog(NULL, "Connection failed with error %d\n", err);
    return err;
}

static int mmsh_open(URLContext *h, const char *uri, int flags)
{
    return mmsh_open_internal(h, uri, flags, 0, 0);
}

static int handle_chunk_type(MMSHContext *mmsh)
{
    MMSContext *mms = &mmsh->mms;
    int res, len = 0;
    ChunkType chunk_type;
    chunk_type = get_chunk_header(mmsh, &len);

    switch (chunk_type) {
    case CHUNK_TYPE_END:
        mmsh->chunk_seq = 0;
        av_log(NULL, AV_LOG_ERROR, "Stream ended!\n");
        return AVERROR(EIO);
    case CHUNK_TYPE_STREAM_CHANGE:
        mms->header_parsed = 0;
        if (res = get_http_header_data(mmsh)) {
            av_log(NULL, AV_LOG_ERROR,"Stream changed! Failed to get new header!\n");
            return res;
        }
        break;
    case CHUNK_TYPE_DATA:
        return read_data_packet(mmsh, len);
    default:
        av_log(NULL, AV_LOG_ERROR, "Recv other type packet %d\n", chunk_type);
        return AVERROR_INVALIDDATA;
    }
    return 0;
}

static int mmsh_read(URLContext *h, uint8_t *buf, int size)
{
    int res = 0;
    MMSHContext *mmsh = h->priv_data;
    MMSContext *mms   = &mmsh->mms;
    do {
        if (mms->asf_header_read_size < mms->asf_header_size) {
            // copy asf header into buffer
            res = ff_mms_read_header(mms, buf, size);
        } else {
            if (!mms->remaining_in_len && (res = handle_chunk_type(mmsh)))
                return res;
            res = ff_mms_read_data(mms, buf, size);
        }
    } while (!res);
    return res;
}

static int64_t mmsh_read_seek(URLContext *h, int stream_index,
                        int64_t timestamp, int flags)
{
    MMSHContext *mmsh_old = h->priv_data;
    MMSHContext *mmsh     = av_mallocz(sizeof(*mmsh));
    int ret;

    if (!mmsh)
        return AVERROR(ENOMEM);

    h->priv_data = mmsh;
    ret= mmsh_open_internal(h, mmsh_old->location, 0, FFMAX(timestamp, 0), 0);
    if(ret>=0){
        h->priv_data = mmsh_old;
        mmsh_close(h);
        h->priv_data = mmsh;
        av_free(mmsh_old);
        mmsh->mms.asf_header_read_size = mmsh->mms.asf_header_size;
    }else {
        h->priv_data = mmsh_old;
        av_free(mmsh);
    }

    return ret;
}

static int64_t mmsh_seek(URLContext *h, int64_t pos, int whence)
{
    MMSHContext *mmsh = h->priv_data;
    MMSContext *mms   = &mmsh->mms;

    if(pos == 0 && whence == SEEK_CUR)
        return mms->asf_header_read_size + mms->remaining_in_len + mmsh->chunk_seq * (int64_t)mms->asf_packet_len;
    return AVERROR(ENOSYS);
}

URLProtocol ff_mmsh_protocol = {
    .name           = "mmsh",
    .url_open       = mmsh_open,
    .url_read       = mmsh_read,
    .url_seek       = mmsh_seek,
    .url_close      = mmsh_close,
    .url_read_seek  = mmsh_read_seek,
    .priv_data_size = sizeof(MMSHContext),
    .flags          = URL_PROTOCOL_FLAG_NETWORK,
};
Commit	Line	Data
2ba45a60 DM	1	/*
	2	* MMS protocol over HTTP
	3	* Copyright (c) 2010 Zhentan Feng <spyfeng at gmail dot com>
	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	* Reference
	24	* Windows Media HTTP Streaming Protocol.
	25	* http://msdn.microsoft.com/en-us/library/cc251059(PROT.10).aspx
	26	*/
	27
	28	#include <string.h>
	29	#include "libavutil/intreadwrite.h"
	30	#include "libavutil/avstring.h"
	31	#include "libavutil/opt.h"
	32	#include "internal.h"
	33	#include "mms.h"
	34	#include "asf.h"
	35	#include "http.h"
	36	#include "url.h"
	37
	38	#define CHUNK_HEADER_LENGTH 4 // 2bytes chunk type and 2bytes chunk length.
	39	#define EXT_HEADER_LENGTH 8 // 4bytes sequence, 2bytes useless and 2bytes chunk length.
	40
	41	// see Ref 2.2.1.8
	42	#define USERAGENT "User-Agent: NSPlayer/4.1.0.3856\r\n"
	43	// see Ref 2.2.1.4.33
	44	// the guid value can be changed to any valid value.
	45	#define CLIENTGUID "Pragma: xClientGUID={c77e7400-738a-11d2-9add-0020af0a3278}\r\n"
	46
	47	// see Ref 2.2.3 for packet type define:
	48	// chunk type contains 2 fields: Frame and PacketID.
	49	// Frame is 0x24 or 0xA4(rarely), different PacketID indicates different packet type.
	50	typedef enum {
	51	CHUNK_TYPE_DATA = 0x4424,
	52	CHUNK_TYPE_ASF_HEADER = 0x4824,
	53	CHUNK_TYPE_END = 0x4524,
	54	CHUNK_TYPE_STREAM_CHANGE = 0x4324,
	55	} ChunkType;
	56
	57	typedef struct {
	58	MMSContext mms;
	59	uint8_t location[1024];
	60	int request_seq; ///< request packet sequence
	61	int chunk_seq; ///< data packet sequence
	62	} MMSHContext;
	63
	64	static int mmsh_close(URLContext *h)
65	{
66	MMSHContext mmsh = (MMSHContext )h->priv_data;
67	MMSContext *mms = &mmsh->mms;
68	if (mms->mms_hd)
69	ffurl_closep(&mms->mms_hd);
70	av_freep(&mms->streams);
71	av_freep(&mms->asf_header);
72	return 0;
73	}
74
75	static ChunkType get_chunk_header(MMSHContext mmsh, int len)
76	{
77	MMSContext *mms = &mmsh->mms;
78	uint8_t chunk_header[CHUNK_HEADER_LENGTH];
79	uint8_t ext_header[EXT_HEADER_LENGTH];
80	ChunkType chunk_type;
81	int chunk_len, res, ext_header_len;
82
83	res = ffurl_read_complete(mms->mms_hd, chunk_header, CHUNK_HEADER_LENGTH);
84	if (res != CHUNK_HEADER_LENGTH) {
85	av_log(NULL, AV_LOG_ERROR, "Read data packet header failed!\n");
86	return AVERROR(EIO);
87	}
88	chunk_type = AV_RL16(chunk_header);
89	chunk_len = AV_RL16(chunk_header + 2);
90
91	switch (chunk_type) {
92	case CHUNK_TYPE_END:
93	case CHUNK_TYPE_STREAM_CHANGE:
94	ext_header_len = 4;
95	break;
96	case CHUNK_TYPE_ASF_HEADER:
97	case CHUNK_TYPE_DATA:
98	ext_header_len = 8;
99	break;
100	default:
101	av_log(NULL, AV_LOG_ERROR, "Strange chunk type %d\n", chunk_type);
102	return AVERROR_INVALIDDATA;
103	}
104
105	res = ffurl_read_complete(mms->mms_hd, ext_header, ext_header_len);
106	if (res != ext_header_len) {
107	av_log(NULL, AV_LOG_ERROR, "Read ext header failed!\n");
108	return AVERROR(EIO);
109	}
110	*len = chunk_len - ext_header_len;
111	if (chunk_type == CHUNK_TYPE_END \|\| chunk_type == CHUNK_TYPE_DATA)
112	mmsh->chunk_seq = AV_RL32(ext_header);
113	return chunk_type;
114	}
115
116	static int read_data_packet(MMSHContext *mmsh, const int len)
117	{
118	MMSContext *mms = &mmsh->mms;
119	int res;
120	if (len > sizeof(mms->in_buffer)) {
121	av_log(NULL, AV_LOG_ERROR,
122	"Data packet length %d exceeds the in_buffer size %"SIZE_SPECIFIER"\n",
123	len, sizeof(mms->in_buffer));
124	return AVERROR(EIO);
125	}
126	res = ffurl_read_complete(mms->mms_hd, mms->in_buffer, len);
127	av_dlog(NULL, "Data packet len = %d\n", len);
128	if (res != len) {
129	av_log(NULL, AV_LOG_ERROR, "Read data packet failed!\n");
130	return AVERROR(EIO);
131	}
132	if (len > mms->asf_packet_len) {
133	av_log(NULL, AV_LOG_ERROR,
134	"Chunk length %d exceed packet length %d\n",len, mms->asf_packet_len);
135	return AVERROR_INVALIDDATA;
136	} else {
137	memset(mms->in_buffer + len, 0, mms->asf_packet_len - len); // padding
138	}
139	mms->read_in_ptr = mms->in_buffer;
140	mms->remaining_in_len = mms->asf_packet_len;
141	return 0;
142	}
143
144	static int get_http_header_data(MMSHContext *mmsh)
145	{
146	MMSContext *mms = &mmsh->mms;
147	int res, len;
148	ChunkType chunk_type;
149
150	for (;;) {
151	len = 0;
152	res = chunk_type = get_chunk_header(mmsh, &len);
153	if (res < 0) {
154	return res;
155	} else if (chunk_type == CHUNK_TYPE_ASF_HEADER){
156	// get asf header and stored it
157	if (!mms->header_parsed) {
158	if (mms->asf_header) {
159	if (len != mms->asf_header_size) {
160	mms->asf_header_size = len;
161	av_dlog(NULL, "Header len changed from %d to %d\n",
162	mms->asf_header_size, len);
163	av_freep(&mms->asf_header);
164	}
165	}
166	mms->asf_header = av_mallocz(len);
167	if (!mms->asf_header) {
168	return AVERROR(ENOMEM);
169	}
170	mms->asf_header_size = len;
171	}
172	if (len > mms->asf_header_size) {
173	av_log(NULL, AV_LOG_ERROR,
174	"Asf header packet len = %d exceed the asf header buf size %d\n",
175	len, mms->asf_header_size);
176	return AVERROR(EIO);
177	}
178	res = ffurl_read_complete(mms->mms_hd, mms->asf_header, len);
179	if (res != len) {
180	av_log(NULL, AV_LOG_ERROR,
181	"Recv asf header data len %d != expected len %d\n", res, len);
182	return AVERROR(EIO);
183	}
184	mms->asf_header_size = len;
185	if (!mms->header_parsed) {
186	res = ff_mms_asf_header_parser(mms);
187	mms->header_parsed = 1;
188	return res;
189	}
190	} else if (chunk_type == CHUNK_TYPE_DATA) {
191	// read data packet and do padding
192	return read_data_packet(mmsh, len);
193	} else {
194	if (len) {
195	if (len > sizeof(mms->in_buffer)) {
196	av_log(NULL, AV_LOG_ERROR,
197	"Other packet len = %d exceed the in_buffer size %"SIZE_SPECIFIER"\n",
198	len, sizeof(mms->in_buffer));
199	return AVERROR(EIO);
200	}
201	res = ffurl_read_complete(mms->mms_hd, mms->in_buffer, len);
202	if (res != len) {
203	av_log(NULL, AV_LOG_ERROR, "Read other chunk type data failed!\n");
204	return AVERROR(EIO);
205	} else {
206	av_dlog(NULL, "Skip chunk type %d \n", chunk_type);
207	continue;
208	}
209	}
210	}
211	}
212	}
213
214	static int mmsh_open_internal(URLContext h, const char uri, int flags, int timestamp, int64_t pos)
215	{
216	int i, port, err;
217	char httpname[256], path[256], host[128];
218	char *stream_selection = NULL;
219	char headers[1024];
220	MMSHContext *mmsh = h->priv_data;
221	MMSContext *mms;
222
223	mmsh->request_seq = h->is_streamed = 1;
224	mms = &mmsh->mms;
225	av_strlcpy(mmsh->location, uri, sizeof(mmsh->location));
226
227	av_url_split(NULL, 0, NULL, 0,
228	host, sizeof(host), &port, path, sizeof(path), mmsh->location);
229	if (port<0)
230	port = 80; // default mmsh protocol port
231	ff_url_join(httpname, sizeof(httpname), "http", NULL, host, port, "%s", path);
232
233	if (ffurl_alloc(&mms->mms_hd, httpname, AVIO_FLAG_READ,
234	&h->interrupt_callback) < 0) {
235	return AVERROR(EIO);
236	}
237
238	snprintf(headers, sizeof(headers),
239	"Accept: /\r\n"
240	USERAGENT
241	"Host: %s:%d\r\n"
242	"Pragma: no-cache,rate=1.000000,stream-time=0,"
243	"stream-offset=0:0,request-context=%u,max-duration=0\r\n"
244	CLIENTGUID
245	"Connection: Close\r\n",
246	host, port, mmsh->request_seq++);
247	av_opt_set(mms->mms_hd->priv_data, "headers", headers, 0);
248
249	err = ffurl_connect(mms->mms_hd, NULL);
250	if (err) {
251	goto fail;
252	}
253	err = get_http_header_data(mmsh);
254	if (err) {
255	av_log(NULL, AV_LOG_ERROR, "Get http header data failed!\n");
256	goto fail;
257	}
258
259	// close the socket and then reopen it for sending the second play request.
260	ffurl_close(mms->mms_hd);
261	memset(headers, 0, sizeof(headers));
262	if ((err = ffurl_alloc(&mms->mms_hd, httpname, AVIO_FLAG_READ,
263	&h->interrupt_callback)) < 0) {
264	goto fail;
265	}
266	stream_selection = av_mallocz(mms->stream_num * 19 + 1);
267	if (!stream_selection)
268	return AVERROR(ENOMEM);
269	for (i = 0; i < mms->stream_num; i++) {
270	char tmp[20];
271	err = snprintf(tmp, sizeof(tmp), "ffff:%d:0 ", mms->streams[i].id);
272	if (err < 0)
273	goto fail;
274	av_strlcat(stream_selection, tmp, mms->stream_num * 19 + 1);
275	}
276	// send play request
277	err = snprintf(headers, sizeof(headers),
278	"Accept: /\r\n"
279	USERAGENT
280	"Host: %s:%d\r\n"
281	"Pragma: no-cache,rate=1.000000,request-context=%u\r\n"
282	"Pragma: xPlayStrm=1\r\n"
283	CLIENTGUID
284	"Pragma: stream-switch-count=%d\r\n"
285	"Pragma: stream-switch-entry=%s\r\n"
286	"Pragma: no-cache,rate=1.000000,stream-time=%u"
287	"Connection: Close\r\n",
288	host, port, mmsh->request_seq++, mms->stream_num, stream_selection, timestamp);
289	av_freep(&stream_selection);
290	if (err < 0) {
291	av_log(NULL, AV_LOG_ERROR, "Build play request failed!\n");
292	goto fail;
293	}
294	av_dlog(NULL, "out_buffer is %s", headers);
295	av_opt_set(mms->mms_hd->priv_data, "headers", headers, 0);
296
297	err = ffurl_connect(mms->mms_hd, NULL);
298	if (err) {
299	goto fail;
300	}
301
302	err = get_http_header_data(mmsh);
303	if (err) {
304	av_log(NULL, AV_LOG_ERROR, "Get http header data failed!\n");
305	goto fail;
306	}
307
308	av_dlog(NULL, "Connection successfully open\n");
309	return 0;
310	fail:
311	av_freep(&stream_selection);
312	mmsh_close(h);
313	av_dlog(NULL, "Connection failed with error %d\n", err);
314	return err;
315	}
316
317	static int mmsh_open(URLContext h, const char uri, int flags)
318	{
319	return mmsh_open_internal(h, uri, flags, 0, 0);
320	}
321
322	static int handle_chunk_type(MMSHContext *mmsh)
323	{
324	MMSContext *mms = &mmsh->mms;
325	int res, len = 0;
326	ChunkType chunk_type;
327	chunk_type = get_chunk_header(mmsh, &len);
328
329	switch (chunk_type) {
330	case CHUNK_TYPE_END:
331	mmsh->chunk_seq = 0;
332	av_log(NULL, AV_LOG_ERROR, "Stream ended!\n");
333	return AVERROR(EIO);
334	case CHUNK_TYPE_STREAM_CHANGE:
335	mms->header_parsed = 0;
336	if (res = get_http_header_data(mmsh)) {
337	av_log(NULL, AV_LOG_ERROR,"Stream changed! Failed to get new header!\n");
338	return res;
339	}
340	break;
341	case CHUNK_TYPE_DATA:
342	return read_data_packet(mmsh, len);
343	default:
344	av_log(NULL, AV_LOG_ERROR, "Recv other type packet %d\n", chunk_type);
345	return AVERROR_INVALIDDATA;
346	}
347	return 0;
348	}
349
350	static int mmsh_read(URLContext h, uint8_t buf, int size)
351	{
352	int res = 0;
353	MMSHContext *mmsh = h->priv_data;
354	MMSContext *mms = &mmsh->mms;
355	do {
356	if (mms->asf_header_read_size < mms->asf_header_size) {
357	// copy asf header into buffer
358	res = ff_mms_read_header(mms, buf, size);
359	} else {
360	if (!mms->remaining_in_len && (res = handle_chunk_type(mmsh)))
361	return res;
362	res = ff_mms_read_data(mms, buf, size);
363	}
364	} while (!res);
365	return res;
366	}
367
368	static int64_t mmsh_read_seek(URLContext *h, int stream_index,
369	int64_t timestamp, int flags)
370	{
371	MMSHContext *mmsh_old = h->priv_data;
372	MMSHContext mmsh = av_mallocz(sizeof(mmsh));
373	int ret;
374
375	if (!mmsh)
376	return AVERROR(ENOMEM);
377
378	h->priv_data = mmsh;
379	ret= mmsh_open_internal(h, mmsh_old->location, 0, FFMAX(timestamp, 0), 0);
380	if(ret>=0){
381	h->priv_data = mmsh_old;
382	mmsh_close(h);
383	h->priv_data = mmsh;
384	av_free(mmsh_old);
385	mmsh->mms.asf_header_read_size = mmsh->mms.asf_header_size;
386	}else {
387	h->priv_data = mmsh_old;
388	av_free(mmsh);
389	}
390
391	return ret;
392	}
393
394	static int64_t mmsh_seek(URLContext *h, int64_t pos, int whence)
395	{
396	MMSHContext *mmsh = h->priv_data;
397	MMSContext *mms = &mmsh->mms;
398
399	if(pos == 0 && whence == SEEK_CUR)
400	return mms->asf_header_read_size + mms->remaining_in_len + mmsh->chunk_seq * (int64_t)mms->asf_packet_len;
401	return AVERROR(ENOSYS);
402	}
403
404	URLProtocol ff_mmsh_protocol = {
405	.name = "mmsh",
406	.url_open = mmsh_open,
407	.url_read = mmsh_read,
408	.url_seek = mmsh_seek,
409	.url_close = mmsh_close,
410	.url_read_seek = mmsh_read_seek,
411	.priv_data_size = sizeof(MMSHContext),
412	.flags = URL_PROTOCOL_FLAG_NETWORK,
413	};