sys/v4l2/v4l2_calls.c

   1 /* GStreamer
   2  *
   3  * Copyright (C) 2002 Ronald Bultje <rbultje@ronald.bitfreak.net>
   4  *               2006 Edgard Lima <edgard.lima@indt.org.br>
   5  *
   6  * v4l2_calls.c - generic V4L2 calls handling
   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., 51 Franklin St, Fifth Floor,
  21  * Boston, MA 02110-1301, USA.
  22  */
  23
  24 #ifdef HAVE_CONFIG_H
  25 #include <config.h>
  26 #endif
  27
  28 #include <sys/types.h>
  29 #include <sys/stat.h>
  30 #include <fcntl.h>
  31 #include <sys/ioctl.h>
  32 #include <sys/mman.h>
  33 #include <string.h>
  34 #include <errno.h>
  35 #include <unistd.h>
  36 #ifdef __sun
  37 /* Needed on older Solaris Nevada builds (72 at least) */
  38 #include <stropts.h>
  39 #include <sys/ioccom.h>
  40 #endif
  41 #include "v4l2_calls.h"
  42 #include "gstv4l2tuner.h"
  43 #if 0
  44 #include "gstv4l2xoverlay.h"
  45 #endif
  46 #include "gstv4l2colorbalance.h"
  47
  48 #include "gstv4l2src.h"
  49 #include "gstv4l2sink.h"
  50
  51 #include "gst/gst-i18n-plugin.h"
  52
  53 /* Those are ioctl calls */
  54 #ifndef V4L2_CID_HCENTER
  55 #define V4L2_CID_HCENTER V4L2_CID_HCENTER_DEPRECATED
  56 #endif
  57 #ifndef V4L2_CID_VCENTER
  58 #define V4L2_CID_VCENTER V4L2_CID_VCENTER_DEPRECATED
  59 #endif
  60
  61 GST_DEBUG_CATEGORY_EXTERN (v4l2_debug);
  62 #define GST_CAT_DEFAULT v4l2_debug
  63
  64 /******************************************************
  65  * gst_v4l2_get_capabilities():
  66  *   get the device's capturing capabilities
  67  * return value: TRUE on success, FALSE on error
  68  ******************************************************/
  69 gboolean
  70 gst_v4l2_get_capabilities (GstV4l2Object * v4l2object)
  71 {
  72   GstElement *e;
  73
  74   e = v4l2object->element;
  75
  76   GST_DEBUG_OBJECT (e, "getting capabilities");
  77
  78   if (!GST_V4L2_IS_OPEN (v4l2object))
  79     return FALSE;
  80
  81   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_QUERYCAP, &v4l2object->vcap) < 0)
  82     goto cap_failed;
  83
  84   GST_LOG_OBJECT (e, "driver:      '%s'", v4l2object->vcap.driver);
  85   GST_LOG_OBJECT (e, "card:        '%s'", v4l2object->vcap.card);
  86   GST_LOG_OBJECT (e, "bus_info:    '%s'", v4l2object->vcap.bus_info);
  87   GST_LOG_OBJECT (e, "version:     %08x", v4l2object->vcap.version);
  88   GST_LOG_OBJECT (e, "capabilites: %08x", v4l2object->vcap.capabilities);
  89
  90   return TRUE;
  91
  92   /* ERRORS */
  93 cap_failed:
  94   {
  95     GST_ELEMENT_ERROR (v4l2object->element, RESOURCE, SETTINGS,
  96         (_("Error getting capabilities for device '%s': "
  97                 "It isn't a v4l2 driver. Check if it is a v4l1 driver."),
  98             v4l2object->videodev), GST_ERROR_SYSTEM);
  99     return FALSE;
 100   }
 101 }
 102
 103
 104 /******************************************************
 105  * gst_v4l2_empty_lists() and gst_v4l2_fill_lists():
 106  *   fill/empty the lists of enumerations
 107  * return value: TRUE on success, FALSE on error
 108  ******************************************************/
 109 static gboolean
 110 gst_v4l2_fill_lists (GstV4l2Object * v4l2object)
 111 {
 112   gint n, next;
 113   struct v4l2_queryctrl control = { 0, };
 114
 115   GstElement *e;
 116
 117   e = v4l2object->element;
 118
 119   GST_DEBUG_OBJECT (e, "getting enumerations");
 120   GST_V4L2_CHECK_OPEN (v4l2object);
 121
 122   GST_DEBUG_OBJECT (e, "  channels");
 123   /* and now, the channels */
 124   for (n = 0;; n++) {
 125     struct v4l2_input input;
 126     GstV4l2TunerChannel *v4l2channel;
 127     GstTunerChannel *channel;
 128
 129     memset (&input, 0, sizeof (input));
 130
 131     input.index = n;
 132     if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_ENUMINPUT, &input) < 0) {
 133       if (errno == EINVAL || errno == ENOTTY)
 134         break;                  /* end of enumeration */
 135       else {
 136         GST_ELEMENT_ERROR (e, RESOURCE, SETTINGS,
 137             (_("Failed to query attributes of input %d in device %s"),
 138                 n, v4l2object->videodev),
 139             ("Failed to get %d in input enumeration for %s. (%d - %s)",
 140                 n, v4l2object->videodev, errno, strerror (errno)));
 141         return FALSE;
 142       }
 143     }
 144
 145     GST_LOG_OBJECT (e, "   index:     %d", input.index);
 146     GST_LOG_OBJECT (e, "   name:      '%s'", input.name);
 147     GST_LOG_OBJECT (e, "   type:      %08x", input.type);
 148     GST_LOG_OBJECT (e, "   audioset:  %08x", input.audioset);
 149     GST_LOG_OBJECT (e, "   std:       %016" G_GINT64_MODIFIER "x",
 150         (guint64) input.std);
 151     GST_LOG_OBJECT (e, "   status:    %08x", input.status);
 152
 153     v4l2channel = g_object_new (GST_TYPE_V4L2_TUNER_CHANNEL, NULL);
 154     channel = GST_TUNER_CHANNEL (v4l2channel);
 155     channel->label = g_strdup ((const gchar *) input.name);
 156     channel->flags = GST_TUNER_CHANNEL_INPUT;
 157     v4l2channel->index = n;
 158
 159     if (input.type == V4L2_INPUT_TYPE_TUNER) {
 160       struct v4l2_tuner vtun;
 161
 162       v4l2channel->tuner = input.tuner;
 163       channel->flags |= GST_TUNER_CHANNEL_FREQUENCY;
 164
 165       vtun.index = input.tuner;
 166       if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_TUNER, &vtun) < 0) {
 167         GST_ELEMENT_ERROR (e, RESOURCE, SETTINGS,
 168             (_("Failed to get setting of tuner %d on device '%s'."),
 169                 input.tuner, v4l2object->videodev), GST_ERROR_SYSTEM);
 170         g_object_unref (G_OBJECT (channel));
 171         return FALSE;
 172       }
 173
 174       channel->freq_multiplicator =
 175           62.5 * ((vtun.capability & V4L2_TUNER_CAP_LOW) ? 1 : 1000);
 176       channel->min_frequency = vtun.rangelow * channel->freq_multiplicator;
 177       channel->max_frequency = vtun.rangehigh * channel->freq_multiplicator;
 178       channel->min_signal = 0;
 179       channel->max_signal = 0xffff;
 180     }
 181     if (input.audioset) {
 182       /* we take the first. We don't care for
 183        * the others for now */
 184       while (!(input.audioset & (1 << v4l2channel->audio)))
 185         v4l2channel->audio++;
 186       channel->flags |= GST_TUNER_CHANNEL_AUDIO;
 187     }
 188
 189     v4l2object->channels =
 190         g_list_prepend (v4l2object->channels, (gpointer) channel);
 191   }
 192   v4l2object->channels = g_list_reverse (v4l2object->channels);
 193
 194   GST_DEBUG_OBJECT (e, "  norms");
 195   /* norms... */
 196   for (n = 0;; n++) {
 197     struct v4l2_standard standard = { 0, };
 198     GstV4l2TunerNorm *v4l2norm;
 199
 200     GstTunerNorm *norm;
 201
 202     /* fill in defaults */
 203     standard.frameperiod.numerator = 1;
 204     standard.frameperiod.denominator = 0;
 205     standard.index = n;
 206
 207     if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_ENUMSTD, &standard) < 0) {
 208       if (errno == EINVAL || errno == ENOTTY || errno == ENODATA)
 209         break;                  /* end of enumeration */
 210       else {
 211         GST_ELEMENT_ERROR (e, RESOURCE, SETTINGS,
 212             (_("Failed to query norm on device '%s'."),
 213                 v4l2object->videodev),
 214             ("Failed to get attributes for norm %d on devide '%s'. (%d - %s)",
 215                 n, v4l2object->videodev, errno, strerror (errno)));
 216         return FALSE;
 217       }
 218     }
 219
 220     GST_DEBUG_OBJECT (e, "    '%s', fps: %d / %d",
 221         standard.name, standard.frameperiod.denominator,
 222         standard.frameperiod.numerator);
 223
 224     v4l2norm = g_object_new (GST_TYPE_V4L2_TUNER_NORM, NULL);
 225     norm = GST_TUNER_NORM (v4l2norm);
 226     norm->label = g_strdup ((const gchar *) standard.name);
 227     gst_value_set_fraction (&norm->framerate,
 228         standard.frameperiod.denominator, standard.frameperiod.numerator);
 229     v4l2norm->index = standard.id;
 230
 231     GST_DEBUG_OBJECT (v4l2object->element, "index=%08x, label=%s",
 232         (unsigned int) v4l2norm->index, norm->label);
 233
 234     v4l2object->norms = g_list_prepend (v4l2object->norms, (gpointer) norm);
 235   }
 236   v4l2object->norms = g_list_reverse (v4l2object->norms);
 237
 238   GST_DEBUG_OBJECT (e, "  controls+menus");
 239
 240   /* and lastly, controls+menus (if appropriate) */
 241 #ifdef V4L2_CTRL_FLAG_NEXT_CTRL
 242   next = V4L2_CTRL_FLAG_NEXT_CTRL;
 243   n = 0;
 244 #else
 245   next = 0;
 246   n = V4L2_CID_BASE;
 247 #endif
 248   control.id = next;
 249   while (TRUE) {
 250     GstV4l2ColorBalanceChannel *v4l2channel;
 251     GstColorBalanceChannel *channel;
 252
 253     if (!next)
 254       n++;
 255
 256     /* when we reached the last official CID, continue with private CIDs */
 257     if (n == V4L2_CID_LASTP1) {
 258       GST_DEBUG_OBJECT (e, "checking private CIDs");
 259       n = V4L2_CID_PRIVATE_BASE;
 260     }
 261     GST_DEBUG_OBJECT (e, "checking control %08x", n);
 262
 263     control.id = n | next;
 264     if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_QUERYCTRL, &control) < 0) {
 265       if (next) {
 266         if (n > 0) {
 267           GST_DEBUG_OBJECT (e, "controls finished");
 268           break;
 269         } else {
 270           GST_DEBUG_OBJECT (e, "V4L2_CTRL_FLAG_NEXT_CTRL not supported.");
 271           next = 0;
 272           n = V4L2_CID_BASE;
 273           continue;
 274         }
 275       }
 276       if (errno == EINVAL || errno == ENOTTY || errno == EIO || errno == ENOENT) {
 277         if (n < V4L2_CID_PRIVATE_BASE) {
 278           GST_DEBUG_OBJECT (e, "skipping control %08x", n);
 279           /* continue so that we also check private controls */
 280           continue;
 281         } else {
 282           GST_DEBUG_OBJECT (e, "controls finished");
 283           break;
 284         }
 285       } else {
 286         GST_WARNING_OBJECT (e, "Failed querying control %d on device '%s'. "
 287             "(%d - %s)", n, v4l2object->videodev, errno, strerror (errno));
 288         continue;
 289       }
 290     }
 291     n = control.id;
 292     if (control.flags & V4L2_CTRL_FLAG_DISABLED) {
 293       GST_DEBUG_OBJECT (e, "skipping disabled control");
 294       continue;
 295     }
 296 #ifdef V4L2_CTRL_TYPE_CTRL_CLASS
 297     if (control.type == V4L2_CTRL_TYPE_CTRL_CLASS) {
 298       GST_DEBUG_OBJECT (e, "starting control class '%s'", control.name);
 299       continue;
 300     }
 301 #endif
 302     switch (control.type) {
 303       case V4L2_CTRL_TYPE_INTEGER:
 304       case V4L2_CTRL_TYPE_BOOLEAN:
 305       case V4L2_CTRL_TYPE_MENU:
 306 #ifdef V4L2_CTRL_TYPE_INTEGER_MENU
 307       case V4L2_CTRL_TYPE_INTEGER_MENU:
 308 #endif
 309 #ifdef V4L2_CTRL_TYPE_BITMASK
 310       case V4L2_CTRL_TYPE_BITMASK:
 311 #endif
 312       case V4L2_CTRL_TYPE_BUTTON:{
 313         int i;
 314         control.name[31] = '\0';
 315         for (i = 0; control.name[i]; ++i) {
 316           control.name[i] = g_ascii_tolower (control.name[i]);
 317           if (!g_ascii_isalnum (control.name[i]))
 318             control.name[i] = '_';
 319         }
 320         GST_INFO_OBJECT (e, "adding generic controls '%s'", control.name);
 321         g_datalist_id_set_data (&v4l2object->controls,
 322             g_quark_from_string ((const gchar *) control.name),
 323             GINT_TO_POINTER (n));
 324         break;
 325       }
 326       default:
 327         GST_DEBUG_OBJECT (e,
 328             "Control type for '%s' not suppored for extra controls.",
 329             control.name);
 330         break;
 331     }
 332
 333     switch (n) {
 334       case V4L2_CID_BRIGHTNESS:
 335       case V4L2_CID_CONTRAST:
 336       case V4L2_CID_SATURATION:
 337       case V4L2_CID_HUE:
 338       case V4L2_CID_BLACK_LEVEL:
 339       case V4L2_CID_AUTO_WHITE_BALANCE:
 340       case V4L2_CID_DO_WHITE_BALANCE:
 341       case V4L2_CID_RED_BALANCE:
 342       case V4L2_CID_BLUE_BALANCE:
 343       case V4L2_CID_GAMMA:
 344       case V4L2_CID_EXPOSURE:
 345       case V4L2_CID_AUTOGAIN:
 346       case V4L2_CID_GAIN:
 347 #ifdef V4L2_CID_SHARPNESS
 348       case V4L2_CID_SHARPNESS:
 349 #endif
 350         /* we only handle these for now (why?) */
 351         break;
 352       case V4L2_CID_HFLIP:
 353       case V4L2_CID_VFLIP:
 354 #ifndef V4L2_CID_PAN_RESET
 355       case V4L2_CID_HCENTER:
 356 #endif
 357 #ifndef V4L2_CID_TILT_RESET
 358       case V4L2_CID_VCENTER:
 359 #endif
 360 #ifdef V4L2_CID_PAN_RESET
 361       case V4L2_CID_PAN_RESET:
 362 #endif
 363 #ifdef V4L2_CID_TILT_RESET
 364       case V4L2_CID_TILT_RESET:
 365 #endif
 366         /* not handled here, handled by VideoOrientation interface */
 367         control.id++;
 368         break;
 369       case V4L2_CID_AUDIO_VOLUME:
 370       case V4L2_CID_AUDIO_BALANCE:
 371       case V4L2_CID_AUDIO_BASS:
 372       case V4L2_CID_AUDIO_TREBLE:
 373       case V4L2_CID_AUDIO_MUTE:
 374       case V4L2_CID_AUDIO_LOUDNESS:
 375         /* FIXME: We should implement GstMixer interface */
 376         /* fall through */
 377       default:
 378         GST_DEBUG_OBJECT (e,
 379             "ControlID %s (%x) unhandled, FIXME", control.name, n);
 380         control.id++;
 381         break;
 382     }
 383     if (n != control.id)
 384       continue;
 385
 386     GST_DEBUG_OBJECT (e, "Adding ControlID %s (%x)", control.name, n);
 387     v4l2channel = g_object_new (GST_TYPE_V4L2_COLOR_BALANCE_CHANNEL, NULL);
 388     channel = GST_COLOR_BALANCE_CHANNEL (v4l2channel);
 389     channel->label = g_strdup ((const gchar *) control.name);
 390     v4l2channel->id = n;
 391
 392 #if 0
 393     /* FIXME: it will be need just when handling private controls
 394      *(currently none of base controls are of this type) */
 395     if (control.type == V4L2_CTRL_TYPE_MENU) {
 396       struct v4l2_querymenu menu, *mptr;
 397
 398       int i;
 399
 400       menu.id = n;
 401       for (i = 0;; i++) {
 402         menu.index = i;
 403         if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_QUERYMENU, &menu) < 0) {
 404           if (errno == EINVAL)
 405             break;              /* end of enumeration */
 406           else {
 407             GST_ELEMENT_ERROR (e, RESOURCE, SETTINGS,
 408                 (_("Failed getting controls attributes on device '%s'."),
 409                     v4l2object->videodev),
 410                 ("Failed to get %d in menu enumeration for %s. (%d - %s)",
 411                     n, v4l2object->videodev, errno, strerror (errno)));
 412             return FALSE;
 413           }
 414         }
 415         mptr = g_malloc (sizeof (menu));
 416         memcpy (mptr, &menu, sizeof (menu));
 417         menus = g_list_append (menus, mptr);
 418       }
 419     }
 420     v4l2object->menus = g_list_append (v4l2object->menus, menus);
 421 #endif
 422
 423     switch (control.type) {
 424       case V4L2_CTRL_TYPE_INTEGER:
 425         channel->min_value = control.minimum;
 426         channel->max_value = control.maximum;
 427         break;
 428       case V4L2_CTRL_TYPE_BOOLEAN:
 429         channel->min_value = FALSE;
 430         channel->max_value = TRUE;
 431         break;
 432       default:
 433         /* FIXME we should find out how to handle V4L2_CTRL_TYPE_BUTTON.
 434            BUTTON controls like V4L2_CID_DO_WHITE_BALANCE can just be set (1) or
 435            unset (0), but can't be queried */
 436         GST_DEBUG_OBJECT (e,
 437             "Control with non supported type %s (%x), type=%d",
 438             control.name, n, control.type);
 439         channel->min_value = channel->max_value = 0;
 440         break;
 441     }
 442
 443     v4l2object->colors =
 444         g_list_prepend (v4l2object->colors, (gpointer) channel);
 445   }
 446   v4l2object->colors = g_list_reverse (v4l2object->colors);
 447
 448   GST_DEBUG_OBJECT (e, "done");
 449   return TRUE;
 450 }
 451
 452
 453 static void
 454 gst_v4l2_empty_lists (GstV4l2Object * v4l2object)
 455 {
 456   GST_DEBUG_OBJECT (v4l2object->element, "deleting enumerations");
 457
 458   g_list_foreach (v4l2object->channels, (GFunc) g_object_unref, NULL);
 459   g_list_free (v4l2object->channels);
 460   v4l2object->channels = NULL;
 461
 462   g_list_foreach (v4l2object->norms, (GFunc) g_object_unref, NULL);
 463   g_list_free (v4l2object->norms);
 464   v4l2object->norms = NULL;
 465
 466   g_list_foreach (v4l2object->colors, (GFunc) g_object_unref, NULL);
 467   g_list_free (v4l2object->colors);
 468   v4l2object->colors = NULL;
 469
 470   g_datalist_clear (&v4l2object->controls);
 471 }
 472
 473 /******************************************************
 474  * gst_v4l2_open():
 475  *   open the video device (v4l2object->videodev)
 476  * return value: TRUE on success, FALSE on error
 477  ******************************************************/
 478 gboolean
 479 gst_v4l2_open (GstV4l2Object * v4l2object)
 480 {
 481   struct stat st;
 482   int libv4l2_fd;
 483   GstPollFD pollfd = GST_POLL_FD_INIT;
 484
 485   GST_DEBUG_OBJECT (v4l2object->element, "Trying to open device %s",
 486       v4l2object->videodev);
 487
 488   GST_V4L2_CHECK_NOT_OPEN (v4l2object);
 489   GST_V4L2_CHECK_NOT_ACTIVE (v4l2object);
 490
 491   /* be sure we have a device */
 492   if (!v4l2object->videodev)
 493     v4l2object->videodev = g_strdup ("/dev/video");
 494
 495   /* check if it is a device */
 496   if (stat (v4l2object->videodev, &st) == -1)
 497     goto stat_failed;
 498
 499   if (!S_ISCHR (st.st_mode))
 500     goto no_device;
 501
 502   /* open the device */
 503   v4l2object->video_fd =
 504       open (v4l2object->videodev, O_RDWR /* | O_NONBLOCK */ );
 505
 506   if (!GST_V4L2_IS_OPEN (v4l2object))
 507     goto not_open;
 508
 509   libv4l2_fd = v4l2_fd_open (v4l2object->video_fd,
 510       V4L2_ENABLE_ENUM_FMT_EMULATION);
 511   /* Note the v4l2_xxx functions are designed so that if they get passed an
 512      unknown fd, the will behave exactly as their regular xxx counterparts, so
 513      if v4l2_fd_open fails, we continue as normal (missing the libv4l2 custom
 514      cam format to normal formats conversion). Chances are big we will still
 515      fail then though, as normally v4l2_fd_open only fails if the device is not
 516      a v4l2 device. */
 517   if (libv4l2_fd != -1)
 518     v4l2object->video_fd = libv4l2_fd;
 519
 520   v4l2object->can_poll_device = TRUE;
 521
 522   /* get capabilities, error will be posted */
 523   if (!gst_v4l2_get_capabilities (v4l2object))
 524     goto error;
 525
 526   /* do we need to be a capture device? */
 527   if (GST_IS_V4L2SRC (v4l2object->element) &&
 528       !(v4l2object->vcap.capabilities & V4L2_CAP_VIDEO_CAPTURE))
 529     goto not_capture;
 530
 531   if (GST_IS_V4L2SINK (v4l2object->element) &&
 532       !(v4l2object->vcap.capabilities & V4L2_CAP_VIDEO_OUTPUT))
 533     goto not_output;
 534
 535   /* create enumerations, posts errors. */
 536   if (!gst_v4l2_fill_lists (v4l2object))
 537     goto error;
 538
 539   GST_INFO_OBJECT (v4l2object->element,
 540       "Opened device '%s' (%s) successfully",
 541       v4l2object->vcap.card, v4l2object->videodev);
 542
 543   pollfd.fd = v4l2object->video_fd;
 544   gst_poll_add_fd (v4l2object->poll, &pollfd);
 545   if (v4l2object->type == V4L2_BUF_TYPE_VIDEO_CAPTURE)
 546     gst_poll_fd_ctl_read (v4l2object->poll, &pollfd, TRUE);
 547   else
 548     gst_poll_fd_ctl_write (v4l2object->poll, &pollfd, TRUE);
 549
 550   if (v4l2object->extra_controls)
 551     gst_v4l2_set_controls (v4l2object, v4l2object->extra_controls);
 552
 553   return TRUE;
 554
 555   /* ERRORS */
 556 stat_failed:
 557   {
 558     GST_ELEMENT_ERROR (v4l2object->element, RESOURCE, NOT_FOUND,
 559         (_("Cannot identify device '%s'."), v4l2object->videodev),
 560         GST_ERROR_SYSTEM);
 561     goto error;
 562   }
 563 no_device:
 564   {
 565     GST_ELEMENT_ERROR (v4l2object->element, RESOURCE, NOT_FOUND,
 566         (_("This isn't a device '%s'."), v4l2object->videodev),
 567         GST_ERROR_SYSTEM);
 568     goto error;
 569   }
 570 not_open:
 571   {
 572     GST_ELEMENT_ERROR (v4l2object->element, RESOURCE, OPEN_READ_WRITE,
 573         (_("Could not open device '%s' for reading and writing."),
 574             v4l2object->videodev), GST_ERROR_SYSTEM);
 575     goto error;
 576   }
 577 not_capture:
 578   {
 579     GST_ELEMENT_ERROR (v4l2object->element, RESOURCE, NOT_FOUND,
 580         (_("Device '%s' is not a capture device."),
 581             v4l2object->videodev),
 582         ("Capabilities: 0x%x", v4l2object->vcap.capabilities));
 583     goto error;
 584   }
 585 not_output:
 586   {
 587     GST_ELEMENT_ERROR (v4l2object->element, RESOURCE, NOT_FOUND,
 588         (_("Device '%s' is not a output device."),
 589             v4l2object->videodev),
 590         ("Capabilities: 0x%x", v4l2object->vcap.capabilities));
 591     goto error;
 592   }
 593 error:
 594   {
 595     if (GST_V4L2_IS_OPEN (v4l2object)) {
 596       /* close device */
 597       v4l2_close (v4l2object->video_fd);
 598       v4l2object->video_fd = -1;
 599     }
 600     /* empty lists */
 601     gst_v4l2_empty_lists (v4l2object);
 602
 603     return FALSE;
 604   }
 605 }
 606
 607
 608 /******************************************************
 609  * gst_v4l2_close():
 610  *   close the video device (v4l2object->video_fd)
 611  * return value: TRUE on success, FALSE on error
 612  ******************************************************/
 613 gboolean
 614 gst_v4l2_close (GstV4l2Object * v4l2object)
 615 {
 616   GstPollFD pollfd = GST_POLL_FD_INIT;
 617   GST_DEBUG_OBJECT (v4l2object->element, "Trying to close %s",
 618       v4l2object->videodev);
 619
 620   GST_V4L2_CHECK_OPEN (v4l2object);
 621   GST_V4L2_CHECK_NOT_ACTIVE (v4l2object);
 622
 623   /* close device */
 624   v4l2_close (v4l2object->video_fd);
 625   pollfd.fd = v4l2object->video_fd;
 626   gst_poll_remove_fd (v4l2object->poll, &pollfd);
 627   v4l2object->video_fd = -1;
 628
 629   /* empty lists */
 630   gst_v4l2_empty_lists (v4l2object);
 631
 632   return TRUE;
 633 }
 634
 635
 636 /******************************************************
 637  * gst_v4l2_get_norm()
 638  *   Get the norm of the current device
 639  * return value: TRUE on success, FALSE on error
 640  ******************************************************/
 641 gboolean
 642 gst_v4l2_get_norm (GstV4l2Object * v4l2object, v4l2_std_id * norm)
 643 {
 644   GST_DEBUG_OBJECT (v4l2object->element, "getting norm");
 645
 646   if (!GST_V4L2_IS_OPEN (v4l2object))
 647     return FALSE;
 648
 649   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_STD, norm) < 0)
 650     goto std_failed;
 651
 652   return TRUE;
 653
 654   /* ERRORS */
 655 std_failed:
 656   {
 657     GST_DEBUG ("Failed to get the current norm for device %s",
 658         v4l2object->videodev);
 659     return FALSE;
 660   }
 661 }
 662
 663
 664 /******************************************************
 665  * gst_v4l2_set_norm()
 666  *   Set the norm of the current device
 667  * return value: TRUE on success, FALSE on error
 668  ******************************************************/
 669 gboolean
 670 gst_v4l2_set_norm (GstV4l2Object * v4l2object, v4l2_std_id norm)
 671 {
 672   GST_DEBUG_OBJECT (v4l2object->element, "trying to set norm to "
 673       "%" G_GINT64_MODIFIER "x", (guint64) norm);
 674
 675   if (!GST_V4L2_IS_OPEN (v4l2object))
 676     return FALSE;
 677
 678   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_S_STD, &norm) < 0)
 679     goto std_failed;
 680
 681   return TRUE;
 682
 683   /* ERRORS */
 684 std_failed:
 685   {
 686     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 687         (_("Failed to set norm for device '%s'."),
 688             v4l2object->videodev), GST_ERROR_SYSTEM);
 689     return FALSE;
 690   }
 691 }
 692
 693 /******************************************************
 694  * gst_v4l2_get_frequency():
 695  *   get the current frequency
 696  * return value: TRUE on success, FALSE on error
 697  ******************************************************/
 698 gboolean
 699 gst_v4l2_get_frequency (GstV4l2Object * v4l2object,
 700     gint tunernum, gulong * frequency)
 701 {
 702   struct v4l2_frequency freq = { 0, };
 703
 704   GstTunerChannel *channel;
 705
 706   GST_DEBUG_OBJECT (v4l2object->element, "getting current tuner frequency");
 707
 708   if (!GST_V4L2_IS_OPEN (v4l2object))
 709     return FALSE;
 710
 711   channel = gst_tuner_get_channel (GST_TUNER (v4l2object->element));
 712
 713   freq.tuner = tunernum;
 714   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_FREQUENCY, &freq) < 0)
 715     goto freq_failed;
 716
 717   *frequency = freq.frequency * channel->freq_multiplicator;
 718
 719   return TRUE;
 720
 721   /* ERRORS */
 722 freq_failed:
 723   {
 724     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 725         (_("Failed to get current tuner frequency for device '%s'."),
 726             v4l2object->videodev), GST_ERROR_SYSTEM);
 727     return FALSE;
 728   }
 729 }
 730
 731
 732 /******************************************************
 733  * gst_v4l2_set_frequency():
 734  *   set frequency
 735  * return value: TRUE on success, FALSE on error
 736  ******************************************************/
 737 gboolean
 738 gst_v4l2_set_frequency (GstV4l2Object * v4l2object,
 739     gint tunernum, gulong frequency)
 740 {
 741   struct v4l2_frequency freq = { 0, };
 742
 743   GstTunerChannel *channel;
 744
 745   GST_DEBUG_OBJECT (v4l2object->element,
 746       "setting current tuner frequency to %lu", frequency);
 747
 748   if (!GST_V4L2_IS_OPEN (v4l2object))
 749     return FALSE;
 750
 751   channel = gst_tuner_get_channel (GST_TUNER (v4l2object->element));
 752
 753   freq.tuner = tunernum;
 754   /* fill in type - ignore error */
 755   v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_FREQUENCY, &freq);
 756   freq.frequency = frequency / channel->freq_multiplicator;
 757
 758   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_S_FREQUENCY, &freq) < 0)
 759     goto freq_failed;
 760
 761   return TRUE;
 762
 763   /* ERRORS */
 764 freq_failed:
 765   {
 766     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 767         (_("Failed to set current tuner frequency for device '%s' to %lu Hz."),
 768             v4l2object->videodev, frequency), GST_ERROR_SYSTEM);
 769     return FALSE;
 770   }
 771 }
 772
 773 /******************************************************
 774  * gst_v4l2_signal_strength():
 775  *   get the strength of the signal on the current input
 776  * return value: TRUE on success, FALSE on error
 777  ******************************************************/
 778 gboolean
 779 gst_v4l2_signal_strength (GstV4l2Object * v4l2object,
 780     gint tunernum, gulong * signal_strength)
 781 {
 782   struct v4l2_tuner tuner = { 0, };
 783
 784   GST_DEBUG_OBJECT (v4l2object->element, "trying to get signal strength");
 785
 786   if (!GST_V4L2_IS_OPEN (v4l2object))
 787     return FALSE;
 788
 789   tuner.index = tunernum;
 790   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_TUNER, &tuner) < 0)
 791     goto tuner_failed;
 792
 793   *signal_strength = tuner.signal;
 794
 795   return TRUE;
 796
 797   /* ERRORS */
 798 tuner_failed:
 799   {
 800     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 801         (_("Failed to get signal strength for device '%s'."),
 802             v4l2object->videodev), GST_ERROR_SYSTEM);
 803     return FALSE;
 804   }
 805 }
 806
 807 /******************************************************
 808  * gst_v4l2_get_attribute():
 809  *   try to get the value of one specific attribute
 810  * return value: TRUE on success, FALSE on error
 811  ******************************************************/
 812 gboolean
 813 gst_v4l2_get_attribute (GstV4l2Object * v4l2object,
 814     int attribute_num, int *value)
 815 {
 816   struct v4l2_control control = { 0, };
 817
 818   GST_DEBUG_OBJECT (v4l2object->element, "getting value of attribute %d",
 819       attribute_num);
 820
 821   if (!GST_V4L2_IS_OPEN (v4l2object))
 822     return FALSE;
 823
 824   control.id = attribute_num;
 825
 826   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_CTRL, &control) < 0)
 827     goto ctrl_failed;
 828
 829   *value = control.value;
 830
 831   return TRUE;
 832
 833   /* ERRORS */
 834 ctrl_failed:
 835   {
 836     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 837         (_("Failed to get value for control %d on device '%s'."),
 838             attribute_num, v4l2object->videodev), GST_ERROR_SYSTEM);
 839     return FALSE;
 840   }
 841 }
 842
 843
 844 /******************************************************
 845  * gst_v4l2_set_attribute():
 846  *   try to set the value of one specific attribute
 847  * return value: TRUE on success, FALSE on error
 848  ******************************************************/
 849 gboolean
 850 gst_v4l2_set_attribute (GstV4l2Object * v4l2object,
 851     int attribute_num, const int value)
 852 {
 853   struct v4l2_control control = { 0, };
 854
 855   GST_DEBUG_OBJECT (v4l2object->element, "setting value of attribute %d to %d",
 856       attribute_num, value);
 857
 858   if (!GST_V4L2_IS_OPEN (v4l2object))
 859     return FALSE;
 860
 861   control.id = attribute_num;
 862   control.value = value;
 863   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_S_CTRL, &control) < 0)
 864     goto ctrl_failed;
 865
 866   return TRUE;
 867
 868   /* ERRORS */
 869 ctrl_failed:
 870   {
 871     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 872         (_("Failed to set value %d for control %d on device '%s'."),
 873             value, attribute_num, v4l2object->videodev), GST_ERROR_SYSTEM);
 874     return FALSE;
 875   }
 876 }
 877
 878 static gboolean
 879 set_contol (GQuark field_id, const GValue * value, gpointer user_data)
 880 {
 881   GstV4l2Object *v4l2object = user_data;
 882   gpointer *d = g_datalist_id_get_data (&v4l2object->controls, field_id);
 883   if (!d) {
 884     GST_WARNING_OBJECT (v4l2object,
 885         "Control '%s' does not exist or has an unsupported type.",
 886         g_quark_to_string (field_id));
 887     return TRUE;
 888   }
 889   if (!G_VALUE_HOLDS (value, G_TYPE_INT)) {
 890     GST_WARNING_OBJECT (v4l2object,
 891         "'int' value expected for control '%s'.", g_quark_to_string (field_id));
 892     return TRUE;
 893   }
 894   gst_v4l2_set_attribute (v4l2object, GPOINTER_TO_INT (d),
 895       g_value_get_int (value));
 896   return TRUE;
 897 }
 898
 899 gboolean
 900 gst_v4l2_set_controls (GstV4l2Object * v4l2object, GstStructure * controls)
 901 {
 902   return gst_structure_foreach (controls, set_contol, v4l2object);
 903 }
 904
 905 gboolean
 906 gst_v4l2_get_input (GstV4l2Object * v4l2object, gint * input)
 907 {
 908   gint n;
 909
 910   GST_DEBUG_OBJECT (v4l2object->element, "trying to get input");
 911
 912   if (!GST_V4L2_IS_OPEN (v4l2object))
 913     return FALSE;
 914
 915   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_INPUT, &n) < 0)
 916     goto input_failed;
 917
 918   *input = n;
 919
 920   GST_DEBUG_OBJECT (v4l2object->element, "input: %d", n);
 921
 922   return TRUE;
 923
 924   /* ERRORS */
 925 input_failed:
 926   if (v4l2object->vcap.capabilities & V4L2_CAP_TUNER) {
 927     /* only give a warning message if driver actually claims to have tuner
 928      * support
 929      */
 930     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 931         (_("Failed to get current input on device '%s'. May be it is a radio device"), v4l2object->videodev), GST_ERROR_SYSTEM);
 932   }
 933   return FALSE;
 934 }
 935
 936 gboolean
 937 gst_v4l2_set_input (GstV4l2Object * v4l2object, gint input)
 938 {
 939   GST_DEBUG_OBJECT (v4l2object->element, "trying to set input to %d", input);
 940
 941   if (!GST_V4L2_IS_OPEN (v4l2object))
 942     return FALSE;
 943
 944   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_S_INPUT, &input) < 0)
 945     goto input_failed;
 946
 947   return TRUE;
 948
 949   /* ERRORS */
 950 input_failed:
 951   if (v4l2object->vcap.capabilities & V4L2_CAP_TUNER) {
 952     /* only give a warning message if driver actually claims to have tuner
 953      * support
 954      */
 955     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 956         (_("Failed to set input %d on device %s."),
 957             input, v4l2object->videodev), GST_ERROR_SYSTEM);
 958   }
 959   return FALSE;
 960 }
 961
 962 gboolean
 963 gst_v4l2_get_output (GstV4l2Object * v4l2object, gint * output)
 964 {
 965   gint n;
 966
 967   GST_DEBUG_OBJECT (v4l2object->element, "trying to get output");
 968
 969   if (!GST_V4L2_IS_OPEN (v4l2object))
 970     return FALSE;
 971
 972   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_G_OUTPUT, &n) < 0)
 973     goto output_failed;
 974
 975   *output = n;
 976
 977   GST_DEBUG_OBJECT (v4l2object->element, "output: %d", n);
 978
 979   return TRUE;
 980
 981   /* ERRORS */
 982 output_failed:
 983   if (v4l2object->vcap.capabilities & V4L2_CAP_TUNER) {
 984     /* only give a warning message if driver actually claims to have tuner
 985      * support
 986      */
 987     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
 988         (_("Failed to get current output on device '%s'. May be it is a radio device"), v4l2object->videodev), GST_ERROR_SYSTEM);
 989   }
 990   return FALSE;
 991 }
 992
 993 gboolean
 994 gst_v4l2_set_output (GstV4l2Object * v4l2object, gint output)
 995 {
 996   GST_DEBUG_OBJECT (v4l2object->element, "trying to set output to %d", output);
 997
 998   if (!GST_V4L2_IS_OPEN (v4l2object))
 999     return FALSE;
1000
1001   if (v4l2_ioctl (v4l2object->video_fd, VIDIOC_S_OUTPUT, &output) < 0)
1002     goto output_failed;
1003
1004   return TRUE;
1005
1006   /* ERRORS */
1007 output_failed:
1008   if (v4l2object->vcap.capabilities & V4L2_CAP_TUNER) {
1009     /* only give a warning message if driver actually claims to have tuner
1010      * support
1011      */
1012     GST_ELEMENT_WARNING (v4l2object->element, RESOURCE, SETTINGS,
1013         (_("Failed to set output %d on device %s."),
1014             output, v4l2object->videodev), GST_ERROR_SYSTEM);
1015   }
1016   return FALSE;
1017 }