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