gsth264parse.c 61.7 KB
Newer Older
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1
/* GStreamer H.264 Parser
2
 * Copyright (C) <2010> Collabora ltd
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
3
 * Copyright (C) <2010> Nokia Corporation
4 5 6 7
 * Copyright (C) <2011> Intel Corporation
 *
 * Copyright (C) <2010> Mark Nauwelaerts <mark.nauwelaerts@collabora.co.uk>
 * Copyright (C) <2011> Thibault Saunier <thibault.saunier@collabora.com>
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
 *
 * 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., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

#ifdef HAVE_CONFIG_H
#  include "config.h"
#endif

#include <gst/base/gstbytereader.h>
#include <gst/base/gstbytewriter.h>
31
#include <gst/base/gstadapter.h>
32
#include <gst/video/video.h>
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65
#include "gsth264parse.h"

#include <string.h>

GST_DEBUG_CATEGORY (h264_parse_debug);
#define GST_CAT_DEFAULT h264_parse_debug

#define DEFAULT_CONFIG_INTERVAL      (0)

enum
{
  PROP_0,
  PROP_CONFIG_INTERVAL,
  PROP_LAST
};

enum
{
  GST_H264_PARSE_FORMAT_NONE,
  GST_H264_PARSE_FORMAT_AVC,
  GST_H264_PARSE_FORMAT_BYTE
};

enum
{
  GST_H264_PARSE_ALIGN_NONE = 0,
  GST_H264_PARSE_ALIGN_NAL,
  GST_H264_PARSE_ALIGN_AU
};

static GstStaticPadTemplate sinktemplate = GST_STATIC_PAD_TEMPLATE ("sink",
    GST_PAD_SINK,
    GST_PAD_ALWAYS,
66
    GST_STATIC_CAPS ("video/x-h264"));
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
67 68 69 70

static GstStaticPadTemplate srctemplate = GST_STATIC_PAD_TEMPLATE ("src",
    GST_PAD_SRC,
    GST_PAD_ALWAYS,
71 72 73
    GST_STATIC_CAPS ("video/x-h264, parsed = (boolean) true, "
        "stream-format=(string) { avc, byte-stream }, "
        "alignment=(string) { au, nal }"));
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
74

René Stadler's avatar
René Stadler committed
75 76
#define parent_class gst_h264_parse_parent_class
G_DEFINE_TYPE (GstH264Parse, gst_h264_parse, GST_TYPE_BASE_PARSE);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
77 78 79 80 81

static void gst_h264_parse_finalize (GObject * object);

static gboolean gst_h264_parse_start (GstBaseParse * parse);
static gboolean gst_h264_parse_stop (GstBaseParse * parse);
82 83
static GstFlowReturn gst_h264_parse_handle_frame (GstBaseParse * parse,
    GstBaseParseFrame * frame, gint * skipsize);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
84 85 86 87 88 89 90 91 92 93 94
static GstFlowReturn gst_h264_parse_parse_frame (GstBaseParse * parse,
    GstBaseParseFrame * frame);
static GstFlowReturn gst_h264_parse_pre_push_frame (GstBaseParse * parse,
    GstBaseParseFrame * frame);

static void gst_h264_parse_set_property (GObject * object, guint prop_id,
    const GValue * value, GParamSpec * pspec);
static void gst_h264_parse_get_property (GObject * object, guint prop_id,
    GValue * value, GParamSpec * pspec);

static gboolean gst_h264_parse_set_caps (GstBaseParse * parse, GstCaps * caps);
René Stadler's avatar
René Stadler committed
95 96
static GstCaps *gst_h264_parse_get_caps (GstBaseParse * parse,
    GstCaps * filter);
97 98 99
static gboolean gst_h264_parse_event (GstBaseParse * parse, GstEvent * event);
static gboolean gst_h264_parse_src_event (GstBaseParse * parse,
    GstEvent * event);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
100 101 102 103 104 105

static void
gst_h264_parse_class_init (GstH264ParseClass * klass)
{
  GObjectClass *gobject_class = (GObjectClass *) klass;
  GstBaseParseClass *parse_class = GST_BASE_PARSE_CLASS (klass);
René Stadler's avatar
René Stadler committed
106 107 108
  GstElementClass *gstelement_class = GST_ELEMENT_CLASS (klass);

  GST_DEBUG_CATEGORY_INIT (h264_parse_debug, "h264parse", 0, "h264 parser");
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124

  gobject_class->finalize = gst_h264_parse_finalize;
  gobject_class->set_property = gst_h264_parse_set_property;
  gobject_class->get_property = gst_h264_parse_get_property;

  g_object_class_install_property (gobject_class, PROP_CONFIG_INTERVAL,
      g_param_spec_uint ("config-interval",
          "SPS PPS Send Interval",
          "Send SPS and PPS Insertion Interval in seconds (sprop parameter sets "
          "will be multiplexed in the data stream when detected.) (0 = disabled)",
          0, 3600, DEFAULT_CONFIG_INTERVAL,
          G_PARAM_READWRITE | G_PARAM_CONSTRUCT | G_PARAM_STATIC_STRINGS));

  /* Override BaseParse vfuncs */
  parse_class->start = GST_DEBUG_FUNCPTR (gst_h264_parse_start);
  parse_class->stop = GST_DEBUG_FUNCPTR (gst_h264_parse_stop);
125
  parse_class->handle_frame = GST_DEBUG_FUNCPTR (gst_h264_parse_handle_frame);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
126 127 128
  parse_class->pre_push_frame =
      GST_DEBUG_FUNCPTR (gst_h264_parse_pre_push_frame);
  parse_class->set_sink_caps = GST_DEBUG_FUNCPTR (gst_h264_parse_set_caps);
129
  parse_class->get_sink_caps = GST_DEBUG_FUNCPTR (gst_h264_parse_get_caps);
130
  parse_class->sink_event = GST_DEBUG_FUNCPTR (gst_h264_parse_event);
131
  parse_class->src_event = GST_DEBUG_FUNCPTR (gst_h264_parse_src_event);
René Stadler's avatar
René Stadler committed
132 133 134 135 136 137 138 139 140 141

  gst_element_class_add_pad_template (gstelement_class,
      gst_static_pad_template_get (&srctemplate));
  gst_element_class_add_pad_template (gstelement_class,
      gst_static_pad_template_get (&sinktemplate));

  gst_element_class_set_details_simple (gstelement_class, "H.264 parser",
      "Codec/Parser/Converter/Video",
      "Parses H.264 streams",
      "Mark Nauwelaerts <mark.nauwelaerts@collabora.co.uk>");
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
142 143 144
}

static void
René Stadler's avatar
René Stadler committed
145
gst_h264_parse_init (GstH264Parse * h264parse)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
146 147
{
  h264parse->frame_out = gst_adapter_new ();
148
  gst_base_parse_set_pts_interpolation (GST_BASE_PARSE (h264parse), FALSE);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
149 150 151 152 153 154 155 156 157
}


static void
gst_h264_parse_finalize (GObject * object)
{
  GstH264Parse *h264parse = GST_H264_PARSE (object);

  g_object_unref (h264parse->frame_out);
158 159

  G_OBJECT_CLASS (parent_class)->finalize (object);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
160 161 162 163 164
}

static void
gst_h264_parse_reset_frame (GstH264Parse * h264parse)
{
165 166
  GST_DEBUG_OBJECT (h264parse, "reset frame");

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
167
  /* done parsing; reset state */
168
  h264parse->current_off = -1;
169

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
170 171 172
  h264parse->picture_start = FALSE;
  h264parse->update_caps = FALSE;
  h264parse->idr_pos = -1;
173
  h264parse->sei_pos = -1;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
174 175
  h264parse->keyframe = FALSE;
  h264parse->frame_start = FALSE;
176
  gst_adapter_clear (h264parse->frame_out);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
177 178 179 180 181 182 183 184 185
}

static void
gst_h264_parse_reset (GstH264Parse * h264parse)
{
  h264parse->width = 0;
  h264parse->height = 0;
  h264parse->fps_num = 0;
  h264parse->fps_den = 0;
186
  h264parse->aspect_ratio_idc = 0;
187 188
  h264parse->sar_width = 0;
  h264parse->sar_height = 0;
189 190
  h264parse->upstream_par_n = -1;
  h264parse->upstream_par_d = -1;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
191 192 193
  gst_buffer_replace (&h264parse->codec_data, NULL);
  h264parse->nal_length_size = 4;
  h264parse->packetized = FALSE;
194
  h264parse->transform = FALSE;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
195 196 197 198 199 200

  h264parse->align = GST_H264_PARSE_ALIGN_NONE;
  h264parse->format = GST_H264_PARSE_FORMAT_NONE;

  h264parse->last_report = GST_CLOCK_TIME_NONE;
  h264parse->push_codec = FALSE;
201 202
  h264parse->have_pps = FALSE;
  h264parse->have_sps = FALSE;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
203

204 205 206 207
  h264parse->dts = GST_CLOCK_TIME_NONE;
  h264parse->ts_trn_nb = GST_CLOCK_TIME_NONE;
  h264parse->do_ts = TRUE;

208 209
  h264parse->pending_key_unit_ts = GST_CLOCK_TIME_NONE;
  h264parse->force_key_unit_event = NULL;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
210 211 212 213 214 215 216 217 218

  gst_h264_parse_reset_frame (h264parse);
}

static gboolean
gst_h264_parse_start (GstBaseParse * parse)
{
  GstH264Parse *h264parse = GST_H264_PARSE (parse);

219
  GST_DEBUG_OBJECT (parse, "start");
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
220 221
  gst_h264_parse_reset (h264parse);

222 223 224 225 226 227 228
  h264parse->nalparser = gst_h264_nal_parser_new ();

  h264parse->dts = GST_CLOCK_TIME_NONE;
  h264parse->ts_trn_nb = GST_CLOCK_TIME_NONE;
  h264parse->sei_pic_struct_pres_flag = FALSE;
  h264parse->sei_pic_struct = 0;
  h264parse->field_pic_flag = 0;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
229

230
  gst_base_parse_set_min_frame_size (parse, 6);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
231 232 233 234 235 236 237

  return TRUE;
}

static gboolean
gst_h264_parse_stop (GstBaseParse * parse)
{
238
  guint i;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
239 240
  GstH264Parse *h264parse = GST_H264_PARSE (parse);

241
  GST_DEBUG_OBJECT (parse, "stop");
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
242 243
  gst_h264_parse_reset (h264parse);

244 245 246 247 248
  for (i = 0; i < GST_H264_MAX_SPS_COUNT; i++)
    gst_buffer_replace (&h264parse->sps_nals[i], NULL);
  for (i = 0; i < GST_H264_MAX_PPS_COUNT; i++)
    gst_buffer_replace (&h264parse->pps_nals[i], NULL);

249
  gst_h264_nal_parser_free (h264parse->nalparser);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278

  return TRUE;
}

static const gchar *
gst_h264_parse_get_string (GstH264Parse * parse, gboolean format, gint code)
{
  if (format) {
    switch (code) {
      case GST_H264_PARSE_FORMAT_AVC:
        return "avc";
      case GST_H264_PARSE_FORMAT_BYTE:
        return "byte-stream";
      default:
        return "none";
    }
  } else {
    switch (code) {
      case GST_H264_PARSE_ALIGN_NAL:
        return "nal";
      case GST_H264_PARSE_ALIGN_AU:
        return "au";
      default:
        return "none";
    }
  }
}

static void
279
gst_h264_parse_format_from_caps (GstCaps * caps, guint * format, guint * align)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
280
{
281 282 283
  g_return_if_fail (gst_caps_is_fixed (caps));

  GST_DEBUG ("parsing caps: %" GST_PTR_FORMAT, caps);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
284

285 286 287 288 289
  if (format)
    *format = GST_H264_PARSE_FORMAT_NONE;

  if (align)
    *align = GST_H264_PARSE_ALIGN_NONE;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
290 291 292 293 294

  if (caps && gst_caps_get_size (caps) > 0) {
    GstStructure *s = gst_caps_get_structure (caps, 0);
    const gchar *str = NULL;

295 296 297 298 299 300
    if (format) {
      if ((str = gst_structure_get_string (s, "stream-format"))) {
        if (strcmp (str, "avc") == 0)
          *format = GST_H264_PARSE_FORMAT_AVC;
        else if (strcmp (str, "byte-stream") == 0)
          *format = GST_H264_PARSE_FORMAT_BYTE;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
301 302 303
      }
    }

304 305 306 307 308 309
    if (align) {
      if ((str = gst_structure_get_string (s, "alignment"))) {
        if (strcmp (str, "au") == 0)
          *align = GST_H264_PARSE_ALIGN_AU;
        else if (strcmp (str, "nal") == 0)
          *align = GST_H264_PARSE_ALIGN_NAL;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
310 311 312
      }
    }
  }
313 314 315 316
}

/* check downstream caps to configure format and alignment */
static void
317 318
gst_h264_parse_negotiate (GstH264Parse * h264parse, gint in_format,
    GstCaps * in_caps)
319 320 321 322 323
{
  GstCaps *caps;
  guint format = GST_H264_PARSE_FORMAT_NONE;
  guint align = GST_H264_PARSE_ALIGN_NONE;

324 325
  g_return_if_fail ((in_caps == NULL) || gst_caps_is_fixed (in_caps));

326 327 328
  caps = gst_pad_get_allowed_caps (GST_BASE_PARSE_SRC_PAD (h264parse));
  GST_DEBUG_OBJECT (h264parse, "allowed caps: %" GST_PTR_FORMAT, caps);

329 330 331
  /* concentrate on leading structure, since decodebin2 parser
   * capsfilter always includes parser template caps */
  if (caps) {
Wim Taymans's avatar
Wim Taymans committed
332
    caps = gst_caps_truncate (caps);
333 334 335 336
    GST_DEBUG_OBJECT (h264parse, "negotiating with caps: %" GST_PTR_FORMAT,
        caps);
  }

337 338 339 340 341 342 343 344
  if (in_caps && caps) {
    if (gst_caps_can_intersect (in_caps, caps)) {
      GST_DEBUG_OBJECT (h264parse, "downstream accepts upstream caps");
      gst_h264_parse_format_from_caps (in_caps, &format, &align);
      gst_caps_unref (caps);
      caps = NULL;
    }
  }
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
345

346
  if (caps) {
347
    /* fixate to avoid ambiguity with lists when parsing */
Wim Taymans's avatar
Wim Taymans committed
348
    caps = gst_caps_fixate (caps);
349
    gst_h264_parse_format_from_caps (caps, &format, &align);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
350
    gst_caps_unref (caps);
351
  }
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
352 353 354 355 356 357 358 359 360 361 362 363 364

  /* default */
  if (!format)
    format = GST_H264_PARSE_FORMAT_BYTE;
  if (!align)
    align = GST_H264_PARSE_ALIGN_AU;

  GST_DEBUG_OBJECT (h264parse, "selected format %s, alignment %s",
      gst_h264_parse_get_string (h264parse, TRUE, format),
      gst_h264_parse_get_string (h264parse, FALSE, align));

  h264parse->format = format;
  h264parse->align = align;
365 366

  h264parse->transform = (in_format != h264parse->format);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
367 368 369 370 371 372 373
}

static GstBuffer *
gst_h264_parse_wrap_nal (GstH264Parse * h264parse, guint format, guint8 * data,
    guint size)
{
  GstBuffer *buf;
374
  guint nl = h264parse->nal_length_size;
René Stadler's avatar
René Stadler committed
375
  guint32 tmp;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
376

377
  GST_DEBUG_OBJECT (h264parse, "nal length %d", size);
378

379
  buf = gst_buffer_new_allocate (NULL, 4 + size, NULL);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
380
  if (format == GST_H264_PARSE_FORMAT_AVC) {
René Stadler's avatar
René Stadler committed
381
    tmp = GUINT32_TO_BE (size << (32 - 8 * nl));
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
382
  } else {
383 384 385 386
    /* HACK: nl should always be 4 here, otherwise this won't work. 
     * There are legit cases where nl in avc stream is 2, but byte-stream
     * SC is still always 4 bytes. */
    nl = 4;
René Stadler's avatar
René Stadler committed
387
    tmp = GUINT32_TO_BE (1);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
388 389
  }

René Stadler's avatar
René Stadler committed
390 391
  gst_buffer_fill (buf, 0, &tmp, sizeof (guint32));
  gst_buffer_fill (buf, nl, data, size);
392
  gst_buffer_set_size (buf, size + nl);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
393 394 395 396

  return buf;
}

397 398 399 400 401 402 403 404 405 406
static void
gst_h264_parser_store_nal (GstH264Parse * h264parse, guint id,
    GstH264NalUnitType naltype, GstH264NalUnit * nalu)
{
  GstBuffer *buf, **store;
  guint size = nalu->size, store_size;

  if (naltype == GST_H264_NAL_SPS) {
    store_size = GST_H264_MAX_SPS_COUNT;
    store = h264parse->sps_nals;
407
    GST_DEBUG_OBJECT (h264parse, "storing sps %u", id);
408 409 410
  } else if (naltype == GST_H264_NAL_PPS) {
    store_size = GST_H264_MAX_PPS_COUNT;
    store = h264parse->pps_nals;
411
    GST_DEBUG_OBJECT (h264parse, "storing pps %u", id);
412 413 414 415 416 417 418 419
  } else
    return;

  if (id >= store_size) {
    GST_DEBUG_OBJECT (h264parse, "unable to store nal, id out-of-range %d", id);
    return;
  }

Wim Taymans's avatar
Wim Taymans committed
420
  buf = gst_buffer_new_allocate (NULL, size, NULL);
René Stadler's avatar
René Stadler committed
421
  gst_buffer_fill (buf, 0, nalu->data + nalu->offset, size);
422 423 424 425 426 427 428

  if (store[id])
    gst_buffer_unref (store[id]);

  store[id] = buf;
}

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
429 430 431 432 433 434
/* SPS/PPS/IDR considered key, all others DELTA;
 * so downstream waiting for keyframe can pick up at SPS/PPS/IDR */
#define NAL_TYPE_IS_KEY(nt) (((nt) == 5) || ((nt) == 7) || ((nt) == 8))

/* caller guarantees 2 bytes of nal payload */
static void
435
gst_h264_parse_process_nal (GstH264Parse * h264parse, GstH264NalUnit * nalu)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
436 437
{
  guint nal_type;
438 439
  GstH264PPS pps = { 0, };
  GstH264SPS sps = { 0, };
440 441
  GstH264SEIMessage sei;
  GstH264NalParser *nalparser = h264parse->nalparser;
442
  GstH264ParserResult pres;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
443

444
  /* nothing to do for broken input */
445 446
  if (G_UNLIKELY (nalu->size < 2)) {
    GST_DEBUG_OBJECT (h264parse, "not processing nal size %u", nalu->size);
447 448 449
    return;
  }

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
450
  /* we have a peek as well */
451
  nal_type = nalu->type;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
452 453
  h264parse->keyframe |= NAL_TYPE_IS_KEY (nal_type);

454 455 456
  GST_DEBUG_OBJECT (h264parse, "processing nal of type %u, size %u",
      nal_type, nalu->size);

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
457
  switch (nal_type) {
458
    case GST_H264_NAL_SPS:
459 460 461 462
      pres = gst_h264_parser_parse_sps (nalparser, nalu, &sps, TRUE);
      /* arranged for a fallback sps.id, so use that one and only warn */
      if (pres != GST_H264_PARSER_OK)
        GST_WARNING_OBJECT (h264parse, "failed to parse SPS:");
463 464 465

      GST_DEBUG_OBJECT (h264parse, "triggering src caps check");
      h264parse->update_caps = TRUE;
466 467 468 469 470 471 472 473 474
      h264parse->have_sps = TRUE;
      if (h264parse->push_codec && h264parse->have_pps) {
        /* SPS and PPS found in stream before the first pre_push_frame, no need
         * to forcibly push at start */
        GST_INFO_OBJECT (h264parse, "have SPS/PPS in stream");
        h264parse->push_codec = FALSE;
        h264parse->have_sps = FALSE;
        h264parse->have_pps = FALSE;
      }
475 476 477 478

      gst_h264_parser_store_nal (h264parse, sps.id, nal_type, nalu);
      break;
    case GST_H264_NAL_PPS:
479 480 481 482 483
      pres = gst_h264_parser_parse_pps (nalparser, nalu, &pps);
      /* arranged for a fallback pps.id, so use that one and only warn */
      if (pres != GST_H264_PARSER_OK)
        GST_WARNING_OBJECT (h264parse, "failed to parse PPS:");

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
484 485 486
      /* parameters might have changed, force caps check */
      GST_DEBUG_OBJECT (h264parse, "triggering src caps check");
      h264parse->update_caps = TRUE;
487 488 489 490 491 492 493 494 495
      h264parse->have_pps = TRUE;
      if (h264parse->push_codec && h264parse->have_sps) {
        /* SPS and PPS found in stream before the first pre_push_frame, no need
         * to forcibly push at start */
        GST_INFO_OBJECT (h264parse, "have SPS/PPS in stream");
        h264parse->push_codec = FALSE;
        h264parse->have_sps = FALSE;
        h264parse->have_pps = FALSE;
      }
496 497

      gst_h264_parser_store_nal (h264parse, pps.id, nal_type, nalu);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
498
      break;
499 500 501 502 503
    case GST_H264_NAL_SEI:
      gst_h264_parser_parse_sei (nalparser, nalu, &sei);
      switch (sei.payloadType) {
        case GST_H264_SEI_PIC_TIMING:
          h264parse->sei_pic_struct_pres_flag =
504 505 506
              sei.payload.pic_timing.pic_struct_present_flag;
          h264parse->sei_cpb_removal_delay =
              sei.payload.pic_timing.cpb_removal_delay;
507
          if (h264parse->sei_pic_struct_pres_flag)
508
            h264parse->sei_pic_struct = sei.payload.pic_timing.pic_struct;
509 510 511 512 513 514 515 516 517 518 519 520 521
          break;
        case GST_H264_SEI_BUF_PERIOD:
          if (h264parse->ts_trn_nb == GST_CLOCK_TIME_NONE ||
              h264parse->dts == GST_CLOCK_TIME_NONE)
            h264parse->ts_trn_nb = 0;
          else
            h264parse->ts_trn_nb = h264parse->dts;

          GST_LOG_OBJECT (h264parse,
              "new buffering period; ts_trn_nb updated: %" GST_TIME_FORMAT,
              GST_TIME_ARGS (h264parse->ts_trn_nb));
          break;
      }
522 523
      /* mark SEI pos */
      if (h264parse->sei_pos == -1) {
524
        if (h264parse->transform)
525 526
          h264parse->sei_pos = gst_adapter_available (h264parse->frame_out);
        else
527
          h264parse->sei_pos = nalu->sc_offset;
528 529 530
        GST_DEBUG_OBJECT (h264parse, "marking SEI in frame at offset %d",
            h264parse->sei_pos);
      }
531 532 533 534 535 536
      break;

    case GST_H264_NAL_SLICE:
    case GST_H264_NAL_SLICE_DPA:
    case GST_H264_NAL_SLICE_DPB:
    case GST_H264_NAL_SLICE_DPC:
537
    case GST_H264_NAL_SLICE_IDR:
538 539
      /* don't need to parse the whole slice (header) here */
      if (*(nalu->data + nalu->offset + 1) & 0x80) {
540 541 542 543
        /* means first_mb_in_slice == 0 */
        /* real frame data */
        GST_DEBUG_OBJECT (h264parse, "first_mb_in_slice = 0");
        h264parse->frame_start = TRUE;
544
      }
545 546 547 548 549
      GST_DEBUG_OBJECT (h264parse, "frame start: %i", h264parse->frame_start);
#ifndef GST_DISABLE_GST_DEBUG
      {
        GstH264SliceHdr slice;
        GstH264ParserResult pres;
550

551 552 553 554 555 556 557 558 559 560
        pres = gst_h264_parser_parse_slice_hdr (nalparser, nalu, &slice,
            FALSE, FALSE);
        GST_DEBUG_OBJECT (h264parse,
            "parse result %d, first MB: %u, slice type: %u",
            pres, slice.first_mb_in_slice, slice.type);
      }
#endif
      if (G_LIKELY (nal_type != GST_H264_NAL_SLICE_IDR &&
              !h264parse->push_codec))
        break;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
561 562 563 564 565
      /* if we need to sneak codec NALs into the stream,
       * this is a good place, so fake it as IDR
       * (which should be at start anyway) */
      /* mark where config needs to go if interval expired */
      /* mind replacement buffer if applicable */
566
      if (h264parse->idr_pos == -1) {
567
        if (h264parse->transform)
568 569
          h264parse->idr_pos = gst_adapter_available (h264parse->frame_out);
        else
570
          h264parse->idr_pos = nalu->sc_offset;
571 572 573
        GST_DEBUG_OBJECT (h264parse, "marking IDR in frame at offset %d",
            h264parse->idr_pos);
      }
574 575 576 577 578 579
      /* if SEI preceeds (faked) IDR, then we have to insert config there */
      if (h264parse->sei_pos >= 0 && h264parse->idr_pos > h264parse->sei_pos) {
        h264parse->idr_pos = h264parse->sei_pos;
        GST_DEBUG_OBJECT (h264parse, "moved IDR mark to SEI position %d",
            h264parse->idr_pos);
      }
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
580
      break;
581 582
    default:
      gst_h264_parser_parse_nal (nalparser, nalu);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
583 584 585 586
  }

  /* if AVC output needed, collect properly prefixed nal in adapter,
   * and use that to replace outgoing buffer data later on */
587
  if (h264parse->transform) {
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
588 589 590 591
    GstBuffer *buf;

    GST_LOG_OBJECT (h264parse, "collecting NAL in AVC frame");
    buf = gst_h264_parse_wrap_nal (h264parse, h264parse->format,
592
        nalu->data + nalu->offset, nalu->size);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
593 594 595 596 597 598 599
    gst_adapter_push (h264parse->frame_out, buf);
  }
}

/* caller guarantees at least 2 bytes of nal payload for each nal
 * returns TRUE if next_nal indicates that nal terminates an AU */
static inline gboolean
600 601
gst_h264_parse_collect_nal (GstH264Parse * h264parse, const guint8 * data,
    guint size, GstH264NalUnit * nalu)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
602 603
{
  gboolean complete;
604 605 606
  GstH264ParserResult parse_res;
  GstH264NalUnitType nal_type = nalu->type;
  GstH264NalUnit nnalu;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
607

608
  GST_DEBUG_OBJECT (h264parse, "parsing collected nal");
609 610 611 612 613 614
  parse_res = gst_h264_parser_identify_nalu (h264parse->nalparser, data,
      nalu->offset + nalu->size, size, &nnalu);

  if (parse_res == GST_H264_PARSER_ERROR)
    return FALSE;

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
615 616 617 618
  /* determine if AU complete */
  GST_LOG_OBJECT (h264parse, "nal type: %d", nal_type);
  /* coded slice NAL starts a picture,
   * i.e. other types become aggregated in front of it */
619 620
  h264parse->picture_start |= (nal_type == GST_H264_NAL_SLICE ||
      nal_type == GST_H264_NAL_SLICE_DPA || nal_type == GST_H264_NAL_SLICE_IDR);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
621 622 623 624 625 626 627 628

  /* consider a coded slices (IDR or not) to start a picture,
   * (so ending the previous one) if first_mb_in_slice == 0
   * (non-0 is part of previous one) */
  /* NOTE this is not entirely according to Access Unit specs in 7.4.1.2.4,
   * but in practice it works in sane cases, needs not much parsing,
   * and also works with broken frame_num in NAL
   * (where spec-wise would fail) */
629 630 631 632
  nal_type = nnalu.type;
  complete = h264parse->picture_start && (nal_type >= GST_H264_NAL_SEI &&
      nal_type <= GST_H264_NAL_AU_DELIMITER);

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
633 634
  GST_LOG_OBJECT (h264parse, "next nal type: %d", nal_type);
  complete |= h264parse->picture_start &&
635 636 637
      (nal_type == GST_H264_NAL_SLICE ||
      nal_type == GST_H264_NAL_SLICE_DPA ||
      nal_type == GST_H264_NAL_SLICE_IDR) &&
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
638
      /* first_mb_in_slice == 0 considered start of frame */
639
      (nnalu.data[nnalu.offset + 1] & 0x80);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
640 641 642 643 644 645

  GST_LOG_OBJECT (h264parse, "au complete: %d", complete);

  return complete;
}

646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732

static GstFlowReturn
gst_h264_parse_handle_frame_packetized (GstBaseParse * parse,
    GstBaseParseFrame * frame)
{
  GstH264Parse *h264parse = GST_H264_PARSE (parse);
  GstBuffer *buffer = frame->buffer;
  GstFlowReturn ret = GST_FLOW_OK;
  GstH264ParserResult parse_res;
  GstH264NalUnit nalu;
  const guint nl = h264parse->nal_length_size;
  GstMapInfo map;
  gint left;

  if (nl < 1 || nl > 4) {
    GST_DEBUG_OBJECT (h264parse, "insufficient data to split input");
    return GST_FLOW_NOT_NEGOTIATED;
  }

  /* need to save buffer from invalidation upon _finish_frame */
  if (h264parse->split_packetized)
    buffer = gst_buffer_copy (frame->buffer);

  gst_buffer_map (buffer, &map, GST_MAP_READ);

  left = map.size;

  GST_LOG_OBJECT (h264parse,
      "processing packet buffer of size %" G_GSIZE_FORMAT, map.size);

  parse_res = gst_h264_parser_identify_nalu_avc (h264parse->nalparser,
      map.data, 0, map.size, nl, &nalu);

  while (parse_res == GST_H264_PARSER_OK) {
    GST_DEBUG_OBJECT (h264parse, "AVC nal offset %d", nalu.offset + nalu.size);

    /* either way, have a look at it */
    gst_h264_parse_process_nal (h264parse, &nalu);

    /* dispatch per NALU if needed */
    if (h264parse->split_packetized) {
      /* note we don't need to come up with a sub-buffer, since
       * subsequent code only considers input buffer's metadata.
       * Real data is either taken from input by baseclass or
       * a replacement output buffer is provided anyway. */
      gst_h264_parse_parse_frame (parse, frame);
      ret = gst_base_parse_finish_frame (parse, frame, nl + nalu.size);
      left -= nl + nalu.size;
    }

    parse_res = gst_h264_parser_identify_nalu_avc (h264parse->nalparser,
        map.data, nalu.offset + nalu.size, map.size, nl, &nalu);
  }

  gst_buffer_unmap (buffer, &map);

  if (!h264parse->split_packetized) {
    gst_h264_parse_parse_frame (parse, frame);
    ret = gst_base_parse_finish_frame (parse, frame, map.size);
  } else {
    gst_buffer_unref (buffer);
    if (G_UNLIKELY (left)) {
      /* should not be happening for nice AVC */
      GST_WARNING_OBJECT (parse, "skipping leftover AVC data %d", left);
      frame->flags |= GST_BASE_PARSE_FRAME_FLAG_DROP;
      ret = gst_base_parse_finish_frame (parse, frame, map.size);
    }
  }

  if (parse_res == GST_H264_PARSER_NO_NAL_END ||
      parse_res == GST_H264_PARSER_BROKEN_DATA) {

    if (h264parse->split_packetized) {
      GST_ELEMENT_ERROR (h264parse, STREAM, FAILED, (NULL),
          ("invalid AVC input data"));
      gst_buffer_unref (buffer);

      return GST_FLOW_ERROR;
    } else {
      /* do not meddle to much in this case */
      GST_DEBUG_OBJECT (h264parse, "parsing packet failed");
    }
  }

  return ret;
}

733 734 735
static GstFlowReturn
gst_h264_parse_handle_frame (GstBaseParse * parse,
    GstBaseParseFrame * frame, gint * skipsize)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
736 737 738
{
  GstH264Parse *h264parse = GST_H264_PARSE (parse);
  GstBuffer *buffer = frame->buffer;
739
  GstMapInfo map;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
740
  guint8 *data;
René Stadler's avatar
René Stadler committed
741
  gsize size;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
742
  gint current_off = 0;
743
  gboolean drain, nonext;
744
  GstH264NalParser *nalparser = h264parse->nalparser;
745
  GstH264NalUnit nalu;
746
  GstH264ParserResult pres;
747
  gint framesize;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
748

749 750 751 752
  /* delegate in packetized case, no skipping should be needed */
  if (h264parse->packetized)
    return gst_h264_parse_handle_frame_packetized (parse, frame);

753 754 755
  gst_buffer_map (buffer, &map, GST_MAP_READ);
  data = map.data;
  size = map.size;
René Stadler's avatar
René Stadler committed
756

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
757
  /* expect at least 3 bytes startcode == sc, and 2 bytes NALU payload */
René Stadler's avatar
René Stadler committed
758
  if (G_UNLIKELY (size < 5)) {
759
    gst_buffer_unmap (buffer, &map);
760 761
    *skipsize = 1;
    return GST_FLOW_OK;
René Stadler's avatar
René Stadler committed
762
  }
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
763 764 765

  /* need to configure aggregation */
  if (G_UNLIKELY (h264parse->format == GST_H264_PARSE_FORMAT_NONE))
766
    gst_h264_parse_negotiate (h264parse, GST_H264_PARSE_FORMAT_BYTE, NULL);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
767

768
  /* avoid stale cached parsing state */
769
  if (frame->flags & GST_BASE_PARSE_FRAME_FLAG_NEW_FRAME) {
770 771 772 773 774 775
    GST_LOG_OBJECT (h264parse, "parsing new frame");
    gst_h264_parse_reset_frame (h264parse);
  } else {
    GST_LOG_OBJECT (h264parse, "resuming frame parsing");
  }

776 777
  drain = GST_BASE_PARSE_DRAINING (parse);
  nonext = FALSE;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
778

779
  current_off = h264parse->current_off;
780 781
  if (current_off < 0)
    current_off = 0;
782
  g_assert (current_off < size);
783
  GST_DEBUG_OBJECT (h264parse, "last parse position %d", current_off);
784

785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805
  /* check for initial skip */
  if (h264parse->current_off == -1) {
    pres =
        gst_h264_parser_identify_nalu_unchecked (nalparser, data, current_off,
        size, &nalu);
    switch (pres) {
      case GST_H264_PARSER_OK:
        if (nalu.sc_offset > 0) {
          *skipsize = nalu.sc_offset;
          goto skip;
        }
        break;
      case GST_H264_PARSER_NO_NAL:
        *skipsize = size - 3;
        goto skip;
        break;
      default:
        g_assert_not_reached ();
        break;
    }
  }
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
806

807
  while (TRUE) {
808 809 810
    pres =
        gst_h264_parser_identify_nalu (nalparser, data, current_off, size,
        &nalu);
811 812

    switch (pres) {
813
      case GST_H264_PARSER_OK:
814 815
        GST_DEBUG_OBJECT (h264parse, "complete nal (offset, size): (%u, %u) ",
            nalu.offset, nalu.size);
816
        break;
817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832
      case GST_H264_PARSER_NO_NAL_END:
        GST_DEBUG_OBJECT (h264parse, "not a complete nal found at offset %u",
            nalu.offset);
        /* if draining, accept it as complete nal */
        if (drain) {
          nonext = TRUE;
          nalu.size = size - nalu.offset;
          GST_DEBUG_OBJECT (h264parse, "draining, accepting with size %u",
              nalu.size);
          /* if it's not too short at least */
          if (nalu.size < 2)
            goto broken;
          break;
        }
        /* otherwise need more */
        goto more;
833
      case GST_H264_PARSER_BROKEN_LINK:
834 835
        g_assert_not_reached ();
        break;
836
      case GST_H264_PARSER_ERROR:
837 838 839
        /* should not really occur either */
        GST_DEBUG_OBJECT (h264parse, "error parsing Nal Unit");
        /* fall-through */
840
      case GST_H264_PARSER_NO_NAL:
841 842
        g_assert_not_reached ();
        break;
843 844
      case GST_H264_PARSER_BROKEN_DATA:
        GST_WARNING_OBJECT (h264parse, "input stream is corrupt; "
845 846
            "it contains a NAL unit of length %u", nalu.size);
      broken:
847 848 849
        /* broken nal at start -> arrange to skip it,
         * otherwise have it terminate current au
         * (and so it will be skipped on next frame round) */
850
        if (current_off == 0) {
851
          GST_DEBUG_OBJECT (h264parse, "skipping broken nal");
852 853
          *skipsize = nalu.offset;
          goto skip;
854
        } else {
855
          GST_DEBUG_OBJECT (h264parse, "terminating au");
856
          nalu.size = 0;
857
          nalu.offset = nalu.sc_offset;
858 859
          goto end;
        }
860 861 862 863
        break;
      default:
        g_assert_not_reached ();
        break;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
864 865
    }

866 867
    GST_DEBUG_OBJECT (h264parse, "%p complete nal found. Off: %u, Size: %u",
        data, nalu.offset, nalu.size);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
868

869 870 871
    /* simulate no next nal if none needed */
    nonext = nonext || (h264parse->align == GST_H264_PARSE_ALIGN_NAL);

872
    if (!nonext) {
873 874 875 876 877 878 879 880 881 882 883
      if (nalu.offset + nalu.size + 4 + 2 > size) {
        GST_DEBUG_OBJECT (h264parse, "not enough data for next NALU");
        if (drain) {
          GST_DEBUG_OBJECT (h264parse, "but draining anyway");
          nonext = TRUE;
        } else {
          goto more;
        }
      }
    }

884
    gst_h264_parse_process_nal (h264parse, &nalu);
885

886
    if (nonext)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
887
      break;
888

889
    /* if no next nal, we know it's complete here */
890
    if (gst_h264_parse_collect_nal (h264parse, data, size, &nalu))
891 892 893
      break;

    GST_DEBUG_OBJECT (h264parse, "Looking for more");
894
    current_off = nalu.offset + nalu.size;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
895 896
  }

897
end:
898
  framesize = nalu.offset + nalu.size;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
899

900
  gst_buffer_unmap (buffer, &map);
901 902 903 904

  gst_h264_parse_parse_frame (parse, frame);

  return gst_base_parse_finish_frame (parse, frame, framesize);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
905

906
more:
907
  *skipsize = 0;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
908

909
  /* Restart parsing from here next time */
910 911
  if (current_off > 0)
    h264parse->current_off = current_off;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
912

René Stadler's avatar
René Stadler committed
913 914
  /* Fall-through. */
out:
915
  gst_buffer_unmap (buffer, &map);
916
  return GST_FLOW_OK;
917

918 919
skip:
  GST_DEBUG_OBJECT (h264parse, "skipping %d", *skipsize);
920
  gst_h264_parse_reset_frame (h264parse);
René Stadler's avatar
René Stadler committed
921
  goto out;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
922 923 924 925 926 927 928 929 930 931
}

/* byte together avc codec data based on collected pps and sps so far */
static GstBuffer *
gst_h264_parse_make_codec_data (GstH264Parse * h264parse)
{
  GstBuffer *buf, *nal;
  gint i, sps_size = 0, pps_size = 0, num_sps = 0, num_pps = 0;
  guint8 profile_idc = 0, profile_comp = 0, level_idc = 0;
  gboolean found = FALSE;
932 933
  GstMapInfo map;
  guint8 *data;
934
  gint nl;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
935 936 937

  /* only nal payload in stored nals */

938 939
  for (i = 0; i < GST_H264_MAX_SPS_COUNT; i++) {
    if ((nal = h264parse->sps_nals[i])) {
René Stadler's avatar
René Stadler committed
940
      gsize size = gst_buffer_get_size (nal);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
941 942
      num_sps++;
      /* size bytes also count */
René Stadler's avatar
René Stadler committed
943 944 945
      sps_size += size + 2;
      if (size >= 4) {
        guint8 tmp[3];
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
946
        found = TRUE;
René Stadler's avatar
René Stadler committed
947 948 949 950
        gst_buffer_extract (nal, 1, tmp, 3);
        profile_idc = tmp[0];
        profile_comp = tmp[1];
        level_idc = tmp[2];
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
951 952 953
      }
    }
  }
954 955
  for (i = 0; i < GST_H264_MAX_PPS_COUNT; i++) {
    if ((nal = h264parse->pps_nals[i])) {
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
956 957
      num_pps++;
      /* size bytes also count */
René Stadler's avatar
René Stadler committed
958
      pps_size += gst_buffer_get_size (nal) + 2;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
959 960 961 962 963 964 965 966 967
    }
  }

  GST_DEBUG_OBJECT (h264parse,
      "constructing codec_data: num_sps=%d, num_pps=%d", num_sps, num_pps);

  if (!found || !num_pps)
    return NULL;

Wim Taymans's avatar
Wim Taymans committed
968
  buf = gst_buffer_new_allocate (NULL, 5 + 1 + sps_size + 1 + pps_size, NULL);
969 970
  gst_buffer_map (buf, &map, GST_MAP_WRITE);
  data = map.data;
971
  nl = h264parse->nal_length_size;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
972 973 974 975 976

  data[0] = 1;                  /* AVC Decoder Configuration Record ver. 1 */
  data[1] = profile_idc;        /* profile_idc                             */
  data[2] = profile_comp;       /* profile_compability                     */
  data[3] = level_idc;          /* level_idc                               */
977
  data[4] = 0xfc | (nl - 1);    /* nal_length_size_minus1                  */
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
978 979 980
  data[5] = 0xe0 | num_sps;     /* number of SPSs */

  data += 6;
981 982
  for (i = 0; i < GST_H264_MAX_SPS_COUNT; i++) {
    if ((nal = h264parse->sps_nals[i])) {
René Stadler's avatar
René Stadler committed
983 984 985 986
      gsize nal_size = gst_buffer_get_size (nal);
      GST_WRITE_UINT16_BE (data, nal_size);
      gst_buffer_extract (nal, 0, data + 2, nal_size);
      data += 2 + nal_size;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
987 988 989 990 991
    }
  }

  data[0] = num_pps;
  data++;
992 993
  for (i = 0; i < GST_H264_MAX_PPS_COUNT; i++) {
    if ((nal = h264parse->pps_nals[i])) {
René Stadler's avatar
René Stadler committed
994 995 996 997
      gsize nal_size = gst_buffer_get_size (nal);
      GST_WRITE_UINT16_BE (data, nal_size);
      gst_buffer_extract (nal, 0, data + 2, nal_size);
      data += 2 + nal_size;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
998 999 1000
    }
  }

1001
  gst_buffer_unmap (buf, &map);
René Stadler's avatar
René Stadler committed
1002

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1003 1004 1005
  return buf;
}

1006 1007 1008 1009 1010
static void
gst_h264_parse_get_par (GstH264Parse * h264parse, gint * num, gint * den)
{
  gint par_n, par_d;

1011 1012 1013 1014 1015 1016
  if (h264parse->upstream_par_n != -1 && h264parse->upstream_par_d != -1) {
    *num = h264parse->upstream_par_n;
    *den = h264parse->upstream_par_d;
    return;
  }

1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097
  par_n = par_d = 0;
  switch (h264parse->aspect_ratio_idc) {
    case 0:
      par_n = par_d = 0;
      break;
    case 1:
      par_n = 1;
      par_d = 1;
      break;
    case 2:
      par_n = 12;
      par_d = 11;
      break;
    case 3:
      par_n = 10;
      par_d = 11;
      break;
    case 4:
      par_n = 16;
      par_d = 11;
      break;
    case 5:
      par_n = 40;
      par_d = 33;
      break;
    case 6:
      par_n = 24;
      par_d = 11;
      break;
    case 7:
      par_n = 20;
      par_d = 11;
      break;
    case 8:
      par_n = 32;
      par_d = 11;
      break;
    case 9:
      par_n = 80;
      par_d = 33;
      break;
    case 10:
      par_n = 18;
      par_d = 11;
      break;
    case 11:
      par_n = 15;
      par_d = 11;
      break;
    case 12:
      par_n = 64;
      par_d = 33;
      break;
    case 13:
      par_n = 160;
      par_d = 99;
      break;
    case 14:
      par_n = 4;
      par_d = 3;
      break;
    case 15:
      par_n = 3;
      par_d = 2;
      break;
    case 16:
      par_n = 2;
      par_d = 1;
      break;
    case 255:
      par_n = h264parse->sar_width;
      par_d = h264parse->sar_height;
      break;
    default:
      par_n = par_d = 0;
  }

  *num = par_n;
  *den = par_d;
}

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1098
static void
1099
gst_h264_parse_update_src_caps (GstH264Parse * h264parse, GstCaps * caps)
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1100
{
1101
  GstH264SPS *sps;
1102
  GstCaps *sink_caps;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1103 1104 1105
  gboolean modified = FALSE;
  GstBuffer *buf = NULL;

René Stadler's avatar
René Stadler committed
1106 1107
  if (G_UNLIKELY (!gst_pad_has_current_caps (GST_BASE_PARSE_SRC_PAD
              (h264parse))))
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1108 1109 1110 1111
    modified = TRUE;
  else if (G_UNLIKELY (!h264parse->update_caps))
    return;

1112 1113 1114
  /* if this is being called from the first _setcaps call, caps on the sinkpad
   * aren't set yet and so they need to be passed as an argument */
  if (caps)
Wim Taymans's avatar
Wim Taymans committed
1115
    sink_caps = gst_caps_ref (caps);
1116
  else
René Stadler's avatar
René Stadler committed
1117
    sink_caps = gst_pad_get_current_caps (GST_BASE_PARSE_SINK_PAD (h264parse));
1118

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1119
  /* carry over input caps as much as possible; override with our own stuff */
René Stadler's avatar
René Stadler committed
1120 1121
  if (!sink_caps)
    sink_caps = gst_caps_new_empty_simple ("video/x-h264");
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1122

1123
  sps = h264parse->nalparser->last_sps;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1124 1125 1126 1127 1128 1129 1130
  GST_DEBUG_OBJECT (h264parse, "sps: %p", sps);

  /* only codec-data for nice-and-clean au aligned packetized avc format */
  if (h264parse->format == GST_H264_PARSE_FORMAT_AVC &&
      h264parse->align == GST_H264_PARSE_ALIGN_AU) {
    buf = gst_h264_parse_make_codec_data (h264parse);
    if (buf && h264parse->codec_data) {
1131
      GstMapInfo map;
René Stadler's avatar
René Stadler committed
1132

1133 1134 1135
      gst_buffer_map (buf, &map, GST_MAP_READ);
      if (map.size != gst_buffer_get_size (h264parse->codec_data) ||
          gst_buffer_memcmp (h264parse->codec_data, 0, map.data, map.size))
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1136
        modified = TRUE;
René Stadler's avatar
René Stadler committed
1137

1138
      gst_buffer_unmap (buf, &map);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1139 1140 1141 1142 1143 1144 1145
    } else {
      if (h264parse->codec_data)
        buf = gst_buffer_ref (h264parse->codec_data);
      modified = TRUE;
    }
  }

1146
  caps = NULL;
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1147 1148
  if (G_UNLIKELY (!sps)) {
    caps = gst_caps_copy (sink_caps);
1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192
  } else {
    if (G_UNLIKELY (h264parse->width != sps->width ||
            h264parse->height != sps->height)) {
      GST_INFO_OBJECT (h264parse, "resolution changed %dx%d",
          sps->width, sps->height);
      h264parse->width = sps->width;
      h264parse->height = sps->height;
      modified = TRUE;
    }

    /* 0/1 is set as the default in the codec parser */
    if (sps->vui_parameters.timing_info_present_flag &&
        !(sps->fps_num == 0 && sps->fps_den == 1)) {
      if (G_UNLIKELY (h264parse->fps_num != sps->fps_num
              || h264parse->fps_den != sps->fps_den)) {
        GST_INFO_OBJECT (h264parse, "framerate changed %d/%d",
            sps->fps_num, sps->fps_den);
        h264parse->fps_num = sps->fps_num;
        h264parse->fps_den = sps->fps_den;
        gst_base_parse_set_frame_rate (GST_BASE_PARSE (h264parse),
            h264parse->fps_num, h264parse->fps_den, 0, 0);
        modified = TRUE;
      }
    }

    if (sps->vui_parameters.aspect_ratio_info_present_flag) {
      if (G_UNLIKELY (h264parse->aspect_ratio_idc !=
              sps->vui_parameters.aspect_ratio_idc)) {
        h264parse->aspect_ratio_idc = sps->vui_parameters.aspect_ratio_idc;
        GST_INFO_OBJECT (h264parse, "aspect ratio idc changed %d",
            h264parse->aspect_ratio_idc);
        modified = TRUE;
      }

      /* 255 means sar_width and sar_height present */
      if (G_UNLIKELY (sps->vui_parameters.aspect_ratio_idc == 255 &&
              (h264parse->sar_width != sps->vui_parameters.sar_width ||
                  h264parse->sar_height != sps->vui_parameters.sar_height))) {
        h264parse->sar_width = sps->vui_parameters.sar_width;
        h264parse->sar_height = sps->vui_parameters.sar_height;
        GST_INFO_OBJECT (h264parse, "aspect ratio SAR changed %d/%d",
            h264parse->sar_width, h264parse->sar_height);
        modified = TRUE;
      }
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1193
    }
1194 1195 1196 1197 1198 1199 1200 1201 1202

    if (G_UNLIKELY (modified)) {
      caps = gst_caps_copy (sink_caps);
      /* sps should give this */
      gst_caps_set_simple (caps, "width", G_TYPE_INT, sps->width,
          "height", G_TYPE_INT, sps->height, NULL);
      /* but not necessarily or reliably this */
      if (h264parse->fps_num > 0 && h264parse->fps_den > 0)
        gst_caps_set_simple (caps, "framerate",
1203
            GST_TYPE_FRACTION, h264parse->fps_num, h264parse->fps_den, NULL);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1204 1205 1206 1207
    }
  }

  if (caps) {
1208 1209
    gint par_n, par_d;

1210 1211
    gst_caps_set_simple (caps, "parsed", G_TYPE_BOOLEAN, TRUE,
        "stream-format", G_TYPE_STRING,
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1212 1213 1214
        gst_h264_parse_get_string (h264parse, TRUE, h264parse->format),
        "alignment", G_TYPE_STRING,
        gst_h264_parse_get_string (h264parse, FALSE, h264parse->align), NULL);
1215 1216 1217 1218

    gst_h264_parse_get_par (h264parse, &par_n, &par_d);
    if (par_n != 0 && par_d != 0) {
      GST_INFO_OBJECT (h264parse, "PAR %d/%d", par_n, par_d);
1219
      gst_caps_set_simple (caps, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1220 1221 1222
          par_n, par_d, NULL);
    }

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242
    if (buf) {
      gst_caps_set_simple (caps, "codec_data", GST_TYPE_BUFFER, buf, NULL);
      gst_buffer_replace (&h264parse->codec_data, buf);
      gst_buffer_unref (buf);
      buf = NULL;
    } else {
      GstStructure *s;
      /* remove any left-over codec-data hanging around */
      s = gst_caps_get_structure (caps, 0);
      gst_structure_remove_field (s, "codec_data");
    }
    gst_pad_set_caps (GST_BASE_PARSE_SRC_PAD (h264parse), caps);
    gst_caps_unref (caps);
  }

  gst_caps_unref (sink_caps);
  if (buf)
    gst_buffer_unref (buf);
}

1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370
static void
gst_h264_parse_get_timestamp (GstH264Parse * h264parse,
    GstClockTime * out_ts, GstClockTime * out_dur, gboolean frame)
{
  GstH264SPS *sps = h264parse->nalparser->last_sps;
  GstClockTime upstream;
  gint duration = 1;

  g_return_if_fail (out_dur != NULL);
  g_return_if_fail (out_ts != NULL);

  upstream = *out_ts;

  if (!frame) {
    GST_LOG_OBJECT (h264parse, "no frame data ->  0 duration");
    *out_dur = 0;
    goto exit;
  } else {
    *out_ts = upstream;
  }

  if (!sps) {
    GST_DEBUG_OBJECT (h264parse, "referred SPS invalid");
    goto exit;
  } else if (!sps->vui_parameters.timing_info_present_flag) {
    GST_DEBUG_OBJECT (h264parse,
        "unable to compute timestamp: timing info not present");
    goto exit;
  } else if (sps->vui_parameters.time_scale == 0) {
    GST_DEBUG_OBJECT (h264parse,
        "unable to compute timestamp: time_scale = 0 "
        "(this is forbidden in spec; bitstream probably contains error)");
    goto exit;
  }

  if (h264parse->sei_pic_struct_pres_flag &&
      h264parse->sei_pic_struct != (guint8) - 1) {
    /* Note that when h264parse->sei_pic_struct == -1 (unspecified), there
     * are ways to infer its value. This is related to computing the
     * TopFieldOrderCnt and BottomFieldOrderCnt, which looks
     * complicated and thus not implemented for the time being. Yet
     * the value we have here is correct for many applications
     */
    switch (h264parse->sei_pic_struct) {
      case GST_H264_SEI_PIC_STRUCT_TOP_FIELD:
      case GST_H264_SEI_PIC_STRUCT_BOTTOM_FIELD:
        duration = 1;
        break;
      case GST_H264_SEI_PIC_STRUCT_FRAME:
      case GST_H264_SEI_PIC_STRUCT_TOP_BOTTOM:
      case GST_H264_SEI_PIC_STRUCT_BOTTOM_TOP:
        duration = 2;
        break;
      case GST_H264_SEI_PIC_STRUCT_TOP_BOTTOM_TOP:
      case GST_H264_SEI_PIC_STRUCT_BOTTOM_TOP_BOTTOM:
        duration = 3;
        break;
      case GST_H264_SEI_PIC_STRUCT_FRAME_DOUBLING:
        duration = 4;
        break;
      case GST_H264_SEI_PIC_STRUCT_FRAME_TRIPLING:
        duration = 6;
        break;
      default:
        GST_DEBUG_OBJECT (h264parse,
            "h264parse->sei_pic_struct of unknown value %d. Not parsed",
            h264parse->sei_pic_struct);
        break;
    }
  } else {
    duration = h264parse->field_pic_flag ? 1 : 2;
  }

  GST_LOG_OBJECT (h264parse, "frame tick duration %d", duration);

  /*
   * h264parse.264 C.1.2 Timing of coded picture removal (equivalent to DTS):
   * Tr,n(0) = initial_cpb_removal_delay[ SchedSelIdx ] / 90000
   * Tr,n(n) = Tr,n(nb) + Tc * cpb_removal_delay(n)
   * where
   * Tc = num_units_in_tick / time_scale
   */

  if (h264parse->ts_trn_nb != GST_CLOCK_TIME_NONE) {
    GST_LOG_OBJECT (h264parse, "buffering based ts");
    /* buffering period is present */
    if (upstream != GST_CLOCK_TIME_NONE) {
      /* If upstream timestamp is valid, we respect it and adjust current
       * reference point */
      h264parse->ts_trn_nb = upstream -
          (GstClockTime) gst_util_uint64_scale_int
          (h264parse->sei_cpb_removal_delay * GST_SECOND,
          sps->vui_parameters.num_units_in_tick,
          sps->vui_parameters.time_scale);
    } else {
      /* If no upstream timestamp is given, we write in new timestamp */
      upstream = h264parse->dts = h264parse->ts_trn_nb +
          (GstClockTime) gst_util_uint64_scale_int
          (h264parse->sei_cpb_removal_delay * GST_SECOND,
          sps->vui_parameters.num_units_in_tick,
          sps->vui_parameters.time_scale);
    }
  } else {
    GstClockTime dur;

    GST_LOG_OBJECT (h264parse, "duration based ts");
    /* naive method: no removal delay specified
     * track upstream timestamp and provide best guess frame duration */
    dur = gst_util_uint64_scale_int (duration * GST_SECOND,
        sps->vui_parameters.num_units_in_tick, sps->vui_parameters.time_scale);
    /* sanity check */
    if (dur < GST_MSECOND) {
      GST_DEBUG_OBJECT (h264parse, "discarding dur %" GST_TIME_FORMAT,
          GST_TIME_ARGS (dur));
    } else {
      *out_dur = dur;
    }
  }

exit:
  if (GST_CLOCK_TIME_IS_VALID (upstream))
    *out_ts = h264parse->dts = upstream;

  if (GST_CLOCK_TIME_IS_VALID (*out_dur) &&
      GST_CLOCK_TIME_IS_VALID (h264parse->dts))
    h264parse->dts += *out_dur;
}

Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1371 1372 1373 1374 1375 1376 1377 1378 1379 1380
static GstFlowReturn
gst_h264_parse_parse_frame (GstBaseParse * parse, GstBaseParseFrame * frame)
{
  GstH264Parse *h264parse;
  GstBuffer *buffer;
  guint av;

  h264parse = GST_H264_PARSE (parse);
  buffer = frame->buffer;

1381
  gst_h264_parse_update_src_caps (h264parse, NULL);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1382

1383 1384 1385 1386 1387 1388
  /* don't mess with timestamps if provided by upstream,
   * particularly since our ts not that good they handle seeking etc */
  if (h264parse->do_ts)
    gst_h264_parse_get_timestamp (h264parse,
        &GST_BUFFER_TIMESTAMP (buffer), &GST_BUFFER_DURATION (buffer),
        h264parse->frame_start);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400

  if (h264parse->keyframe)
    GST_BUFFER_FLAG_UNSET (buffer, GST_BUFFER_FLAG_DELTA_UNIT);
  else
    GST_BUFFER_FLAG_SET (buffer, GST_BUFFER_FLAG_DELTA_UNIT);

  /* replace with transformed AVC output if applicable */
  av = gst_adapter_available (h264parse->frame_out);
  if (av) {
    GstBuffer *buf;

    buf = gst_adapter_take_buffer (h264parse->frame_out, av);
René Stadler's avatar
René Stadler committed
1401
    gst_buffer_copy_into (buf, buffer, GST_BUFFER_COPY_METADATA, 0, -1);
1402
    gst_buffer_replace (&frame->out_buffer, buf);
1403
    gst_buffer_unref (buf);
Mark Nauwelaerts's avatar
Mark Nauwelaerts committed
1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414
  }

  return GST_FLOW_OK;
}

/* sends a codec NAL downstream, decorating and transforming as needed.
 * No ownership is taken of @nal */
static GstFlowReturn
gst_h264_parse_push_codec_buffer (GstH264Parse * h264parse, GstBuffer * nal,
    GstClockTime ts)
{
1415
  GstMapInfo map;
René Stadler's avatar
René Stadler committed
1416