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