queue: don't fail in _sink_event for sticky events
[platform/upstream/gstreamer.git] / plugins / elements / gstqueue.c
1 /* GStreamer
2  * Copyright (C) 1999,2000 Erik Walthinsen <omega@cse.ogi.edu>
3  *                    2000 Wim Taymans <wtay@chello.be>
4  *                    2003 Colin Walters <cwalters@gnome.org>
5  *                    2005 Wim Taymans <wim@fluendo.com>
6  *
7  * gstqueue.c:
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Library General Public
11  * License as published by the Free Software Foundation; either
12  * version 2 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Library General Public License for more details.
18  *
19  * You should have received a copy of the GNU Library General Public
20  * License along with this library; if not, write to the
21  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
22  * Boston, MA 02110-1301, USA.
23  */
24
25 /**
26  * SECTION:element-queue
27  *
28  * Data is queued until one of the limits specified by the
29  * #GstQueue:max-size-buffers, #GstQueue:max-size-bytes and/or
30  * #GstQueue:max-size-time properties has been reached. Any attempt to push
31  * more buffers into the queue will block the pushing thread until more space
32  * becomes available.
33  *
34  * The queue will create a new thread on the source pad to decouple the
35  * processing on sink and source pad.
36  *
37  * You can query how many buffers are queued by reading the
38  * #GstQueue:current-level-buffers property. You can track changes
39  * by connecting to the notify::current-level-buffers signal (which
40  * like all signals will be emitted from the streaming thread). The same
41  * applies to the #GstQueue:current-level-time and
42  * #GstQueue:current-level-bytes properties.
43  *
44  * The default queue size limits are 200 buffers, 10MB of data, or
45  * one second worth of data, whichever is reached first.
46  *
47  * As said earlier, the queue blocks by default when one of the specified
48  * maximums (bytes, time, buffers) has been reached. You can set the
49  * #GstQueue:leaky property to specify that instead of blocking it should
50  * leak (drop) new or old buffers.
51  *
52  * The #GstQueue::underrun signal is emitted when the queue has less data than
53  * the specified minimum thresholds require (by default: when the queue is
54  * empty). The #GstQueue::overrun signal is emitted when the queue is filled
55  * up. Both signals are emitted from the context of the streaming thread.
56  */
57
58 #include "gst/gst_private.h"
59
60 #include <gst/gst.h>
61 #include "gstqueue.h"
62
63 #include "../../gst/gst-i18n-lib.h"
64 #include "../../gst/glib-compat-private.h"
65
66 static GstStaticPadTemplate sinktemplate = GST_STATIC_PAD_TEMPLATE ("sink",
67     GST_PAD_SINK,
68     GST_PAD_ALWAYS,
69     GST_STATIC_CAPS_ANY);
70
71 static GstStaticPadTemplate srctemplate = GST_STATIC_PAD_TEMPLATE ("src",
72     GST_PAD_SRC,
73     GST_PAD_ALWAYS,
74     GST_STATIC_CAPS_ANY);
75
76 GST_DEBUG_CATEGORY_STATIC (queue_debug);
77 #define GST_CAT_DEFAULT (queue_debug)
78 GST_DEBUG_CATEGORY_STATIC (queue_dataflow);
79
80 #define STATUS(queue, pad, msg) \
81   GST_CAT_LOG_OBJECT (queue_dataflow, queue, \
82                       "(%s:%s) " msg ": %u of %u-%u buffers, %u of %u-%u " \
83                       "bytes, %" G_GUINT64_FORMAT " of %" G_GUINT64_FORMAT \
84                       "-%" G_GUINT64_FORMAT " ns, %u items", \
85                       GST_DEBUG_PAD_NAME (pad), \
86                       queue->cur_level.buffers, \
87                       queue->min_threshold.buffers, \
88                       queue->max_size.buffers, \
89                       queue->cur_level.bytes, \
90                       queue->min_threshold.bytes, \
91                       queue->max_size.bytes, \
92                       queue->cur_level.time, \
93                       queue->min_threshold.time, \
94                       queue->max_size.time, \
95                       gst_queue_array_get_length (queue->queue))
96
97 /* Queue signals and args */
98 enum
99 {
100   SIGNAL_UNDERRUN,
101   SIGNAL_RUNNING,
102   SIGNAL_OVERRUN,
103   SIGNAL_PUSHING,
104   LAST_SIGNAL
105 };
106
107 enum
108 {
109   PROP_0,
110   /* FIXME: don't we have another way of doing this
111    * "Gstreamer format" (frame/byte/time) queries? */
112   PROP_CUR_LEVEL_BUFFERS,
113   PROP_CUR_LEVEL_BYTES,
114   PROP_CUR_LEVEL_TIME,
115   PROP_MAX_SIZE_BUFFERS,
116   PROP_MAX_SIZE_BYTES,
117   PROP_MAX_SIZE_TIME,
118   PROP_MIN_THRESHOLD_BUFFERS,
119   PROP_MIN_THRESHOLD_BYTES,
120   PROP_MIN_THRESHOLD_TIME,
121   PROP_LEAKY,
122   PROP_SILENT,
123   PROP_FLUSH_ON_EOS
124 };
125
126 /* default property values */
127 #define DEFAULT_MAX_SIZE_BUFFERS  200   /* 200 buffers */
128 #define DEFAULT_MAX_SIZE_BYTES    (10 * 1024 * 1024)    /* 10 MB       */
129 #define DEFAULT_MAX_SIZE_TIME     GST_SECOND    /* 1 second    */
130
131 #define GST_QUEUE_MUTEX_LOCK(q) G_STMT_START {                          \
132   g_mutex_lock (&q->qlock);                                              \
133 } G_STMT_END
134
135 #define GST_QUEUE_MUTEX_LOCK_CHECK(q,label) G_STMT_START {              \
136   GST_QUEUE_MUTEX_LOCK (q);                                             \
137   if (q->srcresult != GST_FLOW_OK)                                      \
138     goto label;                                                         \
139 } G_STMT_END
140
141 #define GST_QUEUE_MUTEX_UNLOCK(q) G_STMT_START {                        \
142   g_mutex_unlock (&q->qlock);                                            \
143 } G_STMT_END
144
145 #define GST_QUEUE_WAIT_DEL_CHECK(q, label) G_STMT_START {               \
146   STATUS (q, q->sinkpad, "wait for DEL");                               \
147   q->waiting_del = TRUE;                                                \
148   g_cond_wait (&q->item_del, &q->qlock);                                  \
149   q->waiting_del = FALSE;                                               \
150   if (q->srcresult != GST_FLOW_OK) {                                    \
151     STATUS (q, q->srcpad, "received DEL wakeup");                       \
152     goto label;                                                         \
153   }                                                                     \
154   STATUS (q, q->sinkpad, "received DEL");                               \
155 } G_STMT_END
156
157 #define GST_QUEUE_WAIT_ADD_CHECK(q, label) G_STMT_START {               \
158   STATUS (q, q->srcpad, "wait for ADD");                                \
159   q->waiting_add = TRUE;                                                \
160   g_cond_wait (&q->item_add, &q->qlock);                                  \
161   q->waiting_add = FALSE;                                               \
162   if (q->srcresult != GST_FLOW_OK) {                                    \
163     STATUS (q, q->srcpad, "received ADD wakeup");                       \
164     goto label;                                                         \
165   }                                                                     \
166   STATUS (q, q->srcpad, "received ADD");                                \
167 } G_STMT_END
168
169 #define GST_QUEUE_SIGNAL_DEL(q) G_STMT_START {                          \
170   if (q->waiting_del) {                                                 \
171     STATUS (q, q->srcpad, "signal DEL");                                \
172     g_cond_signal (&q->item_del);                                        \
173   }                                                                     \
174 } G_STMT_END
175
176 #define GST_QUEUE_SIGNAL_ADD(q) G_STMT_START {                          \
177   if (q->waiting_add) {                                                 \
178     STATUS (q, q->sinkpad, "signal ADD");                               \
179     g_cond_signal (&q->item_add);                                        \
180   }                                                                     \
181 } G_STMT_END
182
183 #define _do_init \
184     GST_DEBUG_CATEGORY_INIT (queue_debug, "queue", 0, "queue element"); \
185     GST_DEBUG_CATEGORY_INIT (queue_dataflow, "queue_dataflow", 0, \
186         "dataflow inside the queue element");
187 #define gst_queue_parent_class parent_class
188 G_DEFINE_TYPE_WITH_CODE (GstQueue, gst_queue, GST_TYPE_ELEMENT, _do_init);
189
190 static void gst_queue_finalize (GObject * object);
191
192 static void gst_queue_set_property (GObject * object,
193     guint prop_id, const GValue * value, GParamSpec * pspec);
194 static void gst_queue_get_property (GObject * object,
195     guint prop_id, GValue * value, GParamSpec * pspec);
196
197 static GstFlowReturn gst_queue_chain (GstPad * pad, GstObject * parent,
198     GstBuffer * buffer);
199 static GstFlowReturn gst_queue_push_one (GstQueue * queue);
200 static void gst_queue_loop (GstPad * pad);
201
202 static gboolean gst_queue_handle_sink_event (GstPad * pad, GstObject * parent,
203     GstEvent * event);
204 static gboolean gst_queue_handle_sink_query (GstPad * pad, GstObject * parent,
205     GstQuery * query);
206
207 static gboolean gst_queue_handle_src_event (GstPad * pad, GstObject * parent,
208     GstEvent * event);
209 static gboolean gst_queue_handle_src_query (GstPad * pad, GstObject * parent,
210     GstQuery * query);
211
212 static void gst_queue_locked_flush (GstQueue * queue);
213
214 static gboolean gst_queue_src_activate_mode (GstPad * pad, GstObject * parent,
215     GstPadMode mode, gboolean active);
216 static gboolean gst_queue_sink_activate_mode (GstPad * pad, GstObject * parent,
217     GstPadMode mode, gboolean active);
218
219 static gboolean gst_queue_is_empty (GstQueue * queue);
220 static gboolean gst_queue_is_filled (GstQueue * queue);
221
222 #define GST_TYPE_QUEUE_LEAKY (queue_leaky_get_type ())
223
224 static GType
225 queue_leaky_get_type (void)
226 {
227   static GType queue_leaky_type = 0;
228   static const GEnumValue queue_leaky[] = {
229     {GST_QUEUE_NO_LEAK, "Not Leaky", "no"},
230     {GST_QUEUE_LEAK_UPSTREAM, "Leaky on upstream (new buffers)", "upstream"},
231     {GST_QUEUE_LEAK_DOWNSTREAM, "Leaky on downstream (old buffers)",
232         "downstream"},
233     {0, NULL, NULL},
234   };
235
236   if (!queue_leaky_type) {
237     queue_leaky_type = g_enum_register_static ("GstQueueLeaky", queue_leaky);
238   }
239   return queue_leaky_type;
240 }
241
242 static guint gst_queue_signals[LAST_SIGNAL] = { 0 };
243
244 static void
245 gst_queue_class_init (GstQueueClass * klass)
246 {
247   GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
248   GstElementClass *gstelement_class = GST_ELEMENT_CLASS (klass);
249
250   gobject_class->set_property = gst_queue_set_property;
251   gobject_class->get_property = gst_queue_get_property;
252
253   /* signals */
254   /**
255    * GstQueue::underrun:
256    * @queue: the queue instance
257    *
258    * Reports that the buffer became empty (underrun).
259    * A buffer is empty if the total amount of data inside it (num-buffers, time,
260    * size) is lower than the boundary values which can be set through the
261    * GObject properties.
262    */
263   gst_queue_signals[SIGNAL_UNDERRUN] =
264       g_signal_new ("underrun", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_FIRST,
265       G_STRUCT_OFFSET (GstQueueClass, underrun), NULL, NULL,
266       g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
267   /**
268    * GstQueue::running:
269    * @queue: the queue instance
270    *
271    * Reports that enough (min-threshold) data is in the queue. Use this signal
272    * together with the underrun signal to pause the pipeline on underrun and
273    * wait for the queue to fill-up before resume playback.
274    */
275   gst_queue_signals[SIGNAL_RUNNING] =
276       g_signal_new ("running", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_FIRST,
277       G_STRUCT_OFFSET (GstQueueClass, running), NULL, NULL,
278       g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
279   /**
280    * GstQueue::overrun:
281    * @queue: the queue instance
282    *
283    * Reports that the buffer became full (overrun).
284    * A buffer is full if the total amount of data inside it (num-buffers, time,
285    * size) is higher than the boundary values which can be set through the
286    * GObject properties.
287    */
288   gst_queue_signals[SIGNAL_OVERRUN] =
289       g_signal_new ("overrun", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_FIRST,
290       G_STRUCT_OFFSET (GstQueueClass, overrun), NULL, NULL,
291       g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
292   /**
293    * GstQueue::pushing:
294    * @queue: the queue instance
295    *
296    * Reports when the queue has enough data to start pushing data again on the
297    * source pad.
298    */
299   gst_queue_signals[SIGNAL_PUSHING] =
300       g_signal_new ("pushing", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_FIRST,
301       G_STRUCT_OFFSET (GstQueueClass, pushing), NULL, NULL,
302       g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
303
304   /* properties */
305   g_object_class_install_property (gobject_class, PROP_CUR_LEVEL_BYTES,
306       g_param_spec_uint ("current-level-bytes", "Current level (kB)",
307           "Current amount of data in the queue (bytes)",
308           0, G_MAXUINT, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
309   g_object_class_install_property (gobject_class, PROP_CUR_LEVEL_BUFFERS,
310       g_param_spec_uint ("current-level-buffers", "Current level (buffers)",
311           "Current number of buffers in the queue",
312           0, G_MAXUINT, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
313   g_object_class_install_property (gobject_class, PROP_CUR_LEVEL_TIME,
314       g_param_spec_uint64 ("current-level-time", "Current level (ns)",
315           "Current amount of data in the queue (in ns)",
316           0, G_MAXUINT64, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
317
318   g_object_class_install_property (gobject_class, PROP_MAX_SIZE_BYTES,
319       g_param_spec_uint ("max-size-bytes", "Max. size (kB)",
320           "Max. amount of data in the queue (bytes, 0=disable)",
321           0, G_MAXUINT, DEFAULT_MAX_SIZE_BYTES,
322           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
323   g_object_class_install_property (gobject_class, PROP_MAX_SIZE_BUFFERS,
324       g_param_spec_uint ("max-size-buffers", "Max. size (buffers)",
325           "Max. number of buffers in the queue (0=disable)", 0, G_MAXUINT,
326           DEFAULT_MAX_SIZE_BUFFERS,
327           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
328   g_object_class_install_property (gobject_class, PROP_MAX_SIZE_TIME,
329       g_param_spec_uint64 ("max-size-time", "Max. size (ns)",
330           "Max. amount of data in the queue (in ns, 0=disable)", 0, G_MAXUINT64,
331           DEFAULT_MAX_SIZE_TIME, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
332
333   g_object_class_install_property (gobject_class, PROP_MIN_THRESHOLD_BYTES,
334       g_param_spec_uint ("min-threshold-bytes", "Min. threshold (kB)",
335           "Min. amount of data in the queue to allow reading (bytes, 0=disable)",
336           0, G_MAXUINT, 0, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
337   g_object_class_install_property (gobject_class, PROP_MIN_THRESHOLD_BUFFERS,
338       g_param_spec_uint ("min-threshold-buffers", "Min. threshold (buffers)",
339           "Min. number of buffers in the queue to allow reading (0=disable)",
340           0, G_MAXUINT, 0, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
341   g_object_class_install_property (gobject_class, PROP_MIN_THRESHOLD_TIME,
342       g_param_spec_uint64 ("min-threshold-time", "Min. threshold (ns)",
343           "Min. amount of data in the queue to allow reading (in ns, 0=disable)",
344           0, G_MAXUINT64, 0, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
345
346   g_object_class_install_property (gobject_class, PROP_LEAKY,
347       g_param_spec_enum ("leaky", "Leaky",
348           "Where the queue leaks, if at all",
349           GST_TYPE_QUEUE_LEAKY, GST_QUEUE_NO_LEAK,
350           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
351
352   /**
353    * GstQueue:silent
354    *
355    * Don't emit queue signals. Makes queues more lightweight if no signals are
356    * needed.
357    */
358   g_object_class_install_property (gobject_class, PROP_SILENT,
359       g_param_spec_boolean ("silent", "Silent",
360           "Don't emit queue signals", FALSE,
361           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
362
363   /**
364    * GstQueue:flush-on-eos
365    *
366    * Discard all data in the queue when an EOS event is received, and pass
367    * on the EOS event as soon as possible (instead of waiting until all
368    * buffers in the queue have been processed, which is the default behaviour).
369    *
370    * Flushing the queue on EOS might be useful when capturing and encoding
371    * from a live source, to finish up the recording quickly in cases when
372    * the encoder is slow. Note that this might mean some data from the end of
373    * the recoding data might be lost though (never more than the configured
374    * max. sizes though).
375    *
376    * Since: 1.2
377    */
378   g_object_class_install_property (gobject_class, PROP_FLUSH_ON_EOS,
379       g_param_spec_boolean ("flush-on-eos", "Flush on EOS",
380           "Discard all data in the queue when an EOS event is received", FALSE,
381           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
382
383   gobject_class->finalize = gst_queue_finalize;
384
385   gst_element_class_set_static_metadata (gstelement_class,
386       "Queue",
387       "Generic", "Simple data queue", "Erik Walthinsen <omega@cse.ogi.edu>");
388   gst_element_class_add_pad_template (gstelement_class,
389       gst_static_pad_template_get (&srctemplate));
390   gst_element_class_add_pad_template (gstelement_class,
391       gst_static_pad_template_get (&sinktemplate));
392
393   /* Registering debug symbols for function pointers */
394   GST_DEBUG_REGISTER_FUNCPTR (gst_queue_src_activate_mode);
395   GST_DEBUG_REGISTER_FUNCPTR (gst_queue_handle_sink_event);
396   GST_DEBUG_REGISTER_FUNCPTR (gst_queue_handle_sink_query);
397   GST_DEBUG_REGISTER_FUNCPTR (gst_queue_handle_src_event);
398   GST_DEBUG_REGISTER_FUNCPTR (gst_queue_handle_src_query);
399   GST_DEBUG_REGISTER_FUNCPTR (gst_queue_chain);
400 }
401
402 static void
403 gst_queue_init (GstQueue * queue)
404 {
405   queue->sinkpad = gst_pad_new_from_static_template (&sinktemplate, "sink");
406
407   gst_pad_set_chain_function (queue->sinkpad, gst_queue_chain);
408   gst_pad_set_activatemode_function (queue->sinkpad,
409       gst_queue_sink_activate_mode);
410   gst_pad_set_event_function (queue->sinkpad, gst_queue_handle_sink_event);
411   gst_pad_set_query_function (queue->sinkpad, gst_queue_handle_sink_query);
412   GST_PAD_SET_PROXY_CAPS (queue->sinkpad);
413   gst_element_add_pad (GST_ELEMENT (queue), queue->sinkpad);
414
415   queue->srcpad = gst_pad_new_from_static_template (&srctemplate, "src");
416
417   gst_pad_set_activatemode_function (queue->srcpad,
418       gst_queue_src_activate_mode);
419   gst_pad_set_event_function (queue->srcpad, gst_queue_handle_src_event);
420   gst_pad_set_query_function (queue->srcpad, gst_queue_handle_src_query);
421   GST_PAD_SET_PROXY_CAPS (queue->srcpad);
422   gst_element_add_pad (GST_ELEMENT (queue), queue->srcpad);
423
424   GST_QUEUE_CLEAR_LEVEL (queue->cur_level);
425   queue->max_size.buffers = DEFAULT_MAX_SIZE_BUFFERS;
426   queue->max_size.bytes = DEFAULT_MAX_SIZE_BYTES;
427   queue->max_size.time = DEFAULT_MAX_SIZE_TIME;
428   GST_QUEUE_CLEAR_LEVEL (queue->min_threshold);
429   GST_QUEUE_CLEAR_LEVEL (queue->orig_min_threshold);
430   gst_segment_init (&queue->sink_segment, GST_FORMAT_TIME);
431   gst_segment_init (&queue->src_segment, GST_FORMAT_TIME);
432   queue->head_needs_discont = queue->tail_needs_discont = FALSE;
433
434   queue->leaky = GST_QUEUE_NO_LEAK;
435   queue->srcresult = GST_FLOW_FLUSHING;
436
437   g_mutex_init (&queue->qlock);
438   g_cond_init (&queue->item_add);
439   g_cond_init (&queue->item_del);
440
441   queue->queue = gst_queue_array_new (DEFAULT_MAX_SIZE_BUFFERS * 3 / 2);
442
443   queue->sinktime = GST_CLOCK_TIME_NONE;
444   queue->srctime = GST_CLOCK_TIME_NONE;
445
446   queue->sink_tainted = TRUE;
447   queue->src_tainted = TRUE;
448
449   queue->newseg_applied_to_src = FALSE;
450
451   GST_DEBUG_OBJECT (queue,
452       "initialized queue's not_empty & not_full conditions");
453 }
454
455 /* called only once, as opposed to dispose */
456 static void
457 gst_queue_finalize (GObject * object)
458 {
459   GstMiniObject *data;
460   GstQueue *queue = GST_QUEUE (object);
461
462   GST_DEBUG_OBJECT (queue, "finalizing queue");
463
464   while (!gst_queue_array_is_empty (queue->queue)) {
465     data = gst_queue_array_pop_head (queue->queue);
466     /* FIXME: if it's a query, shouldn't we unref that too? */
467     if (!GST_IS_QUERY (data))
468       gst_mini_object_unref (data);
469   }
470   gst_queue_array_free (queue->queue);
471
472   g_mutex_clear (&queue->qlock);
473   g_cond_clear (&queue->item_add);
474   g_cond_clear (&queue->item_del);
475
476   G_OBJECT_CLASS (parent_class)->finalize (object);
477 }
478
479 /* calculate the diff between running time on the sink and src of the queue.
480  * This is the total amount of time in the queue. */
481 static void
482 update_time_level (GstQueue * queue)
483 {
484   gint64 sink_time, src_time;
485
486   if (queue->sink_tainted) {
487     GST_LOG_OBJECT (queue, "update sink time");
488     queue->sinktime =
489         gst_segment_to_running_time (&queue->sink_segment, GST_FORMAT_TIME,
490         queue->sink_segment.position);
491     queue->sink_tainted = FALSE;
492   }
493   sink_time = queue->sinktime;
494
495   if (queue->src_tainted) {
496     GST_LOG_OBJECT (queue, "update src time");
497     queue->srctime =
498         gst_segment_to_running_time (&queue->src_segment, GST_FORMAT_TIME,
499         queue->src_segment.position);
500     queue->src_tainted = FALSE;
501   }
502   src_time = queue->srctime;
503
504   GST_LOG_OBJECT (queue, "sink %" GST_TIME_FORMAT ", src %" GST_TIME_FORMAT,
505       GST_TIME_ARGS (sink_time), GST_TIME_ARGS (src_time));
506
507   if (sink_time >= src_time)
508     queue->cur_level.time = sink_time - src_time;
509   else
510     queue->cur_level.time = 0;
511 }
512
513 /* take a SEGMENT event and apply the values to segment, updating the time
514  * level of queue. */
515 static void
516 apply_segment (GstQueue * queue, GstEvent * event, GstSegment * segment,
517     gboolean sink)
518 {
519   gst_event_copy_segment (event, segment);
520
521   /* now configure the values, we use these to track timestamps on the
522    * sinkpad. */
523   if (segment->format != GST_FORMAT_TIME) {
524     /* non-time format, pretent the current time segment is closed with a
525      * 0 start and unknown stop time. */
526     segment->format = GST_FORMAT_TIME;
527     segment->start = 0;
528     segment->stop = -1;
529     segment->time = 0;
530   }
531   if (sink)
532     queue->sink_tainted = TRUE;
533   else
534     queue->src_tainted = TRUE;
535
536   GST_DEBUG_OBJECT (queue, "configured SEGMENT %" GST_SEGMENT_FORMAT, segment);
537
538   /* segment can update the time level of the queue */
539   update_time_level (queue);
540 }
541
542 /* take a buffer and update segment, updating the time level of the queue. */
543 static void
544 apply_buffer (GstQueue * queue, GstBuffer * buffer, GstSegment * segment,
545     gboolean with_duration, gboolean sink)
546 {
547   GstClockTime duration, timestamp;
548
549   timestamp = GST_BUFFER_TIMESTAMP (buffer);
550   duration = GST_BUFFER_DURATION (buffer);
551
552   /* if no timestamp is set, assume it's continuous with the previous
553    * time */
554   if (timestamp == GST_CLOCK_TIME_NONE)
555     timestamp = segment->position;
556
557   /* add duration */
558   if (with_duration && duration != GST_CLOCK_TIME_NONE)
559     timestamp += duration;
560
561   GST_LOG_OBJECT (queue, "position updated to %" GST_TIME_FORMAT,
562       GST_TIME_ARGS (timestamp));
563
564   segment->position = timestamp;
565   if (sink)
566     queue->sink_tainted = TRUE;
567   else
568     queue->src_tainted = TRUE;
569
570
571   /* calc diff with other end */
572   update_time_level (queue);
573 }
574
575 static void
576 gst_queue_locked_flush (GstQueue * queue)
577 {
578   GstMiniObject *data;
579
580   while (!gst_queue_array_is_empty (queue->queue)) {
581     data = gst_queue_array_pop_head (queue->queue);
582     /* Then lose another reference because we are supposed to destroy that
583        data when flushing */
584     if (!GST_IS_QUERY (data))
585       gst_mini_object_unref (data);
586   }
587   GST_QUEUE_CLEAR_LEVEL (queue->cur_level);
588   queue->min_threshold.buffers = queue->orig_min_threshold.buffers;
589   queue->min_threshold.bytes = queue->orig_min_threshold.bytes;
590   queue->min_threshold.time = queue->orig_min_threshold.time;
591   gst_segment_init (&queue->sink_segment, GST_FORMAT_TIME);
592   gst_segment_init (&queue->src_segment, GST_FORMAT_TIME);
593   queue->head_needs_discont = queue->tail_needs_discont = FALSE;
594
595   queue->sinktime = queue->srctime = GST_CLOCK_TIME_NONE;
596   queue->sink_tainted = queue->src_tainted = TRUE;
597
598   /* we deleted a lot of something */
599   GST_QUEUE_SIGNAL_DEL (queue);
600 }
601
602 /* enqueue an item an update the level stats, with QUEUE_LOCK */
603 static inline void
604 gst_queue_locked_enqueue_buffer (GstQueue * queue, gpointer item)
605 {
606   GstBuffer *buffer = GST_BUFFER_CAST (item);
607
608   /* add buffer to the statistics */
609   queue->cur_level.buffers++;
610   queue->cur_level.bytes += gst_buffer_get_size (buffer);
611   apply_buffer (queue, buffer, &queue->sink_segment, TRUE, TRUE);
612
613   if (item)
614     gst_queue_array_push_tail (queue->queue, item);
615   GST_QUEUE_SIGNAL_ADD (queue);
616 }
617
618 static inline void
619 gst_queue_locked_enqueue_event (GstQueue * queue, gpointer item)
620 {
621   GstEvent *event = GST_EVENT_CAST (item);
622
623   switch (GST_EVENT_TYPE (event)) {
624     case GST_EVENT_EOS:
625       GST_CAT_LOG_OBJECT (queue_dataflow, queue, "got EOS from upstream");
626       /* Zero the thresholds, this makes sure the queue is completely
627        * filled and we can read all data from the queue. */
628       if (queue->flush_on_eos)
629         gst_queue_locked_flush (queue);
630       else
631         GST_QUEUE_CLEAR_LEVEL (queue->min_threshold);
632       /* mark the queue as EOS. This prevents us from accepting more data. */
633       queue->eos = TRUE;
634       break;
635     case GST_EVENT_SEGMENT:
636       apply_segment (queue, event, &queue->sink_segment, TRUE);
637       /* if the queue is empty, apply sink segment on the source */
638       if (gst_queue_array_is_empty (queue->queue)) {
639         GST_CAT_LOG_OBJECT (queue_dataflow, queue, "Apply segment on srcpad");
640         apply_segment (queue, event, &queue->src_segment, FALSE);
641         queue->newseg_applied_to_src = TRUE;
642       }
643       /* a new segment allows us to accept more buffers if we got EOS
644        * from downstream */
645       queue->unexpected = FALSE;
646       break;
647     default:
648       break;
649   }
650
651   if (item)
652     gst_queue_array_push_tail (queue->queue, item);
653   GST_QUEUE_SIGNAL_ADD (queue);
654 }
655
656 /* dequeue an item from the queue and update level stats, with QUEUE_LOCK */
657 static GstMiniObject *
658 gst_queue_locked_dequeue (GstQueue * queue)
659 {
660   GstMiniObject *item;
661
662   item = gst_queue_array_pop_head (queue->queue);
663   if (item == NULL)
664     goto no_item;
665
666   if (GST_IS_BUFFER (item)) {
667     GstBuffer *buffer = GST_BUFFER_CAST (item);
668
669     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
670         "retrieved buffer %p from queue", buffer);
671
672     queue->cur_level.buffers--;
673     queue->cur_level.bytes -= gst_buffer_get_size (buffer);
674     apply_buffer (queue, buffer, &queue->src_segment, TRUE, FALSE);
675
676     /* if the queue is empty now, update the other side */
677     if (queue->cur_level.buffers == 0)
678       queue->cur_level.time = 0;
679
680   } else if (GST_IS_EVENT (item)) {
681     GstEvent *event = GST_EVENT_CAST (item);
682
683     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
684         "retrieved event %p from queue", event);
685
686     switch (GST_EVENT_TYPE (event)) {
687       case GST_EVENT_EOS:
688         /* queue is empty now that we dequeued the EOS */
689         GST_QUEUE_CLEAR_LEVEL (queue->cur_level);
690         break;
691       case GST_EVENT_SEGMENT:
692         /* apply newsegment if it has not already been applied */
693         if (G_LIKELY (!queue->newseg_applied_to_src)) {
694           apply_segment (queue, event, &queue->src_segment, FALSE);
695         } else {
696           queue->newseg_applied_to_src = FALSE;
697         }
698         break;
699       default:
700         break;
701     }
702   } else if (GST_IS_QUERY (item)) {
703     GstQuery *query = GST_QUERY_CAST (item);
704
705     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
706         "retrieved query %p from queue", query);
707   } else {
708     g_warning
709         ("Unexpected item %p dequeued from queue %s (refcounting problem?)",
710         item, GST_OBJECT_NAME (queue));
711     item = NULL;
712   }
713   GST_QUEUE_SIGNAL_DEL (queue);
714
715   return item;
716
717   /* ERRORS */
718 no_item:
719   {
720     GST_CAT_DEBUG_OBJECT (queue_dataflow, queue, "the queue is empty");
721     return NULL;
722   }
723 }
724
725 static gboolean
726 gst_queue_handle_sink_event (GstPad * pad, GstObject * parent, GstEvent * event)
727 {
728   GstQueue *queue;
729
730   queue = GST_QUEUE (parent);
731
732   switch (GST_EVENT_TYPE (event)) {
733     case GST_EVENT_FLUSH_START:
734     {
735       STATUS (queue, pad, "received flush start event");
736       /* forward event */
737       gst_pad_push_event (queue->srcpad, event);
738
739       /* now unblock the chain function */
740       GST_QUEUE_MUTEX_LOCK (queue);
741       queue->srcresult = GST_FLOW_FLUSHING;
742       /* unblock the loop and chain functions */
743       GST_QUEUE_SIGNAL_ADD (queue);
744       GST_QUEUE_SIGNAL_DEL (queue);
745       GST_QUEUE_MUTEX_UNLOCK (queue);
746
747       /* make sure it pauses, this should happen since we sent
748        * flush_start downstream. */
749       gst_pad_pause_task (queue->srcpad);
750       GST_CAT_LOG_OBJECT (queue_dataflow, queue, "loop stopped");
751       goto done;
752     }
753     case GST_EVENT_FLUSH_STOP:
754     {
755       STATUS (queue, pad, "received flush stop event");
756       /* forward event */
757       gst_pad_push_event (queue->srcpad, event);
758
759       GST_QUEUE_MUTEX_LOCK (queue);
760       gst_queue_locked_flush (queue);
761       queue->srcresult = GST_FLOW_OK;
762       queue->eos = FALSE;
763       queue->unexpected = FALSE;
764       gst_pad_start_task (queue->srcpad, (GstTaskFunction) gst_queue_loop,
765           queue->srcpad, NULL);
766       GST_QUEUE_MUTEX_UNLOCK (queue);
767
768       STATUS (queue, pad, "after flush");
769       goto done;
770     }
771     default:
772       if (GST_EVENT_IS_SERIALIZED (event)) {
773         /* serialized events go in the queue */
774         GST_QUEUE_MUTEX_LOCK (queue);
775         if (queue->srcresult != GST_FLOW_OK) {
776           /* Errors in sticky event pushing are no problem and ignored here
777            * as they will cause more meaningful errors during data flow.
778            * For EOS events, that are not followed by data flow, we still
779            * return FALSE here though.
780            */
781           if (!GST_EVENT_IS_STICKY (event) ||
782               GST_EVENT_TYPE (event) == GST_EVENT_EOS)
783             goto out_flow_error;
784         }
785         /* refuse more events on EOS */
786         if (queue->eos)
787           goto out_eos;
788         gst_queue_locked_enqueue_event (queue, event);
789         GST_QUEUE_MUTEX_UNLOCK (queue);
790       } else {
791         /* non-serialized events are forwarded downstream immediately */
792         gst_pad_push_event (queue->srcpad, event);
793       }
794       break;
795   }
796 done:
797   return TRUE;
798
799   /* ERRORS */
800 out_flushing:
801   {
802     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
803         "refusing event, we are flushing");
804     GST_QUEUE_MUTEX_UNLOCK (queue);
805     gst_event_unref (event);
806     return FALSE;
807   }
808 out_eos:
809   {
810     GST_CAT_LOG_OBJECT (queue_dataflow, queue, "refusing event, we are EOS");
811     GST_QUEUE_MUTEX_UNLOCK (queue);
812     gst_event_unref (event);
813     return FALSE;
814   }
815 out_flow_error:
816   {
817     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
818         "refusing event, we have a downstream flow error: %s",
819         gst_flow_get_name (queue->srcresult));
820     GST_QUEUE_MUTEX_UNLOCK (queue);
821     gst_event_unref (event);
822     return FALSE;
823   }
824 }
825
826 static gboolean
827 gst_queue_handle_sink_query (GstPad * pad, GstObject * parent, GstQuery * query)
828 {
829   GstQueue *queue = GST_QUEUE_CAST (parent);
830   gboolean res;
831
832   switch (GST_QUERY_TYPE (query)) {
833     default:
834       if (G_UNLIKELY (GST_QUERY_IS_SERIALIZED (query))) {
835         GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
836         GST_LOG_OBJECT (queue, "queuing query %p (%s)", query,
837             GST_QUERY_TYPE_NAME (query));
838         gst_queue_array_push_tail (queue->queue, query);
839         GST_QUEUE_SIGNAL_ADD (queue);
840         while (!gst_queue_array_is_empty (queue->queue)) {
841           /* for as long as the queue has items, we know the query is
842            * not handled yet */
843           GST_QUEUE_WAIT_DEL_CHECK (queue, out_flushing);
844         }
845         res = queue->last_query;
846         GST_QUEUE_MUTEX_UNLOCK (queue);
847       } else {
848         res = gst_pad_query_default (pad, parent, query);
849       }
850       break;
851   }
852   return res;
853
854   /* ERRORS */
855 out_flushing:
856   {
857     GST_DEBUG_OBJECT (queue, "we are flushing");
858     GST_QUEUE_MUTEX_UNLOCK (queue);
859     return FALSE;
860   }
861 }
862
863 static gboolean
864 gst_queue_is_empty (GstQueue * queue)
865 {
866   GstMiniObject *head;
867
868   if (gst_queue_array_is_empty (queue->queue))
869     return TRUE;
870
871   /* Only consider the queue empty if the minimum thresholds
872    * are not reached and data is at the queue head. Otherwise
873    * we would block forever on serialized queries.
874    */
875   head = gst_queue_array_peek_head (queue->queue);
876   if (!GST_IS_BUFFER (head) && !GST_IS_BUFFER_LIST (head))
877     return FALSE;
878
879   /* It is possible that a max size is reached before all min thresholds are.
880    * Therefore, only consider it empty if it is not filled. */
881   return ((queue->min_threshold.buffers > 0 &&
882           queue->cur_level.buffers < queue->min_threshold.buffers) ||
883       (queue->min_threshold.bytes > 0 &&
884           queue->cur_level.bytes < queue->min_threshold.bytes) ||
885       (queue->min_threshold.time > 0 &&
886           queue->cur_level.time < queue->min_threshold.time)) &&
887       !gst_queue_is_filled (queue);
888 }
889
890 static gboolean
891 gst_queue_is_filled (GstQueue * queue)
892 {
893   return (((queue->max_size.buffers > 0 &&
894               queue->cur_level.buffers >= queue->max_size.buffers) ||
895           (queue->max_size.bytes > 0 &&
896               queue->cur_level.bytes >= queue->max_size.bytes) ||
897           (queue->max_size.time > 0 &&
898               queue->cur_level.time >= queue->max_size.time)));
899 }
900
901 static void
902 gst_queue_leak_downstream (GstQueue * queue)
903 {
904   /* for as long as the queue is filled, dequeue an item and discard it */
905   while (gst_queue_is_filled (queue)) {
906     GstMiniObject *leak;
907
908     leak = gst_queue_locked_dequeue (queue);
909     /* there is nothing to dequeue and the queue is still filled.. This should
910      * not happen */
911     g_assert (leak != NULL);
912
913     GST_CAT_DEBUG_OBJECT (queue_dataflow, queue,
914         "queue is full, leaking item %p on downstream end", leak);
915     if (!GST_IS_QUERY (leak))
916       gst_mini_object_unref (leak);
917
918     /* last buffer needs to get a DISCONT flag */
919     queue->head_needs_discont = TRUE;
920   }
921 }
922
923 static GstFlowReturn
924 gst_queue_chain (GstPad * pad, GstObject * parent, GstBuffer * buffer)
925 {
926   GstQueue *queue;
927   GstClockTime duration, timestamp;
928
929   queue = GST_QUEUE_CAST (parent);
930
931   /* we have to lock the queue since we span threads */
932   GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
933   /* when we received EOS, we refuse any more data */
934   if (queue->eos)
935     goto out_eos;
936   if (queue->unexpected)
937     goto out_unexpected;
938
939   timestamp = GST_BUFFER_TIMESTAMP (buffer);
940   duration = GST_BUFFER_DURATION (buffer);
941
942   GST_CAT_LOG_OBJECT (queue_dataflow, queue, "received buffer %p of size %"
943       G_GSIZE_FORMAT ", time %" GST_TIME_FORMAT ", duration %"
944       GST_TIME_FORMAT, buffer, gst_buffer_get_size (buffer),
945       GST_TIME_ARGS (timestamp), GST_TIME_ARGS (duration));
946
947   /* We make space available if we're "full" according to whatever
948    * the user defined as "full". Note that this only applies to buffers.
949    * We always handle events and they don't count in our statistics. */
950   while (gst_queue_is_filled (queue)) {
951     if (!queue->silent) {
952       GST_QUEUE_MUTEX_UNLOCK (queue);
953       g_signal_emit (queue, gst_queue_signals[SIGNAL_OVERRUN], 0);
954       GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
955       /* we recheck, the signal could have changed the thresholds */
956       if (!gst_queue_is_filled (queue))
957         break;
958     }
959
960     /* how are we going to make space for this buffer? */
961     switch (queue->leaky) {
962       case GST_QUEUE_LEAK_UPSTREAM:
963         /* next buffer needs to get a DISCONT flag */
964         queue->tail_needs_discont = TRUE;
965         /* leak current buffer */
966         GST_CAT_DEBUG_OBJECT (queue_dataflow, queue,
967             "queue is full, leaking buffer on upstream end");
968         /* now we can clean up and exit right away */
969         goto out_unref;
970       case GST_QUEUE_LEAK_DOWNSTREAM:
971         gst_queue_leak_downstream (queue);
972         break;
973       default:
974         g_warning ("Unknown leaky type, using default");
975         /* fall-through */
976       case GST_QUEUE_NO_LEAK:
977       {
978         GST_CAT_DEBUG_OBJECT (queue_dataflow, queue,
979             "queue is full, waiting for free space");
980
981         /* don't leak. Instead, wait for space to be available */
982         do {
983           /* for as long as the queue is filled, wait till an item was deleted. */
984           GST_QUEUE_WAIT_DEL_CHECK (queue, out_flushing);
985         } while (gst_queue_is_filled (queue));
986
987         GST_CAT_DEBUG_OBJECT (queue_dataflow, queue, "queue is not full");
988
989         if (!queue->silent) {
990           GST_QUEUE_MUTEX_UNLOCK (queue);
991           g_signal_emit (queue, gst_queue_signals[SIGNAL_RUNNING], 0);
992           GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
993         }
994         break;
995       }
996     }
997   }
998
999   if (queue->tail_needs_discont) {
1000     GstBuffer *subbuffer = gst_buffer_make_writable (buffer);
1001
1002     if (subbuffer) {
1003       buffer = subbuffer;
1004       GST_BUFFER_FLAG_SET (buffer, GST_BUFFER_FLAG_DISCONT);
1005     } else {
1006       GST_DEBUG_OBJECT (queue, "Could not mark buffer as DISCONT");
1007     }
1008     queue->tail_needs_discont = FALSE;
1009   }
1010
1011   /* put buffer in queue now */
1012   gst_queue_locked_enqueue_buffer (queue, buffer);
1013   GST_QUEUE_MUTEX_UNLOCK (queue);
1014
1015   return GST_FLOW_OK;
1016
1017   /* special conditions */
1018 out_unref:
1019   {
1020     GST_QUEUE_MUTEX_UNLOCK (queue);
1021
1022     gst_buffer_unref (buffer);
1023
1024     return GST_FLOW_OK;
1025   }
1026 out_flushing:
1027   {
1028     GstFlowReturn ret = queue->srcresult;
1029
1030     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1031         "exit because task paused, reason: %s", gst_flow_get_name (ret));
1032     GST_QUEUE_MUTEX_UNLOCK (queue);
1033     gst_buffer_unref (buffer);
1034
1035     return ret;
1036   }
1037 out_eos:
1038   {
1039     GST_CAT_LOG_OBJECT (queue_dataflow, queue, "exit because we received EOS");
1040     GST_QUEUE_MUTEX_UNLOCK (queue);
1041
1042     gst_buffer_unref (buffer);
1043
1044     return GST_FLOW_EOS;
1045   }
1046 out_unexpected:
1047   {
1048     GST_CAT_LOG_OBJECT (queue_dataflow, queue, "exit because we received EOS");
1049     GST_QUEUE_MUTEX_UNLOCK (queue);
1050
1051     gst_buffer_unref (buffer);
1052
1053     return GST_FLOW_EOS;
1054   }
1055 }
1056
1057 /* dequeue an item from the queue an push it downstream. This functions returns
1058  * the result of the push. */
1059 static GstFlowReturn
1060 gst_queue_push_one (GstQueue * queue)
1061 {
1062   GstFlowReturn result = GST_FLOW_OK;
1063   GstMiniObject *data;
1064
1065   data = gst_queue_locked_dequeue (queue);
1066   if (data == NULL)
1067     goto no_item;
1068
1069 next:
1070   if (GST_IS_BUFFER (data)) {
1071     GstBuffer *buffer;
1072
1073     buffer = GST_BUFFER_CAST (data);
1074
1075     if (queue->head_needs_discont) {
1076       GstBuffer *subbuffer = gst_buffer_make_writable (buffer);
1077
1078       if (subbuffer) {
1079         buffer = subbuffer;
1080         GST_BUFFER_FLAG_SET (buffer, GST_BUFFER_FLAG_DISCONT);
1081       } else {
1082         GST_DEBUG_OBJECT (queue, "Could not mark buffer as DISCONT");
1083       }
1084       queue->head_needs_discont = FALSE;
1085     }
1086
1087     GST_QUEUE_MUTEX_UNLOCK (queue);
1088     result = gst_pad_push (queue->srcpad, buffer);
1089
1090     /* need to check for srcresult here as well */
1091     GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
1092
1093     if (result == GST_FLOW_EOS) {
1094       GST_CAT_LOG_OBJECT (queue_dataflow, queue, "got EOS from downstream");
1095       /* stop pushing buffers, we dequeue all items until we see an item that we
1096        * can push again, which is EOS or SEGMENT. If there is nothing in the
1097        * queue we can push, we set a flag to make the sinkpad refuse more
1098        * buffers with an EOS return value. */
1099       while ((data = gst_queue_locked_dequeue (queue))) {
1100         if (GST_IS_BUFFER (data)) {
1101           GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1102               "dropping EOS buffer %p", data);
1103           gst_buffer_unref (GST_BUFFER_CAST (data));
1104         } else if (GST_IS_EVENT (data)) {
1105           GstEvent *event = GST_EVENT_CAST (data);
1106           GstEventType type = GST_EVENT_TYPE (event);
1107
1108           if (type == GST_EVENT_EOS || type == GST_EVENT_SEGMENT) {
1109             /* we found a pushable item in the queue, push it out */
1110             GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1111                 "pushing pushable event %s after EOS",
1112                 GST_EVENT_TYPE_NAME (event));
1113             goto next;
1114           }
1115           GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1116               "dropping EOS event %p", event);
1117           gst_event_unref (event);
1118         } else if (GST_IS_QUERY (data)) {
1119           GstQuery *query = GST_QUERY_CAST (data);
1120
1121           GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1122               "dropping query %p because of EOS", query);
1123           queue->last_query = FALSE;
1124         }
1125       }
1126       /* no more items in the queue. Set the unexpected flag so that upstream
1127        * make us refuse any more buffers on the sinkpad. Since we will still
1128        * accept EOS and SEGMENT we return _FLOW_OK to the caller so that the
1129        * task function does not shut down. */
1130       queue->unexpected = TRUE;
1131       result = GST_FLOW_OK;
1132     }
1133   } else if (GST_IS_EVENT (data)) {
1134     GstEvent *event = GST_EVENT_CAST (data);
1135     GstEventType type = GST_EVENT_TYPE (event);
1136
1137     GST_QUEUE_MUTEX_UNLOCK (queue);
1138
1139     gst_pad_push_event (queue->srcpad, event);
1140
1141     GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
1142     /* if we're EOS, return EOS so that the task pauses. */
1143     if (type == GST_EVENT_EOS) {
1144       GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1145           "pushed EOS event %p, return EOS", event);
1146       result = GST_FLOW_EOS;
1147     }
1148   } else if (GST_IS_QUERY (data)) {
1149     GstQuery *query = GST_QUERY_CAST (data);
1150
1151     queue->last_query = gst_pad_peer_query (queue->srcpad, query);
1152     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1153         "did query %p, return %d", query, queue->last_query);
1154   }
1155   return result;
1156
1157   /* ERRORS */
1158 no_item:
1159   {
1160     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1161         "exit because we have no item in the queue");
1162     return GST_FLOW_ERROR;
1163   }
1164 out_flushing:
1165   {
1166     GST_CAT_LOG_OBJECT (queue_dataflow, queue, "exit because we are flushing");
1167     return GST_FLOW_FLUSHING;
1168   }
1169 }
1170
1171 static void
1172 gst_queue_loop (GstPad * pad)
1173 {
1174   GstQueue *queue;
1175   GstFlowReturn ret;
1176
1177   queue = (GstQueue *) GST_PAD_PARENT (pad);
1178
1179   /* have to lock for thread-safety */
1180   GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
1181
1182   while (gst_queue_is_empty (queue)) {
1183     GST_CAT_DEBUG_OBJECT (queue_dataflow, queue, "queue is empty");
1184     if (!queue->silent) {
1185       GST_QUEUE_MUTEX_UNLOCK (queue);
1186       g_signal_emit (queue, gst_queue_signals[SIGNAL_UNDERRUN], 0);
1187       GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
1188     }
1189
1190     /* we recheck, the signal could have changed the thresholds */
1191     while (gst_queue_is_empty (queue)) {
1192       GST_QUEUE_WAIT_ADD_CHECK (queue, out_flushing);
1193     }
1194
1195     GST_CAT_DEBUG_OBJECT (queue_dataflow, queue, "queue is not empty");
1196     if (!queue->silent) {
1197       GST_QUEUE_MUTEX_UNLOCK (queue);
1198       g_signal_emit (queue, gst_queue_signals[SIGNAL_RUNNING], 0);
1199       g_signal_emit (queue, gst_queue_signals[SIGNAL_PUSHING], 0);
1200       GST_QUEUE_MUTEX_LOCK_CHECK (queue, out_flushing);
1201     }
1202   }
1203
1204   ret = gst_queue_push_one (queue);
1205   queue->srcresult = ret;
1206   if (ret != GST_FLOW_OK)
1207     goto out_flushing;
1208
1209   GST_QUEUE_MUTEX_UNLOCK (queue);
1210
1211   return;
1212
1213   /* ERRORS */
1214 out_flushing:
1215   {
1216     gboolean eos = queue->eos;
1217     GstFlowReturn ret = queue->srcresult;
1218
1219     gst_pad_pause_task (queue->srcpad);
1220     GST_CAT_LOG_OBJECT (queue_dataflow, queue,
1221         "pause task, reason:  %s", gst_flow_get_name (ret));
1222     if (ret == GST_FLOW_FLUSHING)
1223       gst_queue_locked_flush (queue);
1224     else
1225       GST_QUEUE_SIGNAL_DEL (queue);
1226     GST_QUEUE_MUTEX_UNLOCK (queue);
1227     /* let app know about us giving up if upstream is not expected to do so */
1228     /* EOS is already taken care of elsewhere */
1229     if (eos && (ret == GST_FLOW_NOT_LINKED || ret < GST_FLOW_EOS)) {
1230       GST_ELEMENT_ERROR (queue, STREAM, FAILED,
1231           (_("Internal data flow error.")),
1232           ("streaming task paused, reason %s (%d)",
1233               gst_flow_get_name (ret), ret));
1234       gst_pad_push_event (queue->srcpad, gst_event_new_eos ());
1235     }
1236     return;
1237   }
1238 }
1239
1240 static gboolean
1241 gst_queue_handle_src_event (GstPad * pad, GstObject * parent, GstEvent * event)
1242 {
1243   gboolean res = TRUE;
1244   GstQueue *queue = GST_QUEUE (parent);
1245
1246 #ifndef GST_DISABLE_GST_DEBUG
1247   GST_CAT_DEBUG_OBJECT (queue_dataflow, queue, "got event %p (%d)",
1248       event, GST_EVENT_TYPE (event));
1249 #endif
1250
1251   res = gst_pad_push_event (queue->sinkpad, event);
1252
1253   return res;
1254 }
1255
1256 static gboolean
1257 gst_queue_handle_src_query (GstPad * pad, GstObject * parent, GstQuery * query)
1258 {
1259   GstQueue *queue = GST_QUEUE (parent);
1260   gboolean res;
1261
1262   switch (GST_QUERY_TYPE (query)) {
1263     case GST_QUERY_SCHEDULING:{
1264       gst_query_add_scheduling_mode (query, GST_PAD_MODE_PUSH);
1265       res = TRUE;
1266       break;
1267     }
1268     default:
1269       res = gst_pad_query_default (pad, parent, query);
1270       break;
1271   }
1272
1273   if (!res)
1274     return FALSE;
1275
1276   /* Adjust peer response for data contained in queue */
1277   switch (GST_QUERY_TYPE (query)) {
1278     case GST_QUERY_POSITION:
1279     {
1280       gint64 peer_pos;
1281       GstFormat format;
1282
1283       /* get peer position */
1284       gst_query_parse_position (query, &format, &peer_pos);
1285
1286       /* FIXME: this code assumes that there's no discont in the queue */
1287       switch (format) {
1288         case GST_FORMAT_BYTES:
1289           peer_pos -= queue->cur_level.bytes;
1290           break;
1291         case GST_FORMAT_TIME:
1292           peer_pos -= queue->cur_level.time;
1293           break;
1294         default:
1295           GST_DEBUG_OBJECT (queue, "Can't adjust query in %s format, don't "
1296               "know how to adjust value", gst_format_get_name (format));
1297           return TRUE;
1298       }
1299       /* set updated position */
1300       gst_query_set_position (query, format, peer_pos);
1301       break;
1302     }
1303     case GST_QUERY_LATENCY:
1304     {
1305       gboolean live;
1306       GstClockTime min, max;
1307
1308       gst_query_parse_latency (query, &live, &min, &max);
1309
1310       /* we can delay up to the limit of the queue in time. If we have no time
1311        * limit, the best thing we can do is to return an infinite delay. In
1312        * reality a better estimate would be the byte/buffer rate but that is not
1313        * possible right now. */
1314       if (queue->max_size.time > 0 && max != -1)
1315         max += queue->max_size.time;
1316       else
1317         max = -1;
1318
1319       /* adjust for min-threshold */
1320       if (queue->min_threshold.time > 0 && min != -1)
1321         min += queue->min_threshold.time;
1322
1323       gst_query_set_latency (query, live, min, max);
1324       break;
1325     }
1326     default:
1327       /* peer handled other queries */
1328       break;
1329   }
1330
1331   return TRUE;
1332 }
1333
1334 static gboolean
1335 gst_queue_sink_activate_mode (GstPad * pad, GstObject * parent, GstPadMode mode,
1336     gboolean active)
1337 {
1338   gboolean result;
1339   GstQueue *queue;
1340
1341   queue = GST_QUEUE (parent);
1342
1343   switch (mode) {
1344     case GST_PAD_MODE_PUSH:
1345       if (active) {
1346         GST_QUEUE_MUTEX_LOCK (queue);
1347         queue->srcresult = GST_FLOW_OK;
1348         queue->eos = FALSE;
1349         queue->unexpected = FALSE;
1350         GST_QUEUE_MUTEX_UNLOCK (queue);
1351       } else {
1352         /* step 1, unblock chain function */
1353         GST_QUEUE_MUTEX_LOCK (queue);
1354         queue->srcresult = GST_FLOW_FLUSHING;
1355         gst_queue_locked_flush (queue);
1356         GST_QUEUE_MUTEX_UNLOCK (queue);
1357       }
1358       result = TRUE;
1359       break;
1360     default:
1361       result = FALSE;
1362       break;
1363   }
1364   return result;
1365 }
1366
1367 static gboolean
1368 gst_queue_src_activate_mode (GstPad * pad, GstObject * parent, GstPadMode mode,
1369     gboolean active)
1370 {
1371   gboolean result;
1372   GstQueue *queue;
1373
1374   queue = GST_QUEUE (parent);
1375
1376   switch (mode) {
1377     case GST_PAD_MODE_PUSH:
1378       if (active) {
1379         GST_QUEUE_MUTEX_LOCK (queue);
1380         queue->srcresult = GST_FLOW_OK;
1381         queue->eos = FALSE;
1382         queue->unexpected = FALSE;
1383         result =
1384             gst_pad_start_task (pad, (GstTaskFunction) gst_queue_loop, pad,
1385             NULL);
1386         GST_QUEUE_MUTEX_UNLOCK (queue);
1387       } else {
1388         /* step 1, unblock loop function */
1389         GST_QUEUE_MUTEX_LOCK (queue);
1390         queue->srcresult = GST_FLOW_FLUSHING;
1391         /* the item add signal will unblock */
1392         g_cond_signal (&queue->item_add);
1393         GST_QUEUE_MUTEX_UNLOCK (queue);
1394
1395         /* step 2, make sure streaming finishes */
1396         result = gst_pad_stop_task (pad);
1397       }
1398       break;
1399     default:
1400       result = FALSE;
1401       break;
1402   }
1403   return result;
1404 }
1405
1406 static void
1407 queue_capacity_change (GstQueue * queue)
1408 {
1409   if (queue->leaky == GST_QUEUE_LEAK_DOWNSTREAM) {
1410     gst_queue_leak_downstream (queue);
1411   }
1412
1413   /* changing the capacity of the queue must wake up
1414    * the _chain function, it might have more room now
1415    * to store the buffer/event in the queue */
1416   GST_QUEUE_SIGNAL_DEL (queue);
1417 }
1418
1419 /* Changing the minimum required fill level must
1420  * wake up the _loop function as it might now
1421  * be able to preceed.
1422  */
1423 #define QUEUE_THRESHOLD_CHANGE(q)\
1424   GST_QUEUE_SIGNAL_ADD (q);
1425
1426 static void
1427 gst_queue_set_property (GObject * object,
1428     guint prop_id, const GValue * value, GParamSpec * pspec)
1429 {
1430   GstQueue *queue = GST_QUEUE (object);
1431
1432   /* someone could change levels here, and since this
1433    * affects the get/put funcs, we need to lock for safety. */
1434   GST_QUEUE_MUTEX_LOCK (queue);
1435
1436   switch (prop_id) {
1437     case PROP_MAX_SIZE_BYTES:
1438       queue->max_size.bytes = g_value_get_uint (value);
1439       queue_capacity_change (queue);
1440       break;
1441     case PROP_MAX_SIZE_BUFFERS:
1442       queue->max_size.buffers = g_value_get_uint (value);
1443       queue_capacity_change (queue);
1444       break;
1445     case PROP_MAX_SIZE_TIME:
1446       queue->max_size.time = g_value_get_uint64 (value);
1447       queue_capacity_change (queue);
1448       break;
1449     case PROP_MIN_THRESHOLD_BYTES:
1450       queue->min_threshold.bytes = g_value_get_uint (value);
1451       queue->orig_min_threshold.bytes = queue->min_threshold.bytes;
1452       QUEUE_THRESHOLD_CHANGE (queue);
1453       break;
1454     case PROP_MIN_THRESHOLD_BUFFERS:
1455       queue->min_threshold.buffers = g_value_get_uint (value);
1456       queue->orig_min_threshold.buffers = queue->min_threshold.buffers;
1457       QUEUE_THRESHOLD_CHANGE (queue);
1458       break;
1459     case PROP_MIN_THRESHOLD_TIME:
1460       queue->min_threshold.time = g_value_get_uint64 (value);
1461       queue->orig_min_threshold.time = queue->min_threshold.time;
1462       QUEUE_THRESHOLD_CHANGE (queue);
1463       break;
1464     case PROP_LEAKY:
1465       queue->leaky = g_value_get_enum (value);
1466       break;
1467     case PROP_SILENT:
1468       queue->silent = g_value_get_boolean (value);
1469       break;
1470     case PROP_FLUSH_ON_EOS:
1471       queue->flush_on_eos = g_value_get_boolean (value);
1472       break;
1473     default:
1474       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1475       break;
1476   }
1477
1478   GST_QUEUE_MUTEX_UNLOCK (queue);
1479 }
1480
1481 static void
1482 gst_queue_get_property (GObject * object,
1483     guint prop_id, GValue * value, GParamSpec * pspec)
1484 {
1485   GstQueue *queue = GST_QUEUE (object);
1486
1487   GST_QUEUE_MUTEX_LOCK (queue);
1488
1489   switch (prop_id) {
1490     case PROP_CUR_LEVEL_BYTES:
1491       g_value_set_uint (value, queue->cur_level.bytes);
1492       break;
1493     case PROP_CUR_LEVEL_BUFFERS:
1494       g_value_set_uint (value, queue->cur_level.buffers);
1495       break;
1496     case PROP_CUR_LEVEL_TIME:
1497       g_value_set_uint64 (value, queue->cur_level.time);
1498       break;
1499     case PROP_MAX_SIZE_BYTES:
1500       g_value_set_uint (value, queue->max_size.bytes);
1501       break;
1502     case PROP_MAX_SIZE_BUFFERS:
1503       g_value_set_uint (value, queue->max_size.buffers);
1504       break;
1505     case PROP_MAX_SIZE_TIME:
1506       g_value_set_uint64 (value, queue->max_size.time);
1507       break;
1508     case PROP_MIN_THRESHOLD_BYTES:
1509       g_value_set_uint (value, queue->min_threshold.bytes);
1510       break;
1511     case PROP_MIN_THRESHOLD_BUFFERS:
1512       g_value_set_uint (value, queue->min_threshold.buffers);
1513       break;
1514     case PROP_MIN_THRESHOLD_TIME:
1515       g_value_set_uint64 (value, queue->min_threshold.time);
1516       break;
1517     case PROP_LEAKY:
1518       g_value_set_enum (value, queue->leaky);
1519       break;
1520     case PROP_SILENT:
1521       g_value_set_boolean (value, queue->silent);
1522       break;
1523     case PROP_FLUSH_ON_EOS:
1524       g_value_set_boolean (value, queue->flush_on_eos);
1525       break;
1526     default:
1527       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1528       break;
1529   }
1530
1531   GST_QUEUE_MUTEX_UNLOCK (queue);
1532 }