Statistics
| Branch: | Revision:

ffmpeg / libavformat / mmst.c @ cbbb1081

History | View | Annotate | Download (25.7 KB)

1
/*
2
 * MMS protocol over TCP
3
 * Copyright (c) 2006,2007 Ryan Martell
4
 * Copyright (c) 2007 Bj?rn Axelsson
5
 * Copyright (c) 2010 Zhentan Feng <spyfeng at gmail dot com>
6
 *
7
 * This file is part of FFmpeg.
8
 *
9
 * FFmpeg is free software; you can redistribute it and/or
10
 * modify it under the terms of the GNU Lesser General Public
11
 * License as published by the Free Software Foundation; either
12
 * version 2.1 of the License, or (at your option) any later version.
13
 *
14
 * FFmpeg is distributed in the hope that it will be useful,
15
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17
 * Lesser General Public License for more details.
18
 *
19
 * You should have received a copy of the GNU Lesser General Public
20
 * License along with FFmpeg; if not, write to the Free Software
21
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22
 */
23
#include "avformat.h"
24
#include "internal.h"
25
#include "libavutil/intreadwrite.h"
26
#include "libavcodec/bytestream.h"
27
#include "network.h"
28
#include "asf.h"
29

    
30
#define LOCAL_ADDRESS 0xc0a80081    // FIXME get and use correct local ip address.
31
#define LOCAL_PORT    1037          // as above.
32
/** Client to server packet types. */
33
typedef enum {
34
    CS_PKT_INITIAL                  = 0x01,
35
    CS_PKT_PROTOCOL_SELECT          = 0x02,
36
    CS_PKT_MEDIA_FILE_REQUEST       = 0x05,
37
    CS_PKT_START_FROM_PKT_ID        = 0x07,
38
    CS_PKT_STREAM_PAUSE             = 0x09,
39
    CS_PKT_STREAM_CLOSE             = 0x0d,
40
    CS_PKT_MEDIA_HEADER_REQUEST     = 0x15,
41
    CS_PKT_TIMING_DATA_REQUEST      = 0x18,
42
    CS_PKT_USER_PASSWORD            = 0x1a,
43
    CS_PKT_KEEPALIVE                = 0x1b,
44
    CS_PKT_STREAM_ID_REQUEST        = 0x33,
45
} MMSCSPacketType;
46

    
47
/** Server to client packet types. */
48
typedef enum {
49
    /** Control packets. */
50
    /*@{*/
51
    SC_PKT_CLIENT_ACCEPTED          = 0x01,
52
    SC_PKT_PROTOCOL_ACCEPTED        = 0x02,
53
    SC_PKT_PROTOCOL_FAILED          = 0x03,
54
    SC_PKT_MEDIA_PKT_FOLLOWS        = 0x05,
55
    SC_PKT_MEDIA_FILE_DETAILS       = 0x06,
56
    SC_PKT_HEADER_REQUEST_ACCEPTED  = 0x11,
57
    SC_PKT_TIMING_TEST_REPLY        = 0x15,
58
    SC_PKT_PASSWORD_REQUIRED        = 0x1a,
59
    SC_PKT_KEEPALIVE                = 0x1b,
60
    SC_PKT_STREAM_STOPPED           = 0x1e,
61
    SC_PKT_STREAM_CHANGING          = 0x20,
62
    SC_PKT_STREAM_ID_ACCEPTED       = 0x21,
63
    /*@}*/
64

    
65
    /** Pseudo packets. */
66
    /*@{*/
67
    SC_PKT_CANCEL                   = -1,
68
    SC_PKT_NO_DATA                  = -2,
69
    /*@}*/
70

    
71
    /** Data packets. */
72
    /*@{*/
73
    SC_PKT_ASF_HEADER               = 0x010000,// make it bigger than 0xFF in case of
74
    SC_PKT_ASF_MEDIA                = 0x010001,// receiving false data packets.
75
    /*@}*/
76
} MMSSCPacketType;
77

    
78
typedef struct {
79
    int id;
80
}MMSStream;
81

    
82
typedef struct {
83
    int outgoing_packet_seq;             ///< Outgoing packet sequence number.
84
    char path[256];                      ///< Path of the resource being asked for.
85
    char host[128];                      ///< Host of the resources.
86

    
87
    URLContext *mms_hd;                  ///< TCP connection handle
88
    MMSStream streams[MAX_STREAMS];
89

    
90
    /** Buffer for outgoing packets. */
91
    /*@{*/
92
    uint8_t *write_out_ptr;              ///< Pointer for writting the buffer.
93
    uint8_t out_buffer[512];             ///< Buffer for outgoing packet.
94
    /*@}*/
95

    
96
    /** Buffer for incoming packets. */
97
    /*@{*/
98
    uint8_t in_buffer[8192];             ///< Buffer for incoming packets.
99
    uint8_t *read_in_ptr;                ///< Pointer for reading from incoming buffer.
100
    int remaining_in_len;                ///< Reading length from incoming buffer.
101
    /*@}*/
102

    
103
    int incoming_packet_seq;             ///< Incoming packet sequence number.
104
    int incoming_flags;                  ///< Incoming packet flags.
105

    
106
    int packet_id;                       ///< Identifier for packets in the current stream.
107
    unsigned int header_packet_id;       ///< default is 2.
108

    
109
    /** Internal handling of the ASF header */
110
    /*@{*/
111
    uint8_t *asf_header;                 ///< Stored ASF header.
112
    int asf_header_size;                 ///< Size of stored ASF header.
113
    int header_parsed;                   ///< The header has been received and parsed.
114
    int asf_packet_len;
115
    /*@}*/
116

    
117
    int stream_num;                      ///< stream numbers.
118
    int is_playing;
119
} MMSContext;
120

    
121
/** Create MMST command packet header */
122
static void start_command_packet(MMSContext *mms, MMSCSPacketType packet_type)
123
{
124
    mms->write_out_ptr = mms->out_buffer;
125

    
126
    bytestream_put_le32(&mms->write_out_ptr, 1); // start sequence
127
    bytestream_put_le32(&mms->write_out_ptr, 0xb00bface);
128
    bytestream_put_le32(&mms->write_out_ptr, 0); // Length starts from after the protocol type bytes
129
    bytestream_put_le32(&mms->write_out_ptr, MKTAG('M','M','S',' '));
130
    bytestream_put_le32(&mms->write_out_ptr, 0);
131
    bytestream_put_le32(&mms->write_out_ptr, mms->outgoing_packet_seq++);
132
    bytestream_put_le64(&mms->write_out_ptr, 0); // timestamp
133
    bytestream_put_le32(&mms->write_out_ptr, 0);
134
    bytestream_put_le16(&mms->write_out_ptr, packet_type);
135
    bytestream_put_le16(&mms->write_out_ptr, 3); // direction to server
136
}
137

    
138
/** Add prefixes to MMST command packet. */
139
static void insert_command_prefixes(MMSContext *mms,
140
        uint32_t prefix1, uint32_t prefix2)
141
{
142
    bytestream_put_le32(&mms->write_out_ptr, prefix1); // first prefix
143
    bytestream_put_le32(&mms->write_out_ptr, prefix2); // second prefix
144
}
145

    
146
/** Send a prepared MMST command packet. */
147
static int send_command_packet(MMSContext *mms)
148
{
149
    int len= mms->write_out_ptr - mms->out_buffer;
150
    int exact_length = (len + 7) & ~7;
151
    int first_length= exact_length - 16;
152
    int len8= first_length/8;
153
    int write_result;
154

    
155
    // update packet length fields.
156
    AV_WL32(mms->out_buffer + 8, first_length);
157
    AV_WL32(mms->out_buffer + 16, len8);
158
    AV_WL32(mms->out_buffer + 32, len8-2);
159
    memset(mms->write_out_ptr, 0, exact_length - len);
160

    
161
    // write it out.
162
    write_result= url_write(mms->mms_hd, mms->out_buffer, exact_length);
163
    if(write_result != exact_length) {
164
        dprintf(NULL, "url_write returned: %d != %d\n",
165
                write_result, exact_length);
166
        return AVERROR_IO;
167
    }
168

    
169
    return 0;
170
}
171

    
172
static void mms_put_utf16(MMSContext *mms, uint8_t *src)
173
{
174
    ByteIOContext bic;
175
    int size = mms->write_out_ptr - mms->out_buffer;
176
    int len;
177
    init_put_byte(&bic, mms->write_out_ptr,
178
            sizeof(mms->out_buffer) - size, 1, NULL, NULL, NULL, NULL);
179

    
180
    len = ff_put_str16_nolen(&bic, src);
181
    mms->write_out_ptr += len;
182
}
183

    
184
static int send_time_test_data(MMSContext *mms)
185
{
186
    start_command_packet(mms, CS_PKT_TIMING_DATA_REQUEST);
187
    insert_command_prefixes(mms, 0xf0f0f0f1, 0x0004000b);
188
    return send_command_packet(mms);
189
}
190

    
191
static int send_protocol_select(MMSContext *mms)
192
{
193
    char data_string[256];
194

    
195
    start_command_packet(mms, CS_PKT_PROTOCOL_SELECT);
196
    insert_command_prefixes(mms, 0, 0xffffffff);
197
    bytestream_put_le32(&mms->write_out_ptr, 0);          // maxFunnelBytes
198
    bytestream_put_le32(&mms->write_out_ptr, 0x00989680); // maxbitRate
199
    bytestream_put_le32(&mms->write_out_ptr, 2);          // funnelMode
200
    snprintf(data_string, sizeof(data_string), "\\\\%d.%d.%d.%d\\%s\\%d",
201
            (LOCAL_ADDRESS>>24)&0xff,
202
            (LOCAL_ADDRESS>>16)&0xff,
203
            (LOCAL_ADDRESS>>8)&0xff,
204
            LOCAL_ADDRESS&0xff,
205
            "TCP",                                        // or UDP
206
            LOCAL_PORT);
207

    
208
    mms_put_utf16(mms, data_string);
209
    return send_command_packet(mms);
210
}
211

    
212
static int send_media_file_request(MMSContext *mms)
213
{
214
    start_command_packet(mms, CS_PKT_MEDIA_FILE_REQUEST);
215
    insert_command_prefixes(mms, 1, 0xffffffff);
216
    bytestream_put_le32(&mms->write_out_ptr, 0);
217
    bytestream_put_le32(&mms->write_out_ptr, 0);
218
    mms_put_utf16(mms, mms->path + 1); // +1 for skip "/"
219

    
220
    return send_command_packet(mms);
221
}
222

    
223
static void handle_packet_stream_changing_type(MMSContext *mms)
224
{
225
    dprintf(NULL, "Stream changing!\n");
226

    
227
    // 40 is the packet header size, 7 is the prefix size.
228
    mms->header_packet_id= AV_RL32(mms->in_buffer + 40 + 7);
229
    dprintf(NULL, "Changed header prefix to 0x%x", mms->header_packet_id);
230
}
231

    
232
static int send_keepalive_packet(MMSContext *mms)
233
{
234
    // respond to a keepalive with a keepalive...
235
    start_command_packet(mms, CS_PKT_KEEPALIVE);
236
    insert_command_prefixes(mms, 1, 0x100FFFF);
237
    return send_command_packet(mms);
238
}
239

    
240
/** Pad media packets smaller than max_packet_size and/or adjust read position
241
  * after a seek. */
242
static void pad_media_packet(MMSContext *mms)
243
{
244
    if(mms->remaining_in_len<mms->asf_packet_len) {
245
        int padding_size = mms->asf_packet_len - mms->remaining_in_len;
246
        memset(mms->in_buffer + mms->remaining_in_len, 0, padding_size);
247
        mms->remaining_in_len += padding_size;
248
    }
249
}
250

    
251
/** Read incoming MMST media, header or command packet. */
252
static MMSSCPacketType get_tcp_server_response(MMSContext *mms)
253
{
254
    int read_result;
255
    MMSSCPacketType packet_type= -1;
256

    
257
    for(;;) {
258
        if((read_result= url_read_complete(mms->mms_hd, mms->in_buffer, 8))==8) {
259
            // handle command packet.
260
            if(AV_RL32(mms->in_buffer + 4)==0xb00bface) {
261
                mms->incoming_flags= mms->in_buffer[3];
262
                read_result= url_read_complete(mms->mms_hd, mms->in_buffer+8, 4);
263
                if(read_result == 4) {
264
                    int length_remaining= AV_RL32(mms->in_buffer+8) + 4;
265
                    int hr;
266

    
267
                    dprintf(NULL, "Length remaining is %d\n", length_remaining);
268
                    // read the rest of the packet.
269
                    if (length_remaining < 0
270
                        || length_remaining > sizeof(mms->in_buffer) - 12) {
271
                        dprintf(NULL, "Incoming message len %d exceeds buffer len %d\n",
272
                            length_remaining, sizeof(mms->in_buffer) - 12);
273
                        return -1;
274
                    }
275
                    read_result = url_read_complete(mms->mms_hd, mms->in_buffer + 12,
276
                                                  length_remaining) ;
277
                    if (read_result == length_remaining) {
278
                        packet_type= AV_RL16(mms->in_buffer+36);
279
                    } else {
280
                        dprintf(NULL, "read for packet type failed%d!\n", read_result);
281
                        return -1;
282
                    }
283
                    hr = AV_RL32(mms->in_buffer + 40);
284
                    if (hr) {
285
                        dprintf(NULL, "The server side send back error code:0x%x\n", hr);
286
                        return -1;
287
                    }
288
                } else {
289
                    dprintf(NULL, "read for length remaining failed%d!\n", read_result);
290
                    return -1;
291
                }
292
            } else {
293
                int length_remaining;
294
                int packet_id_type;
295
                int tmp;
296

    
297
                assert(mms->remaining_in_len==0);
298

    
299
                // note we cache the first 8 bytes,
300
                // then fill up the buffer with the others
301
                tmp                       = AV_RL16(mms->in_buffer + 6);
302
                length_remaining          = (tmp - 8) & 0xffff;
303
                mms->incoming_packet_seq  = AV_RL32(mms->in_buffer);
304
                packet_id_type            = mms->in_buffer[4];
305
                mms->incoming_flags       = mms->in_buffer[5];
306

    
307
                if (length_remaining < 0
308
                        || length_remaining > sizeof(mms->in_buffer) - 8) {
309
                    dprintf(NULL, "Incoming data len %d exceeds buffer len %d\n",
310
                            length_remaining, sizeof(mms->in_buffer));
311
                    return -1;
312
                }
313
                mms->remaining_in_len    = length_remaining;
314
                mms->read_in_ptr         = mms->in_buffer;
315
                read_result= url_read_complete(mms->mms_hd, mms->in_buffer, length_remaining);
316
                if(read_result != length_remaining) {
317
                    dprintf(NULL, "read_bytes result: %d asking for %d\n",
318
                            read_result, length_remaining);
319
                    return -1;
320
                } else {
321
                    // if we successfully read everything.
322
                    if(packet_id_type == mms->header_packet_id) {
323
                        packet_type = SC_PKT_ASF_HEADER;
324
                        // Store the asf header
325
                        if(!mms->header_parsed) {
326
                            void *p = av_realloc(mms->asf_header,
327
                                              mms->asf_header_size
328
                                              + mms->remaining_in_len);
329
                            if (!p) {
330
                                av_freep(&mms->asf_header);
331
                                return AVERROR(ENOMEM);
332
                            }
333
                            mms->asf_header = p;
334
                            memcpy(mms->asf_header + mms->asf_header_size,
335
                                                 mms->read_in_ptr,
336
                                                 mms->remaining_in_len);
337
                            mms->asf_header_size += mms->remaining_in_len;
338
                        }
339
                    } else if(packet_id_type == mms->packet_id) {
340
                        packet_type = SC_PKT_ASF_MEDIA;
341
                    } else {
342
                        dprintf(NULL, "packet id type %d is old.", packet_id_type);
343
                        continue;
344
                    }
345
                }
346
            }
347

    
348
            // preprocess some packet type
349
            if(packet_type == SC_PKT_KEEPALIVE) {
350
                send_keepalive_packet(mms);
351
                continue;
352
            } else if(packet_type == SC_PKT_STREAM_CHANGING) {
353
                handle_packet_stream_changing_type(mms);
354
            } else if(packet_type == SC_PKT_ASF_MEDIA) {
355
                pad_media_packet(mms);
356
            }
357
            return packet_type;
358
        } else {
359
            if(read_result<0) {
360
                dprintf(NULL, "Read error (or cancelled) returned %d!\n", read_result);
361
                packet_type = SC_PKT_CANCEL;
362
            } else {
363
                dprintf(NULL, "Read result of zero?!\n");
364
                packet_type = SC_PKT_NO_DATA;
365
            }
366
            return packet_type;
367
        }
368
    }
369
}
370

    
371
static int mms_safe_send_recv(MMSContext *mms,
372
                              int (*send_fun)(MMSContext *mms),
373
                              const MMSSCPacketType expect_type)
374
{
375
    MMSSCPacketType type;
376
    if(send_fun) {
377
        int ret = send_fun(mms);
378
        if (ret < 0) {
379
            dprintf(NULL, "Send Packet error before expecting recv packet %d\n", expect_type);
380
            return ret;
381
        }
382
    }
383

    
384
    if ((type = get_tcp_server_response(mms)) != expect_type) {
385
        dprintf(NULL,"Unexpected packet type %d with type %d\n", type, expect_type);
386
        return -1;
387
    } else {
388
        return 0;
389
    }
390
}
391

    
392
static int send_media_header_request(MMSContext *mms)
393
{
394
    start_command_packet(mms, CS_PKT_MEDIA_HEADER_REQUEST);
395
    insert_command_prefixes(mms, 1, 0);
396
    bytestream_put_le32(&mms->write_out_ptr, 0);
397
    bytestream_put_le32(&mms->write_out_ptr, 0x00800000);
398
    bytestream_put_le32(&mms->write_out_ptr, 0xffffffff);
399
    bytestream_put_le32(&mms->write_out_ptr, 0);
400
    bytestream_put_le32(&mms->write_out_ptr, 0);
401
    bytestream_put_le32(&mms->write_out_ptr, 0);
402

    
403
    // the media preroll value in milliseconds?
404
    bytestream_put_le32(&mms->write_out_ptr, 0);
405
    bytestream_put_le32(&mms->write_out_ptr, 0x40AC2000);
406
    bytestream_put_le32(&mms->write_out_ptr, 2);
407
    bytestream_put_le32(&mms->write_out_ptr, 0);
408

    
409
    return send_command_packet(mms);
410
}
411

    
412
/** Send the initial handshake. */
413
static int send_startup_packet(MMSContext *mms)
414
{
415
    char data_string[256];
416
    // SubscriberName is defined in MS specification linked below.
417
    // The guid value can be any valid value.
418
    // http://download.microsoft.com/
419
    // download/9/5/E/95EF66AF-9026-4BB0-A41D-A4F81802D92C/%5BMS-WMSP%5D.pdf
420
    snprintf(data_string, sizeof(data_string),
421
            "NSPlayer/7.0.0.1956; {%s}; Host: %s",
422
            "7E667F5D-A661-495E-A512-F55686DDA178", mms->host);
423

    
424
    start_command_packet(mms, CS_PKT_INITIAL);
425
    insert_command_prefixes(mms, 0, 0x0004000b);
426
    bytestream_put_le32(&mms->write_out_ptr, 0x0003001c);
427
    mms_put_utf16(mms, data_string);
428
    return send_command_packet(mms);
429
}
430

    
431
static int asf_header_parser(MMSContext *mms)
432
{
433
    uint8_t *p = mms->asf_header;
434
    uint8_t *end;
435
    int flags, stream_id, real_header_size;
436
    mms->stream_num = 0;
437

    
438
    if (mms->asf_header_size < sizeof(ff_asf_guid) * 2 + 22 ||
439
        memcmp(p, ff_asf_header, sizeof(ff_asf_guid)))
440
        return -1;
441

    
442
    real_header_size = AV_RL64(p + sizeof(ff_asf_guid));
443
    end = mms->asf_header + real_header_size;
444

    
445
    p += sizeof(ff_asf_guid) + 14;
446
    while(end - p >= sizeof(ff_asf_guid) + 8) {
447
        uint64_t chunksize = AV_RL64(p + sizeof(ff_asf_guid));
448
        if (!chunksize || chunksize > end - p) {
449
            dprintf(NULL, "chunksize is exceptional value:%"PRId64"!\n", chunksize);
450
            return -1;
451
        }
452
        if (!memcmp(p, ff_asf_file_header, sizeof(ff_asf_guid))) {
453
            /* read packet size */
454
            if (end - p > sizeof(ff_asf_guid) * 2 + 68) {
455
                mms->asf_packet_len = AV_RL32(p + sizeof(ff_asf_guid) * 2 + 64);
456
                if (mms->asf_packet_len <= 0 || mms->asf_packet_len > sizeof(mms->in_buffer)) {
457
                    dprintf(NULL,"Too large packet len:%d"
458
                        " may overwrite in_buffer when padding", mms->asf_packet_len);
459
                    return -1;
460
                }
461
            }
462
        } else if (!memcmp(p, ff_asf_stream_header, sizeof(ff_asf_guid))) {
463
            flags     = AV_RL16(p + sizeof(ff_asf_guid)*3 + 24);
464
            stream_id = flags & 0x7F;
465
            //The second condition is for checking CS_PKT_STREAM_ID_REQUEST packet size,
466
            //we can calcuate the packet size by stream_num.
467
            //Please see function send_stream_selection_request().
468
            if (mms->stream_num < MAX_STREAMS &&
469
                    46 + mms->stream_num * 6 < sizeof(mms->out_buffer)) {
470
                mms->streams[mms->stream_num].id = stream_id;
471
                mms->stream_num++;
472
            } else {
473
                dprintf(NULL, "Too many streams.\n");
474
                return -1;
475
            }
476
        }
477
        p += chunksize;
478
    }
479

    
480
    return 0;
481
}
482

    
483
/** Send MMST stream selection command based on the AVStream->discard values. */
484
static int send_stream_selection_request(MMSContext *mms)
485
{
486
    int i;
487

    
488
    //  send the streams we want back...
489
    start_command_packet(mms, CS_PKT_STREAM_ID_REQUEST);
490
    bytestream_put_le32(&mms->write_out_ptr, mms->stream_num);         // stream nums
491
    for(i= 0; i<mms->stream_num; i++) {
492
        bytestream_put_le16(&mms->write_out_ptr, 0xffff);              // flags
493
        bytestream_put_le16(&mms->write_out_ptr, mms->streams[i].id);  // stream id
494
        bytestream_put_le16(&mms->write_out_ptr, 0);                   // selection
495
    }
496
    return send_command_packet(mms);
497
}
498

    
499
static int read_data(MMSContext *mms, uint8_t *buf, const int buf_size)
500
{
501
    int read_size;
502
    read_size = FFMIN(buf_size, mms->remaining_in_len);
503
    memcpy(buf, mms->read_in_ptr, read_size);
504
    mms->remaining_in_len -= read_size;
505
    mms->read_in_ptr      += read_size;
506
    return read_size;
507
}
508

    
509
/** Read at most one media packet (or a whole header). */
510
static int read_mms_packet(MMSContext *mms, uint8_t *buf, int buf_size)
511
{
512
    int result = 0, read_header_size = 0;
513
    int size_to_copy;
514

    
515
    do {
516
        if(read_header_size < mms->asf_header_size && !mms->is_playing) {
517
            /* Read from ASF header buffer */
518
            size_to_copy= FFMIN(buf_size,
519
                                mms->asf_header_size - read_header_size);
520
            memcpy(buf, mms->asf_header + read_header_size, size_to_copy);
521
            read_header_size += size_to_copy;
522
            result += size_to_copy;
523
            dprintf(NULL, "Copied %d bytes from stored header. left: %d\n",
524
                   size_to_copy, mms->asf_header_size - read_header_size);
525
            if (mms->asf_header_size == read_header_size) {
526
                av_freep(&mms->asf_header);
527
                mms->is_playing = 1;
528
            }
529
        } else if(mms->remaining_in_len) {
530
            /* Read remaining packet data to buffer.
531
             * the result can not be zero because remaining_in_len is positive.*/
532
            result = read_data(mms, buf, buf_size);
533
        } else {
534
            /* Read from network */
535
            int err = mms_safe_send_recv(mms, NULL, SC_PKT_ASF_MEDIA);
536
            if (err == 0) {
537
                if(mms->remaining_in_len>mms->asf_packet_len) {
538
                    dprintf(NULL, "Incoming packet"
539
                            "larger than the asf packet size stated (%d>%d)\n",
540
                            mms->remaining_in_len, mms->asf_packet_len);
541
                    result= AVERROR_IO;
542
                } else {
543
                    // copy the data to the packet buffer.
544
                    result = read_data(mms, buf, buf_size);
545
                    if (result == 0) {
546
                        dprintf(NULL, "read asf media paket size is zero!\n");
547
                        break;
548
                    }
549
                }
550
            } else {
551
                dprintf(NULL, "read packet error!\n");
552
                break;
553
            }
554
        }
555
    } while(!result); // only return one packet.
556
    return result;
557
}
558

    
559
static int send_close_packet(MMSContext *mms)
560
{
561
    start_command_packet(mms, CS_PKT_STREAM_CLOSE);
562
    insert_command_prefixes(mms, 1, 1);
563

    
564
    return send_command_packet(mms);
565
}
566

    
567
/** Close the MMSH/MMST connection */
568
static int mms_close(URLContext *h)
569
{
570
    MMSContext *mms = (MMSContext *)h->priv_data;
571

    
572
    if(mms->mms_hd) {
573
        send_close_packet(mms);
574
        url_close(mms->mms_hd);
575
    }
576

    
577
    /* free all separately allocated pointers in mms */
578
    av_free(mms->asf_header);
579
    av_freep(&h->priv_data);
580

    
581
    return 0;
582
}
583

    
584
static int mms_open(URLContext *h, const char *uri, int flags)
585
{
586
    MMSContext *mms;
587
    int port, err;
588
    char tcpname[256];
589

    
590
    h->is_streamed = 1;
591
    mms = h->priv_data = av_mallocz(sizeof(MMSContext));
592
    if (!h->priv_data)
593
        return AVERROR(ENOMEM);
594

    
595
    // only for MMS over TCP, so set proto = NULL
596
    av_url_split(NULL, 0, NULL, 0,
597
            mms->host, sizeof(mms->host), &port, mms->path,
598
            sizeof(mms->path), uri);
599

    
600
    if(port<0)
601
        port = 1755; // defaut mms protocol port
602

    
603
    // establish tcp connection.
604
    ff_url_join(tcpname, sizeof(tcpname), "tcp", NULL, mms->host, port, NULL);
605
    err = url_open(&mms->mms_hd, tcpname, URL_RDWR);
606
    if (err)
607
        goto fail;
608

    
609
    mms->packet_id        = 3;          // default, initial value.
610
    mms->header_packet_id = 2;          // default, initial value.
611
    err = mms_safe_send_recv(mms, send_startup_packet, SC_PKT_CLIENT_ACCEPTED);
612
    if (err)
613
        goto fail;
614
    err = mms_safe_send_recv(mms, send_time_test_data, SC_PKT_TIMING_TEST_REPLY);
615
    if (err)
616
        goto fail;
617
    err = mms_safe_send_recv(mms, send_protocol_select, SC_PKT_PROTOCOL_ACCEPTED);
618
    if (err)
619
        goto fail;
620
    err = mms_safe_send_recv(mms, send_media_file_request, SC_PKT_MEDIA_FILE_DETAILS);
621
    if (err)
622
        goto fail;
623
    err = mms_safe_send_recv(mms, send_media_header_request, SC_PKT_HEADER_REQUEST_ACCEPTED);
624
    if (err)
625
        goto fail;
626
    err = mms_safe_send_recv(mms, NULL, SC_PKT_ASF_HEADER);
627
    if (err)
628
        goto fail;
629
    if((mms->incoming_flags != 0X08) && (mms->incoming_flags != 0X0C))
630
        goto fail;
631
    err = asf_header_parser(mms);
632
    if (err) {
633
        dprintf(NULL, "asf header parsed failed!\n");
634
        goto fail;
635
    }
636
    mms->header_parsed = 1;
637

    
638
    if (!mms->asf_packet_len || !mms->stream_num)
639
        goto fail;
640

    
641
    dprintf(NULL, "Leaving open (success)\n");
642
    return 0;
643
fail:
644
    mms_close(h);
645
    dprintf(NULL, "Leaving open (failure: %d)\n", err);
646
    return err;
647
}
648

    
649
static int send_media_packet_request(MMSContext *mms)
650
{
651
    start_command_packet(mms, CS_PKT_START_FROM_PKT_ID);
652
    insert_command_prefixes(mms, 1, 0x0001FFFF);
653
    bytestream_put_le64(&mms->write_out_ptr, 0);          // seek timestamp
654
    bytestream_put_le32(&mms->write_out_ptr, 0xffffffff); // unknown
655
    bytestream_put_le32(&mms->write_out_ptr, 0xffffffff); // packet offset
656
    bytestream_put_byte(&mms->write_out_ptr, 0xff);       // max stream time limit
657
    bytestream_put_byte(&mms->write_out_ptr, 0xff);       // max stream time limit
658
    bytestream_put_byte(&mms->write_out_ptr, 0xff);       // max stream time limit
659
    bytestream_put_byte(&mms->write_out_ptr, 0x00);       // stream time limit flag
660

    
661
    mms->packet_id++;                                     // new packet_id
662
    bytestream_put_le32(&mms->write_out_ptr, mms->packet_id);
663
    return send_command_packet(mms);
664
}
665

    
666

    
667
static void clear_stream_buffers(MMSContext *mms)
668
{
669
    mms->remaining_in_len = 0;
670
    mms->read_in_ptr      = mms->in_buffer;
671
}
672

    
673
/** Read ASF data through the protocol. */
674
static int mms_read(URLContext *h, uint8_t *buf, int size)
675
{
676
    /* TODO: see tcp.c:tcp_read() about a possible timeout scheme */
677
    MMSContext *mms = h->priv_data;
678
    int result = 0;
679

    
680
    /* Since we read the header at open(), this shouldn't be possible */
681
    assert(mms->header_parsed);
682

    
683
    if (!mms->is_playing) {
684
        dprintf(NULL, "mms_read() before play().\n");
685
        clear_stream_buffers(mms);
686
        result = mms_safe_send_recv(mms, send_stream_selection_request, SC_PKT_STREAM_ID_ACCEPTED);
687
        if (result)
688
            return result;
689
        // send media packet request
690
        result = mms_safe_send_recv(mms, send_media_packet_request, SC_PKT_MEDIA_PKT_FOLLOWS);
691
        if (result) {
692
            return result;
693
        }
694
    }
695
    return read_mms_packet(mms, buf, size);
696
}
697

    
698
URLProtocol mmst_protocol = {
699
    "mmst",
700
    mms_open,
701
    mms_read,
702
    NULL, // write
703
    NULL, // seek
704
    mms_close,
705
};