Merge branch '0.10'
[platform/upstream/gst-plugins-good.git] / sys / v4l2 / gstv4l2src.c
1 /* GStreamer
2  *
3  * Copyright (C) 2001-2002 Ronald Bultje <rbultje@ronald.bitfreak.net>
4  *               2006 Edgard Lima <edgard.lima@indt.org.br>
5  *
6  * gstv4l2src.c: Video4Linux2 source element
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Library General Public
10  * License as published by the Free Software Foundation; either
11  * version 2 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Library General Public License for more details.
17  *
18  * You should have received a copy of the GNU Library General Public
19  * License along with this library; if not, write to the
20  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21  * Boston, MA 02111-1307, USA.
22  */
23
24 /**
25  * SECTION:element-v4l2src
26  *
27  * v4l2src can be used to capture video from v4l2 devices, like webcams and tv
28  * cards.
29  *
30  * <refsect2>
31  * <title>Example launch lines</title>
32  * |[
33  * gst-launch v4l2src ! xvimagesink
34  * ]| This pipeline shows the video captured from /dev/video0 tv card and for
35  * webcams.
36  * |[
37  * gst-launch v4l2src ! jpegdec ! xvimagesink
38  * ]| This pipeline shows the video captured from a webcam that delivers jpeg
39  * images.
40  * </refsect2>
41  */
42
43 #ifdef HAVE_CONFIG_H
44 #include <config.h>
45 #endif
46
47 #undef HAVE_XVIDEO
48
49 #include <string.h>
50 #include <sys/time.h>
51 #include <unistd.h>
52
53 #include "gst/video/gstvideometa.h"
54 #include "gst/video/gstvideopool.h"
55
56 #include "gstv4l2src.h"
57
58 #include "gstv4l2colorbalance.h"
59 #include "gstv4l2tuner.h"
60 #ifdef HAVE_XVIDEO
61 #include "gstv4l2xoverlay.h"
62 #endif
63 #include "gstv4l2vidorient.h"
64
65 #include "gst/gst-i18n-plugin.h"
66
67 GST_DEBUG_CATEGORY (v4l2src_debug);
68 #define GST_CAT_DEFAULT v4l2src_debug
69
70 #define PROP_DEF_ALWAYS_COPY        TRUE
71 #define PROP_DEF_DECIMATE           1
72
73 #define DEFAULT_PROP_DEVICE   "/dev/video0"
74
75 enum
76 {
77   PROP_0,
78   V4L2_STD_OBJECT_PROPS,
79   PROP_ALWAYS_COPY,
80   PROP_DECIMATE
81 };
82
83 GST_IMPLEMENT_V4L2_COLOR_BALANCE_METHODS (GstV4l2Src, gst_v4l2src);
84 GST_IMPLEMENT_V4L2_TUNER_METHODS (GstV4l2Src, gst_v4l2src);
85 #ifdef HAVE_XVIDEO
86 GST_IMPLEMENT_V4L2_XOVERLAY_METHODS (GstV4l2Src, gst_v4l2src);
87 #endif
88 GST_IMPLEMENT_V4L2_VIDORIENT_METHODS (GstV4l2Src, gst_v4l2src);
89
90 static void gst_v4l2src_uri_handler_init (gpointer g_iface,
91     gpointer iface_data);
92
93 #define gst_v4l2src_parent_class parent_class
94 G_DEFINE_TYPE_WITH_CODE (GstV4l2Src, gst_v4l2src, GST_TYPE_PUSH_SRC,
95     G_IMPLEMENT_INTERFACE (GST_TYPE_URI_HANDLER, gst_v4l2src_uri_handler_init);
96     G_IMPLEMENT_INTERFACE (GST_TYPE_TUNER, gst_v4l2src_tuner_interface_init);
97 #ifdef HAVE_XVIDEO
98     /* FIXME: does GstXOverlay for v4l2src make sense in a GStreamer context? */
99     G_IMPLEMENT_INTERFACE (GST_TYPE_X_OVERLAY,
100         gst_v4l2src_xoverlay_interface_init);
101 #endif
102     G_IMPLEMENT_INTERFACE (GST_TYPE_COLOR_BALANCE,
103         gst_v4l2src_color_balance_interface_init);
104     G_IMPLEMENT_INTERFACE (GST_TYPE_VIDEO_ORIENTATION,
105         gst_v4l2src_video_orientation_interface_init));
106
107 static void gst_v4l2src_dispose (GObject * object);
108 static void gst_v4l2src_finalize (GstV4l2Src * v4l2src);
109
110 /* element methods */
111 static GstStateChangeReturn gst_v4l2src_change_state (GstElement * element,
112     GstStateChange transition);
113
114 /* basesrc methods */
115 static gboolean gst_v4l2src_start (GstBaseSrc * src);
116 static gboolean gst_v4l2src_unlock (GstBaseSrc * src);
117 static gboolean gst_v4l2src_unlock_stop (GstBaseSrc * src);
118 static gboolean gst_v4l2src_stop (GstBaseSrc * src);
119 static gboolean gst_v4l2src_set_caps (GstBaseSrc * src, GstCaps * caps);
120 static GstCaps *gst_v4l2src_get_caps (GstBaseSrc * src, GstCaps * filter);
121 static gboolean gst_v4l2src_query (GstBaseSrc * bsrc, GstQuery * query);
122 static gboolean gst_v4l2src_decide_allocation (GstBaseSrc * src,
123     GstQuery * query);
124 static GstFlowReturn gst_v4l2src_fill (GstPushSrc * src, GstBuffer * out);
125 static GstCaps *gst_v4l2src_fixate (GstBaseSrc * basesrc, GstCaps * caps);
126 static gboolean gst_v4l2src_negotiate (GstBaseSrc * basesrc);
127
128 static void gst_v4l2src_set_property (GObject * object, guint prop_id,
129     const GValue * value, GParamSpec * pspec);
130 static void gst_v4l2src_get_property (GObject * object, guint prop_id,
131     GValue * value, GParamSpec * pspec);
132
133 static void
134 gst_v4l2src_class_init (GstV4l2SrcClass * klass)
135 {
136   GObjectClass *gobject_class;
137   GstElementClass *element_class;
138   GstBaseSrcClass *basesrc_class;
139   GstPushSrcClass *pushsrc_class;
140
141   gobject_class = G_OBJECT_CLASS (klass);
142   element_class = GST_ELEMENT_CLASS (klass);
143   basesrc_class = GST_BASE_SRC_CLASS (klass);
144   pushsrc_class = GST_PUSH_SRC_CLASS (klass);
145
146   gobject_class->dispose = gst_v4l2src_dispose;
147   gobject_class->finalize = (GObjectFinalizeFunc) gst_v4l2src_finalize;
148   gobject_class->set_property = gst_v4l2src_set_property;
149   gobject_class->get_property = gst_v4l2src_get_property;
150
151   element_class->change_state = gst_v4l2src_change_state;
152
153   gst_v4l2_object_install_properties_helper (gobject_class,
154       DEFAULT_PROP_DEVICE);
155   g_object_class_install_property (gobject_class, PROP_ALWAYS_COPY,
156       g_param_spec_boolean ("always-copy", "Always Copy",
157           "If the buffer will or not be used directly from mmap",
158           PROP_DEF_ALWAYS_COPY, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
159   /**
160    * GstV4l2Src:decimate
161    *
162    * Only use every nth frame
163    *
164    * Since: 0.10.26
165    */
166   g_object_class_install_property (gobject_class, PROP_DECIMATE,
167       g_param_spec_int ("decimate", "Decimate",
168           "Only use every nth frame", 1, G_MAXINT,
169           PROP_DEF_DECIMATE, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
170
171   gst_element_class_set_details_simple (element_class,
172       "Video (video4linux2) Source", "Source/Video",
173       "Reads frames from a Video4Linux2 device",
174       "Edgard Lima <edgard.lima@indt.org.br>, "
175       "Stefan Kost <ensonic@users.sf.net>");
176
177   gst_element_class_add_pad_template
178       (element_class,
179       gst_pad_template_new ("src", GST_PAD_SRC, GST_PAD_ALWAYS,
180           gst_v4l2_object_get_all_caps ()));
181
182   basesrc_class->get_caps = GST_DEBUG_FUNCPTR (gst_v4l2src_get_caps);
183   basesrc_class->set_caps = GST_DEBUG_FUNCPTR (gst_v4l2src_set_caps);
184   basesrc_class->start = GST_DEBUG_FUNCPTR (gst_v4l2src_start);
185   basesrc_class->unlock = GST_DEBUG_FUNCPTR (gst_v4l2src_unlock);
186   basesrc_class->unlock_stop = GST_DEBUG_FUNCPTR (gst_v4l2src_unlock_stop);
187   basesrc_class->stop = GST_DEBUG_FUNCPTR (gst_v4l2src_stop);
188   basesrc_class->query = GST_DEBUG_FUNCPTR (gst_v4l2src_query);
189   basesrc_class->fixate = GST_DEBUG_FUNCPTR (gst_v4l2src_fixate);
190   basesrc_class->negotiate = GST_DEBUG_FUNCPTR (gst_v4l2src_negotiate);
191   basesrc_class->decide_allocation =
192       GST_DEBUG_FUNCPTR (gst_v4l2src_decide_allocation);
193
194   pushsrc_class->fill = GST_DEBUG_FUNCPTR (gst_v4l2src_fill);
195
196   klass->v4l2_class_devices = NULL;
197
198   GST_DEBUG_CATEGORY_INIT (v4l2src_debug, "v4l2src", 0, "V4L2 source element");
199 }
200
201 static void
202 gst_v4l2src_init (GstV4l2Src * v4l2src)
203 {
204   /* fixme: give an update_fps_function */
205   v4l2src->v4l2object = gst_v4l2_object_new (GST_ELEMENT (v4l2src),
206       V4L2_BUF_TYPE_VIDEO_CAPTURE, DEFAULT_PROP_DEVICE,
207       gst_v4l2_get_input, gst_v4l2_set_input, NULL);
208
209   v4l2src->v4l2object->always_copy = PROP_DEF_ALWAYS_COPY;
210   v4l2src->decimate = PROP_DEF_DECIMATE;
211
212   gst_base_src_set_format (GST_BASE_SRC (v4l2src), GST_FORMAT_TIME);
213   gst_base_src_set_live (GST_BASE_SRC (v4l2src), TRUE);
214 }
215
216 static void
217 gst_v4l2src_dispose (GObject * object)
218 {
219   GstV4l2Src *v4l2src = GST_V4L2SRC (object);
220
221   if (v4l2src->probed_caps) {
222     gst_caps_unref (v4l2src->probed_caps);
223   }
224
225   G_OBJECT_CLASS (parent_class)->dispose (object);
226 }
227
228
229 static void
230 gst_v4l2src_finalize (GstV4l2Src * v4l2src)
231 {
232   gst_v4l2_object_destroy (v4l2src->v4l2object);
233
234   G_OBJECT_CLASS (parent_class)->finalize ((GObject *) (v4l2src));
235 }
236
237
238 static void
239 gst_v4l2src_set_property (GObject * object,
240     guint prop_id, const GValue * value, GParamSpec * pspec)
241 {
242   GstV4l2Src *v4l2src = GST_V4L2SRC (object);
243
244   if (!gst_v4l2_object_set_property_helper (v4l2src->v4l2object,
245           prop_id, value, pspec)) {
246     switch (prop_id) {
247       case PROP_ALWAYS_COPY:
248         v4l2src->v4l2object->always_copy = g_value_get_boolean (value);
249         break;
250       case PROP_DECIMATE:
251         v4l2src->decimate = g_value_get_int (value);
252         break;
253       default:
254         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
255         break;
256     }
257   }
258 }
259
260 static void
261 gst_v4l2src_get_property (GObject * object,
262     guint prop_id, GValue * value, GParamSpec * pspec)
263 {
264   GstV4l2Src *v4l2src = GST_V4L2SRC (object);
265
266   if (!gst_v4l2_object_get_property_helper (v4l2src->v4l2object,
267           prop_id, value, pspec)) {
268     switch (prop_id) {
269       case PROP_ALWAYS_COPY:
270         g_value_set_boolean (value, v4l2src->v4l2object->always_copy);
271         break;
272       case PROP_DECIMATE:
273         g_value_set_int (value, v4l2src->decimate);
274         break;
275       default:
276         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
277         break;
278     }
279   }
280 }
281
282 /* this function is a bit of a last resort */
283 static GstCaps *
284 gst_v4l2src_fixate (GstBaseSrc * basesrc, GstCaps * caps)
285 {
286   GstStructure *structure;
287   gint i;
288
289   GST_DEBUG_OBJECT (basesrc, "fixating caps %" GST_PTR_FORMAT, caps);
290
291   caps = gst_caps_make_writable (caps);
292
293   for (i = 0; i < gst_caps_get_size (caps); ++i) {
294     structure = gst_caps_get_structure (caps, i);
295
296     /* We are fixating to a resonable 320x200 resolution
297        and the maximum framerate resolution for that size */
298     gst_structure_fixate_field_nearest_int (structure, "width", 320);
299     gst_structure_fixate_field_nearest_int (structure, "height", 200);
300     gst_structure_fixate_field_nearest_fraction (structure, "framerate",
301         G_MAXINT, 1);
302     gst_structure_fixate_field (structure, "format");
303   }
304
305   GST_DEBUG_OBJECT (basesrc, "fixated caps %" GST_PTR_FORMAT, caps);
306
307   caps = GST_BASE_SRC_CLASS (parent_class)->fixate (basesrc, caps);
308
309   return caps;
310 }
311
312
313 static gboolean
314 gst_v4l2src_negotiate (GstBaseSrc * basesrc)
315 {
316   GstCaps *thiscaps;
317   GstCaps *caps = NULL;
318   GstCaps *peercaps = NULL;
319   gboolean result = FALSE;
320
321   /* first see what is possible on our source pad */
322   thiscaps = gst_pad_query_caps (GST_BASE_SRC_PAD (basesrc), NULL);
323   GST_DEBUG_OBJECT (basesrc, "caps of src: %" GST_PTR_FORMAT, thiscaps);
324   LOG_CAPS (basesrc, thiscaps);
325
326   /* nothing or anything is allowed, we're done */
327   if (thiscaps == NULL || gst_caps_is_any (thiscaps))
328     goto no_nego_needed;
329
330   /* get the peer caps */
331   peercaps = gst_pad_peer_query_caps (GST_BASE_SRC_PAD (basesrc), thiscaps);
332   GST_DEBUG_OBJECT (basesrc, "caps of peer: %" GST_PTR_FORMAT, peercaps);
333   LOG_CAPS (basesrc, peercaps);
334   if (peercaps && !gst_caps_is_any (peercaps)) {
335     GstCaps *icaps = NULL;
336     int i;
337
338     /* Prefer the first caps we are compatible with that the peer proposed */
339     for (i = 0; i < gst_caps_get_size (peercaps); i++) {
340       /* get intersection */
341       GstCaps *ipcaps = gst_caps_copy_nth (peercaps, i);
342
343       GST_DEBUG_OBJECT (basesrc, "peer: %" GST_PTR_FORMAT, ipcaps);
344       LOG_CAPS (basesrc, ipcaps);
345
346       icaps = gst_caps_intersect (thiscaps, ipcaps);
347       gst_caps_unref (ipcaps);
348
349       if (!gst_caps_is_empty (icaps))
350         break;
351
352       gst_caps_unref (icaps);
353       icaps = NULL;
354     }
355
356     GST_DEBUG_OBJECT (basesrc, "intersect: %" GST_PTR_FORMAT, icaps);
357     LOG_CAPS (basesrc, icaps);
358     if (icaps) {
359       /* If there are multiple intersections pick the one with the smallest
360        * resolution strictly bigger then the first peer caps */
361       if (gst_caps_get_size (icaps) > 1) {
362         GstStructure *s = gst_caps_get_structure (peercaps, 0);
363         int best = 0;
364         int twidth, theight;
365         int width = G_MAXINT, height = G_MAXINT;
366
367         if (gst_structure_get_int (s, "width", &twidth)
368             && gst_structure_get_int (s, "height", &theight)) {
369
370           /* Walk the structure backwards to get the first entry of the
371            * smallest resolution bigger (or equal to) the preferred resolution)
372            */
373           for (i = gst_caps_get_size (icaps) - 1; i >= 0; i--) {
374             GstStructure *is = gst_caps_get_structure (icaps, i);
375             int w, h;
376
377             if (gst_structure_get_int (is, "width", &w)
378                 && gst_structure_get_int (is, "height", &h)) {
379               if (w >= twidth && w <= width && h >= theight && h <= height) {
380                 width = w;
381                 height = h;
382                 best = i;
383               }
384             }
385           }
386         }
387
388         caps = gst_caps_copy_nth (icaps, best);
389         gst_caps_unref (icaps);
390       } else {
391         caps = icaps;
392       }
393     }
394     gst_caps_unref (thiscaps);
395   } else {
396     /* no peer or peer have ANY caps, work with our own caps then */
397     caps = thiscaps;
398   }
399   if (peercaps)
400     gst_caps_unref (peercaps);
401   if (caps) {
402     caps = gst_caps_truncate (caps);
403
404     /* now fixate */
405     if (!gst_caps_is_empty (caps)) {
406       caps = gst_v4l2src_fixate (basesrc, caps);
407       GST_DEBUG_OBJECT (basesrc, "fixated to: %" GST_PTR_FORMAT, caps);
408       LOG_CAPS (basesrc, caps);
409
410       if (gst_caps_is_any (caps)) {
411         /* hmm, still anything, so element can do anything and
412          * nego is not needed */
413         result = TRUE;
414       } else if (gst_caps_is_fixed (caps)) {
415         /* yay, fixed caps, use those then */
416         result = gst_base_src_set_caps (basesrc, caps);
417       }
418     }
419     gst_caps_unref (caps);
420   }
421   return result;
422
423 no_nego_needed:
424   {
425     GST_DEBUG_OBJECT (basesrc, "no negotiation needed");
426     if (thiscaps)
427       gst_caps_unref (thiscaps);
428     return TRUE;
429   }
430 }
431
432 static GstCaps *
433 gst_v4l2src_get_caps (GstBaseSrc * src, GstCaps * filter)
434 {
435   GstV4l2Src *v4l2src;
436   GstV4l2Object *obj;
437   GstCaps *ret;
438   GSList *walk;
439   GSList *formats;
440
441   v4l2src = GST_V4L2SRC (src);
442   obj = v4l2src->v4l2object;
443
444   if (!GST_V4L2_IS_OPEN (obj)) {
445     return gst_pad_get_pad_template_caps (GST_BASE_SRC_PAD (v4l2src));
446   }
447
448   if (v4l2src->probed_caps)
449     return gst_caps_ref (v4l2src->probed_caps);
450
451   formats = gst_v4l2_object_get_format_list (obj);
452
453   ret = gst_caps_new_empty ();
454
455   for (walk = formats; walk; walk = walk->next) {
456     struct v4l2_fmtdesc *format;
457     GstStructure *template;
458
459     format = (struct v4l2_fmtdesc *) walk->data;
460
461     template = gst_v4l2_object_v4l2fourcc_to_structure (format->pixelformat);
462
463     if (template) {
464       GstCaps *tmp;
465
466       tmp =
467           gst_v4l2_object_probe_caps_for_format (obj,
468           format->pixelformat, template);
469       if (tmp)
470         gst_caps_append (ret, tmp);
471
472       gst_structure_free (template);
473     } else {
474       GST_DEBUG_OBJECT (v4l2src, "unknown format %u", format->pixelformat);
475     }
476   }
477
478   v4l2src->probed_caps = gst_caps_ref (ret);
479
480   GST_INFO_OBJECT (v4l2src, "probed caps: %" GST_PTR_FORMAT, ret);
481
482   return ret;
483 }
484
485 static gboolean
486 gst_v4l2src_set_caps (GstBaseSrc * src, GstCaps * caps)
487 {
488   GstV4l2Src *v4l2src;
489   GstV4l2Object *obj;
490
491   v4l2src = GST_V4L2SRC (src);
492   obj = v4l2src->v4l2object;
493
494   /* make sure we stop capturing and dealloc buffers */
495   if (!gst_v4l2_object_stop (obj))
496     return FALSE;
497
498   if (!gst_v4l2_object_set_format (obj, caps))
499     /* error already posted */
500     return FALSE;
501
502   return TRUE;
503 }
504
505 static gboolean
506 gst_v4l2src_decide_allocation (GstBaseSrc * bsrc, GstQuery * query)
507 {
508   GstV4l2Src *src;
509   GstV4l2Object *obj;
510   GstBufferPool *pool;
511   guint size, min, max;
512   gboolean update;
513
514   src = GST_V4L2SRC (bsrc);
515   obj = src->v4l2object;
516
517   if (gst_query_get_n_allocation_pools (query) > 0) {
518     gst_query_parse_nth_allocation_pool (query, 0, &pool, &size, &min, &max);
519     update = TRUE;
520   } else {
521     pool = NULL;
522     min = max = 0;
523     size = 0;
524     update = FALSE;
525   }
526
527   GST_DEBUG_OBJECT (src, "allocation: size:%u min:%u max:%u pool:%"
528       GST_PTR_FORMAT, size, min, max, pool);
529
530   if (min != 0) {
531     /* if there is a min-buffers suggestion, use it. We add 1 because we need 1
532      * buffer extra to capture while the other two buffers are downstream */
533     min += 1;
534   } else {
535     min = 2;
536   }
537
538   /* select a pool */
539   switch (obj->mode) {
540     case GST_V4L2_IO_RW:
541       if (pool == NULL) {
542         /* no downstream pool, use our own then */
543         GST_DEBUG_OBJECT (src,
544             "read/write mode: no downstream pool, using our own");
545         pool = GST_BUFFER_POOL_CAST (obj->pool);
546         size = obj->sizeimage;
547       } else {
548         /* in READ/WRITE mode, prefer a downstream pool because our own pool
549          * doesn't help much, we have to write to it as well */
550         GST_DEBUG_OBJECT (src, "read/write mode: using downstream pool");
551         /* use the bigest size, when we use our own pool we can't really do any
552          * other size than what the hardware gives us but for downstream pools
553          * we can try */
554         size = MAX (size, obj->sizeimage);
555       }
556       break;
557     case GST_V4L2_IO_MMAP:
558     case GST_V4L2_IO_USERPTR:
559       /* in streaming mode, prefer our own pool */
560       pool = GST_BUFFER_POOL_CAST (obj->pool);
561       size = obj->sizeimage;
562       GST_DEBUG_OBJECT (src,
563           "streaming mode: using our own pool %" GST_PTR_FORMAT, pool);
564       break;
565     case GST_V4L2_IO_AUTO:
566     default:
567       GST_WARNING_OBJECT (src, "unhandled mode");
568       break;
569   }
570
571   if (pool) {
572     GstStructure *config;
573     GstCaps *caps;
574
575     config = gst_buffer_pool_get_config (pool);
576     gst_buffer_pool_config_get_params (config, &caps, NULL, NULL, NULL);
577     gst_buffer_pool_config_set_params (config, caps, size, min, max);
578
579     /* if downstream supports video metadata, add this to the pool config */
580     if (gst_query_has_allocation_meta (query, GST_VIDEO_META_API_TYPE))
581       gst_buffer_pool_config_add_option (config,
582           GST_BUFFER_POOL_OPTION_VIDEO_META);
583
584     gst_buffer_pool_set_config (pool, config);
585   }
586
587   if (update)
588     gst_query_set_nth_allocation_pool (query, 0, pool, size, min, max);
589   else
590     gst_query_add_allocation_pool (query, pool, size, min, max);
591
592   return TRUE;
593 }
594
595 static gboolean
596 gst_v4l2src_query (GstBaseSrc * bsrc, GstQuery * query)
597 {
598   GstV4l2Src *src;
599   GstV4l2Object *obj;
600   gboolean res = FALSE;
601
602   src = GST_V4L2SRC (bsrc);
603   obj = src->v4l2object;
604
605   switch (GST_QUERY_TYPE (query)) {
606     case GST_QUERY_LATENCY:{
607       GstClockTime min_latency, max_latency;
608       guint32 fps_n, fps_d;
609       guint max_buffers;
610
611       /* device must be open */
612       if (!GST_V4L2_IS_OPEN (obj)) {
613         GST_WARNING_OBJECT (src,
614             "Can't give latency since device isn't open !");
615         goto done;
616       }
617
618       fps_n = GST_V4L2_FPS_N (obj);
619       fps_d = GST_V4L2_FPS_D (obj);
620
621       /* we must have a framerate */
622       if (fps_n <= 0 || fps_d <= 0) {
623         GST_WARNING_OBJECT (src,
624             "Can't give latency since framerate isn't fixated !");
625         goto done;
626       }
627
628       /* min latency is the time to capture one frame */
629       min_latency = gst_util_uint64_scale_int (GST_SECOND, fps_d, fps_n);
630
631       /* max latency is total duration of the frame buffer */
632       max_buffers = GST_V4L2_BUFFER_POOL_CAST (obj->pool)->max_buffers;
633
634       if (max_buffers == 0)
635         max_latency = -1;
636       else
637         max_latency = max_buffers * min_latency;
638
639       GST_DEBUG_OBJECT (bsrc,
640           "report latency min %" GST_TIME_FORMAT " max %" GST_TIME_FORMAT,
641           GST_TIME_ARGS (min_latency), GST_TIME_ARGS (max_latency));
642
643       /* we are always live, the min latency is 1 frame and the max latency is
644        * the complete buffer of frames. */
645       gst_query_set_latency (query, TRUE, min_latency, max_latency);
646
647       res = TRUE;
648       break;
649     }
650     default:
651       res = GST_BASE_SRC_CLASS (parent_class)->query (bsrc, query);
652       break;
653   }
654
655 done:
656
657   return res;
658 }
659
660 /* start and stop are not symmetric -- start will open the device, but not start
661  * capture. it's setcaps that will start capture, which is called via basesrc's
662  * negotiate method. stop will both stop capture and close the device.
663  */
664 static gboolean
665 gst_v4l2src_start (GstBaseSrc * src)
666 {
667   GstV4l2Src *v4l2src = GST_V4L2SRC (src);
668
669   v4l2src->offset = 0;
670
671   /* activate settings for first frame */
672   v4l2src->ctrl_time = 0;
673   gst_object_sync_values (GST_OBJECT (src), v4l2src->ctrl_time);
674
675   return TRUE;
676 }
677
678 static gboolean
679 gst_v4l2src_unlock (GstBaseSrc * src)
680 {
681   GstV4l2Src *v4l2src = GST_V4L2SRC (src);
682   return gst_v4l2_object_unlock (v4l2src->v4l2object);
683 }
684
685 static gboolean
686 gst_v4l2src_unlock_stop (GstBaseSrc * src)
687 {
688   GstV4l2Src *v4l2src = GST_V4L2SRC (src);
689   return gst_v4l2_object_unlock_stop (v4l2src->v4l2object);
690 }
691
692 static gboolean
693 gst_v4l2src_stop (GstBaseSrc * src)
694 {
695   GstV4l2Src *v4l2src = GST_V4L2SRC (src);
696   GstV4l2Object *obj = v4l2src->v4l2object;
697
698   if (GST_V4L2_IS_ACTIVE (obj)) {
699     if (!gst_v4l2_object_stop (obj))
700       return FALSE;
701   }
702   return TRUE;
703 }
704
705 static GstStateChangeReturn
706 gst_v4l2src_change_state (GstElement * element, GstStateChange transition)
707 {
708   GstStateChangeReturn ret = GST_STATE_CHANGE_SUCCESS;
709   GstV4l2Src *v4l2src = GST_V4L2SRC (element);
710   GstV4l2Object *obj = v4l2src->v4l2object;
711
712   switch (transition) {
713     case GST_STATE_CHANGE_NULL_TO_READY:
714       /* open the device */
715       if (!gst_v4l2_object_open (obj))
716         return GST_STATE_CHANGE_FAILURE;
717       break;
718     default:
719       break;
720   }
721
722   ret = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
723
724   switch (transition) {
725     case GST_STATE_CHANGE_READY_TO_NULL:
726       /* close the device */
727       if (!gst_v4l2_object_close (obj))
728         return GST_STATE_CHANGE_FAILURE;
729
730       if (v4l2src->probed_caps) {
731         gst_caps_unref (v4l2src->probed_caps);
732         v4l2src->probed_caps = NULL;
733       }
734       break;
735     default:
736       break;
737   }
738
739   return ret;
740 }
741
742 static GstFlowReturn
743 gst_v4l2src_fill (GstPushSrc * src, GstBuffer * buf)
744 {
745   GstV4l2Src *v4l2src = GST_V4L2SRC (src);
746   GstV4l2Object *obj = v4l2src->v4l2object;
747   GstFlowReturn ret;
748   GstClock *clock;
749   GstClockTime timestamp, duration;
750
751 #if 0
752   int i;
753   /* decimate, just capture and throw away frames */
754   for (i = 0; i < v4l2src->decimate - 1; i++) {
755     ret = gst_v4l2_buffer_pool_process (obj, buf);
756     if (ret != GST_FLOW_OK) {
757       return ret;
758     }
759     gst_buffer_unref (*buf);
760   }
761 #endif
762
763   ret =
764       gst_v4l2_buffer_pool_process (GST_V4L2_BUFFER_POOL_CAST (obj->pool), buf);
765
766   if (G_UNLIKELY (ret != GST_FLOW_OK))
767     goto error;
768
769   /* set buffer metadata */
770   GST_BUFFER_OFFSET (buf) = v4l2src->offset++;
771   GST_BUFFER_OFFSET_END (buf) = v4l2src->offset;
772
773   /* timestamps, LOCK to get clock and base time. */
774   /* FIXME: element clock and base_time is rarely changing */
775   GST_OBJECT_LOCK (v4l2src);
776   if ((clock = GST_ELEMENT_CLOCK (v4l2src))) {
777     /* we have a clock, get base time and ref clock */
778     timestamp = GST_ELEMENT (v4l2src)->base_time;
779     gst_object_ref (clock);
780   } else {
781     /* no clock, can't set timestamps */
782     timestamp = GST_CLOCK_TIME_NONE;
783   }
784   GST_OBJECT_UNLOCK (v4l2src);
785
786   duration = obj->duration;
787
788   if (G_LIKELY (clock)) {
789     /* the time now is the time of the clock minus the base time */
790     timestamp = gst_clock_get_time (clock) - timestamp;
791     gst_object_unref (clock);
792
793     /* if we have a framerate adjust timestamp for frame latency */
794     if (GST_CLOCK_TIME_IS_VALID (duration)) {
795       if (timestamp > duration)
796         timestamp -= duration;
797       else
798         timestamp = 0;
799     }
800   }
801
802   /* activate settings for next frame */
803   if (GST_CLOCK_TIME_IS_VALID (duration)) {
804     v4l2src->ctrl_time += duration;
805   } else {
806     /* this is not very good (as it should be the next timestamp),
807      * still good enough for linear fades (as long as it is not -1)
808      */
809     v4l2src->ctrl_time = timestamp;
810   }
811   gst_object_sync_values (GST_OBJECT (src), v4l2src->ctrl_time);
812   GST_INFO_OBJECT (src, "sync to %" GST_TIME_FORMAT,
813       GST_TIME_ARGS (v4l2src->ctrl_time));
814
815   /* FIXME: use the timestamp from the buffer itself! */
816   GST_BUFFER_TIMESTAMP (buf) = timestamp;
817   GST_BUFFER_DURATION (buf) = duration;
818
819   return ret;
820
821   /* ERROR */
822 error:
823   {
824     GST_DEBUG_OBJECT (src, "error processing buffer %d (%s)", ret,
825         gst_flow_get_name (ret));
826     return ret;
827   }
828 }
829
830
831 /* GstURIHandler interface */
832 static GstURIType
833 gst_v4l2src_uri_get_type (GType type)
834 {
835   return GST_URI_SRC;
836 }
837
838 static const gchar *const *
839 gst_v4l2src_uri_get_protocols (GType type)
840 {
841   static const gchar *protocols[] = { "v4l2", NULL };
842
843   return protocols;
844 }
845
846 static gchar *
847 gst_v4l2src_uri_get_uri (GstURIHandler * handler)
848 {
849   GstV4l2Src *v4l2src = GST_V4L2SRC (handler);
850
851   if (v4l2src->v4l2object->videodev != NULL) {
852     return g_strdup_printf ("v4l2://%s", v4l2src->v4l2object->videodev);
853   }
854
855   return g_strdup ("v4l2://");
856 }
857
858 static gboolean
859 gst_v4l2src_uri_set_uri (GstURIHandler * handler, const gchar * uri,
860     GError ** error)
861 {
862   GstV4l2Src *v4l2src = GST_V4L2SRC (handler);
863   const gchar *device = DEFAULT_PROP_DEVICE;
864
865   if (strcmp (uri, "v4l2://") != 0) {
866     device = uri + 7;
867   }
868   g_object_set (v4l2src, "device", device, NULL);
869
870   return TRUE;
871 }
872
873
874 static void
875 gst_v4l2src_uri_handler_init (gpointer g_iface, gpointer iface_data)
876 {
877   GstURIHandlerInterface *iface = (GstURIHandlerInterface *) g_iface;
878
879   iface->get_type = gst_v4l2src_uri_get_type;
880   iface->get_protocols = gst_v4l2src_uri_get_protocols;
881   iface->get_uri = gst_v4l2src_uri_get_uri;
882   iface->set_uri = gst_v4l2src_uri_set_uri;
883 }