implement translatable error messages using gerror.
[platform/upstream/gstreamer.git] / gst / 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  *
6  * gstqueue.c:
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Library General Public
10  * License as published by the Free Software Foundation; either
11  * version 2 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Library General Public License for more details.
17  *
18  * You should have received a copy of the GNU Library General Public
19  * License along with this library; if not, write to the
20  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21  * Boston, MA 02111-1307, USA.
22  */
23
24
25 #include "gst_private.h"
26
27 #include "gstqueue.h"
28 #include "gstscheduler.h"
29 #include "gstevent.h"
30 #include "gstinfo.h"
31
32 GstElementDetails gst_queue_details = {
33   "Queue",
34   "Generic",
35   "LGPL",
36   "Simple data queue",
37   VERSION,
38   "Erik Walthinsen <omega@cse.ogi.edu>",
39   "(C) 1999",
40 };
41
42
43 /* Queue signals and args */
44 enum {
45   FULL,
46   LAST_SIGNAL
47 };
48
49 enum {
50   ARG_0,
51   ARG_LEVEL_BUFFERS,
52   ARG_LEVEL_BYTES,
53   ARG_LEVEL_TIME,
54   ARG_SIZE_BUFFERS,
55   ARG_SIZE_BYTES,
56   ARG_SIZE_TIME,
57   ARG_LEAKY,
58   ARG_LEVEL,
59   ARG_MAX_LEVEL,
60   ARG_MIN_THRESHOLD_BYTES, 
61   ARG_MAY_DEADLOCK,
62   ARG_BLOCK_TIMEOUT,
63 };
64
65
66 static void                     gst_queue_class_init            (GstQueueClass *klass);
67 static void                     gst_queue_init                  (GstQueue *queue);
68 static void                     gst_queue_dispose               (GObject *object);
69
70 static void                     gst_queue_set_property          (GObject *object, guint prop_id, 
71                                                                  const GValue *value, GParamSpec *pspec);
72 static void                     gst_queue_get_property          (GObject *object, guint prop_id, 
73                                                                  GValue *value, GParamSpec *pspec);
74
75 static void                     gst_queue_chain                 (GstPad *pad, GstBuffer *buf);
76 static GstBuffer *              gst_queue_get                   (GstPad *pad);
77 static GstBufferPool*           gst_queue_get_bufferpool        (GstPad *pad);
78         
79 static gboolean                 gst_queue_handle_src_event      (GstPad *pad, GstEvent *event);
80
81
82 static void                     gst_queue_locked_flush          (GstQueue *queue);
83
84 static GstElementStateReturn    gst_queue_change_state          (GstElement *element);
85 static gboolean                 gst_queue_release_locks         (GstElement *element);
86
87   
88 #define GST_TYPE_QUEUE_LEAKY (queue_leaky_get_type())
89 static GType
90 queue_leaky_get_type(void) {
91   static GType queue_leaky_type = 0;
92   static GEnumValue queue_leaky[] = {
93     { GST_QUEUE_NO_LEAK,                "0", "Not Leaky" },
94     { GST_QUEUE_LEAK_UPSTREAM,          "1", "Leaky on Upstream" },
95     { GST_QUEUE_LEAK_DOWNSTREAM,        "2", "Leaky on Downstream" },
96     { 0, NULL, NULL },
97   };
98   if (!queue_leaky_type) {
99     queue_leaky_type = g_enum_register_static("GstQueueLeaky", queue_leaky);
100   }
101   return queue_leaky_type;
102 }
103
104 static GstElementClass *parent_class = NULL;
105 static guint gst_queue_signals[LAST_SIGNAL] = { 0 };
106
107 GType
108 gst_queue_get_type(void) 
109 {
110   static GType queue_type = 0;
111
112   if (!queue_type) {
113     static const GTypeInfo queue_info = {
114       sizeof(GstQueueClass),
115       NULL,
116       NULL,
117       (GClassInitFunc)gst_queue_class_init,
118       NULL,
119       NULL,
120       sizeof(GstQueue),
121       4,
122       (GInstanceInitFunc)gst_queue_init,
123       NULL
124     };
125     queue_type = g_type_register_static (GST_TYPE_ELEMENT, "GstQueue", &queue_info, 0);
126   }
127   return queue_type;
128 }
129
130 static void
131 gst_queue_class_init (GstQueueClass *klass)
132 {
133   GObjectClass *gobject_class;
134   GstElementClass *gstelement_class;
135
136   gobject_class = (GObjectClass*)klass;
137   gstelement_class = (GstElementClass*)klass;
138
139   parent_class = g_type_class_ref (GST_TYPE_ELEMENT);
140
141   gst_queue_signals[FULL] =
142     g_signal_new ("full", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_FIRST,
143                   G_STRUCT_OFFSET (GstQueueClass, full), NULL, NULL,
144                   g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0);
145   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_LEAKY,
146     g_param_spec_enum ("leaky", "Leaky", "Where the queue leaks, if at all.",
147                        GST_TYPE_QUEUE_LEAKY, GST_QUEUE_NO_LEAK, G_PARAM_READWRITE));
148   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_LEVEL,
149     g_param_spec_int ("level", "Level", "How many buffers are in the queue.",
150                       0, G_MAXINT, 0, G_PARAM_READABLE));
151   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_MAX_LEVEL,
152     g_param_spec_int ("max_level", "Maximum Level", "How many buffers the queue holds.",
153                       0, G_MAXINT, 100, G_PARAM_READWRITE));
154   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_MIN_THRESHOLD_BYTES,
155     g_param_spec_int ("min_threshold_bytes", "Minimum Threshold",
156                       "Minimum bytes required before signalling not_empty to reader.",
157                       0, G_MAXINT, 0, G_PARAM_READWRITE));
158   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_MAY_DEADLOCK,
159     g_param_spec_boolean ("may_deadlock", "May Deadlock", "The queue may deadlock if it's full and not PLAYING",
160                       TRUE, G_PARAM_READWRITE));
161   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_BLOCK_TIMEOUT,
162     g_param_spec_int ("block_timeout", "Timeout for Block", 
163                       "Microseconds until blocked queue times out and returns filler event. "
164                       "Value of -1 disables timeout",
165                       -1, G_MAXINT, -1, G_PARAM_READWRITE));
166
167   gobject_class->dispose                = GST_DEBUG_FUNCPTR (gst_queue_dispose);
168   gobject_class->set_property           = GST_DEBUG_FUNCPTR (gst_queue_set_property);
169   gobject_class->get_property           = GST_DEBUG_FUNCPTR (gst_queue_get_property);
170
171   gstelement_class->change_state  = GST_DEBUG_FUNCPTR(gst_queue_change_state);
172   gstelement_class->release_locks = GST_DEBUG_FUNCPTR(gst_queue_release_locks);
173 }
174
175 static GstPadLinkReturn
176 gst_queue_link (GstPad *pad, GstCaps *caps)
177 {
178   GstQueue *queue = GST_QUEUE (gst_pad_get_parent (pad));
179   GstPad *otherpad;
180
181   if (pad == queue->srcpad) 
182     otherpad = queue->sinkpad;
183   else
184     otherpad = queue->srcpad;
185
186   return gst_pad_proxy_link (otherpad, caps);
187 }
188
189 static GstCaps*
190 gst_queue_getcaps (GstPad *pad, GstCaps *caps)
191 {
192   GstQueue *queue = GST_QUEUE (gst_pad_get_parent (pad));
193   GstPad *otherpad;
194
195   if (pad == queue->srcpad) 
196     otherpad = GST_PAD_PEER (queue->sinkpad);
197   else
198     otherpad = GST_PAD_PEER (queue->srcpad);
199   
200   if (otherpad)
201     return gst_pad_get_caps (otherpad);
202
203   return NULL;
204 }
205
206 static void
207 gst_queue_init (GstQueue *queue)
208 {
209   /* scheduling on this kind of element is, well, interesting */
210   GST_FLAG_SET (queue, GST_ELEMENT_DECOUPLED);
211   GST_FLAG_SET (queue, GST_ELEMENT_EVENT_AWARE);
212
213   queue->sinkpad = gst_pad_new ("sink", GST_PAD_SINK);
214   gst_pad_set_chain_function (queue->sinkpad, GST_DEBUG_FUNCPTR (gst_queue_chain));
215   gst_element_add_pad (GST_ELEMENT (queue), queue->sinkpad);
216   gst_pad_set_bufferpool_function (queue->sinkpad, GST_DEBUG_FUNCPTR (gst_queue_get_bufferpool));
217   gst_pad_set_link_function (queue->sinkpad, GST_DEBUG_FUNCPTR (gst_queue_link));
218   gst_pad_set_getcaps_function (queue->sinkpad, GST_DEBUG_FUNCPTR (gst_queue_getcaps));
219
220   queue->srcpad = gst_pad_new ("src", GST_PAD_SRC);
221   gst_pad_set_get_function (queue->srcpad, GST_DEBUG_FUNCPTR (gst_queue_get));
222   gst_element_add_pad (GST_ELEMENT (queue), queue->srcpad);
223   gst_pad_set_link_function (queue->srcpad, GST_DEBUG_FUNCPTR (gst_queue_link));
224   gst_pad_set_getcaps_function (queue->srcpad, GST_DEBUG_FUNCPTR (gst_queue_getcaps));
225   gst_pad_set_event_function (queue->srcpad, GST_DEBUG_FUNCPTR (gst_queue_handle_src_event));
226
227   queue->leaky = GST_QUEUE_NO_LEAK;
228   queue->queue = NULL;
229   queue->level_buffers = 0;
230   queue->level_bytes = 0;
231   queue->level_time = G_GINT64_CONSTANT (0);
232   queue->size_buffers = 100;                            /* 100 buffers */
233   queue->size_bytes = 100 * 1024;       /* 100KB */
234   queue->size_time = GST_SECOND;        /* 1sec */
235   queue->min_threshold_bytes = 0;
236   queue->may_deadlock = TRUE;
237   queue->block_timeout = -1;
238   queue->interrupt = FALSE;
239   queue->flush = FALSE;
240
241   queue->qlock = g_mutex_new ();
242   queue->not_empty = g_cond_new ();
243   queue->not_full = g_cond_new ();
244   queue->events = g_async_queue_new();
245   queue->queue = g_queue_new ();
246   GST_CAT_DEBUG_OBJECT (GST_CAT_THREAD, queue, "initialized queue's not_empty & not_full conditions");
247 }
248
249 static void
250 gst_queue_dispose (GObject *object)
251 {
252   GstQueue *queue = GST_QUEUE (object);
253
254   gst_element_set_state (GST_ELEMENT (queue), GST_STATE_NULL);
255
256   g_mutex_free (queue->qlock);
257   g_cond_free (queue->not_empty);
258   g_cond_free (queue->not_full);
259   g_queue_free (queue->queue);
260
261   g_async_queue_unref(queue->events);
262
263   G_OBJECT_CLASS (parent_class)->dispose (object);
264 }
265
266 static GstBufferPool*
267 gst_queue_get_bufferpool (GstPad *pad)
268 {
269   GstQueue *queue;
270
271   queue = GST_QUEUE (GST_OBJECT_PARENT (pad));
272
273   return gst_pad_get_bufferpool (queue->srcpad);
274 }
275
276 static void
277 gst_queue_cleanup_data (gpointer data, const gpointer user_data)
278 {
279   GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, user_data, "cleaning buffer %p", data);
280
281   gst_data_unref (GST_DATA (data));
282 }
283
284 static void
285 gst_queue_locked_flush (GstQueue *queue)
286 {
287   gpointer data;
288   
289   while ((data = g_queue_pop_head (queue->queue))) {
290     gst_queue_cleanup_data (data, (gpointer) queue);
291   }
292   queue->timeval = NULL;
293   queue->level_buffers = 0;
294   queue->level_bytes = 0;
295   queue->level_time = G_GINT64_CONSTANT (0);
296   /* make sure any pending buffers to be added are flushed too */
297   queue->flush = TRUE;
298   /* signal not_full, since we apparently aren't full anymore */
299   g_cond_signal (queue->not_full);
300 }
301
302 static void
303 gst_queue_chain (GstPad *pad, GstBuffer *buf)
304 {
305   GstQueue *queue;
306
307   g_return_if_fail (pad != NULL);
308   g_return_if_fail (GST_IS_PAD (pad));
309   g_return_if_fail (buf != NULL);
310
311   queue = GST_QUEUE (GST_OBJECT_PARENT (pad));
312   
313   /* check for events to send upstream */
314   g_async_queue_lock(queue->events);
315   while (g_async_queue_length_unlocked(queue->events) > 0){
316     GstEvent *event = (GstEvent*)g_async_queue_pop_unlocked(queue->events);
317     GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "sending event upstream\n");
318     gst_pad_event_default (pad, event);
319     GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "event sent\n");
320   }
321   g_async_queue_unlock(queue->events);
322
323 restart:
324   /* we have to lock the queue since we span threads */
325   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "locking t:%p", g_thread_self ());
326   g_mutex_lock (queue->qlock);
327   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "locked t:%p", g_thread_self ());
328
329   /* assume don't need to flush this buffer when the queue is filled */
330   queue->flush = FALSE;
331
332   if (GST_IS_EVENT (buf)) {
333     switch (GST_EVENT_TYPE (buf)) {
334       case GST_EVENT_FLUSH:
335         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "FLUSH event, flushing queue\n");
336         gst_queue_locked_flush (queue);
337         break;
338       case GST_EVENT_EOS:
339         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "eos in on %s %d\n", 
340                            GST_ELEMENT_NAME (queue), queue->level_buffers);
341         break;
342       default:
343         /* we put the event in the queue, we don't have to act ourselves */
344         break;
345     }
346   }
347
348   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "adding buffer %p of size %d",buf,GST_BUFFER_SIZE(buf));
349
350   if (queue->level_buffers == queue->size_buffers) {
351     g_mutex_unlock (queue->qlock);
352     g_signal_emit (G_OBJECT (queue), gst_queue_signals[FULL], 0);
353     g_mutex_lock (queue->qlock);
354
355     /* if this is a leaky queue... */
356     if (queue->leaky) {
357       /* FIXME don't want to leak events! */
358       /* if we leak on the upstream side, drop the current buffer */
359       if (queue->leaky == GST_QUEUE_LEAK_UPSTREAM) {
360         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "queue is full, leaking buffer on upstream end");
361         if (GST_IS_EVENT (buf))
362           fprintf(stderr, "Error: queue [%s] leaked an event, type:%d\n",
363               GST_ELEMENT_NAME(GST_ELEMENT(queue)),
364               GST_EVENT_TYPE(GST_EVENT(buf)));
365         /* now we have to clean up and exit right away */
366         g_mutex_unlock (queue->qlock);
367         goto out_unref;
368       }
369       /* otherwise we have to push a buffer off the other end */
370       else {
371         gpointer front;
372         GstBuffer *leakbuf;
373
374         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "queue is full, leaking buffer on downstream end");
375
376         front = g_queue_pop_head (queue->queue);
377         leakbuf = (GstBuffer *)(front);
378
379         if (GST_IS_EVENT (leakbuf)) {
380           fprintf(stderr, "Error: queue [%s] leaked an event, type:%d\n",
381               GST_ELEMENT_NAME(GST_ELEMENT(queue)),
382               GST_EVENT_TYPE(GST_EVENT(leakbuf)));
383         }
384         queue->level_buffers--;
385         queue->level_bytes -= GST_BUFFER_SIZE(leakbuf);
386         gst_data_unref (GST_DATA (leakbuf));
387       }
388     }
389
390     GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "pre full wait, level:%d/%d buffers, %d bytes",
391                         queue->level_buffers, queue->size_buffers, queue->level_bytes);
392
393     while (queue->level_buffers == queue->size_buffers) {
394       /* if there's a pending state change for this queue or its manager, switch */
395       /* back to iterator so bottom half of state change executes */
396       if (queue->interrupt) {
397         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "interrupted!!");
398         g_mutex_unlock (queue->qlock);
399         if (gst_scheduler_interrupt (gst_pad_get_scheduler (queue->sinkpad), GST_ELEMENT (queue)))
400           goto out_unref;
401         /* if we got here because we were unlocked after a flush, we don't need
402          * to add the buffer to the queue again */
403         if (queue->flush) {
404           GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "not adding pending buffer after flush");
405           goto out_unref;
406         }
407         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "adding pending buffer after interrupt");
408         goto restart;
409       }
410       if (GST_STATE (queue) != GST_STATE_PLAYING) {
411         /* this means the other end is shut down */
412         /* try to signal to resolve the error */
413         if (!queue->may_deadlock) {
414           g_mutex_unlock (queue->qlock);
415           gst_data_unref (GST_DATA (buf));
416           gst_element_error (GST_ELEMENT (queue), GST_ERROR_UNKNOWN,
417                              g_strdup (_("Cannot go on decoding")), /* FIXME: Better ideas? */
418                              g_strdup ("deadlock found, source pad elements are shut down"));
419           /* we don't want to goto out_unref here, since we want to clean up before calling gst_element_error */
420           return;
421         }
422         else {
423           g_print ("%s: waiting for the app to restart source pad elements\n", GST_ELEMENT_NAME (queue));
424         }
425       }
426
427       GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "waiting for not_full, level:%d/%d buffers, %d bytes", 
428                       queue->level_buffers, queue->size_buffers, queue->level_bytes);
429       g_cond_wait (queue->not_full, queue->qlock);
430       GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "got not_full signal");
431     }
432     GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "post full wait, level:%d/%d buffers, %d bytes",
433         queue->level_buffers, queue->size_buffers, queue->level_bytes);
434   }
435
436   /* put the buffer on the tail of the list */
437   g_queue_push_tail (queue->queue, buf);
438
439   queue->level_buffers++;
440   queue->level_bytes += GST_BUFFER_SIZE(buf);
441
442   /* this assertion _has_ to hold */
443   g_assert (queue->queue->length == queue->level_buffers);
444
445   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "(%s:%s)+ level:%d/%d buffers, %d bytes",
446       GST_DEBUG_PAD_NAME(pad),
447       queue->level_buffers, queue->size_buffers, queue->level_bytes);
448
449   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "signalling not_empty");
450   g_cond_signal (queue->not_empty);
451   g_mutex_unlock (queue->qlock);
452
453   return;
454
455 out_unref:
456   gst_data_unref (GST_DATA (buf));
457   return;
458 }
459
460 static GstBuffer *
461 gst_queue_get (GstPad *pad)
462 {
463   GstQueue *queue;
464   GstBuffer *buf = NULL;
465   gpointer front;
466
467   g_assert(pad != NULL);
468   g_assert(GST_IS_PAD(pad));
469   g_return_val_if_fail (pad != NULL, NULL);
470   g_return_val_if_fail (GST_IS_PAD (pad), NULL);
471
472   queue = GST_QUEUE (GST_OBJECT_PARENT (pad));
473
474 restart:
475   /* have to lock for thread-safety */
476   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "locking t:%p", g_thread_self ());
477   g_mutex_lock (queue->qlock);
478   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "locked t:%p %p", g_thread_self (), queue->not_empty);
479
480   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "pre empty wait, level:%d/%d buffers, %d bytes",
481     queue->level_buffers, queue->size_buffers, queue->level_bytes);
482   while (queue->level_buffers == 0) {
483     /* if there's a pending state change for this queue or its manager, switch
484      * back to iterator so bottom half of state change executes
485      */ 
486     //while (GST_STATE_PENDING (queue) != GST_STATE_VOID_PENDING) {
487     if (queue->interrupt) {
488       GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "interrupted!!");
489       g_mutex_unlock (queue->qlock);
490       if (gst_scheduler_interrupt (gst_pad_get_scheduler (queue->srcpad), GST_ELEMENT (queue)))
491         return GST_BUFFER (gst_event_new (GST_EVENT_INTERRUPT));
492       goto restart;
493     }
494     if (GST_STATE (queue) != GST_STATE_PLAYING) {
495       /* this means the other end is shut down */
496       if (!queue->may_deadlock) {
497         g_mutex_unlock (queue->qlock);
498         gst_element_error (GST_ELEMENT (queue), GST_ERROR_UNKNOWN,
499                            g_strdup (_("Cannot go on decoding")), /* FIXME: Better ideas? */
500                            g_strdup ("deadlock found, sink pad elements are shut down"));
501         goto restart;
502       }
503       else {
504         g_print ("%s: waiting for the app to restart source pad elements\n", GST_ELEMENT_NAME (queue));
505       }
506     }
507
508     GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "waiting for not_empty, level:%d/%d buffers, %d bytes",
509                        queue->level_buffers, queue->size_buffers, queue->level_bytes);
510     
511     /* if (queue->block_timeout > -1){ */
512     if (FALSE) {
513       GTimeVal timeout;
514       g_get_current_time(&timeout);
515       g_time_val_add(&timeout, queue->block_timeout);
516       if (!g_cond_timed_wait (queue->not_empty, queue->qlock, &timeout)){
517         g_mutex_unlock (queue->qlock);
518         g_warning ("filler");
519         return GST_BUFFER(gst_event_new_filler());
520       }
521     }
522     else {
523       g_cond_wait (queue->not_empty, queue->qlock);
524     }
525     GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "got not_empty signal");
526   }
527   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "post empty wait, level:%d/%d buffers, %d bytes",
528     queue->level_buffers, queue->size_buffers, queue->level_bytes);
529
530   front = g_queue_pop_head (queue->queue);
531   buf = (GstBuffer *)(front);
532   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "retrieved buffer %p from queue", buf);
533
534   queue->level_buffers--;
535   queue->level_bytes -= GST_BUFFER_SIZE(buf);
536
537   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "(%s:%s)- level:%d/%d buffers, %d bytes",
538       GST_DEBUG_PAD_NAME(pad),
539       queue->level_buffers, queue->size_buffers, queue->level_bytes);
540
541   /* this assertion _has_ to hold */
542   g_assert (queue->queue->length == queue->level_buffers);
543
544   GST_CAT_LOG_OBJECT (GST_CAT_DATAFLOW, queue, "signalling not_full");
545   g_cond_signal (queue->not_full);
546
547   g_mutex_unlock (queue->qlock);
548
549   /* FIXME where should this be? locked? */
550   if (GST_IS_EVENT(buf)) {
551     GstEvent *event = GST_EVENT(buf);
552     switch (GST_EVENT_TYPE(event)) {
553       case GST_EVENT_EOS:
554         GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "queue \"%s\" eos", GST_ELEMENT_NAME (queue));
555         gst_element_set_eos (GST_ELEMENT (queue));
556         break;
557       default:
558         break;
559     }
560   }
561
562   return buf;
563 }
564
565
566 static gboolean
567 gst_queue_handle_src_event (GstPad *pad, GstEvent *event)
568 {
569   GstQueue *queue;
570   gboolean res;
571   gint event_type;
572   gint flag_flush = 0;
573
574   queue = GST_QUEUE (GST_OBJECT_PARENT (pad));
575
576   g_mutex_lock (queue->qlock);
577
578   if (gst_element_get_state (GST_ELEMENT (queue)) == GST_STATE_PLAYING) {
579     /* push the event to the queue for upstream consumption */
580     g_async_queue_push(queue->events, event);
581     g_warning ("FIXME: sending event in a running queue");
582     /* FIXME wait for delivery of the event here, then return the result
583      * instead of FALSE */
584     res = FALSE;
585     goto done;
586   }
587
588   event_type = GST_EVENT_TYPE (event);
589   if (event_type == GST_EVENT_SEEK)
590     flag_flush = GST_EVENT_SEEK_FLAGS (event) & GST_SEEK_FLAG_FLUSH;
591
592   res = gst_pad_event_default (pad, event); 
593
594   switch (event_type) {
595     case GST_EVENT_FLUSH:
596       GST_CAT_DEBUG_OBJECT (GST_CAT_DATAFLOW, queue, "FLUSH event, flushing queue\n");
597       gst_queue_locked_flush (queue);
598       break;
599     case GST_EVENT_SEEK:
600       if (flag_flush) {
601         gst_queue_locked_flush (queue);
602       }
603     default:
604       break;
605   }
606
607 done:
608   g_mutex_unlock (queue->qlock);
609
610   /* we have to claim success, but we don't really know */
611   return res;
612 }
613
614 static gboolean
615 gst_queue_release_locks (GstElement *element)
616 {
617   GstQueue *queue;
618
619   queue = GST_QUEUE (element);
620
621   g_mutex_lock (queue->qlock);
622   queue->interrupt = TRUE;
623   g_cond_signal (queue->not_full);
624   g_cond_signal (queue->not_empty); 
625   g_mutex_unlock (queue->qlock);
626
627   return TRUE;
628 }
629
630 static GstElementStateReturn
631 gst_queue_change_state (GstElement *element)
632 {
633   GstQueue *queue;
634   GstElementStateReturn ret;
635
636   queue = GST_QUEUE (element);
637
638   GST_CAT_LOG_OBJECT (GST_CAT_STATES, element, "starting state change");
639
640   /* lock the queue so another thread (not in sync with this thread's state)
641    * can't call this queue's _get (or whatever)
642    */
643   g_mutex_lock (queue->qlock);
644
645   switch (GST_STATE_TRANSITION (element)) {
646     case GST_STATE_NULL_TO_READY:
647       gst_queue_locked_flush (queue);
648       break;
649     case GST_STATE_READY_TO_PAUSED:
650       break;
651     case GST_STATE_PAUSED_TO_PLAYING:
652       if (!GST_PAD_IS_LINKED (queue->sinkpad)) {
653         GST_CAT_DEBUG_OBJECT (GST_CAT_STATES, queue, "queue %s is not linked", GST_ELEMENT_NAME (queue));
654         /* FIXME can this be? */
655         g_cond_signal (queue->not_empty);
656
657         ret = GST_STATE_FAILURE;
658         goto error;
659       }
660       else {
661         GstScheduler *src_sched, *sink_sched;
662             
663         src_sched = gst_pad_get_scheduler (GST_PAD_CAST (queue->srcpad));
664         sink_sched = gst_pad_get_scheduler (GST_PAD_CAST (queue->sinkpad));
665
666         if (src_sched == sink_sched) {
667           GST_CAT_DEBUG_OBJECT (GST_CAT_STATES, queue, "queue %s does not connect different schedulers", 
668                         GST_ELEMENT_NAME (queue));
669
670           g_warning ("queue %s does not connect different schedulers",
671                         GST_ELEMENT_NAME (queue));
672
673           ret = GST_STATE_FAILURE;
674           goto error;
675         }
676       }
677       queue->interrupt = FALSE;
678       break;
679     case GST_STATE_PLAYING_TO_PAUSED:
680       break;
681     case GST_STATE_PAUSED_TO_READY:
682       gst_queue_locked_flush (queue);
683       break;
684     case GST_STATE_READY_TO_NULL:
685       break;
686   }
687
688   ret = GST_ELEMENT_CLASS (parent_class)->change_state (element);
689
690 error:
691   g_mutex_unlock (queue->qlock);
692
693   GST_CAT_LOG_OBJECT (GST_CAT_STATES, element, "done with state change");
694   return ret;
695 }
696
697
698 static void
699 gst_queue_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec)
700 {
701   GstQueue *queue;
702
703   /* it's not null if we got it, but it might not be ours */
704   g_return_if_fail (GST_IS_QUEUE (object));
705
706   queue = GST_QUEUE (object);
707
708   switch (prop_id) {
709     case ARG_LEAKY:
710       queue->leaky = g_value_get_enum (value);
711       break;
712     case ARG_MAX_LEVEL:
713       queue->size_buffers = g_value_get_int (value);
714       break;
715     case ARG_MIN_THRESHOLD_BYTES:
716       queue->min_threshold_bytes = g_value_get_int (value);
717       break;
718     case ARG_MAY_DEADLOCK:
719       queue->may_deadlock = g_value_get_boolean (value);
720       break;
721     case ARG_BLOCK_TIMEOUT:
722       queue->block_timeout = g_value_get_int (value);
723       break;
724     default:
725       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
726       break;
727   }
728 }
729
730 static void
731 gst_queue_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec)
732 {
733   GstQueue *queue;
734
735   /* it's not null if we got it, but it might not be ours */
736   g_return_if_fail (GST_IS_QUEUE (object));
737
738   queue = GST_QUEUE (object);
739
740   switch (prop_id) {
741     case ARG_LEAKY:
742       g_value_set_enum (value, queue->leaky);
743       break;
744     case ARG_LEVEL:
745       g_value_set_int (value, queue->level_buffers);
746       break;
747     case ARG_MAX_LEVEL:
748       g_value_set_int (value, queue->size_buffers);
749       break;
750     case ARG_MIN_THRESHOLD_BYTES:
751       g_value_set_int (value, queue->min_threshold_bytes);
752       break;
753     case ARG_MAY_DEADLOCK:
754       g_value_set_boolean (value, queue->may_deadlock);
755       break;
756     case ARG_BLOCK_TIMEOUT:
757       g_value_set_int (value, queue->block_timeout);
758       break;
759     default:
760       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
761       break;
762   }
763 }