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