OSDN Git Service

rtpdec: Add a terminating null byte at the end of the SDES/CNAME
[android-x86/external-ffmpeg.git] / libavformat / rtpdec.c
1 /*
2  * RTP input format
3  * Copyright (c) 2002 Fabrice Bellard
4  *
5  * This file is part of Libav.
6  *
7  * Libav 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  * Libav 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 Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include "libavutil/mathematics.h"
23 #include "libavutil/avstring.h"
24 #include "libavutil/time.h"
25 #include "libavcodec/get_bits.h"
26 #include "avformat.h"
27 #include "mpegts.h"
28 #include "network.h"
29 #include "url.h"
30 #include "rtpdec.h"
31 #include "rtpdec_formats.h"
32
33 #define MIN_FEEDBACK_INTERVAL 200000 /* 200 ms in us */
34
35 static RTPDynamicProtocolHandler realmedia_mp3_dynamic_handler = {
36     .enc_name   = "X-MP3-draft-00",
37     .codec_type = AVMEDIA_TYPE_AUDIO,
38     .codec_id   = AV_CODEC_ID_MP3ADU,
39 };
40
41 static RTPDynamicProtocolHandler speex_dynamic_handler = {
42     .enc_name   = "speex",
43     .codec_type = AVMEDIA_TYPE_AUDIO,
44     .codec_id   = AV_CODEC_ID_SPEEX,
45 };
46
47 static RTPDynamicProtocolHandler opus_dynamic_handler = {
48     .enc_name   = "opus",
49     .codec_type = AVMEDIA_TYPE_AUDIO,
50     .codec_id   = AV_CODEC_ID_OPUS,
51 };
52
53 /* statistics functions */
54 static RTPDynamicProtocolHandler *rtp_first_dynamic_payload_handler = NULL;
55
56 void ff_register_dynamic_payload_handler(RTPDynamicProtocolHandler *handler)
57 {
58     handler->next = rtp_first_dynamic_payload_handler;
59     rtp_first_dynamic_payload_handler = handler;
60 }
61
62 void av_register_rtp_dynamic_payload_handlers(void)
63 {
64     ff_register_dynamic_payload_handler(&ff_mp4v_es_dynamic_handler);
65     ff_register_dynamic_payload_handler(&ff_mpeg4_generic_dynamic_handler);
66     ff_register_dynamic_payload_handler(&ff_amr_nb_dynamic_handler);
67     ff_register_dynamic_payload_handler(&ff_amr_wb_dynamic_handler);
68     ff_register_dynamic_payload_handler(&ff_h263_1998_dynamic_handler);
69     ff_register_dynamic_payload_handler(&ff_h263_2000_dynamic_handler);
70     ff_register_dynamic_payload_handler(&ff_h263_rfc2190_dynamic_handler);
71     ff_register_dynamic_payload_handler(&ff_h264_dynamic_handler);
72     ff_register_dynamic_payload_handler(&ff_ilbc_dynamic_handler);
73     ff_register_dynamic_payload_handler(&ff_jpeg_dynamic_handler);
74     ff_register_dynamic_payload_handler(&ff_vorbis_dynamic_handler);
75     ff_register_dynamic_payload_handler(&ff_theora_dynamic_handler);
76     ff_register_dynamic_payload_handler(&ff_qdm2_dynamic_handler);
77     ff_register_dynamic_payload_handler(&ff_svq3_dynamic_handler);
78     ff_register_dynamic_payload_handler(&ff_mp4a_latm_dynamic_handler);
79     ff_register_dynamic_payload_handler(&ff_vp8_dynamic_handler);
80     ff_register_dynamic_payload_handler(&ff_qcelp_dynamic_handler);
81     ff_register_dynamic_payload_handler(&realmedia_mp3_dynamic_handler);
82     ff_register_dynamic_payload_handler(&speex_dynamic_handler);
83     ff_register_dynamic_payload_handler(&opus_dynamic_handler);
84
85     ff_register_dynamic_payload_handler(&ff_ms_rtp_asf_pfv_handler);
86     ff_register_dynamic_payload_handler(&ff_ms_rtp_asf_pfa_handler);
87
88     ff_register_dynamic_payload_handler(&ff_qt_rtp_aud_handler);
89     ff_register_dynamic_payload_handler(&ff_qt_rtp_vid_handler);
90     ff_register_dynamic_payload_handler(&ff_quicktime_rtp_aud_handler);
91     ff_register_dynamic_payload_handler(&ff_quicktime_rtp_vid_handler);
92
93     ff_register_dynamic_payload_handler(&ff_g726_16_dynamic_handler);
94     ff_register_dynamic_payload_handler(&ff_g726_24_dynamic_handler);
95     ff_register_dynamic_payload_handler(&ff_g726_32_dynamic_handler);
96     ff_register_dynamic_payload_handler(&ff_g726_40_dynamic_handler);
97 }
98
99 RTPDynamicProtocolHandler *ff_rtp_handler_find_by_name(const char *name,
100                                                        enum AVMediaType codec_type)
101 {
102     RTPDynamicProtocolHandler *handler;
103     for (handler = rtp_first_dynamic_payload_handler;
104          handler; handler = handler->next)
105         if (!av_strcasecmp(name, handler->enc_name) &&
106             codec_type == handler->codec_type)
107             return handler;
108     return NULL;
109 }
110
111 RTPDynamicProtocolHandler *ff_rtp_handler_find_by_id(int id,
112                                                      enum AVMediaType codec_type)
113 {
114     RTPDynamicProtocolHandler *handler;
115     for (handler = rtp_first_dynamic_payload_handler;
116          handler; handler = handler->next)
117         if (handler->static_payload_id && handler->static_payload_id == id &&
118             codec_type == handler->codec_type)
119             return handler;
120     return NULL;
121 }
122
123 static int rtcp_parse_packet(RTPDemuxContext *s, const unsigned char *buf,
124                              int len)
125 {
126     int payload_len;
127     while (len >= 4) {
128         payload_len = FFMIN(len, (AV_RB16(buf + 2) + 1) * 4);
129
130         switch (buf[1]) {
131         case RTCP_SR:
132             if (payload_len < 20) {
133                 av_log(NULL, AV_LOG_ERROR,
134                        "Invalid length for RTCP SR packet\n");
135                 return AVERROR_INVALIDDATA;
136             }
137
138             s->last_rtcp_ntp_time  = AV_RB64(buf + 8);
139             s->last_rtcp_timestamp = AV_RB32(buf + 16);
140             if (s->first_rtcp_ntp_time == AV_NOPTS_VALUE) {
141                 s->first_rtcp_ntp_time = s->last_rtcp_ntp_time;
142                 if (!s->base_timestamp)
143                     s->base_timestamp = s->last_rtcp_timestamp;
144                 s->rtcp_ts_offset = s->last_rtcp_timestamp - s->base_timestamp;
145             }
146
147             break;
148         case RTCP_BYE:
149             return -RTCP_BYE;
150         }
151
152         buf += payload_len;
153         len -= payload_len;
154     }
155     return -1;
156 }
157
158 #define RTP_SEQ_MOD (1 << 16)
159
160 static void rtp_init_statistics(RTPStatistics *s, uint16_t base_sequence)
161 {
162     memset(s, 0, sizeof(RTPStatistics));
163     s->max_seq   = base_sequence;
164     s->probation = 1;
165 }
166
167 /*
168  * Called whenever there is a large jump in sequence numbers,
169  * or when they get out of probation...
170  */
171 static void rtp_init_sequence(RTPStatistics *s, uint16_t seq)
172 {
173     s->max_seq        = seq;
174     s->cycles         = 0;
175     s->base_seq       = seq - 1;
176     s->bad_seq        = RTP_SEQ_MOD + 1;
177     s->received       = 0;
178     s->expected_prior = 0;
179     s->received_prior = 0;
180     s->jitter         = 0;
181     s->transit        = 0;
182 }
183
184 /* Returns 1 if we should handle this packet. */
185 static int rtp_valid_packet_in_sequence(RTPStatistics *s, uint16_t seq)
186 {
187     uint16_t udelta = seq - s->max_seq;
188     const int MAX_DROPOUT    = 3000;
189     const int MAX_MISORDER   = 100;
190     const int MIN_SEQUENTIAL = 2;
191
192     /* source not valid until MIN_SEQUENTIAL packets with sequence
193      * seq. numbers have been received */
194     if (s->probation) {
195         if (seq == s->max_seq + 1) {
196             s->probation--;
197             s->max_seq = seq;
198             if (s->probation == 0) {
199                 rtp_init_sequence(s, seq);
200                 s->received++;
201                 return 1;
202             }
203         } else {
204             s->probation = MIN_SEQUENTIAL - 1;
205             s->max_seq   = seq;
206         }
207     } else if (udelta < MAX_DROPOUT) {
208         // in order, with permissible gap
209         if (seq < s->max_seq) {
210             // sequence number wrapped; count another 64k cycles
211             s->cycles += RTP_SEQ_MOD;
212         }
213         s->max_seq = seq;
214     } else if (udelta <= RTP_SEQ_MOD - MAX_MISORDER) {
215         // sequence made a large jump...
216         if (seq == s->bad_seq) {
217             /* two sequential packets -- assume that the other side
218              * restarted without telling us; just resync. */
219             rtp_init_sequence(s, seq);
220         } else {
221             s->bad_seq = (seq + 1) & (RTP_SEQ_MOD - 1);
222             return 0;
223         }
224     } else {
225         // duplicate or reordered packet...
226     }
227     s->received++;
228     return 1;
229 }
230
231 int ff_rtp_check_and_send_back_rr(RTPDemuxContext *s, URLContext *fd,
232                                   AVIOContext *avio, int count)
233 {
234     AVIOContext *pb;
235     uint8_t *buf;
236     int len;
237     int rtcp_bytes;
238     RTPStatistics *stats = &s->statistics;
239     uint32_t lost;
240     uint32_t extended_max;
241     uint32_t expected_interval;
242     uint32_t received_interval;
243     uint32_t lost_interval;
244     uint32_t expected;
245     uint32_t fraction;
246     uint64_t ntp_time = s->last_rtcp_ntp_time; // TODO: Get local ntp time?
247
248     if ((!fd && !avio) || (count < 1))
249         return -1;
250
251     /* TODO: I think this is way too often; RFC 1889 has algorithm for this */
252     /* XXX: MPEG pts hardcoded. RTCP send every 0.5 seconds */
253     s->octet_count += count;
254     rtcp_bytes = ((s->octet_count - s->last_octet_count) * RTCP_TX_RATIO_NUM) /
255         RTCP_TX_RATIO_DEN;
256     rtcp_bytes /= 50; // mmu_man: that's enough for me... VLC sends much less btw !?
257     if (rtcp_bytes < 28)
258         return -1;
259     s->last_octet_count = s->octet_count;
260
261     if (!fd)
262         pb = avio;
263     else if (avio_open_dyn_buf(&pb) < 0)
264         return -1;
265
266     // Receiver Report
267     avio_w8(pb, (RTP_VERSION << 6) + 1); /* 1 report block */
268     avio_w8(pb, RTCP_RR);
269     avio_wb16(pb, 7); /* length in words - 1 */
270     // our own SSRC: we use the server's SSRC + 1 to avoid conflicts
271     avio_wb32(pb, s->ssrc + 1);
272     avio_wb32(pb, s->ssrc); // server SSRC
273     // some placeholders we should really fill...
274     // RFC 1889/p64
275     extended_max          = stats->cycles + stats->max_seq;
276     expected              = extended_max - stats->base_seq + 1;
277     lost                  = expected - stats->received;
278     lost                  = FFMIN(lost, 0xffffff); // clamp it since it's only 24 bits...
279     expected_interval     = expected - stats->expected_prior;
280     stats->expected_prior = expected;
281     received_interval     = stats->received - stats->received_prior;
282     stats->received_prior = stats->received;
283     lost_interval         = expected_interval - received_interval;
284     if (expected_interval == 0 || lost_interval <= 0)
285         fraction = 0;
286     else
287         fraction = (lost_interval << 8) / expected_interval;
288
289     fraction = (fraction << 24) | lost;
290
291     avio_wb32(pb, fraction); /* 8 bits of fraction, 24 bits of total packets lost */
292     avio_wb32(pb, extended_max); /* max sequence received */
293     avio_wb32(pb, stats->jitter >> 4); /* jitter */
294
295     if (s->last_rtcp_ntp_time == AV_NOPTS_VALUE) {
296         avio_wb32(pb, 0); /* last SR timestamp */
297         avio_wb32(pb, 0); /* delay since last SR */
298     } else {
299         uint32_t middle_32_bits   = s->last_rtcp_ntp_time >> 16; // this is valid, right? do we need to handle 64 bit values special?
300         uint32_t delay_since_last = ntp_time - s->last_rtcp_ntp_time;
301
302         avio_wb32(pb, middle_32_bits); /* last SR timestamp */
303         avio_wb32(pb, delay_since_last); /* delay since last SR */
304     }
305
306     // CNAME
307     avio_w8(pb, (RTP_VERSION << 6) + 1); /* 1 report block */
308     avio_w8(pb, RTCP_SDES);
309     len = strlen(s->hostname);
310     avio_wb16(pb, (7 + len + 3) / 4); /* length in words - 1 */
311     avio_wb32(pb, s->ssrc + 1);
312     avio_w8(pb, 0x01);
313     avio_w8(pb, len);
314     avio_write(pb, s->hostname, len);
315     avio_w8(pb, 0); /* END */
316     // padding
317     for (len = (7 + len) % 4; len % 4; len++)
318         avio_w8(pb, 0);
319
320     avio_flush(pb);
321     if (!fd)
322         return 0;
323     len = avio_close_dyn_buf(pb, &buf);
324     if ((len > 0) && buf) {
325         int av_unused result;
326         av_dlog(s->ic, "sending %d bytes of RR\n", len);
327         result = ffurl_write(fd, buf, len);
328         av_dlog(s->ic, "result from ffurl_write: %d\n", result);
329         av_free(buf);
330     }
331     return 0;
332 }
333
334 void ff_rtp_send_punch_packets(URLContext *rtp_handle)
335 {
336     AVIOContext *pb;
337     uint8_t *buf;
338     int len;
339
340     /* Send a small RTP packet */
341     if (avio_open_dyn_buf(&pb) < 0)
342         return;
343
344     avio_w8(pb, (RTP_VERSION << 6));
345     avio_w8(pb, 0); /* Payload type */
346     avio_wb16(pb, 0); /* Seq */
347     avio_wb32(pb, 0); /* Timestamp */
348     avio_wb32(pb, 0); /* SSRC */
349
350     avio_flush(pb);
351     len = avio_close_dyn_buf(pb, &buf);
352     if ((len > 0) && buf)
353         ffurl_write(rtp_handle, buf, len);
354     av_free(buf);
355
356     /* Send a minimal RTCP RR */
357     if (avio_open_dyn_buf(&pb) < 0)
358         return;
359
360     avio_w8(pb, (RTP_VERSION << 6));
361     avio_w8(pb, RTCP_RR); /* receiver report */
362     avio_wb16(pb, 1); /* length in words - 1 */
363     avio_wb32(pb, 0); /* our own SSRC */
364
365     avio_flush(pb);
366     len = avio_close_dyn_buf(pb, &buf);
367     if ((len > 0) && buf)
368         ffurl_write(rtp_handle, buf, len);
369     av_free(buf);
370 }
371
372 static int find_missing_packets(RTPDemuxContext *s, uint16_t *first_missing,
373                                 uint16_t *missing_mask)
374 {
375     int i;
376     uint16_t next_seq = s->seq + 1;
377     RTPPacket *pkt = s->queue;
378
379     if (!pkt || pkt->seq == next_seq)
380         return 0;
381
382     *missing_mask = 0;
383     for (i = 1; i <= 16; i++) {
384         uint16_t missing_seq = next_seq + i;
385         while (pkt) {
386             int16_t diff = pkt->seq - missing_seq;
387             if (diff >= 0)
388                 break;
389             pkt = pkt->next;
390         }
391         if (!pkt)
392             break;
393         if (pkt->seq == missing_seq)
394             continue;
395         *missing_mask |= 1 << (i - 1);
396     }
397
398     *first_missing = next_seq;
399     return 1;
400 }
401
402 int ff_rtp_send_rtcp_feedback(RTPDemuxContext *s, URLContext *fd,
403                               AVIOContext *avio)
404 {
405     int len, need_keyframe, missing_packets;
406     AVIOContext *pb;
407     uint8_t *buf;
408     int64_t now;
409     uint16_t first_missing, missing_mask;
410
411     if (!fd && !avio)
412         return -1;
413
414     need_keyframe = s->handler && s->handler->need_keyframe &&
415                     s->handler->need_keyframe(s->dynamic_protocol_context);
416     missing_packets = find_missing_packets(s, &first_missing, &missing_mask);
417
418     if (!need_keyframe && !missing_packets)
419         return 0;
420
421     /* Send new feedback if enough time has elapsed since the last
422      * feedback packet. */
423
424     now = av_gettime();
425     if (s->last_feedback_time &&
426         (now - s->last_feedback_time) < MIN_FEEDBACK_INTERVAL)
427         return 0;
428     s->last_feedback_time = now;
429
430     if (!fd)
431         pb = avio;
432     else if (avio_open_dyn_buf(&pb) < 0)
433         return -1;
434
435     if (need_keyframe) {
436         avio_w8(pb, (RTP_VERSION << 6) | 1); /* PLI */
437         avio_w8(pb, RTCP_PSFB);
438         avio_wb16(pb, 2); /* length in words - 1 */
439         // our own SSRC: we use the server's SSRC + 1 to avoid conflicts
440         avio_wb32(pb, s->ssrc + 1);
441         avio_wb32(pb, s->ssrc); // server SSRC
442     }
443
444     if (missing_packets) {
445         avio_w8(pb, (RTP_VERSION << 6) | 1); /* NACK */
446         avio_w8(pb, RTCP_RTPFB);
447         avio_wb16(pb, 3); /* length in words - 1 */
448         avio_wb32(pb, s->ssrc + 1);
449         avio_wb32(pb, s->ssrc); // server SSRC
450
451         avio_wb16(pb, first_missing);
452         avio_wb16(pb, missing_mask);
453     }
454
455     avio_flush(pb);
456     if (!fd)
457         return 0;
458     len = avio_close_dyn_buf(pb, &buf);
459     if (len > 0 && buf) {
460         ffurl_write(fd, buf, len);
461         av_free(buf);
462     }
463     return 0;
464 }
465
466 /**
467  * open a new RTP parse context for stream 'st'. 'st' can be NULL for
468  * MPEG2-TS streams to indicate that they should be demuxed inside the
469  * rtp demux (otherwise AV_CODEC_ID_MPEG2TS packets are returned)
470  */
471 RTPDemuxContext *ff_rtp_parse_open(AVFormatContext *s1, AVStream *st,
472                                    int payload_type, int queue_size)
473 {
474     RTPDemuxContext *s;
475
476     s = av_mallocz(sizeof(RTPDemuxContext));
477     if (!s)
478         return NULL;
479     s->payload_type        = payload_type;
480     s->last_rtcp_ntp_time  = AV_NOPTS_VALUE;
481     s->first_rtcp_ntp_time = AV_NOPTS_VALUE;
482     s->ic                  = s1;
483     s->st                  = st;
484     s->queue_size          = queue_size;
485     rtp_init_statistics(&s->statistics, 0); // do we know the initial sequence from sdp?
486     if (!strcmp(ff_rtp_enc_name(payload_type), "MP2T")) {
487         s->ts = ff_mpegts_parse_open(s->ic);
488         if (s->ts == NULL) {
489             av_free(s);
490             return NULL;
491         }
492     } else if (st) {
493         switch (st->codec->codec_id) {
494         case AV_CODEC_ID_MPEG1VIDEO:
495         case AV_CODEC_ID_MPEG2VIDEO:
496         case AV_CODEC_ID_MP2:
497         case AV_CODEC_ID_MP3:
498         case AV_CODEC_ID_MPEG4:
499         case AV_CODEC_ID_H263:
500         case AV_CODEC_ID_H264:
501             st->need_parsing = AVSTREAM_PARSE_FULL;
502             break;
503         case AV_CODEC_ID_VORBIS:
504             st->need_parsing = AVSTREAM_PARSE_HEADERS;
505             break;
506         case AV_CODEC_ID_ADPCM_G722:
507             /* According to RFC 3551, the stream clock rate is 8000
508              * even if the sample rate is 16000. */
509             if (st->codec->sample_rate == 8000)
510                 st->codec->sample_rate = 16000;
511             break;
512         default:
513             break;
514         }
515     }
516     // needed to send back RTCP RR in RTSP sessions
517     gethostname(s->hostname, sizeof(s->hostname));
518     return s;
519 }
520
521 void ff_rtp_parse_set_dynamic_protocol(RTPDemuxContext *s, PayloadContext *ctx,
522                                        RTPDynamicProtocolHandler *handler)
523 {
524     s->dynamic_protocol_context = ctx;
525     s->handler                  = handler;
526 }
527
528 /**
529  * This was the second switch in rtp_parse packet.
530  * Normalizes time, if required, sets stream_index, etc.
531  */
532 static void finalize_packet(RTPDemuxContext *s, AVPacket *pkt, uint32_t timestamp)
533 {
534     if (pkt->pts != AV_NOPTS_VALUE || pkt->dts != AV_NOPTS_VALUE)
535         return; /* Timestamp already set by depacketizer */
536     if (timestamp == RTP_NOTS_VALUE)
537         return;
538
539     if (s->last_rtcp_ntp_time != AV_NOPTS_VALUE && s->ic->nb_streams > 1) {
540         int64_t addend;
541         int delta_timestamp;
542
543         /* compute pts from timestamp with received ntp_time */
544         delta_timestamp = timestamp - s->last_rtcp_timestamp;
545         /* convert to the PTS timebase */
546         addend = av_rescale(s->last_rtcp_ntp_time - s->first_rtcp_ntp_time,
547                             s->st->time_base.den,
548                             (uint64_t) s->st->time_base.num << 32);
549         pkt->pts = s->range_start_offset + s->rtcp_ts_offset + addend +
550                    delta_timestamp;
551         return;
552     }
553
554     if (!s->base_timestamp)
555         s->base_timestamp = timestamp;
556     /* assume that the difference is INT32_MIN < x < INT32_MAX,
557      * but allow the first timestamp to exceed INT32_MAX */
558     if (!s->timestamp)
559         s->unwrapped_timestamp += timestamp;
560     else
561         s->unwrapped_timestamp += (int32_t)(timestamp - s->timestamp);
562     s->timestamp = timestamp;
563     pkt->pts     = s->unwrapped_timestamp + s->range_start_offset -
564                    s->base_timestamp;
565 }
566
567 static int rtp_parse_packet_internal(RTPDemuxContext *s, AVPacket *pkt,
568                                      const uint8_t *buf, int len)
569 {
570     unsigned int ssrc, h;
571     int payload_type, seq, ret, flags = 0;
572     int ext;
573     AVStream *st;
574     uint32_t timestamp;
575     int rv = 0;
576
577     ext          = buf[0] & 0x10;
578     payload_type = buf[1] & 0x7f;
579     if (buf[1] & 0x80)
580         flags |= RTP_FLAG_MARKER;
581     seq       = AV_RB16(buf + 2);
582     timestamp = AV_RB32(buf + 4);
583     ssrc      = AV_RB32(buf + 8);
584     /* store the ssrc in the RTPDemuxContext */
585     s->ssrc = ssrc;
586
587     /* NOTE: we can handle only one payload type */
588     if (s->payload_type != payload_type)
589         return -1;
590
591     st = s->st;
592     // only do something with this if all the rtp checks pass...
593     if (!rtp_valid_packet_in_sequence(&s->statistics, seq)) {
594         av_log(st ? st->codec : NULL, AV_LOG_ERROR,
595                "RTP: PT=%02x: bad cseq %04x expected=%04x\n",
596                payload_type, seq, ((s->seq + 1) & 0xffff));
597         return -1;
598     }
599
600     if (buf[0] & 0x20) {
601         int padding = buf[len - 1];
602         if (len >= 12 + padding)
603             len -= padding;
604     }
605
606     s->seq = seq;
607     len   -= 12;
608     buf   += 12;
609
610     /* RFC 3550 Section 5.3.1 RTP Header Extension handling */
611     if (ext) {
612         if (len < 4)
613             return -1;
614         /* calculate the header extension length (stored as number
615          * of 32-bit words) */
616         ext = (AV_RB16(buf + 2) + 1) << 2;
617
618         if (len < ext)
619             return -1;
620         // skip past RTP header extension
621         len -= ext;
622         buf += ext;
623     }
624
625     if (!st) {
626         /* specific MPEG2-TS demux support */
627         ret = ff_mpegts_parse_packet(s->ts, pkt, buf, len);
628         /* The only error that can be returned from ff_mpegts_parse_packet
629          * is "no more data to return from the provided buffer", so return
630          * AVERROR(EAGAIN) for all errors */
631         if (ret < 0)
632             return AVERROR(EAGAIN);
633         if (ret < len) {
634             s->read_buf_size = FFMIN(len - ret, sizeof(s->buf));
635             memcpy(s->buf, buf + ret, s->read_buf_size);
636             s->read_buf_index = 0;
637             return 1;
638         }
639         return 0;
640     } else if (s->handler && s->handler->parse_packet) {
641         rv = s->handler->parse_packet(s->ic, s->dynamic_protocol_context,
642                                       s->st, pkt, &timestamp, buf, len, seq,
643                                       flags);
644     } else {
645         /* At this point, the RTP header has been stripped;
646          * This is ASSUMING that there is only 1 CSRC, which isn't wise. */
647         switch (st->codec->codec_id) {
648         case AV_CODEC_ID_MP2:
649         case AV_CODEC_ID_MP3:
650             /* better than nothing: skip MPEG audio RTP header */
651             if (len <= 4)
652                 return -1;
653             h    = AV_RB32(buf);
654             len -= 4;
655             buf += 4;
656             av_new_packet(pkt, len);
657             memcpy(pkt->data, buf, len);
658             break;
659         case AV_CODEC_ID_MPEG1VIDEO:
660         case AV_CODEC_ID_MPEG2VIDEO:
661             /* better than nothing: skip MPEG video RTP header */
662             if (len <= 4)
663                 return -1;
664             h    = AV_RB32(buf);
665             buf += 4;
666             len -= 4;
667             if (h & (1 << 26)) {
668                 /* MPEG-2 */
669                 if (len <= 4)
670                     return -1;
671                 buf += 4;
672                 len -= 4;
673             }
674             av_new_packet(pkt, len);
675             memcpy(pkt->data, buf, len);
676             break;
677         default:
678             av_new_packet(pkt, len);
679             memcpy(pkt->data, buf, len);
680             break;
681         }
682
683         pkt->stream_index = st->index;
684     }
685
686     // now perform timestamp things....
687     finalize_packet(s, pkt, timestamp);
688
689     return rv;
690 }
691
692 void ff_rtp_reset_packet_queue(RTPDemuxContext *s)
693 {
694     while (s->queue) {
695         RTPPacket *next = s->queue->next;
696         av_free(s->queue->buf);
697         av_free(s->queue);
698         s->queue = next;
699     }
700     s->seq       = 0;
701     s->queue_len = 0;
702     s->prev_ret  = 0;
703 }
704
705 static void enqueue_packet(RTPDemuxContext *s, uint8_t *buf, int len)
706 {
707     uint16_t seq   = AV_RB16(buf + 2);
708     RTPPacket *cur = s->queue, *prev = NULL, *packet;
709
710     /* Find the correct place in the queue to insert the packet */
711     while (cur) {
712         int16_t diff = seq - cur->seq;
713         if (diff < 0)
714             break;
715         prev = cur;
716         cur  = cur->next;
717     }
718
719     packet = av_mallocz(sizeof(*packet));
720     if (!packet)
721         return;
722     packet->recvtime = av_gettime();
723     packet->seq      = seq;
724     packet->len      = len;
725     packet->buf      = buf;
726     packet->next     = cur;
727     if (prev)
728         prev->next = packet;
729     else
730         s->queue = packet;
731     s->queue_len++;
732 }
733
734 static int has_next_packet(RTPDemuxContext *s)
735 {
736     return s->queue && s->queue->seq == (uint16_t) (s->seq + 1);
737 }
738
739 int64_t ff_rtp_queued_packet_time(RTPDemuxContext *s)
740 {
741     return s->queue ? s->queue->recvtime : 0;
742 }
743
744 static int rtp_parse_queued_packet(RTPDemuxContext *s, AVPacket *pkt)
745 {
746     int rv;
747     RTPPacket *next;
748
749     if (s->queue_len <= 0)
750         return -1;
751
752     if (!has_next_packet(s))
753         av_log(s->st ? s->st->codec : NULL, AV_LOG_WARNING,
754                "RTP: missed %d packets\n", s->queue->seq - s->seq - 1);
755
756     /* Parse the first packet in the queue, and dequeue it */
757     rv   = rtp_parse_packet_internal(s, pkt, s->queue->buf, s->queue->len);
758     next = s->queue->next;
759     av_free(s->queue->buf);
760     av_free(s->queue);
761     s->queue = next;
762     s->queue_len--;
763     return rv;
764 }
765
766 static int rtp_parse_one_packet(RTPDemuxContext *s, AVPacket *pkt,
767                                 uint8_t **bufptr, int len)
768 {
769     uint8_t *buf = bufptr ? *bufptr : NULL;
770     int ret, flags = 0;
771     uint32_t timestamp;
772     int rv = 0;
773
774     if (!buf) {
775         /* If parsing of the previous packet actually returned 0 or an error,
776          * there's nothing more to be parsed from that packet, but we may have
777          * indicated that we can return the next enqueued packet. */
778         if (s->prev_ret <= 0)
779             return rtp_parse_queued_packet(s, pkt);
780         /* return the next packets, if any */
781         if (s->st && s->handler && s->handler->parse_packet) {
782             /* timestamp should be overwritten by parse_packet, if not,
783              * the packet is left with pts == AV_NOPTS_VALUE */
784             timestamp = RTP_NOTS_VALUE;
785             rv        = s->handler->parse_packet(s->ic, s->dynamic_protocol_context,
786                                                  s->st, pkt, &timestamp, NULL, 0, 0,
787                                                  flags);
788             finalize_packet(s, pkt, timestamp);
789             return rv;
790         } else {
791             // TODO: Move to a dynamic packet handler (like above)
792             if (s->read_buf_index >= s->read_buf_size)
793                 return AVERROR(EAGAIN);
794             ret = ff_mpegts_parse_packet(s->ts, pkt, s->buf + s->read_buf_index,
795                                          s->read_buf_size - s->read_buf_index);
796             if (ret < 0)
797                 return AVERROR(EAGAIN);
798             s->read_buf_index += ret;
799             if (s->read_buf_index < s->read_buf_size)
800                 return 1;
801             else
802                 return 0;
803         }
804     }
805
806     if (len < 12)
807         return -1;
808
809     if ((buf[0] & 0xc0) != (RTP_VERSION << 6))
810         return -1;
811     if (RTP_PT_IS_RTCP(buf[1])) {
812         return rtcp_parse_packet(s, buf, len);
813     }
814
815     if ((s->seq == 0 && !s->queue) || s->queue_size <= 1) {
816         /* First packet, or no reordering */
817         return rtp_parse_packet_internal(s, pkt, buf, len);
818     } else {
819         uint16_t seq = AV_RB16(buf + 2);
820         int16_t diff = seq - s->seq;
821         if (diff < 0) {
822             /* Packet older than the previously emitted one, drop */
823             av_log(s->st ? s->st->codec : NULL, AV_LOG_WARNING,
824                    "RTP: dropping old packet received too late\n");
825             return -1;
826         } else if (diff <= 1) {
827             /* Correct packet */
828             rv = rtp_parse_packet_internal(s, pkt, buf, len);
829             return rv;
830         } else {
831             /* Still missing some packet, enqueue this one. */
832             enqueue_packet(s, buf, len);
833             *bufptr = NULL;
834             /* Return the first enqueued packet if the queue is full,
835              * even if we're missing something */
836             if (s->queue_len >= s->queue_size)
837                 return rtp_parse_queued_packet(s, pkt);
838             return -1;
839         }
840     }
841 }
842
843 /**
844  * Parse an RTP or RTCP packet directly sent as a buffer.
845  * @param s RTP parse context.
846  * @param pkt returned packet
847  * @param bufptr pointer to the input buffer or NULL to read the next packets
848  * @param len buffer len
849  * @return 0 if a packet is returned, 1 if a packet is returned and more can follow
850  * (use buf as NULL to read the next). -1 if no packet (error or no more packet).
851  */
852 int ff_rtp_parse_packet(RTPDemuxContext *s, AVPacket *pkt,
853                         uint8_t **bufptr, int len)
854 {
855     int rv = rtp_parse_one_packet(s, pkt, bufptr, len);
856     s->prev_ret = rv;
857     while (rv == AVERROR(EAGAIN) && has_next_packet(s))
858         rv = rtp_parse_queued_packet(s, pkt);
859     return rv ? rv : has_next_packet(s);
860 }
861
862 void ff_rtp_parse_close(RTPDemuxContext *s)
863 {
864     ff_rtp_reset_packet_queue(s);
865     if (!strcmp(ff_rtp_enc_name(s->payload_type), "MP2T")) {
866         ff_mpegts_parse_close(s->ts);
867     }
868     av_free(s);
869 }
870
871 int ff_parse_fmtp(AVStream *stream, PayloadContext *data, const char *p,
872                   int (*parse_fmtp)(AVStream *stream,
873                                     PayloadContext *data,
874                                     char *attr, char *value))
875 {
876     char attr[256];
877     char *value;
878     int res;
879     int value_size = strlen(p) + 1;
880
881     if (!(value = av_malloc(value_size))) {
882         av_log(NULL, AV_LOG_ERROR, "Failed to allocate data for FMTP.");
883         return AVERROR(ENOMEM);
884     }
885
886     // remove protocol identifier
887     while (*p && *p == ' ')
888         p++;                     // strip spaces
889     while (*p && *p != ' ')
890         p++;                     // eat protocol identifier
891     while (*p && *p == ' ')
892         p++;                     // strip trailing spaces
893
894     while (ff_rtsp_next_attr_and_value(&p,
895                                        attr, sizeof(attr),
896                                        value, value_size)) {
897         res = parse_fmtp(stream, data, attr, value);
898         if (res < 0 && res != AVERROR_PATCHWELCOME) {
899             av_free(value);
900             return res;
901         }
902     }
903     av_free(value);
904     return 0;
905 }
906
907 int ff_rtp_finalize_packet(AVPacket *pkt, AVIOContext **dyn_buf, int stream_idx)
908 {
909     av_init_packet(pkt);
910
911     pkt->size         = avio_close_dyn_buf(*dyn_buf, &pkt->data);
912     pkt->stream_index = stream_idx;
913     pkt->destruct     = av_destruct_packet;
914     *dyn_buf          = NULL;
915     return pkt->size;
916 }