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