git.sesse.net Git - ffmpeg/blob - libavformat/rtmpproto.c

   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_RELEASING,  ///< client releasing stream before publish it (for output)
  51     STATE_FCPUBLISH,  ///< client FCPublishing stream (for output)
  52     STATE_CONNECTING, ///< client connected to server successfully
  53     STATE_READY,      ///< client has sent all needed commands and waits for server reply
  54     STATE_PLAYING,    ///< client has started receiving multimedia data from server
  55     STATE_PUBLISHING, ///< client has started sending multimedia data to server (for output)
  56     STATE_STOPPED,    ///< the broadcast has been stopped
  57 } ClientState;
  58
  59 /** protocol handler context */
  60 typedef struct RTMPContext {
  61     URLContext*   stream;                     ///< TCP stream used in interactions with RTMP server
  62     RTMPPacket    prev_pkt[2][RTMP_CHANNELS]; ///< packet history used when reading and sending packets
  63     int           chunk_size;                 ///< size of the chunks RTMP packets are divided into
  64     int           is_input;                   ///< input/output flag
  65     char          playpath[256];              ///< path to filename to play (with possible "mp4:" prefix)
  66     char          app[128];                   ///< application
  67     ClientState   state;                      ///< current state
  68     int           main_channel_id;            ///< an additional channel ID which is used for some invocations
  69     uint8_t*      flv_data;                   ///< buffer with data for demuxer
  70     int           flv_size;                   ///< current buffer size
  71     int           flv_off;                    ///< number of bytes read from current buffer
  72     RTMPPacket    out_pkt;                    ///< rtmp packet, created from flv a/v or metadata (for output)
  73 } RTMPContext;
  74
  75 #define PLAYER_KEY_OPEN_PART_LEN 30   ///< length of partial key used for first client digest signing
  76 /** Client key used for digest signing */
  77 static const uint8_t rtmp_player_key[] = {
  78     'G', 'e', 'n', 'u', 'i', 'n', 'e', ' ', 'A', 'd', 'o', 'b', 'e', ' ',
  79     'F', 'l', 'a', 's', 'h', ' ', 'P', 'l', 'a', 'y', 'e', 'r', ' ', '0', '0', '1',
  80
  81     0xF0, 0xEE, 0xC2, 0x4A, 0x80, 0x68, 0xBE, 0xE8, 0x2E, 0x00, 0xD0, 0xD1, 0x02,
  82     0x9E, 0x7E, 0x57, 0x6E, 0xEC, 0x5D, 0x2D, 0x29, 0x80, 0x6F, 0xAB, 0x93, 0xB8,
  83     0xE6, 0x36, 0xCF, 0xEB, 0x31, 0xAE
  84 };
  85
  86 #define SERVER_KEY_OPEN_PART_LEN 36   ///< length of partial key used for first server digest signing
  87 /** Key used for RTMP server digest signing */
  88 static const uint8_t rtmp_server_key[] = {
  89     'G', 'e', 'n', 'u', 'i', 'n', 'e', ' ', 'A', 'd', 'o', 'b', 'e', ' ',
  90     'F', 'l', 'a', 's', 'h', ' ', 'M', 'e', 'd', 'i', 'a', ' ',
  91     'S', 'e', 'r', 'v', 'e', 'r', ' ', '0', '0', '1',
  92
  93     0xF0, 0xEE, 0xC2, 0x4A, 0x80, 0x68, 0xBE, 0xE8, 0x2E, 0x00, 0xD0, 0xD1, 0x02,
  94     0x9E, 0x7E, 0x57, 0x6E, 0xEC, 0x5D, 0x2D, 0x29, 0x80, 0x6F, 0xAB, 0x93, 0xB8,
  95     0xE6, 0x36, 0xCF, 0xEB, 0x31, 0xAE
  96 };
  97
  98 /**
  99  * Generates 'connect' call and sends it to the server.
 100  */
 101 static void gen_connect(URLContext *s, RTMPContext *rt, const char *proto,
 102                         const char *host, int port)
 103 {
 104     RTMPPacket pkt;
 105     uint8_t ver[64], *p;
 106     char tcurl[512];
 107
 108     ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0, 4096);
 109     p = pkt.data;
 110
 111     snprintf(tcurl, sizeof(tcurl), "%s://%s:%d/%s", proto, host, port, rt->app);
 112     ff_amf_write_string(&p, "connect");
 113     ff_amf_write_number(&p, 1.0);
 114     ff_amf_write_object_start(&p);
 115     ff_amf_write_field_name(&p, "app");
 116     ff_amf_write_string(&p, rt->app);
 117
 118     if (rt->is_input) {
 119         snprintf(ver, sizeof(ver), "%s %d,%d,%d,%d", RTMP_CLIENT_PLATFORM, RTMP_CLIENT_VER1,
 120                  RTMP_CLIENT_VER2, RTMP_CLIENT_VER3, RTMP_CLIENT_VER4);
 121     } else {
 122         snprintf(ver, sizeof(ver), "FMLE/3.0 (compatible; %s)", LIBAVFORMAT_IDENT);
 123         ff_amf_write_field_name(&p, "type");
 124         ff_amf_write_string(&p, "nonprivate");
 125     }
 126     ff_amf_write_field_name(&p, "flashVer");
 127     ff_amf_write_string(&p, ver);
 128     ff_amf_write_field_name(&p, "tcUrl");
 129     ff_amf_write_string(&p, tcurl);
 130     if (rt->is_input) {
 131         ff_amf_write_field_name(&p, "fpad");
 132         ff_amf_write_bool(&p, 0);
 133         ff_amf_write_field_name(&p, "capabilities");
 134         ff_amf_write_number(&p, 15.0);
 135         ff_amf_write_field_name(&p, "audioCodecs");
 136         ff_amf_write_number(&p, 1639.0);
 137         ff_amf_write_field_name(&p, "videoCodecs");
 138         ff_amf_write_number(&p, 252.0);
 139         ff_amf_write_field_name(&p, "videoFunction");
 140         ff_amf_write_number(&p, 1.0);
 141     }
 142     ff_amf_write_object_end(&p);
 143
 144     pkt.data_size = p - pkt.data;
 145
 146     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 147     ff_rtmp_packet_destroy(&pkt);
 148 }
 149
 150 /**
 151  * Generates 'releaseStream' call and sends it to the server. It should make
 152  * the server release some channel for media streams.
 153  */
 154 static void gen_release_stream(URLContext *s, RTMPContext *rt)
 155 {
 156     RTMPPacket pkt;
 157     uint8_t *p;
 158
 159     ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0,
 160                           29 + strlen(rt->playpath));
 161
 162     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Releasing stream...\n");
 163     p = pkt.data;
 164     ff_amf_write_string(&p, "releaseStream");
 165     ff_amf_write_number(&p, 2.0);
 166     ff_amf_write_null(&p);
 167     ff_amf_write_string(&p, rt->playpath);
 168
 169     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 170     ff_rtmp_packet_destroy(&pkt);
 171 }
 172
 173 /**
 174  * Generates 'FCPublish' call and sends it to the server. It should make
 175  * the server preapare for receiving media streams.
 176  */
 177 static void gen_fcpublish_stream(URLContext *s, RTMPContext *rt)
 178 {
 179     RTMPPacket pkt;
 180     uint8_t *p;
 181
 182     ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0,
 183                           25 + strlen(rt->playpath));
 184
 185     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "FCPublish stream...\n");
 186     p = pkt.data;
 187     ff_amf_write_string(&p, "FCPublish");
 188     ff_amf_write_number(&p, 3.0);
 189     ff_amf_write_null(&p);
 190     ff_amf_write_string(&p, rt->playpath);
 191
 192     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 193     ff_rtmp_packet_destroy(&pkt);
 194 }
 195
 196 /**
 197  * Generates 'FCUnpublish' call and sends it to the server. It should make
 198  * the server destroy stream.
 199  */
 200 static void gen_fcunpublish_stream(URLContext *s, RTMPContext *rt)
 201 {
 202     RTMPPacket pkt;
 203     uint8_t *p;
 204
 205     ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0,
 206                           27 + strlen(rt->playpath));
 207
 208     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "UnPublishing stream...\n");
 209     p = pkt.data;
 210     ff_amf_write_string(&p, "FCUnpublish");
 211     ff_amf_write_number(&p, 5.0);
 212     ff_amf_write_null(&p);
 213     ff_amf_write_string(&p, rt->playpath);
 214
 215     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 216     ff_rtmp_packet_destroy(&pkt);
 217 }
 218
 219 /**
 220  * Generates 'createStream' call and sends it to the server. It should make
 221  * the server allocate some channel for media streams.
 222  */
 223 static void gen_create_stream(URLContext *s, RTMPContext *rt)
 224 {
 225     RTMPPacket pkt;
 226     uint8_t *p;
 227
 228     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Creating stream...\n");
 229     ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0, 25);
 230
 231     p = pkt.data;
 232     ff_amf_write_string(&p, "createStream");
 233     ff_amf_write_number(&p, rt->is_input ? 3.0 : 4.0);
 234     ff_amf_write_null(&p);
 235
 236     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 237     ff_rtmp_packet_destroy(&pkt);
 238 }
 239
 240
 241 /**
 242  * Generates 'deleteStream' call and sends it to the server. It should make
 243  * the server remove some channel for media streams.
 244  */
 245 static void gen_delete_stream(URLContext *s, RTMPContext *rt)
 246 {
 247     RTMPPacket pkt;
 248     uint8_t *p;
 249
 250     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Deleting stream...\n");
 251     ff_rtmp_packet_create(&pkt, RTMP_SYSTEM_CHANNEL, RTMP_PT_INVOKE, 0, 34);
 252
 253     p = pkt.data;
 254     ff_amf_write_string(&p, "deleteStream");
 255     ff_amf_write_number(&p, 0.0);
 256     ff_amf_write_null(&p);
 257     ff_amf_write_number(&p, rt->main_channel_id);
 258
 259     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 260     ff_rtmp_packet_destroy(&pkt);
 261 }
 262
 263 /**
 264  * Generates 'play' call and sends it to the server, then pings the server
 265  * to start actual playing.
 266  */
 267 static void gen_play(URLContext *s, RTMPContext *rt)
 268 {
 269     RTMPPacket pkt;
 270     uint8_t *p;
 271
 272     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Sending play command for '%s'\n", rt->playpath);
 273     ff_rtmp_packet_create(&pkt, RTMP_VIDEO_CHANNEL, RTMP_PT_INVOKE, 0,
 274                           20 + strlen(rt->playpath));
 275     pkt.extra = rt->main_channel_id;
 276
 277     p = pkt.data;
 278     ff_amf_write_string(&p, "play");
 279     ff_amf_write_number(&p, 0.0);
 280     ff_amf_write_null(&p);
 281     ff_amf_write_string(&p, rt->playpath);
 282
 283     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 284     ff_rtmp_packet_destroy(&pkt);
 285
 286     // set client buffer time disguised in ping packet
 287     ff_rtmp_packet_create(&pkt, RTMP_NETWORK_CHANNEL, RTMP_PT_PING, 1, 10);
 288
 289     p = pkt.data;
 290     bytestream_put_be16(&p, 3);
 291     bytestream_put_be32(&p, 1);
 292     bytestream_put_be32(&p, 256); //TODO: what is a good value here?
 293
 294     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 295     ff_rtmp_packet_destroy(&pkt);
 296 }
 297
 298 /**
 299  * Generates 'publish' call and sends it to the server.
 300  */
 301 static void gen_publish(URLContext *s, RTMPContext *rt)
 302 {
 303     RTMPPacket pkt;
 304     uint8_t *p;
 305
 306     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Sending publish command for '%s'\n", rt->playpath);
 307     ff_rtmp_packet_create(&pkt, RTMP_SOURCE_CHANNEL, RTMP_PT_INVOKE, 0,
 308                           30 + strlen(rt->playpath));
 309     pkt.extra = rt->main_channel_id;
 310
 311     p = pkt.data;
 312     ff_amf_write_string(&p, "publish");
 313     ff_amf_write_number(&p, 0.0);
 314     ff_amf_write_null(&p);
 315     ff_amf_write_string(&p, rt->playpath);
 316     ff_amf_write_string(&p, "live");
 317
 318     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 319     ff_rtmp_packet_destroy(&pkt);
 320 }
 321
 322 /**
 323  * Generates ping reply and sends it to the server.
 324  */
 325 static void gen_pong(URLContext *s, RTMPContext *rt, RTMPPacket *ppkt)
 326 {
 327     RTMPPacket pkt;
 328     uint8_t *p;
 329
 330     ff_rtmp_packet_create(&pkt, RTMP_NETWORK_CHANNEL, RTMP_PT_PING, ppkt->timestamp + 1, 6);
 331     p = pkt.data;
 332     bytestream_put_be16(&p, 7);
 333     bytestream_put_be32(&p, AV_RB32(ppkt->data+2) + 1);
 334     ff_rtmp_packet_write(rt->stream, &pkt, rt->chunk_size, rt->prev_pkt[1]);
 335     ff_rtmp_packet_destroy(&pkt);
 336 }
 337
 338 //TODO: Move HMAC code somewhere. Eventually.
 339 #define HMAC_IPAD_VAL 0x36
 340 #define HMAC_OPAD_VAL 0x5C
 341
 342 /**
 343  * Calculates HMAC-SHA2 digest for RTMP handshake packets.
 344  *
 345  * @param src    input buffer
 346  * @param len    input buffer length (should be 1536)
 347  * @param gap    offset in buffer where 32 bytes should not be taken into account
 348  *               when calculating digest (since it will be used to store that digest)
 349  * @param key    digest key
 350  * @param keylen digest key length
 351  * @param dst    buffer where calculated digest will be stored (32 bytes)
 352  */
 353 static void rtmp_calc_digest(const uint8_t *src, int len, int gap,
 354                              const uint8_t *key, int keylen, uint8_t *dst)
 355 {
 356     struct AVSHA *sha;
 357     uint8_t hmac_buf[64+32] = {0};
 358     int i;
 359
 360     sha = av_mallocz(av_sha_size);
 361
 362     if (keylen < 64) {
 363         memcpy(hmac_buf, key, keylen);
 364     } else {
 365         av_sha_init(sha, 256);
 366         av_sha_update(sha,key, keylen);
 367         av_sha_final(sha, hmac_buf);
 368     }
 369     for (i = 0; i < 64; i++)
 370         hmac_buf[i] ^= HMAC_IPAD_VAL;
 371
 372     av_sha_init(sha, 256);
 373     av_sha_update(sha, hmac_buf, 64);
 374     if (gap <= 0) {
 375         av_sha_update(sha, src, len);
 376     } else { //skip 32 bytes used for storing digest
 377         av_sha_update(sha, src, gap);
 378         av_sha_update(sha, src + gap + 32, len - gap - 32);
 379     }
 380     av_sha_final(sha, hmac_buf + 64);
 381
 382     for (i = 0; i < 64; i++)
 383         hmac_buf[i] ^= HMAC_IPAD_VAL ^ HMAC_OPAD_VAL; //reuse XORed key for opad
 384     av_sha_init(sha, 256);
 385     av_sha_update(sha, hmac_buf, 64+32);
 386     av_sha_final(sha, dst);
 387
 388     av_free(sha);
 389 }
 390
 391 /**
 392  * Puts HMAC-SHA2 digest of packet data (except for the bytes where this digest
 393  * will be stored) into that packet.
 394  *
 395  * @param buf handshake data (1536 bytes)
 396  * @return offset to the digest inside input data
 397  */
 398 static int rtmp_handshake_imprint_with_digest(uint8_t *buf)
 399 {
 400     int i, digest_pos = 0;
 401
 402     for (i = 8; i < 12; i++)
 403         digest_pos += buf[i];
 404     digest_pos = (digest_pos % 728) + 12;
 405
 406     rtmp_calc_digest(buf, RTMP_HANDSHAKE_PACKET_SIZE, digest_pos,
 407                      rtmp_player_key, PLAYER_KEY_OPEN_PART_LEN,
 408                      buf + digest_pos);
 409     return digest_pos;
 410 }
 411
 412 /**
 413  * Verifies that the received server response has the expected digest value.
 414  *
 415  * @param buf handshake data received from the server (1536 bytes)
 416  * @param off position to search digest offset from
 417  * @return 0 if digest is valid, digest position otherwise
 418  */
 419 static int rtmp_validate_digest(uint8_t *buf, int off)
 420 {
 421     int i, digest_pos = 0;
 422     uint8_t digest[32];
 423
 424     for (i = 0; i < 4; i++)
 425         digest_pos += buf[i + off];
 426     digest_pos = (digest_pos % 728) + off + 4;
 427
 428     rtmp_calc_digest(buf, RTMP_HANDSHAKE_PACKET_SIZE, digest_pos,
 429                      rtmp_server_key, SERVER_KEY_OPEN_PART_LEN,
 430                      digest);
 431     if (!memcmp(digest, buf + digest_pos, 32))
 432         return digest_pos;
 433     return 0;
 434 }
 435
 436 /**
 437  * Performs handshake with the server by means of exchanging pseudorandom data
 438  * signed with HMAC-SHA2 digest.
 439  *
 440  * @return 0 if handshake succeeds, negative value otherwise
 441  */
 442 static int rtmp_handshake(URLContext *s, RTMPContext *rt)
 443 {
 444     AVLFG rnd;
 445     uint8_t tosend    [RTMP_HANDSHAKE_PACKET_SIZE+1] = {
 446         3,                // unencrypted data
 447         0, 0, 0, 0,       // client uptime
 448         RTMP_CLIENT_VER1,
 449         RTMP_CLIENT_VER2,
 450         RTMP_CLIENT_VER3,
 451         RTMP_CLIENT_VER4,
 452     };
 453     uint8_t clientdata[RTMP_HANDSHAKE_PACKET_SIZE];
 454     uint8_t serverdata[RTMP_HANDSHAKE_PACKET_SIZE+1];
 455     int i;
 456     int server_pos, client_pos;
 457     uint8_t digest[32];
 458
 459     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Handshaking...\n");
 460
 461     av_lfg_init(&rnd, 0xDEADC0DE);
 462     // generate handshake packet - 1536 bytes of pseudorandom data
 463     for (i = 9; i <= RTMP_HANDSHAKE_PACKET_SIZE; i++)
 464         tosend[i] = av_lfg_get(&rnd) >> 24;
 465     client_pos = rtmp_handshake_imprint_with_digest(tosend + 1);
 466
 467     url_write(rt->stream, tosend, RTMP_HANDSHAKE_PACKET_SIZE + 1);
 468     i = url_read_complete(rt->stream, serverdata, RTMP_HANDSHAKE_PACKET_SIZE + 1);
 469     if (i != RTMP_HANDSHAKE_PACKET_SIZE + 1) {
 470         av_log(LOG_CONTEXT, AV_LOG_ERROR, "Cannot read RTMP handshake response\n");
 471         return -1;
 472     }
 473     i = url_read_complete(rt->stream, clientdata, RTMP_HANDSHAKE_PACKET_SIZE);
 474     if (i != RTMP_HANDSHAKE_PACKET_SIZE) {
 475         av_log(LOG_CONTEXT, AV_LOG_ERROR, "Cannot read RTMP handshake response\n");
 476         return -1;
 477     }
 478
 479     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Server version %d.%d.%d.%d\n",
 480            serverdata[5], serverdata[6], serverdata[7], serverdata[8]);
 481
 482     if (rt->is_input) {
 483         server_pos = rtmp_validate_digest(serverdata + 1, 772);
 484         if (!server_pos) {
 485             server_pos = rtmp_validate_digest(serverdata + 1, 8);
 486             if (!server_pos) {
 487                 av_log(LOG_CONTEXT, AV_LOG_ERROR, "Server response validating failed\n");
 488                 return -1;
 489             }
 490         }
 491
 492         rtmp_calc_digest(tosend + 1 + client_pos, 32, 0,
 493                          rtmp_server_key, sizeof(rtmp_server_key),
 494                          digest);
 495         rtmp_calc_digest(clientdata, RTMP_HANDSHAKE_PACKET_SIZE-32, 0,
 496                          digest, 32,
 497                          digest);
 498         if (memcmp(digest, clientdata + RTMP_HANDSHAKE_PACKET_SIZE - 32, 32)) {
 499             av_log(LOG_CONTEXT, AV_LOG_ERROR, "Signature mismatch\n");
 500             return -1;
 501         }
 502
 503         for (i = 0; i < RTMP_HANDSHAKE_PACKET_SIZE; i++)
 504             tosend[i] = av_lfg_get(&rnd) >> 24;
 505         rtmp_calc_digest(serverdata + 1 + server_pos, 32, 0,
 506                          rtmp_player_key, sizeof(rtmp_player_key),
 507                          digest);
 508         rtmp_calc_digest(tosend,  RTMP_HANDSHAKE_PACKET_SIZE - 32, 0,
 509                          digest, 32,
 510                          tosend + RTMP_HANDSHAKE_PACKET_SIZE - 32);
 511
 512         // write reply back to the server
 513         url_write(rt->stream, tosend, RTMP_HANDSHAKE_PACKET_SIZE);
 514     } else {
 515         url_write(rt->stream, serverdata+1, RTMP_HANDSHAKE_PACKET_SIZE);
 516     }
 517
 518     return 0;
 519 }
 520
 521 /**
 522  * Parses received packet and may perform some action depending on
 523  * the packet contents.
 524  * @return 0 for no errors, negative values for serious errors which prevent
 525  *         further communications, positive values for uncritical errors
 526  */
 527 static int rtmp_parse_result(URLContext *s, RTMPContext *rt, RTMPPacket *pkt)
 528 {
 529     int i, t;
 530     const uint8_t *data_end = pkt->data + pkt->data_size;
 531
 532     switch (pkt->type) {
 533     case RTMP_PT_CHUNK_SIZE:
 534         if (pkt->data_size != 4) {
 535             av_log(LOG_CONTEXT, AV_LOG_ERROR,
 536                    "Chunk size change packet is not 4 bytes long (%d)\n", pkt->data_size);
 537             return -1;
 538         }
 539         if (!rt->is_input)
 540             ff_rtmp_packet_write(rt->stream, pkt, rt->chunk_size, rt->prev_pkt[1]);
 541         rt->chunk_size = AV_RB32(pkt->data);
 542         if (rt->chunk_size <= 0) {
 543             av_log(LOG_CONTEXT, AV_LOG_ERROR, "Incorrect chunk size %d\n", rt->chunk_size);
 544             return -1;
 545         }
 546         av_log(LOG_CONTEXT, AV_LOG_DEBUG, "New chunk size = %d\n", rt->chunk_size);
 547         break;
 548     case RTMP_PT_PING:
 549         t = AV_RB16(pkt->data);
 550         if (t == 6)
 551             gen_pong(s, rt, pkt);
 552         break;
 553     case RTMP_PT_INVOKE:
 554         //TODO: check for the messages sent for wrong state?
 555         if (!memcmp(pkt->data, "\002\000\006_error", 9)) {
 556             uint8_t tmpstr[256];
 557
 558             if (!ff_amf_get_field_value(pkt->data + 9, data_end,
 559                                         "description", tmpstr, sizeof(tmpstr)))
 560                 av_log(LOG_CONTEXT, AV_LOG_ERROR, "Server error: %s\n",tmpstr);
 561             return -1;
 562         } else if (!memcmp(pkt->data, "\002\000\007_result", 10)) {
 563             switch (rt->state) {
 564             case STATE_HANDSHAKED:
 565                 if (!rt->is_input) {
 566                     gen_release_stream(s, rt);
 567                     gen_fcpublish_stream(s, rt);
 568                     rt->state = STATE_RELEASING;
 569                 } else {
 570                     rt->state = STATE_CONNECTING;
 571                 }
 572                 gen_create_stream(s, rt);
 573                 break;
 574             case STATE_FCPUBLISH:
 575                 rt->state = STATE_CONNECTING;
 576                 break;
 577             case STATE_RELEASING:
 578                 rt->state = STATE_FCPUBLISH;
 579                 /* hack for Wowza Media Server, it does not send result for
 580                  * releaseStream and FCPublish calls */
 581                 if (!pkt->data[10]) {
 582                     int pkt_id = (int) av_int2dbl(AV_RB64(pkt->data + 11));
 583                     if (pkt_id == 4)
 584                         rt->state = STATE_CONNECTING;
 585                 }
 586                 if (rt->state != STATE_CONNECTING)
 587                     break;
 588             case STATE_CONNECTING:
 589                 //extract a number from the result
 590                 if (pkt->data[10] || pkt->data[19] != 5 || pkt->data[20]) {
 591                     av_log(LOG_CONTEXT, AV_LOG_WARNING, "Unexpected reply on connect()\n");
 592                 } else {
 593                     rt->main_channel_id = (int) av_int2dbl(AV_RB64(pkt->data + 21));
 594                 }
 595                 if (rt->is_input) {
 596                     gen_play(s, rt);
 597                 } else {
 598                     gen_publish(s, rt);
 599                 }
 600                 rt->state = STATE_READY;
 601                 break;
 602             }
 603         } else if (!memcmp(pkt->data, "\002\000\010onStatus", 11)) {
 604             const uint8_t* ptr = pkt->data + 11;
 605             uint8_t tmpstr[256];
 606
 607             for (i = 0; i < 2; i++) {
 608                 t = ff_amf_tag_size(ptr, data_end);
 609                 if (t < 0)
 610                     return 1;
 611                 ptr += t;
 612             }
 613             t = ff_amf_get_field_value(ptr, data_end,
 614                                        "level", tmpstr, sizeof(tmpstr));
 615             if (!t && !strcmp(tmpstr, "error")) {
 616                 if (!ff_amf_get_field_value(ptr, data_end,
 617                                             "description", tmpstr, sizeof(tmpstr)))
 618                     av_log(LOG_CONTEXT, AV_LOG_ERROR, "Server error: %s\n",tmpstr);
 619                 return -1;
 620             }
 621             t = ff_amf_get_field_value(ptr, data_end,
 622                                        "code", tmpstr, sizeof(tmpstr));
 623             if (!t && !strcmp(tmpstr, "NetStream.Play.Start")) rt->state = STATE_PLAYING;
 624             if (!t && !strcmp(tmpstr, "NetStream.Play.Stop")) rt->state = STATE_STOPPED;
 625             if (!t && !strcmp(tmpstr, "NetStream.Play.UnpublishNotify")) rt->state = STATE_STOPPED;
 626             if (!t && !strcmp(tmpstr, "NetStream.Publish.Start")) rt->state = STATE_PUBLISHING;
 627         }
 628         break;
 629     }
 630     return 0;
 631 }
 632
 633 /**
 634  * Interacts with the server by receiving and sending RTMP packets until
 635  * there is some significant data (media data or expected status notification).
 636  *
 637  * @param s          reading context
 638  * @param for_header non-zero value tells function to work until it
 639  * gets notification from the server that playing has been started,
 640  * otherwise function will work until some media data is received (or
 641  * an error happens)
 642  * @return 0 for successful operation, negative value in case of error
 643  */
 644 static int get_packet(URLContext *s, int for_header)
 645 {
 646     RTMPContext *rt = s->priv_data;
 647     int ret;
 648
 649     if (rt->state == STATE_STOPPED)
 650         return AVERROR_EOF;
 651
 652     for (;;) {
 653         RTMPPacket rpkt;
 654         if ((ret = ff_rtmp_packet_read(rt->stream, &rpkt,
 655                                        rt->chunk_size, rt->prev_pkt[0])) != 0) {
 656             if (ret > 0) {
 657                 return AVERROR(EAGAIN);
 658             } else {
 659                 return AVERROR(EIO);
 660             }
 661         }
 662
 663         ret = rtmp_parse_result(s, rt, &rpkt);
 664         if (ret < 0) {//serious error in current packet
 665             ff_rtmp_packet_destroy(&rpkt);
 666             return -1;
 667         }
 668         if (rt->state == STATE_STOPPED) {
 669             ff_rtmp_packet_destroy(&rpkt);
 670             return AVERROR_EOF;
 671         }
 672         if (for_header && (rt->state == STATE_PLAYING || rt->state == STATE_PUBLISHING)) {
 673             ff_rtmp_packet_destroy(&rpkt);
 674             return 0;
 675         }
 676         if (!rpkt.data_size || !rt->is_input) {
 677             ff_rtmp_packet_destroy(&rpkt);
 678             continue;
 679         }
 680         if (rpkt.type == RTMP_PT_VIDEO || rpkt.type == RTMP_PT_AUDIO ||
 681            (rpkt.type == RTMP_PT_NOTIFY && !memcmp("\002\000\012onMetaData", rpkt.data, 13))) {
 682             uint8_t *p;
 683             uint32_t ts = rpkt.timestamp;
 684
 685             // generate packet header and put data into buffer for FLV demuxer
 686             rt->flv_off  = 0;
 687             rt->flv_size = rpkt.data_size + 15;
 688             rt->flv_data = p = av_realloc(rt->flv_data, rt->flv_size);
 689             bytestream_put_byte(&p, rpkt.type);
 690             bytestream_put_be24(&p, rpkt.data_size);
 691             bytestream_put_be24(&p, ts);
 692             bytestream_put_byte(&p, ts >> 24);
 693             bytestream_put_be24(&p, 0);
 694             bytestream_put_buffer(&p, rpkt.data, rpkt.data_size);
 695             bytestream_put_be32(&p, 0);
 696             ff_rtmp_packet_destroy(&rpkt);
 697             return 0;
 698         } else if (rpkt.type == RTMP_PT_METADATA) {
 699             // we got raw FLV data, make it available for FLV demuxer
 700             rt->flv_off  = 0;
 701             rt->flv_size = rpkt.data_size;
 702             rt->flv_data = av_realloc(rt->flv_data, rt->flv_size);
 703             memcpy(rt->flv_data, rpkt.data, rpkt.data_size);
 704             ff_rtmp_packet_destroy(&rpkt);
 705             return 0;
 706         }
 707         ff_rtmp_packet_destroy(&rpkt);
 708     }
 709     return 0;
 710 }
 711
 712 static int rtmp_close(URLContext *h)
 713 {
 714     RTMPContext *rt = h->priv_data;
 715
 716     if (!rt->is_input) {
 717         rt->flv_data = NULL;
 718         if (rt->out_pkt.data_size)
 719             ff_rtmp_packet_destroy(&rt->out_pkt);
 720         if (rt->state > STATE_FCPUBLISH)
 721             gen_fcunpublish_stream(h, rt);
 722     }
 723     if (rt->state > STATE_HANDSHAKED)
 724         gen_delete_stream(h, rt);
 725
 726     av_freep(&rt->flv_data);
 727     url_close(rt->stream);
 728     av_free(rt);
 729     return 0;
 730 }
 731
 732 /**
 733  * Opens RTMP connection and verifies that the stream can be played.
 734  *
 735  * URL syntax: rtmp://server[:port][/app][/playpath]
 736  *             where 'app' is first one or two directories in the path
 737  *             (e.g. /ondemand/, /flash/live/, etc.)
 738  *             and 'playpath' is a file name (the rest of the path,
 739  *             may be prefixed with "mp4:")
 740  */
 741 static int rtmp_open(URLContext *s, const char *uri, int flags)
 742 {
 743     RTMPContext *rt;
 744     char proto[8], hostname[256], path[1024], *fname;
 745     uint8_t buf[2048];
 746     int port;
 747     int ret;
 748
 749     rt = av_mallocz(sizeof(RTMPContext));
 750     if (!rt)
 751         return AVERROR(ENOMEM);
 752     s->priv_data = rt;
 753     rt->is_input = !(flags & URL_WRONLY);
 754
 755     url_split(proto, sizeof(proto), NULL, 0, hostname, sizeof(hostname), &port,
 756               path, sizeof(path), s->filename);
 757
 758     if (port < 0)
 759         port = RTMP_DEFAULT_PORT;
 760     snprintf(buf, sizeof(buf), "tcp://%s:%d", hostname, port);
 761
 762     if (url_open(&rt->stream, buf, URL_RDWR) < 0) {
 763         av_log(LOG_CONTEXT, AV_LOG_ERROR, "Cannot open connection %s\n", buf);
 764         goto fail;
 765     }
 766
 767     rt->state = STATE_START;
 768     if (rtmp_handshake(s, rt))
 769         return -1;
 770
 771     rt->chunk_size = 128;
 772     rt->state = STATE_HANDSHAKED;
 773     //extract "app" part from path
 774     if (!strncmp(path, "/ondemand/", 10)) {
 775         fname = path + 10;
 776         memcpy(rt->app, "ondemand", 9);
 777     } else {
 778         char *p = strchr(path + 1, '/');
 779         if (!p) {
 780             fname = path + 1;
 781             rt->app[0] = '\0';
 782         } else {
 783             char *c = strchr(p + 1, ':');
 784             fname = strchr(p + 1, '/');
 785             if (!fname || c < fname) {
 786                 fname = p + 1;
 787                 av_strlcpy(rt->app, path + 1, p - path);
 788             } else {
 789                 fname++;
 790                 av_strlcpy(rt->app, path + 1, fname - path - 1);
 791             }
 792         }
 793     }
 794     if (!strchr(fname, ':') &&
 795         (!strcmp(fname + strlen(fname) - 4, ".f4v") ||
 796          !strcmp(fname + strlen(fname) - 4, ".mp4"))) {
 797         memcpy(rt->playpath, "mp4:", 5);
 798     } else {
 799         rt->playpath[0] = 0;
 800     }
 801     strncat(rt->playpath, fname, sizeof(rt->playpath) - 5);
 802
 803     av_log(LOG_CONTEXT, AV_LOG_DEBUG, "Proto = %s, path = %s, app = %s, fname = %s\n",
 804            proto, path, rt->app, rt->playpath);
 805     gen_connect(s, rt, proto, hostname, port);
 806
 807     do {
 808         ret = get_packet(s, 1);
 809     } while (ret == EAGAIN);
 810     if (ret < 0)
 811         goto fail;
 812
 813     if (rt->is_input) {
 814         // generate FLV header for demuxer
 815         rt->flv_size = 13;
 816         rt->flv_data = av_realloc(rt->flv_data, rt->flv_size);
 817         rt->flv_off  = 0;
 818         memcpy(rt->flv_data, "FLV\1\5\0\0\0\011\0\0\0\0", rt->flv_size);
 819     } else {
 820         rt->flv_size = 0;
 821         rt->flv_data = NULL;
 822         rt->flv_off  = 0;
 823     }
 824
 825     s->max_packet_size = url_get_max_packet_size(rt->stream);
 826     s->is_streamed     = 1;
 827     return 0;
 828
 829 fail:
 830     rtmp_close(s);
 831     return AVERROR(EIO);
 832 }
 833
 834 static int rtmp_read(URLContext *s, uint8_t *buf, int size)
 835 {
 836     RTMPContext *rt = s->priv_data;
 837     int orig_size = size;
 838     int ret;
 839
 840     while (size > 0) {
 841         int data_left = rt->flv_size - rt->flv_off;
 842
 843         if (data_left >= size) {
 844             memcpy(buf, rt->flv_data + rt->flv_off, size);
 845             rt->flv_off += size;
 846             return orig_size;
 847         }
 848         if (data_left > 0) {
 849             memcpy(buf, rt->flv_data + rt->flv_off, data_left);
 850             buf  += data_left;
 851             size -= data_left;
 852             rt->flv_off = rt->flv_size;
 853         }
 854         if ((ret = get_packet(s, 0)) < 0)
 855            return ret;
 856     }
 857     return orig_size;
 858 }
 859
 860 static int rtmp_write(URLContext *h, uint8_t *buf, int size)
 861 {
 862     RTMPContext *rt = h->priv_data;
 863     int size_temp = size;
 864     int pktsize, pkttype;
 865     uint32_t ts;
 866     const uint8_t *buf_temp = buf;
 867
 868     if (size < 11) {
 869         av_log(LOG_CONTEXT, AV_LOG_DEBUG, "FLV packet too small %d\n", size);
 870         return 0;
 871     }
 872
 873     do {
 874         if (!rt->flv_off) {
 875             //skip flv header
 876             if (buf_temp[0] == 'F' && buf_temp[1] == 'L' && buf_temp[2] == 'V') {
 877                 buf_temp += 9 + 4;
 878                 size_temp -= 9 + 4;
 879             }
 880
 881             pkttype = bytestream_get_byte(&buf_temp);
 882             pktsize = bytestream_get_be24(&buf_temp);
 883             ts = bytestream_get_be24(&buf_temp);
 884             ts |= bytestream_get_byte(&buf_temp) << 24;
 885             bytestream_get_be24(&buf_temp);
 886             size_temp -= 11;
 887             rt->flv_size = pktsize;
 888
 889             //force 12bytes header
 890             if (((pkttype == RTMP_PT_VIDEO || pkttype == RTMP_PT_AUDIO) && ts == 0) ||
 891                 pkttype == RTMP_PT_NOTIFY) {
 892                 if (pkttype == RTMP_PT_NOTIFY)
 893                     pktsize += 16;
 894                 rt->prev_pkt[1][RTMP_SOURCE_CHANNEL].channel_id = 0;
 895             }
 896
 897             //this can be a big packet, it's better to send it right here
 898             ff_rtmp_packet_create(&rt->out_pkt, RTMP_SOURCE_CHANNEL, pkttype, ts, pktsize);
 899             rt->out_pkt.extra = rt->main_channel_id;
 900             rt->flv_data = rt->out_pkt.data;
 901
 902             if (pkttype == RTMP_PT_NOTIFY)
 903                 ff_amf_write_string(&rt->flv_data, "@setDataFrame");
 904         }
 905
 906         if (rt->flv_size - rt->flv_off > size_temp) {
 907             bytestream_get_buffer(&buf_temp, rt->flv_data + rt->flv_off, size_temp);
 908             rt->flv_off += size_temp;
 909         } else {
 910             bytestream_get_buffer(&buf_temp, rt->flv_data + rt->flv_off, rt->flv_size - rt->flv_off);
 911             rt->flv_off += rt->flv_size - rt->flv_off;
 912         }
 913
 914         if (rt->flv_off == rt->flv_size) {
 915             bytestream_get_be32(&buf_temp);
 916
 917             ff_rtmp_packet_write(rt->stream, &rt->out_pkt, rt->chunk_size, rt->prev_pkt[1]);
 918             ff_rtmp_packet_destroy(&rt->out_pkt);
 919             rt->flv_size = 0;
 920             rt->flv_off = 0;
 921         }
 922     } while (buf_temp - buf < size_temp);
 923     return size;
 924 }
 925
 926 URLProtocol rtmp_protocol = {
 927     "rtmp",
 928     rtmp_open,
 929     rtmp_read,
 930     rtmp_write,
 931     NULL, /* seek */
 932     rtmp_close,
 933 };