4 This file is part of polypaudio.
6 polypaudio is free software; you can redistribute it and/or modify
7 it under the terms of the GNU Lesser General Public License as published
8 by the Free Software Foundation; either version 2 of the License,
9 or (at your option) any later version.
11 polypaudio is distributed in the hope that it will be useful, but
12 WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License
17 along with polypaudio; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
29 #ifdef HAVE_SYS_POLL_H
35 #include <asoundlib.h>
37 #include <polypcore/core.h>
38 #include <polypcore/module.h>
39 #include <polypcore/memchunk.h>
40 #include <polypcore/sink.h>
41 #include <polypcore/modargs.h>
42 #include <polypcore/util.h>
43 #include <polypcore/sample-util.h>
44 #include <polypcore/xmalloc.h>
45 #include <polypcore/log.h>
47 #include "module-alsa-source-symdef.h"
48 #include "alsa-util.h"
50 PA_MODULE_AUTHOR("Lennart Poettering")
51 PA_MODULE_DESCRIPTION("ALSA Source")
52 PA_MODULE_VERSION(PACKAGE_VERSION
)
53 PA_MODULE_USAGE("source_name=<name for the source> device=<ALSA device> format=<sample format> channels=<number of channels> rate=<sample rate> fragments=<number of fragments> fragment_size=<fragment size>")
56 snd_pcm_t
*pcm_handle
;
58 pa_io_event
**io_events
;
61 size_t frame_size
, fragment_size
;
66 static const char* const valid_modargs
[] = {
77 #define DEFAULT_SOURCE_NAME "alsa_input"
78 #define DEFAULT_DEVICE "hw:0,0"
80 static void update_usage(struct userdata
*u
) {
81 pa_module_set_used(u
->module
,
82 (u
->source
? pa_idxset_size(u
->source
->outputs
) : 0));
85 static void xrun_recovery(struct userdata
*u
) {
88 pa_log(__FILE__
": *** ALSA-XRUN (capture) ***\n");
90 if (snd_pcm_prepare(u
->pcm_handle
) < 0)
91 pa_log(__FILE__
": snd_pcm_prepare() failed\n");
94 static void do_read(struct userdata
*u
) {
100 pa_memchunk post_memchunk
;
101 snd_pcm_sframes_t frames
;
104 if (!u
->memchunk
.memblock
) {
105 u
->memchunk
.memblock
= pa_memblock_new(u
->memchunk
.length
= u
->fragment_size
, u
->source
->core
->memblock_stat
);
106 u
->memchunk
.index
= 0;
109 assert(u
->memchunk
.memblock
&& u
->memchunk
.memblock
->data
&& u
->memchunk
.length
&& u
->memchunk
.memblock
->length
&& (u
->memchunk
.length
% u
->frame_size
) == 0);
111 if ((frames
= snd_pcm_readi(u
->pcm_handle
, (uint8_t*) u
->memchunk
.memblock
->data
+ u
->memchunk
.index
, u
->memchunk
.length
/ u
->frame_size
)) < 0) {
112 if (frames
== -EAGAIN
)
115 if (frames
== -EPIPE
) {
120 pa_log(__FILE__
": snd_pcm_readi() failed: %s\n", strerror(-frames
));
124 l
= frames
* u
->frame_size
;
126 post_memchunk
= u
->memchunk
;
127 post_memchunk
.length
= l
;
129 pa_source_post(u
->source
, &post_memchunk
);
131 u
->memchunk
.index
+= l
;
132 u
->memchunk
.length
-= l
;
134 if (u
->memchunk
.length
== 0) {
135 pa_memblock_unref(u
->memchunk
.memblock
);
136 u
->memchunk
.memblock
= NULL
;
137 u
->memchunk
.index
= u
->memchunk
.length
= 0;
144 static void io_callback(pa_mainloop_api
*a
, pa_io_event
*e
, PA_GCC_UNUSED
int fd
, PA_GCC_UNUSED pa_io_event_flags_t f
, void *userdata
) {
145 struct userdata
*u
= userdata
;
148 if (snd_pcm_state(u
->pcm_handle
) == SND_PCM_STATE_XRUN
)
154 static pa_usec_t
source_get_latency_cb(pa_source
*s
) {
155 struct userdata
*u
= s
->userdata
;
156 snd_pcm_sframes_t frames
;
157 assert(s
&& u
&& u
->source
);
159 if (snd_pcm_delay(u
->pcm_handle
, &frames
) < 0) {
160 pa_log(__FILE__
": failed to get delay\n");
161 s
->get_latency
= NULL
;
165 return pa_bytes_to_usec(frames
* u
->frame_size
, &s
->sample_spec
);
168 int pa__init(pa_core
*c
, pa_module
*m
) {
169 pa_modargs
*ma
= NULL
;
171 struct userdata
*u
= NULL
;
174 unsigned periods
, fragsize
;
175 snd_pcm_uframes_t period_size
;
179 if (!(ma
= pa_modargs_new(m
->argument
, valid_modargs
))) {
180 pa_log(__FILE__
": failed to parse module arguments\n");
184 ss
= c
->default_sample_spec
;
185 if (pa_modargs_get_sample_spec(ma
, &ss
) < 0) {
186 pa_log(__FILE__
": failed to parse sample specification\n");
189 frame_size
= pa_frame_size(&ss
);
193 if (pa_modargs_get_value_u32(ma
, "fragments", &periods
) < 0 || pa_modargs_get_value_u32(ma
, "fragment_size", &fragsize
) < 0) {
194 pa_log(__FILE__
": failed to parse buffer metrics\n");
197 period_size
= fragsize
;
199 u
= pa_xmalloc0(sizeof(struct userdata
));
203 snd_config_update_free_global();
204 if ((err
= snd_pcm_open(&u
->pcm_handle
, dev
= pa_modargs_get_value(ma
, "device", DEFAULT_DEVICE
), SND_PCM_STREAM_CAPTURE
, SND_PCM_NONBLOCK
)) < 0) {
205 pa_log(__FILE__
": Error opening PCM device %s: %s\n", dev
, snd_strerror(err
));
209 if ((err
= pa_alsa_set_hw_params(u
->pcm_handle
, &ss
, &periods
, &period_size
)) < 0) {
210 pa_log(__FILE__
": Failed to set hardware parameters: %s\n", snd_strerror(err
));
214 u
->source
= pa_source_new(c
, __FILE__
, pa_modargs_get_value(ma
, "source_name", DEFAULT_SOURCE_NAME
), 0, &ss
, NULL
);
217 u
->source
->userdata
= u
;
218 u
->source
->get_latency
= source_get_latency_cb
;
219 pa_source_set_owner(u
->source
, m
);
220 u
->source
->description
= pa_sprintf_malloc("Advanced Linux Sound Architecture PCM on '%s'", dev
);
222 if (pa_create_io_events(u
->pcm_handle
, c
->mainloop
, &u
->io_events
, &u
->n_io_events
, io_callback
, u
) < 0) {
223 pa_log(__FILE__
": failed to obtain file descriptors\n");
227 u
->frame_size
= frame_size
;
228 u
->fragment_size
= period_size
;
230 pa_log(__FILE__
": using %u fragments of size %u bytes.\n", periods
, u
->fragment_size
);
232 u
->memchunk
.memblock
= NULL
;
233 u
->memchunk
.index
= u
->memchunk
.length
= 0;
235 snd_pcm_start(u
->pcm_handle
);
253 void pa__done(pa_core
*c
, pa_module
*m
) {
257 if (!(u
= m
->userdata
))
261 pa_source_disconnect(u
->source
);
262 pa_source_unref(u
->source
);
266 pa_free_io_events(c
->mainloop
, u
->io_events
, u
->n_io_events
);
269 snd_pcm_drop(u
->pcm_handle
);
270 snd_pcm_close(u
->pcm_handle
);
273 if (u
->memchunk
.memblock
)
274 pa_memblock_unref(u
->memchunk
.memblock
);