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