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