Revert svn rev 21857, readd first_rtcp_ntp_time in RTPDemuxContext
[ffmpeg.git] / libavformat / rtsp.c
1 /*
2  * RTSP/SDP client
3  * Copyright (c) 2002 Fabrice Bellard
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 #include "libavutil/base64.h"
23 #include "libavutil/avstring.h"
24 #include "libavutil/intreadwrite.h"
25 #include "avformat.h"
26
27 #include <sys/time.h>
28 #if HAVE_SYS_SELECT_H
29 #include <sys/select.h>
30 #endif
31 #include <strings.h>
32 #include "internal.h"
33 #include "network.h"
34 #include "os_support.h"
35 #include "rtsp.h"
36
37 #include "rtpdec.h"
38 #include "rdt.h"
39 #include "rtpdec_asf.h"
40
41 //#define DEBUG
42 //#define DEBUG_RTP_TCP
43
44 #if LIBAVFORMAT_VERSION_INT < (53 << 16)
45 int rtsp_default_protocols = (1 << RTSP_LOWER_TRANSPORT_UDP);
46 #endif
47
48 /* Timeout values for socket select, in ms,
49  * and read_packet(), in seconds  */
50 #define SELECT_TIMEOUT_MS 100
51 #define READ_PACKET_TIMEOUT_S 10
52 #define MAX_TIMEOUTS READ_PACKET_TIMEOUT_S * 1000 / SELECT_TIMEOUT_MS
53
54 #define SPACE_CHARS " \t\r\n"
55 /* we use memchr() instead of strchr() here because strchr() will return
56  * the terminating '\0' of SPACE_CHARS instead of NULL if c is '\0'. */
57 #define redir_isspace(c) memchr(SPACE_CHARS, c, 4)
58 static void skip_spaces(const char **pp)
59 {
60     const char *p;
61     p = *pp;
62     while (redir_isspace(*p))
63         p++;
64     *pp = p;
65 }
66
67 static void get_word_until_chars(char *buf, int buf_size,
68                                  const char *sep, const char **pp)
69 {
70     const char *p;
71     char *q;
72
73     p = *pp;
74     skip_spaces(&p);
75     q = buf;
76     while (!strchr(sep, *p) && *p != '\0') {
77         if ((q - buf) < buf_size - 1)
78             *q++ = *p;
79         p++;
80     }
81     if (buf_size > 0)
82         *q = '\0';
83     *pp = p;
84 }
85
86 static void get_word_sep(char *buf, int buf_size, const char *sep,
87                          const char **pp)
88 {
89     if (**pp == '/') (*pp)++;
90     get_word_until_chars(buf, buf_size, sep, pp);
91 }
92
93 static void get_word(char *buf, int buf_size, const char **pp)
94 {
95     get_word_until_chars(buf, buf_size, SPACE_CHARS, pp);
96 }
97
98 /* parse the rtpmap description: <codec_name>/<clock_rate>[/<other params>] */
99 static int sdp_parse_rtpmap(AVFormatContext *s,
100                             AVCodecContext *codec, RTSPStream *rtsp_st,
101                             int payload_type, const char *p)
102 {
103     char buf[256];
104     int i;
105     AVCodec *c;
106     const char *c_name;
107
108     /* Loop into AVRtpDynamicPayloadTypes[] and AVRtpPayloadTypes[] and
109      * see if we can handle this kind of payload.
110      * The space should normally not be there but some Real streams or
111      * particular servers ("RealServer Version 6.1.3.970", see issue 1658)
112      * have a trailing space. */
113     get_word_sep(buf, sizeof(buf), "/ ", &p);
114     if (payload_type >= RTP_PT_PRIVATE) {
115         RTPDynamicProtocolHandler *handler;
116         for (handler = RTPFirstDynamicPayloadHandler;
117              handler; handler = handler->next) {
118             if (!strcasecmp(buf, handler->enc_name) &&
119                 codec->codec_type == handler->codec_type) {
120                 codec->codec_id          = handler->codec_id;
121                 rtsp_st->dynamic_handler = handler;
122                 if (handler->open)
123                     rtsp_st->dynamic_protocol_context = handler->open();
124                 break;
125             }
126         }
127     } else {
128         /* We are in a standard case
129          * (from http://www.iana.org/assignments/rtp-parameters). */
130         /* search into AVRtpPayloadTypes[] */
131         codec->codec_id = ff_rtp_codec_id(buf, codec->codec_type);
132     }
133
134     c = avcodec_find_decoder(codec->codec_id);
135     if (c && c->name)
136         c_name = c->name;
137     else
138         c_name = "(null)";
139
140     get_word_sep(buf, sizeof(buf), "/", &p);
141     i = atoi(buf);
142     switch (codec->codec_type) {
143     case AVMEDIA_TYPE_AUDIO:
144         av_log(s, AV_LOG_DEBUG, "audio codec set to: %s\n", c_name);
145         codec->sample_rate = RTSP_DEFAULT_AUDIO_SAMPLERATE;
146         codec->channels = RTSP_DEFAULT_NB_AUDIO_CHANNELS;
147         if (i > 0) {
148             codec->sample_rate = i;
149             get_word_sep(buf, sizeof(buf), "/", &p);
150             i = atoi(buf);
151             if (i > 0)
152                 codec->channels = i;
153             // TODO: there is a bug here; if it is a mono stream, and
154             // less than 22000Hz, faad upconverts to stereo and twice
155             // the frequency.  No problem, but the sample rate is being
156             // set here by the sdp line. Patch on its way. (rdm)
157         }
158         av_log(s, AV_LOG_DEBUG, "audio samplerate set to: %i\n",
159                codec->sample_rate);
160         av_log(s, AV_LOG_DEBUG, "audio channels set to: %i\n",
161                codec->channels);
162         break;
163     case AVMEDIA_TYPE_VIDEO:
164         av_log(s, AV_LOG_DEBUG, "video codec set to: %s\n", c_name);
165         break;
166     default:
167         break;
168     }
169     return 0;
170 }
171
172 /* return the length and optionally the data */
173 static int hex_to_data(uint8_t *data, const char *p)
174 {
175     int c, len, v;
176
177     len = 0;
178     v = 1;
179     for (;;) {
180         skip_spaces(&p);
181         if (*p == '\0')
182             break;
183         c = toupper((unsigned char) *p++);
184         if (c >= '0' && c <= '9')
185             c = c - '0';
186         else if (c >= 'A' && c <= 'F')
187             c = c - 'A' + 10;
188         else
189             break;
190         v = (v << 4) | c;
191         if (v & 0x100) {
192             if (data)
193                 data[len] = v;
194             len++;
195             v = 1;
196         }
197     }
198     return len;
199 }
200
201 static void sdp_parse_fmtp_config(AVCodecContext * codec, void *ctx,
202                                   char *attr, char *value)
203 {
204     switch (codec->codec_id) {
205     case CODEC_ID_MPEG4:
206     case CODEC_ID_AAC:
207         if (!strcmp(attr, "config")) {
208             /* decode the hexa encoded parameter */
209             int len = hex_to_data(NULL, value);
210             if (codec->extradata)
211                 av_free(codec->extradata);
212             codec->extradata = av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
213             if (!codec->extradata)
214                 return;
215             codec->extradata_size = len;
216             hex_to_data(codec->extradata, value);
217         }
218         break;
219     default:
220         break;
221     }
222     return;
223 }
224
225 typedef struct {
226     const char *str;
227     uint16_t    type;
228     uint32_t    offset;
229 } AttrNameMap;
230
231 /* All known fmtp parameters and the corresponding RTPAttrTypeEnum */
232 #define ATTR_NAME_TYPE_INT 0
233 #define ATTR_NAME_TYPE_STR 1
234 static const AttrNameMap attr_names[]=
235 {
236     { "SizeLength",       ATTR_NAME_TYPE_INT,
237       offsetof(RTPPayloadData, sizelength) },
238     { "IndexLength",      ATTR_NAME_TYPE_INT,
239       offsetof(RTPPayloadData, indexlength) },
240     { "IndexDeltaLength", ATTR_NAME_TYPE_INT,
241       offsetof(RTPPayloadData, indexdeltalength) },
242     { "profile-level-id", ATTR_NAME_TYPE_INT,
243       offsetof(RTPPayloadData, profile_level_id) },
244     { "StreamType",       ATTR_NAME_TYPE_INT,
245       offsetof(RTPPayloadData, streamtype) },
246     { "mode",             ATTR_NAME_TYPE_STR,
247       offsetof(RTPPayloadData, mode) },
248     { NULL, -1, -1 },
249 };
250
251 /* parse the attribute line from the fmtp a line of an sdp response. This
252  * is broken out as a function because it is used in rtp_h264.c, which is
253  * forthcoming. */
254 int ff_rtsp_next_attr_and_value(const char **p, char *attr, int attr_size,
255                                 char *value, int value_size)
256 {
257     skip_spaces(p);
258     if (**p) {
259         get_word_sep(attr, attr_size, "=", p);
260         if (**p == '=')
261             (*p)++;
262         get_word_sep(value, value_size, ";", p);
263         if (**p == ';')
264             (*p)++;
265         return 1;
266     }
267     return 0;
268 }
269
270 /* parse a SDP line and save stream attributes */
271 static void sdp_parse_fmtp(AVStream *st, const char *p)
272 {
273     char attr[256];
274     /* Vorbis setup headers can be up to 12KB and are sent base64
275      * encoded, giving a 12KB * (4/3) = 16KB FMTP line. */
276     char value[16384];
277     int i;
278     RTSPStream *rtsp_st = st->priv_data;
279     AVCodecContext *codec = st->codec;
280     RTPPayloadData *rtp_payload_data = &rtsp_st->rtp_payload_data;
281
282     /* loop on each attribute */
283     while (ff_rtsp_next_attr_and_value(&p, attr, sizeof(attr),
284                                        value, sizeof(value))) {
285         /* grab the codec extra_data from the config parameter of the fmtp
286          * line */
287         sdp_parse_fmtp_config(codec, rtsp_st->dynamic_protocol_context,
288                               attr, value);
289         /* Looking for a known attribute */
290         for (i = 0; attr_names[i].str; ++i) {
291             if (!strcasecmp(attr, attr_names[i].str)) {
292                 if (attr_names[i].type == ATTR_NAME_TYPE_INT) {
293                     *(int *)((char *)rtp_payload_data +
294                         attr_names[i].offset) = atoi(value);
295                 } else if (attr_names[i].type == ATTR_NAME_TYPE_STR)
296                     *(char **)((char *)rtp_payload_data +
297                         attr_names[i].offset) = av_strdup(value);
298             }
299         }
300     }
301 }
302
303 /** Parse a string p in the form of Range:npt=xx-xx, and determine the start
304  *  and end time.
305  *  Used for seeking in the rtp stream.
306  */
307 static void rtsp_parse_range_npt(const char *p, int64_t *start, int64_t *end)
308 {
309     char buf[256];
310
311     skip_spaces(&p);
312     if (!av_stristart(p, "npt=", &p))
313         return;
314
315     *start = AV_NOPTS_VALUE;
316     *end = AV_NOPTS_VALUE;
317
318     get_word_sep(buf, sizeof(buf), "-", &p);
319     *start = parse_date(buf, 1);
320     if (*p == '-') {
321         p++;
322         get_word_sep(buf, sizeof(buf), "-", &p);
323         *end = parse_date(buf, 1);
324     }
325 //    av_log(NULL, AV_LOG_DEBUG, "Range Start: %lld\n", *start);
326 //    av_log(NULL, AV_LOG_DEBUG, "Range End: %lld\n", *end);
327 }
328
329 typedef struct SDPParseState {
330     /* SDP only */
331     struct in_addr default_ip;
332     int            default_ttl;
333     int            skip_media;  ///< set if an unknown m= line occurs
334 } SDPParseState;
335
336 static void sdp_parse_line(AVFormatContext *s, SDPParseState *s1,
337                            int letter, const char *buf)
338 {
339     RTSPState *rt = s->priv_data;
340     char buf1[64], st_type[64];
341     const char *p;
342     enum AVMediaType codec_type;
343     int payload_type, i;
344     AVStream *st;
345     RTSPStream *rtsp_st;
346     struct in_addr sdp_ip;
347     int ttl;
348
349     dprintf(s, "sdp: %c='%s'\n", letter, buf);
350
351     p = buf;
352     if (s1->skip_media && letter != 'm')
353         return;
354     switch (letter) {
355     case 'c':
356         get_word(buf1, sizeof(buf1), &p);
357         if (strcmp(buf1, "IN") != 0)
358             return;
359         get_word(buf1, sizeof(buf1), &p);
360         if (strcmp(buf1, "IP4") != 0)
361             return;
362         get_word_sep(buf1, sizeof(buf1), "/", &p);
363         if (ff_inet_aton(buf1, &sdp_ip) == 0)
364             return;
365         ttl = 16;
366         if (*p == '/') {
367             p++;
368             get_word_sep(buf1, sizeof(buf1), "/", &p);
369             ttl = atoi(buf1);
370         }
371         if (s->nb_streams == 0) {
372             s1->default_ip = sdp_ip;
373             s1->default_ttl = ttl;
374         } else {
375             st = s->streams[s->nb_streams - 1];
376             rtsp_st = st->priv_data;
377             rtsp_st->sdp_ip = sdp_ip;
378             rtsp_st->sdp_ttl = ttl;
379         }
380         break;
381     case 's':
382         av_metadata_set(&s->metadata, "title", p);
383         break;
384     case 'i':
385         if (s->nb_streams == 0) {
386             av_metadata_set(&s->metadata, "comment", p);
387             break;
388         }
389         break;
390     case 'm':
391         /* new stream */
392         s1->skip_media = 0;
393         get_word(st_type, sizeof(st_type), &p);
394         if (!strcmp(st_type, "audio")) {
395             codec_type = AVMEDIA_TYPE_AUDIO;
396         } else if (!strcmp(st_type, "video")) {
397             codec_type = AVMEDIA_TYPE_VIDEO;
398         } else if (!strcmp(st_type, "application")) {
399             codec_type = AVMEDIA_TYPE_DATA;
400         } else {
401             s1->skip_media = 1;
402             return;
403         }
404         rtsp_st = av_mallocz(sizeof(RTSPStream));
405         if (!rtsp_st)
406             return;
407         rtsp_st->stream_index = -1;
408         dynarray_add(&rt->rtsp_streams, &rt->nb_rtsp_streams, rtsp_st);
409
410         rtsp_st->sdp_ip = s1->default_ip;
411         rtsp_st->sdp_ttl = s1->default_ttl;
412
413         get_word(buf1, sizeof(buf1), &p); /* port */
414         rtsp_st->sdp_port = atoi(buf1);
415
416         get_word(buf1, sizeof(buf1), &p); /* protocol (ignored) */
417
418         /* XXX: handle list of formats */
419         get_word(buf1, sizeof(buf1), &p); /* format list */
420         rtsp_st->sdp_payload_type = atoi(buf1);
421
422         if (!strcmp(ff_rtp_enc_name(rtsp_st->sdp_payload_type), "MP2T")) {
423             /* no corresponding stream */
424         } else {
425             st = av_new_stream(s, 0);
426             if (!st)
427                 return;
428             st->priv_data = rtsp_st;
429             rtsp_st->stream_index = st->index;
430             st->codec->codec_type = codec_type;
431             if (rtsp_st->sdp_payload_type < RTP_PT_PRIVATE) {
432                 /* if standard payload type, we can find the codec right now */
433                 ff_rtp_get_codec_info(st->codec, rtsp_st->sdp_payload_type);
434             }
435         }
436         /* put a default control url */
437         av_strlcpy(rtsp_st->control_url, rt->control_uri,
438                    sizeof(rtsp_st->control_url));
439         break;
440     case 'a':
441         if (av_strstart(p, "control:", &p)) {
442             if (s->nb_streams == 0) {
443                 if (!strncmp(p, "rtsp://", 7))
444                     av_strlcpy(rt->control_uri, p,
445                                sizeof(rt->control_uri));
446             } else {
447             char proto[32];
448             /* get the control url */
449             st = s->streams[s->nb_streams - 1];
450             rtsp_st = st->priv_data;
451
452             /* XXX: may need to add full url resolution */
453             ff_url_split(proto, sizeof(proto), NULL, 0, NULL, 0,
454                          NULL, NULL, 0, p);
455             if (proto[0] == '\0') {
456                 /* relative control URL */
457                 if (rtsp_st->control_url[strlen(rtsp_st->control_url)-1]!='/')
458                 av_strlcat(rtsp_st->control_url, "/",
459                            sizeof(rtsp_st->control_url));
460                 av_strlcat(rtsp_st->control_url, p,
461                            sizeof(rtsp_st->control_url));
462             } else
463                 av_strlcpy(rtsp_st->control_url, p,
464                            sizeof(rtsp_st->control_url));
465             }
466         } else if (av_strstart(p, "rtpmap:", &p) && s->nb_streams > 0) {
467             /* NOTE: rtpmap is only supported AFTER the 'm=' tag */
468             get_word(buf1, sizeof(buf1), &p);
469             payload_type = atoi(buf1);
470             st = s->streams[s->nb_streams - 1];
471             rtsp_st = st->priv_data;
472             sdp_parse_rtpmap(s, st->codec, rtsp_st, payload_type, p);
473         } else if (av_strstart(p, "fmtp:", &p)) {
474             /* NOTE: fmtp is only supported AFTER the 'a=rtpmap:xxx' tag */
475             get_word(buf1, sizeof(buf1), &p);
476             payload_type = atoi(buf1);
477             for (i = 0; i < s->nb_streams; i++) {
478                 st      = s->streams[i];
479                 rtsp_st = st->priv_data;
480                 if (rtsp_st->sdp_payload_type == payload_type) {
481                     if (!(rtsp_st->dynamic_handler &&
482                           rtsp_st->dynamic_handler->parse_sdp_a_line &&
483                           rtsp_st->dynamic_handler->parse_sdp_a_line(s,
484                               i, rtsp_st->dynamic_protocol_context, buf)))
485                         sdp_parse_fmtp(st, p);
486                 }
487             }
488         } else if (av_strstart(p, "framesize:", &p)) {
489             // let dynamic protocol handlers have a stab at the line.
490             get_word(buf1, sizeof(buf1), &p);
491             payload_type = atoi(buf1);
492             for (i = 0; i < s->nb_streams; i++) {
493                 st      = s->streams[i];
494                 rtsp_st = st->priv_data;
495                 if (rtsp_st->sdp_payload_type == payload_type &&
496                     rtsp_st->dynamic_handler &&
497                     rtsp_st->dynamic_handler->parse_sdp_a_line)
498                     rtsp_st->dynamic_handler->parse_sdp_a_line(s, i,
499                         rtsp_st->dynamic_protocol_context, buf);
500             }
501         } else if (av_strstart(p, "range:", &p)) {
502             int64_t start, end;
503
504             // this is so that seeking on a streamed file can work.
505             rtsp_parse_range_npt(p, &start, &end);
506             s->start_time = start;
507             /* AV_NOPTS_VALUE means live broadcast (and can't seek) */
508             s->duration   = (end == AV_NOPTS_VALUE) ?
509                             AV_NOPTS_VALUE : end - start;
510         } else if (av_strstart(p, "IsRealDataType:integer;",&p)) {
511             if (atoi(p) == 1)
512                 rt->transport = RTSP_TRANSPORT_RDT;
513         } else {
514             if (rt->server_type == RTSP_SERVER_WMS)
515                 ff_wms_parse_sdp_a_line(s, p);
516             if (s->nb_streams > 0) {
517                 if (rt->server_type == RTSP_SERVER_REAL)
518                     ff_real_parse_sdp_a_line(s, s->nb_streams - 1, p);
519
520                 rtsp_st = s->streams[s->nb_streams - 1]->priv_data;
521                 if (rtsp_st->dynamic_handler &&
522                     rtsp_st->dynamic_handler->parse_sdp_a_line)
523                     rtsp_st->dynamic_handler->parse_sdp_a_line(s,
524                         s->nb_streams - 1,
525                         rtsp_st->dynamic_protocol_context, buf);
526             }
527         }
528         break;
529     }
530 }
531
532 static int sdp_parse(AVFormatContext *s, const char *content)
533 {
534     const char *p;
535     int letter;
536     /* Some SDP lines, particularly for Realmedia or ASF RTSP streams,
537      * contain long SDP lines containing complete ASF Headers (several
538      * kB) or arrays of MDPR (RM stream descriptor) headers plus
539      * "rulebooks" describing their properties. Therefore, the SDP line
540      * buffer is large.
541      *
542      * The Vorbis FMTP line can be up to 16KB - see sdp_parse_fmtp. */
543     char buf[16384], *q;
544     SDPParseState sdp_parse_state, *s1 = &sdp_parse_state;
545
546     memset(s1, 0, sizeof(SDPParseState));
547     p = content;
548     for (;;) {
549         skip_spaces(&p);
550         letter = *p;
551         if (letter == '\0')
552             break;
553         p++;
554         if (*p != '=')
555             goto next_line;
556         p++;
557         /* get the content */
558         q = buf;
559         while (*p != '\n' && *p != '\r' && *p != '\0') {
560             if ((q - buf) < sizeof(buf) - 1)
561                 *q++ = *p;
562             p++;
563         }
564         *q = '\0';
565         sdp_parse_line(s, s1, letter, buf);
566     next_line:
567         while (*p != '\n' && *p != '\0')
568             p++;
569         if (*p == '\n')
570             p++;
571     }
572     return 0;
573 }
574
575 /* close and free RTSP streams */
576 void ff_rtsp_close_streams(AVFormatContext *s)
577 {
578     RTSPState *rt = s->priv_data;
579     int i;
580     RTSPStream *rtsp_st;
581
582     for (i = 0; i < rt->nb_rtsp_streams; i++) {
583         rtsp_st = rt->rtsp_streams[i];
584         if (rtsp_st) {
585             if (rtsp_st->transport_priv) {
586                 if (s->oformat) {
587                     AVFormatContext *rtpctx = rtsp_st->transport_priv;
588                     av_write_trailer(rtpctx);
589                     if (rt->lower_transport == RTSP_LOWER_TRANSPORT_TCP) {
590                         uint8_t *ptr;
591                         url_close_dyn_buf(rtpctx->pb, &ptr);
592                         av_free(ptr);
593                     } else {
594                         url_fclose(rtpctx->pb);
595                     }
596                     av_metadata_free(&rtpctx->streams[0]->metadata);
597                     av_metadata_free(&rtpctx->metadata);
598                     av_free(rtpctx->streams[0]);
599                     av_free(rtpctx);
600                 } else if (rt->transport == RTSP_TRANSPORT_RDT)
601                     ff_rdt_parse_close(rtsp_st->transport_priv);
602                 else
603                     rtp_parse_close(rtsp_st->transport_priv);
604             }
605             if (rtsp_st->rtp_handle)
606                 url_close(rtsp_st->rtp_handle);
607             if (rtsp_st->dynamic_handler && rtsp_st->dynamic_protocol_context)
608                 rtsp_st->dynamic_handler->close(
609                     rtsp_st->dynamic_protocol_context);
610         }
611     }
612     av_free(rt->rtsp_streams);
613     if (rt->asf_ctx) {
614         av_close_input_stream (rt->asf_ctx);
615         rt->asf_ctx = NULL;
616     }
617 }
618
619 static void *rtsp_rtp_mux_open(AVFormatContext *s, AVStream *st,
620                                URLContext *handle)
621 {
622     RTSPState *rt = s->priv_data;
623     AVFormatContext *rtpctx;
624     int ret;
625     AVOutputFormat *rtp_format = av_guess_format("rtp", NULL, NULL);
626
627     if (!rtp_format)
628         return NULL;
629
630     /* Allocate an AVFormatContext for each output stream */
631     rtpctx = avformat_alloc_context();
632     if (!rtpctx)
633         return NULL;
634
635     rtpctx->oformat = rtp_format;
636     if (!av_new_stream(rtpctx, 0)) {
637         av_free(rtpctx);
638         return NULL;
639     }
640     /* Copy the max delay setting; the rtp muxer reads this. */
641     rtpctx->max_delay = s->max_delay;
642     /* Copy other stream parameters. */
643     rtpctx->streams[0]->sample_aspect_ratio = st->sample_aspect_ratio;
644
645     /* Set the synchronized start time. */
646     rtpctx->start_time_realtime = rt->start_time;
647
648     /* Remove the local codec, link to the original codec
649      * context instead, to give the rtp muxer access to
650      * codec parameters. */
651     av_free(rtpctx->streams[0]->codec);
652     rtpctx->streams[0]->codec = st->codec;
653
654     if (handle) {
655         url_fdopen(&rtpctx->pb, handle);
656     } else
657         url_open_dyn_packet_buf(&rtpctx->pb, RTSP_TCP_MAX_PACKET_SIZE);
658     ret = av_write_header(rtpctx);
659
660     if (ret) {
661         if (handle) {
662             url_fclose(rtpctx->pb);
663         } else {
664             uint8_t *ptr;
665             url_close_dyn_buf(rtpctx->pb, &ptr);
666             av_free(ptr);
667         }
668         av_free(rtpctx->streams[0]);
669         av_free(rtpctx);
670         return NULL;
671     }
672
673     /* Copy the RTP AVStream timebase back to the original AVStream */
674     st->time_base = rtpctx->streams[0]->time_base;
675     return rtpctx;
676 }
677
678 static int rtsp_open_transport_ctx(AVFormatContext *s, RTSPStream *rtsp_st)
679 {
680     RTSPState *rt = s->priv_data;
681     AVStream *st = NULL;
682
683     /* open the RTP context */
684     if (rtsp_st->stream_index >= 0)
685         st = s->streams[rtsp_st->stream_index];
686     if (!st)
687         s->ctx_flags |= AVFMTCTX_NOHEADER;
688
689     if (s->oformat) {
690         rtsp_st->transport_priv = rtsp_rtp_mux_open(s, st, rtsp_st->rtp_handle);
691         /* Ownership of rtp_handle is passed to the rtp mux context */
692         rtsp_st->rtp_handle = NULL;
693     } else if (rt->transport == RTSP_TRANSPORT_RDT)
694         rtsp_st->transport_priv = ff_rdt_parse_open(s, st->index,
695                                             rtsp_st->dynamic_protocol_context,
696                                             rtsp_st->dynamic_handler);
697     else
698         rtsp_st->transport_priv = rtp_parse_open(s, st, rtsp_st->rtp_handle,
699                                          rtsp_st->sdp_payload_type,
700                                          &rtsp_st->rtp_payload_data);
701
702     if (!rtsp_st->transport_priv) {
703          return AVERROR(ENOMEM);
704     } else if (rt->transport != RTSP_TRANSPORT_RDT) {
705         if (rtsp_st->dynamic_handler) {
706             rtp_parse_set_dynamic_protocol(rtsp_st->transport_priv,
707                                            rtsp_st->dynamic_protocol_context,
708                                            rtsp_st->dynamic_handler);
709         }
710     }
711
712     return 0;
713 }
714
715 #if CONFIG_RTSP_DEMUXER || CONFIG_RTSP_MUXER
716 static int rtsp_probe(AVProbeData *p)
717 {
718     if (av_strstart(p->filename, "rtsp:", NULL))
719         return AVPROBE_SCORE_MAX;
720     return 0;
721 }
722
723 static void rtsp_parse_range(int *min_ptr, int *max_ptr, const char **pp)
724 {
725     const char *p;
726     int v;
727
728     p = *pp;
729     skip_spaces(&p);
730     v = strtol(p, (char **)&p, 10);
731     if (*p == '-') {
732         p++;
733         *min_ptr = v;
734         v = strtol(p, (char **)&p, 10);
735         *max_ptr = v;
736     } else {
737         *min_ptr = v;
738         *max_ptr = v;
739     }
740     *pp = p;
741 }
742
743 /* XXX: only one transport specification is parsed */
744 static void rtsp_parse_transport(RTSPMessageHeader *reply, const char *p)
745 {
746     char transport_protocol[16];
747     char profile[16];
748     char lower_transport[16];
749     char parameter[16];
750     RTSPTransportField *th;
751     char buf[256];
752
753     reply->nb_transports = 0;
754
755     for (;;) {
756         skip_spaces(&p);
757         if (*p == '\0')
758             break;
759
760         th = &reply->transports[reply->nb_transports];
761
762         get_word_sep(transport_protocol, sizeof(transport_protocol),
763                      "/", &p);
764         if (!strcasecmp (transport_protocol, "rtp")) {
765             get_word_sep(profile, sizeof(profile), "/;,", &p);
766             lower_transport[0] = '\0';
767             /* rtp/avp/<protocol> */
768             if (*p == '/') {
769                 get_word_sep(lower_transport, sizeof(lower_transport),
770                              ";,", &p);
771             }
772             th->transport = RTSP_TRANSPORT_RTP;
773         } else if (!strcasecmp (transport_protocol, "x-pn-tng") ||
774                    !strcasecmp (transport_protocol, "x-real-rdt")) {
775             /* x-pn-tng/<protocol> */
776             get_word_sep(lower_transport, sizeof(lower_transport), "/;,", &p);
777             profile[0] = '\0';
778             th->transport = RTSP_TRANSPORT_RDT;
779         }
780         if (!strcasecmp(lower_transport, "TCP"))
781             th->lower_transport = RTSP_LOWER_TRANSPORT_TCP;
782         else
783             th->lower_transport = RTSP_LOWER_TRANSPORT_UDP;
784
785         if (*p == ';')
786             p++;
787         /* get each parameter */
788         while (*p != '\0' && *p != ',') {
789             get_word_sep(parameter, sizeof(parameter), "=;,", &p);
790             if (!strcmp(parameter, "port")) {
791                 if (*p == '=') {
792                     p++;
793                     rtsp_parse_range(&th->port_min, &th->port_max, &p);
794                 }
795             } else if (!strcmp(parameter, "client_port")) {
796                 if (*p == '=') {
797                     p++;
798                     rtsp_parse_range(&th->client_port_min,
799                                      &th->client_port_max, &p);
800                 }
801             } else if (!strcmp(parameter, "server_port")) {
802                 if (*p == '=') {
803                     p++;
804                     rtsp_parse_range(&th->server_port_min,
805                                      &th->server_port_max, &p);
806                 }
807             } else if (!strcmp(parameter, "interleaved")) {
808                 if (*p == '=') {
809                     p++;
810                     rtsp_parse_range(&th->interleaved_min,
811                                      &th->interleaved_max, &p);
812                 }
813             } else if (!strcmp(parameter, "multicast")) {
814                 if (th->lower_transport == RTSP_LOWER_TRANSPORT_UDP)
815                     th->lower_transport = RTSP_LOWER_TRANSPORT_UDP_MULTICAST;
816             } else if (!strcmp(parameter, "ttl")) {
817                 if (*p == '=') {
818                     p++;
819                     th->ttl = strtol(p, (char **)&p, 10);
820                 }
821             } else if (!strcmp(parameter, "destination")) {
822                 struct in_addr ipaddr;
823
824                 if (*p == '=') {
825                     p++;
826                     get_word_sep(buf, sizeof(buf), ";,", &p);
827                     if (ff_inet_aton(buf, &ipaddr))
828                         th->destination = ntohl(ipaddr.s_addr);
829                 }
830             }
831             while (*p != ';' && *p != '\0' && *p != ',')
832                 p++;
833             if (*p == ';')
834                 p++;
835         }
836         if (*p == ',')
837             p++;
838
839         reply->nb_transports++;
840     }
841 }
842
843 void ff_rtsp_parse_line(RTSPMessageHeader *reply, const char *buf,
844                         HTTPAuthState *auth_state)
845 {
846     const char *p;
847
848     /* NOTE: we do case independent match for broken servers */
849     p = buf;
850     if (av_stristart(p, "Session:", &p)) {
851         int t;
852         get_word_sep(reply->session_id, sizeof(reply->session_id), ";", &p);
853         if (av_stristart(p, ";timeout=", &p) &&
854             (t = strtol(p, NULL, 10)) > 0) {
855             reply->timeout = t;
856         }
857     } else if (av_stristart(p, "Content-Length:", &p)) {
858         reply->content_length = strtol(p, NULL, 10);
859     } else if (av_stristart(p, "Transport:", &p)) {
860         rtsp_parse_transport(reply, p);
861     } else if (av_stristart(p, "CSeq:", &p)) {
862         reply->seq = strtol(p, NULL, 10);
863     } else if (av_stristart(p, "Range:", &p)) {
864         rtsp_parse_range_npt(p, &reply->range_start, &reply->range_end);
865     } else if (av_stristart(p, "RealChallenge1:", &p)) {
866         skip_spaces(&p);
867         av_strlcpy(reply->real_challenge, p, sizeof(reply->real_challenge));
868     } else if (av_stristart(p, "Server:", &p)) {
869         skip_spaces(&p);
870         av_strlcpy(reply->server, p, sizeof(reply->server));
871     } else if (av_stristart(p, "Notice:", &p) ||
872                av_stristart(p, "X-Notice:", &p)) {
873         reply->notice = strtol(p, NULL, 10);
874     } else if (av_stristart(p, "Location:", &p)) {
875         skip_spaces(&p);
876         av_strlcpy(reply->location, p , sizeof(reply->location));
877     } else if (av_stristart(p, "WWW-Authenticate:", &p) && auth_state) {
878         skip_spaces(&p);
879         ff_http_auth_handle_header(auth_state, "WWW-Authenticate", p);
880     } else if (av_stristart(p, "Authentication-Info:", &p) && auth_state) {
881         skip_spaces(&p);
882         ff_http_auth_handle_header(auth_state, "Authentication-Info", p);
883     }
884 }
885
886 /* skip a RTP/TCP interleaved packet */
887 void ff_rtsp_skip_packet(AVFormatContext *s)
888 {
889     RTSPState *rt = s->priv_data;
890     int ret, len, len1;
891     uint8_t buf[1024];
892
893     ret = url_read_complete(rt->rtsp_hd, buf, 3);
894     if (ret != 3)
895         return;
896     len = AV_RB16(buf + 1);
897
898     dprintf(s, "skipping RTP packet len=%d\n", len);
899
900     /* skip payload */
901     while (len > 0) {
902         len1 = len;
903         if (len1 > sizeof(buf))
904             len1 = sizeof(buf);
905         ret = url_read_complete(rt->rtsp_hd, buf, len1);
906         if (ret != len1)
907             return;
908         len -= len1;
909     }
910 }
911
912 int ff_rtsp_read_reply(AVFormatContext *s, RTSPMessageHeader *reply,
913                        unsigned char **content_ptr,
914                        int return_on_interleaved_data)
915 {
916     RTSPState *rt = s->priv_data;
917     char buf[4096], buf1[1024], *q;
918     unsigned char ch;
919     const char *p;
920     int ret, content_length, line_count = 0;
921     unsigned char *content = NULL;
922
923     memset(reply, 0, sizeof(*reply));
924
925     /* parse reply (XXX: use buffers) */
926     rt->last_reply[0] = '\0';
927     for (;;) {
928         q = buf;
929         for (;;) {
930             ret = url_read_complete(rt->rtsp_hd, &ch, 1);
931 #ifdef DEBUG_RTP_TCP
932             dprintf(s, "ret=%d c=%02x [%c]\n", ret, ch, ch);
933 #endif
934             if (ret != 1)
935                 return -1;
936             if (ch == '\n')
937                 break;
938             if (ch == '$') {
939                 /* XXX: only parse it if first char on line ? */
940                 if (return_on_interleaved_data) {
941                     return 1;
942                 } else
943                     ff_rtsp_skip_packet(s);
944             } else if (ch != '\r') {
945                 if ((q - buf) < sizeof(buf) - 1)
946                     *q++ = ch;
947             }
948         }
949         *q = '\0';
950
951         dprintf(s, "line='%s'\n", buf);
952
953         /* test if last line */
954         if (buf[0] == '\0')
955             break;
956         p = buf;
957         if (line_count == 0) {
958             /* get reply code */
959             get_word(buf1, sizeof(buf1), &p);
960             get_word(buf1, sizeof(buf1), &p);
961             reply->status_code = atoi(buf1);
962         } else {
963             ff_rtsp_parse_line(reply, p, &rt->auth_state);
964             av_strlcat(rt->last_reply, p,    sizeof(rt->last_reply));
965             av_strlcat(rt->last_reply, "\n", sizeof(rt->last_reply));
966         }
967         line_count++;
968     }
969
970     if (rt->session_id[0] == '\0' && reply->session_id[0] != '\0')
971         av_strlcpy(rt->session_id, reply->session_id, sizeof(rt->session_id));
972
973     content_length = reply->content_length;
974     if (content_length > 0) {
975         /* leave some room for a trailing '\0' (useful for simple parsing) */
976         content = av_malloc(content_length + 1);
977         (void)url_read_complete(rt->rtsp_hd, content, content_length);
978         content[content_length] = '\0';
979     }
980     if (content_ptr)
981         *content_ptr = content;
982     else
983         av_free(content);
984
985     if (rt->seq != reply->seq) {
986         av_log(s, AV_LOG_WARNING, "CSeq %d expected, %d received.\n",
987             rt->seq, reply->seq);
988     }
989
990     /* EOS */
991     if (reply->notice == 2101 /* End-of-Stream Reached */      ||
992         reply->notice == 2104 /* Start-of-Stream Reached */    ||
993         reply->notice == 2306 /* Continuous Feed Terminated */) {
994         rt->state = RTSP_STATE_IDLE;
995     } else if (reply->notice >= 4400 && reply->notice < 5500) {
996         return AVERROR(EIO); /* data or server error */
997     } else if (reply->notice == 2401 /* Ticket Expired */ ||
998              (reply->notice >= 5500 && reply->notice < 5600) /* end of term */ )
999         return AVERROR(EPERM);
1000
1001     return 0;
1002 }
1003
1004 void ff_rtsp_send_cmd_with_content_async(AVFormatContext *s,
1005                                          const char *method, const char *url,
1006                                          const char *headers,
1007                                          const unsigned char *send_content,
1008                                          int send_content_length)
1009 {
1010     RTSPState *rt = s->priv_data;
1011     char buf[4096];
1012
1013     rt->seq++;
1014     snprintf(buf, sizeof(buf), "%s %s RTSP/1.0\r\n", method, url);
1015     if (headers)
1016         av_strlcat(buf, headers, sizeof(buf));
1017     av_strlcatf(buf, sizeof(buf), "CSeq: %d\r\n", rt->seq);
1018     if (rt->session_id[0] != '\0' && (!headers ||
1019         !strstr(headers, "\nIf-Match:"))) {
1020         av_strlcatf(buf, sizeof(buf), "Session: %s\r\n", rt->session_id);
1021     }
1022     if (rt->auth[0]) {
1023         char *str = ff_http_auth_create_response(&rt->auth_state,
1024                                                  rt->auth, url, method);
1025         if (str)
1026             av_strlcat(buf, str, sizeof(buf));
1027         av_free(str);
1028     }
1029     if (send_content_length > 0 && send_content)
1030         av_strlcatf(buf, sizeof(buf), "Content-Length: %d\r\n", send_content_length);
1031     av_strlcat(buf, "\r\n", sizeof(buf));
1032
1033     dprintf(s, "Sending:\n%s--\n", buf);
1034
1035     url_write(rt->rtsp_hd, buf, strlen(buf));
1036     if (send_content_length > 0 && send_content)
1037         url_write(rt->rtsp_hd, send_content, send_content_length);
1038     rt->last_cmd_time = av_gettime();
1039 }
1040
1041 void ff_rtsp_send_cmd_async(AVFormatContext *s, const char *method,
1042                             const char *url, const char *headers)
1043 {
1044     ff_rtsp_send_cmd_with_content_async(s, method, url, headers, NULL, 0);
1045 }
1046
1047 void ff_rtsp_send_cmd(AVFormatContext *s, const char *method, const char *url,
1048                       const char *headers, RTSPMessageHeader *reply,
1049                       unsigned char **content_ptr)
1050 {
1051     ff_rtsp_send_cmd_with_content(s, method, url, headers, reply,
1052                                   content_ptr, NULL, 0);
1053 }
1054
1055 void ff_rtsp_send_cmd_with_content(AVFormatContext *s,
1056                                    const char *method, const char *url,
1057                                    const char *header,
1058                                    RTSPMessageHeader *reply,
1059                                    unsigned char **content_ptr,
1060                                    const unsigned char *send_content,
1061                                    int send_content_length)
1062 {
1063     RTSPState *rt = s->priv_data;
1064     HTTPAuthType cur_auth_type;
1065
1066 retry:
1067     cur_auth_type = rt->auth_state.auth_type;
1068     ff_rtsp_send_cmd_with_content_async(s, method, url, header,
1069                                         send_content, send_content_length);
1070
1071     ff_rtsp_read_reply(s, reply, content_ptr, 0);
1072
1073     if (reply->status_code == 401 && cur_auth_type == HTTP_AUTH_NONE &&
1074         rt->auth_state.auth_type != HTTP_AUTH_NONE)
1075         goto retry;
1076 }
1077
1078 /**
1079  * @return 0 on success, <0 on error, 1 if protocol is unavailable.
1080  */
1081 static int make_setup_request(AVFormatContext *s, const char *host, int port,
1082                               int lower_transport, const char *real_challenge)
1083 {
1084     RTSPState *rt = s->priv_data;
1085     int rtx, j, i, err, interleave = 0;
1086     RTSPStream *rtsp_st;
1087     RTSPMessageHeader reply1, *reply = &reply1;
1088     char cmd[2048];
1089     const char *trans_pref;
1090
1091     if (rt->transport == RTSP_TRANSPORT_RDT)
1092         trans_pref = "x-pn-tng";
1093     else
1094         trans_pref = "RTP/AVP";
1095
1096     /* default timeout: 1 minute */
1097     rt->timeout = 60;
1098
1099     /* for each stream, make the setup request */
1100     /* XXX: we assume the same server is used for the control of each
1101      * RTSP stream */
1102
1103     for (j = RTSP_RTP_PORT_MIN, i = 0; i < rt->nb_rtsp_streams; ++i) {
1104         char transport[2048];
1105
1106         /**
1107          * WMS serves all UDP data over a single connection, the RTX, which
1108          * isn't necessarily the first in the SDP but has to be the first
1109          * to be set up, else the second/third SETUP will fail with a 461.
1110          */
1111         if (lower_transport == RTSP_LOWER_TRANSPORT_UDP &&
1112              rt->server_type == RTSP_SERVER_WMS) {
1113             if (i == 0) {
1114                 /* rtx first */
1115                 for (rtx = 0; rtx < rt->nb_rtsp_streams; rtx++) {
1116                     int len = strlen(rt->rtsp_streams[rtx]->control_url);
1117                     if (len >= 4 &&
1118                         !strcmp(rt->rtsp_streams[rtx]->control_url + len - 4,
1119                                 "/rtx"))
1120                         break;
1121                 }
1122                 if (rtx == rt->nb_rtsp_streams)
1123                     return -1; /* no RTX found */
1124                 rtsp_st = rt->rtsp_streams[rtx];
1125             } else
1126                 rtsp_st = rt->rtsp_streams[i > rtx ? i : i - 1];
1127         } else
1128             rtsp_st = rt->rtsp_streams[i];
1129
1130         /* RTP/UDP */
1131         if (lower_transport == RTSP_LOWER_TRANSPORT_UDP) {
1132             char buf[256];
1133
1134             if (rt->server_type == RTSP_SERVER_WMS && i > 1) {
1135                 port = reply->transports[0].client_port_min;
1136                 goto have_port;
1137             }
1138
1139             /* first try in specified port range */
1140             if (RTSP_RTP_PORT_MIN != 0) {
1141                 while (j <= RTSP_RTP_PORT_MAX) {
1142                     ff_url_join(buf, sizeof(buf), "rtp", NULL, host, -1,
1143                                 "?localport=%d", j);
1144                     /* we will use two ports per rtp stream (rtp and rtcp) */
1145                     j += 2;
1146                     if (url_open(&rtsp_st->rtp_handle, buf, URL_RDWR) == 0)
1147                         goto rtp_opened;
1148                 }
1149             }
1150
1151 #if 0
1152             /* then try on any port */
1153             if (url_open(&rtsp_st->rtp_handle, "rtp://", URL_RDONLY) < 0) {
1154                 err = AVERROR_INVALIDDATA;
1155                 goto fail;
1156             }
1157 #endif
1158
1159         rtp_opened:
1160             port = rtp_get_local_port(rtsp_st->rtp_handle);
1161         have_port:
1162             snprintf(transport, sizeof(transport) - 1,
1163                      "%s/UDP;", trans_pref);
1164             if (rt->server_type != RTSP_SERVER_REAL)
1165                 av_strlcat(transport, "unicast;", sizeof(transport));
1166             av_strlcatf(transport, sizeof(transport),
1167                      "client_port=%d", port);
1168             if (rt->transport == RTSP_TRANSPORT_RTP &&
1169                 !(rt->server_type == RTSP_SERVER_WMS && i > 0))
1170                 av_strlcatf(transport, sizeof(transport), "-%d", port + 1);
1171         }
1172
1173         /* RTP/TCP */
1174         else if (lower_transport == RTSP_LOWER_TRANSPORT_TCP) {
1175             /** For WMS streams, the application streams are only used for
1176              * UDP. When trying to set it up for TCP streams, the server
1177              * will return an error. Therefore, we skip those streams. */
1178             if (rt->server_type == RTSP_SERVER_WMS &&
1179                 s->streams[rtsp_st->stream_index]->codec->codec_type ==
1180                     AVMEDIA_TYPE_DATA)
1181                 continue;
1182             snprintf(transport, sizeof(transport) - 1,
1183                      "%s/TCP;", trans_pref);
1184             if (rt->server_type == RTSP_SERVER_WMS)
1185                 av_strlcat(transport, "unicast;", sizeof(transport));
1186             av_strlcatf(transport, sizeof(transport),
1187                         "interleaved=%d-%d",
1188                         interleave, interleave + 1);
1189             interleave += 2;
1190         }
1191
1192         else if (lower_transport == RTSP_LOWER_TRANSPORT_UDP_MULTICAST) {
1193             snprintf(transport, sizeof(transport) - 1,
1194                      "%s/UDP;multicast", trans_pref);
1195         }
1196         if (s->oformat) {
1197             av_strlcat(transport, ";mode=receive", sizeof(transport));
1198         } else if (rt->server_type == RTSP_SERVER_REAL ||
1199                    rt->server_type == RTSP_SERVER_WMS)
1200             av_strlcat(transport, ";mode=play", sizeof(transport));
1201         snprintf(cmd, sizeof(cmd),
1202                  "Transport: %s\r\n",
1203                  transport);
1204         if (i == 0 && rt->server_type == RTSP_SERVER_REAL) {
1205             char real_res[41], real_csum[9];
1206             ff_rdt_calc_response_and_checksum(real_res, real_csum,
1207                                               real_challenge);
1208             av_strlcatf(cmd, sizeof(cmd),
1209                         "If-Match: %s\r\n"
1210                         "RealChallenge2: %s, sd=%s\r\n",
1211                         rt->session_id, real_res, real_csum);
1212         }
1213         ff_rtsp_send_cmd(s, "SETUP", rtsp_st->control_url, cmd, reply, NULL);
1214         if (reply->status_code == 461 /* Unsupported protocol */ && i == 0) {
1215             err = 1;
1216             goto fail;
1217         } else if (reply->status_code != RTSP_STATUS_OK ||
1218                    reply->nb_transports != 1) {
1219             err = AVERROR_INVALIDDATA;
1220             goto fail;
1221         }
1222
1223         /* XXX: same protocol for all streams is required */
1224         if (i > 0) {
1225             if (reply->transports[0].lower_transport != rt->lower_transport ||
1226                 reply->transports[0].transport != rt->transport) {
1227                 err = AVERROR_INVALIDDATA;
1228                 goto fail;
1229             }
1230         } else {
1231             rt->lower_transport = reply->transports[0].lower_transport;
1232             rt->transport = reply->transports[0].transport;
1233         }
1234
1235         /* close RTP connection if not choosen */
1236         if (reply->transports[0].lower_transport != RTSP_LOWER_TRANSPORT_UDP &&
1237             (lower_transport == RTSP_LOWER_TRANSPORT_UDP)) {
1238             url_close(rtsp_st->rtp_handle);
1239             rtsp_st->rtp_handle = NULL;
1240         }
1241
1242         switch(reply->transports[0].lower_transport) {
1243         case RTSP_LOWER_TRANSPORT_TCP:
1244             rtsp_st->interleaved_min = reply->transports[0].interleaved_min;
1245             rtsp_st->interleaved_max = reply->transports[0].interleaved_max;
1246             break;
1247
1248         case RTSP_LOWER_TRANSPORT_UDP: {
1249             char url[1024];
1250
1251             /* XXX: also use address if specified */
1252             ff_url_join(url, sizeof(url), "rtp", NULL, host,
1253                         reply->transports[0].server_port_min, NULL);
1254             if (!(rt->server_type == RTSP_SERVER_WMS && i > 1) &&
1255                 rtp_set_remote_url(rtsp_st->rtp_handle, url) < 0) {
1256                 err = AVERROR_INVALIDDATA;
1257                 goto fail;
1258             }
1259             /* Try to initialize the connection state in a
1260              * potential NAT router by sending dummy packets.
1261              * RTP/RTCP dummy packets are used for RDT, too.
1262              */
1263             if (!(rt->server_type == RTSP_SERVER_WMS && i > 1) && s->iformat)
1264                 rtp_send_punch_packets(rtsp_st->rtp_handle);
1265             break;
1266         }
1267         case RTSP_LOWER_TRANSPORT_UDP_MULTICAST: {
1268             char url[1024];
1269             struct in_addr in;
1270             int port, ttl;
1271
1272             if (reply->transports[0].destination) {
1273                 in.s_addr = htonl(reply->transports[0].destination);
1274                 port      = reply->transports[0].port_min;
1275                 ttl       = reply->transports[0].ttl;
1276             } else {
1277                 in        = rtsp_st->sdp_ip;
1278                 port      = rtsp_st->sdp_port;
1279                 ttl       = rtsp_st->sdp_ttl;
1280             }
1281             ff_url_join(url, sizeof(url), "rtp", NULL, inet_ntoa(in),
1282                         port, "?ttl=%d", ttl);
1283             if (url_open(&rtsp_st->rtp_handle, url, URL_RDWR) < 0) {
1284                 err = AVERROR_INVALIDDATA;
1285                 goto fail;
1286             }
1287             break;
1288         }
1289         }
1290
1291         if ((err = rtsp_open_transport_ctx(s, rtsp_st)))
1292             goto fail;
1293     }
1294
1295     if (reply->timeout > 0)
1296         rt->timeout = reply->timeout;
1297
1298     if (rt->server_type == RTSP_SERVER_REAL)
1299         rt->need_subscription = 1;
1300
1301     return 0;
1302
1303 fail:
1304     for (i = 0; i < rt->nb_rtsp_streams; i++) {
1305         if (rt->rtsp_streams[i]->rtp_handle) {
1306             url_close(rt->rtsp_streams[i]->rtp_handle);
1307             rt->rtsp_streams[i]->rtp_handle = NULL;
1308         }
1309     }
1310     return err;
1311 }
1312
1313 static int rtsp_read_play(AVFormatContext *s)
1314 {
1315     RTSPState *rt = s->priv_data;
1316     RTSPMessageHeader reply1, *reply = &reply1;
1317     char cmd[1024];
1318
1319     av_log(s, AV_LOG_DEBUG, "hello state=%d\n", rt->state);
1320
1321     if (!(rt->server_type == RTSP_SERVER_REAL && rt->need_subscription)) {
1322         if (rt->state == RTSP_STATE_PAUSED) {
1323             cmd[0] = 0;
1324         } else {
1325             snprintf(cmd, sizeof(cmd),
1326                      "Range: npt=%0.3f-\r\n",
1327                      (double)rt->seek_timestamp / AV_TIME_BASE);
1328         }
1329         ff_rtsp_send_cmd(s, "PLAY", rt->control_uri, cmd, reply, NULL);
1330         if (reply->status_code != RTSP_STATUS_OK) {
1331             return -1;
1332         }
1333     }
1334     rt->state = RTSP_STATE_STREAMING;
1335     return 0;
1336 }
1337
1338 static int rtsp_setup_input_streams(AVFormatContext *s, RTSPMessageHeader *reply)
1339 {
1340     RTSPState *rt = s->priv_data;
1341     char cmd[1024];
1342     unsigned char *content = NULL;
1343     int ret;
1344
1345     /* describe the stream */
1346     snprintf(cmd, sizeof(cmd),
1347              "Accept: application/sdp\r\n");
1348     if (rt->server_type == RTSP_SERVER_REAL) {
1349         /**
1350          * The Require: attribute is needed for proper streaming from
1351          * Realmedia servers.
1352          */
1353         av_strlcat(cmd,
1354                    "Require: com.real.retain-entity-for-setup\r\n",
1355                    sizeof(cmd));
1356     }
1357     ff_rtsp_send_cmd(s, "DESCRIBE", rt->control_uri, cmd, reply, &content);
1358     if (!content)
1359         return AVERROR_INVALIDDATA;
1360     if (reply->status_code != RTSP_STATUS_OK) {
1361         av_freep(&content);
1362         return AVERROR_INVALIDDATA;
1363     }
1364
1365     /* now we got the SDP description, we parse it */
1366     ret = sdp_parse(s, (const char *)content);
1367     av_freep(&content);
1368     if (ret < 0)
1369         return AVERROR_INVALIDDATA;
1370
1371     return 0;
1372 }
1373
1374 static int rtsp_setup_output_streams(AVFormatContext *s, const char *addr)
1375 {
1376     RTSPState *rt = s->priv_data;
1377     RTSPMessageHeader reply1, *reply = &reply1;
1378     int i;
1379     char *sdp;
1380     AVFormatContext sdp_ctx, *ctx_array[1];
1381
1382     rt->start_time = av_gettime();
1383
1384     /* Announce the stream */
1385     sdp = av_mallocz(8192);
1386     if (sdp == NULL)
1387         return AVERROR(ENOMEM);
1388     /* We create the SDP based on the RTSP AVFormatContext where we
1389      * aren't allowed to change the filename field. (We create the SDP
1390      * based on the RTSP context since the contexts for the RTP streams
1391      * don't exist yet.) In order to specify a custom URL with the actual
1392      * peer IP instead of the originally specified hostname, we create
1393      * a temporary copy of the AVFormatContext, where the custom URL is set.
1394      *
1395      * FIXME: Create the SDP without copying the AVFormatContext.
1396      * This either requires setting up the RTP stream AVFormatContexts
1397      * already here (complicating things immensely) or getting a more
1398      * flexible SDP creation interface.
1399      */
1400     sdp_ctx = *s;
1401     ff_url_join(sdp_ctx.filename, sizeof(sdp_ctx.filename),
1402                 "rtsp", NULL, addr, -1, NULL);
1403     ctx_array[0] = &sdp_ctx;
1404     if (avf_sdp_create(ctx_array, 1, sdp, 8192)) {
1405         av_free(sdp);
1406         return AVERROR_INVALIDDATA;
1407     }
1408     av_log(s, AV_LOG_INFO, "SDP:\n%s\n", sdp);
1409     ff_rtsp_send_cmd_with_content(s, "ANNOUNCE", rt->control_uri,
1410                                   "Content-Type: application/sdp\r\n",
1411                                   reply, NULL, sdp, strlen(sdp));
1412     av_free(sdp);
1413     if (reply->status_code != RTSP_STATUS_OK)
1414         return AVERROR_INVALIDDATA;
1415
1416     /* Set up the RTSPStreams for each AVStream */
1417     for (i = 0; i < s->nb_streams; i++) {
1418         RTSPStream *rtsp_st;
1419         AVStream *st = s->streams[i];
1420
1421         rtsp_st = av_mallocz(sizeof(RTSPStream));
1422         if (!rtsp_st)
1423             return AVERROR(ENOMEM);
1424         dynarray_add(&rt->rtsp_streams, &rt->nb_rtsp_streams, rtsp_st);
1425
1426         st->priv_data = rtsp_st;
1427         rtsp_st->stream_index = i;
1428
1429         av_strlcpy(rtsp_st->control_url, rt->control_uri, sizeof(rtsp_st->control_url));
1430         /* Note, this must match the relative uri set in the sdp content */
1431         av_strlcatf(rtsp_st->control_url, sizeof(rtsp_st->control_url),
1432                     "/streamid=%d", i);
1433     }
1434
1435     return 0;
1436 }
1437
1438 int ff_rtsp_connect(AVFormatContext *s)
1439 {
1440     RTSPState *rt = s->priv_data;
1441     char host[1024], path[1024], tcpname[1024], cmd[2048], auth[128];
1442     char *option_list, *option, *filename;
1443     URLContext *rtsp_hd;
1444     int port, err, tcp_fd;
1445     RTSPMessageHeader reply1 = {}, *reply = &reply1;
1446     int lower_transport_mask = 0;
1447     char real_challenge[64];
1448     struct sockaddr_storage peer;
1449     socklen_t peer_len = sizeof(peer);
1450
1451     if (!ff_network_init())
1452         return AVERROR(EIO);
1453 redirect:
1454     /* extract hostname and port */
1455     ff_url_split(NULL, 0, auth, sizeof(auth),
1456                  host, sizeof(host), &port, path, sizeof(path), s->filename);
1457     if (*auth) {
1458         av_strlcpy(rt->auth, auth, sizeof(rt->auth));
1459     }
1460     if (port < 0)
1461         port = RTSP_DEFAULT_PORT;
1462
1463     /* search for options */
1464     option_list = strrchr(path, '?');
1465     if (option_list) {
1466         /* Strip out the RTSP specific options, write out the rest of
1467          * the options back into the same string. */
1468         filename = option_list;
1469         while (option_list) {
1470             /* move the option pointer */
1471             option = ++option_list;
1472             option_list = strchr(option_list, '&');
1473             if (option_list)
1474                 *option_list = 0;
1475
1476             /* handle the options */
1477             if (!strcmp(option, "udp")) {
1478                 lower_transport_mask |= (1<< RTSP_LOWER_TRANSPORT_UDP);
1479             } else if (!strcmp(option, "multicast")) {
1480                 lower_transport_mask |= (1<< RTSP_LOWER_TRANSPORT_UDP_MULTICAST);
1481             } else if (!strcmp(option, "tcp")) {
1482                 lower_transport_mask |= (1<< RTSP_LOWER_TRANSPORT_TCP);
1483             } else {
1484                 /* Write options back into the buffer, using memmove instead
1485                  * of strcpy since the strings may overlap. */
1486                 int len = strlen(option);
1487                 memmove(++filename, option, len);
1488                 filename += len;
1489                 if (option_list) *filename = '&';
1490             }
1491         }
1492         *filename = 0;
1493     }
1494
1495     if (!lower_transport_mask)
1496         lower_transport_mask = (1 << RTSP_LOWER_TRANSPORT_NB) - 1;
1497
1498     if (s->oformat) {
1499         /* Only UDP or TCP - UDP multicast isn't supported. */
1500         lower_transport_mask &= (1 << RTSP_LOWER_TRANSPORT_UDP) |
1501                                 (1 << RTSP_LOWER_TRANSPORT_TCP);
1502         if (!lower_transport_mask) {
1503             av_log(s, AV_LOG_ERROR, "Unsupported lower transport method, "
1504                                     "only UDP and TCP are supported for output.\n");
1505             err = AVERROR(EINVAL);
1506             goto fail;
1507         }
1508     }
1509
1510     /* Construct the URI used in request; this is similar to s->filename,
1511      * but with authentication credentials removed and RTSP specific options
1512      * stripped out. */
1513     ff_url_join(rt->control_uri, sizeof(rt->control_uri), "rtsp", NULL,
1514                 host, port, "%s", path);
1515
1516     /* open the tcp connexion */
1517     ff_url_join(tcpname, sizeof(tcpname), "tcp", NULL, host, port, NULL);
1518     if (url_open(&rtsp_hd, tcpname, URL_RDWR) < 0) {
1519         err = AVERROR(EIO);
1520         goto fail;
1521     }
1522     rt->rtsp_hd = rtsp_hd;
1523     rt->seq = 0;
1524
1525     tcp_fd = url_get_file_handle(rtsp_hd);
1526     if (!getpeername(tcp_fd, (struct sockaddr*) &peer, &peer_len)) {
1527         getnameinfo((struct sockaddr*) &peer, peer_len, host, sizeof(host),
1528                     NULL, 0, NI_NUMERICHOST);
1529     }
1530
1531     /* request options supported by the server; this also detects server
1532      * type */
1533     for (rt->server_type = RTSP_SERVER_RTP;;) {
1534         cmd[0] = 0;
1535         if (rt->server_type == RTSP_SERVER_REAL)
1536             av_strlcat(cmd,
1537                        /**
1538                         * The following entries are required for proper
1539                         * streaming from a Realmedia server. They are
1540                         * interdependent in some way although we currently
1541                         * don't quite understand how. Values were copied
1542                         * from mplayer SVN r23589.
1543                         * @param CompanyID is a 16-byte ID in base64
1544                         * @param ClientChallenge is a 16-byte ID in hex
1545                         */
1546                        "ClientChallenge: 9e26d33f2984236010ef6253fb1887f7\r\n"
1547                        "PlayerStarttime: [28/03/2003:22:50:23 00:00]\r\n"
1548                        "CompanyID: KnKV4M4I/B2FjJ1TToLycw==\r\n"
1549                        "GUID: 00000000-0000-0000-0000-000000000000\r\n",
1550                        sizeof(cmd));
1551         ff_rtsp_send_cmd(s, "OPTIONS", rt->control_uri, cmd, reply, NULL);
1552         if (reply->status_code != RTSP_STATUS_OK) {
1553             err = AVERROR_INVALIDDATA;
1554             goto fail;
1555         }
1556
1557         /* detect server type if not standard-compliant RTP */
1558         if (rt->server_type != RTSP_SERVER_REAL && reply->real_challenge[0]) {
1559             rt->server_type = RTSP_SERVER_REAL;
1560             continue;
1561         } else if (!strncasecmp(reply->server, "WMServer/", 9)) {
1562             rt->server_type = RTSP_SERVER_WMS;
1563         } else if (rt->server_type == RTSP_SERVER_REAL)
1564             strcpy(real_challenge, reply->real_challenge);
1565         break;
1566     }
1567
1568     if (s->iformat)
1569         err = rtsp_setup_input_streams(s, reply);
1570     else
1571         err = rtsp_setup_output_streams(s, host);
1572     if (err)
1573         goto fail;
1574
1575     do {
1576         int lower_transport = ff_log2_tab[lower_transport_mask &
1577                                   ~(lower_transport_mask - 1)];
1578
1579         err = make_setup_request(s, host, port, lower_transport,
1580                                  rt->server_type == RTSP_SERVER_REAL ?
1581                                      real_challenge : NULL);
1582         if (err < 0)
1583             goto fail;
1584         lower_transport_mask &= ~(1 << lower_transport);
1585         if (lower_transport_mask == 0 && err == 1) {
1586             err = FF_NETERROR(EPROTONOSUPPORT);
1587             goto fail;
1588         }
1589     } while (err);
1590
1591     rt->state = RTSP_STATE_IDLE;
1592     rt->seek_timestamp = 0; /* default is to start stream at position zero */
1593     return 0;
1594  fail:
1595     ff_rtsp_close_streams(s);
1596     url_close(rt->rtsp_hd);
1597     if (reply->status_code >=300 && reply->status_code < 400 && s->iformat) {
1598         av_strlcpy(s->filename, reply->location, sizeof(s->filename));
1599         av_log(s, AV_LOG_INFO, "Status %d: Redirecting to %s\n",
1600                reply->status_code,
1601                s->filename);
1602         goto redirect;
1603     }
1604     ff_network_close();
1605     return err;
1606 }
1607 #endif
1608
1609 #if CONFIG_RTSP_DEMUXER
1610 static int rtsp_read_header(AVFormatContext *s,
1611                             AVFormatParameters *ap)
1612 {
1613     RTSPState *rt = s->priv_data;
1614     int ret;
1615
1616     ret = ff_rtsp_connect(s);
1617     if (ret)
1618         return ret;
1619
1620     if (ap->initial_pause) {
1621          /* do not start immediately */
1622     } else {
1623          if (rtsp_read_play(s) < 0) {
1624             ff_rtsp_close_streams(s);
1625             url_close(rt->rtsp_hd);
1626             return AVERROR_INVALIDDATA;
1627         }
1628     }
1629
1630     return 0;
1631 }
1632
1633 static int udp_read_packet(AVFormatContext *s, RTSPStream **prtsp_st,
1634                            uint8_t *buf, int buf_size)
1635 {
1636     RTSPState *rt = s->priv_data;
1637     RTSPStream *rtsp_st;
1638     fd_set rfds;
1639     int fd, fd_max, n, i, ret, tcp_fd, timeout_cnt = 0;
1640     struct timeval tv;
1641
1642     for (;;) {
1643         if (url_interrupt_cb())
1644             return AVERROR(EINTR);
1645         FD_ZERO(&rfds);
1646         if (rt->rtsp_hd) {
1647             tcp_fd = fd_max = url_get_file_handle(rt->rtsp_hd);
1648             FD_SET(tcp_fd, &rfds);
1649         } else {
1650             fd_max = 0;
1651             tcp_fd = -1;
1652         }
1653         for (i = 0; i < rt->nb_rtsp_streams; i++) {
1654             rtsp_st = rt->rtsp_streams[i];
1655             if (rtsp_st->rtp_handle) {
1656                 /* currently, we cannot probe RTCP handle because of
1657                  * blocking restrictions */
1658                 fd = url_get_file_handle(rtsp_st->rtp_handle);
1659                 if (fd > fd_max)
1660                     fd_max = fd;
1661                 FD_SET(fd, &rfds);
1662             }
1663         }
1664         tv.tv_sec = 0;
1665         tv.tv_usec = SELECT_TIMEOUT_MS * 1000;
1666         n = select(fd_max + 1, &rfds, NULL, NULL, &tv);
1667         if (n > 0) {
1668             timeout_cnt = 0;
1669             for (i = 0; i < rt->nb_rtsp_streams; i++) {
1670                 rtsp_st = rt->rtsp_streams[i];
1671                 if (rtsp_st->rtp_handle) {
1672                     fd = url_get_file_handle(rtsp_st->rtp_handle);
1673                     if (FD_ISSET(fd, &rfds)) {
1674                         ret = url_read(rtsp_st->rtp_handle, buf, buf_size);
1675                         if (ret > 0) {
1676                             *prtsp_st = rtsp_st;
1677                             return ret;
1678                         }
1679                     }
1680                 }
1681             }
1682 #if CONFIG_RTSP_DEMUXER
1683             if (tcp_fd != -1 && FD_ISSET(tcp_fd, &rfds)) {
1684                 RTSPMessageHeader reply;
1685
1686                 ret = ff_rtsp_read_reply(s, &reply, NULL, 0);
1687                 if (ret < 0)
1688                     return ret;
1689                 /* XXX: parse message */
1690                 if (rt->state != RTSP_STATE_STREAMING)
1691                     return 0;
1692             }
1693 #endif
1694         } else if (n == 0 && ++timeout_cnt >= MAX_TIMEOUTS) {
1695             return FF_NETERROR(ETIMEDOUT);
1696         } else if (n < 0 && errno != EINTR)
1697             return AVERROR(errno);
1698     }
1699 }
1700
1701 static int tcp_read_packet(AVFormatContext *s, RTSPStream **prtsp_st,
1702                            uint8_t *buf, int buf_size)
1703 {
1704     RTSPState *rt = s->priv_data;
1705     int id, len, i, ret;
1706     RTSPStream *rtsp_st;
1707
1708 #ifdef DEBUG_RTP_TCP
1709     dprintf(s, "tcp_read_packet:\n");
1710 #endif
1711 redo:
1712     for (;;) {
1713         RTSPMessageHeader reply;
1714
1715         ret = ff_rtsp_read_reply(s, &reply, NULL, 1);
1716         if (ret == -1)
1717             return -1;
1718         if (ret == 1) /* received '$' */
1719             break;
1720         /* XXX: parse message */
1721         if (rt->state != RTSP_STATE_STREAMING)
1722             return 0;
1723     }
1724     ret = url_read_complete(rt->rtsp_hd, buf, 3);
1725     if (ret != 3)
1726         return -1;
1727     id  = buf[0];
1728     len = AV_RB16(buf + 1);
1729 #ifdef DEBUG_RTP_TCP
1730     dprintf(s, "id=%d len=%d\n", id, len);
1731 #endif
1732     if (len > buf_size || len < 12)
1733         goto redo;
1734     /* get the data */
1735     ret = url_read_complete(rt->rtsp_hd, buf, len);
1736     if (ret != len)
1737         return -1;
1738     if (rt->transport == RTSP_TRANSPORT_RDT &&
1739         ff_rdt_parse_header(buf, len, &id, NULL, NULL, NULL, NULL) < 0)
1740         return -1;
1741
1742     /* find the matching stream */
1743     for (i = 0; i < rt->nb_rtsp_streams; i++) {
1744         rtsp_st = rt->rtsp_streams[i];
1745         if (id >= rtsp_st->interleaved_min &&
1746             id <= rtsp_st->interleaved_max)
1747             goto found;
1748     }
1749     goto redo;
1750 found:
1751     *prtsp_st = rtsp_st;
1752     return len;
1753 }
1754
1755 static int rtsp_fetch_packet(AVFormatContext *s, AVPacket *pkt)
1756 {
1757     RTSPState *rt = s->priv_data;
1758     int ret, len;
1759     uint8_t buf[10 * RTP_MAX_PACKET_LENGTH];
1760     RTSPStream *rtsp_st;
1761
1762     /* get next frames from the same RTP packet */
1763     if (rt->cur_transport_priv) {
1764         if (rt->transport == RTSP_TRANSPORT_RDT) {
1765             ret = ff_rdt_parse_packet(rt->cur_transport_priv, pkt, NULL, 0);
1766         } else
1767             ret = rtp_parse_packet(rt->cur_transport_priv, pkt, NULL, 0);
1768         if (ret == 0) {
1769             rt->cur_transport_priv = NULL;
1770             return 0;
1771         } else if (ret == 1) {
1772             return 0;
1773         } else
1774             rt->cur_transport_priv = NULL;
1775     }
1776
1777     /* read next RTP packet */
1778  redo:
1779     switch(rt->lower_transport) {
1780     default:
1781 #if CONFIG_RTSP_DEMUXER
1782     case RTSP_LOWER_TRANSPORT_TCP:
1783         len = tcp_read_packet(s, &rtsp_st, buf, sizeof(buf));
1784         break;
1785 #endif
1786     case RTSP_LOWER_TRANSPORT_UDP:
1787     case RTSP_LOWER_TRANSPORT_UDP_MULTICAST:
1788         len = udp_read_packet(s, &rtsp_st, buf, sizeof(buf));
1789         if (len >=0 && rtsp_st->transport_priv && rt->transport == RTSP_TRANSPORT_RTP)
1790             rtp_check_and_send_back_rr(rtsp_st->transport_priv, len);
1791         break;
1792     }
1793     if (len < 0)
1794         return len;
1795     if (len == 0)
1796         return AVERROR_EOF;
1797     if (rt->transport == RTSP_TRANSPORT_RDT) {
1798         ret = ff_rdt_parse_packet(rtsp_st->transport_priv, pkt, buf, len);
1799     } else {
1800         ret = rtp_parse_packet(rtsp_st->transport_priv, pkt, buf, len);
1801         if (ret < 0) {
1802             /* Either bad packet, or a RTCP packet. Check if the
1803              * first_rtcp_ntp_time field was initialized. */
1804             RTPDemuxContext *rtpctx = rtsp_st->transport_priv;
1805             if (rtpctx->first_rtcp_ntp_time != AV_NOPTS_VALUE) {
1806                 /* first_rtcp_ntp_time has been initialized for this stream,
1807                  * copy the same value to all other uninitialized streams,
1808                  * in order to map their timestamp origin to the same ntp time
1809                  * as this one. */
1810                 int i;
1811                 for (i = 0; i < rt->nb_rtsp_streams; i++) {
1812                     RTPDemuxContext *rtpctx2 = rtsp_st->transport_priv;
1813                     if (rtpctx2 &&
1814                         rtpctx2->first_rtcp_ntp_time == AV_NOPTS_VALUE)
1815                         rtpctx2->first_rtcp_ntp_time = rtpctx->first_rtcp_ntp_time;
1816                 }
1817             }
1818         }
1819     }
1820     if (ret < 0)
1821         goto redo;
1822     if (ret == 1)
1823         /* more packets may follow, so we save the RTP context */
1824         rt->cur_transport_priv = rtsp_st->transport_priv;
1825
1826     return ret;
1827 }
1828
1829 static int rtsp_read_packet(AVFormatContext *s, AVPacket *pkt)
1830 {
1831     RTSPState *rt = s->priv_data;
1832     int ret;
1833     RTSPMessageHeader reply1, *reply = &reply1;
1834     char cmd[1024];
1835
1836     if (rt->server_type == RTSP_SERVER_REAL) {
1837         int i;
1838         enum AVDiscard cache[MAX_STREAMS];
1839
1840         for (i = 0; i < s->nb_streams; i++)
1841             cache[i] = s->streams[i]->discard;
1842
1843         if (!rt->need_subscription) {
1844             if (memcmp (cache, rt->real_setup_cache,
1845                         sizeof(enum AVDiscard) * s->nb_streams)) {
1846                 snprintf(cmd, sizeof(cmd),
1847                          "Unsubscribe: %s\r\n",
1848                          rt->last_subscription);
1849                 ff_rtsp_send_cmd(s, "SET_PARAMETER", rt->control_uri,
1850                                  cmd, reply, NULL);
1851                 if (reply->status_code != RTSP_STATUS_OK)
1852                     return AVERROR_INVALIDDATA;
1853                 rt->need_subscription = 1;
1854             }
1855         }
1856
1857         if (rt->need_subscription) {
1858             int r, rule_nr, first = 1;
1859
1860             memcpy(rt->real_setup_cache, cache,
1861                    sizeof(enum AVDiscard) * s->nb_streams);
1862             rt->last_subscription[0] = 0;
1863
1864             snprintf(cmd, sizeof(cmd),
1865                      "Subscribe: ");
1866             for (i = 0; i < rt->nb_rtsp_streams; i++) {
1867                 rule_nr = 0;
1868                 for (r = 0; r < s->nb_streams; r++) {
1869                     if (s->streams[r]->priv_data == rt->rtsp_streams[i]) {
1870                         if (s->streams[r]->discard != AVDISCARD_ALL) {
1871                             if (!first)
1872                                 av_strlcat(rt->last_subscription, ",",
1873                                            sizeof(rt->last_subscription));
1874                             ff_rdt_subscribe_rule(
1875                                 rt->last_subscription,
1876                                 sizeof(rt->last_subscription), i, rule_nr);
1877                             first = 0;
1878                         }
1879                         rule_nr++;
1880                     }
1881                 }
1882             }
1883             av_strlcatf(cmd, sizeof(cmd), "%s\r\n", rt->last_subscription);
1884             ff_rtsp_send_cmd(s, "SET_PARAMETER", rt->control_uri,
1885                              cmd, reply, NULL);
1886             if (reply->status_code != RTSP_STATUS_OK)
1887                 return AVERROR_INVALIDDATA;
1888             rt->need_subscription = 0;
1889
1890             if (rt->state == RTSP_STATE_STREAMING)
1891                 rtsp_read_play (s);
1892         }
1893     }
1894
1895     ret = rtsp_fetch_packet(s, pkt);
1896     if (ret < 0)
1897         return ret;
1898
1899     /* send dummy request to keep TCP connection alive */
1900     if ((rt->server_type == RTSP_SERVER_WMS ||
1901          rt->server_type == RTSP_SERVER_REAL) &&
1902         (av_gettime() - rt->last_cmd_time) / 1000000 >= rt->timeout / 2) {
1903         if (rt->server_type == RTSP_SERVER_WMS) {
1904             ff_rtsp_send_cmd_async(s, "GET_PARAMETER", rt->control_uri, NULL);
1905         } else {
1906             ff_rtsp_send_cmd_async(s, "OPTIONS", "*", NULL);
1907         }
1908     }
1909
1910     return 0;
1911 }
1912
1913 /* pause the stream */
1914 static int rtsp_read_pause(AVFormatContext *s)
1915 {
1916     RTSPState *rt = s->priv_data;
1917     RTSPMessageHeader reply1, *reply = &reply1;
1918
1919     if (rt->state != RTSP_STATE_STREAMING)
1920         return 0;
1921     else if (!(rt->server_type == RTSP_SERVER_REAL && rt->need_subscription)) {
1922         ff_rtsp_send_cmd(s, "PAUSE", rt->control_uri, NULL, reply, NULL);
1923         if (reply->status_code != RTSP_STATUS_OK) {
1924             return -1;
1925         }
1926     }
1927     rt->state = RTSP_STATE_PAUSED;
1928     return 0;
1929 }
1930
1931 static int rtsp_read_seek(AVFormatContext *s, int stream_index,
1932                           int64_t timestamp, int flags)
1933 {
1934     RTSPState *rt = s->priv_data;
1935
1936     rt->seek_timestamp = av_rescale_q(timestamp,
1937                                       s->streams[stream_index]->time_base,
1938                                       AV_TIME_BASE_Q);
1939     switch(rt->state) {
1940     default:
1941     case RTSP_STATE_IDLE:
1942         break;
1943     case RTSP_STATE_STREAMING:
1944         if (rtsp_read_pause(s) != 0)
1945             return -1;
1946         rt->state = RTSP_STATE_SEEKING;
1947         if (rtsp_read_play(s) != 0)
1948             return -1;
1949         break;
1950     case RTSP_STATE_PAUSED:
1951         rt->state = RTSP_STATE_IDLE;
1952         break;
1953     }
1954     return 0;
1955 }
1956
1957 static int rtsp_read_close(AVFormatContext *s)
1958 {
1959     RTSPState *rt = s->priv_data;
1960
1961 #if 0
1962     /* NOTE: it is valid to flush the buffer here */
1963     if (rt->lower_transport == RTSP_LOWER_TRANSPORT_TCP) {
1964         url_fclose(&rt->rtsp_gb);
1965     }
1966 #endif
1967     ff_rtsp_send_cmd_async(s, "TEARDOWN", rt->control_uri, NULL);
1968
1969     ff_rtsp_close_streams(s);
1970     url_close(rt->rtsp_hd);
1971     ff_network_close();
1972     return 0;
1973 }
1974
1975 AVInputFormat rtsp_demuxer = {
1976     "rtsp",
1977     NULL_IF_CONFIG_SMALL("RTSP input format"),
1978     sizeof(RTSPState),
1979     rtsp_probe,
1980     rtsp_read_header,
1981     rtsp_read_packet,
1982     rtsp_read_close,
1983     rtsp_read_seek,
1984     .flags = AVFMT_NOFILE,
1985     .read_play = rtsp_read_play,
1986     .read_pause = rtsp_read_pause,
1987 };
1988 #endif
1989
1990 static int sdp_probe(AVProbeData *p1)
1991 {
1992     const char *p = p1->buf, *p_end = p1->buf + p1->buf_size;
1993
1994     /* we look for a line beginning "c=IN IP4" */
1995     while (p < p_end && *p != '\0') {
1996         if (p + sizeof("c=IN IP4") - 1 < p_end &&
1997             av_strstart(p, "c=IN IP4", NULL))
1998             return AVPROBE_SCORE_MAX / 2;
1999
2000         while (p < p_end - 1 && *p != '\n') p++;
2001         if (++p >= p_end)
2002             break;
2003         if (*p == '\r')
2004             p++;
2005     }
2006     return 0;
2007 }
2008
2009 #define SDP_MAX_SIZE 8192
2010
2011 static int sdp_read_header(AVFormatContext *s, AVFormatParameters *ap)
2012 {
2013     RTSPState *rt = s->priv_data;
2014     RTSPStream *rtsp_st;
2015     int size, i, err;
2016     char *content;
2017     char url[1024];
2018
2019     if (!ff_network_init())
2020         return AVERROR(EIO);
2021
2022     /* read the whole sdp file */
2023     /* XXX: better loading */
2024     content = av_malloc(SDP_MAX_SIZE);
2025     size = get_buffer(s->pb, content, SDP_MAX_SIZE - 1);
2026     if (size <= 0) {
2027         av_free(content);
2028         return AVERROR_INVALIDDATA;
2029     }
2030     content[size] ='\0';
2031
2032     sdp_parse(s, content);
2033     av_free(content);
2034
2035     /* open each RTP stream */
2036     for (i = 0; i < rt->nb_rtsp_streams; i++) {
2037         rtsp_st = rt->rtsp_streams[i];
2038
2039         ff_url_join(url, sizeof(url), "rtp", NULL,
2040                     inet_ntoa(rtsp_st->sdp_ip), rtsp_st->sdp_port,
2041                     "?localport=%d&ttl=%d", rtsp_st->sdp_port,
2042                     rtsp_st->sdp_ttl);
2043         if (url_open(&rtsp_st->rtp_handle, url, URL_RDWR) < 0) {
2044             err = AVERROR_INVALIDDATA;
2045             goto fail;
2046         }
2047         if ((err = rtsp_open_transport_ctx(s, rtsp_st)))
2048             goto fail;
2049     }
2050     return 0;
2051 fail:
2052     ff_rtsp_close_streams(s);
2053     ff_network_close();
2054     return err;
2055 }
2056
2057 static int sdp_read_close(AVFormatContext *s)
2058 {
2059     ff_rtsp_close_streams(s);
2060     ff_network_close();
2061     return 0;
2062 }
2063
2064 AVInputFormat sdp_demuxer = {
2065     "sdp",
2066     NULL_IF_CONFIG_SMALL("SDP"),
2067     sizeof(RTSPState),
2068     sdp_probe,
2069     sdp_read_header,
2070     rtsp_fetch_packet,
2071     sdp_read_close,
2072 };