Implement RTSPServerType enum as a way to identify the flavour of RTSP that
[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 /* needed by inet_aton() */
23 #define _SVID_SOURCE
24
25 #include "libavutil/avstring.h"
26 #include "avformat.h"
27
28 #include <sys/time.h>
29 #include <unistd.h> /* for select() prototype */
30 #include <strings.h>
31 #include "network.h"
32 #include "rtsp.h"
33
34 #include "rtp_internal.h"
35
36 //#define DEBUG
37 //#define DEBUG_RTP_TCP
38
39 enum RTSPClientState {
40     RTSP_STATE_IDLE,
41     RTSP_STATE_PLAYING,
42     RTSP_STATE_PAUSED,
43 };
44
45 enum RTSPServerType {
46     RTSP_SERVER_RTP, /*< Standard-compliant RTP-server */
47     RTSP_SERVER_RDT, /*< Realmedia-style server */
48     RTSP_SERVER_LAST
49 };
50
51 typedef struct RTSPState {
52     URLContext *rtsp_hd; /* RTSP TCP connexion handle */
53     int nb_rtsp_streams;
54     struct RTSPStream **rtsp_streams;
55
56     enum RTSPClientState state;
57     int64_t seek_timestamp;
58
59     /* XXX: currently we use unbuffered input */
60     //    ByteIOContext rtsp_gb;
61     int seq;        /* RTSP command sequence number */
62     char session_id[512];
63     enum RTSPProtocol protocol;
64     enum RTSPServerType server_type;
65     char last_reply[2048]; /* XXX: allocate ? */
66     RTPDemuxContext *cur_rtp;
67 } RTSPState;
68
69 typedef struct RTSPStream {
70     URLContext *rtp_handle; /* RTP stream handle */
71     RTPDemuxContext *rtp_ctx; /* RTP parse context */
72
73     int stream_index; /* corresponding stream index, if any. -1 if none (MPEG2TS case) */
74     int interleaved_min, interleaved_max;  /* interleave ids, if TCP transport */
75     char control_url[1024]; /* url for this stream (from SDP) */
76
77     int sdp_port; /* port (from SDP content - not used in RTSP) */
78     struct in_addr sdp_ip; /* IP address  (from SDP content - not used in RTSP) */
79     int sdp_ttl;  /* IP TTL (from SDP content - not used in RTSP) */
80     int sdp_payload_type; /* payload type - only used in SDP */
81     rtp_payload_data_t rtp_payload_data; /* rtp payload parsing infos from SDP */
82
83     RTPDynamicProtocolHandler *dynamic_handler; ///< Only valid if it's a dynamic protocol. (This is the handler structure)
84     void *dynamic_protocol_context; ///< Only valid if it's a dynamic protocol. (This is any private data associated with the dynamic protocol)
85 } RTSPStream;
86
87 static int rtsp_read_play(AVFormatContext *s);
88
89 /* XXX: currently, the only way to change the protocols consists in
90    changing this variable */
91
92 #if LIBAVFORMAT_VERSION_INT < (53 << 16)
93 int rtsp_default_protocols = (1 << RTSP_PROTOCOL_RTP_UDP);
94 #endif
95
96 static int rtsp_probe(AVProbeData *p)
97 {
98     if (av_strstart(p->filename, "rtsp:", NULL))
99         return AVPROBE_SCORE_MAX;
100     return 0;
101 }
102
103 static int redir_isspace(int c)
104 {
105     return c == ' ' || c == '\t' || c == '\n' || c == '\r';
106 }
107
108 static void skip_spaces(const char **pp)
109 {
110     const char *p;
111     p = *pp;
112     while (redir_isspace(*p))
113         p++;
114     *pp = p;
115 }
116
117 static void get_word_sep(char *buf, int buf_size, const char *sep,
118                          const char **pp)
119 {
120     const char *p;
121     char *q;
122
123     p = *pp;
124     if (*p == '/')
125         p++;
126     skip_spaces(&p);
127     q = buf;
128     while (!strchr(sep, *p) && *p != '\0') {
129         if ((q - buf) < buf_size - 1)
130             *q++ = *p;
131         p++;
132     }
133     if (buf_size > 0)
134         *q = '\0';
135     *pp = p;
136 }
137
138 static void get_word(char *buf, int buf_size, const char **pp)
139 {
140     const char *p;
141     char *q;
142
143     p = *pp;
144     skip_spaces(&p);
145     q = buf;
146     while (!redir_isspace(*p) && *p != '\0') {
147         if ((q - buf) < buf_size - 1)
148             *q++ = *p;
149         p++;
150     }
151     if (buf_size > 0)
152         *q = '\0';
153     *pp = p;
154 }
155
156 /* parse the rtpmap description: <codec_name>/<clock_rate>[/<other
157    params>] */
158 static int sdp_parse_rtpmap(AVCodecContext *codec, RTSPStream *rtsp_st, int payload_type, const char *p)
159 {
160     char buf[256];
161     int i;
162     AVCodec *c;
163     const char *c_name;
164
165     /* Loop into AVRtpDynamicPayloadTypes[] and AVRtpPayloadTypes[] and
166        see if we can handle this kind of payload */
167     get_word_sep(buf, sizeof(buf), "/", &p);
168     if (payload_type >= RTP_PT_PRIVATE) {
169         RTPDynamicProtocolHandler *handler= RTPFirstDynamicPayloadHandler;
170         while(handler) {
171             if (!strcmp(buf, handler->enc_name) && (codec->codec_type == handler->codec_type)) {
172                 codec->codec_id = handler->codec_id;
173                 rtsp_st->dynamic_handler= handler;
174                 if(handler->open) {
175                     rtsp_st->dynamic_protocol_context= handler->open();
176                 }
177                 break;
178             }
179             handler= handler->next;
180         }
181     } else {
182         /* We are in a standard case ( from http://www.iana.org/assignments/rtp-parameters) */
183         /* search into AVRtpPayloadTypes[] */
184         codec->codec_id = ff_rtp_codec_id(buf, codec->codec_type);
185     }
186
187     c = avcodec_find_decoder(codec->codec_id);
188     if (c && c->name)
189         c_name = c->name;
190     else
191         c_name = (char *)NULL;
192
193     if (c_name) {
194         get_word_sep(buf, sizeof(buf), "/", &p);
195         i = atoi(buf);
196         switch (codec->codec_type) {
197             case CODEC_TYPE_AUDIO:
198                 av_log(codec, AV_LOG_DEBUG, " audio codec set to : %s\n", c_name);
199                 codec->sample_rate = RTSP_DEFAULT_AUDIO_SAMPLERATE;
200                 codec->channels = RTSP_DEFAULT_NB_AUDIO_CHANNELS;
201                 if (i > 0) {
202                     codec->sample_rate = i;
203                     get_word_sep(buf, sizeof(buf), "/", &p);
204                     i = atoi(buf);
205                     if (i > 0)
206                         codec->channels = i;
207                     // TODO: there is a bug here; if it is a mono stream, and less than 22000Hz, faad upconverts to stereo and twice the
208                     //  frequency.  No problem, but the sample rate is being set here by the sdp line.  Upcoming patch forthcoming. (rdm)
209                 }
210                 av_log(codec, AV_LOG_DEBUG, " audio samplerate set to : %i\n", codec->sample_rate);
211                 av_log(codec, AV_LOG_DEBUG, " audio channels set to : %i\n", codec->channels);
212                 break;
213             case CODEC_TYPE_VIDEO:
214                 av_log(codec, AV_LOG_DEBUG, " video codec set to : %s\n", c_name);
215                 break;
216             default:
217                 break;
218         }
219         return 0;
220     }
221
222     return -1;
223 }
224
225 /* return the length and optionnaly the data */
226 static int hex_to_data(uint8_t *data, const char *p)
227 {
228     int c, len, v;
229
230     len = 0;
231     v = 1;
232     for(;;) {
233         skip_spaces(&p);
234         if (p == '\0')
235             break;
236         c = toupper((unsigned char)*p++);
237         if (c >= '0' && c <= '9')
238             c = c - '0';
239         else if (c >= 'A' && c <= 'F')
240             c = c - 'A' + 10;
241         else
242             break;
243         v = (v << 4) | c;
244         if (v & 0x100) {
245             if (data)
246                 data[len] = v;
247             len++;
248             v = 1;
249         }
250     }
251     return len;
252 }
253
254 static void sdp_parse_fmtp_config(AVCodecContext *codec, char *attr, char *value)
255 {
256     switch (codec->codec_id) {
257         case CODEC_ID_MPEG4:
258         case CODEC_ID_AAC:
259             if (!strcmp(attr, "config")) {
260                 /* decode the hexa encoded parameter */
261                 int len = hex_to_data(NULL, value);
262                 codec->extradata = av_mallocz(len + FF_INPUT_BUFFER_PADDING_SIZE);
263                 if (!codec->extradata)
264                     return;
265                 codec->extradata_size = len;
266                 hex_to_data(codec->extradata, value);
267             }
268             break;
269         default:
270             break;
271     }
272     return;
273 }
274
275 typedef struct attrname_map
276 {
277     const char *str;
278     uint16_t type;
279     uint32_t offset;
280 } attrname_map_t;
281
282 /* All known fmtp parmeters and the corresping RTPAttrTypeEnum */
283 #define ATTR_NAME_TYPE_INT 0
284 #define ATTR_NAME_TYPE_STR 1
285 static attrname_map_t attr_names[]=
286 {
287     {"SizeLength",       ATTR_NAME_TYPE_INT, offsetof(rtp_payload_data_t, sizelength)},
288     {"IndexLength",      ATTR_NAME_TYPE_INT, offsetof(rtp_payload_data_t, indexlength)},
289     {"IndexDeltaLength", ATTR_NAME_TYPE_INT, offsetof(rtp_payload_data_t, indexdeltalength)},
290     {"profile-level-id", ATTR_NAME_TYPE_INT, offsetof(rtp_payload_data_t, profile_level_id)},
291     {"StreamType",       ATTR_NAME_TYPE_INT, offsetof(rtp_payload_data_t, streamtype)},
292     {"mode",             ATTR_NAME_TYPE_STR, offsetof(rtp_payload_data_t, mode)},
293     {NULL, -1, -1},
294 };
295
296 /** parse the attribute line from the fmtp a line of an sdp resonse.  This is broken out as a function
297 * because it is used in rtp_h264.c, which is forthcoming.
298 */
299 int rtsp_next_attr_and_value(const char **p, char *attr, int attr_size, char *value, int value_size)
300 {
301     skip_spaces(p);
302     if(**p)
303     {
304         get_word_sep(attr, attr_size, "=", p);
305         if (**p == '=')
306             (*p)++;
307         get_word_sep(value, value_size, ";", p);
308         if (**p == ';')
309             (*p)++;
310         return 1;
311     }
312     return 0;
313 }
314
315 /* parse a SDP line and save stream attributes */
316 static void sdp_parse_fmtp(AVStream *st, const char *p)
317 {
318     char attr[256];
319     char value[4096];
320     int i;
321
322     RTSPStream *rtsp_st = st->priv_data;
323     AVCodecContext *codec = st->codec;
324     rtp_payload_data_t *rtp_payload_data = &rtsp_st->rtp_payload_data;
325
326     /* loop on each attribute */
327     while(rtsp_next_attr_and_value(&p, attr, sizeof(attr), value, sizeof(value)))
328     {
329         /* grab the codec extra_data from the config parameter of the fmtp line */
330         sdp_parse_fmtp_config(codec, attr, value);
331         /* Looking for a known attribute */
332         for (i = 0; attr_names[i].str; ++i) {
333             if (!strcasecmp(attr, attr_names[i].str)) {
334                 if (attr_names[i].type == ATTR_NAME_TYPE_INT)
335                     *(int *)((char *)rtp_payload_data + attr_names[i].offset) = atoi(value);
336                 else if (attr_names[i].type == ATTR_NAME_TYPE_STR)
337                     *(char **)((char *)rtp_payload_data + attr_names[i].offset) = av_strdup(value);
338             }
339         }
340     }
341 }
342
343 /** Parse a string \p in the form of Range:npt=xx-xx, and determine the start
344  *  and end time.
345  *  Used for seeking in the rtp stream.
346  */
347 static void rtsp_parse_range_npt(const char *p, int64_t *start, int64_t *end)
348 {
349     char buf[256];
350
351     skip_spaces(&p);
352     if (!av_stristart(p, "npt=", &p))
353         return;
354
355     *start = AV_NOPTS_VALUE;
356     *end = AV_NOPTS_VALUE;
357
358     get_word_sep(buf, sizeof(buf), "-", &p);
359     *start = parse_date(buf, 1);
360     if (*p == '-') {
361         p++;
362         get_word_sep(buf, sizeof(buf), "-", &p);
363         *end = parse_date(buf, 1);
364     }
365 //    av_log(NULL, AV_LOG_DEBUG, "Range Start: %lld\n", *start);
366 //    av_log(NULL, AV_LOG_DEBUG, "Range End: %lld\n", *end);
367 }
368
369 typedef struct SDPParseState {
370     /* SDP only */
371     struct in_addr default_ip;
372     int default_ttl;
373 } SDPParseState;
374
375 static void sdp_parse_line(AVFormatContext *s, SDPParseState *s1,
376                            int letter, const char *buf)
377 {
378     RTSPState *rt = s->priv_data;
379     char buf1[64], st_type[64];
380     const char *p;
381     int codec_type, payload_type, i;
382     AVStream *st;
383     RTSPStream *rtsp_st;
384     struct in_addr sdp_ip;
385     int ttl;
386
387 #ifdef DEBUG
388     printf("sdp: %c='%s'\n", letter, buf);
389 #endif
390
391     p = buf;
392     switch(letter) {
393     case 'c':
394         get_word(buf1, sizeof(buf1), &p);
395         if (strcmp(buf1, "IN") != 0)
396             return;
397         get_word(buf1, sizeof(buf1), &p);
398         if (strcmp(buf1, "IP4") != 0)
399             return;
400         get_word_sep(buf1, sizeof(buf1), "/", &p);
401         if (inet_aton(buf1, &sdp_ip) == 0)
402             return;
403         ttl = 16;
404         if (*p == '/') {
405             p++;
406             get_word_sep(buf1, sizeof(buf1), "/", &p);
407             ttl = atoi(buf1);
408         }
409         if (s->nb_streams == 0) {
410             s1->default_ip = sdp_ip;
411             s1->default_ttl = ttl;
412         } else {
413             st = s->streams[s->nb_streams - 1];
414             rtsp_st = st->priv_data;
415             rtsp_st->sdp_ip = sdp_ip;
416             rtsp_st->sdp_ttl = ttl;
417         }
418         break;
419     case 's':
420         av_strlcpy(s->title, p, sizeof(s->title));
421         break;
422     case 'i':
423         if (s->nb_streams == 0) {
424             av_strlcpy(s->comment, p, sizeof(s->comment));
425             break;
426         }
427         break;
428     case 'm':
429         /* new stream */
430         get_word(st_type, sizeof(st_type), &p);
431         if (!strcmp(st_type, "audio")) {
432             codec_type = CODEC_TYPE_AUDIO;
433         } else if (!strcmp(st_type, "video")) {
434             codec_type = CODEC_TYPE_VIDEO;
435         } else {
436             return;
437         }
438         rtsp_st = av_mallocz(sizeof(RTSPStream));
439         if (!rtsp_st)
440             return;
441         rtsp_st->stream_index = -1;
442         dynarray_add(&rt->rtsp_streams, &rt->nb_rtsp_streams, rtsp_st);
443
444         rtsp_st->sdp_ip = s1->default_ip;
445         rtsp_st->sdp_ttl = s1->default_ttl;
446
447         get_word(buf1, sizeof(buf1), &p); /* port */
448         rtsp_st->sdp_port = atoi(buf1);
449
450         get_word(buf1, sizeof(buf1), &p); /* protocol (ignored) */
451
452         /* XXX: handle list of formats */
453         get_word(buf1, sizeof(buf1), &p); /* format list */
454         rtsp_st->sdp_payload_type = atoi(buf1);
455
456         if (!strcmp(ff_rtp_enc_name(rtsp_st->sdp_payload_type), "MP2T")) {
457             /* no corresponding stream */
458         } else {
459             st = av_new_stream(s, 0);
460             if (!st)
461                 return;
462             st->priv_data = rtsp_st;
463             rtsp_st->stream_index = st->index;
464             st->codec->codec_type = codec_type;
465             if (rtsp_st->sdp_payload_type < RTP_PT_PRIVATE) {
466                 /* if standard payload type, we can find the codec right now */
467                 rtp_get_codec_info(st->codec, rtsp_st->sdp_payload_type);
468             }
469         }
470         /* put a default control url */
471         av_strlcpy(rtsp_st->control_url, s->filename, sizeof(rtsp_st->control_url));
472         break;
473     case 'a':
474         if (av_strstart(p, "control:", &p) && s->nb_streams > 0) {
475             char proto[32];
476             /* get the control url */
477             st = s->streams[s->nb_streams - 1];
478             rtsp_st = st->priv_data;
479
480             /* XXX: may need to add full url resolution */
481             url_split(proto, sizeof(proto), NULL, 0, NULL, 0, NULL, NULL, 0, p);
482             if (proto[0] == '\0') {
483                 /* relative control URL */
484                 av_strlcat(rtsp_st->control_url, "/", sizeof(rtsp_st->control_url));
485                 av_strlcat(rtsp_st->control_url, p,   sizeof(rtsp_st->control_url));
486             } else {
487                 av_strlcpy(rtsp_st->control_url, p,   sizeof(rtsp_st->control_url));
488             }
489         } else if (av_strstart(p, "rtpmap:", &p)) {
490             /* NOTE: rtpmap is only supported AFTER the 'm=' tag */
491             get_word(buf1, sizeof(buf1), &p);
492             payload_type = atoi(buf1);
493             for(i = 0; i < s->nb_streams;i++) {
494                 st = s->streams[i];
495                 rtsp_st = st->priv_data;
496                 if (rtsp_st->sdp_payload_type == payload_type) {
497                     sdp_parse_rtpmap(st->codec, rtsp_st, payload_type, p);
498                 }
499             }
500         } else if (av_strstart(p, "fmtp:", &p)) {
501             /* NOTE: fmtp is only supported AFTER the 'a=rtpmap:xxx' tag */
502             get_word(buf1, sizeof(buf1), &p);
503             payload_type = atoi(buf1);
504             for(i = 0; i < s->nb_streams;i++) {
505                 st = s->streams[i];
506                 rtsp_st = st->priv_data;
507                 if (rtsp_st->sdp_payload_type == payload_type) {
508                     if(rtsp_st->dynamic_handler && rtsp_st->dynamic_handler->parse_sdp_a_line) {
509                         if(!rtsp_st->dynamic_handler->parse_sdp_a_line(st, rtsp_st->dynamic_protocol_context, buf)) {
510                             sdp_parse_fmtp(st, p);
511                         }
512                     } else {
513                         sdp_parse_fmtp(st, p);
514                     }
515                 }
516             }
517         } else if(av_strstart(p, "framesize:", &p)) {
518             // let dynamic protocol handlers have a stab at the line.
519             get_word(buf1, sizeof(buf1), &p);
520             payload_type = atoi(buf1);
521             for(i = 0; i < s->nb_streams;i++) {
522                 st = s->streams[i];
523                 rtsp_st = st->priv_data;
524                 if (rtsp_st->sdp_payload_type == payload_type) {
525                     if(rtsp_st->dynamic_handler && rtsp_st->dynamic_handler->parse_sdp_a_line) {
526                         rtsp_st->dynamic_handler->parse_sdp_a_line(st, rtsp_st->dynamic_protocol_context, buf);
527                     }
528                 }
529             }
530         } else if(av_strstart(p, "range:", &p)) {
531             int64_t start, end;
532
533             // this is so that seeking on a streamed file can work.
534             rtsp_parse_range_npt(p, &start, &end);
535             s->start_time= start;
536             s->duration= (end==AV_NOPTS_VALUE)?AV_NOPTS_VALUE:end-start; // AV_NOPTS_VALUE means live broadcast (and can't seek)
537         } else if (s->nb_streams > 0) {
538             rtsp_st = s->streams[s->nb_streams - 1]->priv_data;
539             if (rtsp_st->dynamic_handler &&
540                 rtsp_st->dynamic_handler->parse_sdp_a_line)
541                 rtsp_st->dynamic_handler->parse_sdp_a_line(s->streams[s->nb_streams - 1],
542                     rtsp_st->dynamic_protocol_context, buf);
543         }
544         break;
545     }
546 }
547
548 static int sdp_parse(AVFormatContext *s, const char *content)
549 {
550     const char *p;
551     int letter;
552     char buf[1024], *q;
553     SDPParseState sdp_parse_state, *s1 = &sdp_parse_state;
554
555     memset(s1, 0, sizeof(SDPParseState));
556     p = content;
557     for(;;) {
558         skip_spaces(&p);
559         letter = *p;
560         if (letter == '\0')
561             break;
562         p++;
563         if (*p != '=')
564             goto next_line;
565         p++;
566         /* get the content */
567         q = buf;
568         while (*p != '\n' && *p != '\r' && *p != '\0') {
569             if ((q - buf) < sizeof(buf) - 1)
570                 *q++ = *p;
571             p++;
572         }
573         *q = '\0';
574         sdp_parse_line(s, s1, letter, buf);
575     next_line:
576         while (*p != '\n' && *p != '\0')
577             p++;
578         if (*p == '\n')
579             p++;
580     }
581     return 0;
582 }
583
584 static void rtsp_parse_range(int *min_ptr, int *max_ptr, const char **pp)
585 {
586     const char *p;
587     int v;
588
589     p = *pp;
590     skip_spaces(&p);
591     v = strtol(p, (char **)&p, 10);
592     if (*p == '-') {
593         p++;
594         *min_ptr = v;
595         v = strtol(p, (char **)&p, 10);
596         *max_ptr = v;
597     } else {
598         *min_ptr = v;
599         *max_ptr = v;
600     }
601     *pp = p;
602 }
603
604 /* XXX: only one transport specification is parsed */
605 static void rtsp_parse_transport(RTSPHeader *reply, const char *p)
606 {
607     char transport_protocol[16];
608     char profile[16];
609     char lower_transport[16];
610     char parameter[16];
611     RTSPTransportField *th;
612     char buf[256];
613
614     reply->nb_transports = 0;
615
616     for(;;) {
617         skip_spaces(&p);
618         if (*p == '\0')
619             break;
620
621         th = &reply->transports[reply->nb_transports];
622
623         get_word_sep(transport_protocol, sizeof(transport_protocol),
624                      "/", &p);
625         if (*p == '/')
626             p++;
627         if (!strcasecmp (transport_protocol, "rtp")) {
628             get_word_sep(profile, sizeof(profile), "/;,", &p);
629             lower_transport[0] = '\0';
630             /* rtp/avp/<protocol> */
631             if (*p == '/') {
632                 p++;
633                 get_word_sep(lower_transport, sizeof(lower_transport),
634                              ";,", &p);
635                 }
636         } else if (!strcasecmp (transport_protocol, "x-pn-tng")) {
637             /* x-pn-tng/<protocol> */
638             get_word_sep(lower_transport, sizeof(lower_transport), "/;,", &p);
639             profile[0] = '\0';
640         }
641         if (!strcasecmp(lower_transport, "TCP"))
642             th->protocol = RTSP_PROTOCOL_RTP_TCP;
643         else
644             th->protocol = RTSP_PROTOCOL_RTP_UDP;
645
646         if (*p == ';')
647             p++;
648         /* get each parameter */
649         while (*p != '\0' && *p != ',') {
650             get_word_sep(parameter, sizeof(parameter), "=;,", &p);
651             if (!strcmp(parameter, "port")) {
652                 if (*p == '=') {
653                     p++;
654                     rtsp_parse_range(&th->port_min, &th->port_max, &p);
655                 }
656             } else if (!strcmp(parameter, "client_port")) {
657                 if (*p == '=') {
658                     p++;
659                     rtsp_parse_range(&th->client_port_min,
660                                      &th->client_port_max, &p);
661                 }
662             } else if (!strcmp(parameter, "server_port")) {
663                 if (*p == '=') {
664                     p++;
665                     rtsp_parse_range(&th->server_port_min,
666                                      &th->server_port_max, &p);
667                 }
668             } else if (!strcmp(parameter, "interleaved")) {
669                 if (*p == '=') {
670                     p++;
671                     rtsp_parse_range(&th->interleaved_min,
672                                      &th->interleaved_max, &p);
673                 }
674             } else if (!strcmp(parameter, "multicast")) {
675                 if (th->protocol == RTSP_PROTOCOL_RTP_UDP)
676                     th->protocol = RTSP_PROTOCOL_RTP_UDP_MULTICAST;
677             } else if (!strcmp(parameter, "ttl")) {
678                 if (*p == '=') {
679                     p++;
680                     th->ttl = strtol(p, (char **)&p, 10);
681                 }
682             } else if (!strcmp(parameter, "destination")) {
683                 struct in_addr ipaddr;
684
685                 if (*p == '=') {
686                     p++;
687                     get_word_sep(buf, sizeof(buf), ";,", &p);
688                     if (inet_aton(buf, &ipaddr))
689                         th->destination = ntohl(ipaddr.s_addr);
690                 }
691             }
692             while (*p != ';' && *p != '\0' && *p != ',')
693                 p++;
694             if (*p == ';')
695                 p++;
696         }
697         if (*p == ',')
698             p++;
699
700         reply->nb_transports++;
701     }
702 }
703
704 void rtsp_parse_line(RTSPHeader *reply, const char *buf)
705 {
706     const char *p;
707
708     /* NOTE: we do case independent match for broken servers */
709     p = buf;
710     if (av_stristart(p, "Session:", &p)) {
711         get_word_sep(reply->session_id, sizeof(reply->session_id), ";", &p);
712     } else if (av_stristart(p, "Content-Length:", &p)) {
713         reply->content_length = strtol(p, NULL, 10);
714     } else if (av_stristart(p, "Transport:", &p)) {
715         rtsp_parse_transport(reply, p);
716     } else if (av_stristart(p, "CSeq:", &p)) {
717         reply->seq = strtol(p, NULL, 10);
718     } else if (av_stristart(p, "Range:", &p)) {
719         rtsp_parse_range_npt(p, &reply->range_start, &reply->range_end);
720     }
721 }
722
723 static int url_readbuf(URLContext *h, unsigned char *buf, int size)
724 {
725     int ret, len;
726
727     len = 0;
728     while (len < size) {
729         ret = url_read(h, buf+len, size-len);
730         if (ret < 1)
731             return ret;
732         len += ret;
733     }
734     return len;
735 }
736
737 /* skip a RTP/TCP interleaved packet */
738 static void rtsp_skip_packet(AVFormatContext *s)
739 {
740     RTSPState *rt = s->priv_data;
741     int ret, len, len1;
742     uint8_t buf[1024];
743
744     ret = url_readbuf(rt->rtsp_hd, buf, 3);
745     if (ret != 3)
746         return;
747     len = AV_RB16(buf + 1);
748 #ifdef DEBUG
749     printf("skipping RTP packet len=%d\n", len);
750 #endif
751     /* skip payload */
752     while (len > 0) {
753         len1 = len;
754         if (len1 > sizeof(buf))
755             len1 = sizeof(buf);
756         ret = url_readbuf(rt->rtsp_hd, buf, len1);
757         if (ret != len1)
758             return;
759         len -= len1;
760     }
761 }
762
763 static void rtsp_send_cmd(AVFormatContext *s,
764                           const char *cmd, RTSPHeader *reply,
765                           unsigned char **content_ptr)
766 {
767     RTSPState *rt = s->priv_data;
768     char buf[4096], buf1[1024], *q;
769     unsigned char ch;
770     const char *p;
771     int content_length, line_count;
772     unsigned char *content = NULL;
773
774     memset(reply, 0, sizeof(RTSPHeader));
775
776     rt->seq++;
777     av_strlcpy(buf, cmd, sizeof(buf));
778     snprintf(buf1, sizeof(buf1), "CSeq: %d\r\n", rt->seq);
779     av_strlcat(buf, buf1, sizeof(buf));
780     if (rt->session_id[0] != '\0' && !strstr(cmd, "\nIf-Match:")) {
781         snprintf(buf1, sizeof(buf1), "Session: %s\r\n", rt->session_id);
782         av_strlcat(buf, buf1, sizeof(buf));
783     }
784     av_strlcat(buf, "\r\n", sizeof(buf));
785 #ifdef DEBUG
786     printf("Sending:\n%s--\n", buf);
787 #endif
788     url_write(rt->rtsp_hd, buf, strlen(buf));
789
790     /* parse reply (XXX: use buffers) */
791     line_count = 0;
792     rt->last_reply[0] = '\0';
793     for(;;) {
794         q = buf;
795         for(;;) {
796             if (url_readbuf(rt->rtsp_hd, &ch, 1) != 1)
797                 break;
798             if (ch == '\n')
799                 break;
800             if (ch == '$') {
801                 /* XXX: only parse it if first char on line ? */
802                 rtsp_skip_packet(s);
803             } else if (ch != '\r') {
804                 if ((q - buf) < sizeof(buf) - 1)
805                     *q++ = ch;
806             }
807         }
808         *q = '\0';
809 #ifdef DEBUG
810         printf("line='%s'\n", buf);
811 #endif
812         /* test if last line */
813         if (buf[0] == '\0')
814             break;
815         p = buf;
816         if (line_count == 0) {
817             /* get reply code */
818             get_word(buf1, sizeof(buf1), &p);
819             get_word(buf1, sizeof(buf1), &p);
820             reply->status_code = atoi(buf1);
821         } else {
822             rtsp_parse_line(reply, p);
823             av_strlcat(rt->last_reply, p,    sizeof(rt->last_reply));
824             av_strlcat(rt->last_reply, "\n", sizeof(rt->last_reply));
825         }
826         line_count++;
827     }
828
829     if (rt->session_id[0] == '\0' && reply->session_id[0] != '\0')
830         av_strlcpy(rt->session_id, reply->session_id, sizeof(rt->session_id));
831
832     content_length = reply->content_length;
833     if (content_length > 0) {
834         /* leave some room for a trailing '\0' (useful for simple parsing) */
835         content = av_malloc(content_length + 1);
836         (void)url_readbuf(rt->rtsp_hd, content, content_length);
837         content[content_length] = '\0';
838     }
839     if (content_ptr)
840         *content_ptr = content;
841     else
842         av_free(content);
843 }
844
845
846 /* close and free RTSP streams */
847 static void rtsp_close_streams(RTSPState *rt)
848 {
849     int i;
850     RTSPStream *rtsp_st;
851
852     for(i=0;i<rt->nb_rtsp_streams;i++) {
853         rtsp_st = rt->rtsp_streams[i];
854         if (rtsp_st) {
855             if (rtsp_st->rtp_ctx)
856                 rtp_parse_close(rtsp_st->rtp_ctx);
857             if (rtsp_st->rtp_handle)
858                 url_close(rtsp_st->rtp_handle);
859             if (rtsp_st->dynamic_handler && rtsp_st->dynamic_protocol_context)
860                 rtsp_st->dynamic_handler->close(rtsp_st->dynamic_protocol_context);
861         }
862     }
863     av_free(rt->rtsp_streams);
864 }
865
866 /**
867  * @returns 0 on success, <0 on error, 1 if protocol is unavailable.
868  */
869 static int
870 make_setup_request (AVFormatContext *s, const char *host, int port, int protocol)
871 {
872     RTSPState *rt = s->priv_data;
873     int j, i, err;
874     RTSPStream *rtsp_st;
875     AVStream *st;
876     RTSPHeader reply1, *reply = &reply1;
877     char cmd[2048];
878
879     /* for each stream, make the setup request */
880     /* XXX: we assume the same server is used for the control of each
881        RTSP stream */
882
883     for(j = RTSP_RTP_PORT_MIN, i = 0; i < rt->nb_rtsp_streams; ++i) {
884         char transport[2048];
885
886         rtsp_st = rt->rtsp_streams[i];
887
888         /* compute available transports */
889         transport[0] = '\0';
890
891         /* RTP/UDP */
892         if (protocol == RTSP_PROTOCOL_RTP_UDP) {
893             char buf[256];
894
895             /* first try in specified port range */
896             if (RTSP_RTP_PORT_MIN != 0) {
897                 while(j <= RTSP_RTP_PORT_MAX) {
898                     snprintf(buf, sizeof(buf), "rtp://%s?localport=%d", host, j);
899                     j += 2; /* we will use two port by rtp stream (rtp and rtcp) */
900                     if (url_open(&rtsp_st->rtp_handle, buf, URL_RDWR) == 0) {
901                         goto rtp_opened;
902                     }
903                 }
904             }
905
906 /*            then try on any port
907 **            if (url_open(&rtsp_st->rtp_handle, "rtp://", URL_RDONLY) < 0) {
908 **                err = AVERROR_INVALIDDATA;
909 **                goto fail;
910 **            }
911 */
912
913         rtp_opened:
914             port = rtp_get_local_port(rtsp_st->rtp_handle);
915             if (transport[0] != '\0')
916                 av_strlcat(transport, ",", sizeof(transport));
917             snprintf(transport + strlen(transport), sizeof(transport) - strlen(transport) - 1,
918                      "RTP/AVP/UDP;unicast;client_port=%d-%d",
919                      port, port + 1);
920         }
921
922         /* RTP/TCP */
923         else if (protocol == RTSP_PROTOCOL_RTP_TCP) {
924             if (transport[0] != '\0')
925                 av_strlcat(transport, ",", sizeof(transport));
926             snprintf(transport + strlen(transport), sizeof(transport) - strlen(transport) - 1,
927                      "RTP/AVP/TCP");
928         }
929
930         else if (protocol == RTSP_PROTOCOL_RTP_UDP_MULTICAST) {
931             if (transport[0] != '\0')
932                 av_strlcat(transport, ",", sizeof(transport));
933             snprintf(transport + strlen(transport),
934                      sizeof(transport) - strlen(transport) - 1,
935                      "RTP/AVP/UDP;multicast");
936         }
937         snprintf(cmd, sizeof(cmd),
938                  "SETUP %s RTSP/1.0\r\n"
939                  "Transport: %s\r\n",
940                  rtsp_st->control_url, transport);
941         rtsp_send_cmd(s, cmd, reply, NULL);
942         if (reply->status_code == 461 /* Unsupported protocol */ && i == 0) {
943             err = 1;
944             goto fail;
945         } else if (reply->status_code != RTSP_STATUS_OK ||
946                    reply->nb_transports != 1) {
947             err = AVERROR_INVALIDDATA;
948             goto fail;
949         }
950
951         /* XXX: same protocol for all streams is required */
952         if (i > 0) {
953             if (reply->transports[0].protocol != rt->protocol) {
954                 err = AVERROR_INVALIDDATA;
955                 goto fail;
956             }
957         } else {
958             rt->protocol = reply->transports[0].protocol;
959         }
960
961         /* close RTP connection if not choosen */
962         if (reply->transports[0].protocol != RTSP_PROTOCOL_RTP_UDP &&
963             (protocol == RTSP_PROTOCOL_RTP_UDP)) {
964             url_close(rtsp_st->rtp_handle);
965             rtsp_st->rtp_handle = NULL;
966         }
967
968         switch(reply->transports[0].protocol) {
969         case RTSP_PROTOCOL_RTP_TCP:
970             rtsp_st->interleaved_min = reply->transports[0].interleaved_min;
971             rtsp_st->interleaved_max = reply->transports[0].interleaved_max;
972             break;
973
974         case RTSP_PROTOCOL_RTP_UDP:
975             {
976                 char url[1024];
977
978                 /* XXX: also use address if specified */
979                 snprintf(url, sizeof(url), "rtp://%s:%d",
980                          host, reply->transports[0].server_port_min);
981                 if (rtp_set_remote_url(rtsp_st->rtp_handle, url) < 0) {
982                     err = AVERROR_INVALIDDATA;
983                     goto fail;
984                 }
985             }
986             break;
987         case RTSP_PROTOCOL_RTP_UDP_MULTICAST:
988             {
989                 char url[1024];
990                 struct in_addr in;
991
992                 in.s_addr = htonl(reply->transports[0].destination);
993                 snprintf(url, sizeof(url), "rtp://%s:%d?ttl=%d",
994                          inet_ntoa(in),
995                          reply->transports[0].port_min,
996                          reply->transports[0].ttl);
997                 if (url_open(&rtsp_st->rtp_handle, url, URL_RDWR) < 0) {
998                     err = AVERROR_INVALIDDATA;
999                     goto fail;
1000                 }
1001             }
1002             break;
1003         }
1004         /* open the RTP context */
1005         st = NULL;
1006         if (rtsp_st->stream_index >= 0)
1007             st = s->streams[rtsp_st->stream_index];
1008         if (!st)
1009             s->ctx_flags |= AVFMTCTX_NOHEADER;
1010         rtsp_st->rtp_ctx = rtp_parse_open(s, st, rtsp_st->rtp_handle, rtsp_st->sdp_payload_type, &rtsp_st->rtp_payload_data);
1011
1012         if (!rtsp_st->rtp_ctx) {
1013             err = AVERROR(ENOMEM);
1014             goto fail;
1015         } else {
1016             if(rtsp_st->dynamic_handler) {
1017                 rtsp_st->rtp_ctx->dynamic_protocol_context= rtsp_st->dynamic_protocol_context;
1018                 rtsp_st->rtp_ctx->parse_packet= rtsp_st->dynamic_handler->parse_packet;
1019             }
1020         }
1021     }
1022
1023     return 0;
1024
1025 fail:
1026     for (i=0; i<rt->nb_rtsp_streams; i++) {
1027         if (rt->rtsp_streams[i]->rtp_handle) {
1028             url_close(rt->rtsp_streams[i]->rtp_handle);
1029             rt->rtsp_streams[i]->rtp_handle = NULL;
1030         }
1031     }
1032     return err;
1033 }
1034
1035 static int rtsp_read_header(AVFormatContext *s,
1036                             AVFormatParameters *ap)
1037 {
1038     RTSPState *rt = s->priv_data;
1039     char host[1024], path[1024], tcpname[1024], cmd[2048], *option_list, *option;
1040     URLContext *rtsp_hd;
1041     int port, ret, err;
1042     RTSPHeader reply1, *reply = &reply1;
1043     unsigned char *content = NULL;
1044     int protocol_mask = 0;
1045
1046     /* extract hostname and port */
1047     url_split(NULL, 0, NULL, 0,
1048               host, sizeof(host), &port, path, sizeof(path), s->filename);
1049     if (port < 0)
1050         port = RTSP_DEFAULT_PORT;
1051
1052     /* search for options */
1053     option_list = strchr(path, '?');
1054     if (option_list) {
1055         /* remove the options from the path */
1056         *option_list++ = 0;
1057         while(option_list) {
1058             /* move the option pointer */
1059             option = option_list;
1060             option_list = strchr(option_list, '&');
1061             if (option_list)
1062                 *(option_list++) = 0;
1063             /* handle the options */
1064             if (strcmp(option, "udp") == 0)
1065                 protocol_mask = (1<< RTSP_PROTOCOL_RTP_UDP);
1066             else if (strcmp(option, "multicast") == 0)
1067                 protocol_mask = (1<< RTSP_PROTOCOL_RTP_UDP_MULTICAST);
1068             else if (strcmp(option, "tcp") == 0)
1069                 protocol_mask = (1<< RTSP_PROTOCOL_RTP_TCP);
1070         }
1071     }
1072
1073     if (!protocol_mask)
1074         protocol_mask = (1 << RTSP_PROTOCOL_RTP_LAST) - 1;
1075
1076     /* open the tcp connexion */
1077     snprintf(tcpname, sizeof(tcpname), "tcp://%s:%d", host, port);
1078     if (url_open(&rtsp_hd, tcpname, URL_RDWR) < 0)
1079         return AVERROR(EIO);
1080     rt->rtsp_hd = rtsp_hd;
1081     rt->seq = 0;
1082
1083     /* describe the stream */
1084     snprintf(cmd, sizeof(cmd),
1085              "DESCRIBE %s RTSP/1.0\r\n"
1086              "Accept: application/sdp\r\n",
1087              s->filename);
1088     rtsp_send_cmd(s, cmd, reply, &content);
1089     if (!content) {
1090         err = AVERROR_INVALIDDATA;
1091         goto fail;
1092     }
1093     if (reply->status_code != RTSP_STATUS_OK) {
1094         err = AVERROR_INVALIDDATA;
1095         goto fail;
1096     }
1097
1098     /* now we got the SDP description, we parse it */
1099     ret = sdp_parse(s, (const char *)content);
1100     av_freep(&content);
1101     if (ret < 0) {
1102         err = AVERROR_INVALIDDATA;
1103         goto fail;
1104     }
1105
1106     do {
1107         int protocol = ff_log2_tab[protocol_mask & ~(protocol_mask - 1)];
1108
1109         err = make_setup_request(s, host, port, protocol);
1110         if (err < 0)
1111             goto fail;
1112         protocol_mask &= ~(1 << protocol);
1113         if (protocol_mask == 0 && err == 1) {
1114             err = AVERROR(FF_NETERROR(EPROTONOSUPPORT));
1115             goto fail;
1116         }
1117     } while (err);
1118
1119     rt->state = RTSP_STATE_IDLE;
1120     rt->seek_timestamp = 0; /* default is to start stream at position
1121                                zero */
1122     if (ap->initial_pause) {
1123         /* do not start immediately */
1124     } else {
1125         if (rtsp_read_play(s) < 0) {
1126             err = AVERROR_INVALIDDATA;
1127             goto fail;
1128         }
1129     }
1130     return 0;
1131  fail:
1132     rtsp_close_streams(rt);
1133     av_freep(&content);
1134     url_close(rt->rtsp_hd);
1135     return err;
1136 }
1137
1138 static int tcp_read_packet(AVFormatContext *s, RTSPStream **prtsp_st,
1139                            uint8_t *buf, int buf_size)
1140 {
1141     RTSPState *rt = s->priv_data;
1142     int id, len, i, ret;
1143     RTSPStream *rtsp_st;
1144
1145 #ifdef DEBUG_RTP_TCP
1146     printf("tcp_read_packet:\n");
1147 #endif
1148  redo:
1149     for(;;) {
1150         ret = url_readbuf(rt->rtsp_hd, buf, 1);
1151 #ifdef DEBUG_RTP_TCP
1152         printf("ret=%d c=%02x [%c]\n", ret, buf[0], buf[0]);
1153 #endif
1154         if (ret != 1)
1155             return -1;
1156         if (buf[0] == '$')
1157             break;
1158     }
1159     ret = url_readbuf(rt->rtsp_hd, buf, 3);
1160     if (ret != 3)
1161         return -1;
1162     id = buf[0];
1163     len = AV_RB16(buf + 1);
1164 #ifdef DEBUG_RTP_TCP
1165     printf("id=%d len=%d\n", id, len);
1166 #endif
1167     if (len > buf_size || len < 12)
1168         goto redo;
1169     /* get the data */
1170     ret = url_readbuf(rt->rtsp_hd, buf, len);
1171     if (ret != len)
1172         return -1;
1173
1174     /* find the matching stream */
1175     for(i = 0; i < rt->nb_rtsp_streams; i++) {
1176         rtsp_st = rt->rtsp_streams[i];
1177         if (id >= rtsp_st->interleaved_min &&
1178             id <= rtsp_st->interleaved_max)
1179             goto found;
1180     }
1181     goto redo;
1182  found:
1183     *prtsp_st = rtsp_st;
1184     return len;
1185 }
1186
1187 static int udp_read_packet(AVFormatContext *s, RTSPStream **prtsp_st,
1188                            uint8_t *buf, int buf_size)
1189 {
1190     RTSPState *rt = s->priv_data;
1191     RTSPStream *rtsp_st;
1192     fd_set rfds;
1193     int fd1, fd2, fd_max, n, i, ret;
1194     struct timeval tv;
1195
1196     for(;;) {
1197         if (url_interrupt_cb())
1198             return AVERROR(EINTR);
1199         FD_ZERO(&rfds);
1200         fd_max = -1;
1201         for(i = 0; i < rt->nb_rtsp_streams; i++) {
1202             rtsp_st = rt->rtsp_streams[i];
1203             /* currently, we cannot probe RTCP handle because of blocking restrictions */
1204             rtp_get_file_handles(rtsp_st->rtp_handle, &fd1, &fd2);
1205             if (fd1 > fd_max)
1206                 fd_max = fd1;
1207             FD_SET(fd1, &rfds);
1208         }
1209         tv.tv_sec = 0;
1210         tv.tv_usec = 100 * 1000;
1211         n = select(fd_max + 1, &rfds, NULL, NULL, &tv);
1212         if (n > 0) {
1213             for(i = 0; i < rt->nb_rtsp_streams; i++) {
1214                 rtsp_st = rt->rtsp_streams[i];
1215                 rtp_get_file_handles(rtsp_st->rtp_handle, &fd1, &fd2);
1216                 if (FD_ISSET(fd1, &rfds)) {
1217                     ret = url_read(rtsp_st->rtp_handle, buf, buf_size);
1218                     if (ret > 0) {
1219                         *prtsp_st = rtsp_st;
1220                         return ret;
1221                     }
1222                 }
1223             }
1224         }
1225     }
1226 }
1227
1228 static int rtsp_read_packet(AVFormatContext *s,
1229                             AVPacket *pkt)
1230 {
1231     RTSPState *rt = s->priv_data;
1232     RTSPStream *rtsp_st;
1233     int ret, len;
1234     uint8_t buf[RTP_MAX_PACKET_LENGTH];
1235
1236     /* get next frames from the same RTP packet */
1237     if (rt->cur_rtp) {
1238         ret = rtp_parse_packet(rt->cur_rtp, pkt, NULL, 0);
1239         if (ret == 0) {
1240             rt->cur_rtp = NULL;
1241             return 0;
1242         } else if (ret == 1) {
1243             return 0;
1244         } else {
1245             rt->cur_rtp = NULL;
1246         }
1247     }
1248
1249     /* read next RTP packet */
1250  redo:
1251     switch(rt->protocol) {
1252     default:
1253     case RTSP_PROTOCOL_RTP_TCP:
1254         len = tcp_read_packet(s, &rtsp_st, buf, sizeof(buf));
1255         break;
1256     case RTSP_PROTOCOL_RTP_UDP:
1257     case RTSP_PROTOCOL_RTP_UDP_MULTICAST:
1258         len = udp_read_packet(s, &rtsp_st, buf, sizeof(buf));
1259         if (len >=0 && rtsp_st->rtp_ctx)
1260             rtp_check_and_send_back_rr(rtsp_st->rtp_ctx, len);
1261         break;
1262     }
1263     if (len < 0)
1264         return len;
1265     ret = rtp_parse_packet(rtsp_st->rtp_ctx, pkt, buf, len);
1266     if (ret < 0)
1267         goto redo;
1268     if (ret == 1) {
1269         /* more packets may follow, so we save the RTP context */
1270         rt->cur_rtp = rtsp_st->rtp_ctx;
1271     }
1272     return 0;
1273 }
1274
1275 static int rtsp_read_play(AVFormatContext *s)
1276 {
1277     RTSPState *rt = s->priv_data;
1278     RTSPHeader reply1, *reply = &reply1;
1279     char cmd[1024];
1280
1281     av_log(s, AV_LOG_DEBUG, "hello state=%d\n", rt->state);
1282
1283     if (rt->state == RTSP_STATE_PAUSED) {
1284         snprintf(cmd, sizeof(cmd),
1285                  "PLAY %s RTSP/1.0\r\n",
1286                  s->filename);
1287     } else {
1288         snprintf(cmd, sizeof(cmd),
1289                  "PLAY %s RTSP/1.0\r\n"
1290                  "Range: npt=%0.3f-\r\n",
1291                  s->filename,
1292                  (double)rt->seek_timestamp / AV_TIME_BASE);
1293     }
1294     rtsp_send_cmd(s, cmd, reply, NULL);
1295     if (reply->status_code != RTSP_STATUS_OK) {
1296         return -1;
1297     } else {
1298         rt->state = RTSP_STATE_PLAYING;
1299         return 0;
1300     }
1301 }
1302
1303 /* pause the stream */
1304 static int rtsp_read_pause(AVFormatContext *s)
1305 {
1306     RTSPState *rt = s->priv_data;
1307     RTSPHeader reply1, *reply = &reply1;
1308     char cmd[1024];
1309
1310     rt = s->priv_data;
1311
1312     if (rt->state != RTSP_STATE_PLAYING)
1313         return 0;
1314
1315     snprintf(cmd, sizeof(cmd),
1316              "PAUSE %s RTSP/1.0\r\n",
1317              s->filename);
1318     rtsp_send_cmd(s, cmd, reply, NULL);
1319     if (reply->status_code != RTSP_STATUS_OK) {
1320         return -1;
1321     } else {
1322         rt->state = RTSP_STATE_PAUSED;
1323         return 0;
1324     }
1325 }
1326
1327 static int rtsp_read_seek(AVFormatContext *s, int stream_index,
1328                           int64_t timestamp, int flags)
1329 {
1330     RTSPState *rt = s->priv_data;
1331
1332     rt->seek_timestamp = av_rescale_q(timestamp, s->streams[stream_index]->time_base, AV_TIME_BASE_Q);
1333     switch(rt->state) {
1334     default:
1335     case RTSP_STATE_IDLE:
1336         break;
1337     case RTSP_STATE_PLAYING:
1338         if (rtsp_read_play(s) != 0)
1339             return -1;
1340         break;
1341     case RTSP_STATE_PAUSED:
1342         rt->state = RTSP_STATE_IDLE;
1343         break;
1344     }
1345     return 0;
1346 }
1347
1348 static int rtsp_read_close(AVFormatContext *s)
1349 {
1350     RTSPState *rt = s->priv_data;
1351     RTSPHeader reply1, *reply = &reply1;
1352     char cmd[1024];
1353
1354 #if 0
1355     /* NOTE: it is valid to flush the buffer here */
1356     if (rt->protocol == RTSP_PROTOCOL_RTP_TCP) {
1357         url_fclose(&rt->rtsp_gb);
1358     }
1359 #endif
1360     snprintf(cmd, sizeof(cmd),
1361              "TEARDOWN %s RTSP/1.0\r\n",
1362              s->filename);
1363     rtsp_send_cmd(s, cmd, reply, NULL);
1364
1365     rtsp_close_streams(rt);
1366     url_close(rt->rtsp_hd);
1367     return 0;
1368 }
1369
1370 #ifdef CONFIG_RTSP_DEMUXER
1371 AVInputFormat rtsp_demuxer = {
1372     "rtsp",
1373     NULL_IF_CONFIG_SMALL("RTSP input format"),
1374     sizeof(RTSPState),
1375     rtsp_probe,
1376     rtsp_read_header,
1377     rtsp_read_packet,
1378     rtsp_read_close,
1379     rtsp_read_seek,
1380     .flags = AVFMT_NOFILE,
1381     .read_play = rtsp_read_play,
1382     .read_pause = rtsp_read_pause,
1383 };
1384 #endif
1385
1386 static int sdp_probe(AVProbeData *p1)
1387 {
1388     const char *p = p1->buf, *p_end = p1->buf + p1->buf_size;
1389
1390     /* we look for a line beginning "c=IN IP4" */
1391     while (p < p_end && *p != '\0') {
1392         if (p + sizeof("c=IN IP4") - 1 < p_end && av_strstart(p, "c=IN IP4", NULL))
1393             return AVPROBE_SCORE_MAX / 2;
1394
1395         while(p < p_end - 1 && *p != '\n') p++;
1396         if (++p >= p_end)
1397             break;
1398         if (*p == '\r')
1399             p++;
1400     }
1401     return 0;
1402 }
1403
1404 #define SDP_MAX_SIZE 8192
1405
1406 static int sdp_read_header(AVFormatContext *s,
1407                            AVFormatParameters *ap)
1408 {
1409     RTSPState *rt = s->priv_data;
1410     RTSPStream *rtsp_st;
1411     int size, i, err;
1412     char *content;
1413     char url[1024];
1414     AVStream *st;
1415
1416     /* read the whole sdp file */
1417     /* XXX: better loading */
1418     content = av_malloc(SDP_MAX_SIZE);
1419     size = get_buffer(s->pb, content, SDP_MAX_SIZE - 1);
1420     if (size <= 0) {
1421         av_free(content);
1422         return AVERROR_INVALIDDATA;
1423     }
1424     content[size] ='\0';
1425
1426     sdp_parse(s, content);
1427     av_free(content);
1428
1429     /* open each RTP stream */
1430     for(i=0;i<rt->nb_rtsp_streams;i++) {
1431         rtsp_st = rt->rtsp_streams[i];
1432
1433         snprintf(url, sizeof(url), "rtp://%s:%d?localport=%d&ttl=%d",
1434                  inet_ntoa(rtsp_st->sdp_ip),
1435                  rtsp_st->sdp_port,
1436                  rtsp_st->sdp_port,
1437                  rtsp_st->sdp_ttl);
1438         if (url_open(&rtsp_st->rtp_handle, url, URL_RDWR) < 0) {
1439             err = AVERROR_INVALIDDATA;
1440             goto fail;
1441         }
1442         /* open the RTP context */
1443         st = NULL;
1444         if (rtsp_st->stream_index >= 0)
1445             st = s->streams[rtsp_st->stream_index];
1446         if (!st)
1447             s->ctx_flags |= AVFMTCTX_NOHEADER;
1448         rtsp_st->rtp_ctx = rtp_parse_open(s, st, rtsp_st->rtp_handle, rtsp_st->sdp_payload_type, &rtsp_st->rtp_payload_data);
1449         if (!rtsp_st->rtp_ctx) {
1450             err = AVERROR(ENOMEM);
1451             goto fail;
1452         } else {
1453             if(rtsp_st->dynamic_handler) {
1454                 rtsp_st->rtp_ctx->dynamic_protocol_context= rtsp_st->dynamic_protocol_context;
1455                 rtsp_st->rtp_ctx->parse_packet= rtsp_st->dynamic_handler->parse_packet;
1456             }
1457         }
1458     }
1459     return 0;
1460  fail:
1461     rtsp_close_streams(rt);
1462     return err;
1463 }
1464
1465 static int sdp_read_packet(AVFormatContext *s,
1466                             AVPacket *pkt)
1467 {
1468     return rtsp_read_packet(s, pkt);
1469 }
1470
1471 static int sdp_read_close(AVFormatContext *s)
1472 {
1473     RTSPState *rt = s->priv_data;
1474     rtsp_close_streams(rt);
1475     return 0;
1476 }
1477
1478 #ifdef CONFIG_SDP_DEMUXER
1479 AVInputFormat sdp_demuxer = {
1480     "sdp",
1481     NULL_IF_CONFIG_SMALL("SDP"),
1482     sizeof(RTSPState),
1483     sdp_probe,
1484     sdp_read_header,
1485     sdp_read_packet,
1486     sdp_read_close,
1487 };
1488 #endif
1489
1490 #ifdef CONFIG_REDIR_DEMUXER
1491 /* dummy redirector format (used directly in av_open_input_file now) */
1492 static int redir_probe(AVProbeData *pd)
1493 {
1494     const char *p;
1495     p = pd->buf;
1496     while (redir_isspace(*p))
1497         p++;
1498     if (av_strstart(p, "http://", NULL) ||
1499         av_strstart(p, "rtsp://", NULL))
1500         return AVPROBE_SCORE_MAX;
1501     return 0;
1502 }
1503
1504 static int redir_read_header(AVFormatContext *s, AVFormatParameters *ap)
1505 {
1506     char buf[4096], *q;
1507     int c;
1508     AVFormatContext *ic = NULL;
1509     ByteIOContext *f = s->pb;
1510
1511     /* parse each URL and try to open it */
1512     c = url_fgetc(f);
1513     while (c != URL_EOF) {
1514         /* skip spaces */
1515         for(;;) {
1516             if (!redir_isspace(c))
1517                 break;
1518             c = url_fgetc(f);
1519         }
1520         if (c == URL_EOF)
1521             break;
1522         /* record url */
1523         q = buf;
1524         for(;;) {
1525             if (c == URL_EOF || redir_isspace(c))
1526                 break;
1527             if ((q - buf) < sizeof(buf) - 1)
1528                 *q++ = c;
1529             c = url_fgetc(f);
1530         }
1531         *q = '\0';
1532         //printf("URL='%s'\n", buf);
1533         /* try to open the media file */
1534         if (av_open_input_file(&ic, buf, NULL, 0, NULL) == 0)
1535             break;
1536     }
1537     if (!ic)
1538         return AVERROR(EIO);
1539
1540     *s = *ic;
1541     url_fclose(f);
1542
1543     return 0;
1544 }
1545
1546 AVInputFormat redir_demuxer = {
1547     "redir",
1548     NULL_IF_CONFIG_SMALL("Redirector format"),
1549     0,
1550     redir_probe,
1551     redir_read_header,
1552     NULL,
1553     NULL,
1554 };
1555 #endif