gst/rtp/gstrtph263ppay.c

   1 /* GStreamer
   2  * Copyright (C) <2005> Wim Taymans <wim.taymans@gmail.com>
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Library General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #  include "config.h"
  22 #endif
  23
  24 #include <string.h>
  25 #include <stdlib.h>
  26 #include <stdio.h>
  27
  28 #include <gst/rtp/gstrtpbuffer.h>
  29
  30 #include "gstrtph263ppay.h"
  31
  32 #define DEFAULT_FRAGMENTATION_MODE   GST_FRAGMENTATION_MODE_NORMAL
  33
  34 enum
  35 {
  36   PROP_0,
  37   PROP_FRAGMENTATION_MODE
  38 };
  39
  40 #define GST_TYPE_FRAGMENTATION_MODE (gst_fragmentation_mode_get_type())
  41 static GType
  42 gst_fragmentation_mode_get_type (void)
  43 {
  44   static GType fragmentation_mode_type = 0;
  45   static const GEnumValue fragmentation_mode[] = {
  46     {GST_FRAGMENTATION_MODE_NORMAL, "Normal", "normal"},
  47     {GST_FRAGMENTATION_MODE_SYNC, "Fragment at sync points", "sync"},
  48     {0, NULL, NULL},
  49   };
  50
  51   if (!fragmentation_mode_type) {
  52     fragmentation_mode_type =
  53         g_enum_register_static ("GstFragmentationMode", fragmentation_mode);
  54   }
  55   return fragmentation_mode_type;
  56 }
  57
  58
  59 GST_DEBUG_CATEGORY_STATIC (rtph263ppay_debug);
  60 #define GST_CAT_DEFAULT rtph263ppay_debug
  61
  62 static GstStaticPadTemplate gst_rtp_h263p_pay_sink_template =
  63 GST_STATIC_PAD_TEMPLATE ("sink",
  64     GST_PAD_SINK,
  65     GST_PAD_ALWAYS,
  66     GST_STATIC_CAPS ("video/x-h263, " "variant = (string) \"itu\"")
  67     );
  68
  69 /*
  70  * We also return these in getcaps() as required by the SDP caps
  71  *
  72  * width = (int) [16, 4096]
  73  * height = (int) [16, 4096]
  74  * "annex-f = (boolean) {true, false},"
  75  * "annex-i = (boolean) {true, false},"
  76  * "annex-j = (boolean) {true, false},"
  77  * "annex-l = (boolean) {true, false},"
  78  * "annex-t = (boolean) {true, false},"
  79  * "annex-v = (boolean) {true, false}")
  80  */
  81
  82
  83 static GstStaticPadTemplate gst_rtp_h263p_pay_src_template =
  84     GST_STATIC_PAD_TEMPLATE ("src",
  85     GST_PAD_SRC,
  86     GST_PAD_ALWAYS,
  87     GST_STATIC_CAPS ("application/x-rtp, "
  88         "media = (string) \"video\", "
  89         "payload = (int) " GST_RTP_PAYLOAD_DYNAMIC_STRING ", "
  90         "clock-rate = (int) 90000, " "encoding-name = (string) \"H263-1998\"; "
  91         "application/x-rtp, "
  92         "media = (string) \"video\", "
  93         "payload = (int) " GST_RTP_PAYLOAD_DYNAMIC_STRING ", "
  94         "clock-rate = (int) 90000, " "encoding-name = (string) \"H263-2000\"")
  95     );
  96
  97 static void gst_rtp_h263p_pay_finalize (GObject * object);
  98
  99 static void gst_rtp_h263p_pay_set_property (GObject * object, guint prop_id,
 100     const GValue * value, GParamSpec * pspec);
 101 static void gst_rtp_h263p_pay_get_property (GObject * object, guint prop_id,
 102     GValue * value, GParamSpec * pspec);
 103
 104 static gboolean gst_rtp_h263p_pay_setcaps (GstBaseRTPPayload * payload,
 105     GstCaps * caps);
 106 static GstCaps *gst_rtp_h263p_pay_sink_getcaps (GstBaseRTPPayload * payload,
 107     GstPad * pad);
 108 static GstFlowReturn gst_rtp_h263p_pay_handle_buffer (GstBaseRTPPayload *
 109     payload, GstBuffer * buffer);
 110
 111 GST_BOILERPLATE (GstRtpH263PPay, gst_rtp_h263p_pay, GstBaseRTPPayload,
 112     GST_TYPE_BASE_RTP_PAYLOAD);
 113
 114 static void
 115 gst_rtp_h263p_pay_base_init (gpointer klass)
 116 {
 117   GstElementClass *element_class = GST_ELEMENT_CLASS (klass);
 118
 119   gst_element_class_add_static_pad_template (element_class,
 120       &gst_rtp_h263p_pay_src_template);
 121   gst_element_class_add_static_pad_template (element_class,
 122       &gst_rtp_h263p_pay_sink_template);
 123
 124   gst_element_class_set_details_simple (element_class, "RTP H263 payloader",
 125       "Codec/Payloader/Network/RTP",
 126       "Payload-encodes H263/+/++ video in RTP packets (RFC 4629)",
 127       "Wim Taymans <wim.taymans@gmail.com>");
 128 }
 129
 130 static void
 131 gst_rtp_h263p_pay_class_init (GstRtpH263PPayClass * klass)
 132 {
 133   GObjectClass *gobject_class;
 134   GstBaseRTPPayloadClass *gstbasertppayload_class;
 135
 136   gobject_class = (GObjectClass *) klass;
 137   gstbasertppayload_class = (GstBaseRTPPayloadClass *) klass;
 138
 139   gobject_class->finalize = gst_rtp_h263p_pay_finalize;
 140   gobject_class->set_property = gst_rtp_h263p_pay_set_property;
 141   gobject_class->get_property = gst_rtp_h263p_pay_get_property;
 142
 143   gstbasertppayload_class->set_caps = gst_rtp_h263p_pay_setcaps;
 144   gstbasertppayload_class->get_caps = gst_rtp_h263p_pay_sink_getcaps;
 145   gstbasertppayload_class->handle_buffer = gst_rtp_h263p_pay_handle_buffer;
 146
 147   g_object_class_install_property (G_OBJECT_CLASS (klass),
 148       PROP_FRAGMENTATION_MODE, g_param_spec_enum ("fragmentation-mode",
 149           "Fragmentation Mode",
 150           "Packet Fragmentation Mode", GST_TYPE_FRAGMENTATION_MODE,
 151           DEFAULT_FRAGMENTATION_MODE,
 152           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 153
 154   GST_DEBUG_CATEGORY_INIT (rtph263ppay_debug, "rtph263ppay",
 155       0, "rtph263ppay (RFC 4629)");
 156 }
 157
 158 static void
 159 gst_rtp_h263p_pay_init (GstRtpH263PPay * rtph263ppay,
 160     GstRtpH263PPayClass * klass)
 161 {
 162   rtph263ppay->adapter = gst_adapter_new ();
 163
 164   rtph263ppay->fragmentation_mode = DEFAULT_FRAGMENTATION_MODE;
 165 }
 166
 167 static void
 168 gst_rtp_h263p_pay_finalize (GObject * object)
 169 {
 170   GstRtpH263PPay *rtph263ppay;
 171
 172   rtph263ppay = GST_RTP_H263P_PAY (object);
 173
 174   g_object_unref (rtph263ppay->adapter);
 175   rtph263ppay->adapter = NULL;
 176
 177   G_OBJECT_CLASS (parent_class)->finalize (object);
 178 }
 179
 180 static gboolean
 181 gst_rtp_h263p_pay_setcaps (GstBaseRTPPayload * payload, GstCaps * caps)
 182 {
 183   gboolean res;
 184   GstCaps *peercaps;
 185   gchar *encoding_name = NULL;
 186
 187   g_return_val_if_fail (gst_caps_is_fixed (caps), FALSE);
 188
 189   peercaps = gst_pad_peer_get_caps (GST_BASE_RTP_PAYLOAD_SRCPAD (payload));
 190   if (peercaps) {
 191     GstCaps *intersect = gst_caps_intersect (peercaps,
 192         gst_pad_get_pad_template_caps (GST_BASE_RTP_PAYLOAD_SRCPAD (payload)));
 193
 194     gst_caps_unref (peercaps);
 195     if (!gst_caps_is_empty (intersect)) {
 196       GstStructure *s = gst_caps_get_structure (intersect, 0);
 197       encoding_name = g_strdup (gst_structure_get_string (s, "encoding-name"));
 198     }
 199     gst_caps_unref (intersect);
 200   }
 201
 202   if (!encoding_name)
 203     encoding_name = g_strdup ("H263-1998");
 204
 205   gst_basertppayload_set_options (payload, "video", TRUE,
 206       (gchar *) encoding_name, 90000);
 207   res = gst_basertppayload_set_outcaps (payload, NULL);
 208   g_free (encoding_name);
 209
 210   return res;
 211 }
 212
 213 static void
 214 caps_append (GstCaps * caps, GstStructure * in_s, guint x, guint y, guint mpi)
 215 {
 216   GstStructure *s;
 217
 218   if (!in_s)
 219     return;
 220
 221   if (mpi < 1 || mpi > 32)
 222     return;
 223
 224   s = gst_structure_copy (in_s);
 225
 226   gst_structure_set (s,
 227       "width", GST_TYPE_INT_RANGE, 1, x,
 228       "height", GST_TYPE_INT_RANGE, 1, y,
 229       "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 30000, 1001 * mpi, NULL);
 230
 231   gst_caps_merge_structure (caps, s);
 232 }
 233
 234
 235 static GstCaps *
 236 gst_rtp_h263p_pay_sink_getcaps (GstBaseRTPPayload * payload, GstPad * pad)
 237 {
 238   GstRtpH263PPay *rtph263ppay;
 239   GstCaps *caps = NULL;
 240   GstCaps *peercaps = NULL;
 241   GstCaps *intersect = NULL;
 242   guint i;
 243
 244   rtph263ppay = GST_RTP_H263P_PAY (payload);
 245
 246   peercaps = gst_pad_peer_get_caps (GST_BASE_RTP_PAYLOAD_SRCPAD (payload));
 247   if (!peercaps)
 248     return
 249         gst_caps_copy (gst_pad_get_pad_template_caps
 250         (GST_BASE_RTP_PAYLOAD_SINKPAD (payload)));
 251
 252   intersect = gst_caps_intersect (peercaps,
 253       gst_pad_get_pad_template_caps (GST_BASE_RTP_PAYLOAD_SRCPAD (payload)));
 254   gst_caps_unref (peercaps);
 255
 256   if (gst_caps_is_empty (intersect))
 257     return intersect;
 258
 259   caps = gst_caps_new_empty ();
 260   for (i = 0; i < gst_caps_get_size (intersect); i++) {
 261     GstStructure *s = gst_caps_get_structure (intersect, i);
 262     const gchar *encoding_name = gst_structure_get_string (s, "encoding-name");
 263
 264     if (!strcmp (encoding_name, "H263-2000")) {
 265       const gchar *profile_str = gst_structure_get_string (s, "profile");
 266       const gchar *level_str = gst_structure_get_string (s, "level");
 267       int profile = 0;
 268       int level = 0;
 269
 270       if (profile_str && level_str) {
 271         gboolean i = FALSE, j = FALSE, l = FALSE, t = FALSE, f = FALSE,
 272             v = FALSE;
 273         GstStructure *new_s = gst_structure_new ("video/x-h263",
 274             "variant", G_TYPE_STRING, "itu",
 275             NULL);
 276
 277         profile = atoi (profile_str);
 278         level = atoi (level_str);
 279
 280         /* These profiles are defined in the H.263 Annex X */
 281         switch (profile) {
 282           case 0:
 283             /* The Baseline Profile (Profile 0) */
 284             break;
 285           case 1:
 286             /* H.320 Coding Efficiency Version 2 Backward-Compatibility Profile
 287              * (Profile 1)
 288              * Baseline + Annexes I, J, L.4 and T
 289              */
 290             i = j = l = t = TRUE;
 291             break;
 292           case 2:
 293             /* Version 1 Backward-Compatibility Profile (Profile 2)
 294              * Baseline + Annex F
 295              */
 296             i = j = l = t = f = TRUE;
 297             break;
 298           case 3:
 299             /* Version 2 Interactive and Streaming Wireless Profile
 300              * Baseline + Annexes I, J, T
 301              */
 302             i = j = t = TRUE;
 303             break;
 304           case 4:
 305             /* Version 3 Interactive and Streaming Wireless Profile (Profile 4)
 306              * Baseline + Annexes I, J, T, V, W.6.3.8,
 307              */
 308             /* Missing W.6.3.8 */
 309             i = j = t = v = TRUE;
 310             break;
 311           case 5:
 312             /* Conversational High Compression Profile (Profile 5)
 313              * Baseline + Annexes F, I, J, L.4, T, D, U
 314              */
 315             /* Missing D, U */
 316             f = i = j = l = t = TRUE;
 317             break;
 318           case 6:
 319             /* Conversational Internet Profile (Profile 6)
 320              * Baseline + Annexes F, I, J, L.4, T, D, U and
 321              * K with arbitratry slice ordering
 322              */
 323             /* Missing D, U, K with arbitratry slice ordering */
 324             f = i = j = l = t = TRUE;
 325             break;
 326           case 7:
 327             /* Conversational Interlace Profile (Profile 7)
 328              * Baseline + Annexes F, I, J, L.4, T, D, U,  W.6.3.11
 329              */
 330             /* Missing D, U, W.6.3.11 */
 331             f = i = j = l = t = TRUE;
 332             break;
 333           case 8:
 334             /* High Latency Profile (Profile 8)
 335              * Baseline + Annexes F, I, J, L.4, T, D, U, P.5, O.1.1 and
 336              * K with arbitratry slice ordering
 337              */
 338             /* Missing D, U, P.5, O.1.1 */
 339             f = i = j = l = t = TRUE;
 340             break;
 341         }
 342
 343
 344         if (f || i || j || t || l || v) {
 345           GValue list = { 0 };
 346           GValue vstr = { 0 };
 347
 348           g_value_init (&list, GST_TYPE_LIST);
 349           g_value_init (&vstr, G_TYPE_STRING);
 350
 351           g_value_set_static_string (&vstr, "h263");
 352           gst_value_list_append_value (&list, &vstr);
 353           g_value_set_static_string (&vstr, "h263p");
 354           gst_value_list_append_value (&list, &vstr);
 355
 356           if (l || v) {
 357             g_value_set_static_string (&vstr, "h263pp");
 358             gst_value_list_append_value (&list, &vstr);
 359           }
 360           g_value_unset (&vstr);
 361
 362           gst_structure_set_value (new_s, "h263version", &list);
 363           g_value_unset (&list);
 364         } else {
 365           gst_structure_set (new_s, "h263version", G_TYPE_STRING, "h263", NULL);
 366         }
 367
 368
 369         if (!f)
 370           gst_structure_set (new_s, "annex-f", G_TYPE_BOOLEAN, FALSE, NULL);
 371         if (!i)
 372           gst_structure_set (new_s, "annex-i", G_TYPE_BOOLEAN, FALSE, NULL);
 373         if (!j)
 374           gst_structure_set (new_s, "annex-j", G_TYPE_BOOLEAN, FALSE, NULL);
 375         if (!t)
 376           gst_structure_set (new_s, "annex-t", G_TYPE_BOOLEAN, FALSE, NULL);
 377         if (!l)
 378           gst_structure_set (new_s, "annex-l", G_TYPE_BOOLEAN, FALSE, NULL);
 379         if (!v)
 380           gst_structure_set (new_s, "annex-v", G_TYPE_BOOLEAN, FALSE, NULL);
 381
 382
 383         if (level <= 10 || level == 45) {
 384           gst_structure_set (new_s,
 385               "width", GST_TYPE_INT_RANGE, 1, 176,
 386               "height", GST_TYPE_INT_RANGE, 1, 144,
 387               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 30000, 2002, NULL);
 388           gst_caps_merge_structure (caps, new_s);
 389         } else if (level <= 20) {
 390           GstStructure *s_copy = gst_structure_copy (new_s);
 391
 392           gst_structure_set (new_s,
 393               "width", GST_TYPE_INT_RANGE, 1, 352,
 394               "height", GST_TYPE_INT_RANGE, 1, 288,
 395               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 30000, 2002, NULL);
 396           gst_caps_merge_structure (caps, new_s);
 397
 398           gst_structure_set (s_copy,
 399               "width", GST_TYPE_INT_RANGE, 1, 176,
 400               "height", GST_TYPE_INT_RANGE, 1, 144,
 401               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 30000, 1001, NULL);
 402           gst_caps_merge_structure (caps, s_copy);
 403         } else if (level <= 40) {
 404
 405           gst_structure_set (new_s,
 406               "width", GST_TYPE_INT_RANGE, 1, 352,
 407               "height", GST_TYPE_INT_RANGE, 1, 288,
 408               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 30000, 1001, NULL);
 409           gst_caps_merge_structure (caps, new_s);
 410         } else if (level <= 50) {
 411           GstStructure *s_copy = gst_structure_copy (new_s);
 412
 413           gst_structure_set (new_s,
 414               "width", GST_TYPE_INT_RANGE, 1, 352,
 415               "height", GST_TYPE_INT_RANGE, 1, 288,
 416               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 50, 1, NULL);
 417           gst_caps_merge_structure (caps, new_s);
 418
 419           gst_structure_set (s_copy,
 420               "width", GST_TYPE_INT_RANGE, 1, 352,
 421               "height", GST_TYPE_INT_RANGE, 1, 240,
 422               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 60000, 1001, NULL);
 423           gst_caps_merge_structure (caps, s_copy);
 424         } else if (level <= 60) {
 425           GstStructure *s_copy = gst_structure_copy (new_s);
 426
 427           gst_structure_set (new_s,
 428               "width", GST_TYPE_INT_RANGE, 1, 720,
 429               "height", GST_TYPE_INT_RANGE, 1, 288,
 430               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 50, 1, NULL);
 431           gst_caps_merge_structure (caps, new_s);
 432
 433           gst_structure_set (s_copy,
 434               "width", GST_TYPE_INT_RANGE, 1, 720,
 435               "height", GST_TYPE_INT_RANGE, 1, 240,
 436               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 60000, 1001, NULL);
 437           gst_caps_merge_structure (caps, s_copy);
 438         } else if (level <= 70) {
 439           GstStructure *s_copy = gst_structure_copy (new_s);
 440
 441           gst_structure_set (new_s,
 442               "width", GST_TYPE_INT_RANGE, 1, 720,
 443               "height", GST_TYPE_INT_RANGE, 1, 576,
 444               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 50, 1, NULL);
 445           gst_caps_merge_structure (caps, new_s);
 446
 447           gst_structure_set (s_copy,
 448               "width", GST_TYPE_INT_RANGE, 1, 720,
 449               "height", GST_TYPE_INT_RANGE, 1, 480,
 450               "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, 60000, 1001, NULL);
 451           gst_caps_merge_structure (caps, s_copy);
 452         } else {
 453           gst_caps_merge_structure (caps, new_s);
 454         }
 455
 456       } else {
 457         GstStructure *new_s = gst_structure_new ("video/x-h263",
 458             "variant", G_TYPE_STRING, "itu",
 459             "h263version", G_TYPE_STRING, "h263",
 460             NULL);
 461
 462         GST_DEBUG_OBJECT (rtph263ppay, "No profile or level specified"
 463             " for H263-2000, defaulting to baseline H263");
 464
 465         gst_caps_merge_structure (caps, new_s);
 466       }
 467     } else {
 468       gboolean f = FALSE, i = FALSE, j = FALSE, t = FALSE;
 469       /* FIXME: ffmpeg support the Appendix K too, how do we express it ?
 470        *   guint k;
 471        */
 472       const gchar *str;
 473       GstStructure *new_s = gst_structure_new ("video/x-h263",
 474           "variant", G_TYPE_STRING, "itu",
 475           NULL);
 476       gboolean added = FALSE;
 477
 478       str = gst_structure_get_string (s, "f");
 479       if (str && !strcmp (str, "1"))
 480         f = TRUE;
 481
 482       str = gst_structure_get_string (s, "i");
 483       if (str && !strcmp (str, "1"))
 484         i = TRUE;
 485
 486       str = gst_structure_get_string (s, "j");
 487       if (str && !strcmp (str, "1"))
 488         j = TRUE;
 489
 490       str = gst_structure_get_string (s, "t");
 491       if (str && !strcmp (str, "1"))
 492         t = TRUE;
 493
 494       if (f || i || j || t) {
 495         GValue list = { 0 };
 496         GValue vstr = { 0 };
 497
 498         g_value_init (&list, GST_TYPE_LIST);
 499         g_value_init (&vstr, G_TYPE_STRING);
 500
 501         g_value_set_static_string (&vstr, "h263");
 502         gst_value_list_append_value (&list, &vstr);
 503         g_value_set_static_string (&vstr, "h263p");
 504         gst_value_list_append_value (&list, &vstr);
 505         g_value_unset (&vstr);
 506
 507         gst_structure_set_value (new_s, "h263version", &list);
 508         g_value_unset (&list);
 509       } else {
 510         gst_structure_set (new_s, "h263version", G_TYPE_STRING, "h263", NULL);
 511       }
 512
 513       if (!f)
 514         gst_structure_set (new_s, "annex-f", G_TYPE_BOOLEAN, FALSE, NULL);
 515       if (!i)
 516         gst_structure_set (new_s, "annex-i", G_TYPE_BOOLEAN, FALSE, NULL);
 517       if (!j)
 518         gst_structure_set (new_s, "annex-j", G_TYPE_BOOLEAN, FALSE, NULL);
 519       if (!t)
 520         gst_structure_set (new_s, "annex-t", G_TYPE_BOOLEAN, FALSE, NULL);
 521
 522
 523       str = gst_structure_get_string (s, "custom");
 524       if (str) {
 525         unsigned int xmax, ymax, mpi;
 526         if (sscanf (str, "%u,%u,%u", &xmax, &ymax, &mpi) == 3) {
 527           if (xmax % 4 && ymax % 4 && mpi >= 1 && mpi <= 32) {
 528             caps_append (caps, new_s, xmax, ymax, mpi);
 529             added = TRUE;
 530           } else {
 531             GST_WARNING_OBJECT (rtph263ppay, "Invalid custom framesize/MPI"
 532                 " %u x %u at %u, ignoring", xmax, ymax, mpi);
 533           }
 534         } else {
 535           GST_WARNING_OBJECT (rtph263ppay, "Invalid custom framesize/MPI: %s,"
 536               " ignoring", str);
 537         }
 538       }
 539
 540       str = gst_structure_get_string (s, "16cif");
 541       if (str) {
 542         int mpi = atoi (str);
 543         caps_append (caps, new_s, 1408, 1152, mpi);
 544         added = TRUE;
 545       }
 546
 547       str = gst_structure_get_string (s, "4cif");
 548       if (str) {
 549         int mpi = atoi (str);
 550         caps_append (caps, new_s, 704, 576, mpi);
 551         added = TRUE;
 552       }
 553
 554       str = gst_structure_get_string (s, "cif");
 555       if (str) {
 556         int mpi = atoi (str);
 557         caps_append (caps, new_s, 352, 288, mpi);
 558         added = TRUE;
 559       }
 560
 561       str = gst_structure_get_string (s, "qcif");
 562       if (str) {
 563         int mpi = atoi (str);
 564         caps_append (caps, new_s, 176, 144, mpi);
 565         added = TRUE;
 566       }
 567
 568       str = gst_structure_get_string (s, "sqcif");
 569       if (str) {
 570         int mpi = atoi (str);
 571         caps_append (caps, new_s, 128, 96, mpi);
 572         added = TRUE;
 573       }
 574
 575       if (added)
 576         gst_structure_free (new_s);
 577       else
 578         gst_caps_merge_structure (caps, new_s);
 579     }
 580   }
 581
 582   gst_caps_unref (intersect);
 583
 584   return caps;
 585 }
 586
 587
 588 static void
 589 gst_rtp_h263p_pay_set_property (GObject * object, guint prop_id,
 590     const GValue * value, GParamSpec * pspec)
 591 {
 592   GstRtpH263PPay *rtph263ppay;
 593
 594   rtph263ppay = GST_RTP_H263P_PAY (object);
 595
 596   switch (prop_id) {
 597     case PROP_FRAGMENTATION_MODE:
 598       rtph263ppay->fragmentation_mode = g_value_get_enum (value);
 599       break;
 600     default:
 601       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 602       break;
 603   }
 604 }
 605
 606 static void
 607 gst_rtp_h263p_pay_get_property (GObject * object, guint prop_id,
 608     GValue * value, GParamSpec * pspec)
 609 {
 610   GstRtpH263PPay *rtph263ppay;
 611
 612   rtph263ppay = GST_RTP_H263P_PAY (object);
 613
 614   switch (prop_id) {
 615     case PROP_FRAGMENTATION_MODE:
 616       g_value_set_enum (value, rtph263ppay->fragmentation_mode);
 617       break;
 618     default:
 619       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 620       break;
 621   }
 622 }
 623
 624 static GstFlowReturn
 625 gst_rtp_h263p_pay_flush (GstRtpH263PPay * rtph263ppay)
 626 {
 627   guint avail;
 628   GstBuffer *outbuf;
 629   GstFlowReturn ret;
 630   gboolean fragmented;
 631
 632   avail = gst_adapter_available (rtph263ppay->adapter);
 633   if (avail == 0)
 634     return GST_FLOW_OK;
 635
 636   fragmented = FALSE;
 637   /* This algorithm assumes the H263/+/++ encoder sends complete frames in each
 638    * buffer */
 639   /* With Fragmentation Mode at GST_FRAGMENTATION_MODE_NORMAL:
 640    *  This algorithm implements the Follow-on packets method for packetization.
 641    *  This assumes low packet loss network.
 642    * With Fragmentation Mode at GST_FRAGMENTATION_MODE_SYNC:
 643    *  This algorithm separates large frames at synchronisation points (Segments)
 644    *  (See RFC 4629 section 6). It would be interesting to have a property such as network
 645    *  quality to select between both packetization methods */
 646   /* TODO Add VRC supprt (See RFC 4629 section 5.2) */
 647
 648   while (avail > 0) {
 649     guint towrite;
 650     guint8 *payload;
 651     guint payload_len;
 652     gint header_len;
 653     guint next_gop = 0;
 654     gboolean found_gob = FALSE;
 655
 656     if (rtph263ppay->fragmentation_mode == GST_FRAGMENTATION_MODE_SYNC) {
 657       /* start after 1st gop possible */
 658       guint parsed_len = 3;
 659       const guint8 *parse_data = NULL;
 660
 661       parse_data = gst_adapter_peek (rtph263ppay->adapter, avail);
 662
 663       /* Check if we have a gob or eos , eossbs */
 664       /* FIXME EOS and EOSSBS packets should never contain any gobs and vice-versa */
 665       if (avail >= 3 && *parse_data == 0 && *(parse_data + 1) == 0
 666           && *(parse_data + 2) >= 0x80) {
 667         GST_DEBUG_OBJECT (rtph263ppay, " Found GOB header");
 668         found_gob = TRUE;
 669       }
 670       /* Find next and cut the packet accordingly */
 671       /* TODO we should get as many gobs as possible until MTU is reached, this
 672        * code seems to just get one GOB per packet */
 673       while (parsed_len + 2 < avail) {
 674         if (parse_data[parsed_len] == 0 && parse_data[parsed_len + 1] == 0
 675             && parse_data[parsed_len + 2] >= 0x80) {
 676           next_gop = parsed_len;
 677           GST_DEBUG_OBJECT (rtph263ppay, " Next GOB Detected at :  %d",
 678               next_gop);
 679           break;
 680         }
 681         parsed_len++;
 682       }
 683     }
 684
 685     /* for picture start frames (non-fragmented), we need to remove the first
 686      * two 0x00 bytes and set P=1 */
 687     header_len = (fragmented && !found_gob) ? 2 : 0;
 688
 689     towrite = MIN (avail, gst_rtp_buffer_calc_payload_len
 690         (GST_BASE_RTP_PAYLOAD_MTU (rtph263ppay) - header_len, 0, 0));
 691
 692     if (next_gop > 0)
 693       towrite = MIN (next_gop, towrite);
 694
 695     payload_len = header_len + towrite;
 696
 697     outbuf = gst_rtp_buffer_new_allocate (payload_len, 0, 0);
 698     /* last fragment gets the marker bit set */
 699     gst_rtp_buffer_set_marker (outbuf, avail > towrite ? 0 : 1);
 700
 701     payload = gst_rtp_buffer_get_payload (outbuf);
 702
 703     gst_adapter_copy (rtph263ppay->adapter, &payload[header_len], 0, towrite);
 704
 705     /*  0                   1
 706      *  0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5
 707      * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 708      * |   RR    |P|V|   PLEN    |PEBIT|
 709      * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
 710      */
 711     /* if fragmented or gop header , write p bit =1 */
 712     payload[0] = (fragmented && !found_gob) ? 0x00 : 0x04;
 713     payload[1] = 0;
 714
 715     GST_BUFFER_TIMESTAMP (outbuf) = rtph263ppay->first_timestamp;
 716     GST_BUFFER_DURATION (outbuf) = rtph263ppay->first_duration;
 717
 718     gst_adapter_flush (rtph263ppay->adapter, towrite);
 719
 720     ret = gst_basertppayload_push (GST_BASE_RTP_PAYLOAD (rtph263ppay), outbuf);
 721
 722     avail -= towrite;
 723     fragmented = TRUE;
 724   }
 725
 726   return ret;
 727 }
 728
 729 static GstFlowReturn
 730 gst_rtp_h263p_pay_handle_buffer (GstBaseRTPPayload * payload,
 731     GstBuffer * buffer)
 732 {
 733   GstRtpH263PPay *rtph263ppay;
 734   GstFlowReturn ret;
 735
 736   rtph263ppay = GST_RTP_H263P_PAY (payload);
 737
 738   rtph263ppay->first_timestamp = GST_BUFFER_TIMESTAMP (buffer);
 739   rtph263ppay->first_duration = GST_BUFFER_DURATION (buffer);
 740
 741   /* we always encode and flush a full picture */
 742   gst_adapter_push (rtph263ppay->adapter, buffer);
 743   ret = gst_rtp_h263p_pay_flush (rtph263ppay);
 744
 745   return ret;
 746 }
 747
 748 gboolean
 749 gst_rtp_h263p_pay_plugin_init (GstPlugin * plugin)
 750 {
 751   return gst_element_register (plugin, "rtph263ppay",
 752       GST_RANK_SECONDARY, GST_TYPE_RTP_H263P_PAY);
 753 }