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   /* copy fixed header */
 342   mem = gst_memory_copy (rtp.map[0].memory, 0, rtp.size[0]);
 343   gst_buffer_append_memory (new_buffer, mem);
 344
 345   /* copy extension if any */
 346   if (rtp.size[1]) {
 347     mem = gst_memory_copy (rtp.map[1].memory, 0, rtp.size[1]);
 348     gst_buffer_append_memory (new_buffer, mem);
 349   }
 350
 351   /* copy payload and add OSN just before */
 352   payload_len = 2 + rtp.size[2];
 353   mem = gst_allocator_alloc (NULL, payload_len, NULL);
 354
 355   gst_memory_map (mem, &map, GST_MAP_WRITE);
 356   GST_WRITE_UINT16_BE (map.data, gst_rtp_buffer_get_seq (&rtp));
 357   if (rtp.size[2])
 358     memcpy (map.data + 2, rtp.data[2], rtp.size[2]);
 359   gst_memory_unmap (mem, &map);
 360   gst_buffer_append_memory (new_buffer, mem);
 361
 362   /* everything needed is copied */
 363   gst_rtp_buffer_unmap (&rtp);
 364
 365   /* set ssrc, seqnum and fmtp */
 366   gst_rtp_buffer_map (new_buffer, GST_MAP_WRITE, &new_rtp);
 367   gst_rtp_buffer_set_ssrc (&new_rtp, ssrc);
 368   gst_rtp_buffer_set_seq (&new_rtp, seqnum);
 369   gst_rtp_buffer_set_payload_type (&new_rtp, fmtp);
 370   /* RFC 4588: let other elements do the padding, as normal */
 371   gst_rtp_buffer_set_padding (&new_rtp, FALSE);
 372   gst_rtp_buffer_unmap (&new_rtp);
 373
 374   return new_buffer;
 375 }
 376
 377 static gint
 378 buffer_queue_items_cmp (BufferQueueItem * a, BufferQueueItem * b,
 379     gpointer user_data)
 380 {
 381   /* gst_rtp_buffer_compare_seqnum returns the opposite of what we want,
 382    * it returns negative when seqnum1 > seqnum2 and we want negative
 383    * when b > a, i.e. a is smaller, so it comes first in the sequence */
 384   return gst_rtp_buffer_compare_seqnum (b->seqnum, a->seqnum);
 385 }
 386
 387 static gboolean
 388 gst_rtp_rtx_send_src_event (GstPad * pad, GstObject * parent, GstEvent * event)
 389 {
 390   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (parent);
 391   gboolean res;
 392
 393   switch (GST_EVENT_TYPE (event)) {
 394     case GST_EVENT_CUSTOM_UPSTREAM:
 395     {
 396       const GstStructure *s = gst_event_get_structure (event);
 397
 398       /* This event usually comes from the downstream gstrtpsession */
 399       if (gst_structure_has_name (s, "GstRTPRetransmissionRequest")) {
 400         guint seqnum = 0;
 401         guint ssrc = 0;
 402
 403         /* retrieve seqnum of the packet that need to be restransmisted */
 404         if (!gst_structure_get_uint (s, "seqnum", &seqnum))
 405           seqnum = -1;
 406
 407         /* retrieve ssrc of the packet that need to be restransmisted */
 408         if (!gst_structure_get_uint (s, "ssrc", &ssrc))
 409           ssrc = -1;
 410
 411         GST_DEBUG_OBJECT (rtx,
 412             "request seqnum: %" G_GUINT32_FORMAT ", ssrc: %" G_GUINT32_FORMAT,
 413             seqnum, ssrc);
 414
 415         GST_OBJECT_LOCK (rtx);
 416         /* check if request is for us */
 417         if (g_hash_table_contains (rtx->ssrc_data, GUINT_TO_POINTER (ssrc))) {
 418           SSRCRtxData *data;
 419           GSequenceIter *iter;
 420           BufferQueueItem search_item;
 421
 422           /* update statistics */
 423           ++rtx->num_rtx_requests;
 424
 425           data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 426
 427           search_item.seqnum = seqnum;
 428           iter = g_sequence_lookup (data->queue, &search_item,
 429               (GCompareDataFunc) buffer_queue_items_cmp, NULL);
 430           if (iter) {
 431             BufferQueueItem *item = g_sequence_get (iter);
 432             GST_DEBUG_OBJECT (rtx, "found %" G_GUINT16_FORMAT, item->seqnum);
 433             g_queue_push_tail (rtx->pending,
 434                 gst_rtp_rtx_buffer_new (rtx, item->buffer));
 435           }
 436         }
 437         GST_OBJECT_UNLOCK (rtx);
 438
 439         gst_event_unref (event);
 440         res = TRUE;
 441
 442         /* This event usually comes from the downstream gstrtpsession */
 443       } else if (gst_structure_has_name (s, "GstRTPCollision")) {
 444         guint ssrc = 0;
 445
 446         if (!gst_structure_get_uint (s, "ssrc", &ssrc))
 447           ssrc = -1;
 448
 449         GST_DEBUG_OBJECT (rtx, "collision ssrc: %" G_GUINT32_FORMAT, ssrc);
 450
 451         GST_OBJECT_LOCK (rtx);
 452
 453         /* choose another ssrc for our retransmited stream */
 454         if (g_hash_table_contains (rtx->rtx_ssrcs, GUINT_TO_POINTER (ssrc))) {
 455           guint master_ssrc;
 456           SSRCRtxData *data;
 457
 458           master_ssrc = GPOINTER_TO_UINT (g_hash_table_lookup (rtx->rtx_ssrcs,
 459                   GUINT_TO_POINTER (ssrc)));
 460           data = gst_rtp_rtx_send_get_ssrc_data (rtx, master_ssrc);
 461
 462           /* change rtx_ssrc and update the reverse map */
 463           data->rtx_ssrc = gst_rtp_rtx_send_choose_ssrc (rtx, 0, FALSE);
 464           g_hash_table_remove (rtx->rtx_ssrcs, GUINT_TO_POINTER (ssrc));
 465           g_hash_table_insert (rtx->rtx_ssrcs,
 466               GUINT_TO_POINTER (data->rtx_ssrc),
 467               GUINT_TO_POINTER (master_ssrc));
 468
 469           GST_OBJECT_UNLOCK (rtx);
 470
 471           /* no need to forward to payloader because we make sure to have
 472            * a different ssrc
 473            */
 474           gst_event_unref (event);
 475           res = TRUE;
 476         } else {
 477           /* if master ssrc has collided, remove it from our data, as it
 478            * is not going to be used any longer */
 479           if (g_hash_table_contains (rtx->ssrc_data, GUINT_TO_POINTER (ssrc))) {
 480             SSRCRtxData *data;
 481             data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 482             g_hash_table_remove (rtx->rtx_ssrcs,
 483                 GUINT_TO_POINTER (data->rtx_ssrc));
 484             g_hash_table_remove (rtx->ssrc_data, GUINT_TO_POINTER (ssrc));
 485           }
 486
 487           GST_OBJECT_UNLOCK (rtx);
 488
 489           /* forward event to payloader in case collided ssrc is
 490            * master stream */
 491           res = gst_pad_event_default (pad, parent, event);
 492         }
 493       } else {
 494         res = gst_pad_event_default (pad, parent, event);
 495       }
 496       break;
 497     }
 498     default:
 499       res = gst_pad_event_default (pad, parent, event);
 500       break;
 501   }
 502   return res;
 503 }
 504
 505 static gboolean
 506 gst_rtp_rtx_send_sink_event (GstPad * pad, GstObject * parent, GstEvent * event)
 507 {
 508   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (parent);
 509
 510   switch (GST_EVENT_TYPE (event)) {
 511     case GST_EVENT_CAPS:
 512     {
 513       GstCaps *caps;
 514       GstStructure *s;
 515       guint ssrc;
 516       SSRCRtxData *data;
 517
 518       gst_event_parse_caps (event, &caps);
 519       g_assert (gst_caps_is_fixed (caps));
 520
 521       s = gst_caps_get_structure (caps, 0);
 522       gst_structure_get_uint (s, "ssrc", &ssrc);
 523
 524       GST_OBJECT_LOCK (rtx);
 525       data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 526       gst_structure_get_int (s, "clock-rate", &data->clock_rate);
 527
 528       GST_DEBUG_OBJECT (rtx, "got clock-rate from caps: %d for ssrc: %u",
 529           data->clock_rate, ssrc);
 530       GST_OBJECT_UNLOCK (rtx);
 531       break;
 532     }
 533     default:
 534       break;
 535   }
 536   return gst_pad_event_default (pad, parent, event);
 537 }
 538
 539 /* like rtp_jitter_buffer_get_ts_diff() */
 540 static guint32
 541 gst_rtp_rtx_send_get_ts_diff (SSRCRtxData * data)
 542 {
 543   guint64 high_ts, low_ts;
 544   BufferQueueItem *high_buf, *low_buf;
 545   guint32 result;
 546
 547   high_buf =
 548       g_sequence_get (g_sequence_iter_prev (g_sequence_get_end_iter
 549           (data->queue)));
 550   low_buf = g_sequence_get (g_sequence_get_begin_iter (data->queue));
 551
 552   if (!high_buf || !low_buf || high_buf == low_buf)
 553     return 0;
 554
 555   high_ts = high_buf->timestamp;
 556   low_ts = low_buf->timestamp;
 557
 558   /* it needs to work if ts wraps */
 559   if (high_ts >= low_ts) {
 560     result = (guint32) (high_ts - low_ts);
 561   } else {
 562     result = (guint32) (high_ts + G_MAXUINT32 + 1 - low_ts);
 563   }
 564
 565   /* return value in ms instead of clock ticks */
 566   return (guint32) gst_util_uint64_scale_int (result, 1000, data->clock_rate);
 567 }
 568
 569 /* push pending retransmission packet.
 570  * it constructs rtx packet from original packets */
 571 static void
 572 do_push (GstBuffer * buffer, GstRtpRtxSend * rtx)
 573 {
 574   gst_pad_push (rtx->srcpad, buffer);
 575 }
 576
 577 static GstFlowReturn
 578 gst_rtp_rtx_send_chain (GstPad * pad, GstObject * parent, GstBuffer * buffer)
 579 {
 580   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (parent);
 581   GstFlowReturn ret = GST_FLOW_ERROR;
 582   GQueue *pending = NULL;
 583   GstRTPBuffer rtp = GST_RTP_BUFFER_INIT;
 584   BufferQueueItem *item;
 585   SSRCRtxData *data;
 586   guint16 seqnum;
 587   guint8 payload_type;
 588   guint32 ssrc, rtptime;
 589
 590   /* read the information we want from the buffer */
 591   gst_rtp_buffer_map (buffer, GST_MAP_READ, &rtp);
 592   seqnum = gst_rtp_buffer_get_seq (&rtp);
 593   payload_type = gst_rtp_buffer_get_payload_type (&rtp);
 594   ssrc = gst_rtp_buffer_get_ssrc (&rtp);
 595   rtptime = gst_rtp_buffer_get_timestamp (&rtp);
 596   gst_rtp_buffer_unmap (&rtp);
 597
 598   GST_OBJECT_LOCK (rtx);
 599
 600   /* do not store the buffer if it's payload type is unknown */
 601   if (g_hash_table_contains (rtx->rtx_pt_map, GUINT_TO_POINTER (payload_type))) {
 602     data = gst_rtp_rtx_send_get_ssrc_data (rtx, ssrc);
 603
 604     /* add current rtp buffer to queue history */
 605     item = g_slice_new0 (BufferQueueItem);
 606     item->seqnum = seqnum;
 607     item->timestamp = rtptime;
 608     item->buffer = gst_buffer_ref (buffer);
 609     g_sequence_append (data->queue, item);
 610
 611     /* remove oldest packets from history if they are too many */
 612     if (rtx->max_size_packets) {
 613       while (g_sequence_get_length (data->queue) > rtx->max_size_packets)
 614         g_sequence_remove (g_sequence_get_begin_iter (data->queue));
 615     }
 616     if (rtx->max_size_time) {
 617       while (gst_rtp_rtx_send_get_ts_diff (data) > rtx->max_size_time)
 618         g_sequence_remove (g_sequence_get_begin_iter (data->queue));
 619     }
 620   }
 621
 622   /* within lock, get packets that have to be retransmited */
 623   if (g_queue_get_length (rtx->pending) > 0) {
 624     pending = rtx->pending;
 625     rtx->pending = g_queue_new ();
 626
 627     /* update statistics - assume we will succeed to retransmit those packets */
 628     rtx->num_rtx_packets += g_queue_get_length (pending);
 629   }
 630
 631   /* no need to hold the lock to push rtx packets */
 632   GST_OBJECT_UNLOCK (rtx);
 633
 634   /* retransmit requested packets */
 635   if (pending) {
 636     g_queue_foreach (pending, (GFunc) do_push, rtx);
 637     g_queue_free (pending);
 638   }
 639
 640   GST_LOG_OBJECT (rtx,
 641       "push seqnum: %" G_GUINT16_FORMAT ", ssrc: %" G_GUINT32_FORMAT, seqnum,
 642       ssrc);
 643
 644   /* push current rtp packet */
 645   ret = gst_pad_push (rtx->srcpad, buffer);
 646
 647   return ret;
 648 }
 649
 650 static void
 651 gst_rtp_rtx_send_get_property (GObject * object,
 652     guint prop_id, GValue * value, GParamSpec * pspec)
 653 {
 654   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (object);
 655
 656   switch (prop_id) {
 657     case PROP_PAYLOAD_TYPE_MAP:
 658       GST_OBJECT_LOCK (rtx);
 659       g_value_set_boxed (value, rtx->rtx_pt_map_structure);
 660       GST_OBJECT_UNLOCK (rtx);
 661       break;
 662     case PROP_MAX_SIZE_TIME:
 663       GST_OBJECT_LOCK (rtx);
 664       g_value_set_uint (value, rtx->max_size_time);
 665       GST_OBJECT_UNLOCK (rtx);
 666       break;
 667     case PROP_MAX_SIZE_PACKETS:
 668       GST_OBJECT_LOCK (rtx);
 669       g_value_set_uint (value, rtx->max_size_packets);
 670       GST_OBJECT_UNLOCK (rtx);
 671       break;
 672     case PROP_NUM_RTX_REQUESTS:
 673       GST_OBJECT_LOCK (rtx);
 674       g_value_set_uint (value, rtx->num_rtx_requests);
 675       GST_OBJECT_UNLOCK (rtx);
 676       break;
 677     case PROP_NUM_RTX_PACKETS:
 678       GST_OBJECT_LOCK (rtx);
 679       g_value_set_uint (value, rtx->num_rtx_packets);
 680       GST_OBJECT_UNLOCK (rtx);
 681       break;
 682     default:
 683       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 684       break;
 685   }
 686 }
 687
 688 static gboolean
 689 structure_to_hash_table (GQuark field_id, const GValue * value, gpointer hash)
 690 {
 691   const gchar *field_str;
 692   guint field_uint;
 693   guint value_uint;
 694
 695   field_str = g_quark_to_string (field_id);
 696   field_uint = atoi (field_str);
 697   value_uint = g_value_get_uint (value);
 698   g_hash_table_insert ((GHashTable *) hash, GUINT_TO_POINTER (field_uint),
 699       GUINT_TO_POINTER (value_uint));
 700
 701   return TRUE;
 702 }
 703
 704 static void
 705 gst_rtp_rtx_send_set_property (GObject * object,
 706     guint prop_id, const GValue * value, GParamSpec * pspec)
 707 {
 708   GstRtpRtxSend *rtx = GST_RTP_RTX_SEND (object);
 709
 710   switch (prop_id) {
 711     case PROP_SSRC_MAP:
 712       GST_OBJECT_LOCK (rtx);
 713       if (rtx->external_ssrc_map)
 714         gst_structure_free (rtx->external_ssrc_map);
 715       rtx->external_ssrc_map = g_value_dup_boxed (value);
 716       GST_OBJECT_UNLOCK (rtx);
 717       break;
 718     case PROP_PAYLOAD_TYPE_MAP:
 719       GST_OBJECT_LOCK (rtx);
 720       if (rtx->rtx_pt_map_structure)
 721         gst_structure_free (rtx->rtx_pt_map_structure);
 722       rtx->rtx_pt_map_structure = g_value_dup_boxed (value);
 723       g_hash_table_remove_all (rtx->rtx_pt_map);
 724       gst_structure_foreach (rtx->rtx_pt_map_structure, structure_to_hash_table,
 725           rtx->rtx_pt_map);
 726       GST_OBJECT_UNLOCK (rtx);
 727       break;
 728     case PROP_MAX_SIZE_TIME:
 729       GST_OBJECT_LOCK (rtx);
 730       rtx->max_size_time = g_value_get_uint (value);
 731       GST_OBJECT_UNLOCK (rtx);
 732       break;
 733     case PROP_MAX_SIZE_PACKETS:
 734       GST_OBJECT_LOCK (rtx);
 735       rtx->max_size_packets = g_value_get_uint (value);
 736       GST_OBJECT_UNLOCK (rtx);
 737       break;
 738     default:
 739       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 740       break;
 741   }
 742 }
 743
 744 static GstStateChangeReturn
 745 gst_rtp_rtx_send_change_state (GstElement * element, GstStateChange transition)
 746 {
 747   GstStateChangeReturn ret;
 748   GstRtpRtxSend *rtx;
 749
 750   rtx = GST_RTP_RTX_SEND (element);
 751
 752   switch (transition) {
 753     default:
 754       break;
 755   }
 756
 757   ret =
 758       GST_ELEMENT_CLASS (gst_rtp_rtx_send_parent_class)->change_state (element,
 759       transition);
 760
 761   switch (transition) {
 762     case GST_STATE_CHANGE_PAUSED_TO_READY:
 763       gst_rtp_rtx_send_reset (rtx);
 764       break;
 765     default:
 766       break;
 767   }
 768
 769   return ret;
 770 }
 771
 772 gboolean
 773 gst_rtp_rtx_send_plugin_init (GstPlugin * plugin)
 774 {
 775   GST_DEBUG_CATEGORY_INIT (gst_rtp_rtx_send_debug, "rtprtxsend", 0,
 776       "rtp retransmission sender");
 777
 778   return gst_element_register (plugin, "rtprtxsend", GST_RANK_NONE,
 779       GST_TYPE_RTP_RTX_SEND);
 780 }