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