/* GStreamer * * unit test for gstrtpsession * * Copyright (C) <2009> Wim Taymans * Copyright (C) 2013 Collabora Ltd. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Library General Public * License as published by the Free Software Foundation; either * version 2 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Library General Public License for more details. * * You should have received a copy of the GNU Library General Public * License along with this library; if not, write to the * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, * Boston, MA 02110-1301, USA. */ #define GLIB_DISABLE_DEPRECATION_WARNINGS #include #include #include #include #include #include #include #include #define TEST_BUF_CLOCK_RATE 8000 #define TEST_BUF_PT 0 #define TEST_BUF_SSRC 0x01BADBAD #define TEST_BUF_MS 20 #define TEST_BUF_DURATION (TEST_BUF_MS * GST_MSECOND) #define TEST_BUF_SIZE (64000 * TEST_BUF_MS / 1000) #define TEST_RTP_TS_DURATION (TEST_BUF_CLOCK_RATE * TEST_BUF_MS / 1000) static GstCaps * generate_caps (void) { return gst_caps_new_simple ("application/x-rtp", "clock-rate", G_TYPE_INT, TEST_BUF_CLOCK_RATE, "payload", G_TYPE_INT, TEST_BUF_PT, NULL); } static GstBuffer * generate_test_buffer_full (GstClockTime dts, guint seq_num, guint32 rtp_ts, guint ssrc) { GstBuffer *buf; guint8 *payload; guint i; GstRTPBuffer rtp = GST_RTP_BUFFER_INIT; buf = gst_rtp_buffer_new_allocate (TEST_BUF_SIZE, 0, 0); GST_BUFFER_DTS (buf) = dts; gst_rtp_buffer_map (buf, GST_MAP_READWRITE, &rtp); gst_rtp_buffer_set_payload_type (&rtp, TEST_BUF_PT); gst_rtp_buffer_set_seq (&rtp, seq_num); gst_rtp_buffer_set_timestamp (&rtp, rtp_ts); gst_rtp_buffer_set_ssrc (&rtp, ssrc); payload = gst_rtp_buffer_get_payload (&rtp); for (i = 0; i < TEST_BUF_SIZE; i++) payload[i] = 0xff; gst_rtp_buffer_unmap (&rtp); return buf; } static GstBuffer * generate_test_buffer (guint seq_num, guint ssrc) { return generate_test_buffer_full (seq_num * TEST_BUF_DURATION, seq_num, seq_num * TEST_RTP_TS_DURATION, ssrc); } typedef struct { GstHarness *send_rtp_h; GstHarness *recv_rtp_h; GstHarness *rtcp_h; GstElement *session; GObject *internal_session; GstTestClock *testclock; GstCaps *caps; } SessionHarness; static GstCaps * _pt_map_requested (GstElement * element, guint pt, gpointer data) { SessionHarness *h = data; return gst_caps_copy (h->caps); } static SessionHarness * session_harness_new (void) { SessionHarness *h = g_new0 (SessionHarness, 1); h->caps = generate_caps (); h->testclock = GST_TEST_CLOCK_CAST (gst_test_clock_new ()); gst_system_clock_set_default (GST_CLOCK_CAST (h->testclock)); h->session = gst_element_factory_make ("rtpsession", NULL); gst_element_set_clock (h->session, GST_CLOCK_CAST (h->testclock)); h->send_rtp_h = gst_harness_new_with_element (h->session, "send_rtp_sink", "send_rtp_src"); gst_harness_set_src_caps (h->send_rtp_h, gst_caps_copy (h->caps)); h->recv_rtp_h = gst_harness_new_with_element (h->session, "recv_rtp_sink", "recv_rtp_src"); gst_harness_set_src_caps (h->recv_rtp_h, gst_caps_copy (h->caps)); h->rtcp_h = gst_harness_new_with_element (h->session, "recv_rtcp_sink", "send_rtcp_src"); gst_harness_set_src_caps_str (h->rtcp_h, "application/x-rtcp"); g_signal_connect (h->session, "request-pt-map", (GCallback) _pt_map_requested, h); g_object_get (h->session, "internal-session", &h->internal_session, NULL); return h; } static void session_harness_free (SessionHarness * h) { gst_system_clock_set_default (NULL); gst_caps_unref (h->caps); gst_object_unref (h->testclock); gst_harness_teardown (h->rtcp_h); gst_harness_teardown (h->recv_rtp_h); gst_harness_teardown (h->send_rtp_h); g_object_unref (h->internal_session); gst_object_unref (h->session); g_free (h); } static GstFlowReturn session_harness_send_rtp (SessionHarness * h, GstBuffer * buf) { return gst_harness_push (h->send_rtp_h, buf); } static GstFlowReturn session_harness_recv_rtp (SessionHarness * h, GstBuffer * buf) { return gst_harness_push (h->recv_rtp_h, buf); } static GstFlowReturn session_harness_recv_rtcp (SessionHarness * h, GstBuffer * buf) { return gst_harness_push (h->rtcp_h, buf); } static GstBuffer * session_harness_pull_rtcp (SessionHarness * h) { return gst_harness_pull (h->rtcp_h); } static void session_harness_crank_clock (SessionHarness * h) { gst_test_clock_crank (h->testclock); } static gboolean session_harness_advance_and_crank (SessionHarness * h, GstClockTime delta) { GstClockID res, pending; gboolean result; gst_test_clock_wait_for_next_pending_id (h->testclock, &pending); gst_test_clock_advance_time (h->testclock, delta); res = gst_test_clock_process_next_clock_id (h->testclock); if (res == pending) result = TRUE; else result = FALSE; if (res) gst_clock_id_unref (res); gst_clock_id_unref (pending); return result; } static void session_harness_produce_rtcp (SessionHarness * h, gint num_rtcp_packets) { /* due to randomness in rescheduling of RTCP timeout, we need to keep cranking until we have the desired amount of packets */ while (gst_harness_buffers_in_queue (h->rtcp_h) < num_rtcp_packets) { session_harness_crank_clock (h); /* allow the rtcp-thread to settle before checking the queue */ gst_test_clock_wait_for_next_pending_id (h->testclock, NULL); } } static void session_harness_force_key_unit (SessionHarness * h, guint count, guint ssrc, guint payload, gint * reqid, guint64 * sfr) { GstClockTime running_time = GST_CLOCK_TIME_NONE; gboolean all_headers = TRUE; GstStructure *s = gst_structure_new ("GstForceKeyUnit", "running-time", GST_TYPE_CLOCK_TIME, running_time, "all-headers", G_TYPE_BOOLEAN, all_headers, "count", G_TYPE_UINT, count, "ssrc", G_TYPE_UINT, ssrc, "payload", G_TYPE_UINT, payload, NULL); if (reqid) gst_structure_set (s, "reqid", G_TYPE_INT, *reqid, NULL); if (sfr) gst_structure_set (s, "sfr", G_TYPE_UINT64, *sfr, NULL); gst_harness_push_upstream_event (h->recv_rtp_h, gst_event_new_custom (GST_EVENT_CUSTOM_UPSTREAM, s)); } static void session_harness_rtp_retransmission_request (SessionHarness * h, guint ssrc, guint seqnum, guint delay, guint deadline, guint avg_rtt) { GstClockTime running_time = GST_CLOCK_TIME_NONE; GstStructure *s = gst_structure_new ("GstRTPRetransmissionRequest", "running-time", GST_TYPE_CLOCK_TIME, running_time, "ssrc", G_TYPE_UINT, ssrc, "seqnum", G_TYPE_UINT, seqnum, "delay", G_TYPE_UINT, delay, "deadline", G_TYPE_UINT, deadline, "avg-rtt", G_TYPE_UINT, avg_rtt, NULL); gst_harness_push_upstream_event (h->recv_rtp_h, gst_event_new_custom (GST_EVENT_CUSTOM_UPSTREAM, s)); } GST_START_TEST (test_multiple_ssrc_rr) { SessionHarness *h = session_harness_new (); GstFlowReturn res; GstBuffer *in_buf, *out_buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; gint i, j; guint ssrc_match; guint ssrcs[] = { 0x01BADBAD, 0xDEADBEEF, }; /* receive buffers with multiple ssrcs */ for (i = 0; i < 2; i++) { for (j = 0; j < G_N_ELEMENTS (ssrcs); j++) { in_buf = generate_test_buffer (i, ssrcs[j]); res = session_harness_recv_rtp (h, in_buf); fail_unless_equals_int (GST_FLOW_OK, res); } } /* crank the rtcp-thread and pull out the rtcp-packet we have generated */ session_harness_crank_clock (h); out_buf = session_harness_pull_rtcp (h); /* verify we have report blocks for both ssrcs */ g_assert (out_buf != NULL); fail_unless (gst_rtcp_buffer_validate (out_buf)); gst_rtcp_buffer_map (out_buf, GST_MAP_READ, &rtcp); g_assert (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (G_N_ELEMENTS (ssrcs), gst_rtcp_packet_get_rb_count (&rtcp_packet)); ssrc_match = 0; for (i = 0; i < G_N_ELEMENTS (ssrcs); i++) { guint32 ssrc; gst_rtcp_packet_get_rb (&rtcp_packet, i, &ssrc, NULL, NULL, NULL, NULL, NULL, NULL); for (j = 0; j < G_N_ELEMENTS (ssrcs); j++) { if (ssrcs[j] == ssrc) ssrc_match++; } } fail_unless_equals_int (G_N_ELEMENTS (ssrcs), ssrc_match); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (out_buf); session_harness_free (h); } GST_END_TEST; /* This verifies that rtpsession will correctly place RBs round-robin * across multiple RRs when there are too many senders that their RBs * do not fit in one RR */ GST_START_TEST (test_multiple_senders_roundrobin_rbs) { SessionHarness *h = session_harness_new (); GstFlowReturn res; GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; gint i, j, k; guint32 ssrc; GHashTable *rb_ssrcs, *tmp_set; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); for (i = 0; i < 2; i++) { /* cycles between RR reports */ for (j = 0; j < 5; j++) { /* packets per ssrc */ gint seq = (i * 5) + j; for (k = 0; k < 35; k++) { /* number of ssrcs */ buf = generate_test_buffer (seq, 10000 + k); res = session_harness_recv_rtp (h, buf); fail_unless_equals_int (GST_FLOW_OK, res); } } } rb_ssrcs = g_hash_table_new_full (g_direct_hash, g_direct_equal, NULL, (GDestroyNotify) g_hash_table_unref); /* verify the rtcp packets */ for (i = 0; i < 2; i++) { guint expected_rb_count = (i < 1) ? GST_RTCP_MAX_RB_COUNT : (35 - GST_RTCP_MAX_RB_COUNT); session_harness_produce_rtcp (h, 1); buf = session_harness_pull_rtcp (h); g_assert (buf != NULL); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); ssrc = gst_rtcp_packet_rr_get_ssrc (&rtcp_packet); fail_unless_equals_int (0xDEADBEEF, ssrc); /* inspect the RBs */ fail_unless_equals_int (expected_rb_count, gst_rtcp_packet_get_rb_count (&rtcp_packet)); if (i == 0) { tmp_set = g_hash_table_new (g_direct_hash, g_direct_equal); g_hash_table_insert (rb_ssrcs, GUINT_TO_POINTER (ssrc), tmp_set); } else { tmp_set = g_hash_table_lookup (rb_ssrcs, GUINT_TO_POINTER (ssrc)); g_assert (tmp_set); } for (j = 0; j < expected_rb_count; j++) { gst_rtcp_packet_get_rb (&rtcp_packet, j, &ssrc, NULL, NULL, NULL, NULL, NULL, NULL); g_assert_cmpint (ssrc, >=, 10000); g_assert_cmpint (ssrc, <=, 10035); g_hash_table_add (tmp_set, GUINT_TO_POINTER (ssrc)); } gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); } /* now verify all received ssrcs have been reported */ fail_unless_equals_int (1, g_hash_table_size (rb_ssrcs)); tmp_set = g_hash_table_lookup (rb_ssrcs, GUINT_TO_POINTER (0xDEADBEEF)); g_assert (tmp_set); fail_unless_equals_int (35, g_hash_table_size (tmp_set)); g_hash_table_unref (rb_ssrcs); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_no_rbs_for_internal_senders) { SessionHarness *h = session_harness_new (); GstFlowReturn res; GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; gint i, j, k; guint32 ssrc; GHashTable *sr_ssrcs; GHashTable *rb_ssrcs, *tmp_set; /* Push RTP from our send SSRCs */ for (j = 0; j < 5; j++) { /* packets per ssrc */ for (k = 0; k < 2; k++) { /* number of ssrcs */ buf = generate_test_buffer (j, 10000 + k); res = session_harness_send_rtp (h, buf); fail_unless_equals_int (GST_FLOW_OK, res); } } /* crank the RTCP pad thread */ session_harness_crank_clock (h); sr_ssrcs = g_hash_table_new (g_direct_hash, g_direct_equal); /* verify the rtcp packets */ for (i = 0; i < 2; i++) { buf = session_harness_pull_rtcp (h); g_assert (buf != NULL); g_assert (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); g_assert (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_SR, gst_rtcp_packet_get_type (&rtcp_packet)); gst_rtcp_packet_sr_get_sender_info (&rtcp_packet, &ssrc, NULL, NULL, NULL, NULL); g_assert_cmpint (ssrc, >=, 10000); g_assert_cmpint (ssrc, <=, 10001); g_hash_table_add (sr_ssrcs, GUINT_TO_POINTER (ssrc)); /* There should be no RBs as there are no remote senders */ fail_unless_equals_int (0, gst_rtcp_packet_get_rb_count (&rtcp_packet)); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); } /* Ensure both internal senders generated RTCP */ fail_unless_equals_int (2, g_hash_table_size (sr_ssrcs)); g_hash_table_unref (sr_ssrcs); /* Generate RTP from remote side */ for (j = 0; j < 5; j++) { /* packets per ssrc */ for (k = 0; k < 2; k++) { /* number of ssrcs */ buf = generate_test_buffer (j, 20000 + k); res = session_harness_recv_rtp (h, buf); fail_unless_equals_int (GST_FLOW_OK, res); } } sr_ssrcs = g_hash_table_new (g_direct_hash, g_direct_equal); rb_ssrcs = g_hash_table_new_full (g_direct_hash, g_direct_equal, NULL, (GDestroyNotify) g_hash_table_unref); /* verify the rtcp packets */ for (i = 0; i < 2; i++) { session_harness_produce_rtcp (h, 1); buf = session_harness_pull_rtcp (h); g_assert (buf != NULL); g_assert (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); g_assert (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_SR, gst_rtcp_packet_get_type (&rtcp_packet)); gst_rtcp_packet_sr_get_sender_info (&rtcp_packet, &ssrc, NULL, NULL, NULL, NULL); g_assert_cmpint (ssrc, >=, 10000); g_assert_cmpint (ssrc, <=, 10001); g_hash_table_add (sr_ssrcs, GUINT_TO_POINTER (ssrc)); /* There should be 2 RBs: one for each remote sender */ fail_unless_equals_int (2, gst_rtcp_packet_get_rb_count (&rtcp_packet)); tmp_set = g_hash_table_new (g_direct_hash, g_direct_equal); g_hash_table_insert (rb_ssrcs, GUINT_TO_POINTER (ssrc), tmp_set); for (j = 0; j < 2; j++) { gst_rtcp_packet_get_rb (&rtcp_packet, j, &ssrc, NULL, NULL, NULL, NULL, NULL, NULL); g_assert_cmpint (ssrc, >=, 20000); g_assert_cmpint (ssrc, <=, 20001); g_hash_table_add (tmp_set, GUINT_TO_POINTER (ssrc)); } gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); } /* now verify all received ssrcs have been reported */ fail_unless_equals_int (2, g_hash_table_size (sr_ssrcs)); fail_unless_equals_int (2, g_hash_table_size (rb_ssrcs)); for (i = 10000; i < 10002; i++) { tmp_set = g_hash_table_lookup (rb_ssrcs, GUINT_TO_POINTER (i)); g_assert (tmp_set); fail_unless_equals_int (2, g_hash_table_size (tmp_set)); } g_hash_table_unref (rb_ssrcs); g_hash_table_unref (sr_ssrcs); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_internal_sources_timeout) { SessionHarness *h = session_harness_new (); guint internal_ssrc; guint32 ssrc; GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; GstRTCPType rtcp_type; GstFlowReturn res; gint i, j; GstCaps *caps; gboolean seen_bye; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); g_object_get (h->internal_session, "internal-ssrc", &internal_ssrc, NULL); fail_unless_equals_int (0xDEADBEEF, internal_ssrc); for (i = 1; i < 4; i++) { buf = generate_test_buffer (i, 0xBEEFDEAD); res = session_harness_recv_rtp (h, buf); fail_unless_equals_int (GST_FLOW_OK, res); } /* verify that rtpsession has sent RR for an internally-created * RTPSource that is using the internal-ssrc */ session_harness_produce_rtcp (h, 1); buf = session_harness_pull_rtcp (h); fail_unless (buf != NULL); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); ssrc = gst_rtcp_packet_rr_get_ssrc (&rtcp_packet); fail_unless_equals_int (ssrc, internal_ssrc); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); /* ok, now let's push some RTP packets */ caps = gst_caps_new_simple ("application/x-rtp", "ssrc", G_TYPE_UINT, 0x01BADBAD, NULL); gst_harness_set_src_caps (h->send_rtp_h, caps); for (i = 1; i < 4; i++) { buf = generate_test_buffer (i, 0x01BADBAD); res = session_harness_send_rtp (h, buf); fail_unless_equals_int (GST_FLOW_OK, res); } /* internal ssrc must have changed already */ g_object_get (h->internal_session, "internal-ssrc", &internal_ssrc, NULL); fail_unless (internal_ssrc != ssrc); fail_unless_equals_int (0x01BADBAD, internal_ssrc); /* verify SR and RR */ j = 0; for (i = 0; i < 5; i++) { session_harness_produce_rtcp (h, 1); buf = session_harness_pull_rtcp (h); g_assert (buf != NULL); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); rtcp_type = gst_rtcp_packet_get_type (&rtcp_packet); if (rtcp_type == GST_RTCP_TYPE_SR) { gst_rtcp_packet_sr_get_sender_info (&rtcp_packet, &ssrc, NULL, NULL, NULL, NULL); fail_unless_equals_int (internal_ssrc, ssrc); fail_unless_equals_int (0x01BADBAD, ssrc); j |= 0x1; } else if (rtcp_type == GST_RTCP_TYPE_RR) { ssrc = gst_rtcp_packet_rr_get_ssrc (&rtcp_packet); if (internal_ssrc != ssrc) j |= 0x2; } gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); } fail_unless_equals_int (0x3, j); /* verify we got both SR and RR */ /* go 30 seconds in the future and observe both sources timing out: * 0xDEADBEEF -> BYE, 0x01BADBAD -> becomes receiver only */ fail_unless (session_harness_advance_and_crank (h, 30 * GST_SECOND)); /* verify BYE and RR */ j = 0; seen_bye = FALSE; while (!seen_bye) { session_harness_produce_rtcp (h, 1); buf = session_harness_pull_rtcp (h); fail_unless (buf != NULL); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); rtcp_type = gst_rtcp_packet_get_type (&rtcp_packet); if (rtcp_type == GST_RTCP_TYPE_RR) { ssrc = gst_rtcp_packet_rr_get_ssrc (&rtcp_packet); if (ssrc == 0x01BADBAD) { j |= 0x1; fail_unless_equals_int (internal_ssrc, ssrc); /* 2 => RR, SDES. There is no BYE here */ fail_unless_equals_int (2, gst_rtcp_buffer_get_packet_count (&rtcp)); } else if (ssrc == 0xDEADBEEF) { j |= 0x2; g_assert_cmpint (ssrc, !=, internal_ssrc); /* 3 => RR, SDES, BYE */ if (gst_rtcp_buffer_get_packet_count (&rtcp) == 3) { fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_BYE, gst_rtcp_packet_get_type (&rtcp_packet)); seen_bye = TRUE; } } } gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); } fail_unless_equals_int (0x3, j); /* verify we got both BYE and RR */ session_harness_free (h); } GST_END_TEST; typedef struct { guint8 subtype; guint32 ssrc; gchar *name; GstBuffer *data; } RTCPAppResult; static void on_app_rtcp_cb (GObject * session, guint subtype, guint ssrc, const gchar * name, GstBuffer * data, RTCPAppResult * result) { result->subtype = subtype; result->ssrc = ssrc; result->name = g_strdup (name); result->data = data ? gst_buffer_ref (data) : NULL; } GST_START_TEST (test_receive_rtcp_app_packet) { SessionHarness *h = session_harness_new (); GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket packet; RTCPAppResult result = { 0 }; guint8 data[] = { 0x11, 0x22, 0x33, 0x44 }; g_signal_connect (h->internal_session, "on-app-rtcp", G_CALLBACK (on_app_rtcp_cb), &result); /* Push APP buffer with no data */ buf = gst_rtcp_buffer_new (1000); fail_unless (gst_rtcp_buffer_map (buf, GST_MAP_READWRITE, &rtcp)); fail_unless (gst_rtcp_buffer_add_packet (&rtcp, GST_RTCP_TYPE_APP, &packet)); gst_rtcp_packet_app_set_subtype (&packet, 21); gst_rtcp_packet_app_set_ssrc (&packet, 0x11111111); gst_rtcp_packet_app_set_name (&packet, "Test"); gst_rtcp_buffer_unmap (&rtcp); fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtcp (h, buf)); fail_unless_equals_int (21, result.subtype); fail_unless_equals_int (0x11111111, result.ssrc); fail_unless_equals_string ("Test", result.name); fail_unless_equals_pointer (NULL, result.data); g_free (result.name); /* Push APP buffer with data */ memset (&result, 0, sizeof (result)); buf = gst_rtcp_buffer_new (1000); fail_unless (gst_rtcp_buffer_map (buf, GST_MAP_READWRITE, &rtcp)); fail_unless (gst_rtcp_buffer_add_packet (&rtcp, GST_RTCP_TYPE_APP, &packet)); gst_rtcp_packet_app_set_subtype (&packet, 22); gst_rtcp_packet_app_set_ssrc (&packet, 0x22222222); gst_rtcp_packet_app_set_name (&packet, "Test"); gst_rtcp_packet_app_set_data_length (&packet, sizeof (data) / 4); memcpy (gst_rtcp_packet_app_get_data (&packet), data, sizeof (data)); gst_rtcp_buffer_unmap (&rtcp); fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtcp (h, buf)); fail_unless_equals_int (22, result.subtype); fail_unless_equals_int (0x22222222, result.ssrc); fail_unless_equals_string ("Test", result.name); fail_unless (gst_buffer_memcmp (result.data, 0, data, sizeof (data)) == 0); g_free (result.name); gst_buffer_unref (result.data); session_harness_free (h); } GST_END_TEST; static void stats_test_cb (GObject * object, GParamSpec * spec, gpointer data) { guint num_sources = 0; gboolean *cb_called = data; g_assert (*cb_called == FALSE); /* We should be able to get a rtpsession property without introducing the deadlock */ g_object_get (object, "num-sources", &num_sources, NULL); *cb_called = TRUE; } GST_START_TEST (test_dont_lock_on_stats) { SessionHarness *h = session_harness_new (); gboolean cb_called = FALSE; /* connect to the stats-reporting */ g_signal_connect (h->session, "notify::stats", G_CALLBACK (stats_test_cb), &cb_called); /* Push RTP buffer to make sure RTCP-thread have started */ fail_unless_equals_int (GST_FLOW_OK, session_harness_send_rtp (h, generate_test_buffer (0, 0xDEADBEEF))); /* crank the RTCP-thread and pull out rtcp, generating a stats-callback */ session_harness_crank_clock (h); gst_buffer_unref (session_harness_pull_rtcp (h)); fail_unless (cb_called); session_harness_free (h); } GST_END_TEST; static void suspicious_bye_cb (GObject * object, GParamSpec * spec, gpointer data) { GValueArray *stats_arr; GstStructure *stats, *internal_stats; gboolean *cb_called = data; gboolean internal = FALSE, sent_bye = TRUE; guint ssrc = 0; guint i; g_assert (*cb_called == FALSE); *cb_called = TRUE; g_object_get (object, "stats", &stats, NULL); stats_arr = g_value_get_boxed (gst_structure_get_value (stats, "source-stats")); g_assert (stats_arr != NULL); fail_unless (stats_arr->n_values >= 1); for (i = 0; i < stats_arr->n_values; i++) { internal_stats = g_value_get_boxed (g_value_array_get_nth (stats_arr, i)); g_assert (internal_stats != NULL); gst_structure_get (internal_stats, "ssrc", G_TYPE_UINT, &ssrc, "internal", G_TYPE_BOOLEAN, &internal, "received-bye", G_TYPE_BOOLEAN, &sent_bye, NULL); if (ssrc == 0xDEADBEEF) { fail_unless (internal); fail_unless (!sent_bye); break; } } fail_unless_equals_int (ssrc, 0xDEADBEEF); gst_structure_free (stats); } static GstBuffer * create_bye_rtcp (guint32 ssrc) { GstRTCPPacket packet; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GSocketAddress *saddr; GstBuffer *buffer = gst_rtcp_buffer_new (1000); fail_unless (gst_rtcp_buffer_map (buffer, GST_MAP_READWRITE, &rtcp)); fail_unless (gst_rtcp_buffer_add_packet (&rtcp, GST_RTCP_TYPE_BYE, &packet)); gst_rtcp_packet_bye_add_ssrc (&packet, ssrc); gst_rtcp_buffer_unmap (&rtcp); /* Need to add meta to trigger collision detection */ saddr = g_inet_socket_address_new_from_string ("127.0.0.1", 3490); gst_buffer_add_net_address_meta (buffer, saddr); g_object_unref (saddr); return buffer; } GST_START_TEST (test_ignore_suspicious_bye) { SessionHarness *h = session_harness_new (); gboolean cb_called = FALSE; /* connect to the stats-reporting */ g_signal_connect (h->session, "notify::stats", G_CALLBACK (suspicious_bye_cb), &cb_called); /* Push RTP buffer making our internal SSRC=0xDEADBEEF */ fail_unless_equals_int (GST_FLOW_OK, session_harness_send_rtp (h, generate_test_buffer (0, 0xDEADBEEF))); /* Receive BYE RTCP referencing our internal SSRC(!?!) (0xDEADBEEF) */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtcp (h, create_bye_rtcp (0xDEADBEEF))); /* "crank" and check the stats */ session_harness_crank_clock (h); gst_buffer_unref (session_harness_pull_rtcp (h)); fail_unless (cb_called); session_harness_free (h); } GST_END_TEST; static GstBuffer * create_buffer (guint8 * data, gsize size) { return gst_buffer_new_wrapped_full (GST_MEMORY_FLAG_READONLY, data, size, 0, size, NULL, NULL); } GST_START_TEST (test_receive_regular_pli) { SessionHarness *h = session_harness_new (); GstEvent *ev; /* PLI packet */ guint8 rtcp_pkt[] = { 0x81, /* PLI */ 0xce, /* Type 206 Application layer feedback */ 0x00, 0x02, /* Length */ 0x37, 0x56, 0x93, 0xed, /* Sender SSRC */ 0x37, 0x56, 0x93, 0xed /* Media SSRC */ }; fail_unless_equals_int (GST_FLOW_OK, session_harness_send_rtp (h, generate_test_buffer (0, 928420845))); session_harness_recv_rtcp (h, create_buffer (rtcp_pkt, sizeof (rtcp_pkt))); fail_unless_equals_int (3, gst_harness_upstream_events_received (h->send_rtp_h)); /* Remove the first 2 reconfigure events */ fail_unless ((ev = gst_harness_pull_upstream_event (h->send_rtp_h)) != NULL); fail_unless_equals_int (GST_EVENT_RECONFIGURE, GST_EVENT_TYPE (ev)); gst_event_unref (ev); fail_unless ((ev = gst_harness_pull_upstream_event (h->send_rtp_h)) != NULL); fail_unless_equals_int (GST_EVENT_RECONFIGURE, GST_EVENT_TYPE (ev)); gst_event_unref (ev); /* Then pull and check the force key-unit event */ fail_unless ((ev = gst_harness_pull_upstream_event (h->send_rtp_h)) != NULL); fail_unless_equals_int (GST_EVENT_CUSTOM_UPSTREAM, GST_EVENT_TYPE (ev)); fail_unless (gst_video_event_is_force_key_unit (ev)); gst_event_unref (ev); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_receive_pli_no_sender_ssrc) { SessionHarness *h = session_harness_new (); GstEvent *ev; /* PLI packet */ guint8 rtcp_pkt[] = { 0x81, /* PLI */ 0xce, /* Type 206 Application layer feedback */ 0x00, 0x02, /* Length */ 0x00, 0x00, 0x00, 0x00, /* Sender SSRC */ 0x37, 0x56, 0x93, 0xed /* Media SSRC */ }; fail_unless_equals_int (GST_FLOW_OK, session_harness_send_rtp (h, generate_test_buffer (0, 928420845))); session_harness_recv_rtcp (h, create_buffer (rtcp_pkt, sizeof (rtcp_pkt))); fail_unless_equals_int (3, gst_harness_upstream_events_received (h->send_rtp_h)); /* Remove the first 2 reconfigure events */ fail_unless ((ev = gst_harness_pull_upstream_event (h->send_rtp_h)) != NULL); fail_unless_equals_int (GST_EVENT_RECONFIGURE, GST_EVENT_TYPE (ev)); gst_event_unref (ev); fail_unless ((ev = gst_harness_pull_upstream_event (h->send_rtp_h)) != NULL); fail_unless_equals_int (GST_EVENT_RECONFIGURE, GST_EVENT_TYPE (ev)); gst_event_unref (ev); /* Then pull and check the force key-unit event */ fail_unless ((ev = gst_harness_pull_upstream_event (h->send_rtp_h)) != NULL); fail_unless_equals_int (GST_EVENT_CUSTOM_UPSTREAM, GST_EVENT_TYPE (ev)); fail_unless (gst_video_event_is_force_key_unit (ev)); gst_event_unref (ev); session_harness_free (h); } GST_END_TEST; static void add_rtcp_sdes_packet (GstBuffer * gstbuf, guint32 ssrc, const char *cname) { GstRTCPPacket packet; GstRTCPBuffer buffer = GST_RTCP_BUFFER_INIT; gst_rtcp_buffer_map (gstbuf, GST_MAP_READWRITE, &buffer); fail_unless (gst_rtcp_buffer_add_packet (&buffer, GST_RTCP_TYPE_SDES, &packet) == TRUE); fail_unless (gst_rtcp_packet_sdes_add_item (&packet, ssrc) == TRUE); fail_unless (gst_rtcp_packet_sdes_add_entry (&packet, GST_RTCP_SDES_CNAME, strlen (cname), (const guint8 *) cname)); gst_rtcp_buffer_unmap (&buffer); } GST_START_TEST (test_ssrc_collision_when_sending) { SessionHarness *h = session_harness_new (); GstBuffer *buf = gst_rtcp_buffer_new (1400); /* Push SDES with identical SSRC as what we will use for sending RTP, establishing this as a non-internal SSRC */ add_rtcp_sdes_packet (buf, 0x12345678, "test@foo.bar"); session_harness_recv_rtcp (h, buf); /* Push RTP buffer making our internal SSRC=0x12345678 */ fail_unless_equals_int (GST_FLOW_OK, session_harness_send_rtp (h, generate_test_buffer (0, 0x12345678))); /* Verify the packet we just sent is not being boomeranged back to us as a received packet! */ fail_unless_equals_int (0, gst_harness_buffers_in_queue (h->recv_rtp_h)); /* FIXME: verify a Collision event coming upstream! */ session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_request_fir) { SessionHarness *h = session_harness_new (); GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; guint8 *fci_data; /* add FIR-capabilites to our caps */ gst_caps_set_simple (h->caps, "rtcp-fb-ccm-fir", G_TYPE_BOOLEAN, TRUE, NULL); /* clear pt-map to removed the cached caps without fir */ g_signal_emit_by_name (h->session, "clear-pt-map"); g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); /* Receive a RTP buffer from the wire from 2 different ssrcs */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x87654321))); /* fix to make the test deterministic: We need to wait for the RTCP-thread to have settled to ensure the key-unit will considered once released */ gst_test_clock_wait_for_next_pending_id (h->testclock, NULL); /* request FIR for both SSRCs */ session_harness_force_key_unit (h, 0, 0x12345678, TEST_BUF_PT, NULL, NULL); session_harness_force_key_unit (h, 0, 0x87654321, TEST_BUF_PT, NULL, NULL); session_harness_produce_rtcp (h, 1); buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our FIR */ fail_unless_equals_int (GST_RTCP_TYPE_PSFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_PSFB_TYPE_FIR, gst_rtcp_packet_fb_get_type (&rtcp_packet)); /* FIR has sender-ssrc as normal, but media-ssrc set to 0, because it can have multiple media-ssrcs in its fci-data */ fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fci_data = gst_rtcp_packet_fb_get_fci (&rtcp_packet); fail_unless_equals_int (16, gst_rtcp_packet_fb_get_fci_length (&rtcp_packet) * sizeof (guint32)); /* verify the FIR contains both SSRCs */ fail_unless_equals_int (0x87654321, GST_READ_UINT32_BE (fci_data)); fail_unless_equals_int (1, fci_data[4]); fail_unless_equals_int (0, fci_data[5]); fail_unless_equals_int (0, fci_data[6]); fail_unless_equals_int (0, fci_data[7]); fci_data += 8; fail_unless_equals_int (0x12345678, GST_READ_UINT32_BE (fci_data)); fail_unless_equals_int (1, fci_data[4]); fail_unless_equals_int (0, fci_data[5]); fail_unless_equals_int (0, fci_data[6]); fail_unless_equals_int (0, fci_data[7]); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_request_pli) { SessionHarness *h = session_harness_new (); GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; /* add PLI-capabilites to our caps */ gst_caps_set_simple (h->caps, "rtcp-fb-nack-pli", G_TYPE_BOOLEAN, TRUE, NULL); /* clear pt-map to removed the cached caps without PLI */ g_signal_emit_by_name (h->session, "clear-pt-map"); g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); /* Receive a RTP buffer from the wire */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); /* Wait for first regular RTCP to be sent so that we are clear to send early RTCP */ session_harness_produce_rtcp (h, 1); gst_buffer_unref (session_harness_pull_rtcp (h)); /* request PLI */ session_harness_force_key_unit (h, 0, 0x12345678, TEST_BUF_PT, NULL, NULL); /* PLI should be produced immediately as early RTCP is allowed. Pull buffer without advancing the clock to ensure this is the case */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our PLI */ fail_unless_equals_int (GST_RTCP_TYPE_PSFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_PSFB_TYPE_PLI, gst_rtcp_packet_fb_get_type (&rtcp_packet)); fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fail_unless_equals_int (0, gst_rtcp_packet_fb_get_fci_length (&rtcp_packet)); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_illegal_rtcp_fb_packet) { SessionHarness *h = session_harness_new (); GstBuffer *buf; /* Zero length RTCP feedback packet (reduced size) */ const guint8 rtcp_zero_fb_pkt[] = { 0x8f, 0xce, 0x00, 0x00 }; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); buf = gst_buffer_new_and_alloc (sizeof (rtcp_zero_fb_pkt)); gst_buffer_fill (buf, 0, rtcp_zero_fb_pkt, sizeof (rtcp_zero_fb_pkt)); GST_BUFFER_DTS (buf) = GST_BUFFER_PTS (buf) = G_GUINT64_CONSTANT (0); /* Push the packet, this did previously crash because length of packet was * never validated. */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtcp (h, buf)); session_harness_free (h); } GST_END_TEST; typedef struct { GCond *cond; GMutex *mutex; gboolean fired; } FeedbackRTCPCallbackData; static void feedback_rtcp_cb (GstElement * element, guint fbtype, guint fmt, guint sender_ssrc, guint media_ssrc, GstBuffer * fci, FeedbackRTCPCallbackData * cb_data) { g_mutex_lock (cb_data->mutex); cb_data->fired = TRUE; g_cond_wait (cb_data->cond, cb_data->mutex); g_mutex_unlock (cb_data->mutex); } static void * send_feedback_rtcp (SessionHarness * h) { GstRTCPPacket packet; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstBuffer *buffer = gst_rtcp_buffer_new (1000); fail_unless (gst_rtcp_buffer_map (buffer, GST_MAP_READWRITE, &rtcp)); fail_unless (gst_rtcp_buffer_add_packet (&rtcp, GST_RTCP_TYPE_PSFB, &packet)); gst_rtcp_packet_fb_set_type (&packet, GST_RTCP_PSFB_TYPE_PLI); gst_rtcp_packet_fb_set_fci_length (&packet, 0); gst_rtcp_packet_fb_set_media_ssrc (&packet, 0xABE2B0B); gst_rtcp_packet_fb_set_media_ssrc (&packet, 0xDEADBEEF); gst_rtcp_buffer_unmap (&rtcp); fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtcp (h, buffer)); return NULL; } GST_START_TEST (test_feedback_rtcp_race) { SessionHarness *h = session_harness_new (); GCond cond; GMutex mutex; FeedbackRTCPCallbackData cb_data; GThread *send_rtcp_thread; g_cond_init (&cond); g_mutex_init (&mutex); cb_data.cond = &cond; cb_data.mutex = &mutex; cb_data.fired = FALSE; g_signal_connect (h->internal_session, "on-feedback-rtcp", G_CALLBACK (feedback_rtcp_cb), &cb_data); /* Push RTP buffer making external source with SSRC=0xDEADBEEF */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0xDEADBEEF))); /* Push feedback RTCP with media SSRC=0xDEADBEEF */ send_rtcp_thread = g_thread_new (NULL, (GThreadFunc) send_feedback_rtcp, h); /* Waiting for feedback RTCP callback to fire */ while (!cb_data.fired) g_usleep (G_USEC_PER_SEC / 100); /* While send_rtcp_thread thread is waiting for our signal advance the clock by 30sec triggering removal of 0xDEADBEEF, as if the source was inactive for too long */ session_harness_advance_and_crank (h, GST_SECOND * 30); gst_buffer_unref (session_harness_pull_rtcp (h)); /* Let send_rtcp_thread finish */ g_mutex_lock (&mutex); g_cond_signal (&cond); g_mutex_unlock (&mutex); g_thread_join (send_rtcp_thread); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_dont_send_rtcp_while_idle) { SessionHarness *h = session_harness_new (); /* verify the RTCP thread has not started */ fail_unless_equals_int (0, gst_test_clock_peek_id_count (h->testclock)); /* and that no RTCP has been pushed */ fail_unless_equals_int (0, gst_harness_buffers_in_queue (h->rtcp_h)); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_send_rtcp_when_signalled) { SessionHarness *h = session_harness_new (); gboolean ret; /* verify the RTCP thread has not started */ fail_unless_equals_int (0, gst_test_clock_peek_id_count (h->testclock)); /* and that no RTCP has been pushed */ fail_unless_equals_int (0, gst_harness_buffers_in_queue (h->rtcp_h)); /* then ask explicitly to send RTCP */ g_signal_emit_by_name (h->internal_session, "send-rtcp-full", GST_SECOND, &ret); /* this is FALSE due to no next RTCP check time */ fail_unless (ret == FALSE); /* "crank" and verify RTCP now was sent */ session_harness_crank_clock (h); gst_buffer_unref (session_harness_pull_rtcp (h)); session_harness_free (h); } GST_END_TEST; static void validate_sdes_priv (GstBuffer * buf, const char *name_ref, const char *value) { GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket pkt; fail_unless (gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &pkt)); do { if (gst_rtcp_packet_get_type (&pkt) == GST_RTCP_TYPE_SDES) { fail_unless (gst_rtcp_packet_sdes_first_entry (&pkt)); do { GstRTCPSDESType type; guint8 len; guint8 *data; fail_unless (gst_rtcp_packet_sdes_get_entry (&pkt, &type, &len, &data)); if (type == GST_RTCP_SDES_PRIV) { char *name = g_strndup ((const gchar *) &data[1], data[0]); len -= data[0] + 1; data += data[0] + 1; fail_unless_equals_int (len, strlen (value)); fail_unless (!strncmp (value, (char *) data, len)); fail_unless_equals_string (name, name_ref); g_free (name); goto sdes_done; } } while (gst_rtcp_packet_sdes_next_entry (&pkt)); g_assert_not_reached (); } } while (gst_rtcp_packet_move_to_next (&pkt)); g_assert_not_reached (); sdes_done: fail_unless (gst_rtcp_buffer_unmap (&rtcp)); } GST_START_TEST (test_change_sent_sdes) { SessionHarness *h = session_harness_new (); GstStructure *s; GstBuffer *buf; gboolean ret; GstFlowReturn res; /* verify the RTCP thread has not started */ fail_unless_equals_int (0, gst_test_clock_peek_id_count (h->testclock)); /* and that no RTCP has been pushed */ fail_unless_equals_int (0, gst_harness_buffers_in_queue (h->rtcp_h)); s = gst_structure_new ("application/x-rtp-source-sdes", "other", G_TYPE_STRING, "first", NULL); g_object_set (h->internal_session, "sdes", s, NULL); gst_structure_free (s); /* then ask explicitly to send RTCP */ g_signal_emit_by_name (h->internal_session, "send-rtcp-full", GST_SECOND, &ret); /* this is FALSE due to no next RTCP check time */ fail_unless (ret == FALSE); /* "crank" and verify RTCP now was sent */ session_harness_crank_clock (h); buf = session_harness_pull_rtcp (h); fail_unless (buf); validate_sdes_priv (buf, "other", "first"); gst_buffer_unref (buf); /* Change the SDES */ s = gst_structure_new ("application/x-rtp-source-sdes", "other", G_TYPE_STRING, "second", NULL); g_object_set (h->internal_session, "sdes", s, NULL); gst_structure_free (s); /* Send an RTP packet */ buf = generate_test_buffer (22, 10000); res = session_harness_send_rtp (h, buf); fail_unless_equals_int (GST_FLOW_OK, res); /* "crank" enough to ensure a RTCP packet has been produced ! */ session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); session_harness_crank_clock (h); /* and verify RTCP now was sent with new SDES */ buf = session_harness_pull_rtcp (h); validate_sdes_priv (buf, "other", "second"); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_request_nack) { SessionHarness *h = session_harness_new (); GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; guint8 *fci_data; guint32 fci_length; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); /* Receive a RTP buffer from the wire */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); /* Wait for first regular RTCP to be sent so that we are clear to send early RTCP */ session_harness_produce_rtcp (h, 1); gst_buffer_unref (session_harness_pull_rtcp (h)); /* request NACK immediately */ session_harness_rtp_retransmission_request (h, 0x12345678, 1234, 0, 0, 0); /* NACK should be produced immediately as early RTCP is allowed. Pull buffer without advancing the clock to ensure this is the case */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our NACK */ fail_unless_equals_int (GST_RTCP_TYPE_RTPFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_RTPFB_TYPE_NACK, gst_rtcp_packet_fb_get_type (&rtcp_packet)); fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fci_data = gst_rtcp_packet_fb_get_fci (&rtcp_packet); fci_length = gst_rtcp_packet_fb_get_fci_length (&rtcp_packet) * sizeof (guint32); fail_unless_equals_int (4, fci_length); fail_unless_equals_int (GST_READ_UINT32_BE (fci_data), 1234L << 16); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; typedef struct { gulong id; GstPad *pad; GMutex mutex; GCond cond; gboolean blocked; } BlockingProbeData; static GstPadProbeReturn on_rtcp_pad_blocked (GstPad * pad, GstPadProbeInfo * info, gpointer user_data) { BlockingProbeData *probe = user_data; g_mutex_lock (&probe->mutex); probe->blocked = TRUE; g_cond_signal (&probe->cond); g_mutex_unlock (&probe->mutex); return GST_PAD_PROBE_OK; } static void session_harness_block_rtcp (SessionHarness * h, BlockingProbeData * probe) { probe->pad = gst_element_get_static_pad (h->session, "send_rtcp_src"); fail_unless (probe->pad); g_mutex_init (&probe->mutex); g_cond_init (&probe->cond); probe->blocked = FALSE; probe->id = gst_pad_add_probe (probe->pad, GST_PAD_PROBE_TYPE_BLOCK | GST_PAD_PROBE_TYPE_BUFFER | GST_PAD_PROBE_TYPE_BUFFER_LIST, on_rtcp_pad_blocked, probe, NULL); g_mutex_lock (&probe->mutex); while (!probe->blocked) { session_harness_crank_clock (h); g_cond_wait (&probe->cond, &probe->mutex); } g_mutex_unlock (&probe->mutex); } static void session_harness_unblock_rtcp (SessionHarness * h, BlockingProbeData * probe) { gst_pad_remove_probe (probe->pad, probe->id); gst_object_unref (probe->pad); g_mutex_clear (&probe->mutex); } GST_START_TEST (test_request_nack_surplus) { SessionHarness *h = session_harness_new (); GstRTCPPacket rtcp_packet; BlockingProbeData probe; GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; guint8 *fci_data; gint i; GstStructure *sdes; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); /* sdes cname has variable size, fix it */ g_object_get (h->internal_session, "sdes", &sdes, NULL); gst_structure_set (sdes, "cname", G_TYPE_STRING, "user@test", NULL); g_object_set (h->internal_session, "sdes", sdes, NULL); gst_structure_free (sdes); /* Receive a RTP buffer from the wire */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); /* Block on first regular RTCP so we can fill the nack list */ session_harness_block_rtcp (h, &probe); /* request 400 NACK with 17 seqnum distance to optain the worst possible * packing */ for (i = 0; i < 350; i++) session_harness_rtp_retransmission_request (h, 0x12345678, 1234 + i * 17, 0, 0, 0); /* and the last 50 with a 2s deadline */ for (i = 350; i < 400; i++) session_harness_rtp_retransmission_request (h, 0x12345678, 1234 + i * 17, 0, 2000, 0); /* Unblock and wait for the regular and first early packet */ session_harness_unblock_rtcp (h, &probe); session_harness_produce_rtcp (h, 2); /* Move time forward, so that only the remaining 50 are still up to date */ session_harness_advance_and_crank (h, GST_SECOND); session_harness_produce_rtcp (h, 3); /* ignore the regular RTCP packet */ buf = session_harness_pull_rtcp (h); gst_buffer_unref (buf); /* validate the first early RTCP which should hold 335 Nack */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our NACK */ fail_unless_equals_int (GST_RTCP_TYPE_RTPFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_RTPFB_TYPE_NACK, gst_rtcp_packet_fb_get_type (&rtcp_packet)); fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fail_unless_equals_int (340, gst_rtcp_packet_fb_get_fci_length (&rtcp_packet)); fci_data = gst_rtcp_packet_fb_get_fci (&rtcp_packet); fail_unless_equals_int (GST_READ_UINT32_BE (fci_data), 1234L << 16); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); /* validate the second early RTCP which should hold 50 Nack */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our NACK */ fail_unless_equals_int (GST_RTCP_TYPE_RTPFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_RTPFB_TYPE_NACK, gst_rtcp_packet_fb_get_type (&rtcp_packet)); fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fail_unless_equals_int (50, gst_rtcp_packet_fb_get_fci_length (&rtcp_packet)); fci_data = gst_rtcp_packet_fb_get_fci (&rtcp_packet); fail_unless_equals_int (GST_READ_UINT32_BE (fci_data), (guint16) (1234 + 350 * 17) << 16); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_request_nack_packing) { SessionHarness *h = session_harness_new (); GstRTCPPacket rtcp_packet; BlockingProbeData probe; GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; guint8 *fci_data; gint i; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); /* Receive a RTP buffer from the wire */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); /* Block on first regular RTCP so we can fill the nack list */ session_harness_block_rtcp (h, &probe); /* append 16 consecutive seqnum */ for (i = 1; i < 17; i++) session_harness_rtp_retransmission_request (h, 0x12345678, 1234 + i, 0, 0, 0); /* prepend one, still consecutive */ session_harness_rtp_retransmission_request (h, 0x12345678, 1234, 0, 0, 0); /* update it */ session_harness_rtp_retransmission_request (h, 0x12345678, 1234, 0, 0, 0); /* Unblock and wait for the regular and first early packet */ session_harness_unblock_rtcp (h, &probe); session_harness_produce_rtcp (h, 2); /* ignore the regular RTCP packet */ buf = session_harness_pull_rtcp (h); gst_buffer_unref (buf); /* validate the early RTCP which should hold 1 Nack */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our NACK */ fail_unless_equals_int (GST_RTCP_TYPE_RTPFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_RTPFB_TYPE_NACK, gst_rtcp_packet_fb_get_type (&rtcp_packet)); fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fail_unless_equals_int (1, gst_rtcp_packet_fb_get_fci_length (&rtcp_packet)); fci_data = gst_rtcp_packet_fb_get_fci (&rtcp_packet); fail_unless_equals_int (GST_READ_UINT32_BE (fci_data), 1234L << 16 | 0xFFFF); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; GST_START_TEST (test_disable_sr_timestamp) { SessionHarness *h = session_harness_new (); GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; guint64 ntptime; guint32 rtptime; g_object_set (h->internal_session, "disable-sr-timestamp", TRUE, NULL); /* Push RTP buffer to make sure RTCP-thread have started */ fail_unless_equals_int (GST_FLOW_OK, session_harness_send_rtp (h, generate_test_buffer (0, 0xDEADBEEF))); /* crank the RTCP-thread and pull out rtcp, generating a stats-callback */ session_harness_crank_clock (h); buf = session_harness_pull_rtcp (h); gst_rtcp_buffer_map (buf, GST_MAP_READWRITE, &rtcp); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); fail_unless_equals_int (GST_RTCP_TYPE_SR, gst_rtcp_packet_get_type (&rtcp_packet)); gst_rtcp_packet_sr_get_sender_info (&rtcp_packet, NULL, &ntptime, &rtptime, NULL, NULL); fail_unless_equals_uint64 (ntptime, 0); fail_unless (rtptime == 0); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; static guint on_sending_nacks (GObject * internal_session, guint sender_ssrc, guint media_ssrc, GArray * nacks, GstBuffer * buffer) { GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket packet; guint16 seqnum = g_array_index (nacks, guint16, 0); guint8 *data; if (seqnum == 1235) return 0; fail_unless (gst_rtcp_buffer_map (buffer, GST_MAP_READWRITE, &rtcp)); fail_unless (gst_rtcp_buffer_add_packet (&rtcp, GST_RTCP_TYPE_APP, &packet)); gst_rtcp_packet_app_set_ssrc (&packet, media_ssrc); gst_rtcp_packet_app_set_name (&packet, "TEST"); fail_unless (gst_rtcp_packet_app_set_data_length (&packet, 1)); data = gst_rtcp_packet_app_get_data (&packet); GST_WRITE_UINT32_BE (data, seqnum); gst_rtcp_buffer_unmap (&rtcp); return 1; } GST_START_TEST (test_on_sending_nacks) { SessionHarness *h = session_harness_new (); BlockingProbeData probe; GstBuffer *buf; GstRTCPBuffer rtcp = GST_RTCP_BUFFER_INIT; GstRTCPPacket rtcp_packet; guint8 *data; g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); /* Receive a RTP buffer from the wire */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); /* Block on first regular RTCP so we can fill the nack list */ session_harness_block_rtcp (h, &probe); g_signal_connect (h->internal_session, "on-sending-nacks", G_CALLBACK (on_sending_nacks), NULL); /* request NACK immediately */ session_harness_rtp_retransmission_request (h, 0x12345678, 1234, 0, 0, 0); session_harness_rtp_retransmission_request (h, 0x12345678, 1235, 0, 0, 0); session_harness_unblock_rtcp (h, &probe); gst_buffer_unref (session_harness_pull_rtcp (h)); session_harness_produce_rtcp (h, 2); /* first packet only includes seqnum 1234 in an APP FB */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our NACK */ fail_unless_equals_int (GST_RTCP_TYPE_APP, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_string ("TEST", gst_rtcp_packet_app_get_name (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_app_get_ssrc (&rtcp_packet)); fail_unless_equals_int (1, gst_rtcp_packet_app_get_data_length (&rtcp_packet)); data = gst_rtcp_packet_app_get_data (&rtcp_packet); fail_unless_equals_int (GST_READ_UINT32_BE (data), 1234L); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); /* second will contain seqnum 1235 in a generic nack packet */ buf = session_harness_pull_rtcp (h); fail_unless (gst_rtcp_buffer_validate (buf)); gst_rtcp_buffer_map (buf, GST_MAP_READ, &rtcp); fail_unless_equals_int (3, gst_rtcp_buffer_get_packet_count (&rtcp)); fail_unless (gst_rtcp_buffer_get_first_packet (&rtcp, &rtcp_packet)); /* first a Receiver Report */ fail_unless_equals_int (GST_RTCP_TYPE_RR, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* then a SDES */ fail_unless_equals_int (GST_RTCP_TYPE_SDES, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless (gst_rtcp_packet_move_to_next (&rtcp_packet)); /* and then our NACK */ fail_unless_equals_int (GST_RTCP_TYPE_RTPFB, gst_rtcp_packet_get_type (&rtcp_packet)); fail_unless_equals_int (GST_RTCP_RTPFB_TYPE_NACK, gst_rtcp_packet_fb_get_type (&rtcp_packet)); fail_unless_equals_int (0xDEADBEEF, gst_rtcp_packet_fb_get_sender_ssrc (&rtcp_packet)); fail_unless_equals_int (0x12345678, gst_rtcp_packet_fb_get_media_ssrc (&rtcp_packet)); fail_unless_equals_int (1, gst_rtcp_packet_fb_get_fci_length (&rtcp_packet)); data = gst_rtcp_packet_fb_get_fci (&rtcp_packet); fail_unless_equals_int (GST_READ_UINT32_BE (data), 1235L << 16); gst_rtcp_buffer_unmap (&rtcp); gst_buffer_unref (buf); session_harness_free (h); } GST_END_TEST; static void disable_probation_on_new_ssrc (GObject * session, GObject * source) { g_object_set (source, "probation", 0, NULL); } GST_START_TEST (test_disable_probation) { SessionHarness *h = session_harness_new (); g_object_set (h->internal_session, "internal-ssrc", 0xDEADBEEF, NULL); g_signal_connect (h->internal_session, "on-new-ssrc", G_CALLBACK (disable_probation_on_new_ssrc), NULL); /* Receive a RTP buffer from the wire */ fail_unless_equals_int (GST_FLOW_OK, session_harness_recv_rtp (h, generate_test_buffer (0, 0x12345678))); /* When probation is disable, the packet should be produced immediatly */ fail_unless_equals_int (1, gst_harness_buffers_in_queue (h->recv_rtp_h)); session_harness_free (h); } GST_END_TEST; static Suite * rtpsession_suite (void) { Suite *s = suite_create ("rtpsession"); TCase *tc_chain = tcase_create ("general"); suite_add_tcase (s, tc_chain); tcase_add_test (tc_chain, test_multiple_ssrc_rr); tcase_add_test (tc_chain, test_multiple_senders_roundrobin_rbs); tcase_add_test (tc_chain, test_no_rbs_for_internal_senders); tcase_add_test (tc_chain, test_internal_sources_timeout); tcase_add_test (tc_chain, test_receive_rtcp_app_packet); tcase_add_test (tc_chain, test_dont_lock_on_stats); tcase_add_test (tc_chain, test_ignore_suspicious_bye); tcase_add_test (tc_chain, test_ssrc_collision_when_sending); tcase_add_test (tc_chain, test_request_fir); tcase_add_test (tc_chain, test_request_pli); tcase_add_test (tc_chain, test_request_nack); tcase_add_test (tc_chain, test_request_nack_surplus); tcase_add_test (tc_chain, test_request_nack_packing); tcase_add_test (tc_chain, test_illegal_rtcp_fb_packet); tcase_add_test (tc_chain, test_feedback_rtcp_race); tcase_add_test (tc_chain, test_receive_regular_pli); tcase_add_test (tc_chain, test_receive_pli_no_sender_ssrc); tcase_add_test (tc_chain, test_dont_send_rtcp_while_idle); tcase_add_test (tc_chain, test_send_rtcp_when_signalled); tcase_add_test (tc_chain, test_change_sent_sdes); tcase_add_test (tc_chain, test_disable_sr_timestamp); tcase_add_test (tc_chain, test_on_sending_nacks); tcase_add_test (tc_chain, test_disable_probation); return s; } GST_CHECK_MAIN (rtpsession);