libs/gst/base/gstbaseparse.c

   1 /* GStreamer
   2  * Copyright (C) 2008 Nokia Corporation. All rights reserved.
   3  *   Contact: Stefan Kost <stefan.kost@nokia.com>
   4  * Copyright (C) 2008 Sebastian Dröge <sebastian.droege@collabora.co.uk>.
   5  * Copyright (C) 2011, Hewlett-Packard Development Company, L.P.
   6  *   Author: Sebastian Dröge <sebastian.droege@collabora.co.uk>, Collabora Ltd.
   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., 59 Temple Place - Suite 330,
  21  * Boston, MA 02111-1307, USA.
  22  */
  23
  24 /**
  25  * SECTION:gstbaseparse
  26  * @short_description: Base class for stream parsers
  27  * @see_also: #GstBaseTransform
  28  *
  29  * This base class is for parser elements that process data and splits it
  30  * into separate audio/video/whatever frames.
  31  *
  32  * It provides for:
  33  * <itemizedlist>
  34  *   <listitem><para>provides one sink pad and one source pad</para></listitem>
  35  *   <listitem><para>handles state changes</para></listitem>
  36  *   <listitem><para>can operate in pull mode or push mode</para></listitem>
  37  *   <listitem><para>handles seeking in both modes</para></listitem>
  38  *   <listitem><para>handles events (NEWSEGMENT/EOS/FLUSH)</para></listitem>
  39  *   <listitem><para>
  40  *        handles queries (POSITION/DURATION/SEEKING/FORMAT/CONVERT)
  41  *   </para></listitem>
  42  *   <listitem><para>handles flushing</para></listitem>
  43  * </itemizedlist>
  44  *
  45  * The purpose of this base class is to provide the basic functionality of
  46  * a parser and share a lot of rather complex code.
  47  *
  48  * Description of the parsing mechanism:
  49  * <orderedlist>
  50  * <listitem>
  51  *   <itemizedlist><title>Set-up phase</title>
  52  *   <listitem><para>
  53  *     GstBaseParse class calls @set_sink_caps to inform the subclass about
  54  *     incoming sinkpad caps. Subclass should set the srcpad caps accordingly.
  55  *   </para></listitem>
  56  *   <listitem><para>
  57  *     GstBaseParse calls @start to inform subclass that data processing is
  58  *     about to start now.
  59  *   </para></listitem>
  60  *   <listitem><para>
  61  *      At least at this point subclass needs to tell the GstBaseParse class
  62  *      how big data chunks it wants to receive (min_frame_size). It can do
  63  *      this with gst_base_parse_set_min_frame_size().
  64  *   </para></listitem>
  65  *   <listitem><para>
  66  *      GstBaseParse class sets up appropriate data passing mode (pull/push)
  67  *      and starts to process the data.
  68  *   </para></listitem>
  69  *   </itemizedlist>
  70  * </listitem>
  71  * <listitem>
  72  *   <itemizedlist>
  73  *   <title>Parsing phase</title>
  74  *     <listitem><para>
  75  *       GstBaseParse gathers at least min_frame_size bytes of data either
  76  *       by pulling it from upstream or collecting buffers in an internal
  77  *       #GstAdapter.
  78  *     </para></listitem>
  79  *     <listitem><para>
  80  *       A buffer of (at least) min_frame_size bytes is passed to subclass with
  81  *       @check_valid_frame. Subclass checks the contents and returns TRUE
  82  *       if the buffer contains a valid frame. It also needs to set the
  83  *       @framesize according to the detected frame size. If buffer didn't
  84  *       contain a valid frame, this call must return FALSE and optionally
  85  *       set the @skipsize value to inform base class that how many bytes
  86  *       it needs to skip in order to find a valid frame. @framesize can always
  87  *       indicate a new minimum for current frame parsing.  Indicating G_MAXUINT
  88  *       for requested amount means subclass simply needs best available
  89  *       subsequent data.  In push mode this amounts to an additional input buffer
  90  *       (thus minimal additional latency), in pull mode this amounts to some
  91  *       arbitrary reasonable buffer size increase.  The passed buffer
  92  *       is read-only.  Note that @check_valid_frame might receive any small
  93  *       amount of input data when leftover data is being drained (e.g. at EOS).
  94  *     </para></listitem>
  95  *     <listitem><para>
  96  *       After valid frame is found, it will be passed again to subclass with
  97  *       @parse_frame call. Now subclass is responsible for parsing the
  98  *       frame contents and setting the caps, and buffer metadata (e.g.
  99  *       buffer timestamp and duration, or keyframe if applicable).
 100  *       (although the latter can also be done by GstBaseParse if it is
 101  *       appropriately configured, see below).  Frame is provided with
 102  *       timestamp derived from upstream (as much as generally possible),
 103  *       duration obtained from configuration (see below), and offset
 104  *       if meaningful (in pull mode).
 105  *     </para></listitem>
 106  *     <listitem><para>
 107  *       Finally the buffer can be pushed downstream and the parsing loop starts
 108  *       over again.  Just prior to actually pushing the buffer in question,
 109  *       it is passed to @pre_push_frame which gives subclass yet one
 110  *       last chance to examine buffer metadata, or to send some custom (tag)
 111  *       events, or to perform custom (segment) filtering.
 112  *     </para></listitem>
 113  *     <listitem><para>
 114  *       During the parsing process GstBaseParseClass will handle both srcpad
 115  *       and sinkpad events. They will be passed to subclass if @event or
 116  *       @src_event callbacks have been provided.
 117  *     </para></listitem>
 118  *   </itemizedlist>
 119  * </listitem>
 120  * <listitem>
 121  *   <itemizedlist><title>Shutdown phase</title>
 122  *   <listitem><para>
 123  *     GstBaseParse class calls @stop to inform the subclass that data
 124  *     parsing will be stopped.
 125  *   </para></listitem>
 126  *   </itemizedlist>
 127  * </listitem>
 128  * </orderedlist>
 129  *
 130  * Subclass is responsible for providing pad template caps for
 131  * source and sink pads. The pads need to be named "sink" and "src". It also
 132  * needs to set the fixed caps on srcpad, when the format is ensured (e.g.
 133  * when base class calls subclass' @set_sink_caps function).
 134  *
 135  * This base class uses #GST_FORMAT_DEFAULT as a meaning of frames. So,
 136  * subclass conversion routine needs to know that conversion from
 137  * #GST_FORMAT_TIME to #GST_FORMAT_DEFAULT must return the
 138  * frame number that can be found from the given byte position.
 139  *
 140  * GstBaseParse uses subclasses conversion methods also for seeking (or
 141  * otherwise uses its own default one, see also below).
 142  *
 143  * Subclass @start and @stop functions will be called to inform the beginning
 144  * and end of data processing.
 145  *
 146  * Things that subclass need to take care of:
 147  * <itemizedlist>
 148  *   <listitem><para>Provide pad templates</para></listitem>
 149  *   <listitem><para>
 150  *      Fixate the source pad caps when appropriate
 151  *   </para></listitem>
 152  *   <listitem><para>
 153  *      Inform base class how big data chunks should be retrieved. This is
 154  *      done with gst_base_parse_set_min_frame_size() function.
 155  *   </para></listitem>
 156  *   <listitem><para>
 157  *      Examine data chunks passed to subclass with @check_valid_frame
 158  *      and tell if they contain a valid frame
 159  *   </para></listitem>
 160  *   <listitem><para>
 161  *      Set the caps and timestamp to frame that is passed to subclass with
 162  *      @parse_frame function.
 163  *   </para></listitem>
 164  *   <listitem><para>Provide conversion functions</para></listitem>
 165  *   <listitem><para>
 166  *      Update the duration information with gst_base_parse_set_duration()
 167  *   </para></listitem>
 168  *   <listitem><para>
 169  *      Optionally passthrough using gst_base_parse_set_passthrough()
 170  *   </para></listitem>
 171  *   <listitem><para>
 172  *      Configure various baseparse parameters using
 173  *      gst_base_parse_set_average_bitrate(), gst_base_parse_set_syncable()
 174  *      and gst_base_parse_set_frame_rate().
 175  *   </para></listitem>
 176  *   <listitem><para>
 177  *      In particular, if subclass is unable to determine a duration, but
 178  *      parsing (or specs) yields a frames per seconds rate, then this can be
 179  *      provided to GstBaseParse to enable it to cater for
 180  *      buffer time metadata (which will be taken from upstream as much as
 181  *      possible). Internally keeping track of frame durations and respective
 182  *      sizes that have been pushed provides GstBaseParse with an estimated
 183  *      bitrate. A default @convert (used if not overriden) will then use these
 184  *      rates to perform obvious conversions.  These rates are also used to
 185  *      update (estimated) duration at regular frame intervals.
 186  *   </para></listitem>
 187  * </itemizedlist>
 188  *
 189  */
 190
 191 /* TODO:
 192  *  - In push mode provide a queue of adapter-"queued" buffers for upstream
 193  *    buffer metadata
 194  *  - Queue buffers/events until caps are set
 195  */
 196
 197 #ifdef HAVE_CONFIG_H
 198 #  include "config.h"
 199 #endif
 200
 201 #include <stdlib.h>
 202 #include <string.h>
 203
 204 #include <gst/base/gstadapter.h>
 205
 206 #include "gstbaseparse.h"
 207
 208 #define GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC  (1 << 0)
 209
 210 #define MIN_FRAMES_TO_POST_BITRATE 10
 211 #define TARGET_DIFFERENCE          (20 * GST_SECOND)
 212
 213 GST_DEBUG_CATEGORY_STATIC (gst_base_parse_debug);
 214 #define GST_CAT_DEFAULT gst_base_parse_debug
 215
 216 /* Supported formats */
 217 static const GstFormat fmtlist[] = {
 218   GST_FORMAT_DEFAULT,
 219   GST_FORMAT_BYTES,
 220   GST_FORMAT_TIME,
 221   GST_FORMAT_UNDEFINED
 222 };
 223
 224 #define GST_BASE_PARSE_GET_PRIVATE(obj)  \
 225     (G_TYPE_INSTANCE_GET_PRIVATE ((obj), GST_TYPE_BASE_PARSE, GstBaseParsePrivate))
 226
 227 struct _GstBaseParsePrivate
 228 {
 229   GstPadActivateMode pad_mode;
 230
 231   GstAdapter *adapter;
 232
 233   gint64 duration;
 234   GstFormat duration_fmt;
 235   gint64 estimated_duration;
 236   gint64 estimated_drift;
 237
 238   guint min_frame_size;
 239   gboolean passthrough;
 240   gboolean syncable;
 241   gboolean has_timing_info;
 242   guint fps_num, fps_den;
 243   gint update_interval;
 244   guint bitrate;
 245   guint lead_in, lead_out;
 246   GstClockTime lead_in_ts, lead_out_ts;
 247   GstClockTime min_latency, max_latency;
 248
 249   gboolean discont;
 250   gboolean flushing;
 251   gboolean drain;
 252
 253   gint64 offset;
 254   gint64 sync_offset;
 255   GstClockTime next_ts;
 256   GstClockTime prev_ts;
 257   GstClockTime frame_duration;
 258   gboolean seen_keyframe;
 259   gboolean is_video;
 260
 261   guint64 framecount;
 262   guint64 bytecount;
 263   guint64 data_bytecount;
 264   guint64 acc_duration;
 265   GstClockTime first_frame_ts;
 266   gint64 first_frame_offset;
 267
 268   gboolean post_min_bitrate;
 269   gboolean post_avg_bitrate;
 270   gboolean post_max_bitrate;
 271   guint min_bitrate;
 272   guint avg_bitrate;
 273   guint max_bitrate;
 274   guint posted_avg_bitrate;
 275
 276   GList *pending_events;
 277
 278   /* frames/buffers that are queued and ready to go on OK */
 279   GQueue queued_frames;
 280
 281   GstBuffer *cache;
 282
 283   /* index entry storage, either ours or provided */
 284   GstIndex *index;
 285   gint index_id;
 286   gboolean own_index;
 287   GStaticMutex index_lock;
 288
 289   /* seek table entries only maintained if upstream is BYTE seekable */
 290   gboolean upstream_seekable;
 291   gboolean upstream_has_duration;
 292   gint64 upstream_size;
 293   /* minimum distance between two index entries */
 294   GstClockTimeDiff idx_interval;
 295   /* ts and offset of last entry added */
 296   GstClockTime index_last_ts;
 297   gint64 index_last_offset;
 298   gboolean index_last_valid;
 299
 300   /* timestamps currently produced are accurate, e.g. started from 0 onwards */
 301   gboolean exact_position;
 302   /* seek events are temporarily kept to match them with newsegments */
 303   GSList *pending_seeks;
 304
 305   /* reverse playback */
 306   GSList *buffers_pending;
 307   GSList *buffers_queued;
 308   GSList *buffers_send;
 309   GstClockTime last_ts;
 310   gint64 last_offset;
 311
 312   /* Newsegment event to be sent after SEEK */
 313   GstEvent *pending_segment;
 314
 315   /* Segment event that closes the running segment prior to SEEK */
 316   GstEvent *close_segment;
 317
 318   /* push mode helper frame */
 319   GstBaseParseFrame frame;
 320
 321   /* TRUE if we're still detecting the format, i.e.
 322    * if ::detect() is still called for future buffers */
 323   gboolean detecting;
 324   GList *detect_buffers;
 325   guint detect_buffers_size;
 326 };
 327
 328 typedef struct _GstBaseParseSeek
 329 {
 330   GstSegment segment;
 331   gboolean accurate;
 332   gint64 offset;
 333   GstClockTime start_ts;
 334 } GstBaseParseSeek;
 335
 336 static GstElementClass *parent_class = NULL;
 337
 338 static void gst_base_parse_class_init (GstBaseParseClass * klass);
 339 static void gst_base_parse_init (GstBaseParse * parse,
 340     GstBaseParseClass * klass);
 341
 342 GType
 343 gst_base_parse_get_type (void)
 344 {
 345   static volatile gsize base_parse_type = 0;
 346
 347   if (g_once_init_enter (&base_parse_type)) {
 348     static const GTypeInfo base_parse_info = {
 349       sizeof (GstBaseParseClass),
 350       (GBaseInitFunc) NULL,
 351       (GBaseFinalizeFunc) NULL,
 352       (GClassInitFunc) gst_base_parse_class_init,
 353       NULL,
 354       NULL,
 355       sizeof (GstBaseParse),
 356       0,
 357       (GInstanceInitFunc) gst_base_parse_init,
 358     };
 359     GType _type;
 360
 361     _type = g_type_register_static (GST_TYPE_ELEMENT,
 362         "GstBaseParse", &base_parse_info, G_TYPE_FLAG_ABSTRACT);
 363     g_once_init_leave (&base_parse_type, _type);
 364   }
 365   return (GType) base_parse_type;
 366 }
 367
 368 static void gst_base_parse_finalize (GObject * object);
 369
 370 static GstStateChangeReturn gst_base_parse_change_state (GstElement * element,
 371     GstStateChange transition);
 372 static void gst_base_parse_reset (GstBaseParse * parse);
 373
 374 static void gst_base_parse_set_index (GstElement * element, GstIndex * index);
 375 static GstIndex *gst_base_parse_get_index (GstElement * element);
 376
 377 static gboolean gst_base_parse_sink_activate (GstPad * sinkpad);
 378 static gboolean gst_base_parse_sink_activate_push (GstPad * pad,
 379     gboolean active);
 380 static gboolean gst_base_parse_sink_activate_pull (GstPad * pad,
 381     gboolean active);
 382 static gboolean gst_base_parse_handle_seek (GstBaseParse * parse,
 383     GstEvent * event);
 384 static void gst_base_parse_handle_tag (GstBaseParse * parse, GstEvent * event);
 385
 386 static gboolean gst_base_parse_src_event (GstPad * pad, GstEvent * event);
 387 static gboolean gst_base_parse_src_query (GstPad * pad, GstObject * parent,
 388     GstQuery * query);
 389
 390 static gboolean gst_base_parse_sink_event (GstPad * pad, GstEvent * event);
 391 static gboolean gst_base_parse_sink_query (GstPad * pad, GstObject * parent,
 392     GstQuery * query);
 393
 394 static GstFlowReturn gst_base_parse_chain (GstPad * pad, GstBuffer * buffer);
 395 static void gst_base_parse_loop (GstPad * pad);
 396
 397 static gboolean gst_base_parse_check_frame (GstBaseParse * parse,
 398     GstBaseParseFrame * frame, guint * framesize, gint * skipsize);
 399 static GstFlowReturn gst_base_parse_parse_frame (GstBaseParse * parse,
 400     GstBaseParseFrame * frame);
 401
 402 static gboolean gst_base_parse_sink_eventfunc (GstBaseParse * parse,
 403     GstEvent * event);
 404
 405 static gboolean gst_base_parse_src_eventfunc (GstBaseParse * parse,
 406     GstEvent * event);
 407
 408 static void gst_base_parse_drain (GstBaseParse * parse);
 409
 410 static void gst_base_parse_post_bitrates (GstBaseParse * parse,
 411     gboolean post_min, gboolean post_avg, gboolean post_max);
 412
 413 static gint64 gst_base_parse_find_offset (GstBaseParse * parse,
 414     GstClockTime time, gboolean before, GstClockTime * _ts);
 415 static GstFlowReturn gst_base_parse_locate_time (GstBaseParse * parse,
 416     GstClockTime * _time, gint64 * _offset);
 417
 418 static GstFlowReturn gst_base_parse_process_fragment (GstBaseParse * parse,
 419     gboolean push_only);
 420
 421 static gboolean gst_base_parse_is_seekable (GstBaseParse * parse);
 422
 423 static void
 424 gst_base_parse_clear_queues (GstBaseParse * parse)
 425 {
 426   g_slist_foreach (parse->priv->buffers_queued, (GFunc) gst_buffer_unref, NULL);
 427   g_slist_free (parse->priv->buffers_queued);
 428   parse->priv->buffers_queued = NULL;
 429   g_slist_foreach (parse->priv->buffers_pending, (GFunc) gst_buffer_unref,
 430       NULL);
 431   g_slist_free (parse->priv->buffers_pending);
 432   parse->priv->buffers_pending = NULL;
 433   g_slist_foreach (parse->priv->buffers_send, (GFunc) gst_buffer_unref, NULL);
 434   g_slist_free (parse->priv->buffers_send);
 435   parse->priv->buffers_send = NULL;
 436
 437   g_list_foreach (parse->priv->detect_buffers, (GFunc) gst_buffer_unref, NULL);
 438   g_list_free (parse->priv->detect_buffers);
 439   parse->priv->detect_buffers = NULL;
 440   parse->priv->detect_buffers_size = 0;
 441 }
 442
 443 static void
 444 gst_base_parse_finalize (GObject * object)
 445 {
 446   GstBaseParse *parse = GST_BASE_PARSE (object);
 447   GstEvent **p_ev;
 448
 449   g_object_unref (parse->priv->adapter);
 450
 451   if (parse->priv->pending_segment) {
 452     p_ev = &parse->priv->pending_segment;
 453     gst_event_replace (p_ev, NULL);
 454   }
 455   if (parse->priv->close_segment) {
 456     p_ev = &parse->priv->close_segment;
 457     gst_event_replace (p_ev, NULL);
 458   }
 459
 460   if (parse->priv->cache) {
 461     gst_buffer_unref (parse->priv->cache);
 462     parse->priv->cache = NULL;
 463   }
 464
 465   g_list_foreach (parse->priv->pending_events, (GFunc) gst_mini_object_unref,
 466       NULL);
 467   g_list_free (parse->priv->pending_events);
 468   parse->priv->pending_events = NULL;
 469
 470   g_queue_foreach (&parse->priv->queued_frames,
 471       (GFunc) gst_base_parse_frame_free, NULL);
 472   g_queue_clear (&parse->priv->queued_frames);
 473
 474   if (parse->priv->index) {
 475     gst_object_unref (parse->priv->index);
 476     parse->priv->index = NULL;
 477   }
 478
 479   g_static_mutex_free (&parse->priv->index_lock);
 480
 481   gst_base_parse_clear_queues (parse);
 482
 483   G_OBJECT_CLASS (parent_class)->finalize (object);
 484 }
 485
 486 static void
 487 gst_base_parse_class_init (GstBaseParseClass * klass)
 488 {
 489   GObjectClass *gobject_class;
 490   GstElementClass *gstelement_class;
 491
 492   gobject_class = G_OBJECT_CLASS (klass);
 493   g_type_class_add_private (klass, sizeof (GstBaseParsePrivate));
 494   parent_class = g_type_class_peek_parent (klass);
 495   gobject_class->finalize = GST_DEBUG_FUNCPTR (gst_base_parse_finalize);
 496
 497   gstelement_class = (GstElementClass *) klass;
 498   gstelement_class->change_state =
 499       GST_DEBUG_FUNCPTR (gst_base_parse_change_state);
 500   gstelement_class->set_index = GST_DEBUG_FUNCPTR (gst_base_parse_set_index);
 501   gstelement_class->get_index = GST_DEBUG_FUNCPTR (gst_base_parse_get_index);
 502
 503   /* Default handlers */
 504   klass->check_valid_frame = gst_base_parse_check_frame;
 505   klass->parse_frame = gst_base_parse_parse_frame;
 506   klass->src_event = gst_base_parse_src_eventfunc;
 507   klass->convert = gst_base_parse_convert_default;
 508
 509   GST_DEBUG_CATEGORY_INIT (gst_base_parse_debug, "baseparse", 0,
 510       "baseparse element");
 511 }
 512
 513 static void
 514 gst_base_parse_init (GstBaseParse * parse, GstBaseParseClass * bclass)
 515 {
 516   GstPadTemplate *pad_template;
 517
 518   GST_DEBUG_OBJECT (parse, "gst_base_parse_init");
 519
 520   parse->priv = GST_BASE_PARSE_GET_PRIVATE (parse);
 521
 522   pad_template =
 523       gst_element_class_get_pad_template (GST_ELEMENT_CLASS (bclass), "sink");
 524   g_return_if_fail (pad_template != NULL);
 525   parse->sinkpad = gst_pad_new_from_template (pad_template, "sink");
 526   gst_pad_set_event_function (parse->sinkpad,
 527       GST_DEBUG_FUNCPTR (gst_base_parse_sink_event));
 528   gst_pad_set_query_function (parse->sinkpad,
 529       GST_DEBUG_FUNCPTR (gst_base_parse_sink_query));
 530   gst_pad_set_chain_function (parse->sinkpad,
 531       GST_DEBUG_FUNCPTR (gst_base_parse_chain));
 532   gst_pad_set_activate_function (parse->sinkpad,
 533       GST_DEBUG_FUNCPTR (gst_base_parse_sink_activate));
 534   gst_pad_set_activatepush_function (parse->sinkpad,
 535       GST_DEBUG_FUNCPTR (gst_base_parse_sink_activate_push));
 536   gst_pad_set_activatepull_function (parse->sinkpad,
 537       GST_DEBUG_FUNCPTR (gst_base_parse_sink_activate_pull));
 538   gst_element_add_pad (GST_ELEMENT (parse), parse->sinkpad);
 539
 540   GST_DEBUG_OBJECT (parse, "sinkpad created");
 541
 542   pad_template =
 543       gst_element_class_get_pad_template (GST_ELEMENT_CLASS (bclass), "src");
 544   g_return_if_fail (pad_template != NULL);
 545   parse->srcpad = gst_pad_new_from_template (pad_template, "src");
 546   gst_pad_set_event_function (parse->srcpad,
 547       GST_DEBUG_FUNCPTR (gst_base_parse_src_event));
 548   gst_pad_set_query_function (parse->srcpad,
 549       GST_DEBUG_FUNCPTR (gst_base_parse_src_query));
 550   gst_pad_use_fixed_caps (parse->srcpad);
 551   gst_element_add_pad (GST_ELEMENT (parse), parse->srcpad);
 552   GST_DEBUG_OBJECT (parse, "src created");
 553
 554   g_queue_init (&parse->priv->queued_frames);
 555
 556   parse->priv->adapter = gst_adapter_new ();
 557
 558   parse->priv->pad_mode = GST_PAD_ACTIVATE_NONE;
 559
 560   g_static_mutex_init (&parse->priv->index_lock);
 561
 562   /* init state */
 563   gst_base_parse_reset (parse);
 564   GST_DEBUG_OBJECT (parse, "init ok");
 565 }
 566
 567 static GstBaseParseFrame *
 568 gst_base_parse_frame_copy (GstBaseParseFrame * frame)
 569 {
 570   GstBaseParseFrame *copy;
 571
 572   copy = g_slice_dup (GstBaseParseFrame, frame);
 573   copy->buffer = gst_buffer_ref (frame->buffer);
 574   copy->_private_flags &= ~GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC;
 575
 576   GST_TRACE ("copied frame %p -> %p", frame, copy);
 577
 578   return copy;
 579 }
 580
 581 void
 582 gst_base_parse_frame_free (GstBaseParseFrame * frame)
 583 {
 584   GST_TRACE ("freeing frame %p", frame);
 585
 586   if (frame->buffer) {
 587     gst_buffer_unref (frame->buffer);
 588     frame->buffer = NULL;
 589   }
 590
 591   if (!(frame->_private_flags & GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC)) {
 592     g_slice_free (GstBaseParseFrame, frame);
 593   } else {
 594     memset (frame, 0, sizeof (*frame));
 595   }
 596 }
 597
 598 GType
 599 gst_base_parse_frame_get_type (void)
 600 {
 601   static volatile gsize frame_type = 0;
 602
 603   if (g_once_init_enter (&frame_type)) {
 604     GType _type;
 605
 606     _type = g_boxed_type_register_static ("GstBaseParseFrame",
 607         (GBoxedCopyFunc) gst_base_parse_frame_copy,
 608         (GBoxedFreeFunc) gst_base_parse_frame_free);
 609     g_once_init_leave (&frame_type, _type);
 610   }
 611   return (GType) frame_type;
 612 }
 613
 614 /**
 615  * gst_base_parse_frame_init:
 616  * @frame: #GstBaseParseFrame.
 617  *
 618  * Sets a #GstBaseParseFrame to initial state.  Currently this means
 619  * all public fields are zero-ed and a private flag is set to make
 620  * sure gst_base_parse_frame_free() only frees the contents but not
 621  * the actual frame. Use this function to initialise a #GstBaseParseFrame
 622  * allocated on the stack.
 623  *
 624  * Since: 0.10.33
 625  */
 626 void
 627 gst_base_parse_frame_init (GstBaseParseFrame * frame)
 628 {
 629   memset (frame, 0, sizeof (GstBaseParseFrame));
 630   frame->_private_flags = GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC;
 631   GST_TRACE ("inited frame %p", frame);
 632 }
 633
 634 /**
 635  * gst_base_parse_frame_new:
 636  * @buffer: (transfer none): a #GstBuffer
 637  * @flags: the flags
 638  * @overhead: number of bytes in this frame which should be counted as
 639  *     metadata overhead, ie. not used to calculate the average bitrate.
 640  *     Set to -1 to mark the entire frame as metadata. If in doubt, set to 0.
 641  *
 642  * Allocates a new #GstBaseParseFrame. This function is mainly for bindings,
 643  * elements written in C should usually allocate the frame on the stack and
 644  * then use gst_base_parse_frame_init() to initialise it.
 645  *
 646  * Returns: a newly-allocated #GstBaseParseFrame. Free with
 647  *     gst_base_parse_frame_free() when no longer needed, unless you gave
 648  *     away ownership to gst_base_parse_push_frame().
 649  *
 650  * Since: 0.10.33
 651  */
 652 GstBaseParseFrame *
 653 gst_base_parse_frame_new (GstBuffer * buffer, GstBaseParseFrameFlags flags,
 654     gint overhead)
 655 {
 656   GstBaseParseFrame *frame;
 657
 658   frame = g_slice_new0 (GstBaseParseFrame);
 659   frame->buffer = gst_buffer_ref (buffer);
 660
 661   GST_TRACE ("created frame %p", frame);
 662   return frame;
 663 }
 664
 665 static inline void
 666 gst_base_parse_frame_update (GstBaseParse * parse, GstBaseParseFrame * frame,
 667     GstBuffer * buf)
 668 {
 669   gst_buffer_replace (&frame->buffer, buf);
 670
 671   parse->flags = 0;
 672
 673   /* set flags one by one for clarity */
 674   if (G_UNLIKELY (parse->priv->drain))
 675     parse->flags |= GST_BASE_PARSE_FLAG_DRAINING;
 676
 677   /* losing sync is pretty much a discont (and vice versa), no ? */
 678   if (G_UNLIKELY (parse->priv->discont))
 679     parse->flags |= GST_BASE_PARSE_FLAG_LOST_SYNC;
 680 }
 681
 682 static void
 683 gst_base_parse_reset (GstBaseParse * parse)
 684 {
 685   GST_OBJECT_LOCK (parse);
 686   gst_segment_init (&parse->segment, GST_FORMAT_TIME);
 687   parse->priv->duration = -1;
 688   parse->priv->min_frame_size = 1;
 689   parse->priv->discont = TRUE;
 690   parse->priv->flushing = FALSE;
 691   parse->priv->offset = 0;
 692   parse->priv->sync_offset = 0;
 693   parse->priv->update_interval = -1;
 694   parse->priv->fps_num = parse->priv->fps_den = 0;
 695   parse->priv->frame_duration = GST_CLOCK_TIME_NONE;
 696   parse->priv->lead_in = parse->priv->lead_out = 0;
 697   parse->priv->lead_in_ts = parse->priv->lead_out_ts = 0;
 698   parse->priv->bitrate = 0;
 699   parse->priv->framecount = 0;
 700   parse->priv->bytecount = 0;
 701   parse->priv->acc_duration = 0;
 702   parse->priv->first_frame_ts = GST_CLOCK_TIME_NONE;
 703   parse->priv->first_frame_offset = -1;
 704   parse->priv->estimated_duration = -1;
 705   parse->priv->estimated_drift = 0;
 706   parse->priv->next_ts = 0;
 707   parse->priv->syncable = TRUE;
 708   parse->priv->passthrough = FALSE;
 709   parse->priv->has_timing_info = FALSE;
 710   parse->priv->post_min_bitrate = TRUE;
 711   parse->priv->post_avg_bitrate = TRUE;
 712   parse->priv->post_max_bitrate = TRUE;
 713   parse->priv->min_bitrate = G_MAXUINT;
 714   parse->priv->max_bitrate = 0;
 715   parse->priv->avg_bitrate = 0;
 716   parse->priv->posted_avg_bitrate = 0;
 717
 718   parse->priv->index_last_ts = GST_CLOCK_TIME_NONE;
 719   parse->priv->index_last_offset = -1;
 720   parse->priv->index_last_valid = TRUE;
 721   parse->priv->upstream_seekable = FALSE;
 722   parse->priv->upstream_size = 0;
 723   parse->priv->upstream_has_duration = FALSE;
 724   parse->priv->idx_interval = 0;
 725   parse->priv->exact_position = TRUE;
 726   parse->priv->seen_keyframe = FALSE;
 727
 728   parse->priv->last_ts = GST_CLOCK_TIME_NONE;
 729   parse->priv->last_offset = 0;
 730
 731   if (parse->priv->pending_segment) {
 732     gst_event_unref (parse->priv->pending_segment);
 733     parse->priv->pending_segment = NULL;
 734   }
 735
 736   g_list_foreach (parse->priv->pending_events, (GFunc) gst_mini_object_unref,
 737       NULL);
 738   g_list_free (parse->priv->pending_events);
 739   parse->priv->pending_events = NULL;
 740
 741   if (parse->priv->cache) {
 742     gst_buffer_unref (parse->priv->cache);
 743     parse->priv->cache = NULL;
 744   }
 745
 746   g_slist_foreach (parse->priv->pending_seeks, (GFunc) g_free, NULL);
 747   g_slist_free (parse->priv->pending_seeks);
 748   parse->priv->pending_seeks = NULL;
 749
 750   /* we know it is not alloc'ed, but maybe other stuff to free, some day ... */
 751   parse->priv->frame._private_flags |=
 752       GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC;
 753   gst_base_parse_frame_free (&parse->priv->frame);
 754
 755   g_list_foreach (parse->priv->detect_buffers, (GFunc) gst_buffer_unref, NULL);
 756   g_list_free (parse->priv->detect_buffers);
 757   parse->priv->detect_buffers = NULL;
 758   parse->priv->detect_buffers_size = 0;
 759   GST_OBJECT_UNLOCK (parse);
 760 }
 761
 762 /* gst_base_parse_check_frame:
 763  * @parse: #GstBaseParse.
 764  * @buffer: GstBuffer.
 765  * @framesize: This will be set to tell the found frame size in bytes.
 766  * @skipsize: Output parameter that tells how much data needs to be skipped
 767  *            in order to find the following frame header.
 768  *
 769  * Default callback for check_valid_frame.
 770  *
 771  * Returns: Always TRUE.
 772  */
 773 static gboolean
 774 gst_base_parse_check_frame (GstBaseParse * parse,
 775     GstBaseParseFrame * frame, guint * framesize, gint * skipsize)
 776 {
 777   *framesize = gst_buffer_get_size (frame->buffer);
 778   *skipsize = 0;
 779   return TRUE;
 780 }
 781
 782
 783 /* gst_base_parse_parse_frame:
 784  * @parse: #GstBaseParse.
 785  * @buffer: #GstBuffer.
 786  *
 787  * Default callback for parse_frame.
 788  */
 789 static GstFlowReturn
 790 gst_base_parse_parse_frame (GstBaseParse * parse, GstBaseParseFrame * frame)
 791 {
 792   GstBuffer *buffer = frame->buffer;
 793
 794   if (!GST_BUFFER_TIMESTAMP_IS_VALID (buffer) &&
 795       GST_CLOCK_TIME_IS_VALID (parse->priv->next_ts)) {
 796     GST_BUFFER_TIMESTAMP (buffer) = parse->priv->next_ts;
 797   }
 798   if (!GST_BUFFER_DURATION_IS_VALID (buffer) &&
 799       GST_CLOCK_TIME_IS_VALID (parse->priv->frame_duration)) {
 800     GST_BUFFER_DURATION (buffer) = parse->priv->frame_duration;
 801   }
 802   return GST_FLOW_OK;
 803 }
 804
 805 /* gst_base_parse_convert:
 806  * @parse: #GstBaseParse.
 807  * @src_format: #GstFormat describing the source format.
 808  * @src_value: Source value to be converted.
 809  * @dest_format: #GstFormat defining the converted format.
 810  * @dest_value: Pointer where the conversion result will be put.
 811  *
 812  * Converts using configured "convert" vmethod in #GstBaseParse class.
 813  *
 814  * Returns: TRUE if conversion was successful.
 815  */
 816 static gboolean
 817 gst_base_parse_convert (GstBaseParse * parse,
 818     GstFormat src_format,
 819     gint64 src_value, GstFormat dest_format, gint64 * dest_value)
 820 {
 821   GstBaseParseClass *klass = GST_BASE_PARSE_GET_CLASS (parse);
 822   gboolean ret;
 823
 824   g_return_val_if_fail (dest_value != NULL, FALSE);
 825
 826   if (!klass->convert)
 827     return FALSE;
 828
 829   ret = klass->convert (parse, src_format, src_value, dest_format, dest_value);
 830
 831 #ifndef GST_DISABLE_GST_DEBUG
 832   {
 833     if (ret) {
 834       if (src_format == GST_FORMAT_TIME && dest_format == GST_FORMAT_BYTES) {
 835         GST_LOG_OBJECT (parse,
 836             "TIME -> BYTES: %" GST_TIME_FORMAT " -> %" G_GINT64_FORMAT,
 837             GST_TIME_ARGS (src_value), *dest_value);
 838       } else if (dest_format == GST_FORMAT_TIME &&
 839           src_format == GST_FORMAT_BYTES) {
 840         GST_LOG_OBJECT (parse,
 841             "BYTES -> TIME: %" G_GINT64_FORMAT " -> %" GST_TIME_FORMAT,
 842             src_value, GST_TIME_ARGS (*dest_value));
 843       } else {
 844         GST_LOG_OBJECT (parse,
 845             "%s -> %s: %" G_GINT64_FORMAT " -> %" G_GINT64_FORMAT,
 846             GST_STR_NULL (gst_format_get_name (src_format)),
 847             GST_STR_NULL (gst_format_get_name (dest_format)),
 848             src_value, *dest_value);
 849       }
 850     } else {
 851       GST_DEBUG_OBJECT (parse, "conversion failed");
 852     }
 853   }
 854 #endif
 855
 856   return ret;
 857 }
 858
 859 /* gst_base_parse_sink_event:
 860  * @pad: #GstPad that received the event.
 861  * @event: #GstEvent to be handled.
 862  *
 863  * Handler for sink pad events.
 864  *
 865  * Returns: TRUE if the event was handled.
 866  */
 867 static gboolean
 868 gst_base_parse_sink_event (GstPad * pad, GstEvent * event)
 869 {
 870   GstBaseParse *parse;
 871   GstBaseParseClass *bclass;
 872   gboolean handled = FALSE;
 873   gboolean ret = TRUE;
 874
 875   parse = GST_BASE_PARSE (gst_pad_get_parent (pad));
 876   bclass = GST_BASE_PARSE_GET_CLASS (parse);
 877
 878   GST_DEBUG_OBJECT (parse, "handling event %d, %s", GST_EVENT_TYPE (event),
 879       GST_EVENT_TYPE_NAME (event));
 880
 881   /* Cache all events except EOS, SEGMENT and FLUSH_STOP if we have a
 882    * pending segment */
 883   if (parse->priv->pending_segment && GST_EVENT_TYPE (event) != GST_EVENT_EOS
 884       && GST_EVENT_TYPE (event) != GST_EVENT_SEGMENT
 885       && GST_EVENT_TYPE (event) != GST_EVENT_FLUSH_START
 886       && GST_EVENT_TYPE (event) != GST_EVENT_FLUSH_STOP) {
 887
 888     if (GST_EVENT_TYPE (event) == GST_EVENT_TAG)
 889       /* See if any bitrate tags were posted */
 890       gst_base_parse_handle_tag (parse, event);
 891
 892     parse->priv->pending_events =
 893         g_list_append (parse->priv->pending_events, event);
 894     ret = TRUE;
 895   } else {
 896
 897     if (GST_EVENT_TYPE (event) == GST_EVENT_EOS &&
 898         parse->priv->framecount < MIN_FRAMES_TO_POST_BITRATE)
 899       /* We've not posted bitrate tags yet - do so now */
 900       gst_base_parse_post_bitrates (parse, TRUE, TRUE, TRUE);
 901
 902     if (bclass->event)
 903       handled = bclass->event (parse, event);
 904
 905     if (!handled)
 906       handled = gst_base_parse_sink_eventfunc (parse, event);
 907
 908     if (!handled)
 909       ret = gst_pad_event_default (pad, event);
 910   }
 911
 912   gst_object_unref (parse);
 913   GST_DEBUG_OBJECT (parse, "event handled");
 914   return ret;
 915 }
 916
 917
 918 /* gst_base_parse_sink_eventfunc:
 919  * @parse: #GstBaseParse.
 920  * @event: #GstEvent to be handled.
 921  *
 922  * Element-level event handler function.
 923  *
 924  * The event will be unreffed only if it has been handled and this
 925  * function returns %TRUE
 926  *
 927  * Returns: %TRUE if the event was handled and not need forwarding.
 928  */
 929 static gboolean
 930 gst_base_parse_sink_eventfunc (GstBaseParse * parse, GstEvent * event)
 931 {
 932   gboolean handled = FALSE;
 933   GstEvent **eventp;
 934
 935   switch (GST_EVENT_TYPE (event)) {
 936     case GST_EVENT_CAPS:
 937     {
 938       GstCaps *caps;
 939       GstBaseParseClass *klass;
 940
 941       klass = GST_BASE_PARSE_GET_CLASS (parse);
 942
 943       gst_event_parse_caps (event, &caps);
 944       GST_DEBUG_OBJECT (parse, "caps: %" GST_PTR_FORMAT, caps);
 945
 946       if (klass->set_sink_caps)
 947         klass->set_sink_caps (parse, caps);
 948
 949       /* will send our own caps downstream */
 950       gst_event_unref (event);
 951       handled = TRUE;
 952       break;
 953     }
 954     case GST_EVENT_SEGMENT:
 955     {
 956       const GstSegment *in_segment;
 957       GstSegment out_segment;
 958       gint64 offset = 0, next_ts;
 959
 960 #if 0
 961       gdouble rate, applied_rate;
 962       GstFormat format;
 963       gint64 start, stop, pos, next_ts;
 964       gboolean update;
 965 #endif
 966
 967       gst_event_parse_segment (event, &in_segment);
 968       gst_segment_init (&out_segment, GST_FORMAT_TIME);
 969
 970       GST_DEBUG_OBJECT (parse, "segment %" GST_SEGMENT_FORMAT, in_segment);
 971
 972       if (in_segment->format == GST_FORMAT_BYTES) {
 973         GstBaseParseSeek *seek = NULL;
 974         GSList *node;
 975
 976         /* stop time is allowed to be open-ended, but not start & pos */
 977         offset = in_segment->time;
 978
 979         GST_OBJECT_LOCK (parse);
 980         for (node = parse->priv->pending_seeks; node; node = node->next) {
 981           GstBaseParseSeek *tmp = node->data;
 982
 983           if (tmp->offset == offset) {
 984             seek = tmp;
 985             break;
 986           }
 987         }
 988         parse->priv->pending_seeks =
 989             g_slist_remove (parse->priv->pending_seeks, seek);
 990         GST_OBJECT_UNLOCK (parse);
 991
 992         if (seek) {
 993           GST_DEBUG_OBJECT (parse,
 994               "Matched newsegment to%s seek: %" GST_SEGMENT_FORMAT,
 995               seek->accurate ? " accurate" : "", &seek->segment);
 996
 997           out_segment.start = seek->segment.start;
 998           out_segment.stop = seek->segment.stop;
 999           out_segment.time = seek->segment.start;
1000
1001           next_ts = seek->start_ts;
1002           parse->priv->exact_position = seek->accurate;
1003           g_free (seek);
1004         } else {
1005           /* best attempt convert */
1006           /* as these are only estimates, stop is kept open-ended to avoid
1007            * premature cutting */
1008           gst_base_parse_convert (parse, GST_FORMAT_BYTES, in_segment->start,
1009               GST_FORMAT_TIME, (gint64 *) & next_ts);
1010
1011           out_segment.start = next_ts;
1012           out_segment.stop = GST_CLOCK_TIME_NONE;
1013           out_segment.time = next_ts;
1014
1015           parse->priv->exact_position = (in_segment->start == 0);
1016         }
1017
1018         gst_event_unref (event);
1019
1020         event = gst_event_new_segment (&out_segment);
1021
1022         GST_DEBUG_OBJECT (parse, "Converted incoming segment to TIME. %"
1023             GST_SEGMENT_FORMAT, in_segment);
1024
1025       } else if (in_segment->format != GST_FORMAT_TIME) {
1026         /* Unknown incoming segment format. Output a default open-ended
1027          * TIME segment */
1028         gst_event_unref (event);
1029
1030         out_segment.start = 0;
1031         out_segment.stop = GST_CLOCK_TIME_NONE;;
1032         out_segment.time = 0;;
1033
1034         event = gst_event_new_segment (&out_segment);
1035
1036         next_ts = 0;
1037       } else {
1038         /* not considered BYTE seekable if it is talking to us in TIME,
1039          * whatever else it might claim */
1040         parse->priv->upstream_seekable = FALSE;
1041         next_ts = in_segment->start;
1042       }
1043
1044       memcpy (&parse->segment, &out_segment, sizeof (GstSegment));
1045
1046       /*
1047          gst_segment_set_newsegment (&parse->segment, update, rate,
1048          applied_rate, format, start, stop, start);
1049        */
1050
1051       /* save the segment for later, right before we push a new buffer so that
1052        * the caps are fixed and the next linked element can receive
1053        * the segment. */
1054       eventp = &parse->priv->pending_segment;
1055       gst_event_replace (eventp, event);
1056       gst_event_unref (event);
1057       handled = TRUE;
1058
1059       /* but finish the current segment */
1060       GST_DEBUG_OBJECT (parse, "draining current segment");
1061       if (in_segment->rate > 0.0)
1062         gst_base_parse_drain (parse);
1063       else
1064         gst_base_parse_process_fragment (parse, FALSE);
1065       gst_adapter_clear (parse->priv->adapter);
1066
1067       parse->priv->offset = offset;
1068       parse->priv->sync_offset = offset;
1069       parse->priv->next_ts = next_ts;
1070       parse->priv->last_ts = GST_CLOCK_TIME_NONE;
1071       parse->priv->discont = TRUE;
1072       parse->priv->seen_keyframe = FALSE;
1073       break;
1074     }
1075
1076     case GST_EVENT_FLUSH_START:
1077       parse->priv->flushing = TRUE;
1078       handled = gst_pad_push_event (parse->srcpad, gst_event_ref (event));
1079       if (handled)
1080         gst_event_unref (event);
1081       /* Wait for _chain() to exit by taking the srcpad STREAM_LOCK */
1082       GST_PAD_STREAM_LOCK (parse->srcpad);
1083       GST_PAD_STREAM_UNLOCK (parse->srcpad);
1084
1085       break;
1086
1087     case GST_EVENT_FLUSH_STOP:
1088       gst_adapter_clear (parse->priv->adapter);
1089       gst_base_parse_clear_queues (parse);
1090       parse->priv->flushing = FALSE;
1091       parse->priv->discont = TRUE;
1092       parse->priv->last_ts = GST_CLOCK_TIME_NONE;
1093       parse->priv->frame._private_flags |=
1094           GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC;
1095       gst_base_parse_frame_free (&parse->priv->frame);
1096       break;
1097
1098     case GST_EVENT_EOS:
1099       if (parse->segment.rate > 0.0)
1100         gst_base_parse_drain (parse);
1101       else
1102         gst_base_parse_process_fragment (parse, FALSE);
1103
1104       /* If we STILL have zero frames processed, fire an error */
1105       if (parse->priv->framecount == 0) {
1106         GST_ELEMENT_ERROR (parse, STREAM, WRONG_TYPE,
1107             ("No valid frames found before end of stream"), (NULL));
1108       }
1109       /* newsegment before eos */
1110       if (parse->priv->pending_segment) {
1111         gst_pad_push_event (parse->srcpad, parse->priv->pending_segment);
1112         parse->priv->pending_segment = NULL;
1113       }
1114       break;
1115
1116     default:
1117       break;
1118   }
1119
1120   return handled;
1121 }
1122
1123 static gboolean
1124 gst_base_parse_sink_query (GstPad * pad, GstObject * parent, GstQuery * query)
1125 {
1126   GstBaseParse *parse;
1127   GstBaseParseClass *bclass;
1128   gboolean res;
1129
1130   parse = GST_BASE_PARSE (parent);
1131   bclass = GST_BASE_PARSE_GET_CLASS (parse);
1132
1133   switch (GST_QUERY_TYPE (query)) {
1134     case GST_QUERY_CAPS:
1135     {
1136       if (bclass->get_sink_caps) {
1137         GstCaps *caps, *filter;
1138
1139         gst_query_parse_caps (query, &filter);
1140         caps = bclass->get_sink_caps (parse, filter);
1141         GST_LOG_OBJECT (parse, "sink getcaps returning caps %" GST_PTR_FORMAT,
1142             caps);
1143         gst_query_set_caps_result (query, caps);
1144         gst_caps_unref (caps);
1145
1146         res = TRUE;
1147       } else
1148         res = gst_pad_peer_query (parse->srcpad, query);
1149       break;
1150     }
1151     default:
1152     {
1153       res = gst_pad_query_default (pad, parent, query);
1154       break;
1155     }
1156   }
1157
1158   return res;
1159 }
1160
1161
1162 /* gst_base_parse_src_event:
1163  * @pad: #GstPad that received the event.
1164  * @event: #GstEvent that was received.
1165  *
1166  * Handler for source pad events.
1167  *
1168  * Returns: TRUE if the event was handled.
1169  */
1170 static gboolean
1171 gst_base_parse_src_event (GstPad * pad, GstEvent * event)
1172 {
1173   GstBaseParse *parse;
1174   GstBaseParseClass *bclass;
1175   gboolean handled = FALSE;
1176   gboolean ret = TRUE;
1177
1178   parse = GST_BASE_PARSE (gst_pad_get_parent (pad));
1179   bclass = GST_BASE_PARSE_GET_CLASS (parse);
1180
1181   GST_DEBUG_OBJECT (parse, "event %d, %s", GST_EVENT_TYPE (event),
1182       GST_EVENT_TYPE_NAME (event));
1183
1184   if (bclass->src_event)
1185     handled = bclass->src_event (parse, event);
1186
1187   if (!handled)
1188     ret = gst_pad_event_default (pad, event);
1189
1190   gst_object_unref (parse);
1191   return ret;
1192 }
1193
1194 static gboolean
1195 gst_base_parse_is_seekable (GstBaseParse * parse)
1196 {
1197   /* FIXME: could do more here, e.g. check index or just send data from 0
1198    * in pull mode and let decoder/sink clip */
1199   return parse->priv->syncable;
1200 }
1201
1202 /* gst_base_parse_src_eventfunc:
1203  * @parse: #GstBaseParse.
1204  * @event: #GstEvent that was received.
1205  *
1206  * Default srcpad event handler.
1207  *
1208  * Returns: TRUE if the event was handled and can be dropped.
1209  */
1210 static gboolean
1211 gst_base_parse_src_eventfunc (GstBaseParse * parse, GstEvent * event)
1212 {
1213   gboolean handled = FALSE;
1214
1215   switch (GST_EVENT_TYPE (event)) {
1216     case GST_EVENT_SEEK:
1217     {
1218       if (gst_base_parse_is_seekable (parse)) {
1219         handled = gst_base_parse_handle_seek (parse, event);
1220       }
1221       break;
1222     }
1223     default:
1224       break;
1225   }
1226   return handled;
1227 }
1228
1229
1230 /**
1231  * gst_base_parse_convert_default:
1232  * @parse: #GstBaseParse.
1233  * @src_format: #GstFormat describing the source format.
1234  * @src_value: Source value to be converted.
1235  * @dest_format: #GstFormat defining the converted format.
1236  * @dest_value: Pointer where the conversion result will be put.
1237  *
1238  * Default implementation of "convert" vmethod in #GstBaseParse class.
1239  *
1240  * Returns: TRUE if conversion was successful.
1241  *
1242  * Since: 0.10.33
1243  */
1244 gboolean
1245 gst_base_parse_convert_default (GstBaseParse * parse,
1246     GstFormat src_format,
1247     gint64 src_value, GstFormat dest_format, gint64 * dest_value)
1248 {
1249   gboolean ret = FALSE;
1250   guint64 bytes, duration;
1251
1252   if (G_UNLIKELY (src_format == dest_format)) {
1253     *dest_value = src_value;
1254     return TRUE;
1255   }
1256
1257   if (G_UNLIKELY (src_value == -1)) {
1258     *dest_value = -1;
1259     return TRUE;
1260   }
1261
1262   if (G_UNLIKELY (src_value == 0)) {
1263     *dest_value = 0;
1264     return TRUE;
1265   }
1266
1267   /* need at least some frames */
1268   if (!parse->priv->framecount)
1269     return FALSE;
1270
1271   duration = parse->priv->acc_duration / GST_MSECOND;
1272   bytes = parse->priv->bytecount;
1273
1274   if (G_UNLIKELY (!duration || !bytes))
1275     return FALSE;
1276
1277   if (src_format == GST_FORMAT_BYTES) {
1278     if (dest_format == GST_FORMAT_TIME) {
1279       /* BYTES -> TIME conversion */
1280       GST_DEBUG_OBJECT (parse, "converting bytes -> time");
1281       *dest_value = gst_util_uint64_scale (src_value, duration, bytes);
1282       *dest_value *= GST_MSECOND;
1283       GST_DEBUG_OBJECT (parse, "conversion result: %" G_GINT64_FORMAT " ms",
1284           *dest_value / GST_MSECOND);
1285       ret = TRUE;
1286     }
1287   } else if (src_format == GST_FORMAT_TIME) {
1288     if (dest_format == GST_FORMAT_BYTES) {
1289       GST_DEBUG_OBJECT (parse, "converting time -> bytes");
1290       *dest_value = gst_util_uint64_scale (src_value / GST_MSECOND, bytes,
1291           duration);
1292       GST_DEBUG_OBJECT (parse,
1293           "time %" G_GINT64_FORMAT " ms in bytes = %" G_GINT64_FORMAT,
1294           src_value / GST_MSECOND, *dest_value);
1295       ret = TRUE;
1296     }
1297   } else if (src_format == GST_FORMAT_DEFAULT) {
1298     /* DEFAULT == frame-based */
1299     if (dest_format == GST_FORMAT_TIME) {
1300       if (parse->priv->fps_den) {
1301         *dest_value = gst_util_uint64_scale (src_value,
1302             GST_SECOND * parse->priv->fps_den, parse->priv->fps_num);
1303         ret = TRUE;
1304       }
1305     } else if (dest_format == GST_FORMAT_BYTES) {
1306     }
1307   }
1308
1309   return ret;
1310 }
1311
1312 static void
1313 gst_base_parse_update_duration (GstBaseParse * baseparse)
1314 {
1315   GstPad *peer;
1316   GstBaseParse *parse;
1317
1318   parse = GST_BASE_PARSE (baseparse);
1319
1320   peer = gst_pad_get_peer (parse->sinkpad);
1321   if (peer) {
1322     gboolean qres = FALSE;
1323     gint64 ptot, dest_value;
1324
1325     qres = gst_pad_query_duration (peer, GST_FORMAT_BYTES, &ptot);
1326     gst_object_unref (GST_OBJECT (peer));
1327     if (qres) {
1328       if (gst_base_parse_convert (parse, GST_FORMAT_BYTES, ptot,
1329               GST_FORMAT_TIME, &dest_value)) {
1330
1331         /* inform if duration changed, but try to avoid spamming */
1332         parse->priv->estimated_drift +=
1333             dest_value - parse->priv->estimated_duration;
1334         if (parse->priv->estimated_drift > GST_SECOND ||
1335             parse->priv->estimated_drift < -GST_SECOND) {
1336           gst_element_post_message (GST_ELEMENT (parse),
1337               gst_message_new_duration (GST_OBJECT (parse),
1338                   GST_FORMAT_TIME, dest_value));
1339           parse->priv->estimated_drift = 0;
1340         }
1341         parse->priv->estimated_duration = dest_value;
1342         GST_LOG_OBJECT (parse,
1343             "updated estimated duration to %" GST_TIME_FORMAT,
1344             GST_TIME_ARGS (dest_value));
1345       }
1346     }
1347   }
1348 }
1349
1350 static void
1351 gst_base_parse_post_bitrates (GstBaseParse * parse, gboolean post_min,
1352     gboolean post_avg, gboolean post_max)
1353 {
1354   GstTagList *taglist = NULL;
1355
1356   if (post_min && parse->priv->post_min_bitrate) {
1357     taglist = gst_tag_list_new_empty ();
1358
1359     gst_tag_list_add (taglist, GST_TAG_MERGE_REPLACE,
1360         GST_TAG_MINIMUM_BITRATE, parse->priv->min_bitrate, NULL);
1361   }
1362
1363   if (post_avg && parse->priv->post_avg_bitrate) {
1364     if (taglist == NULL)
1365       taglist = gst_tag_list_new_empty ();
1366
1367     parse->priv->posted_avg_bitrate = parse->priv->avg_bitrate;
1368     gst_tag_list_add (taglist, GST_TAG_MERGE_REPLACE, GST_TAG_BITRATE,
1369         parse->priv->avg_bitrate, NULL);
1370   }
1371
1372   if (post_max && parse->priv->post_max_bitrate) {
1373     if (taglist == NULL)
1374       taglist = gst_tag_list_new_empty ();
1375
1376     gst_tag_list_add (taglist, GST_TAG_MERGE_REPLACE,
1377         GST_TAG_MAXIMUM_BITRATE, parse->priv->max_bitrate, NULL);
1378   }
1379
1380   GST_DEBUG_OBJECT (parse, "Updated bitrates. Min: %u, Avg: %u, Max: %u",
1381       parse->priv->min_bitrate, parse->priv->avg_bitrate,
1382       parse->priv->max_bitrate);
1383
1384   if (taglist != NULL) {
1385     gst_pad_push_event (parse->srcpad, gst_event_new_tag (taglist));
1386   }
1387 }
1388
1389 /* gst_base_parse_update_bitrates:
1390  * @parse: #GstBaseParse.
1391  * @buffer: Current frame as a #GstBuffer
1392  *
1393  * Keeps track of the minimum and maximum bitrates, and also maintains a
1394  * running average bitrate of the stream so far.
1395  */
1396 static void
1397 gst_base_parse_update_bitrates (GstBaseParse * parse, GstBaseParseFrame * frame)
1398 {
1399   /* Only update the tag on a 10 kbps delta */
1400   static const gint update_threshold = 10000;
1401
1402   guint64 data_len, frame_dur;
1403   gint overhead, frame_bitrate, old_avg_bitrate;
1404   gboolean update_min = FALSE, update_avg = FALSE, update_max = FALSE;
1405   GstBuffer *buffer = frame->buffer;
1406
1407   overhead = frame->overhead;
1408   if (overhead == -1)
1409     return;
1410
1411   data_len = gst_buffer_get_size (buffer) - overhead;
1412   parse->priv->data_bytecount += data_len;
1413
1414   /* duration should be valid by now,
1415    * either set by subclass or maybe based on fps settings */
1416   if (GST_BUFFER_DURATION_IS_VALID (buffer) && parse->priv->acc_duration != 0) {
1417     /* Calculate duration of a frame from buffer properties */
1418     frame_dur = GST_BUFFER_DURATION (buffer);
1419     parse->priv->avg_bitrate = (8 * parse->priv->data_bytecount * GST_SECOND) /
1420         parse->priv->acc_duration;
1421
1422   } else {
1423     /* No way to figure out frame duration (is this even possible?) */
1424     return;
1425   }
1426
1427   /* override if subclass provided bitrate, e.g. metadata based */
1428   if (parse->priv->bitrate) {
1429     parse->priv->avg_bitrate = parse->priv->bitrate;
1430     /* spread this (confirmed) info ASAP */
1431     if (parse->priv->posted_avg_bitrate != parse->priv->avg_bitrate)
1432       gst_base_parse_post_bitrates (parse, FALSE, TRUE, FALSE);
1433   }
1434
1435   if (frame_dur)
1436     frame_bitrate = (8 * data_len * GST_SECOND) / frame_dur;
1437   else
1438     return;
1439
1440   GST_LOG_OBJECT (parse, "frame bitrate %u, avg bitrate %u", frame_bitrate,
1441       parse->priv->avg_bitrate);
1442
1443   if (parse->priv->framecount < MIN_FRAMES_TO_POST_BITRATE) {
1444     goto exit;
1445   } else if (parse->priv->framecount == MIN_FRAMES_TO_POST_BITRATE) {
1446     /* always post all at threshold time */
1447     update_min = update_max = update_avg = TRUE;
1448   }
1449
1450   if (G_LIKELY (parse->priv->framecount >= MIN_FRAMES_TO_POST_BITRATE)) {
1451     if (frame_bitrate < parse->priv->min_bitrate) {
1452       parse->priv->min_bitrate = frame_bitrate;
1453       update_min = TRUE;
1454     }
1455
1456     if (frame_bitrate > parse->priv->max_bitrate) {
1457       parse->priv->max_bitrate = frame_bitrate;
1458       update_max = TRUE;
1459     }
1460
1461     old_avg_bitrate = parse->priv->posted_avg_bitrate;
1462     if ((gint) (old_avg_bitrate - parse->priv->avg_bitrate) > update_threshold
1463         || (gint) (parse->priv->avg_bitrate - old_avg_bitrate) >
1464         update_threshold)
1465       update_avg = TRUE;
1466   }
1467
1468   if ((update_min || update_avg || update_max))
1469     gst_base_parse_post_bitrates (parse, update_min, update_avg, update_max);
1470
1471   /* If average bitrate changes that much and no valid (time) duration provided,
1472    * then post a new duration message so applications can update their cached
1473    * values */
1474   if (update_avg && !(parse->priv->duration_fmt == GST_FORMAT_TIME &&
1475           GST_CLOCK_TIME_IS_VALID (parse->priv->duration)))
1476     gst_element_post_message (GST_ELEMENT (parse),
1477         gst_message_new_duration (GST_OBJECT (parse), GST_FORMAT_TIME, -1));
1478
1479 exit:
1480   return;
1481 }
1482
1483 /**
1484  * gst_base_parse_add_index_entry:
1485  * @parse: #GstBaseParse.
1486  * @offset: offset of entry
1487  * @ts: timestamp associated with offset
1488  * @key: whether entry refers to keyframe
1489  * @force: add entry disregarding sanity checks
1490  *
1491  * Adds an entry to the index associating @offset to @ts.  It is recommended
1492  * to only add keyframe entries.  @force allows to bypass checks, such as
1493  * whether the stream is (upstream) seekable, another entry is already "close"
1494  * to the new entry, etc.
1495  *
1496  * Returns: #gboolean indicating whether entry was added
1497  *
1498  * Since: 0.10.33
1499  */
1500 gboolean
1501 gst_base_parse_add_index_entry (GstBaseParse * parse, guint64 offset,
1502     GstClockTime ts, gboolean key, gboolean force)
1503 {
1504   gboolean ret = FALSE;
1505   GstIndexAssociation associations[2];
1506
1507   GST_LOG_OBJECT (parse, "Adding key=%d index entry %" GST_TIME_FORMAT
1508       " @ offset 0x%08" G_GINT64_MODIFIER "x", key, GST_TIME_ARGS (ts), offset);
1509
1510   if (G_LIKELY (!force)) {
1511
1512     if (!parse->priv->upstream_seekable) {
1513       GST_DEBUG_OBJECT (parse, "upstream not seekable; discarding");
1514       goto exit;
1515     }
1516
1517     /* FIXME need better helper data structure that handles these issues
1518      * related to ongoing collecting of index entries */
1519     if (parse->priv->index_last_offset >= (gint64) offset) {
1520       GST_DEBUG_OBJECT (parse, "already have entries up to offset "
1521           "0x%08" G_GINT64_MODIFIER "x", parse->priv->index_last_offset);
1522       goto exit;
1523     }
1524
1525     if (GST_CLOCK_TIME_IS_VALID (parse->priv->index_last_ts) &&
1526         GST_CLOCK_DIFF (parse->priv->index_last_ts, ts) <
1527         parse->priv->idx_interval) {
1528       GST_DEBUG_OBJECT (parse, "entry too close to last time %" GST_TIME_FORMAT,
1529           GST_TIME_ARGS (parse->priv->index_last_ts));
1530       goto exit;
1531     }
1532
1533     /* if last is not really the last one */
1534     if (!parse->priv->index_last_valid) {
1535       GstClockTime prev_ts;
1536
1537       gst_base_parse_find_offset (parse, ts, TRUE, &prev_ts);
1538       if (GST_CLOCK_DIFF (prev_ts, ts) < parse->priv->idx_interval) {
1539         GST_DEBUG_OBJECT (parse,
1540             "entry too close to existing entry %" GST_TIME_FORMAT,
1541             GST_TIME_ARGS (prev_ts));
1542         parse->priv->index_last_offset = offset;
1543         parse->priv->index_last_ts = ts;
1544         goto exit;
1545       }
1546     }
1547   }
1548
1549   associations[0].format = GST_FORMAT_TIME;
1550   associations[0].value = ts;
1551   associations[1].format = GST_FORMAT_BYTES;
1552   associations[1].value = offset;
1553
1554   /* index might change on-the-fly, although that would be nutty app ... */
1555   g_static_mutex_lock (&parse->priv->index_lock);
1556   gst_index_add_associationv (parse->priv->index, parse->priv->index_id,
1557       (key) ? GST_ASSOCIATION_FLAG_KEY_UNIT : GST_ASSOCIATION_FLAG_DELTA_UNIT,
1558       2, (const GstIndexAssociation *) &associations);
1559   g_static_mutex_unlock (&parse->priv->index_lock);
1560
1561   if (key) {
1562     parse->priv->index_last_offset = offset;
1563     parse->priv->index_last_ts = ts;
1564   }
1565
1566   ret = TRUE;
1567
1568 exit:
1569   return ret;
1570 }
1571
1572 /* check for seekable upstream, above and beyond a mere query */
1573 static void
1574 gst_base_parse_check_seekability (GstBaseParse * parse)
1575 {
1576   GstQuery *query;
1577   gboolean seekable = FALSE;
1578   gint64 start = -1, stop = -1;
1579   guint idx_interval = 0;
1580
1581   query = gst_query_new_seeking (GST_FORMAT_BYTES);
1582   if (!gst_pad_peer_query (parse->sinkpad, query)) {
1583     GST_DEBUG_OBJECT (parse, "seeking query failed");
1584     goto done;
1585   }
1586
1587   gst_query_parse_seeking (query, NULL, &seekable, &start, &stop);
1588
1589   /* try harder to query upstream size if we didn't get it the first time */
1590   if (seekable && stop == -1) {
1591     GST_DEBUG_OBJECT (parse, "doing duration query to fix up unset stop");
1592     gst_pad_peer_query_duration (parse->sinkpad, GST_FORMAT_BYTES, &stop);
1593   }
1594
1595   /* if upstream doesn't know the size, it's likely that it's not seekable in
1596    * practice even if it technically may be seekable */
1597   if (seekable && (start != 0 || stop <= start)) {
1598     GST_DEBUG_OBJECT (parse, "seekable but unknown start/stop -> disable");
1599     seekable = FALSE;
1600   }
1601
1602   /* let's not put every single frame into our index */
1603   if (seekable) {
1604     if (stop < 10 * 1024 * 1024)
1605       idx_interval = 100;
1606     else if (stop < 100 * 1024 * 1024)
1607       idx_interval = 500;
1608     else
1609       idx_interval = 1000;
1610   }
1611
1612 done:
1613   gst_query_unref (query);
1614
1615   GST_DEBUG_OBJECT (parse, "seekable: %d (%" G_GUINT64_FORMAT " - %"
1616       G_GUINT64_FORMAT ")", seekable, start, stop);
1617   parse->priv->upstream_seekable = seekable;
1618   parse->priv->upstream_size = seekable ? stop : 0;
1619
1620   GST_DEBUG_OBJECT (parse, "idx_interval: %ums", idx_interval);
1621   parse->priv->idx_interval = idx_interval * GST_MSECOND;
1622 }
1623
1624 /* some misc checks on upstream */
1625 static void
1626 gst_base_parse_check_upstream (GstBaseParse * parse)
1627 {
1628   gint64 stop;
1629
1630   if (gst_pad_peer_query_duration (parse->sinkpad, GST_FORMAT_TIME, &stop))
1631     if (GST_CLOCK_TIME_IS_VALID (stop) && stop) {
1632       /* upstream has one, accept it also, and no further updates */
1633       gst_base_parse_set_duration (parse, GST_FORMAT_TIME, stop, 0);
1634       parse->priv->upstream_has_duration = TRUE;
1635     }
1636
1637   GST_DEBUG_OBJECT (parse, "upstream_has_duration: %d",
1638       parse->priv->upstream_has_duration);
1639 }
1640
1641 /* checks src caps to determine if dealing with audio or video */
1642 /* TODO maybe forego automagic stuff and let subclass configure it ? */
1643 static void
1644 gst_base_parse_check_media (GstBaseParse * parse)
1645 {
1646   GstCaps *caps;
1647   GstStructure *s;
1648
1649   caps = gst_pad_get_current_caps (parse->srcpad);
1650   if (G_LIKELY (caps) && (s = gst_caps_get_structure (caps, 0))) {
1651     parse->priv->is_video =
1652         g_str_has_prefix (gst_structure_get_name (s), "video");
1653   } else {
1654     /* historical default */
1655     parse->priv->is_video = FALSE;
1656   }
1657   if (caps)
1658     gst_caps_unref (caps);
1659
1660   GST_DEBUG_OBJECT (parse, "media is video: %d", parse->priv->is_video);
1661 }
1662
1663 /* takes ownership of frame */
1664 static void
1665 gst_base_parse_queue_frame (GstBaseParse * parse, GstBaseParseFrame * frame)
1666 {
1667   if (!(frame->_private_flags & GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC)) {
1668     /* frame allocated on the heap, we can just take ownership */
1669     g_queue_push_tail (&parse->priv->queued_frames, frame);
1670     GST_TRACE ("queued frame %p", frame);
1671   } else {
1672     GstBaseParseFrame *copy;
1673
1674     /* probably allocated on the stack, must make a proper copy */
1675     copy = gst_base_parse_frame_copy (frame);
1676     g_queue_push_tail (&parse->priv->queued_frames, copy);
1677     GST_TRACE ("queued frame %p (copy of %p)", copy, frame);
1678     gst_base_parse_frame_free (frame);
1679   }
1680 }
1681
1682 /* gst_base_parse_handle_and_push_buffer:
1683  * @parse: #GstBaseParse.
1684  * @klass: #GstBaseParseClass.
1685  * @frame: (transfer full): a #GstBaseParseFrame
1686  *
1687  * Parses the frame from given buffer and pushes it forward. Also performs
1688  * timestamp handling and checks the segment limits.
1689  *
1690  * This is called with srcpad STREAM_LOCK held.
1691  *
1692  * Returns: #GstFlowReturn
1693  */
1694 static GstFlowReturn
1695 gst_base_parse_handle_and_push_frame (GstBaseParse * parse,
1696     GstBaseParseClass * klass, GstBaseParseFrame * frame)
1697 {
1698   GstFlowReturn ret;
1699   gint64 offset;
1700   GstBuffer *buffer;
1701
1702   g_return_val_if_fail (frame != NULL, GST_FLOW_ERROR);
1703
1704   buffer = frame->buffer;
1705
1706   if (parse->priv->discont) {
1707     GST_DEBUG_OBJECT (parse, "marking DISCONT");
1708     GST_BUFFER_FLAG_SET (buffer, GST_BUFFER_FLAG_DISCONT);
1709     parse->priv->discont = FALSE;
1710   }
1711
1712   /* some one-time start-up */
1713   if (G_UNLIKELY (!parse->priv->framecount)) {
1714     gst_base_parse_check_seekability (parse);
1715     gst_base_parse_check_upstream (parse);
1716   }
1717
1718   GST_LOG_OBJECT (parse,
1719       "parsing frame at offset %" G_GUINT64_FORMAT
1720       " (%#" G_GINT64_MODIFIER "x) of size %" G_GSIZE_FORMAT,
1721       GST_BUFFER_OFFSET (buffer), GST_BUFFER_OFFSET (buffer),
1722       gst_buffer_get_size (buffer));
1723
1724   /* use default handler to provide initial (upstream) metadata */
1725   gst_base_parse_parse_frame (parse, frame);
1726
1727   /* store offset as it might get overwritten */
1728   offset = GST_BUFFER_OFFSET (buffer);
1729   ret = klass->parse_frame (parse, frame);
1730   /* sync */
1731   buffer = frame->buffer;
1732   /* subclass must play nice */
1733   g_return_val_if_fail (buffer != NULL, GST_FLOW_ERROR);
1734
1735   /* check if subclass/format can provide ts.
1736    * If so, that allows and enables extra seek and duration determining options */
1737   if (G_UNLIKELY (parse->priv->first_frame_offset < 0 && ret == GST_FLOW_OK)) {
1738     if (GST_BUFFER_TIMESTAMP_IS_VALID (buffer) && parse->priv->has_timing_info
1739         && parse->priv->pad_mode == GST_PAD_ACTIVATE_PULL) {
1740       parse->priv->first_frame_offset = offset;
1741       parse->priv->first_frame_ts = GST_BUFFER_TIMESTAMP (buffer);
1742       GST_DEBUG_OBJECT (parse, "subclass provided ts %" GST_TIME_FORMAT
1743           " for first frame at offset %" G_GINT64_FORMAT,
1744           GST_TIME_ARGS (parse->priv->first_frame_ts),
1745           parse->priv->first_frame_offset);
1746       if (!GST_CLOCK_TIME_IS_VALID (parse->priv->duration)) {
1747         gint64 off;
1748         GstClockTime last_ts = G_MAXINT64;
1749
1750         GST_DEBUG_OBJECT (parse, "no duration; trying scan to determine");
1751         gst_base_parse_locate_time (parse, &last_ts, &off);
1752         if (GST_CLOCK_TIME_IS_VALID (last_ts))
1753           gst_base_parse_set_duration (parse, GST_FORMAT_TIME, last_ts, 0);
1754       }
1755     } else {
1756       /* disable further checks */
1757       parse->priv->first_frame_offset = 0;
1758     }
1759   }
1760
1761   /* again use default handler to add missing metadata;
1762    * we may have new information on frame properties */
1763   gst_base_parse_parse_frame (parse, frame);
1764   if (GST_BUFFER_TIMESTAMP_IS_VALID (buffer) &&
1765       GST_BUFFER_DURATION_IS_VALID (buffer)) {
1766     parse->priv->next_ts =
1767         GST_BUFFER_TIMESTAMP (buffer) + GST_BUFFER_DURATION (buffer);
1768   } else {
1769     /* we lost track, do not produce bogus time next time around
1770      * (probably means parser subclass has given up on parsing as well) */
1771     GST_DEBUG_OBJECT (parse, "no next fallback timestamp");
1772     parse->priv->next_ts = GST_CLOCK_TIME_NONE;
1773   }
1774
1775   if (parse->priv->upstream_seekable && parse->priv->exact_position &&
1776       GST_BUFFER_TIMESTAMP_IS_VALID (buffer))
1777     gst_base_parse_add_index_entry (parse, offset,
1778         GST_BUFFER_TIMESTAMP (buffer),
1779         !GST_BUFFER_FLAG_IS_SET (buffer, GST_BUFFER_FLAG_DELTA_UNIT), FALSE);
1780
1781   /* First buffers are dropped, this means that the subclass needs more
1782    * frames to decide on the format and queues them internally */
1783   /* convert internal flow to OK and mark discont for the next buffer. */
1784   if (ret == GST_BASE_PARSE_FLOW_DROPPED) {
1785     gst_base_parse_frame_free (frame);
1786     return GST_FLOW_OK;
1787   } else if (ret == GST_BASE_PARSE_FLOW_QUEUED) {
1788     gst_base_parse_queue_frame (parse, frame);
1789     return GST_FLOW_OK;
1790   } else if (ret != GST_FLOW_OK) {
1791     return ret;
1792   }
1793
1794   /* All OK, push queued frames if there are any */
1795   if (G_UNLIKELY (!g_queue_is_empty (&parse->priv->queued_frames))) {
1796     GstBaseParseFrame *queued_frame;
1797
1798     while ((queued_frame = g_queue_pop_head (&parse->priv->queued_frames))) {
1799       gst_base_parse_push_frame (parse, queued_frame);
1800     }
1801   }
1802
1803   return gst_base_parse_push_frame (parse, frame);
1804 }
1805
1806 /**
1807  * gst_base_parse_push_frame:
1808  * @parse: #GstBaseParse.
1809  * @frame: (transfer full): a #GstBaseParseFrame
1810  *
1811  * Pushes the frame downstream, sends any pending events and
1812  * does some timestamp and segment handling. Takes ownership
1813  * of @frame and will clear it (if it was initialised with
1814  * gst_base_parse_frame_init()) or free it.
1815  *
1816  * This must be called with sinkpad STREAM_LOCK held.
1817  *
1818  * Returns: #GstFlowReturn
1819  *
1820  * Since: 0.10.33
1821  */
1822 GstFlowReturn
1823 gst_base_parse_push_frame (GstBaseParse * parse, GstBaseParseFrame * frame)
1824 {
1825   GstFlowReturn ret = GST_FLOW_OK;
1826   GstClockTime last_start = GST_CLOCK_TIME_NONE;
1827   GstClockTime last_stop = GST_CLOCK_TIME_NONE;
1828   GstBaseParseClass *klass = GST_BASE_PARSE_GET_CLASS (parse);
1829   GstBuffer *buffer;
1830   gsize size;
1831
1832   g_return_val_if_fail (frame != NULL, GST_FLOW_ERROR);
1833   g_return_val_if_fail (frame->buffer != NULL, GST_FLOW_ERROR);
1834
1835   GST_TRACE_OBJECT (parse, "pushing frame %p", frame);
1836
1837   buffer = frame->buffer;
1838
1839   GST_LOG_OBJECT (parse,
1840       "processing buffer of size %" G_GSIZE_FORMAT " with ts %" GST_TIME_FORMAT
1841       ", duration %" GST_TIME_FORMAT, gst_buffer_get_size (buffer),
1842       GST_TIME_ARGS (GST_BUFFER_TIMESTAMP (buffer)),
1843       GST_TIME_ARGS (GST_BUFFER_DURATION (buffer)));
1844
1845   /* update stats */
1846   size = gst_buffer_get_size (buffer);
1847   parse->priv->bytecount += size;
1848   if (G_LIKELY (!(frame->flags & GST_BASE_PARSE_FRAME_FLAG_NO_FRAME))) {
1849     parse->priv->framecount++;
1850     if (GST_BUFFER_DURATION_IS_VALID (buffer)) {
1851       parse->priv->acc_duration += GST_BUFFER_DURATION (buffer);
1852     }
1853   }
1854   /* 0 means disabled */
1855   if (parse->priv->update_interval < 0)
1856     parse->priv->update_interval = 50;
1857   else if (parse->priv->update_interval > 0 &&
1858       (parse->priv->framecount % parse->priv->update_interval) == 0)
1859     gst_base_parse_update_duration (parse);
1860
1861   if (GST_BUFFER_TIMESTAMP_IS_VALID (buffer))
1862     last_start = last_stop = GST_BUFFER_TIMESTAMP (buffer);
1863   if (last_start != GST_CLOCK_TIME_NONE
1864       && GST_BUFFER_DURATION_IS_VALID (buffer))
1865     last_stop = last_start + GST_BUFFER_DURATION (buffer);
1866
1867   /* should have caps by now */
1868   g_return_val_if_fail (gst_pad_has_current_caps (parse->srcpad),
1869       GST_FLOW_ERROR);
1870
1871   /* segment adjustment magic; only if we are running the whole show */
1872   if (!parse->priv->passthrough && parse->segment.rate > 0.0 &&
1873       (parse->priv->pad_mode == GST_PAD_ACTIVATE_PULL ||
1874           parse->priv->upstream_seekable)) {
1875     /* segment times are typically estimates,
1876      * actual frame data might lead subclass to different timestamps,
1877      * so override segment start from what is supplied there */
1878     if (G_UNLIKELY (parse->priv->pending_segment && !parse->priv->exact_position
1879             && GST_CLOCK_TIME_IS_VALID (last_start))) {
1880       gst_event_unref (parse->priv->pending_segment);
1881       parse->segment.start =
1882           MIN ((guint64) last_start, (guint64) parse->segment.stop);
1883
1884       GST_DEBUG_OBJECT (parse,
1885           "adjusting pending segment start to %" GST_TIME_FORMAT,
1886           GST_TIME_ARGS (parse->segment.start));
1887
1888       parse->priv->pending_segment = gst_event_new_segment (&parse->segment);
1889     }
1890     /* handle gaps, e.g. non-zero start-time, in as much not handled by above */
1891     if (GST_CLOCK_TIME_IS_VALID (parse->segment.position) &&
1892         GST_CLOCK_TIME_IS_VALID (last_start)) {
1893       GstClockTimeDiff diff;
1894
1895       /* only send newsegments with increasing start times,
1896        * otherwise if these go back and forth downstream (sinks) increase
1897        * accumulated time and running_time */
1898       diff = GST_CLOCK_DIFF (parse->segment.position, last_start);
1899       if (G_UNLIKELY (diff > 2 * GST_SECOND
1900               && last_start > parse->segment.start
1901               && (!GST_CLOCK_TIME_IS_VALID (parse->segment.stop)
1902                   || last_start < parse->segment.stop))) {
1903
1904         GST_DEBUG_OBJECT (parse,
1905             "Gap of %" G_GINT64_FORMAT " ns detected in stream " "(%"
1906             GST_TIME_FORMAT " -> %" GST_TIME_FORMAT "). "
1907             "Sending updated NEWSEGMENT events", diff,
1908             GST_TIME_ARGS (parse->segment.position),
1909             GST_TIME_ARGS (last_start));
1910
1911         if (G_UNLIKELY (parse->priv->pending_segment)) {
1912           gst_event_unref (parse->priv->pending_segment);
1913           parse->segment.start = last_start;
1914           parse->segment.time = last_start;
1915           parse->priv->pending_segment =
1916               gst_event_new_segment (&parse->segment);
1917         } else {
1918           /* skip gap FIXME */
1919           gst_pad_push_event (parse->srcpad,
1920               gst_event_new_segment (&parse->segment));
1921         }
1922         parse->segment.position = last_start;
1923       }
1924     }
1925   }
1926
1927   /* and should then also be linked downstream, so safe to send some events */
1928   if (G_UNLIKELY (parse->priv->close_segment)) {
1929     /* only set up by loop */
1930     GST_DEBUG_OBJECT (parse, "loop sending close segment");
1931     gst_pad_push_event (parse->srcpad, parse->priv->close_segment);
1932     parse->priv->close_segment = NULL;
1933   }
1934   if (G_UNLIKELY (parse->priv->pending_segment)) {
1935     GstEvent *pending_segment;
1936
1937     pending_segment = parse->priv->pending_segment;
1938     parse->priv->pending_segment = NULL;
1939
1940     GST_DEBUG_OBJECT (parse, "%s push pending segment",
1941         parse->priv->pad_mode == GST_PAD_ACTIVATE_PULL ? "loop" : "chain");
1942     gst_pad_push_event (parse->srcpad, pending_segment);
1943
1944     /* have caps; check identity */
1945     gst_base_parse_check_media (parse);
1946   }
1947
1948   /* update bitrates and optionally post corresponding tags
1949    * (following newsegment) */
1950   gst_base_parse_update_bitrates (parse, frame);
1951
1952   if (G_UNLIKELY (parse->priv->pending_events)) {
1953     GList *l;
1954
1955     for (l = parse->priv->pending_events; l != NULL; l = l->next) {
1956       gst_pad_push_event (parse->srcpad, GST_EVENT (l->data));
1957     }
1958     g_list_free (parse->priv->pending_events);
1959     parse->priv->pending_events = NULL;
1960   }
1961
1962   if (klass->pre_push_frame) {
1963     ret = klass->pre_push_frame (parse, frame);
1964   } else {
1965     frame->flags |= GST_BASE_PARSE_FRAME_FLAG_CLIP;
1966   }
1967
1968   /* take final ownership of frame buffer */
1969   buffer = frame->buffer;
1970   frame->buffer = NULL;
1971
1972   /* subclass must play nice */
1973   g_return_val_if_fail (buffer != NULL, GST_FLOW_ERROR);
1974
1975   parse->priv->seen_keyframe |= parse->priv->is_video &&
1976       !GST_BUFFER_FLAG_IS_SET (buffer, GST_BUFFER_FLAG_DELTA_UNIT);
1977
1978   if (frame->flags & GST_BASE_PARSE_FRAME_FLAG_CLIP) {
1979     if (GST_BUFFER_TIMESTAMP_IS_VALID (buffer) &&
1980         GST_CLOCK_TIME_IS_VALID (parse->segment.stop) &&
1981         GST_BUFFER_TIMESTAMP (buffer) >
1982         parse->segment.stop + parse->priv->lead_out_ts) {
1983       GST_LOG_OBJECT (parse, "Dropped frame, after segment");
1984       ret = GST_FLOW_EOS;
1985     } else if (GST_BUFFER_TIMESTAMP_IS_VALID (buffer) &&
1986         GST_BUFFER_DURATION_IS_VALID (buffer) &&
1987         GST_CLOCK_TIME_IS_VALID (parse->segment.start) &&
1988         GST_BUFFER_TIMESTAMP (buffer) + GST_BUFFER_DURATION (buffer) +
1989         parse->priv->lead_in_ts < parse->segment.start) {
1990       if (parse->priv->seen_keyframe) {
1991         GST_LOG_OBJECT (parse, "Frame before segment, after keyframe");
1992         ret = GST_FLOW_OK;
1993       } else {
1994         GST_LOG_OBJECT (parse, "Dropped frame, before segment");
1995         ret = GST_BASE_PARSE_FLOW_DROPPED;
1996       }
1997     } else {
1998       ret = GST_FLOW_OK;
1999     }
2000   }
2001
2002   if (ret == GST_BASE_PARSE_FLOW_DROPPED) {
2003     GST_LOG_OBJECT (parse, "frame (%" G_GSIZE_FORMAT " bytes) dropped", size);
2004     gst_buffer_unref (buffer);
2005     ret = GST_FLOW_OK;
2006   } else if (ret == GST_FLOW_OK) {
2007     if (parse->segment.rate > 0.0) {
2008       GST_LOG_OBJECT (parse, "pushing frame (%" G_GSIZE_FORMAT " bytes) now..",
2009           size);
2010       ret = gst_pad_push (parse->srcpad, buffer);
2011       GST_LOG_OBJECT (parse, "frame pushed, flow %s", gst_flow_get_name (ret));
2012     } else {
2013       GST_LOG_OBJECT (parse, "frame (%" G_GSIZE_FORMAT " bytes) queued for now",
2014           size);
2015       parse->priv->buffers_queued =
2016           g_slist_prepend (parse->priv->buffers_queued, buffer);
2017       ret = GST_FLOW_OK;
2018     }
2019   } else {
2020     GST_LOG_OBJECT (parse, "frame (%" G_GSIZE_FORMAT " bytes) not pushed: %s",
2021         size, gst_flow_get_name (ret));
2022     gst_buffer_unref (buffer);
2023     /* if we are not sufficiently in control, let upstream decide on EOS */
2024     if (ret == GST_FLOW_EOS &&
2025         (parse->priv->passthrough ||
2026             (parse->priv->pad_mode == GST_PAD_ACTIVATE_PUSH &&
2027                 !parse->priv->upstream_seekable)))
2028       ret = GST_FLOW_OK;
2029   }
2030
2031   /* Update current running segment position */
2032   if (ret == GST_FLOW_OK && last_stop != GST_CLOCK_TIME_NONE &&
2033       parse->segment.position < last_stop)
2034     parse->segment.position = last_stop;
2035
2036   gst_base_parse_frame_free (frame);
2037
2038   return ret;
2039 }
2040
2041
2042 /* gst_base_parse_drain:
2043  *
2044  * Drains the adapter until it is empty. It decreases the min_frame_size to
2045  * match the current adapter size and calls chain method until the adapter
2046  * is emptied or chain returns with error.
2047  */
2048 static void
2049 gst_base_parse_drain (GstBaseParse * parse)
2050 {
2051   guint avail;
2052
2053   GST_DEBUG_OBJECT (parse, "draining");
2054   parse->priv->drain = TRUE;
2055
2056   for (;;) {
2057     avail = gst_adapter_available (parse->priv->adapter);
2058     if (!avail)
2059       break;
2060
2061     if (gst_base_parse_chain (parse->sinkpad, NULL) != GST_FLOW_OK) {
2062       break;
2063     }
2064
2065     /* nothing changed, maybe due to truncated frame; break infinite loop */
2066     if (avail == gst_adapter_available (parse->priv->adapter)) {
2067       GST_DEBUG_OBJECT (parse, "no change during draining; flushing");
2068       gst_adapter_clear (parse->priv->adapter);
2069     }
2070   }
2071
2072   parse->priv->drain = FALSE;
2073 }
2074
2075 /* gst_base_parse_send_buffers
2076  *
2077  * Sends buffers collected in send_buffers downstream, and ensures that list
2078  * is empty at the end (errors or not).
2079  */
2080 static GstFlowReturn
2081 gst_base_parse_send_buffers (GstBaseParse * parse)
2082 {
2083   GSList *send = NULL;
2084   GstBuffer *buf;
2085   GstFlowReturn ret = GST_FLOW_OK;
2086
2087   send = parse->priv->buffers_send;
2088
2089   /* send buffers */
2090   while (send) {
2091     buf = GST_BUFFER_CAST (send->data);
2092     GST_LOG_OBJECT (parse, "pushing buffer %p, timestamp %"
2093         GST_TIME_FORMAT ", duration %" GST_TIME_FORMAT
2094         ", offset %" G_GINT64_FORMAT, buf,
2095         GST_TIME_ARGS (GST_BUFFER_TIMESTAMP (buf)),
2096         GST_TIME_ARGS (GST_BUFFER_DURATION (buf)), GST_BUFFER_OFFSET (buf));
2097
2098     /* iterate output queue an push downstream */
2099     ret = gst_pad_push (parse->srcpad, buf);
2100     send = g_slist_delete_link (send, send);
2101
2102     /* clear any leftover if error */
2103     if (G_UNLIKELY (ret != GST_FLOW_OK)) {
2104       while (send) {
2105         buf = GST_BUFFER_CAST (send->data);
2106         gst_buffer_unref (buf);
2107         send = g_slist_delete_link (send, send);
2108       }
2109     }
2110   }
2111
2112   parse->priv->buffers_send = send;
2113
2114   return ret;
2115 }
2116
2117 /* gst_base_parse_process_fragment:
2118  *
2119  * Processes a reverse playback (forward) fragment:
2120  * - append head of last fragment that was skipped to current fragment data
2121  * - drain the resulting current fragment data (i.e. repeated chain)
2122  * - add time/duration (if needed) to frames queued by chain
2123  * - push queued data
2124  */
2125 static GstFlowReturn
2126 gst_base_parse_process_fragment (GstBaseParse * parse, gboolean push_only)
2127 {
2128   GstBuffer *buf;
2129   GstFlowReturn ret = GST_FLOW_OK;
2130   gboolean seen_key = FALSE, seen_delta = FALSE;
2131
2132   if (push_only)
2133     goto push;
2134
2135   /* restore order */
2136   parse->priv->buffers_pending = g_slist_reverse (parse->priv->buffers_pending);
2137   while (parse->priv->buffers_pending) {
2138     buf = GST_BUFFER_CAST (parse->priv->buffers_pending->data);
2139     GST_LOG_OBJECT (parse, "adding pending buffer (size %" G_GSIZE_FORMAT ")",
2140         gst_buffer_get_size (buf));
2141     gst_adapter_push (parse->priv->adapter, buf);
2142     parse->priv->buffers_pending =
2143         g_slist_delete_link (parse->priv->buffers_pending,
2144         parse->priv->buffers_pending);
2145   }
2146
2147   /* invalidate so no fall-back timestamping is performed;
2148    * ok if taken from subclass or upstream */
2149   parse->priv->next_ts = GST_CLOCK_TIME_NONE;
2150   /* prevent it hanging around stop all the time */
2151   parse->segment.position = GST_CLOCK_TIME_NONE;
2152   /* mark next run */
2153   parse->priv->discont = TRUE;
2154
2155   /* chain looks for frames and queues resulting ones (in stead of pushing) */
2156   /* initial skipped data is added to buffers_pending */
2157   gst_base_parse_drain (parse);
2158
2159 push:
2160   if (parse->priv->buffers_send) {
2161     buf = GST_BUFFER_CAST (parse->priv->buffers_send->data);
2162     seen_key |= !GST_BUFFER_FLAG_IS_SET (buf, GST_BUFFER_FLAG_DELTA_UNIT);
2163   }
2164
2165   /* add metadata (if needed to queued buffers */
2166   GST_LOG_OBJECT (parse, "last timestamp: %" GST_TIME_FORMAT,
2167       GST_TIME_ARGS (parse->priv->last_ts));
2168   while (parse->priv->buffers_queued) {
2169     buf = GST_BUFFER_CAST (parse->priv->buffers_queued->data);
2170
2171     /* no touching if upstream or parsing provided time */
2172     if (GST_BUFFER_TIMESTAMP_IS_VALID (buf)) {
2173       GST_LOG_OBJECT (parse, "buffer has time %" GST_TIME_FORMAT,
2174           GST_TIME_ARGS (GST_BUFFER_TIMESTAMP (buf)));
2175     } else if (GST_CLOCK_TIME_IS_VALID (parse->priv->last_ts) &&
2176         GST_BUFFER_DURATION_IS_VALID (buf)) {
2177       if (G_LIKELY (GST_BUFFER_DURATION (buf) <= parse->priv->last_ts))
2178         parse->priv->last_ts -= GST_BUFFER_DURATION (buf);
2179       else
2180         parse->priv->last_ts = 0;
2181       GST_BUFFER_TIMESTAMP (buf) = parse->priv->last_ts;
2182       GST_LOG_OBJECT (parse, "applied time %" GST_TIME_FORMAT,
2183           GST_TIME_ARGS (GST_BUFFER_TIMESTAMP (buf)));
2184     } else {
2185       /* no idea, very bad */
2186       GST_WARNING_OBJECT (parse, "could not determine time for buffer");
2187     }
2188
2189     parse->priv->last_ts = GST_BUFFER_TIMESTAMP (buf);
2190
2191     /* reverse order for ascending sending */
2192     /* send downstream at keyframe not preceded by a keyframe
2193      * (e.g. that should identify start of collection of IDR nals) */
2194     if (GST_BUFFER_FLAG_IS_SET (buf, GST_BUFFER_FLAG_DELTA_UNIT)) {
2195       if (seen_key) {
2196         ret = gst_base_parse_send_buffers (parse);
2197         /* if a problem, throw all to sending */
2198         if (ret != GST_FLOW_OK) {
2199           parse->priv->buffers_send =
2200               g_slist_reverse (parse->priv->buffers_queued);
2201           parse->priv->buffers_queued = NULL;
2202           break;
2203         }
2204         seen_key = FALSE;
2205       }
2206     } else {
2207       seen_delta = TRUE;
2208     }
2209
2210     seen_key |= !GST_BUFFER_FLAG_IS_SET (buf, GST_BUFFER_FLAG_DELTA_UNIT);
2211
2212     parse->priv->buffers_send =
2213         g_slist_prepend (parse->priv->buffers_send, buf);
2214     parse->priv->buffers_queued =
2215         g_slist_delete_link (parse->priv->buffers_queued,
2216         parse->priv->buffers_queued);
2217   }
2218
2219   /* audio may have all marked as keyframe, so arrange to send here */
2220   if (!seen_delta)
2221     ret = gst_base_parse_send_buffers (parse);
2222
2223   /* any trailing unused no longer usable (ideally none) */
2224   if (G_UNLIKELY (gst_adapter_available (parse->priv->adapter))) {
2225     GST_DEBUG_OBJECT (parse, "discarding %" G_GSIZE_FORMAT " trailing bytes",
2226         gst_adapter_available (parse->priv->adapter));
2227     gst_adapter_clear (parse->priv->adapter);
2228   }
2229
2230   return ret;
2231 }
2232
2233 /* small helper that checks whether we have been trying to resync too long */
2234 static inline GstFlowReturn
2235 gst_base_parse_check_sync (GstBaseParse * parse)
2236 {
2237   if (G_UNLIKELY (parse->priv->discont &&
2238           parse->priv->offset - parse->priv->sync_offset > 2 * 1024 * 1024)) {
2239     GST_ELEMENT_ERROR (parse, STREAM, DECODE,
2240         ("Failed to parse stream"), (NULL));
2241     return GST_FLOW_ERROR;
2242   }
2243
2244   return GST_FLOW_OK;
2245 }
2246
2247 static GstFlowReturn
2248 gst_base_parse_chain (GstPad * pad, GstBuffer * buffer)
2249 {
2250   GstBaseParseClass *bclass;
2251   GstBaseParse *parse;
2252   GstFlowReturn ret = GST_FLOW_OK;
2253   GstBuffer *outbuf = NULL;
2254   GstBuffer *tmpbuf = NULL;
2255   guint fsize = 1;
2256   gint skip = -1;
2257   const guint8 *data;
2258   guint old_min_size = 0, min_size, av;
2259   GstClockTime timestamp;
2260   GstBaseParseFrame *frame;
2261
2262   parse = GST_BASE_PARSE (GST_OBJECT_PARENT (pad));
2263   bclass = GST_BASE_PARSE_GET_CLASS (parse);
2264
2265   if (parse->priv->detecting) {
2266     GstBuffer *detect_buf;
2267
2268     if (parse->priv->detect_buffers_size == 0) {
2269       detect_buf = gst_buffer_ref (buffer);
2270     } else {
2271       GList *l;
2272       guint offset = 0;
2273
2274       detect_buf = gst_buffer_new ();
2275
2276       for (l = parse->priv->detect_buffers; l; l = l->next) {
2277         gsize tmpsize = gst_buffer_get_size (l->data);
2278
2279         gst_buffer_copy_into (detect_buf, GST_BUFFER_CAST (l->data),
2280             GST_BUFFER_COPY_MEMORY, offset, tmpsize);
2281         offset += tmpsize;
2282       }
2283       if (buffer)
2284         gst_buffer_copy_into (detect_buf, buffer, GST_BUFFER_COPY_MEMORY,
2285             offset, gst_buffer_get_size (buffer));
2286     }
2287
2288     ret = bclass->detect (parse, detect_buf);
2289     gst_buffer_unref (detect_buf);
2290
2291     if (ret == GST_FLOW_OK) {
2292       GList *l;
2293
2294       /* Detected something */
2295       parse->priv->detecting = FALSE;
2296
2297       for (l = parse->priv->detect_buffers; l; l = l->next) {
2298         if (ret == GST_FLOW_OK && !parse->priv->flushing)
2299           ret =
2300               gst_base_parse_chain (GST_BASE_PARSE_SINK_PAD (parse),
2301               GST_BUFFER_CAST (l->data));
2302         else
2303           gst_buffer_unref (GST_BUFFER_CAST (l->data));
2304       }
2305       g_list_free (parse->priv->detect_buffers);
2306       parse->priv->detect_buffers = NULL;
2307       parse->priv->detect_buffers_size = 0;
2308
2309       if (ret != GST_FLOW_OK) {
2310         return ret;
2311       }
2312
2313       /* Handle the current buffer */
2314     } else if (ret == GST_FLOW_NOT_NEGOTIATED) {
2315       /* Still detecting, append buffer or error out if draining */
2316
2317       if (parse->priv->drain) {
2318         GST_DEBUG_OBJECT (parse, "Draining but did not detect format yet");
2319         return GST_FLOW_ERROR;
2320       } else if (parse->priv->flushing) {
2321         g_list_foreach (parse->priv->detect_buffers, (GFunc) gst_buffer_unref,
2322             NULL);
2323         g_list_free (parse->priv->detect_buffers);
2324         parse->priv->detect_buffers = NULL;
2325         parse->priv->detect_buffers_size = 0;
2326       } else {
2327         parse->priv->detect_buffers =
2328             g_list_append (parse->priv->detect_buffers, buffer);
2329         parse->priv->detect_buffers_size += gst_buffer_get_size (buffer);
2330         return GST_FLOW_OK;
2331       }
2332     } else {
2333       /* Something went wrong, subclass responsible for error reporting */
2334       return ret;
2335     }
2336
2337     /* And now handle the current buffer if detection worked */
2338   }
2339
2340   frame = &parse->priv->frame;
2341
2342   if (G_LIKELY (buffer)) {
2343     GST_LOG_OBJECT (parse,
2344         "buffer size: %" G_GSIZE_FORMAT ", offset = %" G_GINT64_FORMAT,
2345         gst_buffer_get_size (buffer), GST_BUFFER_OFFSET (buffer));
2346     if (G_UNLIKELY (parse->priv->passthrough)) {
2347       gst_base_parse_frame_init (frame);
2348       frame->buffer = gst_buffer_make_writable (buffer);
2349       return gst_base_parse_push_frame (parse, frame);
2350     }
2351     /* upstream feeding us in reverse playback;
2352      * gather each fragment, then process it in single run */
2353     if (parse->segment.rate < 0.0) {
2354       if (G_UNLIKELY (GST_BUFFER_FLAG_IS_SET (buffer, GST_BUFFER_FLAG_DISCONT))) {
2355         GST_DEBUG_OBJECT (parse, "buffer starts new reverse playback fragment");
2356         ret = gst_base_parse_process_fragment (parse, FALSE);
2357       }
2358       gst_adapter_push (parse->priv->adapter, buffer);
2359       return ret;
2360     }
2361     gst_adapter_push (parse->priv->adapter, buffer);
2362   }
2363
2364   if (G_UNLIKELY (buffer &&
2365           GST_BUFFER_FLAG_IS_SET (buffer, GST_BUFFER_FLAG_DISCONT))) {
2366     frame->_private_flags |= GST_BASE_PARSE_FRAME_PRIVATE_FLAG_NOALLOC;
2367     gst_base_parse_frame_free (frame);
2368   }
2369
2370   /* Parse and push as many frames as possible */
2371   /* Stop either when adapter is empty or we are flushing */
2372   while (!parse->priv->flushing) {
2373     gboolean res;
2374
2375     /* maintain frame state for a single frame parsing round across _chain calls,
2376      * so only init when needed */
2377     if (!frame->_private_flags)
2378       gst_base_parse_frame_init (frame);
2379
2380     tmpbuf = gst_buffer_new ();
2381
2382     old_min_size = 0;
2383     /* Synchronization loop */
2384     for (;;) {
2385       /* note: if subclass indicates MAX fsize,
2386        * this will not likely be available anyway ... */
2387       min_size = MAX (parse->priv->min_frame_size, fsize);
2388       av = gst_adapter_available (parse->priv->adapter);
2389
2390       /* loop safety check */
2391       if (G_UNLIKELY (old_min_size >= min_size))
2392         goto invalid_min;
2393       old_min_size = min_size;
2394
2395       if (G_UNLIKELY (parse->priv->drain)) {
2396         min_size = av;
2397         GST_DEBUG_OBJECT (parse, "draining, data left: %d", min_size);
2398         if (G_UNLIKELY (!min_size)) {
2399           gst_buffer_unref (tmpbuf);
2400           goto done;
2401         }
2402       }
2403
2404       /* Collect at least min_frame_size bytes */
2405       if (av < min_size) {
2406         GST_DEBUG_OBJECT (parse, "not enough data available (only %d bytes)",
2407             av);
2408         gst_buffer_unref (tmpbuf);
2409         goto done;
2410       }
2411
2412       /* always pass all available data */
2413       data = gst_adapter_map (parse->priv->adapter, av);
2414       gst_buffer_take_memory (tmpbuf, -1,
2415           gst_memory_new_wrapped (GST_MEMORY_FLAG_READONLY,
2416               (gpointer) data, NULL, av, 0, av));
2417       GST_BUFFER_OFFSET (tmpbuf) = parse->priv->offset;
2418
2419       if (parse->priv->discont) {
2420         GST_DEBUG_OBJECT (parse, "marking DISCONT");
2421         GST_BUFFER_FLAG_SET (tmpbuf, GST_BUFFER_FLAG_DISCONT);
2422       }
2423
2424       skip = -1;
2425       gst_base_parse_frame_update (parse, frame, tmpbuf);
2426       res = bclass->check_valid_frame (parse, frame, &fsize, &skip);
2427       gst_adapter_unmap (parse->priv->adapter);
2428       gst_buffer_replace (&frame->buffer, NULL);
2429       gst_buffer_remove_memory_range (tmpbuf, 0, -1);
2430       if (res) {
2431         if (gst_adapter_available (parse->priv->adapter) < fsize) {
2432           GST_DEBUG_OBJECT (parse, "found valid frame but not enough data"
2433               " available (only %" G_GSIZE_FORMAT " bytes)",
2434               gst_adapter_available (parse->priv->adapter));
2435           gst_buffer_unref (tmpbuf);
2436           goto done;
2437         }
2438         GST_LOG_OBJECT (parse, "valid frame of size %d at pos %d", fsize, skip);
2439         break;
2440       }
2441       if (skip == -1) {
2442         /* subclass didn't touch this value. By default we skip 1 byte */
2443         skip = 1;
2444       }
2445       if (skip > 0) {
2446         GST_LOG_OBJECT (parse, "finding sync, skipping %d bytes", skip);
2447         if (parse->segment.rate < 0.0 && !parse->priv->buffers_queued) {
2448           /* reverse playback, and no frames found yet, so we are skipping
2449            * the leading part of a fragment, which may form the tail of
2450            * fragment coming later, hopefully subclass skips efficiently ... */
2451           timestamp = gst_adapter_prev_timestamp (parse->priv->adapter, NULL);
2452           outbuf = gst_adapter_take_buffer (parse->priv->adapter, skip);
2453           outbuf = gst_buffer_make_writable (outbuf);
2454           GST_BUFFER_TIMESTAMP (outbuf) = timestamp;
2455           parse->priv->buffers_pending =
2456               g_slist_prepend (parse->priv->buffers_pending, outbuf);
2457           outbuf = NULL;
2458         } else {
2459           gst_adapter_flush (parse->priv->adapter, skip);
2460         }
2461         parse->priv->offset += skip;
2462         if (!parse->priv->discont)
2463           parse->priv->sync_offset = parse->priv->offset;
2464         parse->priv->discont = TRUE;
2465         /* something changed least; nullify loop check */
2466         old_min_size = 0;
2467       }
2468       /* skip == 0 should imply subclass set min_size to need more data;
2469        * we check this shortly */
2470       if ((ret = gst_base_parse_check_sync (parse)) != GST_FLOW_OK) {
2471         gst_buffer_unref (tmpbuf);
2472         goto done;
2473       }
2474     }
2475     gst_buffer_unref (tmpbuf);
2476     tmpbuf = NULL;
2477
2478     if (skip > 0) {
2479       /* Subclass found the sync, but still wants to skip some data */
2480       GST_LOG_OBJECT (parse, "skipping %d bytes", skip);
2481       gst_adapter_flush (parse->priv->adapter, skip);
2482       parse->priv->offset += skip;
2483     }
2484
2485     /* Grab lock to prevent a race with FLUSH_START handler */
2486     GST_PAD_STREAM_LOCK (parse->srcpad);
2487
2488     /* FLUSH_START event causes the "flushing" flag to be set. In this
2489      * case we can leave the frame pushing loop */
2490     if (parse->priv->flushing) {
2491       GST_PAD_STREAM_UNLOCK (parse->srcpad);
2492       break;
2493     }
2494
2495     /* move along with upstream timestamp (if any),
2496      * but interpolate in between */
2497     timestamp = gst_adapter_prev_timestamp (parse->priv->adapter, NULL);
2498     if (GST_CLOCK_TIME_IS_VALID (timestamp) &&
2499         (parse->priv->prev_ts != timestamp)) {
2500       parse->priv->prev_ts = parse->priv->next_ts = timestamp;
2501     }
2502
2503     /* FIXME: Would it be more efficient to make a subbuffer instead? */
2504     outbuf = gst_adapter_take_buffer (parse->priv->adapter, fsize);
2505     outbuf = gst_buffer_make_writable (outbuf);
2506
2507     /* Subclass may want to know the data offset */
2508     GST_BUFFER_OFFSET (outbuf) = parse->priv->offset;
2509     parse->priv->offset += fsize;
2510     GST_BUFFER_TIMESTAMP (outbuf) = GST_CLOCK_TIME_NONE;
2511     GST_BUFFER_DURATION (outbuf) = GST_CLOCK_TIME_NONE;
2512
2513     frame->buffer = outbuf;
2514     ret = gst_base_parse_handle_and_push_frame (parse, bclass, frame);
2515     GST_PAD_STREAM_UNLOCK (parse->srcpad);
2516
2517     if (ret != GST_FLOW_OK) {
2518       GST_LOG_OBJECT (parse, "push returned %d", ret);
2519       break;
2520     }
2521   }
2522
2523 done:
2524   GST_LOG_OBJECT (parse, "chain leaving");
2525   return ret;
2526
2527   /* ERRORS */
2528 invalid_min:
2529   {
2530     GST_ELEMENT_ERROR (parse, STREAM, FAILED, (NULL),
2531         ("min_size evolution %d -> %d; breaking to avoid looping",
2532             old_min_size, min_size));
2533     return GST_FLOW_ERROR;
2534   }
2535 }
2536
2537 /* pull @size bytes at current offset,
2538  * i.e. at least try to and possibly return a shorter buffer if near the end */
2539 static GstFlowReturn
2540 gst_base_parse_pull_range (GstBaseParse * parse, guint size,
2541     GstBuffer ** buffer)
2542 {
2543   GstFlowReturn ret = GST_FLOW_OK;
2544
2545   g_return_val_if_fail (buffer != NULL, GST_FLOW_ERROR);
2546
2547   /* Caching here actually makes much less difference than one would expect.
2548    * We do it mainly to avoid pulling buffers of 1 byte all the time */
2549   if (parse->priv->cache) {
2550     gint64 cache_offset = GST_BUFFER_OFFSET (parse->priv->cache);
2551     gint cache_size = gst_buffer_get_size (parse->priv->cache);
2552
2553     if (cache_offset <= parse->priv->offset &&
2554         (parse->priv->offset + size) <= (cache_offset + cache_size)) {
2555       *buffer = gst_buffer_copy_region (parse->priv->cache, GST_BUFFER_COPY_ALL,
2556           parse->priv->offset - cache_offset, size);
2557       GST_BUFFER_OFFSET (*buffer) = parse->priv->offset;
2558       return GST_FLOW_OK;
2559     }
2560     /* not enough data in the cache, free cache and get a new one */
2561     gst_buffer_unref (parse->priv->cache);
2562     parse->priv->cache = NULL;
2563   }
2564
2565   /* refill the cache */
2566   ret =
2567       gst_pad_pull_range (parse->sinkpad, parse->priv->offset, MAX (size,
2568           64 * 1024), &parse->priv->cache);
2569   if (ret != GST_FLOW_OK) {
2570     parse->priv->cache = NULL;
2571     return ret;
2572   }
2573
2574   if (gst_buffer_get_size (parse->priv->cache) >= size) {
2575     *buffer =
2576         gst_buffer_copy_region (parse->priv->cache, GST_BUFFER_COPY_ALL, 0,
2577         size);
2578     GST_BUFFER_OFFSET (*buffer) = parse->priv->offset;
2579     return GST_FLOW_OK;
2580   }
2581
2582   /* Not possible to get enough data, try a last time with
2583    * requesting exactly the size we need */
2584   gst_buffer_unref (parse->priv->cache);
2585   parse->priv->cache = NULL;
2586
2587   ret = gst_pad_pull_range (parse->sinkpad, parse->priv->offset, size,
2588       &parse->priv->cache);
2589
2590   if (ret != GST_FLOW_OK) {
2591     GST_DEBUG_OBJECT (parse, "pull_range returned %d", ret);
2592     *buffer = NULL;
2593     return ret;
2594   }
2595
2596   if (gst_buffer_get_size (parse->priv->cache) < size) {
2597     GST_DEBUG_OBJECT (parse, "Returning short buffer at offset %"
2598         G_GUINT64_FORMAT ": wanted %u bytes, got %" G_GSIZE_FORMAT " bytes",
2599         parse->priv->offset, size, gst_buffer_get_size (parse->priv->cache));
2600
2601     *buffer = parse->priv->cache;
2602     parse->priv->cache = NULL;
2603
2604     return GST_FLOW_OK;
2605   }
2606
2607   *buffer =
2608       gst_buffer_copy_region (parse->priv->cache, GST_BUFFER_COPY_ALL, 0, size);
2609   GST_BUFFER_OFFSET (*buffer) = parse->priv->offset;
2610
2611   return GST_FLOW_OK;
2612 }
2613
2614 static GstFlowReturn
2615 gst_base_parse_handle_previous_fragment (GstBaseParse * parse)
2616 {
2617   gint64 offset = 0;
2618   GstClockTime ts = 0;
2619   GstBuffer *buffer;
2620   GstFlowReturn ret;
2621
2622   GST_DEBUG_OBJECT (parse, "fragment ended; last_ts = %" GST_TIME_FORMAT
2623       ", last_offset = %" G_GINT64_FORMAT, GST_TIME_ARGS (parse->priv->last_ts),
2624       parse->priv->last_offset);
2625
2626   if (!parse->priv->last_offset || parse->priv->last_ts <= parse->segment.start) {
2627     GST_DEBUG_OBJECT (parse, "past start of segment %" GST_TIME_FORMAT,
2628         GST_TIME_ARGS (parse->segment.start));
2629     ret = GST_FLOW_EOS;
2630     goto exit;
2631   }
2632
2633   /* last fragment started at last_offset / last_ts;
2634    * seek back 10s capped at 1MB */
2635   if (parse->priv->last_ts >= 10 * GST_SECOND)
2636     ts = parse->priv->last_ts - 10 * GST_SECOND;
2637   /* if we are exact now, we will be more so going backwards */
2638   if (parse->priv->exact_position) {
2639     offset = gst_base_parse_find_offset (parse, ts, TRUE, NULL);
2640   } else {
2641     if (!gst_pad_query_convert (parse->srcpad, GST_FORMAT_TIME, ts,
2642             GST_FORMAT_BYTES, &offset)) {
2643       GST_DEBUG_OBJECT (parse, "conversion failed, only BYTE based");
2644     }
2645   }
2646   offset = CLAMP (offset, parse->priv->last_offset - 1024 * 1024,
2647       parse->priv->last_offset - 1024);
2648   offset = MAX (0, offset);
2649
2650   GST_DEBUG_OBJECT (parse, "next fragment from offset %" G_GINT64_FORMAT,
2651       offset);
2652   parse->priv->offset = offset;
2653
2654   ret = gst_base_parse_pull_range (parse, parse->priv->last_offset - offset,
2655       &buffer);
2656   if (ret != GST_FLOW_OK)
2657     goto exit;
2658
2659   /* offset will increase again as fragment is processed/parsed */
2660   parse->priv->last_offset = offset;
2661
2662   gst_adapter_push (parse->priv->adapter, buffer);
2663   ret = gst_base_parse_process_fragment (parse, FALSE);
2664   if (ret != GST_FLOW_OK)
2665     goto exit;
2666
2667   /* force previous fragment */
2668   parse->priv->offset = -1;
2669
2670 exit:
2671   return ret;
2672 }
2673
2674 /* PULL mode:
2675  * pull and scan for next frame starting from current offset
2676  * ajusts sync, drain and offset going along */
2677 static GstFlowReturn
2678 gst_base_parse_scan_frame (GstBaseParse * parse, GstBaseParseClass * klass,
2679     GstBaseParseFrame * frame, gboolean full)
2680 {
2681   GstBuffer *buffer, *outbuf;
2682   GstFlowReturn ret = GST_FLOW_OK;
2683   guint fsize = 1, min_size, old_min_size = 0;
2684   gint skip = 0;
2685
2686   g_return_val_if_fail (frame != NULL, GST_FLOW_ERROR);
2687
2688   GST_LOG_OBJECT (parse, "scanning for frame at offset %" G_GUINT64_FORMAT
2689       " (%#" G_GINT64_MODIFIER "x)", parse->priv->offset, parse->priv->offset);
2690
2691   /* let's make this efficient for all subclass once and for all;
2692    * maybe it does not need this much, but in the latter case, we know we are
2693    * in pull mode here and might as well try to read and supply more anyway
2694    * (so does the buffer caching mechanism) */
2695   fsize = 64 * 1024;
2696
2697   while (TRUE) {
2698     gboolean res;
2699
2700     min_size = MAX (parse->priv->min_frame_size, fsize);
2701     /* loop safety check */
2702     if (G_UNLIKELY (old_min_size >= min_size))
2703       goto invalid_min;
2704     old_min_size = min_size;
2705
2706     ret = gst_base_parse_pull_range (parse, min_size, &buffer);
2707     if (ret != GST_FLOW_OK)
2708       goto done;
2709
2710     if (parse->priv->discont) {
2711       GST_DEBUG_OBJECT (parse, "marking DISCONT");
2712       GST_BUFFER_FLAG_SET (buffer, GST_BUFFER_FLAG_DISCONT);
2713     }
2714
2715     /* if we got a short read, inform subclass we are draining leftover
2716      * and no more is to be expected */
2717     if (gst_buffer_get_size (buffer) < min_size)
2718       parse->priv->drain = TRUE;
2719
2720     if (parse->priv->detecting) {
2721       ret = klass->detect (parse, buffer);
2722       if (ret == GST_FLOW_NOT_NEGOTIATED) {
2723         /* If draining we error out, otherwise request a buffer
2724          * with 64kb more */
2725         if (parse->priv->drain) {
2726           gst_buffer_unref (buffer);
2727           GST_ERROR_OBJECT (parse, "Failed to detect format but draining");
2728           return GST_FLOW_ERROR;
2729         } else {
2730           fsize += 64 * 1024;
2731           gst_buffer_unref (buffer);
2732           continue;
2733         }
2734       } else if (ret != GST_FLOW_OK) {
2735         gst_buffer_unref (buffer);
2736         GST_ERROR_OBJECT (parse, "detect() returned %s",
2737             gst_flow_get_name (ret));
2738         return ret;
2739       }
2740
2741       /* Else handle this buffer normally */
2742     }
2743
2744     skip = -1;
2745     gst_base_parse_frame_update (parse, frame, buffer);
2746     res = klass->check_valid_frame (parse, frame, &fsize, &skip);
2747     gst_buffer_replace (&frame->buffer, NULL);
2748     if (res) {
2749       parse->priv->drain = FALSE;
2750       GST_LOG_OBJECT (parse, "valid frame of size %d at pos %d", fsize, skip);
2751       break;
2752     }
2753     parse->priv->drain = FALSE;
2754     if (skip == -1)
2755       skip = 1;
2756     if (skip > 0) {
2757       GST_LOG_OBJECT (parse, "finding sync, skipping %d bytes", skip);
2758       if (full && parse->segment.rate < 0.0 && !parse->priv->buffers_queued) {
2759         /* reverse playback, and no frames found yet, so we are skipping
2760          * the leading part of a fragment, which may form the tail of
2761          * fragment coming later, hopefully subclass skips efficiently ... */
2762         outbuf = gst_buffer_copy_region (buffer, GST_BUFFER_COPY_ALL, 0, skip);
2763         parse->priv->buffers_pending =
2764             g_slist_prepend (parse->priv->buffers_pending, outbuf);
2765         outbuf = NULL;
2766       }
2767       parse->priv->offset += skip;
2768       if (!parse->priv->discont)
2769         parse->priv->sync_offset = parse->priv->offset;
2770       parse->priv->discont = TRUE;
2771       /* something changed at least; nullify loop check */
2772       if (fsize == G_MAXUINT)
2773         fsize = old_min_size + 64 * 1024;
2774       old_min_size = 0;
2775     }
2776     /* skip == 0 should imply subclass set min_size to need more data;
2777      * we check this shortly */
2778     GST_DEBUG_OBJECT (parse, "finding sync...");
2779     gst_buffer_unref (buffer);
2780     if ((ret = gst_base_parse_check_sync (parse)) != GST_FLOW_OK) {
2781       goto done;
2782     }
2783   }
2784
2785   /* Does the subclass want to skip too? */
2786   if (skip > 0)
2787     parse->priv->offset += skip;
2788   else if (skip < 0)
2789     skip = 0;
2790
2791   if (fsize + skip <= gst_buffer_get_size (buffer)) {
2792     outbuf = gst_buffer_copy_region (buffer, GST_BUFFER_COPY_ALL, skip, fsize);
2793     GST_BUFFER_OFFSET (outbuf) = GST_BUFFER_OFFSET (buffer) + skip;
2794     GST_BUFFER_TIMESTAMP (outbuf) = GST_CLOCK_TIME_NONE;
2795     gst_buffer_unref (buffer);
2796   } else {
2797     gst_buffer_unref (buffer);
2798     ret = gst_base_parse_pull_range (parse, fsize, &outbuf);
2799     if (ret != GST_FLOW_OK)
2800       goto done;
2801     if (gst_buffer_get_size (outbuf) < fsize) {
2802       gst_buffer_unref (outbuf);
2803       ret = GST_FLOW_EOS;
2804     }
2805   }
2806
2807   parse->priv->offset += fsize;
2808
2809   frame->buffer = outbuf;
2810
2811 done:
2812   return ret;
2813
2814   /* ERRORS */
2815 invalid_min:
2816   {
2817     GST_ELEMENT_ERROR (parse, STREAM, FAILED, (NULL),
2818         ("min_size evolution %d -> %d; breaking to avoid looping",
2819             old_min_size, min_size));
2820     return GST_FLOW_ERROR;
2821   }
2822 }
2823
2824 /* Loop that is used in pull mode to retrieve data from upstream */
2825 static void
2826 gst_base_parse_loop (GstPad * pad)
2827 {
2828   GstBaseParse *parse;
2829   GstBaseParseClass *klass;
2830   GstFlowReturn ret = GST_FLOW_OK;
2831   GstBaseParseFrame frame;
2832
2833   parse = GST_BASE_PARSE (gst_pad_get_parent (pad));
2834   klass = GST_BASE_PARSE_GET_CLASS (parse);
2835
2836   /* reverse playback:
2837    * first fragment (closest to stop time) is handled normally below,
2838    * then we pull in fragments going backwards */
2839   if (parse->segment.rate < 0.0) {
2840     /* check if we jumped back to a previous fragment,
2841      * which is a post-first fragment */
2842     if (parse->priv->offset < 0) {
2843       ret = gst_base_parse_handle_previous_fragment (parse);
2844       goto done;
2845     }
2846   }
2847
2848   gst_base_parse_frame_init (&frame);
2849   ret = gst_base_parse_scan_frame (parse, klass, &frame, TRUE);
2850   if (ret != GST_FLOW_OK)
2851     goto done;
2852
2853   /* This always cleans up frame, even if error occurs */
2854   ret = gst_base_parse_handle_and_push_frame (parse, klass, &frame);
2855
2856   /* eat expected eos signalling past segment in reverse playback */
2857   if (parse->segment.rate < 0.0 && ret == GST_FLOW_EOS &&
2858       parse->segment.position >= parse->segment.stop) {
2859     GST_DEBUG_OBJECT (parse, "downstream has reached end of segment");
2860     /* push what was accumulated during loop run */
2861     gst_base_parse_process_fragment (parse, TRUE);
2862     /* force previous fragment */
2863     parse->priv->offset = -1;
2864     ret = GST_FLOW_OK;
2865   }
2866
2867 done:
2868   if (ret == GST_FLOW_EOS)
2869     goto eos;
2870   else if (ret != GST_FLOW_OK)
2871     goto pause;
2872
2873   gst_object_unref (parse);
2874   return;
2875
2876   /* ERRORS */
2877 eos:
2878   {
2879     ret = GST_FLOW_EOS;
2880     GST_DEBUG_OBJECT (parse, "eos");
2881     /* fall-through */
2882   }
2883 pause:
2884   {
2885     gboolean push_eos = FALSE;
2886
2887     GST_DEBUG_OBJECT (parse, "pausing task, reason %s",
2888         gst_flow_get_name (ret));
2889     gst_pad_pause_task (parse->sinkpad);
2890
2891     if (ret == GST_FLOW_EOS) {
2892       /* handle end-of-stream/segment */
2893       if (parse->segment.flags & GST_SEEK_FLAG_SEGMENT) {
2894         gint64 stop;
2895
2896         if ((stop = parse->segment.stop) == -1)
2897           stop = parse->segment.duration;
2898
2899         GST_DEBUG_OBJECT (parse, "sending segment_done");
2900
2901         gst_element_post_message
2902             (GST_ELEMENT_CAST (parse),
2903             gst_message_new_segment_done (GST_OBJECT_CAST (parse),
2904                 GST_FORMAT_TIME, stop));
2905       } else {
2906         /* If we STILL have zero frames processed, fire an error */
2907         if (parse->priv->framecount == 0) {
2908           GST_ELEMENT_ERROR (parse, STREAM, WRONG_TYPE,
2909               ("No valid frames found before end of stream"), (NULL));
2910         }
2911         push_eos = TRUE;
2912       }
2913     } else if (ret == GST_FLOW_NOT_LINKED || ret < GST_FLOW_EOS) {
2914       /* for fatal errors we post an error message, wrong-state is
2915        * not fatal because it happens due to flushes and only means
2916        * that we should stop now. */
2917       GST_ELEMENT_ERROR (parse, STREAM, FAILED, (NULL),
2918           ("streaming stopped, reason %s", gst_flow_get_name (ret)));
2919       push_eos = TRUE;
2920     }
2921     if (push_eos) {
2922       /* newsegment before eos */
2923       if (parse->priv->pending_segment) {
2924         gst_pad_push_event (parse->srcpad, parse->priv->pending_segment);
2925         parse->priv->pending_segment = NULL;
2926       }
2927       gst_pad_push_event (parse->srcpad, gst_event_new_eos ());
2928     }
2929     gst_object_unref (parse);
2930   }
2931 }
2932
2933 static gboolean
2934 gst_base_parse_sink_activate (GstPad * sinkpad)
2935 {
2936   GstBaseParse *parse;
2937   gboolean result = TRUE;
2938   GstQuery *query;
2939   gboolean pull_mode;
2940
2941   parse = GST_BASE_PARSE (gst_pad_get_parent (sinkpad));
2942
2943   GST_DEBUG_OBJECT (parse, "sink activate");
2944
2945   query = gst_query_new_scheduling ();
2946   result = gst_pad_peer_query (sinkpad, query);
2947   if (result) {
2948     gst_query_parse_scheduling (query, &pull_mode, NULL, NULL, NULL, NULL,
2949         NULL);
2950   } else {
2951     pull_mode = FALSE;
2952   }
2953   gst_query_unref (query);
2954
2955   if (pull_mode) {
2956     GST_DEBUG_OBJECT (parse, "trying to activate in pull mode");
2957     result = gst_pad_activate_pull (sinkpad, TRUE);
2958   } else {
2959     GST_DEBUG_OBJECT (parse, "trying to activate in push mode");
2960     result = gst_pad_activate_push (sinkpad, TRUE);
2961   }
2962
2963   GST_DEBUG_OBJECT (parse, "sink activate return %d", result);
2964   gst_object_unref (parse);
2965   return result;
2966 }
2967
2968 static gboolean
2969 gst_base_parse_activate (GstBaseParse * parse, gboolean active)
2970 {
2971   GstBaseParseClass *klass;
2972   gboolean result = TRUE;
2973
2974   GST_DEBUG_OBJECT (parse, "activate %d", active);
2975
2976   klass = GST_BASE_PARSE_GET_CLASS (parse);
2977
2978   if (active) {
2979     if (parse->priv->pad_mode == GST_PAD_ACTIVATE_NONE && klass->start)
2980       result = klass->start (parse);
2981
2982     /* If the subclass implements ::detect we want to
2983      * call it for the first buffers now */
2984     parse->priv->detecting = (klass->detect != NULL);
2985   } else {
2986     /* We must make sure streaming has finished before resetting things
2987      * and calling the ::stop vfunc */
2988     GST_PAD_STREAM_LOCK (parse->sinkpad);
2989     GST_PAD_STREAM_UNLOCK (parse->sinkpad);
2990
2991     if (parse->priv->pad_mode != GST_PAD_ACTIVATE_NONE && klass->stop)
2992       result = klass->stop (parse);
2993
2994     parse->priv->pad_mode = GST_PAD_ACTIVATE_NONE;
2995   }
2996   GST_DEBUG_OBJECT (parse, "activate return: %d", result);
2997   return result;
2998 }
2999
3000 static gboolean
3001 gst_base_parse_sink_activate_push (GstPad * pad, gboolean active)
3002 {
3003   gboolean result = TRUE;
3004   GstBaseParse *parse;
3005
3006   parse = GST_BASE_PARSE (gst_pad_get_parent (pad));
3007
3008   GST_DEBUG_OBJECT (parse, "sink activate push %d", active);
3009
3010   result = gst_base_parse_activate (parse, active);
3011
3012   if (result)
3013     parse->priv->pad_mode =
3014         active ? GST_PAD_ACTIVATE_PUSH : GST_PAD_ACTIVATE_NONE;
3015
3016   GST_DEBUG_OBJECT (parse, "sink activate push return: %d", result);
3017
3018   gst_object_unref (parse);
3019   return result;
3020 }
3021
3022 static gboolean
3023 gst_base_parse_sink_activate_pull (GstPad * sinkpad, gboolean active)
3024 {
3025   gboolean result = FALSE;
3026   GstBaseParse *parse;
3027
3028   parse = GST_BASE_PARSE (gst_pad_get_parent (sinkpad));
3029
3030   GST_DEBUG_OBJECT (parse, "activate pull %d", active);
3031
3032   result = gst_base_parse_activate (parse, active);
3033
3034   if (result) {
3035     if (active) {
3036       parse->priv->pending_segment = gst_event_new_segment (&parse->segment);
3037       result &=
3038           gst_pad_start_task (sinkpad, (GstTaskFunction) gst_base_parse_loop,
3039           sinkpad);
3040     } else {
3041       result &= gst_pad_stop_task (sinkpad);
3042     }
3043   }
3044
3045   if (result)
3046     parse->priv->pad_mode =
3047         active ? GST_PAD_ACTIVATE_PULL : GST_PAD_ACTIVATE_NONE;
3048
3049   GST_DEBUG_OBJECT (parse, "sink activate pull return: %d", result);
3050
3051   gst_object_unref (parse);
3052   return result;
3053 }
3054
3055
3056 /**
3057  * gst_base_parse_set_duration:
3058  * @parse: #GstBaseParse.
3059  * @fmt: #GstFormat.
3060  * @duration: duration value.
3061  * @interval: how often to update the duration estimate based on bitrate, or 0.
3062  *
3063  * Sets the duration of the currently playing media. Subclass can use this
3064  * when it is able to determine duration and/or notices a change in the media
3065  * duration.  Alternatively, if @interval is non-zero (default), then stream
3066  * duration is determined based on estimated bitrate, and updated every @interval
3067  * frames.
3068  *
3069  * Since: 0.10.33
3070  */
3071 void
3072 gst_base_parse_set_duration (GstBaseParse * parse,
3073     GstFormat fmt, gint64 duration, gint interval)
3074 {
3075   g_return_if_fail (parse != NULL);
3076
3077   if (parse->priv->upstream_has_duration) {
3078     GST_DEBUG_OBJECT (parse, "using upstream duration; discarding update");
3079     goto exit;
3080   }
3081
3082   if (duration != parse->priv->duration) {
3083     GstMessage *m;
3084
3085     m = gst_message_new_duration (GST_OBJECT (parse), fmt, duration);
3086     gst_element_post_message (GST_ELEMENT (parse), m);
3087
3088     /* TODO: what about duration tag? */
3089   }
3090   parse->priv->duration = duration;
3091   parse->priv->duration_fmt = fmt;
3092   GST_DEBUG_OBJECT (parse, "set duration: %" G_GINT64_FORMAT, duration);
3093   if (fmt == GST_FORMAT_TIME && GST_CLOCK_TIME_IS_VALID (duration)) {
3094     if (interval != 0) {
3095       GST_DEBUG_OBJECT (parse, "valid duration provided, disabling estimate");
3096       interval = 0;
3097     }
3098   }
3099   GST_DEBUG_OBJECT (parse, "set update interval: %d", interval);
3100   parse->priv->update_interval = interval;
3101 exit:
3102   return;
3103 }
3104
3105 /**
3106  * gst_base_parse_set_average_bitrate:
3107  * @parse: #GstBaseParse.
3108  * @bitrate: average bitrate in bits/second
3109  *
3110  * Optionally sets the average bitrate detected in media (if non-zero),
3111  * e.g. based on metadata, as it will be posted to the application.
3112  *
3113  * By default, announced average bitrate is estimated. The average bitrate
3114  * is used to estimate the total duration of the stream and to estimate
3115  * a seek position, if there's no index and the format is syncable
3116  * (see gst_base_parse_set_syncable()).
3117  *
3118  * Since: 0.10.33
3119  */
3120 void
3121 gst_base_parse_set_average_bitrate (GstBaseParse * parse, guint bitrate)
3122 {
3123   parse->priv->bitrate = bitrate;
3124   GST_DEBUG_OBJECT (parse, "bitrate %u", bitrate);
3125 }
3126
3127 /**
3128  * gst_base_parse_set_min_frame_size:
3129  * @parse: #GstBaseParse.
3130  * @min_size: Minimum size of the data that this base class should give to
3131  *            subclass.
3132  *
3133  * Subclass can use this function to tell the base class that it needs to
3134  * give at least #min_size buffers.
3135  *
3136  * Since: 0.10.33
3137  */
3138 void
3139 gst_base_parse_set_min_frame_size (GstBaseParse * parse, guint min_size)
3140 {
3141   g_return_if_fail (parse != NULL);
3142
3143   parse->priv->min_frame_size = min_size;
3144   GST_LOG_OBJECT (parse, "set frame_min_size: %d", min_size);
3145 }
3146
3147 /**
3148  * gst_base_parse_set_frame_rate:
3149  * @parse: the #GstBaseParse to set
3150  * @fps_num: frames per second (numerator).
3151  * @fps_den: frames per second (denominator).
3152  * @lead_in: frames needed before a segment for subsequent decode
3153  * @lead_out: frames needed after a segment
3154  *
3155  * If frames per second is configured, parser can take care of buffer duration
3156  * and timestamping.  When performing segment clipping, or seeking to a specific
3157  * location, a corresponding decoder might need an initial @lead_in and a
3158  * following @lead_out number of frames to ensure the desired segment is
3159  * entirely filled upon decoding.
3160  *
3161  * Since: 0.10.33
3162  */
3163 void
3164 gst_base_parse_set_frame_rate (GstBaseParse * parse, guint fps_num,
3165     guint fps_den, guint lead_in, guint lead_out)
3166 {
3167   g_return_if_fail (parse != NULL);
3168
3169   parse->priv->fps_num = fps_num;
3170   parse->priv->fps_den = fps_den;
3171   if (!fps_num || !fps_den) {
3172     GST_DEBUG_OBJECT (parse, "invalid fps (%d/%d), ignoring parameters",
3173         fps_num, fps_den);
3174     fps_num = fps_den = 0;
3175     parse->priv->frame_duration = GST_CLOCK_TIME_NONE;
3176     parse->priv->lead_in = parse->priv->lead_out = 0;
3177     parse->priv->lead_in_ts = parse->priv->lead_out_ts = 0;
3178   } else {
3179     parse->priv->frame_duration =
3180         gst_util_uint64_scale (GST_SECOND, fps_den, fps_num);
3181     parse->priv->lead_in = lead_in;
3182     parse->priv->lead_out = lead_out;
3183     parse->priv->lead_in_ts =
3184         gst_util_uint64_scale (GST_SECOND, fps_den * lead_in, fps_num);
3185     parse->priv->lead_out_ts =
3186         gst_util_uint64_scale (GST_SECOND, fps_den * lead_out, fps_num);
3187     /* aim for about 1.5s to estimate duration */
3188     if (parse->priv->update_interval < 0) {
3189       parse->priv->update_interval = fps_num * 3 / (fps_den * 2);
3190       GST_LOG_OBJECT (parse, "estimated update interval to %d frames",
3191           parse->priv->update_interval);
3192     }
3193   }
3194   GST_LOG_OBJECT (parse, "set fps: %d/%d => duration: %" G_GINT64_FORMAT " ms",
3195       fps_num, fps_den, parse->priv->frame_duration / GST_MSECOND);
3196   GST_LOG_OBJECT (parse, "set lead in: %d frames = %" G_GUINT64_FORMAT " ms, "
3197       "lead out: %d frames = %" G_GUINT64_FORMAT " ms",
3198       lead_in, parse->priv->lead_in_ts / GST_MSECOND,
3199       lead_out, parse->priv->lead_out_ts / GST_MSECOND);
3200 }
3201
3202 /**
3203  * gst_base_parse_set_has_timing_info:
3204  * @parse: a #GstBaseParse
3205  * @has_timing: whether frames carry timing information
3206  *
3207  * Set if frames carry timing information which the subclass can (generally)
3208  * parse and provide.  In particular, intrinsic (rather than estimated) time
3209  * can be obtained following a seek.
3210  *
3211  * Since: 0.10.33
3212  */
3213 void
3214 gst_base_parse_set_has_timing_info (GstBaseParse * parse, gboolean has_timing)
3215 {
3216   parse->priv->has_timing_info = has_timing;
3217   GST_INFO_OBJECT (parse, "has_timing: %s", (has_timing) ? "yes" : "no");
3218 }
3219
3220 /**
3221  * gst_base_parse_set_syncable:
3222  * @parse: a #GstBaseParse
3223  * @syncable: set if frame starts can be identified
3224  *
3225  * Set if frame starts can be identified. This is set by default and
3226  * determines whether seeking based on bitrate averages
3227  * is possible for a format/stream.
3228  *
3229  * Since: 0.10.33
3230  */
3231 void
3232 gst_base_parse_set_syncable (GstBaseParse * parse, gboolean syncable)
3233 {
3234   parse->priv->syncable = syncable;
3235   GST_INFO_OBJECT (parse, "syncable: %s", (syncable) ? "yes" : "no");
3236 }
3237
3238 /**
3239  * gst_base_parse_set_passthrough:
3240  * @parse: a #GstBaseParse
3241  * @passthrough: %TRUE if parser should run in passthrough mode
3242  *
3243  * Set if the nature of the format or configuration does not allow (much)
3244  * parsing, and the parser should operate in passthrough mode (which only
3245  * applies when operating in push mode). That is, incoming buffers are
3246  * pushed through unmodified, i.e. no @check_valid_frame or @parse_frame
3247  * callbacks will be invoked, but @pre_push_frame will still be invoked,
3248  * so subclass can perform as much or as little is appropriate for
3249  * passthrough semantics in @pre_push_frame.
3250  *
3251  * Since: 0.10.33
3252  */
3253 void
3254 gst_base_parse_set_passthrough (GstBaseParse * parse, gboolean passthrough)
3255 {
3256   parse->priv->passthrough = passthrough;
3257   GST_INFO_OBJECT (parse, "passthrough: %s", (passthrough) ? "yes" : "no");
3258 }
3259
3260 /**
3261  * gst_base_parse_set_latency:
3262  * @parse: a #GstBaseParse
3263  * @min_latency: minimum parse latency
3264  * @max_latency: maximum parse latency
3265  *
3266  * Sets the minimum and maximum (which may likely be equal) latency introduced
3267  * by the parsing process.  If there is such a latency, which depends on the
3268  * particular parsing of the format, it typically corresponds to 1 frame duration.
3269  *
3270  * Since: 0.10.36
3271  */
3272 void
3273 gst_base_parse_set_latency (GstBaseParse * parse, GstClockTime min_latency,
3274     GstClockTime max_latency)
3275 {
3276   GST_OBJECT_LOCK (parse);
3277   parse->priv->min_latency = min_latency;
3278   parse->priv->max_latency = max_latency;
3279   GST_OBJECT_UNLOCK (parse);
3280   GST_INFO_OBJECT (parse, "min/max latency %" GST_TIME_FORMAT ", %"
3281       GST_TIME_FORMAT, GST_TIME_ARGS (min_latency),
3282       GST_TIME_ARGS (max_latency));
3283 }
3284
3285 static gboolean
3286 gst_base_parse_get_duration (GstBaseParse * parse, GstFormat format,
3287     GstClockTime * duration)
3288 {
3289   gboolean res = FALSE;
3290
3291   g_return_val_if_fail (duration != NULL, FALSE);
3292
3293   *duration = GST_CLOCK_TIME_NONE;
3294   if (parse->priv->duration != -1 && format == parse->priv->duration_fmt) {
3295     GST_LOG_OBJECT (parse, "using provided duration");
3296     *duration = parse->priv->duration;
3297     res = TRUE;
3298   } else if (parse->priv->duration != -1) {
3299     GST_LOG_OBJECT (parse, "converting provided duration");
3300     res = gst_base_parse_convert (parse, parse->priv->duration_fmt,
3301         parse->priv->duration, format, (gint64 *) duration);
3302   } else if (format == GST_FORMAT_TIME && parse->priv->estimated_duration != -1) {
3303     GST_LOG_OBJECT (parse, "using estimated duration");
3304     *duration = parse->priv->estimated_duration;
3305     res = TRUE;
3306   }
3307
3308   GST_LOG_OBJECT (parse, "res: %d, duration %" GST_TIME_FORMAT, res,
3309       GST_TIME_ARGS (*duration));
3310   return res;
3311 }
3312
3313 static gboolean
3314 gst_base_parse_src_query (GstPad * pad, GstObject * parent, GstQuery * query)
3315 {
3316   GstBaseParse *parse;
3317   gboolean res = FALSE;
3318
3319   parse = GST_BASE_PARSE (parent);
3320
3321   GST_LOG_OBJECT (parse, "handling query: %" GST_PTR_FORMAT, query);
3322
3323   switch (GST_QUERY_TYPE (query)) {
3324     case GST_QUERY_POSITION:
3325     {
3326       gint64 dest_value;
3327       GstFormat format;
3328
3329       GST_DEBUG_OBJECT (parse, "position query");
3330       gst_query_parse_position (query, &format, NULL);
3331
3332       /* try upstream first */
3333       res = gst_pad_query_default (pad, parent, query);
3334       if (!res) {
3335         /* Fall back on interpreting segment */
3336         GST_OBJECT_LOCK (parse);
3337         if (format == GST_FORMAT_BYTES) {
3338           dest_value = parse->priv->offset;
3339           res = TRUE;
3340         } else if (format == parse->segment.format &&
3341             GST_CLOCK_TIME_IS_VALID (parse->segment.position)) {
3342           dest_value = gst_segment_to_stream_time (&parse->segment,
3343               parse->segment.format, parse->segment.position);
3344           res = TRUE;
3345         }
3346         GST_OBJECT_UNLOCK (parse);
3347         if (!res) {
3348           /* no precise result, upstream no idea either, then best estimate */
3349           /* priv->offset is updated in both PUSH/PULL modes */
3350           res = gst_base_parse_convert (parse,
3351               GST_FORMAT_BYTES, parse->priv->offset, format, &dest_value);
3352         }
3353         if (res)
3354           gst_query_set_position (query, format, dest_value);
3355       }
3356       break;
3357     }
3358     case GST_QUERY_DURATION:
3359     {
3360       GstFormat format;
3361       GstClockTime duration;
3362
3363       GST_DEBUG_OBJECT (parse, "duration query");
3364       gst_query_parse_duration (query, &format, NULL);
3365
3366       /* consult upstream */
3367       res = gst_pad_query_default (pad, parent, query);
3368
3369       /* otherwise best estimate from us */
3370       if (!res) {
3371         res = gst_base_parse_get_duration (parse, format, &duration);
3372         if (res)
3373           gst_query_set_duration (query, format, duration);
3374       }
3375       break;
3376     }
3377     case GST_QUERY_SEEKING:
3378     {
3379       GstFormat fmt;
3380       GstClockTime duration = GST_CLOCK_TIME_NONE;
3381       gboolean seekable = FALSE;
3382
3383       GST_DEBUG_OBJECT (parse, "seeking query");
3384       gst_query_parse_seeking (query, &fmt, NULL, NULL, NULL);
3385
3386       /* consult upstream */
3387       res = gst_pad_query_default (pad, parent, query);
3388
3389       /* we may be able to help if in TIME */
3390       if (fmt == GST_FORMAT_TIME && gst_base_parse_is_seekable (parse)) {
3391         gst_query_parse_seeking (query, &fmt, &seekable, NULL, NULL);
3392         /* already OK if upstream takes care */
3393         GST_LOG_OBJECT (parse, "upstream handled %d, seekable %d",
3394             res, seekable);
3395         if (!(res && seekable)) {
3396           if (!gst_base_parse_get_duration (parse, GST_FORMAT_TIME, &duration)
3397               || duration == -1) {
3398             /* seekable if we still have a chance to get duration later on */
3399             seekable =
3400                 parse->priv->upstream_seekable && parse->priv->update_interval;
3401           } else {
3402             seekable = parse->priv->upstream_seekable;
3403             GST_LOG_OBJECT (parse, "already determine upstream seekabled: %d",
3404                 seekable);
3405           }
3406           gst_query_set_seeking (query, GST_FORMAT_TIME, seekable, 0, duration);
3407           res = TRUE;
3408         }
3409       }
3410       break;
3411     }
3412     case GST_QUERY_FORMATS:
3413       gst_query_set_formatsv (query, 3, fmtlist);
3414       res = TRUE;
3415       break;
3416     case GST_QUERY_CONVERT:
3417     {
3418       GstFormat src_format, dest_format;
3419       gint64 src_value, dest_value;
3420
3421       gst_query_parse_convert (query, &src_format, &src_value,
3422           &dest_format, &dest_value);
3423
3424       res = gst_base_parse_convert (parse, src_format, src_value,
3425           dest_format, &dest_value);
3426       if (res) {
3427         gst_query_set_convert (query, src_format, src_value,
3428             dest_format, dest_value);
3429       }
3430       break;
3431     }
3432     case GST_QUERY_LATENCY:
3433     {
3434       if ((res = gst_pad_peer_query (parse->sinkpad, query))) {
3435         gboolean live;
3436         GstClockTime min_latency, max_latency;
3437
3438         gst_query_parse_latency (query, &live, &min_latency, &max_latency);
3439         GST_DEBUG_OBJECT (parse, "Peer latency: live %d, min %"
3440             GST_TIME_FORMAT " max %" GST_TIME_FORMAT, live,
3441             GST_TIME_ARGS (min_latency), GST_TIME_ARGS (max_latency));
3442
3443         GST_OBJECT_LOCK (parse);
3444         /* add our latency */
3445         if (min_latency != -1)
3446           min_latency += parse->priv->min_latency;
3447         if (max_latency != -1)
3448           max_latency += parse->priv->max_latency;
3449         GST_OBJECT_UNLOCK (parse);
3450
3451         gst_query_set_latency (query, live, min_latency, max_latency);
3452       }
3453       break;
3454     }
3455     default:
3456       res = gst_pad_query_default (pad, parent, query);
3457       break;
3458   }
3459   return res;
3460 }
3461
3462 /* scans for a cluster start from @pos,
3463  * return GST_FLOW_OK and frame position/time in @pos/@time if found */
3464 static GstFlowReturn
3465 gst_base_parse_find_frame (GstBaseParse * parse, gint64 * pos,
3466     GstClockTime * time, GstClockTime * duration)
3467 {
3468   GstBaseParseClass *klass;
3469   gint64 orig_offset;
3470   gboolean orig_drain, orig_discont;
3471   GstFlowReturn ret = GST_FLOW_OK;
3472   GstBuffer *buf = NULL;
3473   GstBaseParseFrame frame;
3474
3475   g_return_val_if_fail (pos != NULL, GST_FLOW_ERROR);
3476   g_return_val_if_fail (time != NULL, GST_FLOW_ERROR);
3477   g_return_val_if_fail (duration != NULL, GST_FLOW_ERROR);
3478
3479   klass = GST_BASE_PARSE_GET_CLASS (parse);
3480
3481   *time = GST_CLOCK_TIME_NONE;
3482   *duration = GST_CLOCK_TIME_NONE;
3483
3484   /* save state */
3485   orig_offset = parse->priv->offset;
3486   orig_discont = parse->priv->discont;
3487   orig_drain = parse->priv->drain;
3488
3489   GST_DEBUG_OBJECT (parse, "scanning for frame starting at %" G_GINT64_FORMAT
3490       " (%#" G_GINT64_MODIFIER "x)", *pos, *pos);
3491
3492   gst_base_parse_frame_init (&frame);
3493
3494   /* jump elsewhere and locate next frame */
3495   parse->priv->offset = *pos;
3496   ret = gst_base_parse_scan_frame (parse, klass, &frame, FALSE);
3497   if (ret != GST_FLOW_OK)
3498     goto done;
3499
3500   buf = frame.buffer;
3501   GST_LOG_OBJECT (parse,
3502       "peek parsing frame at offset %" G_GUINT64_FORMAT
3503       " (%#" G_GINT64_MODIFIER "x) of size %" G_GSIZE_FORMAT,
3504       GST_BUFFER_OFFSET (buf), GST_BUFFER_OFFSET (buf),
3505       gst_buffer_get_size (buf));
3506
3507   /* get offset first, subclass parsing might dump other stuff in there */
3508   *pos = GST_BUFFER_OFFSET (buf);
3509   ret = klass->parse_frame (parse, &frame);
3510   buf = frame.buffer;
3511
3512   /* but it should provide proper time */
3513   *time = GST_BUFFER_TIMESTAMP (buf);
3514   *duration = GST_BUFFER_DURATION (buf);
3515
3516   gst_base_parse_frame_free (&frame);
3517
3518   GST_LOG_OBJECT (parse,
3519       "frame with time %" GST_TIME_FORMAT " at offset %" G_GINT64_FORMAT,
3520       GST_TIME_ARGS (*time), *pos);
3521
3522 done:
3523   /* restore state */
3524   parse->priv->offset = orig_offset;
3525   parse->priv->discont = orig_discont;
3526   parse->priv->drain = orig_drain;
3527
3528   return ret;
3529 }
3530
3531 /* bisect and scan through file for frame starting before @time,
3532  * returns OK and @time/@offset if found, NONE and/or error otherwise
3533  * If @time == G_MAXINT64, scan for duration ( == last frame) */
3534 static GstFlowReturn
3535 gst_base_parse_locate_time (GstBaseParse * parse, GstClockTime * _time,
3536     gint64 * _offset)
3537 {
3538   GstFlowReturn ret = GST_FLOW_OK;
3539   gint64 lpos, hpos, newpos;
3540   GstClockTime time, ltime, htime, newtime, dur;
3541   gboolean cont = TRUE;
3542   const GstClockTime tolerance = TARGET_DIFFERENCE;
3543   const guint chunk = 4 * 1024;
3544
3545   g_return_val_if_fail (_time != NULL, GST_FLOW_ERROR);
3546   g_return_val_if_fail (_offset != NULL, GST_FLOW_ERROR);
3547
3548   /* TODO also make keyframe aware if useful some day */
3549
3550   time = *_time;
3551
3552   /* basic cases */
3553   if (time == 0) {
3554     *_offset = 0;
3555     return GST_FLOW_OK;
3556   }
3557
3558   if (time == -1) {
3559     *_offset = -1;
3560     return GST_FLOW_OK;
3561   }
3562
3563   /* do not know at first */
3564   *_offset = -1;
3565   *_time = GST_CLOCK_TIME_NONE;
3566
3567   /* need initial positions; start and end */
3568   lpos = parse->priv->first_frame_offset;
3569   ltime = parse->priv->first_frame_ts;
3570   htime = parse->priv->duration;
3571   hpos = parse->priv->upstream_size;
3572
3573   /* check preconditions are satisfied;
3574    * start and end are needed, except for special case where we scan for
3575    * last frame to determine duration */
3576   if (parse->priv->pad_mode != GST_PAD_ACTIVATE_PULL || !hpos ||
3577       !GST_CLOCK_TIME_IS_VALID (ltime) ||
3578       (!GST_CLOCK_TIME_IS_VALID (htime) && time != G_MAXINT64)) {
3579     return GST_FLOW_OK;
3580   }
3581
3582   /* shortcut cases */
3583   if (time < ltime) {
3584     goto exit;
3585   } else if (time < ltime + tolerance) {
3586     *_offset = lpos;
3587     *_time = ltime;
3588     goto exit;
3589   } else if (time >= htime) {
3590     *_offset = hpos;
3591     *_time = htime;
3592     goto exit;
3593   }
3594
3595   while (htime > ltime && cont) {
3596     GST_LOG_OBJECT (parse,
3597         "lpos: %" G_GUINT64_FORMAT ", ltime: %" GST_TIME_FORMAT, lpos,
3598         GST_TIME_ARGS (ltime));
3599     GST_LOG_OBJECT (parse,
3600         "hpos: %" G_GUINT64_FORMAT ", htime: %" GST_TIME_FORMAT, hpos,
3601         GST_TIME_ARGS (htime));
3602     if (G_UNLIKELY (time == G_MAXINT64)) {
3603       newpos = hpos;
3604     } else if (G_LIKELY (hpos > lpos)) {
3605       newpos =
3606           gst_util_uint64_scale (hpos - lpos, time - ltime, htime - ltime) +
3607           lpos - chunk;
3608     } else {
3609       /* should mean lpos == hpos, since lpos <= hpos is invariant */
3610       newpos = lpos;
3611       /* we check this case once, but not forever, so break loop */
3612       cont = FALSE;
3613     }
3614
3615     /* ensure */
3616     newpos = CLAMP (newpos, lpos, hpos);
3617     GST_LOG_OBJECT (parse,
3618         "estimated _offset for %" GST_TIME_FORMAT ": %" G_GINT64_FORMAT,
3619         GST_TIME_ARGS (time), newpos);
3620
3621     ret = gst_base_parse_find_frame (parse, &newpos, &newtime, &dur);
3622     if (ret == GST_FLOW_EOS) {
3623       /* heuristic HACK */
3624       hpos = MAX (lpos, hpos - chunk);
3625       continue;
3626     } else if (ret != GST_FLOW_OK) {
3627       goto exit;
3628     }
3629
3630     if (newtime == -1 || newpos == -1) {
3631       GST_DEBUG_OBJECT (parse, "subclass did not provide metadata; aborting");
3632       break;
3633     }
3634
3635     if (G_UNLIKELY (time == G_MAXINT64)) {
3636       *_offset = newpos;
3637       *_time = newtime;
3638       if (GST_CLOCK_TIME_IS_VALID (dur))
3639         *_time += dur;
3640       break;
3641     } else if (newtime > time) {
3642       /* overshoot */
3643       hpos = (newpos >= hpos) ? MAX (lpos, hpos - chunk) : MAX (lpos, newpos);
3644       htime = newtime;
3645     } else if (newtime + tolerance > time) {
3646       /* close enough undershoot */
3647       *_offset = newpos;
3648       *_time = newtime;
3649       break;
3650     } else if (newtime < ltime) {
3651       /* so a position beyond lpos resulted in earlier time than ltime ... */
3652       GST_DEBUG_OBJECT (parse, "non-ascending time; aborting");
3653       break;
3654     } else {
3655       /* undershoot too far */
3656       newpos += newpos == lpos ? chunk : 0;
3657       lpos = CLAMP (newpos, lpos, hpos);
3658       ltime = newtime;
3659     }
3660   }
3661
3662 exit:
3663   GST_LOG_OBJECT (parse, "return offset %" G_GINT64_FORMAT ", time %"
3664       GST_TIME_FORMAT, *_offset, GST_TIME_ARGS (*_time));
3665   return ret;
3666 }
3667
3668 static gint64
3669 gst_base_parse_find_offset (GstBaseParse * parse, GstClockTime time,
3670     gboolean before, GstClockTime * _ts)
3671 {
3672   gint64 bytes = 0, ts = 0;
3673   GstIndexEntry *entry = NULL;
3674
3675   if (time == GST_CLOCK_TIME_NONE) {
3676     ts = time;
3677     bytes = -1;
3678     goto exit;
3679   }
3680
3681   g_static_mutex_lock (&parse->priv->index_lock);
3682   if (parse->priv->index) {
3683     /* Let's check if we have an index entry for that time */
3684     entry = gst_index_get_assoc_entry (parse->priv->index,
3685         parse->priv->index_id,
3686         before ? GST_INDEX_LOOKUP_BEFORE : GST_INDEX_LOOKUP_AFTER,
3687         GST_ASSOCIATION_FLAG_KEY_UNIT, GST_FORMAT_TIME, time);
3688   }
3689
3690   if (entry) {
3691     gst_index_entry_assoc_map (entry, GST_FORMAT_BYTES, &bytes);
3692     gst_index_entry_assoc_map (entry, GST_FORMAT_TIME, &ts);
3693
3694     GST_DEBUG_OBJECT (parse, "found index entry for %" GST_TIME_FORMAT
3695         " at %" GST_TIME_FORMAT ", offset %" G_GINT64_FORMAT,
3696         GST_TIME_ARGS (time), GST_TIME_ARGS (ts), bytes);
3697   } else {
3698     GST_DEBUG_OBJECT (parse, "no index entry found for %" GST_TIME_FORMAT,
3699         GST_TIME_ARGS (time));
3700     if (!before) {
3701       bytes = -1;
3702       ts = GST_CLOCK_TIME_NONE;
3703     }
3704   }
3705   g_static_mutex_unlock (&parse->priv->index_lock);
3706
3707 exit:
3708   if (_ts)
3709     *_ts = ts;
3710
3711   return bytes;
3712 }
3713
3714 /* returns TRUE if seek succeeded */
3715 static gboolean
3716 gst_base_parse_handle_seek (GstBaseParse * parse, GstEvent * event)
3717 {
3718   gdouble rate;
3719   GstFormat format;
3720   GstSeekFlags flags;
3721   GstSeekType cur_type = GST_SEEK_TYPE_NONE, stop_type;
3722   gboolean flush, update, res = TRUE, accurate;
3723   gint64 cur, stop, seekpos, seekstop;
3724   GstSegment seeksegment = { 0, };
3725   GstClockTime start_ts;
3726
3727   gst_event_parse_seek (event, &rate, &format, &flags,
3728       &cur_type, &cur, &stop_type, &stop);
3729
3730   GST_DEBUG_OBJECT (parse, "seek to format %s, rate %f, "
3731       "start type %d at %" GST_TIME_FORMAT ", end type %d at %"
3732       GST_TIME_FORMAT, gst_format_get_name (format), rate,
3733       cur_type, GST_TIME_ARGS (cur), stop_type, GST_TIME_ARGS (stop));
3734
3735   /* no negative rates in push mode */
3736   if (rate < 0.0 && parse->priv->pad_mode == GST_PAD_ACTIVATE_PUSH)
3737     goto negative_rate;
3738
3739   if (cur_type != GST_SEEK_TYPE_SET ||
3740       (stop_type != GST_SEEK_TYPE_SET && stop_type != GST_SEEK_TYPE_NONE))
3741     goto wrong_type;
3742
3743   /* For any format other than TIME, see if upstream handles
3744    * it directly or fail. For TIME, try upstream, but do it ourselves if
3745    * it fails upstream */
3746   if (format != GST_FORMAT_TIME) {
3747     /* default action delegates to upstream */
3748     res = FALSE;
3749     goto done;
3750   } else {
3751     gst_event_ref (event);
3752     if ((res = gst_pad_push_event (parse->sinkpad, event))) {
3753       goto done;
3754     }
3755   }
3756
3757   /* get flush flag */
3758   flush = flags & GST_SEEK_FLAG_FLUSH;
3759
3760   /* copy segment, we need this because we still need the old
3761    * segment when we close the current segment. */
3762   gst_segment_copy_into (&parse->segment, &seeksegment);
3763
3764   GST_DEBUG_OBJECT (parse, "configuring seek");
3765   gst_segment_do_seek (&seeksegment, rate, format, flags,
3766       cur_type, cur, stop_type, stop, &update);
3767
3768   /* accurate seeking implies seek tables are used to obtain position,
3769    * and the requested segment is maintained exactly, not adjusted any way */
3770   accurate = flags & GST_SEEK_FLAG_ACCURATE;
3771
3772   /* maybe we can be accurate for (almost) free */
3773   gst_base_parse_find_offset (parse, seeksegment.position, TRUE, &start_ts);
3774   if (seeksegment.position <= start_ts + TARGET_DIFFERENCE) {
3775     GST_DEBUG_OBJECT (parse, "accurate seek possible");
3776     accurate = TRUE;
3777   }
3778   if (accurate) {
3779     GstClockTime startpos = seeksegment.position;
3780
3781     /* accurate requested, so ... seek a bit before target */
3782     if (startpos < parse->priv->lead_in_ts)
3783       startpos = 0;
3784     else
3785       startpos -= parse->priv->lead_in_ts;
3786     seekpos = gst_base_parse_find_offset (parse, startpos, TRUE, &start_ts);
3787     seekstop = gst_base_parse_find_offset (parse, seeksegment.stop, FALSE,
3788         NULL);
3789   } else {
3790     start_ts = seeksegment.position;
3791     if (!gst_pad_query_convert (parse->srcpad, format, seeksegment.position,
3792             GST_FORMAT_BYTES, &seekpos))
3793       goto convert_failed;
3794     if (!gst_pad_query_convert (parse->srcpad, format, seeksegment.stop,
3795             GST_FORMAT_BYTES, &seekstop))
3796       goto convert_failed;
3797   }
3798
3799   GST_DEBUG_OBJECT (parse,
3800       "seek position %" G_GINT64_FORMAT " in bytes: %" G_GINT64_FORMAT,
3801       start_ts, seekpos);
3802   GST_DEBUG_OBJECT (parse,
3803       "seek stop %" G_GINT64_FORMAT " in bytes: %" G_GINT64_FORMAT,
3804       seeksegment.stop, seekstop);
3805
3806   if (parse->priv->pad_mode == GST_PAD_ACTIVATE_PULL) {
3807     gint64 last_stop;
3808
3809     GST_DEBUG_OBJECT (parse, "seek in PULL mode");
3810
3811     if (flush) {
3812       if (parse->srcpad) {
3813         GST_DEBUG_OBJECT (parse, "sending flush start");
3814         gst_pad_push_event (parse->srcpad, gst_event_new_flush_start ());
3815         /* unlock upstream pull_range */
3816         gst_pad_push_event (parse->sinkpad, gst_event_new_flush_start ());
3817       }
3818     } else {
3819       gst_pad_pause_task (parse->sinkpad);
3820     }
3821
3822     /* we should now be able to grab the streaming thread because we stopped it
3823      * with the above flush/pause code */
3824     GST_PAD_STREAM_LOCK (parse->sinkpad);
3825
3826     /* save current position */
3827     last_stop = parse->segment.position;
3828     GST_DEBUG_OBJECT (parse, "stopped streaming at %" G_GINT64_FORMAT,
3829         last_stop);
3830
3831     /* now commit to new position */
3832
3833     /* prepare for streaming again */
3834     if (flush) {
3835       GST_DEBUG_OBJECT (parse, "sending flush stop");
3836       gst_pad_push_event (parse->srcpad, gst_event_new_flush_stop (TRUE));
3837       gst_pad_push_event (parse->sinkpad, gst_event_new_flush_stop (TRUE));
3838       gst_base_parse_clear_queues (parse);
3839     } else {
3840       /* keep track of our position */
3841       seeksegment.base = gst_segment_to_running_time (&seeksegment,
3842           seeksegment.format, parse->segment.position);
3843     }
3844
3845     memcpy (&parse->segment, &seeksegment, sizeof (GstSegment));
3846
3847     /* store the newsegment event so it can be sent from the streaming thread. */
3848     if (parse->priv->pending_segment)
3849       gst_event_unref (parse->priv->pending_segment);
3850
3851     /* This will be sent later in _loop() */
3852     parse->priv->pending_segment = gst_event_new_segment (&parse->segment);
3853
3854     GST_DEBUG_OBJECT (parse, "Created newseg format %d, "
3855         "start = %" GST_TIME_FORMAT ", stop = %" GST_TIME_FORMAT
3856         ", pos = %" GST_TIME_FORMAT, format,
3857         GST_TIME_ARGS (parse->segment.start),
3858         GST_TIME_ARGS (parse->segment.stop),
3859         GST_TIME_ARGS (parse->segment.start));
3860
3861     /* one last chance in pull mode to stay accurate;
3862      * maybe scan and subclass can find where to go */
3863     if (!accurate) {
3864       gint64 scanpos;
3865       GstClockTime ts = seeksegment.position;
3866
3867       gst_base_parse_locate_time (parse, &ts, &scanpos);
3868       if (scanpos >= 0) {
3869         accurate = TRUE;
3870         seekpos = scanpos;
3871         /* running collected index now consists of several intervals,
3872          * so optimized check no longer possible */
3873         parse->priv->index_last_valid = FALSE;
3874         parse->priv->index_last_offset = 0;
3875         parse->priv->index_last_ts = 0;
3876       }
3877     }
3878
3879     /* mark discont if we are going to stream from another position. */
3880     if (seekpos != parse->priv->offset) {
3881       GST_DEBUG_OBJECT (parse,
3882           "mark DISCONT, we did a seek to another position");
3883       parse->priv->offset = seekpos;
3884       parse->priv->last_offset = seekpos;
3885       parse->priv->seen_keyframe = FALSE;
3886       parse->priv->discont = TRUE;
3887       parse->priv->next_ts = start_ts;
3888       parse->priv->last_ts = GST_CLOCK_TIME_NONE;
3889       parse->priv->sync_offset = seekpos;
3890       parse->priv->exact_position = accurate;
3891     }
3892
3893     /* Start streaming thread if paused */
3894     gst_pad_start_task (parse->sinkpad,
3895         (GstTaskFunction) gst_base_parse_loop, parse->sinkpad);
3896
3897     GST_PAD_STREAM_UNLOCK (parse->sinkpad);
3898
3899     /* handled seek */
3900     res = TRUE;
3901   } else {
3902     GstEvent *new_event;
3903     GstBaseParseSeek *seek;
3904     GstSeekFlags flags = (flush ? GST_SEEK_FLAG_FLUSH : GST_SEEK_FLAG_NONE);
3905
3906     /* The only thing we need to do in PUSH-mode is to send the
3907        seek event (in bytes) to upstream. Segment / flush handling happens
3908        in corresponding src event handlers */
3909     GST_DEBUG_OBJECT (parse, "seek in PUSH mode");
3910     if (seekstop >= 0 && seekstop <= seekpos)
3911       seekstop = seekpos;
3912     new_event = gst_event_new_seek (rate, GST_FORMAT_BYTES, flags,
3913         GST_SEEK_TYPE_SET, seekpos, stop_type, seekstop);
3914
3915     /* store segment info so its precise details can be reconstructed when
3916      * receiving newsegment;
3917      * this matters for all details when accurate seeking,
3918      * is most useful to preserve NONE stop time otherwise */
3919     seek = g_new0 (GstBaseParseSeek, 1);
3920     seek->segment = seeksegment;
3921     seek->accurate = accurate;
3922     seek->offset = seekpos;
3923     seek->start_ts = start_ts;
3924     GST_OBJECT_LOCK (parse);
3925     /* less optimal, but preserves order */
3926     parse->priv->pending_seeks =
3927         g_slist_append (parse->priv->pending_seeks, seek);
3928     GST_OBJECT_UNLOCK (parse);
3929
3930     res = gst_pad_push_event (parse->sinkpad, new_event);
3931
3932     if (!res) {
3933       GST_OBJECT_LOCK (parse);
3934       parse->priv->pending_seeks =
3935           g_slist_remove (parse->priv->pending_seeks, seek);
3936       GST_OBJECT_UNLOCK (parse);
3937       g_free (seek);
3938     }
3939   }
3940
3941 done:
3942   /* handled event is ours to free */
3943   if (res)
3944     gst_event_unref (event);
3945   return res;
3946
3947   /* ERRORS */
3948 negative_rate:
3949   {
3950     GST_DEBUG_OBJECT (parse, "negative playback rates delegated upstream.");
3951     res = FALSE;
3952     goto done;
3953   }
3954 wrong_type:
3955   {
3956     GST_DEBUG_OBJECT (parse, "unsupported seek type.");
3957     res = FALSE;
3958     goto done;
3959   }
3960 convert_failed:
3961   {
3962     GST_DEBUG_OBJECT (parse, "conversion TIME to BYTES failed.");
3963     res = FALSE;
3964     goto done;
3965   }
3966 }
3967
3968 /* Checks if bitrates are available from upstream tags so that we don't
3969  * override them later
3970  */
3971 static void
3972 gst_base_parse_handle_tag (GstBaseParse * parse, GstEvent * event)
3973 {
3974   GstTagList *taglist = NULL;
3975   guint tmp;
3976
3977   gst_event_parse_tag (event, &taglist);
3978
3979   if (gst_tag_list_get_uint (taglist, GST_TAG_MINIMUM_BITRATE, &tmp)) {
3980     GST_DEBUG_OBJECT (parse, "upstream min bitrate %d", tmp);
3981     parse->priv->post_min_bitrate = FALSE;
3982   }
3983   if (gst_tag_list_get_uint (taglist, GST_TAG_BITRATE, &tmp)) {
3984     GST_DEBUG_OBJECT (parse, "upstream avg bitrate %d", tmp);
3985     parse->priv->post_avg_bitrate = FALSE;
3986   }
3987   if (gst_tag_list_get_uint (taglist, GST_TAG_MAXIMUM_BITRATE, &tmp)) {
3988     GST_DEBUG_OBJECT (parse, "upstream max bitrate %d", tmp);
3989     parse->priv->post_max_bitrate = FALSE;
3990   }
3991 }
3992
3993 static void
3994 gst_base_parse_set_index (GstElement * element, GstIndex * index)
3995 {
3996   GstBaseParse *parse = GST_BASE_PARSE (element);
3997
3998   g_static_mutex_lock (&parse->priv->index_lock);
3999   if (parse->priv->index)
4000     gst_object_unref (parse->priv->index);
4001   if (index) {
4002     parse->priv->index = gst_object_ref (index);
4003     gst_index_get_writer_id (index, GST_OBJECT_CAST (element),
4004         &parse->priv->index_id);
4005     parse->priv->own_index = FALSE;
4006   } else {
4007     parse->priv->index = NULL;
4008   }
4009   g_static_mutex_unlock (&parse->priv->index_lock);
4010 }
4011
4012 static GstIndex *
4013 gst_base_parse_get_index (GstElement * element)
4014 {
4015   GstBaseParse *parse = GST_BASE_PARSE (element);
4016   GstIndex *result = NULL;
4017
4018   g_static_mutex_lock (&parse->priv->index_lock);
4019   if (parse->priv->index)
4020     result = gst_object_ref (parse->priv->index);
4021   g_static_mutex_unlock (&parse->priv->index_lock);
4022
4023   return result;
4024 }
4025
4026 static GstStateChangeReturn
4027 gst_base_parse_change_state (GstElement * element, GstStateChange transition)
4028 {
4029   GstBaseParse *parse;
4030   GstStateChangeReturn result;
4031
4032   parse = GST_BASE_PARSE (element);
4033
4034   switch (transition) {
4035     case GST_STATE_CHANGE_READY_TO_PAUSED:
4036       /* If this is our own index destroy it as the
4037        * old entries might be wrong for the new stream */
4038       g_static_mutex_lock (&parse->priv->index_lock);
4039       if (parse->priv->own_index) {
4040         gst_object_unref (parse->priv->index);
4041         parse->priv->index = NULL;
4042         parse->priv->own_index = FALSE;
4043       }
4044
4045       /* If no index was created, generate one */
4046       if (G_UNLIKELY (!parse->priv->index)) {
4047         GST_DEBUG_OBJECT (parse, "no index provided creating our own");
4048
4049         parse->priv->index = gst_index_factory_make ("memindex");
4050         gst_index_get_writer_id (parse->priv->index, GST_OBJECT (parse),
4051             &parse->priv->index_id);
4052         parse->priv->own_index = TRUE;
4053       }
4054       g_static_mutex_unlock (&parse->priv->index_lock);
4055       break;
4056     default:
4057       break;
4058   }
4059
4060   result = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
4061
4062   switch (transition) {
4063     case GST_STATE_CHANGE_PAUSED_TO_READY:
4064       gst_base_parse_reset (parse);
4065       break;
4066     default:
4067       break;
4068   }
4069
4070   return result;
4071 }