1 /* Copyright (C) 2001 CodeFactory AB
2 * Copyright (C) 2001 Thomas Nyberg <thomas@codefactory.se>
3 * Copyright (C) 2001-2002 Andy Wingo <apwingo@eos.ncsu.edu>
4 * Copyright (C) 2003 Benjamin Otte <in7y118@public.uni-hamburg.de>
5 * Copyright (C) 2005 Tim-Philipp Müller <tim centricular net>
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Library General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Library General Public License for more details.
17 * You should have received a copy of the GNU Library General Public
18 * License along with this library; if not, write to the Free
19 * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 #include "gstalsadeviceprobe.h"
27 #include "gst/interfaces/propertyprobe.h"
29 G_LOCK_DEFINE_STATIC (probe_lock);
32 gst_alsa_device_property_probe_get_properties (GstPropertyProbe * probe)
34 GObjectClass *klass = G_OBJECT_GET_CLASS (probe);
35 static GList *list = NULL;
37 /* well, not perfect, but better than no locking at all.
38 * In the worst case we leak a list node, so who cares? */
44 pspec = g_object_class_find_property (klass, "device");
45 list = g_list_append (NULL, pspec);
48 G_UNLOCK (probe_lock);
54 gst_alsa_get_device_list (snd_pcm_stream_t stream)
58 snd_ctl_card_info_t *info;
59 snd_pcm_info_t *pcminfo;
60 gboolean mixer = (stream == -1);
66 snd_ctl_card_info_malloc (&info);
67 snd_pcm_info_malloc (&pcminfo);
70 if (snd_card_next (&card) < 0 || card < 0) {
71 /* no soundcard found */
72 GST_WARNING ("No soundcard found");
79 g_snprintf (name, sizeof (name), "hw:%d", card);
80 if (snd_ctl_open (&handle, name, 0) < 0) {
83 if (snd_ctl_card_info (handle, info) < 0) {
84 snd_ctl_close (handle);
89 list = g_list_append (list, g_strdup (name));
95 snd_ctl_pcm_next_device (handle, &dev);
99 snd_pcm_info_set_device (pcminfo, dev);
100 snd_pcm_info_set_subdevice (pcminfo, 0);
101 snd_pcm_info_set_stream (pcminfo, stream);
102 if (snd_ctl_pcm_info (handle, pcminfo) < 0) {
106 gst_device = g_strdup_printf ("hw:%d,%d", card, dev);
107 list = g_list_append (list, gst_device);
110 snd_ctl_close (handle);
112 if (snd_card_next (&card) < 0) {
118 snd_ctl_card_info_free (info);
119 snd_pcm_info_free (pcminfo);
125 gst_alsa_device_property_probe_probe_property (GstPropertyProbe * probe,
126 guint prop_id, const GParamSpec * pspec)
128 if (!g_str_equal (pspec->name, "device")) {
129 G_OBJECT_WARN_INVALID_PROPERTY_ID (probe, prop_id, pspec);
134 gst_alsa_device_property_probe_needs_probe (GstPropertyProbe * probe,
135 guint prop_id, const GParamSpec * pspec)
137 /* don't cache probed data */
142 gst_alsa_device_property_probe_get_values (GstPropertyProbe * probe,
143 guint prop_id, const GParamSpec * pspec)
145 GstElementClass *klass;
146 const GList *templates;
147 snd_pcm_stream_t mode = -1;
149 GValue value = { 0, };
152 if (!g_str_equal (pspec->name, "device")) {
153 G_OBJECT_WARN_INVALID_PROPERTY_ID (probe, prop_id, pspec);
157 klass = GST_ELEMENT_GET_CLASS (GST_ELEMENT (probe));
159 /* I'm pretty sure ALSA has a good way to do this. However, their cool
160 * auto-generated documentation is pretty much useless if you try to
161 * do function-wise look-ups. */
162 /* we assume one pad template at max [zero=mixer] */
163 templates = gst_element_class_get_pad_template_list (klass);
165 if (GST_PAD_TEMPLATE_DIRECTION (templates->data) == GST_PAD_SRC)
166 mode = SND_PCM_STREAM_CAPTURE;
168 mode = SND_PCM_STREAM_PLAYBACK;
171 list = gst_alsa_get_device_list (mode);
174 GST_LOG_OBJECT (probe, "No devices found");
178 array = g_value_array_new (g_list_length (list));
179 g_value_init (&value, G_TYPE_STRING);
180 for (l = list; l != NULL; l = l->next) {
181 GST_LOG_OBJECT (probe, "Found device: %s", (gchar *) l->data);
182 g_value_take_string (&value, (gchar *) l->data);
184 g_value_array_append (array, &value);
186 g_value_unset (&value);
193 gst_alsa_property_probe_interface_init (GstPropertyProbeInterface * iface)
195 iface->get_properties = gst_alsa_device_property_probe_get_properties;
196 iface->probe_property = gst_alsa_device_property_probe_probe_property;
197 iface->needs_probe = gst_alsa_device_property_probe_needs_probe;
198 iface->get_values = gst_alsa_device_property_probe_get_values;
202 gst_alsa_type_add_device_property_probe_interface (GType type)
204 static const GInterfaceInfo probe_iface_info = {
205 (GInterfaceInitFunc) gst_alsa_property_probe_interface_init,
210 g_type_add_interface_static (type, GST_TYPE_PROPERTY_PROBE,