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