Statistics
| Branch: | Revision:

ffmpeg / libavformat / rtmpproto.c @ 31da5966

History | View | Annotate | Download (23.3 KB)

1
/*
2
 * RTMP network protocol
3
 * Copyright (c) 2009 Kostya Shishkov
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 libavformat/rtmpproto.c
24
 * RTMP protocol
25
 */
26

    
27
#include "libavcodec/bytestream.h"
28
#include "libavutil/avstring.h"
29
#include "libavutil/lfg.h"
30
#include "libavutil/sha.h"
31
#include "avformat.h"
32

    
33
#include "network.h"
34

    
35
#include "flv.h"
36
#include "rtmp.h"
37
#include "rtmppkt.h"
38

    
39
/* we can't use av_log() with URLContext yet... */
40
#if LIBAVFORMAT_VERSION_MAJOR < 53
41
#define LOG_CONTEXT NULL
42
#else
43
#define LOG_CONTEXT s
44
#endif
45

    
46
/** RTMP protocol handler state */
47
typedef enum {
48
    STATE_START,      ///< client has not done anything yet
49
    STATE_HANDSHAKED, ///< client has performed handshake
50
    STATE_CONNECTING, ///< client connected to server successfully
51
    STATE_READY,      ///< client has sent all needed commands and waits for server reply
52
    STATE_PLAYING,    ///< client has started receiving multimedia data from server
53
} ClientState;
54

    
55
/** protocol handler context */
56
typedef struct RTMPContext {
57
    URLContext*   stream;                     ///< TCP stream used in interactions with RTMP server
58
    RTMPPacket    prev_pkt[2][RTMP_CHANNELS]; ///< packet history used when reading and sending packets
59
    int           chunk_size;                 ///< size of the chunks RTMP packets are divided into
60
    int           is_input;                   ///< input/output flag
61
    char          playpath[256];              ///< path to filename to play (with possible "mp4:" prefix)
62
    char          app[128];                   ///< application
63
    ClientState   state;                      ///< current state
64
    int           main_channel_id;            ///< an additional channel ID which is used for some invocations
65
    uint8_t*      flv_data;                   ///< buffer with data for demuxer
66
    int           flv_size;                   ///< current buffer size
67
    int           flv_off;                    ///< number of bytes read from current buffer
68
} RTMPContext;
69

    
70
#define PLAYER_KEY_OPEN_PART_LEN 30   ///< length of partial key used for first client digest signing
71
/** Client key used for digest signing */
72
static const uint8_t rtmp_player_key[] = {
73
    'G', 'e', 'n', 'u', 'i', 'n', 'e', ' ', 'A', 'd', 'o', 'b', 'e', ' ',
74
    'F', 'l', 'a', 's', 'h', ' ', 'P', 'l', 'a', 'y', 'e', 'r', ' ', '0', '0', '1',
75

    
76
    0xF0, 0xEE, 0xC2, 0x4A, 0x80, 0x68, 0xBE, 0xE8, 0x2E, 0x00, 0xD0, 0xD1, 0x02,
77
    0x9E, 0x7E, 0x57, 0x6E, 0xEC, 0x5D, 0x2D, 0x29, 0x80, 0x6F, 0xAB, 0x93, 0xB8,
78
    0xE6, 0x36, 0xCF, 0xEB, 0x31, 0xAE
79
};
80

    
81
#define SERVER_KEY_OPEN_PART_LEN 36   ///< length of partial key used for first server digest signing
82
/** Key used for RTMP server digest signing */
83
static const uint8_t rtmp_server_key[] = {
84
    'G', 'e', 'n', 'u', 'i', 'n', 'e', ' ', 'A', 'd', 'o', 'b', 'e', ' ',
85
    'F', 'l', 'a', 's', 'h', ' ', 'M', 'e', 'd', 'i', 'a', ' ',
86
    'S', 'e', 'r', 'v', 'e', 'r', ' ', '0', '0', '1',
87

    
88
    0xF0, 0xEE, 0xC2, 0x4A, 0x80, 0x68, 0xBE, 0xE8, 0x2E, 0x00, 0xD0, 0xD1, 0x02,
89
    0x9E, 0x7E, 0x57, 0x6E, 0xEC, 0x5D, 0x2D, 0x29, 0x80, 0x6F, 0xAB, 0x93, 0xB8,
90
    0xE6, 0x36, 0xCF, 0xEB, 0x31, 0xAE
91
};
92

    
93
/**
94
 * Generates 'connect' call and sends it to the server.
95
 */
96
static void gen_connect(URLContext *s, RTMPContext *rt, const char *proto,
97
                        const char *host, int port)
98
{
99
    RTMPPacket pkt;
100
    uint8_t ver[32], *p;
101
    char tcurl[512];
102

    
103
    ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0, 4096);
104
    p = pkt.data;
105

    
106
    snprintf(tcurl, sizeof(tcurl), "%s://%s:%d/%s", proto, host, port, rt->app);
107
    ff_amf_write_string(&p, "connect");
108
    ff_amf_write_number(&p, 1.0);
109
    ff_amf_write_object_start(&p);
110
    ff_amf_write_field_name(&p, "app");
111
    ff_amf_write_string(&p, rt->app);
112

    
113
    snprintf(ver, sizeof(ver), "%s %d,%d,%d,%d", RTMP_CLIENT_PLATFORM, RTMP_CLIENT_VER1,
114
             RTMP_CLIENT_VER2, RTMP_CLIENT_VER3, RTMP_CLIENT_VER4);
115
    ff_amf_write_field_name(&p, "flashVer");
116
    ff_amf_write_string(&p, ver);
117
    ff_amf_write_field_name(&p, "tcUrl");
118
    ff_amf_write_string(&p, tcurl);
119
    ff_amf_write_field_name(&p, "fpad");
120
    ff_amf_write_bool(&p, 0);
121
    ff_amf_write_field_name(&p, "capabilities");
122
    ff_amf_write_number(&p, 15.0);
123
    ff_amf_write_field_name(&p, "audioCodecs");
124
    ff_amf_write_number(&p, 1639.0);
125
    ff_amf_write_field_name(&p, "videoCodecs");
126
    ff_amf_write_number(&p, 252.0);
127
    ff_amf_write_field_name(&p, "videoFunction");
128
    ff_amf_write_number(&p, 1.0);
129
    ff_amf_write_object_end(&p);
130

    
131
    pkt.data_size = p - pkt.data;
132

    
133
    ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
134
}
135

    
136
/**
137
 * Generates 'createStream' call and sends it to the server. It should make
138
 * the server allocate some channel for media streams.
139
 */
140
static void gen_create_stream(URLContext *s, RTMPContext *rt)
141
{
142
    RTMPPacket pkt;
143
    uint8_t *p;
144

    
145
    av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Creating stream...\n");
146
    ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0, 25);
147

    
148
    p = pkt.data;
149
    ff_amf_write_string(&p, "createStream");
150
    ff_amf_write_number(&p, 3.0);
151
    ff_amf_write_null(&p);
152

    
153
    ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
154
    ff_rtmp_packet_destroy(&pkt);
155
}
156

    
157
/**
158
 * Generates 'play' call and sends it to the server, then pings the server
159
 * to start actual playing.
160
 */
161
static void gen_play(URLContext *s, RTMPContext *rt)
162
{
163
    RTMPPacket pkt;
164
    uint8_t *p;
165

    
166
    av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Sending play command for '%s'\n", rt->playpath);
167
    ff_rtmp_packet_create(&pkt, RTMP_VIDEO_CHANNEL, RTMP_PT_INVOKE, 0,
168
                          20 + strlen(rt->playpath));
169
    pkt.extra = rt->main_channel_id;
170

    
171
    p = pkt.data;
172
    ff_amf_write_string(&p, "play");
173
    ff_amf_write_number(&p, 0.0);
174
    ff_amf_write_null(&p);
175
    ff_amf_write_string(&p, rt->playpath);
176

    
177
    ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
178
    ff_rtmp_packet_destroy(&pkt);
179

    
180
    // set client buffer time disguised in ping packet
181
    ff_rtmp_packet_create(&pkt, RTMP_NETWORK_CHANNEL, RTMP_PT_PING, 1, 10);
182

    
183
    p = pkt.data;
184
    bytestream_put_be16(&p, 3);
185
    bytestream_put_be32(&p, 1);
186
    bytestream_put_be32(&p, 256); //TODO: what is a good value here?
187

    
188
    ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
189
    ff_rtmp_packet_destroy(&pkt);
190
}
191

    
192
/**
193
 * Generates ping reply and sends it to the server.
194
 */
195
static void gen_pong(URLContext *s, RTMPContext *rt, RTMPPacket *ppkt)
196
{
197
    RTMPPacket pkt;
198
    uint8_t *p;
199

    
200
    ff_rtmp_packet_create(&pkt, RTMP_NETWORK_CHANNEL, RTMP_PT_PING, ppkt->timestamp + 1, 6);
201
    p = pkt.data;
202
    bytestream_put_be16(&p, 7);
203
    bytestream_put_be32(&p, AV_RB32(ppkt->data+2) + 1);
204
    ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
205
    ff_rtmp_packet_destroy(&pkt);
206
}
207

    
208
//TODO: Move HMAC code somewhere. Eventually.
209
#define HMAC_IPAD_VAL 0x36
210
#define HMAC_OPAD_VAL 0x5C
211

    
212
/**
213
 * Calculates HMAC-SHA2 digest for RTMP handshake packets.
214
 *
215
 * @param src    input buffer
216
 * @param len    input buffer length (should be 1536)
217
 * @param gap    offset in buffer where 32 bytes should not be taken into account
218
 *               when calculating digest (since it will be used to store that digest)
219
 * @param key    digest key
220
 * @param keylen digest key length
221
 * @param dst    buffer where calculated digest will be stored (32 bytes)
222
 */
223
static void rtmp_calc_digest(const uint8_t *src, int len, int gap,
224
                             const uint8_t *key, int keylen, uint8_t *dst)
225
{
226
    struct AVSHA *sha;
227
    uint8_t hmac_buf[64+32] = {0};
228
    int i;
229

    
230
    sha = av_mallocz(av_sha_size);
231

    
232
    if (keylen < 64) {
233
        memcpy(hmac_buf, key, keylen);
234
    } else {
235
        av_sha_init(sha, 256);
236
        av_sha_update(sha,key, keylen);
237
        av_sha_final(sha, hmac_buf);
238
    }
239
    for (i = 0; i < 64; i++)
240
        hmac_buf[i] ^= HMAC_IPAD_VAL;
241

    
242
    av_sha_init(sha, 256);
243
    av_sha_update(sha, hmac_buf, 64);
244
    if (gap <= 0) {
245
        av_sha_update(sha, src, len);
246
    } else { //skip 32 bytes used for storing digest
247
        av_sha_update(sha, src, gap);
248
        av_sha_update(sha, src + gap + 32, len - gap - 32);
249
    }
250
    av_sha_final(sha, hmac_buf + 64);
251

    
252
    for (i = 0; i < 64; i++)
253
        hmac_buf[i] ^= HMAC_IPAD_VAL ^ HMAC_OPAD_VAL; //reuse XORed key for opad
254
    av_sha_init(sha, 256);
255
    av_sha_update(sha, hmac_buf, 64+32);
256
    av_sha_final(sha, dst);
257

    
258
    av_free(sha);
259
}
260

    
261
/**
262
 * Puts HMAC-SHA2 digest of packet data (except for the bytes where this digest
263
 * will be stored) into that packet.
264
 *
265
 * @param buf handshake data (1536 bytes)
266
 * @return offset to the digest inside input data
267
 */
268
static int rtmp_handshake_imprint_with_digest(uint8_t *buf)
269
{
270
    int i, digest_pos = 0;
271

    
272
    for (i = 8; i < 12; i++)
273
        digest_pos += buf[i];
274
    digest_pos = (digest_pos % 728) + 12;
275

    
276
    rtmp_calc_digest(buf, RTMP_HANDSHAKE_PACKET_SIZE, digest_pos,
277
                     rtmp_player_key, PLAYER_KEY_OPEN_PART_LEN,
278
                     buf + digest_pos);
279
    return digest_pos;
280
}
281

    
282
/**
283
 * Verifies that the received server response has the expected digest value.
284
 *
285
 * @param buf handshake data received from the server (1536 bytes)
286
 * @param off position to search digest offset from
287
 * @return 0 if digest is valid, digest position otherwise
288
 */
289
static int rtmp_validate_digest(uint8_t *buf, int off)
290
{
291
    int i, digest_pos = 0;
292
    uint8_t digest[32];
293

    
294
    for (i = 0; i < 4; i++)
295
        digest_pos += buf[i + off];
296
    digest_pos = (digest_pos % 728) + off + 4;
297

    
298
    rtmp_calc_digest(buf, RTMP_HANDSHAKE_PACKET_SIZE, digest_pos,
299
                     rtmp_server_key, SERVER_KEY_OPEN_PART_LEN,
300
                     digest);
301
    if (!memcmp(digest, buf + digest_pos, 32))
302
        return digest_pos;
303
    return 0;
304
}
305

    
306
/**
307
 * Performs handshake with the server by means of exchanging pseudorandom data
308
 * signed with HMAC-SHA2 digest.
309
 *
310
 * @return 0 if handshake succeeds, negative value otherwise
311
 */
312
static int rtmp_handshake(URLContext *s, RTMPContext *rt)
313
{
314
    AVLFG rnd;
315
    uint8_t tosend    [RTMP_HANDSHAKE_PACKET_SIZE+1] = {
316
        3,                // unencrypted data
317
        0, 0, 0, 0,       // client uptime
318
        RTMP_CLIENT_VER1,
319
        RTMP_CLIENT_VER2,
320
        RTMP_CLIENT_VER3,
321
        RTMP_CLIENT_VER4,
322
    };
323
    uint8_t clientdata[RTMP_HANDSHAKE_PACKET_SIZE];
324
    uint8_t serverdata[RTMP_HANDSHAKE_PACKET_SIZE+1];
325
    int i;
326
    int server_pos, client_pos;
327
    uint8_t digest[32];
328

    
329
    av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Handshaking...\n");
330

    
331
    av_lfg_init(&rnd, 0xDEADC0DE);
332
    // generate handshake packet - 1536 bytes of pseudorandom data
333
    for (i = 9; i <= RTMP_HANDSHAKE_PACKET_SIZE; i++)
334
        tosend[i] = av_lfg_get(&rnd) >> 24;
335
    client_pos = rtmp_handshake_imprint_with_digest(tosend + 1);
336

    
337
    url_write(rt->stream, tosend, RTMP_HANDSHAKE_PACKET_SIZE + 1);
338
    i = url_read_complete(rt->stream, serverdata, RTMP_HANDSHAKE_PACKET_SIZE + 1);
339
    if (i != RTMP_HANDSHAKE_PACKET_SIZE + 1) {
340
        av_log(LOG_CONTEXT, AV_LOG_ERROR, "Cannot read RTMP handshake response\n");
341
        return -1;
342
    }
343
    i = url_read_complete(rt->stream, clientdata, RTMP_HANDSHAKE_PACKET_SIZE);
344
    if (i != RTMP_HANDSHAKE_PACKET_SIZE) {
345
        av_log(LOG_CONTEXT, AV_LOG_ERROR, "Cannot read RTMP handshake response\n");
346
        return -1;
347
    }
348

    
349
    av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Server version %d.%d.%d.%d\n",
350
           serverdata[5], serverdata[6], serverdata[7], serverdata[8]);
351

    
352
    server_pos = rtmp_validate_digest(serverdata + 1, 772);
353
    if (!server_pos) {
354
        server_pos = rtmp_validate_digest(serverdata + 1, 8);
355
        if (!server_pos) {
356
            av_log(LOG_CONTEXT, AV_LOG_ERROR, "Server response validating failed\n");
357
            return -1;
358
        }
359
    }
360

    
361
    rtmp_calc_digest(tosend + 1 + client_pos, 32, 0,
362
                     rtmp_server_key, sizeof(rtmp_server_key),
363
                     digest);
364
    rtmp_calc_digest(clientdata, RTMP_HANDSHAKE_PACKET_SIZE-32, 0,
365
                     digest, 32,
366
                     digest);
367
    if (memcmp(digest, clientdata + RTMP_HANDSHAKE_PACKET_SIZE - 32, 32)) {
368
        av_log(LOG_CONTEXT, AV_LOG_ERROR, "Signature mismatch\n");
369
        return -1;
370
    }
371

    
372
    for (i = 0; i < RTMP_HANDSHAKE_PACKET_SIZE; i++)
373
        tosend[i] = av_lfg_get(&rnd) >> 24;
374
    rtmp_calc_digest(serverdata + 1 + server_pos, 32, 0,
375
                     rtmp_player_key, sizeof(rtmp_player_key),
376
                     digest);
377
    rtmp_calc_digest(tosend,  RTMP_HANDSHAKE_PACKET_SIZE - 32, 0,
378
                     digest, 32,
379
                     tosend + RTMP_HANDSHAKE_PACKET_SIZE - 32);
380

    
381
    // write reply back to the server
382
    url_write(rt->stream, tosend, RTMP_HANDSHAKE_PACKET_SIZE);
383
    return 0;
384
}
385

    
386
/**
387
 * Parses received packet and may perform some action depending on
388
 * the packet contents.
389
 * @return 0 for no errors, negative values for serious errors which prevent
390
 *         further communications, positive values for uncritical errors
391
 */
392
static int rtmp_parse_result(URLContext *s, RTMPContext *rt, RTMPPacket *pkt)
393
{
394
    int i, t;
395
    const uint8_t *data_end = pkt->data + pkt->data_size;
396

    
397
    switch (pkt->type) {
398
    case RTMP_PT_CHUNK_SIZE:
399
        if (pkt->data_size != 4) {
400
            av_log(LOG_CONTEXT, AV_LOG_ERROR,
401
                   "Chunk size change packet is not 4 bytes long (%d)\n", pkt->data_size);
402
            return -1;
403
        }
404
        rt->chunk_size = AV_RB32(pkt->data);
405
        if (rt->chunk_size <= 0) {
406
            av_log(LOG_CONTEXT, AV_LOG_ERROR, "Incorrect chunk size %d\n", rt->chunk_size);
407
            return -1;
408
        }
409
        av_log(LOG_CONTEXT, AV_LOG_DEBUG, "New chunk size = %d\n", rt->chunk_size);
410
        break;
411
    case RTMP_PT_PING:
412
        t = AV_RB16(pkt->data);
413
        if (t == 6)
414
            gen_pong(s, rt, pkt);
415
        break;
416
    case RTMP_PT_INVOKE:
417
        //TODO: check for the messages sent for wrong state?
418
        if (!memcmp(pkt->data, "\002\000\006_error", 9)) {
419
            uint8_t tmpstr[256];
420

    
421
            if (!ff_amf_get_field_value(pkt->data + 9, data_end,
422
                                        "description", tmpstr, sizeof(tmpstr)))
423
                av_log(LOG_CONTEXT, AV_LOG_ERROR, "Server error: %s\n",tmpstr);
424
            return -1;
425
        } else if (!memcmp(pkt->data, "\002\000\007_result", 10)) {
426
            switch (rt->state) {
427
            case STATE_HANDSHAKED:
428
                gen_create_stream(s, rt);
429
                rt->state = STATE_CONNECTING;
430
                break;
431
            case STATE_CONNECTING:
432
                //extract a number from the result
433
                if (pkt->data[10] || pkt->data[19] != 5 || pkt->data[20]) {
434
                    av_log(LOG_CONTEXT, AV_LOG_WARNING, "Unexpected reply on connect()\n");
435
                } else {
436
                    rt->main_channel_id = (int) av_int2dbl(AV_RB64(pkt->data + 21));
437
                }
438
                gen_play(s, rt);
439
                rt->state = STATE_READY;
440
                break;
441
            }
442
        } else if (!memcmp(pkt->data, "\002\000\010onStatus", 11)) {
443
            const uint8_t* ptr = pkt->data + 11;
444
            uint8_t tmpstr[256];
445
            int t;
446

    
447
            for (i = 0; i < 2; i++) {
448
                t = ff_amf_tag_size(ptr, data_end);
449
                if (t < 0)
450
                    return 1;
451
                ptr += t;
452
            }
453
            t = ff_amf_get_field_value(ptr, data_end,
454
                                       "level", tmpstr, sizeof(tmpstr));
455
            if (!t && !strcmp(tmpstr, "error")) {
456
                if (!ff_amf_get_field_value(ptr, data_end,
457
                                            "description", tmpstr, sizeof(tmpstr)))
458
                    av_log(LOG_CONTEXT, AV_LOG_ERROR, "Server error: %s\n",tmpstr);
459
                return -1;
460
            }
461
            t = ff_amf_get_field_value(ptr, data_end,
462
                                       "code", tmpstr, sizeof(tmpstr));
463
            if (!t && !strcmp(tmpstr, "NetStream.Play.Start")) {
464
                rt->state = STATE_PLAYING;
465
                return 0;
466
            }
467
        }
468
        break;
469
    }
470
    return 0;
471
}
472

    
473
/**
474
 * Interacts with the server by receiving and sending RTMP packets until
475
 * there is some significant data (media data or expected status notification).
476
 *
477
 * @param s          reading context
478
 * @param for_header non-zero value tells function to work until it
479
 * gets notification from the server that playing has been started,
480
 * otherwise function will work until some media data is received (or
481
 * an error happens)
482
 * @return 0 for successful operation, negative value in case of error
483
 */
484
static int get_packet(URLContext *s, int for_header)
485
{
486
    RTMPContext *rt = s->priv_data;
487
    int ret;
488

    
489
    for(;;) {
490
        RTMPPacket rpkt;
491
        if ((ret = ff_rtmp_packet_read(rt->stream, &rpkt,
492
                                       rt->chunk_size, rt->prev_pkt[0])) != 0) {
493
            if (ret > 0) {
494
                return AVERROR(EAGAIN);
495
            } else {
496
                return AVERROR(EIO);
497
            }
498
        }
499

    
500
        ret = rtmp_parse_result(s, rt, &rpkt);
501
        if (ret < 0) {//serious error in current packet
502
            ff_rtmp_packet_destroy(&rpkt);
503
            return -1;
504
        }
505
        if (for_header && rt->state == STATE_PLAYING) {
506
            ff_rtmp_packet_destroy(&rpkt);
507
            return 0;
508
        }
509
        if (!rpkt.data_size) {
510
            ff_rtmp_packet_destroy(&rpkt);
511
            continue;
512
        }
513
        if (rpkt.type == RTMP_PT_VIDEO || rpkt.type == RTMP_PT_AUDIO ||
514
           (rpkt.type == RTMP_PT_NOTIFY && !memcmp("\002\000\012onMetaData", rpkt.data, 13))) {
515
            uint8_t *p;
516
            uint32_t ts = rpkt.timestamp;
517

    
518
            // generate packet header and put data into buffer for FLV demuxer
519
            rt->flv_off  = 0;
520
            rt->flv_size = rpkt.data_size + 15;
521
            rt->flv_data = p = av_realloc(rt->flv_data, rt->flv_size);
522
            bytestream_put_byte(&p, rpkt.type);
523
            bytestream_put_be24(&p, rpkt.data_size);
524
            bytestream_put_be24(&p, ts);
525
            bytestream_put_byte(&p, ts >> 24);
526
            bytestream_put_be24(&p, 0);
527
            bytestream_put_buffer(&p, rpkt.data, rpkt.data_size);
528
            bytestream_put_be32(&p, 0);
529
            ff_rtmp_packet_destroy(&rpkt);
530
            return 0;
531
        } else if (rpkt.type == RTMP_PT_METADATA) {
532
            // we got raw FLV data, make it available for FLV demuxer
533
            rt->flv_off  = 0;
534
            rt->flv_size = rpkt.data_size;
535
            rt->flv_data = av_realloc(rt->flv_data, rt->flv_size);
536
            memcpy(rt->flv_data, rpkt.data, rpkt.data_size);
537
            ff_rtmp_packet_destroy(&rpkt);
538
            return 0;
539
        }
540
        ff_rtmp_packet_destroy(&rpkt);
541
    }
542
    return 0;
543
}
544

    
545
static int rtmp_close(URLContext *h)
546
{
547
    RTMPContext *rt = h->priv_data;
548

    
549
    av_freep(&rt->flv_data);
550
    url_close(rt->stream);
551
    av_free(rt);
552
    return 0;
553
}
554

    
555
/**
556
 * Opens RTMP connection and verifies that the stream can be played.
557
 *
558
 * URL syntax: rtmp://server[:port][/app][/playpath]
559
 *             where 'app' is first one or two directories in the path
560
 *             (e.g. /ondemand/, /flash/live/, etc.)
561
 *             and 'playpath' is a file name (the rest of the path,
562
 *             may be prefixed with "mp4:")
563
 */
564
static int rtmp_open(URLContext *s, const char *uri, int flags)
565
{
566
    RTMPContext *rt;
567
    char proto[8], hostname[256], path[1024], *fname;
568
    uint8_t buf[2048];
569
    int port;
570
    int ret;
571

    
572
    rt = av_mallocz(sizeof(RTMPContext));
573
    if (!rt)
574
        return AVERROR(ENOMEM);
575
    s->priv_data = rt;
576
    rt->is_input = !(flags & URL_WRONLY);
577

    
578
    url_split(proto, sizeof(proto), NULL, 0, hostname, sizeof(hostname), &port,
579
              path, sizeof(path), s->filename);
580

    
581
    if (port < 0)
582
        port = RTMP_DEFAULT_PORT;
583
    snprintf(buf, sizeof(buf), "tcp://%s:%d", hostname, port);
584

    
585
    if (url_open(&rt->stream, buf, URL_RDWR) < 0) {
586
        av_log(LOG_CONTEXT, AV_LOG_ERROR, "Cannot open connection %s\n", buf);
587
        goto fail;
588
    }
589

    
590
    if (!rt->is_input) {
591
        av_log(LOG_CONTEXT, AV_LOG_ERROR, "RTMP output is not supported yet.\n");
592
        goto fail;
593
    } else {
594
        rt->state = STATE_START;
595
        if (rtmp_handshake(s, rt))
596
            return -1;
597

    
598
        rt->chunk_size = 128;
599
        rt->state = STATE_HANDSHAKED;
600
        //extract "app" part from path
601
        if (!strncmp(path, "/ondemand/", 10)) {
602
            fname = path + 10;
603
            memcpy(rt->app, "ondemand", 9);
604
        } else {
605
            char *p = strchr(path + 1, '/');
606
            if (!p) {
607
                fname = path + 1;
608
                rt->app[0] = '\0';
609
            } else {
610
                char *c = strchr(p + 1, ':');
611
                fname = strchr(p + 1, '/');
612
                if (!fname || c < fname) {
613
                    fname = p + 1;
614
                    av_strlcpy(rt->app, path + 1, p - path);
615
                } else {
616
                    fname++;
617
                    av_strlcpy(rt->app, path + 1, fname - path - 1);
618
                }
619
            }
620
        }
621
        if (!strchr(fname, ':') &&
622
            (!strcmp(fname + strlen(fname) - 4, ".f4v") ||
623
             !strcmp(fname + strlen(fname) - 4, ".mp4"))) {
624
            memcpy(rt->playpath, "mp4:", 5);
625
        } else {
626
            rt->playpath[0] = 0;
627
        }
628
        strncat(rt->playpath, fname, sizeof(rt->playpath) - 5);
629

    
630
        av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Proto = %s, path = %s, app = %s, fname = %s\n",
631
               proto, path, rt->app, rt->playpath);
632
        gen_connect(s, rt, proto, hostname, port);
633

    
634
        do {
635
            ret = get_packet(s, 1);
636
        } while (ret == EAGAIN);
637
        if (ret < 0)
638
            goto fail;
639
        // generate FLV header for demuxer
640
        rt->flv_size = 13;
641
        rt->flv_data = av_realloc(rt->flv_data, rt->flv_size);
642
        rt->flv_off  = 0;
643
        memcpy(rt->flv_data, "FLV\1\5\0\0\0\011\0\0\0\0", rt->flv_size);
644
    }
645

    
646
    s->max_packet_size = url_get_max_packet_size(rt->stream);
647
    s->is_streamed     = 1;
648
    return 0;
649

    
650
fail:
651
    rtmp_close(s);
652
    return AVERROR(EIO);
653
}
654

    
655
static int rtmp_read(URLContext *s, uint8_t *buf, int size)
656
{
657
    RTMPContext *rt = s->priv_data;
658
    int orig_size = size;
659
    int ret;
660

    
661
    while (size > 0) {
662
        int data_left = rt->flv_size - rt->flv_off;
663

    
664
        if (data_left >= size) {
665
            memcpy(buf, rt->flv_data + rt->flv_off, size);
666
            rt->flv_off += size;
667
            return orig_size;
668
        }
669
        if (data_left > 0) {
670
            memcpy(buf, rt->flv_data + rt->flv_off, data_left);
671
            buf  += data_left;
672
            size -= data_left;
673
            rt->flv_off = rt->flv_size;
674
        }
675
        if ((ret = get_packet(s, 0)) < 0)
676
           return ret;
677
    }
678
    return orig_size;
679
}
680

    
681
static int rtmp_write(URLContext *h, uint8_t *buf, int size)
682
{
683
    return 0;
684
}
685

    
686
URLProtocol rtmp_protocol = {
687
    "rtmp",
688
    rtmp_open,
689
    rtmp_read,
690
    rtmp_write,
691
    NULL, /* seek */
692
    rtmp_close,
693
};