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