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