v4l2: fix error messages
[platform/upstream/gstreamer.git] / sys / v4l2 / gstv4l2bufferpool.c
index adf9cca..1d7d4c8 100644 (file)
 #include <unistd.h>
 
 #include "gst/video/video.h"
+#include "gst/video/gstmetavideo.h"
 
 #include <gstv4l2bufferpool.h>
+
 #include "gstv4l2src.h"
-#ifdef HAVE_EXPERIMENTAL
 #include "gstv4l2sink.h"
-#endif
 #include "v4l2_calls.h"
 #include "gst/gst-i18n-plugin.h"
 
@@ -70,96 +70,75 @@ gst_meta_v4l2_get_info (void)
   return meta_info;
 }
 
+/*
+ * GstV4l2BufferPool:
+ */
+#define gst_v4l2_buffer_pool_parent_class parent_class
+G_DEFINE_TYPE (GstV4l2BufferPool, gst_v4l2_buffer_pool, GST_TYPE_BUFFER_POOL);
+
 static void
-gst_v4l2_buffer_dispose (GstBuffer * buffer)
+gst_v4l2_buffer_pool_free_buffer (GstBufferPool * bpool, GstBuffer * buffer)
 {
-  GstV4l2BufferPool *pool;
-  gboolean resuscitated = FALSE;
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
   gint index;
   GstMetaV4l2 *meta;
+  GstV4l2Object *obj;
 
   meta = GST_META_V4L2_GET (buffer);
   g_assert (meta != NULL);
 
-  pool = meta->pool;
-  index = meta->vbuffer.index;
-
-  GST_LOG_OBJECT (pool->v4l2elem, "finalizing buffer %p %d", buffer, index);
-
-  GST_V4L2_BUFFER_POOL_LOCK (pool);
-  if (pool->running) {
-    if (pool->requeuebuf) {
-      if (!gst_v4l2_buffer_pool_qbuf (pool, buffer)) {
-        GST_WARNING ("could not requeue buffer %p %d", buffer, index);
-      } else {
-        resuscitated = TRUE;
-      }
-    } else {
-      resuscitated = TRUE;
-      /* XXX double check this... I think it is ok to not synchronize this
-       * w.r.t. destruction of the pool, since the buffer is still live and
-       * the buffer holds a ref to the pool..
-       */
-      g_async_queue_push (pool->avail_buffers, buffer);
-    }
-  } else {
-    GST_LOG_OBJECT (pool->v4l2elem, "the pool is shutting down");
-  }
-
-  if (resuscitated) {
-    /* FIXME: check that the caps didn't change */
-    GST_LOG_OBJECT (pool->v4l2elem, "reviving buffer %p, %d", buffer, index);
-    gst_buffer_ref (buffer);
-    pool->buffers[index] = buffer;
-  }
+  obj = pool->obj;
 
-  GST_V4L2_BUFFER_POOL_UNLOCK (pool);
+  index = meta->vbuffer.index;
+  GST_LOG_OBJECT (pool, "finalizing buffer %p %d", buffer, index);
+  pool->buffers[index] = NULL;
 
-  if (!resuscitated) {
-    GST_LOG_OBJECT (pool->v4l2elem,
-        "buffer %p (data %p, len %u) not recovered, unmapping",
-        buffer, meta->mem, meta->vbuffer.length);
-    v4l2_munmap (meta->mem, meta->vbuffer.length);
+  GST_LOG_OBJECT (pool,
+      "buffer %p (data %p, len %u) freed, unmapping",
+      buffer, meta->mem, meta->vbuffer.length);
+  v4l2_munmap (meta->mem, meta->vbuffer.length);
 
-    g_object_unref (pool);
-  }
+  gst_buffer_unref (buffer);
 }
 
-static GstBuffer *
-gst_v4l2_buffer_new (GstV4l2BufferPool * pool, guint index, GstCaps * caps)
+static GstFlowReturn
+gst_v4l2_buffer_pool_alloc_buffer (GstBufferPool * bpool, GstBuffer ** buffer,
+    GstBufferPoolParams * params)
 {
-  GstBuffer *ret;
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+  GstBuffer *newbuf;
   GstMetaV4l2 *meta;
+  GstV4l2Object *obj;
+  GstVideoInfo *info;
+  guint index;
 
-  ret = gst_buffer_new ();
-  GST_MINI_OBJECT_CAST (ret)->dispose =
-      (GstMiniObjectDisposeFunction) gst_v4l2_buffer_dispose;
+  obj = pool->obj;
+  info = &obj->info;
 
-  meta = GST_META_V4L2_ADD (ret);
+  newbuf = gst_buffer_new ();
+  meta = GST_META_V4L2_ADD (newbuf);
 
-  GST_LOG_OBJECT (pool->v4l2elem, "creating buffer %u, %p in pool %p", index,
-      ret, pool);
+  index = pool->index;
 
-  meta->pool = (GstV4l2BufferPool *) g_object_ref (pool);
+  GST_LOG_OBJECT (pool, "creating buffer %u, %p", index, newbuf, pool);
 
   meta->vbuffer.index = index;
-  meta->vbuffer.type = pool->type;
+  meta->vbuffer.type = obj->type;
   meta->vbuffer.memory = V4L2_MEMORY_MMAP;
 
   if (v4l2_ioctl (pool->video_fd, VIDIOC_QUERYBUF, &meta->vbuffer) < 0)
     goto querybuf_failed;
 
-  GST_LOG_OBJECT (pool->v4l2elem, "  index:     %u", meta->vbuffer.index);
-  GST_LOG_OBJECT (pool->v4l2elem, "  type:      %d", meta->vbuffer.type);
-  GST_LOG_OBJECT (pool->v4l2elem, "  bytesused: %u", meta->vbuffer.bytesused);
-  GST_LOG_OBJECT (pool->v4l2elem, "  flags:     %08x", meta->vbuffer.flags);
-  GST_LOG_OBJECT (pool->v4l2elem, "  field:     %d", meta->vbuffer.field);
-  GST_LOG_OBJECT (pool->v4l2elem, "  memory:    %d", meta->vbuffer.memory);
+  GST_LOG_OBJECT (pool, "  index:     %u", meta->vbuffer.index);
+  GST_LOG_OBJECT (pool, "  type:      %d", meta->vbuffer.type);
+  GST_LOG_OBJECT (pool, "  bytesused: %u", meta->vbuffer.bytesused);
+  GST_LOG_OBJECT (pool, "  flags:     %08x", meta->vbuffer.flags);
+  GST_LOG_OBJECT (pool, "  field:     %d", meta->vbuffer.field);
+  GST_LOG_OBJECT (pool, "  memory:    %d", meta->vbuffer.memory);
   if (meta->vbuffer.memory == V4L2_MEMORY_MMAP)
-    GST_LOG_OBJECT (pool->v4l2elem, "  MMAP offset:  %u",
-        meta->vbuffer.m.offset);
-  GST_LOG_OBJECT (pool->v4l2elem, "  length:    %u", meta->vbuffer.length);
-  GST_LOG_OBJECT (pool->v4l2elem, "  input:     %u", meta->vbuffer.input);
+    GST_LOG_OBJECT (pool, "  MMAP offset:  %u", meta->vbuffer.m.offset);
+  GST_LOG_OBJECT (pool, "  length:    %u", meta->vbuffer.length);
+  GST_LOG_OBJECT (pool, "  input:     %u", meta->vbuffer.input);
 
   meta->mem = v4l2_mmap (0, meta->vbuffer.length,
       PROT_READ | PROT_WRITE, MAP_SHARED, pool->video_fd,
@@ -167,11 +146,30 @@ gst_v4l2_buffer_new (GstV4l2BufferPool * pool, guint index, GstCaps * caps)
   if (meta->mem == MAP_FAILED)
     goto mmap_failed;
 
-  gst_buffer_take_memory (ret, -1,
-      gst_memory_new_wrapped (GST_MEMORY_FLAG_READONLY,
+  gst_buffer_take_memory (newbuf, -1,
+      gst_memory_new_wrapped (0,
           meta->mem, NULL, meta->vbuffer.length, 0, meta->vbuffer.length));
 
-  return ret;
+  /* add metadata to raw video buffers */
+  if (info->finfo) {
+    gsize offset[GST_VIDEO_MAX_PLANES];
+    gint stride[GST_VIDEO_MAX_PLANES];
+
+    offset[0] = 0;
+    stride[0] = obj->bytesperline;
+
+    GST_DEBUG_OBJECT (pool, "adding video meta");
+    gst_buffer_add_meta_video_full (newbuf, info->flags,
+        GST_VIDEO_INFO_FORMAT (info), GST_VIDEO_INFO_WIDTH (info),
+        GST_VIDEO_INFO_HEIGHT (info), GST_VIDEO_INFO_N_PLANES (info),
+        offset, stride);
+  }
+
+  pool->index++;
+
+  *buffer = newbuf;
+
+  return GST_FLOW_OK;
 
   /* ERRORS */
 querybuf_failed:
@@ -179,441 +177,383 @@ querybuf_failed:
     gint errnosave = errno;
 
     GST_WARNING ("Failed QUERYBUF: %s", g_strerror (errnosave));
-    gst_buffer_unref (ret);
+    gst_buffer_unref (newbuf);
     errno = errnosave;
-    return NULL;
+    return GST_FLOW_ERROR;
   }
 mmap_failed:
   {
     gint errnosave = errno;
 
     GST_WARNING ("Failed to mmap: %s", g_strerror (errnosave));
-    gst_buffer_unref (ret);
+    gst_buffer_unref (newbuf);
     errno = errnosave;
-    return NULL;
+    return GST_FLOW_ERROR;
   }
 }
 
-
-/*
- * GstV4l2BufferPool:
- */
-
-static GObjectClass *buffer_pool_parent_class = NULL;
-
-static void
-gst_v4l2_buffer_pool_finalize (GObject * object)
+static gboolean
+gst_v4l2_buffer_pool_set_config (GstBufferPool * bpool, GstStructure * config)
 {
-  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (object);
-
-  g_mutex_free (pool->lock);
-  pool->lock = NULL;
-
-  g_async_queue_unref (pool->avail_buffers);
-  pool->avail_buffers = NULL;
-
-  if (pool->video_fd >= 0)
-    v4l2_close (pool->video_fd);
-
-  if (pool->buffers) {
-    g_free (pool->buffers);
-    pool->buffers = NULL;
-  }
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+  const GstCaps *caps;
+  guint size, min_buffers, max_buffers;
+  guint prefix, align;
 
-  buffer_pool_parent_class->finalize (object);
-}
+  GST_DEBUG_OBJECT (pool, "set config");
 
-static void
-gst_v4l2_buffer_pool_init (GstV4l2BufferPool * pool, gpointer g_class)
-{
-  pool->lock = g_mutex_new ();
-  pool->running = FALSE;
-  pool->num_live_buffers = 0;
-}
+  /* parse the config and keep around */
+  if (!gst_buffer_pool_config_get (config, &caps, &size, &min_buffers,
+          &max_buffers, &prefix, &align))
+    goto wrong_config;
 
-static void
-gst_v4l2_buffer_pool_class_init (gpointer g_class, gpointer class_data)
-{
-  GObjectClass *object_class = G_OBJECT_CLASS (g_class);
-
-  buffer_pool_parent_class = g_type_class_peek_parent (g_class);
+  GST_DEBUG_OBJECT (pool, "config %" GST_PTR_FORMAT, config);
 
-  object_class->finalize = gst_v4l2_buffer_pool_finalize;
-}
-
-GType
-gst_v4l2_buffer_pool_get_type (void)
-{
-  static GType _gst_v4l2_buffer_pool_type;
-
-  if (G_UNLIKELY (_gst_v4l2_buffer_pool_type == 0)) {
-    static const GTypeInfo v4l2_buffer_pool_info = {
-      sizeof (GObjectClass),
-      NULL,
-      NULL,
-      gst_v4l2_buffer_pool_class_init,
-      NULL,
-      NULL,
-      sizeof (GstV4l2BufferPool),
-      0,
-      (GInstanceInitFunc) gst_v4l2_buffer_pool_init,
-      NULL
-    };
-    _gst_v4l2_buffer_pool_type = g_type_register_static (G_TYPE_OBJECT,
-        "GstV4l2BufferPool", &v4l2_buffer_pool_info, 0);
-  }
-  return _gst_v4l2_buffer_pool_type;
-}
+  pool->min_buffers = min_buffers;
+  pool->max_buffers = max_buffers;
 
+  return TRUE;
 
-/* this is somewhat of a hack.. but better to keep the hack in
- * one place than copy/pasting it around..
- */
-static GstV4l2Object *
-get_v4l2_object (GstElement * v4l2elem)
-{
-  GstV4l2Object *v4l2object = NULL;
-  if (GST_IS_V4L2SRC (v4l2elem)) {
-    v4l2object = (GST_V4L2SRC (v4l2elem))->v4l2object;
-#ifdef HAVE_EXPERIMENTAL
-  } else if (GST_IS_V4L2SINK (v4l2elem)) {
-    v4l2object = (GST_V4L2SINK (v4l2elem))->v4l2object;
-#endif
-  } else {
-    GST_ERROR_OBJECT (v4l2elem, "unknown v4l2 element");
+wrong_config:
+  {
+    GST_WARNING_OBJECT (pool, "invalid config %" GST_PTR_FORMAT, config);
+    return FALSE;
   }
-  return v4l2object;
 }
 
-
-
-/**
- * gst_v4l2_buffer_pool_new:
- * @v4l2elem:  the v4l2 element (src or sink) that owns this pool
- * @fd:   the video device file descriptor
- * @num_buffers:  the requested number of buffers in the pool
- * @caps:  the caps to set on the buffer
- * @requeuebuf: if %TRUE, and if the pool is still in the running state, a
- *  buffer with no remaining references is immediately passed back to v4l2
- *  (VIDIOC_QBUF), otherwise it is returned to the pool of available buffers
- *  (which can be accessed via gst_v4l2_buffer_pool_get().
- *
- * Construct a new buffer pool.
- *
- * Returns: the new pool, use gst_v4l2_buffer_pool_destroy() to free resources
- */
-GstV4l2BufferPool *
-gst_v4l2_buffer_pool_new (GstElement * v4l2elem, gint fd, gint num_buffers,
-    GstCaps * caps, gboolean requeuebuf, enum v4l2_buf_type type)
+static gboolean
+gst_v4l2_buffer_pool_start (GstBufferPool * bpool)
 {
-  GstV4l2BufferPool *pool;
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+  GstV4l2Object *obj = pool->obj;
   gint n;
   struct v4l2_requestbuffers breq;
+  gint num_buffers;
 
-  pool = (GstV4l2BufferPool *) g_object_new (GST_TYPE_V4L2_BUFFER_POOL, NULL);
-
-  pool->video_fd = v4l2_dup (fd);
-  if (pool->video_fd < 0)
-    goto dup_failed;
-
+  num_buffers = pool->max_buffers;
 
   /* first, lets request buffers, and see how many we can get: */
-  GST_DEBUG_OBJECT (v4l2elem, "STREAMING, requesting %d MMAP buffers",
-      num_buffers);
+  GST_DEBUG_OBJECT (pool, "starting, requesting %d MMAP buffers", num_buffers);
 
   memset (&breq, 0, sizeof (struct v4l2_requestbuffers));
-  breq.type = type;
+  breq.type = obj->type;
   breq.count = num_buffers;
   breq.memory = V4L2_MEMORY_MMAP;
 
-  if (v4l2_ioctl (fd, VIDIOC_REQBUFS, &breq) < 0)
+  if (v4l2_ioctl (pool->video_fd, VIDIOC_REQBUFS, &breq) < 0)
     goto reqbufs_failed;
 
-  GST_LOG_OBJECT (v4l2elem, " count:  %u", breq.count);
-  GST_LOG_OBJECT (v4l2elem, " type:   %d", breq.type);
-  GST_LOG_OBJECT (v4l2elem, " memory: %d", breq.memory);
+  GST_LOG_OBJECT (pool, " count:  %u", breq.count);
+  GST_LOG_OBJECT (pool, " type:   %d", breq.type);
+  GST_LOG_OBJECT (pool, " memory: %d", breq.memory);
 
   if (breq.count < GST_V4L2_MIN_BUFFERS)
     goto no_buffers;
 
   if (num_buffers != breq.count) {
-    GST_WARNING_OBJECT (v4l2elem, "using %u buffers instead", breq.count);
+    GST_WARNING_OBJECT (pool, "using %u buffers instead", breq.count);
     num_buffers = breq.count;
   }
 
-  pool->v4l2elem = v4l2elem;
-  pool->requeuebuf = requeuebuf;
-  pool->type = type;
+  pool->obj = obj;
+  pool->requeuebuf = (obj->type == V4L2_BUF_TYPE_VIDEO_CAPTURE ? TRUE : FALSE);
   pool->buffer_count = num_buffers;
   pool->buffers = g_new0 (GstBuffer *, num_buffers);
-  pool->avail_buffers = g_async_queue_new ();
+  pool->index = 0;
 
   /* now, map the buffers: */
   for (n = 0; n < num_buffers; n++) {
-    pool->buffers[n] = gst_v4l2_buffer_new (pool, n, caps);
-    if (!pool->buffers[n])
+    GstBuffer *buffer;
+
+    if (gst_v4l2_buffer_pool_alloc_buffer (bpool, &buffer, NULL) != GST_FLOW_OK)
       goto buffer_new_failed;
-    pool->num_live_buffers++;
-    g_async_queue_push (pool->avail_buffers, pool->buffers[n]);
-  }
 
-  return pool;
+    if (pool->requeuebuf)
+      gst_v4l2_buffer_pool_qbuf (bpool, buffer);
+  }
+  return TRUE;
 
   /* ERRORS */
-dup_failed:
-  {
-    gint errnosave = errno;
-
-    g_object_unref (pool);
-
-    errno = errnosave;
-
-    return NULL;
-  }
 reqbufs_failed:
   {
-    GstV4l2Object *v4l2object = get_v4l2_object (v4l2elem);
-    GST_ELEMENT_ERROR (v4l2elem, RESOURCE, READ,
-        (_("Could not get buffers from device '%s'."),
-            v4l2object->videodev),
-        ("error requesting %d buffers: %s", num_buffers, g_strerror (errno)));
-    return NULL;
+    GST_ERROR_OBJECT (pool,
+        "error requesting %d buffers: %s", num_buffers, g_strerror (errno));
+    return FALSE;
   }
 no_buffers:
   {
-    GstV4l2Object *v4l2object = get_v4l2_object (v4l2elem);
-    GST_ELEMENT_ERROR (v4l2elem, RESOURCE, READ,
-        (_("Could not get enough buffers from device '%s'."),
-            v4l2object->videodev),
-        ("we received %d from device '%s', we want at least %d",
-            breq.count, v4l2object->videodev, GST_V4L2_MIN_BUFFERS));
-    return NULL;
+    GST_ERROR_OBJECT (pool,
+        "we received %d from device '%s', we want at least %d",
+        breq.count, obj->videodev, GST_V4L2_MIN_BUFFERS);
+    return FALSE;
   }
 buffer_new_failed:
   {
-    gint errnosave = errno;
+    GST_ERROR_OBJECT (pool, "failed to create a buffer");
+    return FALSE;
+  }
+}
+
+static gboolean
+gst_v4l2_buffer_pool_stop (GstBufferPool * bpool)
+{
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+  guint n;
 
-    gst_v4l2_buffer_pool_destroy (pool);
+  GST_DEBUG_OBJECT (pool, "stopping pool");
 
-    errno = errnosave;
+  /* free the buffers: */
+  for (n = 0; n < pool->buffer_count; n++)
+    gst_v4l2_buffer_pool_free_buffer (bpool, pool->buffers[n]);
 
-    return NULL;
-  }
+  return TRUE;
 }
 
-/**
- * gst_v4l2_buffer_pool_destroy:
- * @pool: the pool
- *
- * Free all resources in the pool and the pool itself.
- */
-void
-gst_v4l2_buffer_pool_destroy (GstV4l2BufferPool * pool)
+static GstFlowReturn
+gst_v4l2_buffer_pool_acquire_buffer (GstBufferPool * bpool, GstBuffer ** buffer,
+    GstBufferPoolParams * params)
 {
-  gint n;
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+  GstBuffer *outbuf;
+  struct v4l2_buffer vbuffer;
+  GstV4l2Object *obj = pool->obj;
+
+  if (GST_BUFFER_POOL_IS_FLUSHING (bpool))
+    goto flushing;
+
+  memset (&vbuffer, 0x00, sizeof (vbuffer));
+  vbuffer.type = obj->type;
+  vbuffer.memory = V4L2_MEMORY_MMAP;
+
+  if (v4l2_ioctl (pool->video_fd, VIDIOC_DQBUF, &vbuffer) < 0)
+    goto error;
+
+  /* get our GstBuffer with that index from the pool, if the buffer was
+   * outstanding we have a serious problem.
+   */
+  outbuf = pool->buffers[vbuffer.index];
+  if (outbuf == NULL)
+    goto no_buffers;
 
-  GST_V4L2_BUFFER_POOL_LOCK (pool);
-  pool->running = FALSE;
-  GST_V4L2_BUFFER_POOL_UNLOCK (pool);
+  /* mark the buffer outstanding */
+  pool->buffers[vbuffer.index] = NULL;
 
-  GST_DEBUG_OBJECT (pool->v4l2elem, "destroy pool");
+  GST_LOG_OBJECT (pool,
+      "dequeued frame %d (ix=%d), flags %08x, pool-ct=%d, buffer=%p",
+      vbuffer.sequence, vbuffer.index, vbuffer.flags, pool->num_live_buffers,
+      outbuf);
 
-  /* after this point, no more buffers will be queued or dequeued; no buffer
-   * from pool->buffers that is NULL will be set to a buffer, and no buffer that
-   * is not NULL will be pushed out. */
+  pool->num_live_buffers++;
+  GST_DEBUG_OBJECT (pool, "num_live_buffers++: %d", pool->num_live_buffers);
 
-  /* miniobjects have no dispose, so they can't break ref-cycles, as buffers ref
-   * the pool, we need to unref the buffer to properly finalize te pool */
-  for (n = 0; n < pool->buffer_count; n++) {
-    GstBuffer *buf;
+  /* set top/bottom field first if v4l2_buffer has the information */
+  if (vbuffer.field == V4L2_FIELD_INTERLACED_TB)
+    GST_BUFFER_FLAG_SET (outbuf, GST_VIDEO_BUFFER_TFF);
+  if (vbuffer.field == V4L2_FIELD_INTERLACED_BT)
+    GST_BUFFER_FLAG_UNSET (outbuf, GST_VIDEO_BUFFER_TFF);
 
-    GST_V4L2_BUFFER_POOL_LOCK (pool);
-    buf = GST_BUFFER (pool->buffers[n]);
-    GST_V4L2_BUFFER_POOL_UNLOCK (pool);
+  /* this can change at every frame, esp. with jpeg */
+  gst_buffer_resize (outbuf, 0, vbuffer.bytesused);
 
-    if (buf)
-      /* we own the ref if the buffer is in pool->buffers; drop it. */
-      gst_buffer_unref (buf);
-  }
+  *buffer = outbuf;
+
+  return GST_FLOW_OK;
 
-  g_object_unref (pool);
+  /* ERRORS */
+flushing:
+  {
+    return GST_FLOW_WRONG_STATE;
+  }
+error:
+  {
+    GST_WARNING_OBJECT (pool,
+        "problem grabbing frame %d (ix=%d), pool-ct=%d, buf.flags=%d",
+        vbuffer.sequence, vbuffer.index,
+        GST_MINI_OBJECT_REFCOUNT (pool), vbuffer.flags);
+
+    switch (errno) {
+      case EAGAIN:
+        GST_WARNING_OBJECT (pool,
+            "Non-blocking I/O has been selected using O_NONBLOCK and"
+            " no buffer was in the outgoing queue. device %s", obj->videodev);
+        break;
+      case EINVAL:
+        GST_ERROR_OBJECT (pool,
+            "The buffer type is not supported, or the index is out of bounds, "
+            "or no buffers have been allocated yet, or the userptr "
+            "or length are invalid. device %s", obj->videodev);
+        break;
+      case ENOMEM:
+        GST_ERROR_OBJECT (pool,
+            "insufficient memory to enqueue a user pointer buffer");
+        break;
+      case EIO:
+        GST_INFO_OBJECT (pool,
+            "VIDIOC_DQBUF failed due to an internal error."
+            " Can also indicate temporary problems like signal loss."
+            " Note the driver might dequeue an (empty) buffer despite"
+            " returning an error, or even stop capturing."
+            " device %s", obj->videodev);
+        /* have we de-queued a buffer ? */
+        if (!(vbuffer.flags & (V4L2_BUF_FLAG_QUEUED | V4L2_BUF_FLAG_DONE))) {
+          GST_DEBUG_OBJECT (pool, "reenqueing buffer");
+          /* FIXME ... should we do something here? */
+        }
+        break;
+      case EINTR:
+        GST_WARNING_OBJECT (pool,
+            "could not sync on a buffer on device %s", obj->videodev);
+        break;
+      default:
+        GST_WARNING_OBJECT (pool,
+            "Grabbing frame got interrupted on %s unexpectedly. %d: %s.",
+            obj->videodev, errno, g_strerror (errno));
+        break;
+    }
+    return GST_FLOW_ERROR;
+  }
+no_buffers:
+  {
+    GST_ERROR_OBJECT (pool, "No free buffers found in the pool at index %d.",
+        vbuffer.index);
+    return GST_FLOW_ERROR;
+  }
 }
 
-/**
- * gst_v4l2_buffer_pool_get:
- * @pool:   the "this" object
- * @blocking:  should this call suspend until there is a buffer available
- *    in the buffer pool?
- *
- * Get an available buffer in the pool
- */
-GstBuffer *
-gst_v4l2_buffer_pool_get (GstV4l2BufferPool * pool, gboolean blocking)
+static void
+gst_v4l2_buffer_pool_release_buffer (GstBufferPool * bpool, GstBuffer * buffer)
 {
-  GstBuffer *buf;
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
 
-  if (blocking) {
-    buf = g_async_queue_pop (pool->avail_buffers);
-  } else {
-    buf = g_async_queue_try_pop (pool->avail_buffers);
-  }
+  GST_DEBUG_OBJECT (pool, "release");
+
+  if (pool->requeuebuf)
+    gst_v4l2_buffer_pool_qbuf (bpool, buffer);
+}
 
-  if (buf) {
-    GstMetaV4l2 *meta = GST_META_V4L2_GET (buf);
+static void
+gst_v4l2_buffer_pool_finalize (GObject * object)
+{
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (object);
 
-    GST_V4L2_BUFFER_POOL_LOCK (pool);
-    gst_buffer_resize (buf, 0, meta->vbuffer.length);
-    GST_BUFFER_FLAG_UNSET (buf, 0xffffffff);
-    GST_V4L2_BUFFER_POOL_UNLOCK (pool);
+  if (pool->video_fd >= 0)
+    v4l2_close (pool->video_fd);
+
+  if (pool->buffers) {
+    g_free (pool->buffers);
+    pool->buffers = NULL;
   }
 
-  pool->running = TRUE;
+  G_OBJECT_CLASS (parent_class)->finalize (object);
+}
 
-  return buf;
+static void
+gst_v4l2_buffer_pool_init (GstV4l2BufferPool * pool)
+{
 }
 
+static void
+gst_v4l2_buffer_pool_class_init (GstV4l2BufferPoolClass * klass)
+{
+  GObjectClass *object_class = G_OBJECT_CLASS (klass);
+  GstBufferPoolClass *bufferpool_class = GST_BUFFER_POOL_CLASS (klass);
+
+  object_class->finalize = gst_v4l2_buffer_pool_finalize;
+
+  bufferpool_class->start = gst_v4l2_buffer_pool_start;
+  bufferpool_class->stop = gst_v4l2_buffer_pool_stop;
+  bufferpool_class->set_config = gst_v4l2_buffer_pool_set_config;
+  bufferpool_class->alloc_buffer = gst_v4l2_buffer_pool_alloc_buffer;
+  bufferpool_class->acquire_buffer = gst_v4l2_buffer_pool_acquire_buffer;
+  bufferpool_class->release_buffer = gst_v4l2_buffer_pool_release_buffer;
+  bufferpool_class->free_buffer = gst_v4l2_buffer_pool_free_buffer;
+}
 
 /**
- * gst_v4l2_buffer_pool_qbuf:
- * @pool: the pool
- * @buf: the buffer to queue
+ * gst_v4l2_buffer_pool_new:
+ * @obj:  the v4l2 object owning the pool
+ * @num_buffers:  the requested number of buffers in the pool
+ * @requeuebuf: if %TRUE, and if the pool is still in the running state, a
+ *  buffer with no remaining references is immediately passed back to v4l2
+ *  (VIDIOC_QBUF), otherwise it is returned to the pool of available buffers
+ *  (which can be accessed via gst_v4l2_buffer_pool_get().
  *
- * Queue a buffer to the driver
+ * Construct a new buffer pool.
  *
- * Returns: %TRUE for success
+ * Returns: the new pool, use gst_v4l2_buffer_pool_destroy() to free resources
  */
-gboolean
-gst_v4l2_buffer_pool_qbuf (GstV4l2BufferPool * pool, GstBuffer * buf)
+GstBufferPool *
+gst_v4l2_buffer_pool_new (GstV4l2Object * obj)
 {
-  GstMetaV4l2 *meta;
+  GstV4l2BufferPool *pool;
 
-  meta = GST_META_V4L2_GET (buf);
+  pool = (GstV4l2BufferPool *) g_object_new (GST_TYPE_V4L2_BUFFER_POOL, NULL);
 
-  GST_LOG_OBJECT (pool->v4l2elem, "enqueue pool buffer %d",
-      meta->vbuffer.index);
+  pool->video_fd = v4l2_dup (obj->video_fd);
+  if (pool->video_fd < 0)
+    goto dup_failed;
 
-  if (v4l2_ioctl (pool->video_fd, VIDIOC_QBUF, &meta->vbuffer) < 0)
-    return FALSE;
+  pool->obj = obj;
 
-  pool->num_live_buffers--;
-  GST_DEBUG_OBJECT (pool->v4l2elem, "num_live_buffers--: %d",
-      pool->num_live_buffers);
+  return GST_BUFFER_POOL_CAST (pool);
 
-  return TRUE;
+  /* ERRORS */
+dup_failed:
+  {
+    gint errnosave = errno;
+    gst_object_unref (pool);
+    errno = errnosave;
+    return NULL;
+  }
 }
 
 /**
- * gst_v4l2_buffer_pool_dqbuf:
+ * gst_v4l2_buffer_pool_qbuf:
  * @pool: the pool
+ * @buf: the buffer to queue
  *
- * Dequeue a buffer from the driver.  Some generic error handling is done in
- * this function, but any error handling specific to v4l2src (capture) or
- * v4l2sink (output) can be done outside this function by checking 'errno'
+ * Queue a buffer to the driver
  *
- * Returns: a buffer
+ * Returns: %TRUE for success
  */
-GstBuffer *
-gst_v4l2_buffer_pool_dqbuf (GstV4l2BufferPool * pool)
+gboolean
+gst_v4l2_buffer_pool_qbuf (GstBufferPool * bpool, GstBuffer * buf)
 {
-  GstV4l2Object *v4l2object = get_v4l2_object (pool->v4l2elem);
-  GstBuffer *pool_buffer;
-  struct v4l2_buffer buffer;
-
-  memset (&buffer, 0x00, sizeof (buffer));
-  buffer.type = pool->type;
-  buffer.memory = V4L2_MEMORY_MMAP;
-
-  if (v4l2_ioctl (pool->video_fd, VIDIOC_DQBUF, &buffer) >= 0) {
-
-    GST_V4L2_BUFFER_POOL_LOCK (pool);
-
-    /* get our GstBuffer with that index from the pool, if the buffer was
-     * outstanding we have a serious problem.
-     */
-    pool_buffer = pool->buffers[buffer.index];
-
-    if (pool_buffer == NULL) {
-      GST_ELEMENT_ERROR (pool->v4l2elem, RESOURCE, FAILED,
-          (_("Failed trying to get video frames from device '%s'."),
-              v4l2object->videodev),
-          (_("No free buffers found in the pool at index %d."), buffer.index));
-      GST_V4L2_BUFFER_POOL_UNLOCK (pool);
-      return NULL;
-    }
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+  GstMetaV4l2 *meta;
+  gint index;
 
-    GST_LOG_OBJECT (pool->v4l2elem,
-        "grabbed frame %d (ix=%d), flags %08x, pool-ct=%d, buffer=%p",
-        buffer.sequence, buffer.index, buffer.flags, pool->num_live_buffers,
-        pool_buffer);
+  meta = GST_META_V4L2_GET (buf);
+  g_assert (meta != NULL);
 
-    pool->num_live_buffers++;
-    GST_DEBUG_OBJECT (pool->v4l2elem, "num_live_buffers++: %d",
-        pool->num_live_buffers);
+  index = meta->vbuffer.index;
 
-    /* set top/bottom field first if v4l2_buffer has the information */
-    if (buffer.field == V4L2_FIELD_INTERLACED_TB)
-      GST_BUFFER_FLAG_SET (pool_buffer, GST_VIDEO_BUFFER_TFF);
-    if (buffer.field == V4L2_FIELD_INTERLACED_BT)
-      GST_BUFFER_FLAG_UNSET (pool_buffer, GST_VIDEO_BUFFER_TFF);
+  GST_LOG_OBJECT (pool, "enqueue pool buffer %d", index);
 
-    /* this can change at every frame, esp. with jpeg */
-    gst_buffer_resize (pool_buffer, 0, buffer.bytesused);
+  if (pool->buffers[index] != NULL)
+    goto already_queued;
 
-    GST_V4L2_BUFFER_POOL_UNLOCK (pool);
+  if (v4l2_ioctl (pool->video_fd, VIDIOC_QBUF, &meta->vbuffer) < 0)
+    goto queue_failed;
 
-    return pool_buffer;
-  }
+  pool->buffers[index] = buf;
 
+  pool->num_live_buffers--;
+  GST_DEBUG_OBJECT (pool, "num_live_buffers--: %d", pool->num_live_buffers);
 
-  GST_WARNING_OBJECT (pool->v4l2elem,
-      "problem grabbing frame %d (ix=%d), pool-ct=%d, buf.flags=%d",
-      buffer.sequence, buffer.index,
-      GST_MINI_OBJECT_REFCOUNT (pool), buffer.flags);
-
-  switch (errno) {
-    case EAGAIN:
-      GST_WARNING_OBJECT (pool->v4l2elem,
-          "Non-blocking I/O has been selected using O_NONBLOCK and"
-          " no buffer was in the outgoing queue. device %s",
-          v4l2object->videodev);
-      break;
-    case EINVAL:
-      GST_ELEMENT_ERROR (pool->v4l2elem, RESOURCE, FAILED,
-          (_("Failed trying to get video frames from device '%s'."),
-              v4l2object->videodev),
-          (_("The buffer type is not supported, or the index is out of bounds,"
-                  " or no buffers have been allocated yet, or the userptr"
-                  " or length are invalid. device %s"), v4l2object->videodev));
-      break;
-    case ENOMEM:
-      GST_ELEMENT_ERROR (pool->v4l2elem, RESOURCE, FAILED,
-          (_("Failed trying to get video frames from device '%s'. Not enough memory."), v4l2object->videodev), (_("insufficient memory to enqueue a user pointer buffer. device %s."), v4l2object->videodev));
-      break;
-    case EIO:
-      GST_INFO_OBJECT (pool->v4l2elem,
-          "VIDIOC_DQBUF failed due to an internal error."
-          " Can also indicate temporary problems like signal loss."
-          " Note the driver might dequeue an (empty) buffer despite"
-          " returning an error, or even stop capturing."
-          " device %s", v4l2object->videodev);
-      /* have we de-queued a buffer ? */
-      if (!(buffer.flags & (V4L2_BUF_FLAG_QUEUED | V4L2_BUF_FLAG_DONE))) {
-        GST_DEBUG_OBJECT (pool->v4l2elem, "reenqueing buffer");
-        /* FIXME ... should we do something here? */
-      }
-      break;
-    case EINTR:
-      GST_WARNING_OBJECT (pool->v4l2elem,
-          "could not sync on a buffer on device %s", v4l2object->videodev);
-      break;
-    default:
-      GST_WARNING_OBJECT (pool->v4l2elem,
-          "Grabbing frame got interrupted on %s unexpectedly. %d: %s.",
-          v4l2object->videodev, errno, g_strerror (errno));
-      break;
-  }
+  return TRUE;
 
-  return NULL;
+  /* ERRORS */
+already_queued:
+  {
+    GST_WARNING_OBJECT (pool, "the buffer was already queued");
+    return FALSE;
+  }
+queue_failed:
+  {
+    GST_WARNING_OBJECT (pool, "could not queue a buffer");
+    return FALSE;
+  }
 }
 
 /**
@@ -626,7 +566,9 @@ gst_v4l2_buffer_pool_dqbuf (GstV4l2BufferPool * pool)
  * Returns: the number of buffers available.
  */
 gint
-gst_v4l2_buffer_pool_available_buffers (GstV4l2BufferPool * pool)
+gst_v4l2_buffer_pool_available_buffers (GstBufferPool * bpool)
 {
+  GstV4l2BufferPool *pool = GST_V4L2_BUFFER_POOL (bpool);
+
   return pool->buffer_count - pool->num_live_buffers;
 }