Don't force basic auth in RTSP, but retry with the server-specified method on failure
[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 #include "rtpdec_vorbis.h"
41
42 //#define DEBUG
43 //#define DEBUG_RTP_TCP
44
45 #if LIBAVFORMAT_VERSION_INT < (53 << 16)
46 int rtsp_default_protocols = (1 << RTSP_LOWER_TRANSPORT_UDP);
47 #endif
48
49 #define SPACE_CHARS " \t\r\n"
50 /* we use memchr() instead of strchr() here because strchr() will return
51  * the terminating '\0' of SPACE_CHARS instead of NULL if c is '\0'. */
52 #define redir_isspace(c) memchr(SPACE_CHARS, c, 4)
53 static void skip_spaces(const char **pp)
54 {
55     const char *p;
56     p = *pp;
57     while (redir_isspace(*p))
58         p++;
59     *pp = p;
60 }
61
62 static void get_word_until_chars(char *buf, int buf_size,
63                                  const char *sep, const char **pp)
64 {
65     const char *p;
66     char *q;
67
68     p = *pp;
69     skip_spaces(&p);
70     q = buf;
71     while (!strchr(sep, *p) && *p != '\0') {
72         if ((q - buf) < buf_size - 1)
73             *q++ = *p;
74         p++;
75     }
76     if (buf_size > 0)
77         *q = '\0';
78     *pp = p;
79 }
80
81 static void get_word_sep(char *buf, int buf_size, const char *sep,
82                          const char **pp)
83 {
84     if (**pp == '/') (*pp)++;
85     get_word_until_chars(buf, buf_size, sep, pp);
86 }
87
88 static void get_word(char *buf, int buf_size, const char **pp)
89 {
90     get_word_until_chars(buf, buf_size, SPACE_CHARS, pp);
91 }
92
93 /* parse the rtpmap description: <codec_name>/<clock_rate>[/<other params>] */
94 static int sdp_parse_rtpmap(AVFormatContext *s,
95                             AVCodecContext *codec, RTSPStream *rtsp_st,
96                             int payload_type, const char *p)
97 {
98     char buf[256];
99     int i;
100     AVCodec *c;
101     const char *c_name;
102
103     /* Loop into AVRtpDynamicPayloadTypes[] and AVRtpPayloadTypes[] and
104      * see if we can handle this kind of payload.
105      * The space should normally not be there but some Real streams or
106      * particular servers ("RealServer Version 6.1.3.970", see issue 1658)
107      * have a trailing space. */
108     get_word_sep(buf, sizeof(buf), "/ ", &p);
109     if (payload_type >= RTP_PT_PRIVATE) {
110         RTPDynamicProtocolHandler *handler;
111         for (handler = RTPFirstDynamicPayloadHandler;
112              handler; handler = handler->next) {
113             if (!strcasecmp(buf, handler->enc_name) &&
114                 codec->codec_type == handler->codec_type) {
115                 codec->codec_id          = handler->codec_id;
116                 rtsp_st->dynamic_handler = handler;
117                 if (handler->open)
118                     rtsp_st->dynamic_protocol_context = handler->open();
119                 break;
120             }
121         }
122     } else {
123         /* We are in a standard case
124          * (from http://www.iana.org/assignments/rtp-parameters). */
125         /* search into AVRtpPayloadTypes[] */
126         codec->codec_id = ff_rtp_codec_id(buf, codec->codec_type);
127     }
128
129     c = avcodec_find_decoder(codec->codec_id);
130     if (c && c->name)
131         c_name = c->name;
132     else
133         c_name = "(null)";
134
135     get_word_sep(buf, sizeof(buf), "/", &p);
136     i = atoi(buf);
137     switch (codec->codec_type) {
138     case CODEC_TYPE_AUDIO:
139         av_log(s, AV_LOG_DEBUG, "audio codec set to: %s\n", c_name);
140         codec->sample_rate = RTSP_DEFAULT_AUDIO_SAMPLERATE;
141         codec->channels = RTSP_DEFAULT_NB_AUDIO_CHANNELS;
142         if (i > 0) {
143             codec->sample_rate = i;
144             get_word_sep(buf, sizeof(buf), "/", &p);
145             i = atoi(buf);
146             if (i > 0)
147                 codec->channels = i;
148             // TODO: there is a bug here; if it is a mono stream, and
149             // less than 22000Hz, faad upconverts to stereo and twice
150             // the frequency.  No problem, but the sample rate is being
151             // set here by the sdp line. Patch on its way. (rdm)
152         }
153         av_log(s, AV_LOG_DEBUG, "audio samplerate set to: %i\n",
154                codec->sample_rate);
155         av_log(s, AV_LOG_DEBUG, "audio channels set to: %i\n",
156                codec->channels);
157         break;
158     case CODEC_TYPE_VIDEO:
159         av_log(s, AV_LOG_DEBUG, "video codec set to: %s\n", c_name);
160         break;
161     default:
162         break;
163     }
164     return 0;
165 }
166
167 /* return the length and optionally the data */
168 static int hex_to_data(uint8_t *data, const char *p)
169 {
170     int c, len, v;
171
172     len = 0;
173     v = 1;
174     for (;;) {
175         skip_spaces(&p);
176         if (*p == '\0')
177             break;
178         c = toupper((unsigned char) *p++);
179         if (c >= '0' && c <= '9')
180             c = c - '0';
181         else if (c >= 'A' && c <= 'F')
182             c = c - 'A' + 10;
183         else
184             break;
185         v = (v << 4) | c;
186         if (v & 0x100) {
187             if (data)
188                 data[len] = v;
189             len++;
190             v = 1;
191         }
192     }
193     return len;
194 }
195
196 static void sdp_parse_fmtp_config(AVCodecContext * codec, void *ctx,
197                                   char *attr, char *value)
198 {
199     switch (codec->codec_id) {
200     case CODEC_ID_MPEG4:
201     case CODEC_ID_AAC:
202         if (!strcmp(attr, "config")) {
203             /* decode the hexa encoded parameter */
204             int len = hex_to_data(NULL, value);
205             if (codec->extradata)
206                 av_free(codec->extradata);
207             codec->extradata = av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
208             if (!codec->extradata)
209                 return;
210             codec->extradata_size = len;
211             hex_to_data(codec->extradata, value);
212         }
213         break;
214     case CODEC_ID_VORBIS:
215         ff_vorbis_parse_fmtp_config(codec, ctx, attr, value);
216         break;
217     default:
218         break;
219     }
220     return;
221 }
222
223 typedef struct {
224     const char *str;
225     uint16_t    type;
226     uint32_t    offset;
227 } AttrNameMap;
228
229 /* All known fmtp parmeters and the corresping RTPAttrTypeEnum */
230 #define ATTR_NAME_TYPE_INT 0
231 #define ATTR_NAME_TYPE_STR 1
232 static const AttrNameMap attr_names[]=
233 {
234     { "SizeLength",       ATTR_NAME_TYPE_INT,
235       offsetof(RTPPayloadData, sizelength) },
236     { "IndexLength",      ATTR_NAME_TYPE_INT,
237       offsetof(RTPPayloadData, indexlength) },
238     { "IndexDeltaLength", ATTR_NAME_TYPE_INT,
239       offsetof(RTPPayloadData, indexdeltalength) },
240     { "profile-level-id", ATTR_NAME_TYPE_INT,
241       offsetof(RTPPayloadData, profile_level_id) },
242     { "StreamType",       ATTR_NAME_TYPE_INT,
243       offsetof(RTPPayloadData, streamtype) },
244     { "mode",             ATTR_NAME_TYPE_STR,
245       offsetof(RTPPayloadData, mode) },
246     { NULL, -1, -1 },
247 };
248
249 /* parse the attribute line from the fmtp a line of an sdp resonse. This
250  * is broken out as a function because it is used in rtp_h264.c, which is
251  * forthcoming. */
252 int ff_rtsp_next_attr_and_value(const char **p, char *attr, int attr_size,
253                                 char *value, int value_size)
254 {
255     skip_spaces(p);
256     if (**p) {
257         get_word_sep(attr, attr_size, "=", p);
258         if (**p == '=')
259             (*p)++;
260         get_word_sep(value, value_size, ";", p);
261         if (**p == ';')
262             (*p)++;
263         return 1;
264     }
265     return 0;
266 }
267
268 /* parse a SDP line and save stream attributes */
269 static void sdp_parse_fmtp(AVStream *st, const char *p)
270 {
271     char attr[256];
272     /* Vorbis setup headers can be up to 12KB and are sent base64
273      * encoded, giving a 12KB * (4/3) = 16KB FMTP line. */
274     char value[16384];
275     int i;
276     RTSPStream *rtsp_st = st->priv_data;
277     AVCodecContext *codec = st->codec;
278     RTPPayloadData *rtp_payload_data = &rtsp_st->rtp_payload_data;
279
280     /* loop on each attribute */
281     while (ff_rtsp_next_attr_and_value(&p, attr, sizeof(attr),
282                                        value, sizeof(value))) {
283         /* grab the codec extra_data from the config parameter of the fmtp
284          * line */
285         sdp_parse_fmtp_config(codec, rtsp_st->dynamic_protocol_context,
286                               attr, value);
287         /* Looking for a known attribute */
288         for (i = 0; attr_names[i].str; ++i) {
289             if (!strcasecmp(attr, attr_names[i].str)) {
290                 if (attr_names[i].type == ATTR_NAME_TYPE_INT) {
291                     *(int *)((char *)rtp_payload_data +
292                         attr_names[i].offset) = atoi(value);
293                 } else if (attr_names[i].type == ATTR_NAME_TYPE_STR)
294                     *(char **)((char *)rtp_payload_data +
295                         attr_names[i].offset) = av_strdup(value);
296             }
297         }
298     }
299 }
300
301 /** Parse a string p in the form of Range:npt=xx-xx, and determine the start
302  *  and end time.
303  *  Used for seeking in the rtp stream.
304  */
305 static void rtsp_parse_range_npt(const char *p, int64_t *start, int64_t *end)
306 {
307     char buf[256];
308
309     skip_spaces(&p);
310     if (!av_stristart(p, "npt=", &p))
311         return;
312
313     *start = AV_NOPTS_VALUE;
314     *end = AV_NOPTS_VALUE;
315
316     get_word_sep(buf, sizeof(buf), "-", &p);
317     *start = parse_date(buf, 1);
318     if (*p == '-') {
319         p++;
320         get_word_sep(buf, sizeof(buf), "-", &p);
321         *end = parse_date(buf, 1);
322     }
323 //    av_log(NULL, AV_LOG_DEBUG, "Range Start: %lld\n", *start);
324 //    av_log(NULL, AV_LOG_DEBUG, "Range End: %lld\n", *end);
325 }
326
327 typedef struct SDPParseState {
328     /* SDP only */
329     struct in_addr default_ip;
330     int            default_ttl;
331     int            skip_media;  ///< set if an unknown m= line occurs
332 } SDPParseState;
333
334 static void sdp_parse_line(AVFormatContext *s, SDPParseState *s1,
335                            int letter, const char *buf)
336 {
337     RTSPState *rt = s->priv_data;
338     char buf1[64], st_type[64];
339     const char *p;
340     enum CodecType codec_type;
341     int payload_type, i;
342     AVStream *st;
343     RTSPStream *rtsp_st;
344     struct in_addr sdp_ip;
345     int ttl;
346
347     dprintf(s, "sdp: %c='%s'\n", letter, buf);
348
349     p = buf;
350     if (s1->skip_media && letter != 'm')
351         return;
352     switch (letter) {
353     case 'c':
354         get_word(buf1, sizeof(buf1), &p);
355         if (strcmp(buf1, "IN") != 0)
356             return;
357         get_word(buf1, sizeof(buf1), &p);
358         if (strcmp(buf1, "IP4") != 0)
359             return;
360         get_word_sep(buf1, sizeof(buf1), "/", &p);
361         if (ff_inet_aton(buf1, &sdp_ip) == 0)
362             return;
363         ttl = 16;
364         if (*p == '/') {
365             p++;
366             get_word_sep(buf1, sizeof(buf1), "/", &p);
367             ttl = atoi(buf1);
368         }
369         if (s->nb_streams == 0) {
370             s1->default_ip = sdp_ip;
371             s1->default_ttl = ttl;
372         } else {
373             st = s->streams[s->nb_streams - 1];
374             rtsp_st = st->priv_data;
375             rtsp_st->sdp_ip = sdp_ip;
376             rtsp_st->sdp_ttl = ttl;
377         }
378         break;
379     case 's':
380         av_metadata_set(&s->metadata, "title", p);
381         break;
382     case 'i':
383         if (s->nb_streams == 0) {
384             av_metadata_set(&s->metadata, "comment", p);
385             break;
386         }
387         break;
388     case 'm':
389         /* new stream */
390         s1->skip_media = 0;
391         get_word(st_type, sizeof(st_type), &p);
392         if (!strcmp(st_type, "audio")) {
393             codec_type = CODEC_TYPE_AUDIO;
394         } else if (!strcmp(st_type, "video")) {
395             codec_type = CODEC_TYPE_VIDEO;
396         } else if (!strcmp(st_type, "application")) {
397             codec_type = CODEC_TYPE_DATA;
398         } else {
399             s1->skip_media = 1;
400             return;
401         }
402         rtsp_st = av_mallocz(sizeof(RTSPStream));
403         if (!rtsp_st)
404             return;
405         rtsp_st->stream_index = -1;
406         dynarray_add(&rt->rtsp_streams, &rt->nb_rtsp_streams, rtsp_st);
407
408         rtsp_st->sdp_ip = s1->default_ip;
409         rtsp_st->sdp_ttl = s1->default_ttl;
410
411         get_word(buf1, sizeof(buf1), &p); /* port */
412         rtsp_st->sdp_port = atoi(buf1);
413
414         get_word(buf1, sizeof(buf1), &p); /* protocol (ignored) */
415
416         /* XXX: handle list of formats */
417         get_word(buf1, sizeof(buf1), &p); /* format list */
418         rtsp_st->sdp_payload_type = atoi(buf1);
419
420         if (!strcmp(ff_rtp_enc_name(rtsp_st->sdp_payload_type), "MP2T")) {
421             /* no corresponding stream */
422         } else {
423             st = av_new_stream(s, 0);
424             if (!st)
425                 return;
426             st->priv_data = rtsp_st;
427             rtsp_st->stream_index = st->index;
428             st->codec->codec_type = codec_type;
429             if (rtsp_st->sdp_payload_type < RTP_PT_PRIVATE) {
430                 /* if standard payload type, we can find the codec right now */
431                 ff_rtp_get_codec_info(st->codec, rtsp_st->sdp_payload_type);
432             }
433         }
434         /* put a default control url */
435         av_strlcpy(rtsp_st->control_url, rt->control_uri,
436                    sizeof(rtsp_st->control_url));
437         break;
438     case 'a':
439         if (av_strstart(p, "control:", &p)) {
440             if (s->nb_streams == 0) {
441                 if (!strncmp(p, "rtsp://", 7))
442                     av_strlcpy(rt->control_uri, p,
443                                sizeof(rt->control_uri));
444             } else {
445             char proto[32];
446             /* get the control url */
447             st = s->streams[s->nb_streams - 1];
448             rtsp_st = st->priv_data;
449
450             /* XXX: may need to add full url resolution */
451             ff_url_split(proto, sizeof(proto), NULL, 0, NULL, 0,
452                          NULL, NULL, 0, p);
453             if (proto[0] == '\0') {
454                 /* relative control URL */
455                 if (rtsp_st->control_url[strlen(rtsp_st->control_url)-1]!='/')
456                 av_strlcat(rtsp_st->control_url, "/",
457                            sizeof(rtsp_st->control_url));
458                 av_strlcat(rtsp_st->control_url, p,
459                            sizeof(rtsp_st->control_url));
460             } else
461                 av_strlcpy(rtsp_st->control_url, p,
462                            sizeof(rtsp_st->control_url));
463             }
464         } else if (av_strstart(p, "rtpmap:", &p) && s->nb_streams > 0) {
465             /* NOTE: rtpmap is only supported AFTER the 'm=' tag */
466             get_word(buf1, sizeof(buf1), &p);
467             payload_type = atoi(buf1);
468             st = s->streams[s->nb_streams - 1];
469             rtsp_st = st->priv_data;
470             sdp_parse_rtpmap(s, st->codec, rtsp_st, payload_type, p);
471         } else if (av_strstart(p, "fmtp:", &p)) {
472             /* NOTE: fmtp is only supported AFTER the 'a=rtpmap:xxx' tag */
473             get_word(buf1, sizeof(buf1), &p);
474             payload_type = atoi(buf1);
475             for (i = 0; i < s->nb_streams; i++) {
476                 st      = s->streams[i];
477                 rtsp_st = st->priv_data;
478                 if (rtsp_st->sdp_payload_type == payload_type) {
479                     if (!(rtsp_st->dynamic_handler &&
480                           rtsp_st->dynamic_handler->parse_sdp_a_line &&
481                           rtsp_st->dynamic_handler->parse_sdp_a_line(s,
482                               i, rtsp_st->dynamic_protocol_context, buf)))
483                         sdp_parse_fmtp(st, p);
484                 }
485             }
486         } else if (av_strstart(p, "framesize:", &p)) {
487             // let dynamic protocol handlers have a stab at the line.
488             get_word(buf1, sizeof(buf1), &p);
489             payload_type = atoi(buf1);
490             for (i = 0; i < s->nb_streams; i++) {
491                 st      = s->streams[i];
492                 rtsp_st = st->priv_data;
493                 if (rtsp_st->sdp_payload_type == payload_type &&
494                     rtsp_st->dynamic_handler &&
495                     rtsp_st->dynamic_handler->parse_sdp_a_line)
496                     rtsp_st->dynamic_handler->parse_sdp_a_line(s, i,
497                         rtsp_st->dynamic_protocol_context, buf);
498             }
499         } else if (av_strstart(p, "range:", &p)) {
500             int64_t start, end;
501
502             // this is so that seeking on a streamed file can work.
503             rtsp_parse_range_npt(p, &start, &end);
504             s->start_time = start;
505             /* AV_NOPTS_VALUE means live broadcast (and can't seek) */
506             s->duration   = (end == AV_NOPTS_VALUE) ?
507                             AV_NOPTS_VALUE : end - start;
508         } else if (av_strstart(p, "IsRealDataType:integer;",&p)) {
509             if (atoi(p) == 1)
510                 rt->transport = RTSP_TRANSPORT_RDT;
511         } else {
512             if (rt->server_type == RTSP_SERVER_WMS)
513                 ff_wms_parse_sdp_a_line(s, p);
514             if (s->nb_streams > 0) {
515                 if (rt->server_type == RTSP_SERVER_REAL)
516                     ff_real_parse_sdp_a_line(s, s->nb_streams - 1, p);
517
518                 rtsp_st = s->streams[s->nb_streams - 1]->priv_data;
519                 if (rtsp_st->dynamic_handler &&
520                     rtsp_st->dynamic_handler->parse_sdp_a_line)
521                     rtsp_st->dynamic_handler->parse_sdp_a_line(s,
522                         s->nb_streams - 1,
523                         rtsp_st->dynamic_protocol_context, buf);
524             }
525         }
526         break;
527     }
528 }
529
530 static int sdp_parse(AVFormatContext *s, const char *content)
531 {
532     const char *p;
533     int letter;
534     /* Some SDP lines, particularly for Realmedia or ASF RTSP streams,
535      * contain long SDP lines containing complete ASF Headers (several
536      * kB) or arrays of MDPR (RM stream descriptor) headers plus
537      * "rulebooks" describing their properties. Therefore, the SDP line
538      * buffer is large.
539      *
540      * The Vorbis FMTP line can be up to 16KB - see sdp_parse_fmtp. */
541     char buf[16384], *q;
542     SDPParseState sdp_parse_state, *s1 = &sdp_parse_state;
543
544     memset(s1, 0, sizeof(SDPParseState));
545     p = content;
546     for (;;) {
547         skip_spaces(&p);
548         letter = *p;
549         if (letter == '\0')
550             break;
551         p++;
552         if (*p != '=')
553             goto next_line;
554         p++;
555         /* get the content */
556         q = buf;
557         while (*p != '\n' && *p != '\r' && *p != '\0') {
558             if ((q - buf) < sizeof(buf) - 1)
559                 *q++ = *p;
560             p++;
561         }
562         *q = '\0';
563         sdp_parse_line(s, s1, letter, buf);
564     next_line:
565         while (*p != '\n' && *p != '\0')
566             p++;
567         if (*p == '\n')
568             p++;
569     }
570     return 0;
571 }
572
573 /* close and free RTSP streams */
574 void ff_rtsp_close_streams(AVFormatContext *s)
575 {
576     RTSPState *rt = s->priv_data;
577     int i;
578     RTSPStream *rtsp_st;
579
580     for (i = 0; i < rt->nb_rtsp_streams; i++) {
581         rtsp_st = rt->rtsp_streams[i];
582         if (rtsp_st) {
583             if (rtsp_st->transport_priv) {
584                 if (s->oformat) {
585                     AVFormatContext *rtpctx = rtsp_st->transport_priv;
586                     av_write_trailer(rtpctx);
587                     if (rt->lower_transport == RTSP_LOWER_TRANSPORT_TCP) {
588                         uint8_t *ptr;
589                         url_close_dyn_buf(rtpctx->pb, &ptr);
590                         av_free(ptr);
591                     } else {
592                         url_fclose(rtpctx->pb);
593                     }
594                     av_metadata_free(&rtpctx->streams[0]->metadata);
595                     av_metadata_free(&rtpctx->metadata);
596                     av_free(rtpctx->streams[0]);
597                     av_free(rtpctx);
598                 } else if (rt->transport == RTSP_TRANSPORT_RDT)
599                     ff_rdt_parse_close(rtsp_st->transport_priv);
600                 else
601                     rtp_parse_close(rtsp_st->transport_priv);
602             }
603             if (rtsp_st->rtp_handle)
604                 url_close(rtsp_st->rtp_handle);
605             if (rtsp_st->dynamic_handler && rtsp_st->dynamic_protocol_context)
606                 rtsp_st->dynamic_handler->close(
607                     rtsp_st->dynamic_protocol_context);
608         }
609     }
610     av_free(rt->rtsp_streams);
611     if (rt->asf_ctx) {
612         av_close_input_stream (rt->asf_ctx);
613         rt->asf_ctx = NULL;
614     }
615 }
616
617 static void *rtsp_rtp_mux_open(AVFormatContext *s, AVStream *st,
618                                URLContext *handle)
619 {
620     RTSPState *rt = s->priv_data;
621     AVFormatContext *rtpctx;
622     int ret;
623     AVOutputFormat *rtp_format = av_guess_format("rtp", NULL, NULL);
624
625     if (!rtp_format)
626         return NULL;
627
628     /* Allocate an AVFormatContext for each output stream */
629     rtpctx = avformat_alloc_context();
630     if (!rtpctx)
631         return NULL;
632
633     rtpctx->oformat = rtp_format;
634     if (!av_new_stream(rtpctx, 0)) {
635         av_free(rtpctx);
636         return NULL;
637     }
638     /* Copy the max delay setting; the rtp muxer reads this. */
639     rtpctx->max_delay = s->max_delay;
640     /* Copy other stream parameters. */
641     rtpctx->streams[0]->sample_aspect_ratio = st->sample_aspect_ratio;
642
643     /* Set the synchronized start time. */
644     rtpctx->start_time_realtime = rt->start_time;
645
646     /* Remove the local codec, link to the original codec
647      * context instead, to give the rtp muxer access to
648      * codec parameters. */
649     av_free(rtpctx->streams[0]->codec);
650     rtpctx->streams[0]->codec = st->codec;
651
652     if (handle) {
653         url_fdopen(&rtpctx->pb, handle);
654     } else
655         url_open_dyn_packet_buf(&rtpctx->pb, RTSP_TCP_MAX_PACKET_SIZE);
656     ret = av_write_header(rtpctx);
657
658     if (ret) {
659         if (handle) {
660             url_fclose(rtpctx->pb);
661         } else {
662             uint8_t *ptr;
663             url_close_dyn_buf(rtpctx->pb, &ptr);
664             av_free(ptr);
665         }
666         av_free(rtpctx->streams[0]);
667         av_free(rtpctx);
668         return NULL;
669     }
670
671     /* Copy the RTP AVStream timebase back to the original AVStream */
672     st->time_base = rtpctx->streams[0]->time_base;
673     return rtpctx;
674 }
675
676 static int rtsp_open_transport_ctx(AVFormatContext *s, RTSPStream *rtsp_st)
677 {
678     RTSPState *rt = s->priv_data;
679     AVStream *st = NULL;
680
681     /* open the RTP context */
682     if (rtsp_st->stream_index >= 0)
683         st = s->streams[rtsp_st->stream_index];
684     if (!st)
685         s->ctx_flags |= AVFMTCTX_NOHEADER;
686
687     if (s->oformat) {
688         rtsp_st->transport_priv = rtsp_rtp_mux_open(s, st, rtsp_st->rtp_handle);
689         /* Ownage of rtp_handle is passed to the rtp mux context */
690         rtsp_st->rtp_handle = NULL;
691     } else if (rt->transport == RTSP_TRANSPORT_RDT)
692         rtsp_st->transport_priv = ff_rdt_parse_open(s, st->index,
693                                             rtsp_st->dynamic_protocol_context,
694                                             rtsp_st->dynamic_handler);
695     else
696         rtsp_st->transport_priv = rtp_parse_open(s, st, rtsp_st->rtp_handle,
697                                          rtsp_st->sdp_payload_type,
698                                          &rtsp_st->rtp_payload_data);
699
700     if (!rtsp_st->transport_priv) {
701          return AVERROR(ENOMEM);
702     } else if (rt->transport != RTSP_TRANSPORT_RDT) {
703         if (rtsp_st->dynamic_handler) {
704             rtp_parse_set_dynamic_protocol(rtsp_st->transport_priv,
705                                            rtsp_st->dynamic_protocol_context,
706                                            rtsp_st->dynamic_handler);
707         }
708     }
709
710     return 0;
711 }
712
713 #if CONFIG_RTSP_DEMUXER || CONFIG_RTSP_MUXER
714 static int rtsp_probe(AVProbeData *p)
715 {
716     if (av_strstart(p->filename, "rtsp:", NULL))
717         return AVPROBE_SCORE_MAX;
718     return 0;
719 }
720
721 static void rtsp_parse_range(int *min_ptr, int *max_ptr, const char **pp)
722 {
723     const char *p;
724     int v;
725
726     p = *pp;
727     skip_spaces(&p);
728     v = strtol(p, (char **)&p, 10);
729     if (*p == '-') {
730         p++;
731         *min_ptr = v;
732         v = strtol(p, (char **)&p, 10);
733         *max_ptr = v;
734     } else {
735         *min_ptr = v;
736         *max_ptr = v;
737     }
738     *pp = p;
739 }
740
741 /* XXX: only one transport specification is parsed */
742 static void rtsp_parse_transport(RTSPMessageHeader *reply, const char *p)
743 {
744     char transport_protocol[16];
745     char profile[16];
746     char lower_transport[16];
747     char parameter[16];
748     RTSPTransportField *th;
749     char buf[256];
750
751     reply->nb_transports = 0;
752
753     for (;;) {
754         skip_spaces(&p);
755         if (*p == '\0')
756             break;
757
758         th = &reply->transports[reply->nb_transports];
759
760         get_word_sep(transport_protocol, sizeof(transport_protocol),
761                      "/", &p);
762         if (!strcasecmp (transport_protocol, "rtp")) {
763             get_word_sep(profile, sizeof(profile), "/;,", &p);
764             lower_transport[0] = '\0';
765             /* rtp/avp/<protocol> */
766             if (*p == '/') {
767                 get_word_sep(lower_transport, sizeof(lower_transport),
768                              ";,", &p);
769             }
770             th->transport = RTSP_TRANSPORT_RTP;
771         } else if (!strcasecmp (transport_protocol, "x-pn-tng") ||
772                    !strcasecmp (transport_protocol, "x-real-rdt")) {
773             /* x-pn-tng/<protocol> */
774             get_word_sep(lower_transport, sizeof(lower_transport), "/;,", &p);
775             profile[0] = '\0';
776             th->transport = RTSP_TRANSPORT_RDT;
777         }
778         if (!strcasecmp(lower_transport, "TCP"))
779             th->lower_transport = RTSP_LOWER_TRANSPORT_TCP;
780         else
781             th->lower_transport = RTSP_LOWER_TRANSPORT_UDP;
782
783         if (*p == ';')
784             p++;
785         /* get each parameter */
786         while (*p != '\0' && *p != ',') {
787             get_word_sep(parameter, sizeof(parameter), "=;,", &p);
788             if (!strcmp(parameter, "port")) {
789                 if (*p == '=') {
790                     p++;
791                     rtsp_parse_range(&th->port_min, &th->port_max, &p);
792                 }
793             } else if (!strcmp(parameter, "client_port")) {
794                 if (*p == '=') {
795                     p++;
796                     rtsp_parse_range(&th->client_port_min,
797                                      &th->client_port_max, &p);
798                 }
799             } else if (!strcmp(parameter, "server_port")) {
800                 if (*p == '=') {
801                     p++;
802                     rtsp_parse_range(&th->server_port_min,
803                                      &th->server_port_max, &p);
804                 }
805             } else if (!strcmp(parameter, "interleaved")) {
806                 if (*p == '=') {
807                     p++;
808                     rtsp_parse_range(&th->interleaved_min,
809                                      &th->interleaved_max, &p);
810                 }
811             } else if (!strcmp(parameter, "multicast")) {
812                 if (th->lower_transport == RTSP_LOWER_TRANSPORT_UDP)
813                     th->lower_transport = RTSP_LOWER_TRANSPORT_UDP_MULTICAST;
814             } else if (!strcmp(parameter, "ttl")) {
815                 if (*p == '=') {
816                     p++;
817                     th->ttl = strtol(p, (char **)&p, 10);
818                 }
819             } else if (!strcmp(parameter, "destination")) {
820                 struct in_addr ipaddr;
821
822                 if (*p == '=') {
823                     p++;
824                     get_word_sep(buf, sizeof(buf), ";,", &p);
825                     if (ff_inet_aton(buf, &ipaddr))
826                         th->destination = ntohl(ipaddr.s_addr);
827                 }
828             }
829             while (*p != ';' && *p != '\0' && *p != ',')
830                 p++;
831             if (*p == ';')
832                 p++;
833         }
834         if (*p == ',')
835             p++;
836
837         reply->nb_transports++;
838     }
839 }
840
841 void ff_rtsp_parse_line(RTSPMessageHeader *reply, const char *buf,
842                         HTTPAuthState *auth_state)
843 {
844     const char *p;
845
846     /* NOTE: we do case independent match for broken servers */
847     p = buf;
848     if (av_stristart(p, "Session:", &p)) {
849         int t;
850         get_word_sep(reply->session_id, sizeof(reply->session_id), ";", &p);
851         if (av_stristart(p, ";timeout=", &p) &&
852             (t = strtol(p, NULL, 10)) > 0) {
853             reply->timeout = t;
854         }
855     } else if (av_stristart(p, "Content-Length:", &p)) {
856         reply->content_length = strtol(p, NULL, 10);
857     } else if (av_stristart(p, "Transport:", &p)) {
858         rtsp_parse_transport(reply, p);
859     } else if (av_stristart(p, "CSeq:", &p)) {
860         reply->seq = strtol(p, NULL, 10);
861     } else if (av_stristart(p, "Range:", &p)) {
862         rtsp_parse_range_npt(p, &reply->range_start, &reply->range_end);
863     } else if (av_stristart(p, "RealChallenge1:", &p)) {
864         skip_spaces(&p);
865         av_strlcpy(reply->real_challenge, p, sizeof(reply->real_challenge));
866     } else if (av_stristart(p, "Server:", &p)) {
867         skip_spaces(&p);
868         av_strlcpy(reply->server, p, sizeof(reply->server));
869     } else if (av_stristart(p, "Notice:", &p) ||
870                av_stristart(p, "X-Notice:", &p)) {
871         reply->notice = strtol(p, NULL, 10);
872     } else if (av_stristart(p, "Location:", &p)) {
873         skip_spaces(&p);
874         av_strlcpy(reply->location, p , sizeof(reply->location));
875     } else if (av_stristart(p, "WWW-Authenticate:", &p) && auth_state) {
876         skip_spaces(&p);
877         ff_http_auth_handle_header(auth_state, "WWW-Authenticate", p);
878     } else if (av_stristart(p, "Authentication-Info:", &p) && auth_state) {
879         skip_spaces(&p);
880         ff_http_auth_handle_header(auth_state, "Authentication-Info", p);
881     }
882 }
883
884 /* skip a RTP/TCP interleaved packet */
885 void ff_rtsp_skip_packet(AVFormatContext *s)
886 {
887     RTSPState *rt = s->priv_data;
888     int ret, len, len1;
889     uint8_t buf[1024];
890
891     ret = url_read_complete(rt->rtsp_hd, buf, 3);
892     if (ret != 3)
893         return;
894     len = AV_RB16(buf + 1);
895
896     dprintf(s, "skipping RTP packet len=%d\n", len);
897
898     /* skip payload */
899     while (len > 0) {
900         len1 = len;
901         if (len1 > sizeof(buf))
902             len1 = sizeof(buf);
903         ret = url_read_complete(rt->rtsp_hd, buf, len1);
904         if (ret != len1)
905             return;
906         len -= len1;
907     }
908 }
909
910 int ff_rtsp_read_reply(AVFormatContext *s, RTSPMessageHeader *reply,
911                        unsigned char **content_ptr,
912                        int return_on_interleaved_data)
913 {
914     RTSPState *rt = s->priv_data;
915     char buf[4096], buf1[1024], *q;
916     unsigned char ch;
917     const char *p;
918     int ret, content_length, line_count = 0;
919     unsigned char *content = NULL;
920
921     memset(reply, 0, sizeof(*reply));
922
923     /* parse reply (XXX: use buffers) */
924     rt->last_reply[0] = '\0';
925     for (;;) {
926         q = buf;
927         for (;;) {
928             ret = url_read_complete(rt->rtsp_hd, &ch, 1);
929 #ifdef DEBUG_RTP_TCP
930             dprintf(s, "ret=%d c=%02x [%c]\n", ret, ch, ch);
931 #endif
932             if (ret != 1)
933                 return -1;
934             if (ch == '\n')
935                 break;
936             if (ch == '$') {
937                 /* XXX: only parse it if first char on line ? */
938                 if (return_on_interleaved_data) {
939                     return 1;
940                 } else
941                     ff_rtsp_skip_packet(s);
942             } else if (ch != '\r') {
943                 if ((q - buf) < sizeof(buf) - 1)
944                     *q++ = ch;
945             }
946         }
947         *q = '\0';
948
949         dprintf(s, "line='%s'\n", buf);
950
951         /* test if last line */
952         if (buf[0] == '\0')
953             break;
954         p = buf;
955         if (line_count == 0) {
956             /* get reply code */
957             get_word(buf1, sizeof(buf1), &p);
958             get_word(buf1, sizeof(buf1), &p);
959             reply->status_code = atoi(buf1);
960         } else {
961             ff_rtsp_parse_line(reply, p, &rt->auth_state);
962             av_strlcat(rt->last_reply, p,    sizeof(rt->last_reply));
963             av_strlcat(rt->last_reply, "\n", sizeof(rt->last_reply));
964         }
965         line_count++;
966     }
967
968     if (rt->session_id[0] == '\0' && reply->session_id[0] != '\0')
969         av_strlcpy(rt->session_id, reply->session_id, sizeof(rt->session_id));
970
971     content_length = reply->content_length;
972     if (content_length > 0) {
973         /* leave some room for a trailing '\0' (useful for simple parsing) */
974         content = av_malloc(content_length + 1);
975         (void)url_read_complete(rt->rtsp_hd, content, content_length);
976         content[content_length] = '\0';
977     }
978     if (content_ptr)
979         *content_ptr = content;
980     else
981         av_free(content);
982
983     if (rt->seq != reply->seq) {
984         av_log(s, AV_LOG_WARNING, "CSeq %d expected, %d received.\n",
985             rt->seq, reply->seq);
986     }
987
988     /* EOS */
989     if (reply->notice == 2101 /* End-of-Stream Reached */      ||
990         reply->notice == 2104 /* Start-of-Stream Reached */    ||
991         reply->notice == 2306 /* Continuous Feed Terminated */) {
992         rt->state = RTSP_STATE_IDLE;
993     } else if (reply->notice >= 4400 && reply->notice < 5500) {
994         return AVERROR(EIO); /* data or server error */
995     } else if (reply->notice == 2401 /* Ticket Expired */ ||
996              (reply->notice >= 5500 && reply->notice < 5600) /* end of term */ )
997         return AVERROR(EPERM);
998
999     return 0;
1000 }
1001
1002 void ff_rtsp_send_cmd_with_content_async(AVFormatContext *s,
1003                                          const char *method, const char *url,
1004                                          const char *headers,
1005                                          const unsigned char *send_content,
1006                                          int send_content_length)
1007 {
1008     RTSPState *rt = s->priv_data;
1009     char buf[4096], buf1[1024];
1010
1011     rt->seq++;
1012     snprintf(buf, sizeof(buf), "%s %s RTSP/1.0\r\n", method, url);
1013     if (headers)
1014         av_strlcat(buf, headers, sizeof(buf));
1015     snprintf(buf1, sizeof(buf1), "CSeq: %d\r\n", rt->seq);
1016     av_strlcat(buf, buf1, sizeof(buf));
1017     if (rt->session_id[0] != '\0' && (!headers ||
1018         !strstr(headers, "\nIf-Match:"))) {
1019         snprintf(buf1, sizeof(buf1), "Session: %s\r\n", rt->session_id);
1020         av_strlcat(buf, buf1, sizeof(buf));
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  * @returns 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                     CODEC_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     /* open the tcp connexion */
1511     ff_url_join(tcpname, sizeof(tcpname), "tcp", NULL, host, port, NULL);
1512     if (url_open(&rtsp_hd, tcpname, URL_RDWR) < 0) {
1513         err = AVERROR(EIO);
1514         goto fail;
1515     }
1516     rt->rtsp_hd = rtsp_hd;
1517     rt->seq = 0;
1518
1519     tcp_fd = url_get_file_handle(rtsp_hd);
1520     if (!getpeername(tcp_fd, (struct sockaddr*) &peer, &peer_len)) {
1521         getnameinfo((struct sockaddr*) &peer, peer_len, host, sizeof(host),
1522                     NULL, 0, NI_NUMERICHOST);
1523     }
1524
1525     /* Construct the URI used in request; this is similar to s->filename,
1526      * but with authentication credentials removed and RTSP specific options
1527      * stripped out. */
1528     ff_url_join(rt->control_uri, sizeof(rt->control_uri), "rtsp", NULL,
1529                 host, port, "%s", path);
1530     /* request options supported by the server; this also detects server
1531      * type */
1532     for (rt->server_type = RTSP_SERVER_RTP;;) {
1533         cmd[0] = 0;
1534         if (rt->server_type == RTSP_SERVER_REAL)
1535             av_strlcat(cmd,
1536                        /**
1537                         * The following entries are required for proper
1538                         * streaming from a Realmedia server. They are
1539                         * interdependent in some way although we currently
1540                         * don't quite understand how. Values were copied
1541                         * from mplayer SVN r23589.
1542                         * @param CompanyID is a 16-byte ID in base64
1543                         * @param ClientChallenge is a 16-byte ID in hex
1544                         */
1545                        "ClientChallenge: 9e26d33f2984236010ef6253fb1887f7\r\n"
1546                        "PlayerStarttime: [28/03/2003:22:50:23 00:00]\r\n"
1547                        "CompanyID: KnKV4M4I/B2FjJ1TToLycw==\r\n"
1548                        "GUID: 00000000-0000-0000-0000-000000000000\r\n",
1549                        sizeof(cmd));
1550         ff_rtsp_send_cmd(s, "OPTIONS", rt->control_uri, cmd, reply, NULL);
1551         if (reply->status_code != RTSP_STATUS_OK) {
1552             err = AVERROR_INVALIDDATA;
1553             goto fail;
1554         }
1555
1556         /* detect server type if not standard-compliant RTP */
1557         if (rt->server_type != RTSP_SERVER_REAL && reply->real_challenge[0]) {
1558             rt->server_type = RTSP_SERVER_REAL;
1559             continue;
1560         } else if (!strncasecmp(reply->server, "WMServer/", 9)) {
1561             rt->server_type = RTSP_SERVER_WMS;
1562         } else if (rt->server_type == RTSP_SERVER_REAL)
1563             strcpy(real_challenge, reply->real_challenge);
1564         break;
1565     }
1566
1567     if (s->iformat)
1568         err = rtsp_setup_input_streams(s, reply);
1569     else
1570         err = rtsp_setup_output_streams(s, host);
1571     if (err)
1572         goto fail;
1573
1574     do {
1575         int lower_transport = ff_log2_tab[lower_transport_mask &
1576                                   ~(lower_transport_mask - 1)];
1577
1578         err = make_setup_request(s, host, port, lower_transport,
1579                                  rt->server_type == RTSP_SERVER_REAL ?
1580                                      real_challenge : NULL);
1581         if (err < 0)
1582             goto fail;
1583         lower_transport_mask &= ~(1 << lower_transport);
1584         if (lower_transport_mask == 0 && err == 1) {
1585             err = AVERROR(FF_NETERROR(EPROTONOSUPPORT));
1586             goto fail;
1587         }
1588     } while (err);
1589
1590     rt->state = RTSP_STATE_IDLE;
1591     rt->seek_timestamp = 0; /* default is to start stream at position zero */
1592     return 0;
1593  fail:
1594     ff_rtsp_close_streams(s);
1595     url_close(rt->rtsp_hd);
1596     if (reply->status_code >=300 && reply->status_code < 400 && s->iformat) {
1597         av_strlcpy(s->filename, reply->location, sizeof(s->filename));
1598         av_log(s, AV_LOG_INFO, "Status %d: Redirecting to %s\n",
1599                reply->status_code,
1600                s->filename);
1601         goto redirect;
1602     }
1603     ff_network_close();
1604     return err;
1605 }
1606 #endif
1607
1608 #if CONFIG_RTSP_DEMUXER
1609 static int rtsp_read_header(AVFormatContext *s,
1610                             AVFormatParameters *ap)
1611 {
1612     RTSPState *rt = s->priv_data;
1613     int ret;
1614
1615     ret = ff_rtsp_connect(s);
1616     if (ret)
1617         return ret;
1618
1619     if (ap->initial_pause) {
1620          /* do not start immediately */
1621     } else {
1622          if (rtsp_read_play(s) < 0) {
1623             ff_rtsp_close_streams(s);
1624             url_close(rt->rtsp_hd);
1625             return AVERROR_INVALIDDATA;
1626         }
1627     }
1628
1629     return 0;
1630 }
1631
1632 static int udp_read_packet(AVFormatContext *s, RTSPStream **prtsp_st,
1633                            uint8_t *buf, int buf_size)
1634 {
1635     RTSPState *rt = s->priv_data;
1636     RTSPStream *rtsp_st;
1637     fd_set rfds;
1638     int fd, fd_max, n, i, ret, tcp_fd;
1639     struct timeval tv;
1640
1641     for (;;) {
1642         if (url_interrupt_cb())
1643             return AVERROR(EINTR);
1644         FD_ZERO(&rfds);
1645         if (rt->rtsp_hd) {
1646             tcp_fd = fd_max = url_get_file_handle(rt->rtsp_hd);
1647             FD_SET(tcp_fd, &rfds);
1648         } else {
1649             fd_max = 0;
1650             tcp_fd = -1;
1651         }
1652         for (i = 0; i < rt->nb_rtsp_streams; i++) {
1653             rtsp_st = rt->rtsp_streams[i];
1654             if (rtsp_st->rtp_handle) {
1655                 /* currently, we cannot probe RTCP handle because of
1656                  * blocking restrictions */
1657                 fd = url_get_file_handle(rtsp_st->rtp_handle);
1658                 if (fd > fd_max)
1659                     fd_max = fd;
1660                 FD_SET(fd, &rfds);
1661             }
1662         }
1663         tv.tv_sec = 0;
1664         tv.tv_usec = 100 * 1000;
1665         n = select(fd_max + 1, &rfds, NULL, NULL, &tv);
1666         if (n > 0) {
1667             for (i = 0; i < rt->nb_rtsp_streams; i++) {
1668                 rtsp_st = rt->rtsp_streams[i];
1669                 if (rtsp_st->rtp_handle) {
1670                     fd = url_get_file_handle(rtsp_st->rtp_handle);
1671                     if (FD_ISSET(fd, &rfds)) {
1672                         ret = url_read(rtsp_st->rtp_handle, buf, buf_size);
1673                         if (ret > 0) {
1674                             *prtsp_st = rtsp_st;
1675                             return ret;
1676                         }
1677                     }
1678                 }
1679             }
1680 #if CONFIG_RTSP_DEMUXER
1681             if (tcp_fd != -1 && FD_ISSET(tcp_fd, &rfds)) {
1682                 RTSPMessageHeader reply;
1683
1684                 ret = ff_rtsp_read_reply(s, &reply, NULL, 0);
1685                 if (ret < 0)
1686                     return ret;
1687                 /* XXX: parse message */
1688                 if (rt->state != RTSP_STATE_STREAMING)
1689                     return 0;
1690             }
1691 #endif
1692         }
1693     }
1694 }
1695
1696 static int tcp_read_packet(AVFormatContext *s, RTSPStream **prtsp_st,
1697                            uint8_t *buf, int buf_size)
1698 {
1699     RTSPState *rt = s->priv_data;
1700     int id, len, i, ret;
1701     RTSPStream *rtsp_st;
1702
1703 #ifdef DEBUG_RTP_TCP
1704     dprintf(s, "tcp_read_packet:\n");
1705 #endif
1706 redo:
1707     for (;;) {
1708         RTSPMessageHeader reply;
1709
1710         ret = ff_rtsp_read_reply(s, &reply, NULL, 1);
1711         if (ret == -1)
1712             return -1;
1713         if (ret == 1) /* received '$' */
1714             break;
1715         /* XXX: parse message */
1716         if (rt->state != RTSP_STATE_STREAMING)
1717             return 0;
1718     }
1719     ret = url_read_complete(rt->rtsp_hd, buf, 3);
1720     if (ret != 3)
1721         return -1;
1722     id  = buf[0];
1723     len = AV_RB16(buf + 1);
1724 #ifdef DEBUG_RTP_TCP
1725     dprintf(s, "id=%d len=%d\n", id, len);
1726 #endif
1727     if (len > buf_size || len < 12)
1728         goto redo;
1729     /* get the data */
1730     ret = url_read_complete(rt->rtsp_hd, buf, len);
1731     if (ret != len)
1732         return -1;
1733     if (rt->transport == RTSP_TRANSPORT_RDT &&
1734         ff_rdt_parse_header(buf, len, &id, NULL, NULL, NULL, NULL) < 0)
1735         return -1;
1736
1737     /* find the matching stream */
1738     for (i = 0; i < rt->nb_rtsp_streams; i++) {
1739         rtsp_st = rt->rtsp_streams[i];
1740         if (id >= rtsp_st->interleaved_min &&
1741             id <= rtsp_st->interleaved_max)
1742             goto found;
1743     }
1744     goto redo;
1745 found:
1746     *prtsp_st = rtsp_st;
1747     return len;
1748 }
1749
1750 static int rtsp_fetch_packet(AVFormatContext *s, AVPacket *pkt)
1751 {
1752     RTSPState *rt = s->priv_data;
1753     int ret, len;
1754     uint8_t buf[10 * RTP_MAX_PACKET_LENGTH];
1755     RTSPStream *rtsp_st;
1756
1757     /* get next frames from the same RTP packet */
1758     if (rt->cur_transport_priv) {
1759         if (rt->transport == RTSP_TRANSPORT_RDT) {
1760             ret = ff_rdt_parse_packet(rt->cur_transport_priv, pkt, NULL, 0);
1761         } else
1762             ret = rtp_parse_packet(rt->cur_transport_priv, pkt, NULL, 0);
1763         if (ret == 0) {
1764             rt->cur_transport_priv = NULL;
1765             return 0;
1766         } else if (ret == 1) {
1767             return 0;
1768         } else
1769             rt->cur_transport_priv = NULL;
1770     }
1771
1772     /* read next RTP packet */
1773  redo:
1774     switch(rt->lower_transport) {
1775     default:
1776 #if CONFIG_RTSP_DEMUXER
1777     case RTSP_LOWER_TRANSPORT_TCP:
1778         len = tcp_read_packet(s, &rtsp_st, buf, sizeof(buf));
1779         break;
1780 #endif
1781     case RTSP_LOWER_TRANSPORT_UDP:
1782     case RTSP_LOWER_TRANSPORT_UDP_MULTICAST:
1783         len = udp_read_packet(s, &rtsp_st, buf, sizeof(buf));
1784         if (len >=0 && rtsp_st->transport_priv && rt->transport == RTSP_TRANSPORT_RTP)
1785             rtp_check_and_send_back_rr(rtsp_st->transport_priv, len);
1786         break;
1787     }
1788     if (len < 0)
1789         return len;
1790     if (len == 0)
1791         return AVERROR_EOF;
1792     if (rt->transport == RTSP_TRANSPORT_RDT) {
1793         ret = ff_rdt_parse_packet(rtsp_st->transport_priv, pkt, buf, len);
1794     } else
1795         ret = rtp_parse_packet(rtsp_st->transport_priv, pkt, buf, len);
1796     if (ret < 0)
1797         goto redo;
1798     if (ret == 1)
1799         /* more packets may follow, so we save the RTP context */
1800         rt->cur_transport_priv = rtsp_st->transport_priv;
1801
1802     return ret;
1803 }
1804
1805 static int rtsp_read_packet(AVFormatContext *s, AVPacket *pkt)
1806 {
1807     RTSPState *rt = s->priv_data;
1808     int ret;
1809     RTSPMessageHeader reply1, *reply = &reply1;
1810     char cmd[1024];
1811
1812     if (rt->server_type == RTSP_SERVER_REAL) {
1813         int i;
1814         enum AVDiscard cache[MAX_STREAMS];
1815
1816         for (i = 0; i < s->nb_streams; i++)
1817             cache[i] = s->streams[i]->discard;
1818
1819         if (!rt->need_subscription) {
1820             if (memcmp (cache, rt->real_setup_cache,
1821                         sizeof(enum AVDiscard) * s->nb_streams)) {
1822                 snprintf(cmd, sizeof(cmd),
1823                          "Unsubscribe: %s\r\n",
1824                          rt->last_subscription);
1825                 ff_rtsp_send_cmd(s, "SET_PARAMETER", rt->control_uri,
1826                                  cmd, reply, NULL);
1827                 if (reply->status_code != RTSP_STATUS_OK)
1828                     return AVERROR_INVALIDDATA;
1829                 rt->need_subscription = 1;
1830             }
1831         }
1832
1833         if (rt->need_subscription) {
1834             int r, rule_nr, first = 1;
1835
1836             memcpy(rt->real_setup_cache, cache,
1837                    sizeof(enum AVDiscard) * s->nb_streams);
1838             rt->last_subscription[0] = 0;
1839
1840             snprintf(cmd, sizeof(cmd),
1841                      "Subscribe: ");
1842             for (i = 0; i < rt->nb_rtsp_streams; i++) {
1843                 rule_nr = 0;
1844                 for (r = 0; r < s->nb_streams; r++) {
1845                     if (s->streams[r]->priv_data == rt->rtsp_streams[i]) {
1846                         if (s->streams[r]->discard != AVDISCARD_ALL) {
1847                             if (!first)
1848                                 av_strlcat(rt->last_subscription, ",",
1849                                            sizeof(rt->last_subscription));
1850                             ff_rdt_subscribe_rule(
1851                                 rt->last_subscription,
1852                                 sizeof(rt->last_subscription), i, rule_nr);
1853                             first = 0;
1854                         }
1855                         rule_nr++;
1856                     }
1857                 }
1858             }
1859             av_strlcatf(cmd, sizeof(cmd), "%s\r\n", rt->last_subscription);
1860             ff_rtsp_send_cmd(s, "SET_PARAMETER", rt->control_uri,
1861                              cmd, reply, NULL);
1862             if (reply->status_code != RTSP_STATUS_OK)
1863                 return AVERROR_INVALIDDATA;
1864             rt->need_subscription = 0;
1865
1866             if (rt->state == RTSP_STATE_STREAMING)
1867                 rtsp_read_play (s);
1868         }
1869     }
1870
1871     ret = rtsp_fetch_packet(s, pkt);
1872     if (ret < 0)
1873         return ret;
1874
1875     /* send dummy request to keep TCP connection alive */
1876     if ((rt->server_type == RTSP_SERVER_WMS ||
1877          rt->server_type == RTSP_SERVER_REAL) &&
1878         (av_gettime() - rt->last_cmd_time) / 1000000 >= rt->timeout / 2) {
1879         if (rt->server_type == RTSP_SERVER_WMS) {
1880             ff_rtsp_send_cmd_async(s, "GET_PARAMETER", rt->control_uri, NULL);
1881         } else {
1882             ff_rtsp_send_cmd_async(s, "OPTIONS", "*", NULL);
1883         }
1884     }
1885
1886     return 0;
1887 }
1888
1889 /* pause the stream */
1890 static int rtsp_read_pause(AVFormatContext *s)
1891 {
1892     RTSPState *rt = s->priv_data;
1893     RTSPMessageHeader reply1, *reply = &reply1;
1894
1895     rt = s->priv_data;
1896
1897     if (rt->state != RTSP_STATE_STREAMING)
1898         return 0;
1899     else if (!(rt->server_type == RTSP_SERVER_REAL && rt->need_subscription)) {
1900         ff_rtsp_send_cmd(s, "PAUSE", rt->control_uri, NULL, reply, NULL);
1901         if (reply->status_code != RTSP_STATUS_OK) {
1902             return -1;
1903         }
1904     }
1905     rt->state = RTSP_STATE_PAUSED;
1906     return 0;
1907 }
1908
1909 static int rtsp_read_seek(AVFormatContext *s, int stream_index,
1910                           int64_t timestamp, int flags)
1911 {
1912     RTSPState *rt = s->priv_data;
1913
1914     rt->seek_timestamp = av_rescale_q(timestamp,
1915                                       s->streams[stream_index]->time_base,
1916                                       AV_TIME_BASE_Q);
1917     switch(rt->state) {
1918     default:
1919     case RTSP_STATE_IDLE:
1920         break;
1921     case RTSP_STATE_STREAMING:
1922         if (rtsp_read_pause(s) != 0)
1923             return -1;
1924         rt->state = RTSP_STATE_SEEKING;
1925         if (rtsp_read_play(s) != 0)
1926             return -1;
1927         break;
1928     case RTSP_STATE_PAUSED:
1929         rt->state = RTSP_STATE_IDLE;
1930         break;
1931     }
1932     return 0;
1933 }
1934
1935 static int rtsp_read_close(AVFormatContext *s)
1936 {
1937     RTSPState *rt = s->priv_data;
1938
1939 #if 0
1940     /* NOTE: it is valid to flush the buffer here */
1941     if (rt->lower_transport == RTSP_LOWER_TRANSPORT_TCP) {
1942         url_fclose(&rt->rtsp_gb);
1943     }
1944 #endif
1945     ff_rtsp_send_cmd_async(s, "TEARDOWN", rt->control_uri, NULL);
1946
1947     ff_rtsp_close_streams(s);
1948     url_close(rt->rtsp_hd);
1949     ff_network_close();
1950     return 0;
1951 }
1952
1953 AVInputFormat rtsp_demuxer = {
1954     "rtsp",
1955     NULL_IF_CONFIG_SMALL("RTSP input format"),
1956     sizeof(RTSPState),
1957     rtsp_probe,
1958     rtsp_read_header,
1959     rtsp_read_packet,
1960     rtsp_read_close,
1961     rtsp_read_seek,
1962     .flags = AVFMT_NOFILE,
1963     .read_play = rtsp_read_play,
1964     .read_pause = rtsp_read_pause,
1965 };
1966 #endif
1967
1968 static int sdp_probe(AVProbeData *p1)
1969 {
1970     const char *p = p1->buf, *p_end = p1->buf + p1->buf_size;
1971
1972     /* we look for a line beginning "c=IN IP4" */
1973     while (p < p_end && *p != '\0') {
1974         if (p + sizeof("c=IN IP4") - 1 < p_end &&
1975             av_strstart(p, "c=IN IP4", NULL))
1976             return AVPROBE_SCORE_MAX / 2;
1977
1978         while (p < p_end - 1 && *p != '\n') p++;
1979         if (++p >= p_end)
1980             break;
1981         if (*p == '\r')
1982             p++;
1983     }
1984     return 0;
1985 }
1986
1987 #define SDP_MAX_SIZE 8192
1988
1989 static int sdp_read_header(AVFormatContext *s, AVFormatParameters *ap)
1990 {
1991     RTSPState *rt = s->priv_data;
1992     RTSPStream *rtsp_st;
1993     int size, i, err;
1994     char *content;
1995     char url[1024];
1996
1997     if (!ff_network_init())
1998         return AVERROR(EIO);
1999
2000     /* read the whole sdp file */
2001     /* XXX: better loading */
2002     content = av_malloc(SDP_MAX_SIZE);
2003     size = get_buffer(s->pb, content, SDP_MAX_SIZE - 1);
2004     if (size <= 0) {
2005         av_free(content);
2006         return AVERROR_INVALIDDATA;
2007     }
2008     content[size] ='\0';
2009
2010     sdp_parse(s, content);
2011     av_free(content);
2012
2013     /* open each RTP stream */
2014     for (i = 0; i < rt->nb_rtsp_streams; i++) {
2015         rtsp_st = rt->rtsp_streams[i];
2016
2017         ff_url_join(url, sizeof(url), "rtp", NULL,
2018                     inet_ntoa(rtsp_st->sdp_ip), rtsp_st->sdp_port,
2019                     "?localport=%d&ttl=%d", rtsp_st->sdp_port,
2020                     rtsp_st->sdp_ttl);
2021         if (url_open(&rtsp_st->rtp_handle, url, URL_RDWR) < 0) {
2022             err = AVERROR_INVALIDDATA;
2023             goto fail;
2024         }
2025         if ((err = rtsp_open_transport_ctx(s, rtsp_st)))
2026             goto fail;
2027     }
2028     return 0;
2029 fail:
2030     ff_rtsp_close_streams(s);
2031     ff_network_close();
2032     return err;
2033 }
2034
2035 static int sdp_read_close(AVFormatContext *s)
2036 {
2037     ff_rtsp_close_streams(s);
2038     ff_network_close();
2039     return 0;
2040 }
2041
2042 AVInputFormat sdp_demuxer = {
2043     "sdp",
2044     NULL_IF_CONFIG_SMALL("SDP"),
2045     sizeof(RTSPState),
2046     sdp_probe,
2047     sdp_read_header,
2048     rtsp_fetch_packet,
2049     sdp_read_close,
2050 };