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