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