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