gst/rtpmanager/gstrtprtxsend.c

   1 /* RTP Retransmission sender element for GStreamer
   2  *
   3  * gstrtprtxsend.c:
   4  *
   5  * Copyright (C) 2013 Collabora Ltd.
   6  *   @author Julien Isorce <julien.isorce@collabora.co.uk>
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Library General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Library General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Library General Public
  19  * License along with this library; if not, write to the
  20  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
  21  * Boston, MA 02110-1301, USA.
  22  */
  23
  24 /**
  25  * SECTION:element-rtprtxsend
  26  *
  27  * See #GstRtpRtxReceive for examples
  28  *
  29  * The purpose of the sender RTX object is to keep a history of RTP packets up
  30  * to a configurable limit (max-size-time or max-size-packets). It will listen
  31  * for upstream custom retransmission events (GstRTPRetransmissionRequest) that
  32  * comes from downstream (#GstRtpSession). When receiving a request it will
  33  * look up the requested seqnum in its list of stored packets. If the packet
  34  * is available, it will create a RTX packet according to RFC 4588 and send
  35  * this as an auxiliary stream. RTX is SSRC-multiplexed
  36  */
  37
  38 #ifdef HAVE_CONFIG_H
  39 #include "config.h"
  40 #endif
  41
  42 #include <gst/gst.h>
  43 #include <gst/rtp/gstrtpbuffer.h>
  44 #include <string.h>
  45 #include <stdlib.h>
  46
  47 #include "gstrtprtxsend.h"
  48
  49 GST_DEBUG_CATEGORY_STATIC (gst_rtp_rtx_send_debug);
  50 #define GST_CAT_DEFAULT gst_rtp_rtx_send_debug
  51
  52 #define DEFAULT_RTX_PAYLOAD_TYPE 0
  53 #define DEFAULT_MAX_SIZE_TIME    0
  54 #define DEFAULT_MAX_SIZE_PACKETS 100
  55
  56 enum
  57 {
  58   PROP_0,
  59   PROP_SSRC_MAP,
  60   PROP_PAYLOAD_TYPE_MAP,
  61   PROP_MAX_SIZE_TIME,
  62   PROP_MAX_SIZE_PACKETS,
  63   PROP_NUM_RTX_REQUESTS,
  64   PROP_NUM_RTX_PACKETS,
  65   PROP_LAST
  66 };
  67
  68 static GstStaticPadTemplate src_factory = GST_STATIC_PAD_TEMPLATE ("src",
  69     GST_PAD_SRC,
  70     GST_PAD_ALWAYS,
  71     GST_STATIC_CAPS ("application/x-rtp")
  72     );
  73
  74 static GstStaticPadTemplate sink_factory = GST_STATIC_PAD_TEMPLATE ("sink",
  75     GST_PAD_SINK,
  76     GST_PAD_ALWAYS,
  77     GST_STATIC_CAPS ("application/x-rtp")
  78     );
  79
  80 static gboolean gst_rtp_rtx_send_src_event (GstPad * pad, GstObject * parent,
  81     GstEvent * event);
  82 static gboolean gst_rtp_rtx_send_sink_event (GstPad * pad, GstObject * parent,
  83     GstEvent * event);
  84 static GstFlowReturn gst_rtp_rtx_send_chain (GstPad * pad, GstObject * parent,
  85     GstBuffer * buffer);
  86
  87 static GstStateChangeReturn gst_rtp_rtx_send_change_state (GstElement *
  88     element, GstStateChange transition);
  89
  90 static void gst_rtp_rtx_send_set_property (GObject * object, guint prop_id,
  91     const GValue * value, GParamSpec * pspec);
  92 static void gst_rtp_rtx_send_get_property (GObject * object, guint prop_id,
  93     GValue * value, GParamSpec * pspec);
  94 static void gst_rtp_rtx_send_finalize (GObject * object);
  95
  96 G_DEFINE_TYPE (GstRtpRtxSend, gst_rtp_rtx_send, GST_TYPE_ELEMENT);
  97
  98 typedef struct
  99 {
 100   guint16 seqnum;
 101   guint32 timestamp;
 102   GstBuffer *buffer;
 103 } BufferQueueItem;
 104
 105 static void
 106 buffer_queue_item_free (BufferQueueItem * item)
 107 {
 108   gst_buffer_unref (item->buffer);
 109   g_slice_free (BufferQueueItem, item);
 110 }
 111
 112 typedef struct
 113 {
 114   guint32 rtx_ssrc;
 115   guint16 next_seqnum;
 116   gint clock_rate;
 117
 118   /* history of rtp packets */
 119   GSequence *queue;
 120 } SSRCRtxData;
 121
 122 static SSRCRtxData *
 123 ssrc_rtx_data_new (guint32 rtx_ssrc)
 124 {
 125   SSRCRtxData *data = g_slice_new0 (SSRCRtxData);
 126
 127   data->rtx_ssrc = rtx_ssrc;
 128   data->next_seqnum = g_random_int_range (0, G_MAXUINT16);
 129   data->queue = g_sequence_new ((GDestroyNotify) buffer_queue_item_free);
 130
 131   return data;
 132 }
 133
 134 static void
 135 ssrc_rtx_data_free (SSRCRtxData * data)
 136 {
 137   g_sequence_free (data->queue);
 138   g_slice_free (SSRCRtxData, data);
 139 }
 140
 141 static void
 142 gst_rtp_rtx_send_class_init (GstRtpRtxSendClass * klass)
 143 {
 144   GObjectClass *gobject_class;
 145   GstElementClass *gstelement_class;
 146
 147   gobject_class = (GObjectClass *) klass;
 148   gstelement_class = (GstElementClass *) klass;
 149
 150   gobject_class->get_property = gst_rtp_rtx_send_get_property;
 151   gobject_class->set_property = gst_rtp_rtx_send_set_property;
 152   gobject_class->finalize = gst_rtp_rtx_send_finalize;
 153
 154   g_object_class_install_property (gobject_class, PROP_SSRC_MAP,
 155       g_param_spec_boxed ("ssrc-map", "SSRC Map",
 156           "Map of SSRCs to their retransmission SSRCs for SSRC-multiplexed mode"
 157           " (default = random)", GST_TYPE_STRUCTURE,
 158           G_PARAM_WRITABLE | G_PARAM_STATIC_STRINGS));
 159
 160   g_object_class_install_property (gobject_class, PROP_PAYLOAD_TYPE_MAP,
 161       g_param_spec_boxed ("payload-type-map", "Payload Type Map",
 162           "Map of original payload types to their retransmission payload types",
 163           GST_TYPE_STRUCTURE, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 164
 165   g_object_class_install_property (gobject_class, PROP_MAX_SIZE_TIME,
 166       g_param_spec_uint ("max-size-time", "Max Size Time",
 167           "Amount of ms to queue (0 = unlimited)", 0, G_MAXUINT,
 168           DEFAULT_MAX_SIZE_TIME, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 169
 170   g_object_class_install_property (gobject_class, PROP_MAX_SIZE_PACKETS,
 171       g_param_spec_uint ("max-size-packets", "Max Size Packets",
 172           "Amount of packets to queue (0 = unlimited)", 0, G_MAXINT16,
 173           DEFAULT_MAX_SIZE_PACKETS,
 174           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 175
 176   g_object_class_install_property (gobject_class, PROP_NUM_RTX_REQUESTS,
 177       g_param_spec_uint ("num-rtx-requests", "Num RTX Requests",
 178           "Number of retransmission events received", 0, G_MAXUINT,
 179           0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
 180
 181   g_object_class_install_property (gobject_class, PROP_NUM_RTX_PACKETS,
 182       g_param_spec_uint ("num-rtx-packets", "Num RTX Packets",
 183           " Number of retransmission packets sent", 0, G_MAXUINT,
 184           0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
 185
 186   gst_element_class_add_pad_template (gstelement_class,
 187       gst_static_pad_template_get (&src_factory));
 188   gst_element_class_add_pad_template (gstelement_class,
 189       gst_static_pad_template_get (&sink_factory));
 190
 191   gst_element_class_set_static_metadata (gstelement_class,
 192       "RTP Retransmission Sender", "Codec",
 193       "Retransmit RTP packets when needed, according to RFC4588",
 194       "Julien Isorce <julien.isorce@collabora.co.uk>");
 195
 196   gstelement_class->change_state =
 197       GST_DEBUG_FUNCPTR (gst_rtp_rtx_send_change_state);
 198 }
 199
 200 static void
 201 gst_rtp_rtx_send_reset (GstRtpRtxSend * rtx)
 202 {
 203   GST_OBJECT_LOCK (rtx);
 204   g_queue_foreach (rtx->pending, (GFunc) gst_buffer_unref, NULL);
 205   g_queue_clear (rtx->pending);
 206   g_hash_table_remove_all (rtx->ssrc_data);
 207   g_hash_table_remove_all (rtx->rtx_ssrcs);
 208   rtx->num_rtx_requests = 0;
 209   rtx->num_rtx_packets = 0;
 210   GST_OBJECT_UNLOCK (rtx);
 211 }
 212
 213 static void
 214 gst_rtp_rtx_send_finalize (GObject * object)
 215 {
 216   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (object);
 217
 218   g_hash_table_unref (rtx->ssrc_data);
 219   g_hash_table_unref (rtx->rtx_ssrcs);
 220   if (rtx->external_ssrc_map)
 221     gst_structure_free (rtx->external_ssrc_map);
 222   g_hash_table_unref (rtx->rtx_pt_map);
 223   if (rtx->rtx_pt_map_structure)
 224     gst_structure_free (rtx->rtx_pt_map_structure);
 225   g_queue_free_full (rtx->pending, (GDestroyNotify) gst_buffer_unref);
 226
 227   G_OBJECT_CLASS (gst_rtp_rtx_send_parent_class)->finalize (object);
 228 }
 229
 230 static void
 231 gst_rtp_rtx_send_init (GstRtpRtxSend * rtx)
 232 {
 233   GstElementClass *klass = GST_ELEMENT_GET_CLASS (rtx);
 234
 235   rtx->srcpad =
 236       gst_pad_new_from_template (gst_element_class_get_pad_template (klass,
 237           "src"), "src");
 238   GST_PAD_SET_PROXY_CAPS (rtx->srcpad);
 239   GST_PAD_SET_PROXY_ALLOCATION (rtx->srcpad);
 240   gst_pad_set_event_function (rtx->srcpad,
 241       GST_DEBUG_FUNCPTR (gst_rtp_rtx_send_src_event));
 242   gst_element_add_pad (GST_ELEMENT (rtx), rtx->srcpad);
 243
 244   rtx->sinkpad =
 245       gst_pad_new_from_template (gst_element_class_get_pad_template (klass,
 246           "sink"), "sink");
 247   GST_PAD_SET_PROXY_CAPS (rtx->sinkpad);
 248   GST_PAD_SET_PROXY_ALLOCATION (rtx->sinkpad);
 249   gst_pad_set_event_function (rtx->sinkpad,
 250       GST_DEBUG_FUNCPTR (gst_rtp_rtx_send_sink_event));
 251   gst_pad_set_chain_function (rtx->sinkpad,
 252       GST_DEBUG_FUNCPTR (gst_rtp_rtx_send_chain));
 253   gst_element_add_pad (GST_ELEMENT (rtx), rtx->sinkpad);
 254
 255   rtx->pending = g_queue_new ();
 256   rtx->ssrc_data = g_hash_table_new_full (g_direct_hash, g_direct_equal,
 257       NULL, (GDestroyNotify) ssrc_rtx_data_free);
 258   rtx->rtx_ssrcs = g_hash_table_new (g_direct_hash, g_direct_equal);
 259   rtx->rtx_pt_map = g_hash_table_new (g_direct_hash, g_direct_equal);
 260
 261   rtx->max_size_time = DEFAULT_MAX_SIZE_TIME;
 262   rtx->max_size_packets = DEFAULT_MAX_SIZE_PACKETS;
 263 }
 264
 265 static guint32
 266 gst_rtp_rtx_send_choose_ssrc (GstRtpRtxSend * rtx, guint32 choice,
 267     gboolean consider_choice)
 268 {
 269   guint32 ssrc = consider_choice ? choice : g_random_int ();
 270
 271   /* make sure to be different than any other */
 272   while (g_hash_table_contains (rtx->ssrc_data, GUINT_TO_POINTER (ssrc)) ||
 273       g_hash_table_contains (rtx->rtx_ssrcs, GUINT_TO_POINTER (ssrc))) {
 274     ssrc = g_random_int ();
 275   }
 276
 277   return ssrc;
 278 }
 279
 280 static SSRCRtxData *
 281 gst_rtp_rtx_send_get_ssrc_data (GstRtpRtxSend * rtx, guint32 ssrc)
 282 {
 283   SSRCRtxData *data;
 284   guint32 rtx_ssrc;
 285   gboolean consider = FALSE;
 286
 287   if (G_UNLIKELY (!g_hash_table_contains (rtx->ssrc_data,
 288               GUINT_TO_POINTER (ssrc)))) {
 289     if (rtx->external_ssrc_map) {
 290       gchar *ssrc_str;
 291       ssrc_str = g_strdup_printf ("%" G_GUINT32_FORMAT, ssrc);
 292       consider = gst_structure_get_uint (rtx->external_ssrc_map, ssrc_str,
 293           &rtx_ssrc);
 294       g_free (ssrc_str);
 295     }
 296     rtx_ssrc = gst_rtp_rtx_send_choose_ssrc (rtx, rtx_ssrc, consider);
 297     data = ssrc_rtx_data_new (rtx_ssrc);
 298     g_hash_table_insert (rtx->ssrc_data, GUINT_TO_POINTER (ssrc), data);
 299     g_hash_table_insert (rtx->rtx_ssrcs, GUINT_TO_POINTER (rtx_ssrc),
 300         GUINT_TO_POINTER (ssrc));
 301   } else {
 302     data = g_hash_table_lookup (rtx->ssrc_data, GUINT_TO_POINTER (ssrc));
 303   }
 304   return data;
 305 }
 306
 307 /* Copy fixed header and extension. Add OSN before to copy payload
 308  * Copy memory to avoid to manually copy each rtp buffer field.
 309  */
 310 static GstBuffer *
 311 gst_rtp_rtx_buffer_new (GstRtpRtxSend * rtx, GstBuffer * buffer)
 312 {
 313   GstMemory *mem = NULL;
 314   GstRTPBuffer rtp = GST_RTP_BUFFER_INIT;
 315   GstRTPBuffer new_rtp = GST_RTP_BUFFER_INIT;
 316   GstBuffer *new_buffer = gst_buffer_new ();
 317   GstMapInfo map;
 318   guint payload_len = 0;
 319   SSRCRtxData *data;
 320   guint32 ssrc;
 321   guint16 seqnum;
 322   guint8 fmtp;
 323
 324   gst_rtp_buffer_map (buffer, GST_MAP_READ, &rtp);
 325
 326   /* get needed data from GstRtpRtxSend */
 327   ssrc = gst_rtp_buffer_get_ssrc (&rtp);
 328   data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 329   ssrc = data->rtx_ssrc;
 330   seqnum = data->next_seqnum++;
 331   fmtp = GPOINTER_TO_UINT (g_hash_table_lookup (rtx->rtx_pt_map,
 332           GUINT_TO_POINTER (gst_rtp_buffer_get_payload_type (&rtp))));
 333
 334   GST_DEBUG_OBJECT (rtx,
 335       "retransmit seqnum: %" G_GUINT16_FORMAT ", ssrc: %" G_GUINT32_FORMAT,
 336       seqnum, ssrc);
 337
 338   /* gst_rtp_buffer_map does not map the payload so do it now */
 339   gst_rtp_buffer_get_payload (&rtp);
 340
 341   /* If payload type is not set through SDP/property then
 342    * just bump the value */
 343   if (fmtp < 96)
 344     fmtp = gst_rtp_buffer_get_payload_type (&rtp) + 1;
 345
 346   /* copy fixed header */
 347   mem = gst_memory_copy (rtp.map[0].memory, 0, rtp.size[0]);
 348   gst_buffer_append_memory (new_buffer, mem);
 349
 350   /* copy extension if any */
 351   if (rtp.size[1]) {
 352     mem = gst_memory_copy (rtp.map[1].memory, 0, rtp.size[1]);
 353     gst_buffer_append_memory (new_buffer, mem);
 354   }
 355
 356   /* copy payload and add OSN just before */
 357   payload_len = 2 + rtp.size[2];
 358   mem = gst_allocator_alloc (NULL, payload_len, NULL);
 359
 360   gst_memory_map (mem, &map, GST_MAP_WRITE);
 361   GST_WRITE_UINT16_BE (map.data, gst_rtp_buffer_get_seq (&rtp));
 362   if (rtp.size[2])
 363     memcpy (map.data + 2, rtp.data[2], rtp.size[2]);
 364   gst_memory_unmap (mem, &map);
 365   gst_buffer_append_memory (new_buffer, mem);
 366
 367   /* everything needed is copied */
 368   gst_rtp_buffer_unmap (&rtp);
 369
 370   /* set ssrc, seqnum and fmtp */
 371   gst_rtp_buffer_map (new_buffer, GST_MAP_WRITE, &new_rtp);
 372   gst_rtp_buffer_set_ssrc (&new_rtp, ssrc);
 373   gst_rtp_buffer_set_seq (&new_rtp, seqnum);
 374   gst_rtp_buffer_set_payload_type (&new_rtp, fmtp);
 375   /* RFC 4588: let other elements do the padding, as normal */
 376   gst_rtp_buffer_set_padding (&new_rtp, FALSE);
 377   gst_rtp_buffer_unmap (&new_rtp);
 378
 379   return new_buffer;
 380 }
 381
 382 static gint
 383 buffer_queue_items_cmp (BufferQueueItem * a, BufferQueueItem * b,
 384     gpointer user_data)
 385 {
 386   /* gst_rtp_buffer_compare_seqnum returns the opposite of what we want,
 387    * it returns negative when seqnum1 > seqnum2 and we want negative
 388    * when b > a, i.e. a is smaller, so it comes first in the sequence */
 389   return gst_rtp_buffer_compare_seqnum (b->seqnum, a->seqnum);
 390 }
 391
 392 static gboolean
 393 gst_rtp_rtx_send_src_event (GstPad * pad, GstObject * parent, GstEvent * event)
 394 {
 395   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (parent);
 396   gboolean res;
 397
 398   switch (GST_EVENT_TYPE (event)) {
 399     case GST_EVENT_CUSTOM_UPSTREAM:
 400     {
 401       const GstStructure *s = gst_event_get_structure (event);
 402
 403       /* This event usually comes from the downstream gstrtpsession */
 404       if (gst_structure_has_name (s, "GstRTPRetransmissionRequest")) {
 405         guint seqnum = 0;
 406         guint ssrc = 0;
 407
 408         /* retrieve seqnum of the packet that need to be restransmisted */
 409         if (!gst_structure_get_uint (s, "seqnum", &seqnum))
 410           seqnum = -1;
 411
 412         /* retrieve ssrc of the packet that need to be restransmisted */
 413         if (!gst_structure_get_uint (s, "ssrc", &ssrc))
 414           ssrc = -1;
 415
 416         GST_DEBUG_OBJECT (rtx,
 417             "request seqnum: %" G_GUINT32_FORMAT ", ssrc: %" G_GUINT32_FORMAT,
 418             seqnum, ssrc);
 419
 420         GST_OBJECT_LOCK (rtx);
 421         /* check if request is for us */
 422         if (g_hash_table_contains (rtx->ssrc_data, GUINT_TO_POINTER (ssrc))) {
 423           SSRCRtxData *data;
 424           GSequenceIter *iter;
 425           BufferQueueItem search_item;
 426
 427           /* update statistics */
 428           ++rtx->num_rtx_requests;
 429
 430           data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 431
 432           search_item.seqnum = seqnum;
 433           iter = g_sequence_lookup (data->queue, &search_item,
 434               (GCompareDataFunc) buffer_queue_items_cmp, NULL);
 435           if (iter) {
 436             BufferQueueItem *item = g_sequence_get (iter);
 437             GST_DEBUG_OBJECT (rtx, "found %" G_GUINT16_FORMAT, item->seqnum);
 438             g_queue_push_tail (rtx->pending,
 439                 gst_rtp_rtx_buffer_new (rtx, item->buffer));
 440           }
 441         }
 442         GST_OBJECT_UNLOCK (rtx);
 443
 444         gst_event_unref (event);
 445         res = TRUE;
 446
 447         /* This event usually comes from the downstream gstrtpsession */
 448       } else if (gst_structure_has_name (s, "GstRTPCollision")) {
 449         guint ssrc = 0;
 450
 451         if (!gst_structure_get_uint (s, "ssrc", &ssrc))
 452           ssrc = -1;
 453
 454         GST_DEBUG_OBJECT (rtx, "collision ssrc: %" G_GUINT32_FORMAT, ssrc);
 455
 456         GST_OBJECT_LOCK (rtx);
 457
 458         /* choose another ssrc for our retransmited stream */
 459         if (g_hash_table_contains (rtx->rtx_ssrcs, GUINT_TO_POINTER (ssrc))) {
 460           guint master_ssrc;
 461           SSRCRtxData *data;
 462
 463           master_ssrc = GPOINTER_TO_UINT (g_hash_table_lookup (rtx->rtx_ssrcs,
 464                   GUINT_TO_POINTER (ssrc)));
 465           data = gst_rtp_rtx_send_get_ssrc_data (rtx, master_ssrc);
 466
 467           /* change rtx_ssrc and update the reverse map */
 468           data->rtx_ssrc = gst_rtp_rtx_send_choose_ssrc (rtx, 0, FALSE);
 469           g_hash_table_remove (rtx->rtx_ssrcs, GUINT_TO_POINTER (ssrc));
 470           g_hash_table_insert (rtx->rtx_ssrcs,
 471               GUINT_TO_POINTER (data->rtx_ssrc),
 472               GUINT_TO_POINTER (master_ssrc));
 473
 474           GST_OBJECT_UNLOCK (rtx);
 475
 476           /* no need to forward to payloader because we make sure to have
 477            * a different ssrc
 478            */
 479           gst_event_unref (event);
 480           res = TRUE;
 481         } else {
 482           /* if master ssrc has collided, remove it from our data, as it
 483            * is not going to be used any longer */
 484           if (g_hash_table_contains (rtx->ssrc_data, GUINT_TO_POINTER (ssrc))) {
 485             SSRCRtxData *data;
 486             data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 487             g_hash_table_remove (rtx->rtx_ssrcs,
 488                 GUINT_TO_POINTER (data->rtx_ssrc));
 489             g_hash_table_remove (rtx->ssrc_data, GUINT_TO_POINTER (ssrc));
 490           }
 491
 492           GST_OBJECT_UNLOCK (rtx);
 493
 494           /* forward event to payloader in case collided ssrc is
 495            * master stream */
 496           res = gst_pad_event_default (pad, parent, event);
 497         }
 498       } else {
 499         res = gst_pad_event_default (pad, parent, event);
 500       }
 501       break;
 502     }
 503     default:
 504       res = gst_pad_event_default (pad, parent, event);
 505       break;
 506   }
 507   return res;
 508 }
 509
 510 static gboolean
 511 gst_rtp_rtx_send_sink_event (GstPad * pad, GstObject * parent, GstEvent * event)
 512 {
 513   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (parent);
 514
 515   switch (GST_EVENT_TYPE (event)) {
 516     case GST_EVENT_CAPS:
 517     {
 518       GstCaps *caps;
 519       GstStructure *s;
 520       guint ssrc;
 521       SSRCRtxData *data;
 522
 523       gst_event_parse_caps (event, &caps);
 524       g_assert (gst_caps_is_fixed (caps));
 525
 526       s = gst_caps_get_structure (caps, 0);
 527       gst_structure_get_uint (s, "ssrc", &ssrc);
 528
 529       GST_OBJECT_LOCK (rtx);
 530       data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 531       gst_structure_get_int (s, "clock-rate", &data->clock_rate);
 532
 533       GST_DEBUG_OBJECT (rtx, "got clock-rate from caps: %d for ssrc: %u",
 534           data->clock_rate, ssrc);
 535       GST_OBJECT_UNLOCK (rtx);
 536       break;
 537     }
 538     default:
 539       break;
 540   }
 541   return gst_pad_event_default (pad, parent, event);
 542 }
 543
 544 /* like rtp_jitter_buffer_get_ts_diff() */
 545 static guint32
 546 gst_rtp_rtx_send_get_ts_diff (SSRCRtxData * data)
 547 {
 548   guint64 high_ts, low_ts;
 549   BufferQueueItem *high_buf, *low_buf;
 550   guint32 result;
 551
 552   high_buf =
 553       g_sequence_get (g_sequence_iter_prev (g_sequence_get_end_iter
 554           (data->queue)));
 555   low_buf = g_sequence_get (g_sequence_get_begin_iter (data->queue));
 556
 557   if (!high_buf || !low_buf || high_buf == low_buf)
 558     return 0;
 559
 560   high_ts = high_buf->timestamp;
 561   low_ts = low_buf->timestamp;
 562
 563   /* it needs to work if ts wraps */
 564   if (high_ts >= low_ts) {
 565     result = (guint32) (high_ts - low_ts);
 566   } else {
 567     result = (guint32) (high_ts + G_MAXUINT32 + 1 - low_ts);
 568   }
 569
 570   /* return value in ms instead of clock ticks */
 571   return (guint32) gst_util_uint64_scale_int (result, 1000, data->clock_rate);
 572 }
 573
 574 /* push pending retransmission packet.
 575  * it constructs rtx packet from original packets */
 576 static void
 577 do_push (GstBuffer * buffer, GstRtpRtxSend * rtx)
 578 {
 579   gst_pad_push (rtx->srcpad, buffer);
 580 }
 581
 582 static GstFlowReturn
 583 gst_rtp_rtx_send_chain (GstPad * pad, GstObject * parent, GstBuffer * buffer)
 584 {
 585   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (parent);
 586   GstFlowReturn ret = GST_FLOW_ERROR;
 587   GQueue *pending = NULL;
 588   GstRTPBuffer rtp = GST_RTP_BUFFER_INIT;
 589   BufferQueueItem *item;
 590   SSRCRtxData *data;
 591   guint16 seqnum;
 592   guint8 payload_type;
 593   guint32 ssrc, rtptime;
 594
 595   /* read the information we want from the buffer */
 596   gst_rtp_buffer_map (buffer, GST_MAP_READ, &rtp);
 597   seqnum = gst_rtp_buffer_get_seq (&rtp);
 598   payload_type = gst_rtp_buffer_get_payload_type (&rtp);
 599   ssrc = gst_rtp_buffer_get_ssrc (&rtp);
 600   rtptime = gst_rtp_buffer_get_timestamp (&rtp);
 601   gst_rtp_buffer_unmap (&rtp);
 602
 603   GST_OBJECT_LOCK (rtx);
 604
 605   /* do not store the buffer if it's payload type is unknown */
 606   if (g_hash_table_contains (rtx->rtx_pt_map, GUINT_TO_POINTER (payload_type))) {
 607     data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 608
 609     /* add current rtp buffer to queue history */
 610     item = g_slice_new0 (BufferQueueItem);
 611     item->seqnum = seqnum;
 612     item->timestamp = rtptime;
 613     item->buffer = gst_buffer_ref (buffer);
 614     g_sequence_append (data->queue, item);
 615
 616     /* remove oldest packets from history if they are too many */
 617     if (rtx->max_size_packets) {
 618       while (g_sequence_get_length (data->queue) > rtx->max_size_packets)
 619         g_sequence_remove (g_sequence_get_begin_iter (data->queue));
 620     }
 621     if (rtx->max_size_time) {
 622       while (gst_rtp_rtx_send_get_ts_diff (data) > rtx->max_size_time)
 623         g_sequence_remove (g_sequence_get_begin_iter (data->queue));
 624     }
 625   }
 626
 627   /* within lock, get packets that have to be retransmited */
 628   if (g_queue_get_length (rtx->pending) > 0) {
 629     pending = rtx->pending;
 630     rtx->pending = g_queue_new ();
 631
 632     /* update statistics - assume we will succeed to retransmit those packets */
 633     rtx->num_rtx_packets += g_queue_get_length (pending);
 634   }
 635
 636   /* no need to hold the lock to push rtx packets */
 637   GST_OBJECT_UNLOCK (rtx);
 638
 639   /* retransmit requested packets */
 640   if (pending) {
 641     g_queue_foreach (pending, (GFunc) do_push, rtx);
 642     g_queue_free (pending);
 643   }
 644
 645   GST_LOG_OBJECT (rtx,
 646       "push seqnum: %" G_GUINT16_FORMAT ", ssrc: %" G_GUINT32_FORMAT, seqnum,
 647       ssrc);
 648
 649   /* push current rtp packet */
 650   ret = gst_pad_push (rtx->srcpad, buffer);
 651
 652   return ret;
 653 }
 654
 655 static void
 656 gst_rtp_rtx_send_get_property (GObject * object,
 657     guint prop_id, GValue * value, GParamSpec * pspec)
 658 {
 659   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (object);
 660
 661   switch (prop_id) {
 662     case PROP_PAYLOAD_TYPE_MAP:
 663       GST_OBJECT_LOCK (rtx);
 664       g_value_set_boxed (value, rtx->rtx_pt_map_structure);
 665       GST_OBJECT_UNLOCK (rtx);
 666       break;
 667     case PROP_MAX_SIZE_TIME:
 668       GST_OBJECT_LOCK (rtx);
 669       g_value_set_uint (value, rtx->max_size_time);
 670       GST_OBJECT_UNLOCK (rtx);
 671       break;
 672     case PROP_MAX_SIZE_PACKETS:
 673       GST_OBJECT_LOCK (rtx);
 674       g_value_set_uint (value, rtx->max_size_packets);
 675       GST_OBJECT_UNLOCK (rtx);
 676       break;
 677     case PROP_NUM_RTX_REQUESTS:
 678       GST_OBJECT_LOCK (rtx);
 679       g_value_set_uint (value, rtx->num_rtx_requests);
 680       GST_OBJECT_UNLOCK (rtx);
 681       break;
 682     case PROP_NUM_RTX_PACKETS:
 683       GST_OBJECT_LOCK (rtx);
 684       g_value_set_uint (value, rtx->num_rtx_packets);
 685       GST_OBJECT_UNLOCK (rtx);
 686       break;
 687     default:
 688       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 689       break;
 690   }
 691 }
 692
 693 static gboolean
 694 structure_to_hash_table (GQuark field_id, const GValue * value, gpointer hash)
 695 {
 696   const gchar *field_str;
 697   guint field_uint;
 698   guint value_uint;
 699
 700   field_str = g_quark_to_string (field_id);
 701   field_uint = atoi (field_str);
 702   value_uint = g_value_get_uint (value);
 703   g_hash_table_insert ((GHashTable *) hash, GUINT_TO_POINTER (field_uint),
 704       GUINT_TO_POINTER (value_uint));
 705
 706   return TRUE;
 707 }
 708
 709 static void
 710 gst_rtp_rtx_send_set_property (GObject * object,
 711     guint prop_id, const GValue * value, GParamSpec * pspec)
 712 {
 713   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (object);
 714
 715   switch (prop_id) {
 716     case PROP_SSRC_MAP:
 717       GST_OBJECT_LOCK (rtx);
 718       if (rtx->external_ssrc_map)
 719         gst_structure_free (rtx->external_ssrc_map);
 720       rtx->external_ssrc_map = g_value_dup_boxed (value);
 721       GST_OBJECT_UNLOCK (rtx);
 722       break;
 723     case PROP_PAYLOAD_TYPE_MAP:
 724       GST_OBJECT_LOCK (rtx);
 725       if (rtx->rtx_pt_map_structure)
 726         gst_structure_free (rtx->rtx_pt_map_structure);
 727       rtx->rtx_pt_map_structure = g_value_dup_boxed (value);
 728       g_hash_table_remove_all (rtx->rtx_pt_map);
 729       gst_structure_foreach (rtx->rtx_pt_map_structure, structure_to_hash_table,
 730           rtx->rtx_pt_map);
 731       GST_OBJECT_UNLOCK (rtx);
 732       break;
 733     case PROP_MAX_SIZE_TIME:
 734       GST_OBJECT_LOCK (rtx);
 735       rtx->max_size_time = g_value_get_uint (value);
 736       GST_OBJECT_UNLOCK (rtx);
 737       break;
 738     case PROP_MAX_SIZE_PACKETS:
 739       GST_OBJECT_LOCK (rtx);
 740       rtx->max_size_packets = g_value_get_uint (value);
 741       GST_OBJECT_UNLOCK (rtx);
 742       break;
 743     default:
 744       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 745       break;
 746   }
 747 }
 748
 749 static GstStateChangeReturn
 750 gst_rtp_rtx_send_change_state (GstElement * element, GstStateChange transition)
 751 {
 752   GstStateChangeReturn ret;
 753   GstRtpRtxSend *rtx;
 754
 755   rtx = GST_RTP_RTX_SEND (element);
 756
 757   switch (transition) {
 758     default:
 759       break;
 760   }
 761
 762   ret =
 763       GST_ELEMENT_CLASS (gst_rtp_rtx_send_parent_class)->change_state (element,
 764       transition);
 765
 766   switch (transition) {
 767     case GST_STATE_CHANGE_PAUSED_TO_READY:
 768       gst_rtp_rtx_send_reset (rtx);
 769       break;
 770     default:
 771       break;
 772   }
 773
 774   return ret;
 775 }
 776
 777 gboolean
 778 gst_rtp_rtx_send_plugin_init (GstPlugin * plugin)
 779 {
 780   GST_DEBUG_CATEGORY_INIT (gst_rtp_rtx_send_debug, "rtprtxsend", 0,
 781       "rtp retransmission sender");
 782
 783   return gst_element_register (plugin, "rtprtxsend", GST_RANK_NONE,
 784       GST_TYPE_RTP_RTX_SEND);
 785 }