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