blob: a79cc403cb7662ab9624719c46499a6e3537dca6 [file] [log] [blame]
bellard1d14ffa2005-10-30 18:58:22 +00001/*
2 * QEMU ALSA audio driver
3 *
4 * Copyright (c) 2005 Vassili Karpov (malc)
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
24#include <alsa/asoundlib.h>
pbrook749bc4b2007-11-17 17:35:54 +000025#include "qemu-common.h"
26#include "audio.h"
bellard1d14ffa2005-10-30 18:58:22 +000027
28#define AUDIO_CAP "alsa"
29#include "audio_int.h"
30
31typedef struct ALSAVoiceOut {
32 HWVoiceOut hw;
33 void *pcm_buf;
34 snd_pcm_t *handle;
bellard1d14ffa2005-10-30 18:58:22 +000035} ALSAVoiceOut;
36
37typedef struct ALSAVoiceIn {
38 HWVoiceIn hw;
39 snd_pcm_t *handle;
40 void *pcm_buf;
bellard1d14ffa2005-10-30 18:58:22 +000041} ALSAVoiceIn;
42
43static struct {
44 int size_in_usec_in;
45 int size_in_usec_out;
46 const char *pcm_name_in;
47 const char *pcm_name_out;
48 unsigned int buffer_size_in;
49 unsigned int period_size_in;
50 unsigned int buffer_size_out;
51 unsigned int period_size_out;
52 unsigned int threshold;
53
thsfe8f0962007-07-12 10:59:21 +000054 int buffer_size_in_overridden;
55 int period_size_in_overridden;
bellard1d14ffa2005-10-30 18:58:22 +000056
thsfe8f0962007-07-12 10:59:21 +000057 int buffer_size_out_overridden;
58 int period_size_out_overridden;
bellard571ec3d2005-11-20 16:24:34 +000059 int verbose;
bellard1d14ffa2005-10-30 18:58:22 +000060} conf = {
malcadf7d8f2008-07-09 19:25:30 +000061 .buffer_size_out = 1024,
bellard8ead62c2006-07-04 16:51:32 +000062 .pcm_name_out = "default",
63 .pcm_name_in = "default",
bellard1d14ffa2005-10-30 18:58:22 +000064};
65
66struct alsa_params_req {
balrogca9cc282008-01-14 04:24:29 +000067 int freq;
68 snd_pcm_format_t fmt;
69 int nchannels;
malc7a24c802008-06-21 17:14:57 +000070 int size_in_usec;
malc64333892008-07-09 19:25:28 +000071 int override_mask;
bellard1d14ffa2005-10-30 18:58:22 +000072 unsigned int buffer_size;
73 unsigned int period_size;
74};
75
76struct alsa_params_obt {
77 int freq;
78 audfmt_e fmt;
balrogca9cc282008-01-14 04:24:29 +000079 int endianness;
bellard1d14ffa2005-10-30 18:58:22 +000080 int nchannels;
bellardc0fe3822005-11-05 18:55:28 +000081 snd_pcm_uframes_t samples;
bellard1d14ffa2005-10-30 18:58:22 +000082};
83
84static void GCC_FMT_ATTR (2, 3) alsa_logerr (int err, const char *fmt, ...)
85{
86 va_list ap;
87
88 va_start (ap, fmt);
89 AUD_vlog (AUDIO_CAP, fmt, ap);
90 va_end (ap);
91
92 AUD_log (AUDIO_CAP, "Reason: %s\n", snd_strerror (err));
93}
94
95static void GCC_FMT_ATTR (3, 4) alsa_logerr2 (
96 int err,
97 const char *typ,
98 const char *fmt,
99 ...
100 )
101{
102 va_list ap;
103
bellardc0fe3822005-11-05 18:55:28 +0000104 AUD_log (AUDIO_CAP, "Could not initialize %s\n", typ);
bellard1d14ffa2005-10-30 18:58:22 +0000105
106 va_start (ap, fmt);
107 AUD_vlog (AUDIO_CAP, fmt, ap);
108 va_end (ap);
109
110 AUD_log (AUDIO_CAP, "Reason: %s\n", snd_strerror (err));
111}
112
113static void alsa_anal_close (snd_pcm_t **handlep)
114{
115 int err = snd_pcm_close (*handlep);
116 if (err) {
117 alsa_logerr (err, "Failed to close PCM handle %p\n", *handlep);
118 }
119 *handlep = NULL;
120}
121
122static int alsa_write (SWVoiceOut *sw, void *buf, int len)
123{
124 return audio_pcm_sw_write (sw, buf, len);
125}
126
balrogca9cc282008-01-14 04:24:29 +0000127static snd_pcm_format_t aud_to_alsafmt (audfmt_e fmt)
bellard1d14ffa2005-10-30 18:58:22 +0000128{
129 switch (fmt) {
130 case AUD_FMT_S8:
131 return SND_PCM_FORMAT_S8;
132
133 case AUD_FMT_U8:
134 return SND_PCM_FORMAT_U8;
135
136 case AUD_FMT_S16:
137 return SND_PCM_FORMAT_S16_LE;
138
139 case AUD_FMT_U16:
140 return SND_PCM_FORMAT_U16_LE;
141
thsf941aa22007-02-17 22:19:29 +0000142 case AUD_FMT_S32:
143 return SND_PCM_FORMAT_S32_LE;
144
145 case AUD_FMT_U32:
146 return SND_PCM_FORMAT_U32_LE;
147
bellard1d14ffa2005-10-30 18:58:22 +0000148 default:
149 dolog ("Internal logic error: Bad audio format %d\n", fmt);
150#ifdef DEBUG_AUDIO
151 abort ();
152#endif
153 return SND_PCM_FORMAT_U8;
154 }
155}
156
balrogca9cc282008-01-14 04:24:29 +0000157static int alsa_to_audfmt (snd_pcm_format_t alsafmt, audfmt_e *fmt,
158 int *endianness)
bellard1d14ffa2005-10-30 18:58:22 +0000159{
160 switch (alsafmt) {
161 case SND_PCM_FORMAT_S8:
162 *endianness = 0;
163 *fmt = AUD_FMT_S8;
164 break;
165
166 case SND_PCM_FORMAT_U8:
167 *endianness = 0;
168 *fmt = AUD_FMT_U8;
169 break;
170
171 case SND_PCM_FORMAT_S16_LE:
172 *endianness = 0;
173 *fmt = AUD_FMT_S16;
174 break;
175
176 case SND_PCM_FORMAT_U16_LE:
177 *endianness = 0;
178 *fmt = AUD_FMT_U16;
179 break;
180
181 case SND_PCM_FORMAT_S16_BE:
182 *endianness = 1;
183 *fmt = AUD_FMT_S16;
184 break;
185
186 case SND_PCM_FORMAT_U16_BE:
187 *endianness = 1;
188 *fmt = AUD_FMT_U16;
189 break;
190
thsf941aa22007-02-17 22:19:29 +0000191 case SND_PCM_FORMAT_S32_LE:
192 *endianness = 0;
193 *fmt = AUD_FMT_S32;
194 break;
195
196 case SND_PCM_FORMAT_U32_LE:
197 *endianness = 0;
198 *fmt = AUD_FMT_U32;
199 break;
200
201 case SND_PCM_FORMAT_S32_BE:
202 *endianness = 1;
203 *fmt = AUD_FMT_S32;
204 break;
205
206 case SND_PCM_FORMAT_U32_BE:
207 *endianness = 1;
208 *fmt = AUD_FMT_U32;
209 break;
210
bellard1d14ffa2005-10-30 18:58:22 +0000211 default:
212 dolog ("Unrecognized audio format %d\n", alsafmt);
213 return -1;
214 }
215
216 return 0;
217}
218
bellard1d14ffa2005-10-30 18:58:22 +0000219static void alsa_dump_info (struct alsa_params_req *req,
220 struct alsa_params_obt *obt)
221{
222 dolog ("parameter | requested value | obtained value\n");
223 dolog ("format | %10d | %10d\n", req->fmt, obt->fmt);
224 dolog ("channels | %10d | %10d\n",
225 req->nchannels, obt->nchannels);
226 dolog ("frequency | %10d | %10d\n", req->freq, obt->freq);
227 dolog ("============================================\n");
228 dolog ("requested: buffer size %d period size %d\n",
229 req->buffer_size, req->period_size);
bellardc0fe3822005-11-05 18:55:28 +0000230 dolog ("obtained: samples %ld\n", obt->samples);
bellard1d14ffa2005-10-30 18:58:22 +0000231}
bellard1d14ffa2005-10-30 18:58:22 +0000232
233static void alsa_set_threshold (snd_pcm_t *handle, snd_pcm_uframes_t threshold)
234{
235 int err;
236 snd_pcm_sw_params_t *sw_params;
237
238 snd_pcm_sw_params_alloca (&sw_params);
239
240 err = snd_pcm_sw_params_current (handle, sw_params);
241 if (err < 0) {
bellardc0fe3822005-11-05 18:55:28 +0000242 dolog ("Could not fully initialize DAC\n");
bellard1d14ffa2005-10-30 18:58:22 +0000243 alsa_logerr (err, "Failed to get current software parameters\n");
244 return;
245 }
246
247 err = snd_pcm_sw_params_set_start_threshold (handle, sw_params, threshold);
248 if (err < 0) {
bellardc0fe3822005-11-05 18:55:28 +0000249 dolog ("Could not fully initialize DAC\n");
bellard1d14ffa2005-10-30 18:58:22 +0000250 alsa_logerr (err, "Failed to set software threshold to %ld\n",
251 threshold);
252 return;
253 }
254
255 err = snd_pcm_sw_params (handle, sw_params);
256 if (err < 0) {
bellardc0fe3822005-11-05 18:55:28 +0000257 dolog ("Could not fully initialize DAC\n");
bellard1d14ffa2005-10-30 18:58:22 +0000258 alsa_logerr (err, "Failed to set software parameters\n");
259 return;
260 }
261}
262
263static int alsa_open (int in, struct alsa_params_req *req,
264 struct alsa_params_obt *obt, snd_pcm_t **handlep)
265{
266 snd_pcm_t *handle;
267 snd_pcm_hw_params_t *hw_params;
ths60fe76f2007-12-16 03:02:09 +0000268 int err;
malc7a24c802008-06-21 17:14:57 +0000269 int size_in_usec;
ths60fe76f2007-12-16 03:02:09 +0000270 unsigned int freq, nchannels;
bellard1d14ffa2005-10-30 18:58:22 +0000271 const char *pcm_name = in ? conf.pcm_name_in : conf.pcm_name_out;
bellard1d14ffa2005-10-30 18:58:22 +0000272 snd_pcm_uframes_t obt_buffer_size;
273 const char *typ = in ? "ADC" : "DAC";
balrogca9cc282008-01-14 04:24:29 +0000274 snd_pcm_format_t obtfmt;
bellard1d14ffa2005-10-30 18:58:22 +0000275
276 freq = req->freq;
bellard1d14ffa2005-10-30 18:58:22 +0000277 nchannels = req->nchannels;
malc7a24c802008-06-21 17:14:57 +0000278 size_in_usec = req->size_in_usec;
bellard1d14ffa2005-10-30 18:58:22 +0000279
280 snd_pcm_hw_params_alloca (&hw_params);
281
282 err = snd_pcm_open (
283 &handle,
284 pcm_name,
285 in ? SND_PCM_STREAM_CAPTURE : SND_PCM_STREAM_PLAYBACK,
286 SND_PCM_NONBLOCK
287 );
288 if (err < 0) {
289 alsa_logerr2 (err, typ, "Failed to open `%s':\n", pcm_name);
290 return -1;
291 }
292
293 err = snd_pcm_hw_params_any (handle, hw_params);
294 if (err < 0) {
295 alsa_logerr2 (err, typ, "Failed to initialize hardware parameters\n");
296 goto err;
297 }
298
299 err = snd_pcm_hw_params_set_access (
300 handle,
301 hw_params,
302 SND_PCM_ACCESS_RW_INTERLEAVED
303 );
304 if (err < 0) {
305 alsa_logerr2 (err, typ, "Failed to set access type\n");
306 goto err;
307 }
308
309 err = snd_pcm_hw_params_set_format (handle, hw_params, req->fmt);
balrogca9cc282008-01-14 04:24:29 +0000310 if (err < 0 && conf.verbose) {
bellard1d14ffa2005-10-30 18:58:22 +0000311 alsa_logerr2 (err, typ, "Failed to set format %d\n", req->fmt);
bellard1d14ffa2005-10-30 18:58:22 +0000312 }
313
314 err = snd_pcm_hw_params_set_rate_near (handle, hw_params, &freq, 0);
315 if (err < 0) {
316 alsa_logerr2 (err, typ, "Failed to set frequency %d\n", req->freq);
317 goto err;
318 }
319
320 err = snd_pcm_hw_params_set_channels_near (
321 handle,
322 hw_params,
323 &nchannels
324 );
325 if (err < 0) {
326 alsa_logerr2 (err, typ, "Failed to set number of channels %d\n",
327 req->nchannels);
328 goto err;
329 }
330
331 if (nchannels != 1 && nchannels != 2) {
332 alsa_logerr2 (err, typ,
333 "Can not handle obtained number of channels %d\n",
334 nchannels);
335 goto err;
336 }
337
malc7a24c802008-06-21 17:14:57 +0000338 if (req->buffer_size) {
malcf3b52982008-06-21 20:09:32 +0000339 unsigned long obt;
340
malc7a24c802008-06-21 17:14:57 +0000341 if (size_in_usec) {
342 int dir = 0;
343 unsigned int btime = req->buffer_size;
bellard1d14ffa2005-10-30 18:58:22 +0000344
345 err = snd_pcm_hw_params_set_buffer_time_near (
346 handle,
347 hw_params,
malc7a24c802008-06-21 17:14:57 +0000348 &btime,
349 &dir
bellardc0fe3822005-11-05 18:55:28 +0000350 );
malcf3b52982008-06-21 20:09:32 +0000351 obt = btime;
bellard1d14ffa2005-10-30 18:58:22 +0000352 }
353 else {
malc7a24c802008-06-21 17:14:57 +0000354 snd_pcm_uframes_t bsize = req->buffer_size;
bellard1d14ffa2005-10-30 18:58:22 +0000355
malc7a24c802008-06-21 17:14:57 +0000356 err = snd_pcm_hw_params_set_buffer_size_near (
bellard1d14ffa2005-10-30 18:58:22 +0000357 handle,
358 hw_params,
malc7a24c802008-06-21 17:14:57 +0000359 &bsize
bellard1d14ffa2005-10-30 18:58:22 +0000360 );
malcf3b52982008-06-21 20:09:32 +0000361 obt = bsize;
malc7a24c802008-06-21 17:14:57 +0000362 }
363 if (err < 0) {
364 alsa_logerr2 (err, typ, "Failed to set buffer %s to %d\n",
365 size_in_usec ? "time" : "size", req->buffer_size);
366 goto err;
bellard1d14ffa2005-10-30 18:58:22 +0000367 }
malcf3b52982008-06-21 20:09:32 +0000368
malc64333892008-07-09 19:25:28 +0000369 if ((req->override_mask & 2) && (obt - req->buffer_size))
malcf3b52982008-06-21 20:09:32 +0000370 dolog ("Requested buffer %s %u was rejected, using %lu\n",
371 size_in_usec ? "time" : "size", req->buffer_size, obt);
bellard1d14ffa2005-10-30 18:58:22 +0000372 }
malc7a24c802008-06-21 17:14:57 +0000373
374 if (req->period_size) {
malcf3b52982008-06-21 20:09:32 +0000375 unsigned long obt;
376
malc7a24c802008-06-21 17:14:57 +0000377 if (size_in_usec) {
378 int dir = 0;
379 unsigned int ptime = req->period_size;
380
381 err = snd_pcm_hw_params_set_period_time_near (
382 handle,
383 hw_params,
384 &ptime,
385 &dir
386 );
malcf3b52982008-06-21 20:09:32 +0000387 obt = ptime;
malc7a24c802008-06-21 17:14:57 +0000388 }
389 else {
malca7bb29b2008-07-09 19:25:24 +0000390 int dir = 0;
malc7a24c802008-06-21 17:14:57 +0000391 snd_pcm_uframes_t psize = req->period_size;
392
malca7bb29b2008-07-09 19:25:24 +0000393 err = snd_pcm_hw_params_set_period_size_near (
malc7a24c802008-06-21 17:14:57 +0000394 handle,
395 hw_params,
malca7bb29b2008-07-09 19:25:24 +0000396 &psize,
397 &dir
malc7a24c802008-06-21 17:14:57 +0000398 );
malcf3b52982008-06-21 20:09:32 +0000399 obt = psize;
malc7a24c802008-06-21 17:14:57 +0000400 }
401
402 if (err < 0) {
403 alsa_logerr2 (err, typ, "Failed to set period %s to %d\n",
404 size_in_usec ? "time" : "size", req->period_size);
405 goto err;
406 }
malcf3b52982008-06-21 20:09:32 +0000407
malc64333892008-07-09 19:25:28 +0000408 if ((req->override_mask & 1) && (obt - req->period_size))
malcf3b52982008-06-21 20:09:32 +0000409 dolog ("Requested period %s %u was rejected, using %lu\n",
410 size_in_usec ? "time" : "size", req->period_size, obt);
bellard1d14ffa2005-10-30 18:58:22 +0000411 }
412
413 err = snd_pcm_hw_params (handle, hw_params);
414 if (err < 0) {
415 alsa_logerr2 (err, typ, "Failed to apply audio parameters\n");
416 goto err;
417 }
418
419 err = snd_pcm_hw_params_get_buffer_size (hw_params, &obt_buffer_size);
420 if (err < 0) {
421 alsa_logerr2 (err, typ, "Failed to get buffer size\n");
422 goto err;
423 }
424
balrogca9cc282008-01-14 04:24:29 +0000425 err = snd_pcm_hw_params_get_format (hw_params, &obtfmt);
426 if (err < 0) {
427 alsa_logerr2 (err, typ, "Failed to get format\n");
428 goto err;
429 }
430
431 if (alsa_to_audfmt (obtfmt, &obt->fmt, &obt->endianness)) {
432 dolog ("Invalid format was returned %d\n", obtfmt);
433 goto err;
434 }
435
bellard1d14ffa2005-10-30 18:58:22 +0000436 err = snd_pcm_prepare (handle);
437 if (err < 0) {
bellardc0fe3822005-11-05 18:55:28 +0000438 alsa_logerr2 (err, typ, "Could not prepare handle %p\n", handle);
bellard1d14ffa2005-10-30 18:58:22 +0000439 goto err;
440 }
441
bellard1d14ffa2005-10-30 18:58:22 +0000442 if (!in && conf.threshold) {
443 snd_pcm_uframes_t threshold;
444 int bytes_per_sec;
445
balrogca9cc282008-01-14 04:24:29 +0000446 bytes_per_sec = freq << (nchannels == 2);
447
448 switch (obt->fmt) {
449 case AUD_FMT_S8:
450 case AUD_FMT_U8:
451 break;
452
453 case AUD_FMT_S16:
454 case AUD_FMT_U16:
455 bytes_per_sec <<= 1;
456 break;
457
458 case AUD_FMT_S32:
459 case AUD_FMT_U32:
460 bytes_per_sec <<= 2;
461 break;
462 }
bellard1d14ffa2005-10-30 18:58:22 +0000463
464 threshold = (conf.threshold * bytes_per_sec) / 1000;
465 alsa_set_threshold (handle, threshold);
466 }
467
bellard1d14ffa2005-10-30 18:58:22 +0000468 obt->nchannels = nchannels;
469 obt->freq = freq;
bellardc0fe3822005-11-05 18:55:28 +0000470 obt->samples = obt_buffer_size;
balrogca9cc282008-01-14 04:24:29 +0000471
bellard1d14ffa2005-10-30 18:58:22 +0000472 *handlep = handle;
473
balrogca9cc282008-01-14 04:24:29 +0000474 if (conf.verbose &&
475 (obt->fmt != req->fmt ||
476 obt->nchannels != req->nchannels ||
477 obt->freq != req->freq)) {
478 dolog ("Audio paramters for %s\n", typ);
bellard1d14ffa2005-10-30 18:58:22 +0000479 alsa_dump_info (req, obt);
bellard1d14ffa2005-10-30 18:58:22 +0000480 }
481
482#ifdef DEBUG
483 alsa_dump_info (req, obt);
484#endif
485 return 0;
486
487 err:
488 alsa_anal_close (&handle);
489 return -1;
490}
491
492static int alsa_recover (snd_pcm_t *handle)
493{
494 int err = snd_pcm_prepare (handle);
495 if (err < 0) {
496 alsa_logerr (err, "Failed to prepare handle %p\n", handle);
497 return -1;
498 }
499 return 0;
500}
501
bellard571ec3d2005-11-20 16:24:34 +0000502static snd_pcm_sframes_t alsa_get_avail (snd_pcm_t *handle)
503{
504 snd_pcm_sframes_t avail;
505
506 avail = snd_pcm_avail_update (handle);
507 if (avail < 0) {
508 if (avail == -EPIPE) {
509 if (!alsa_recover (handle)) {
510 avail = snd_pcm_avail_update (handle);
511 }
512 }
513
514 if (avail < 0) {
515 alsa_logerr (avail,
516 "Could not obtain number of available frames\n");
517 return -1;
518 }
519 }
520
521 return avail;
522}
523
bellard1d14ffa2005-10-30 18:58:22 +0000524static int alsa_run_out (HWVoiceOut *hw)
525{
526 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
527 int rpos, live, decr;
528 int samples;
529 uint8_t *dst;
530 st_sample_t *src;
531 snd_pcm_sframes_t avail;
532
533 live = audio_pcm_hw_get_live_out (hw);
534 if (!live) {
535 return 0;
536 }
537
bellard571ec3d2005-11-20 16:24:34 +0000538 avail = alsa_get_avail (alsa->handle);
bellard1d14ffa2005-10-30 18:58:22 +0000539 if (avail < 0) {
bellard571ec3d2005-11-20 16:24:34 +0000540 dolog ("Could not get number of available playback frames\n");
bellard1d14ffa2005-10-30 18:58:22 +0000541 return 0;
542 }
543
bellard1d14ffa2005-10-30 18:58:22 +0000544 decr = audio_MIN (live, avail);
545 samples = decr;
546 rpos = hw->rpos;
547 while (samples) {
548 int left_till_end_samples = hw->samples - rpos;
bellard571ec3d2005-11-20 16:24:34 +0000549 int len = audio_MIN (samples, left_till_end_samples);
bellard1d14ffa2005-10-30 18:58:22 +0000550 snd_pcm_sframes_t written;
551
552 src = hw->mix_buf + rpos;
553 dst = advance (alsa->pcm_buf, rpos << hw->info.shift);
554
bellard571ec3d2005-11-20 16:24:34 +0000555 hw->clip (dst, src, len);
bellard1d14ffa2005-10-30 18:58:22 +0000556
bellard571ec3d2005-11-20 16:24:34 +0000557 while (len) {
558 written = snd_pcm_writei (alsa->handle, dst, len);
bellard1d14ffa2005-10-30 18:58:22 +0000559
bellard571ec3d2005-11-20 16:24:34 +0000560 if (written <= 0) {
bellard4787c712005-11-11 00:06:10 +0000561 switch (written) {
bellard571ec3d2005-11-20 16:24:34 +0000562 case 0:
563 if (conf.verbose) {
564 dolog ("Failed to write %d frames (wrote zero)\n", len);
bellard4787c712005-11-11 00:06:10 +0000565 }
bellard4787c712005-11-11 00:06:10 +0000566 goto exit;
567
bellard571ec3d2005-11-20 16:24:34 +0000568 case -EPIPE:
569 if (alsa_recover (alsa->handle)) {
570 alsa_logerr (written, "Failed to write %d frames\n",
571 len);
572 goto exit;
573 }
574 if (conf.verbose) {
575 dolog ("Recovering from playback xrun\n");
576 }
bellard4787c712005-11-11 00:06:10 +0000577 continue;
578
bellard571ec3d2005-11-20 16:24:34 +0000579 case -EAGAIN:
580 goto exit;
581
bellard4787c712005-11-11 00:06:10 +0000582 default:
583 alsa_logerr (written, "Failed to write %d frames to %p\n",
bellard571ec3d2005-11-20 16:24:34 +0000584 len, dst);
bellard4787c712005-11-11 00:06:10 +0000585 goto exit;
bellard1d14ffa2005-10-30 18:58:22 +0000586 }
bellard1d14ffa2005-10-30 18:58:22 +0000587 }
bellard1d14ffa2005-10-30 18:58:22 +0000588
bellard4787c712005-11-11 00:06:10 +0000589 rpos = (rpos + written) % hw->samples;
590 samples -= written;
bellard571ec3d2005-11-20 16:24:34 +0000591 len -= written;
bellard4787c712005-11-11 00:06:10 +0000592 dst = advance (dst, written << hw->info.shift);
593 src += written;
594 }
bellard1d14ffa2005-10-30 18:58:22 +0000595 }
596
597 exit:
598 hw->rpos = rpos;
599 return decr;
600}
601
602static void alsa_fini_out (HWVoiceOut *hw)
603{
604 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
605
606 ldebug ("alsa_fini\n");
607 alsa_anal_close (&alsa->handle);
608
609 if (alsa->pcm_buf) {
610 qemu_free (alsa->pcm_buf);
611 alsa->pcm_buf = NULL;
612 }
613}
614
bellardc0fe3822005-11-05 18:55:28 +0000615static int alsa_init_out (HWVoiceOut *hw, audsettings_t *as)
bellard1d14ffa2005-10-30 18:58:22 +0000616{
617 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
618 struct alsa_params_req req;
619 struct alsa_params_obt obt;
bellard1d14ffa2005-10-30 18:58:22 +0000620 snd_pcm_t *handle;
bellardc0fe3822005-11-05 18:55:28 +0000621 audsettings_t obt_as;
bellard1d14ffa2005-10-30 18:58:22 +0000622
bellardc0fe3822005-11-05 18:55:28 +0000623 req.fmt = aud_to_alsafmt (as->fmt);
624 req.freq = as->freq;
625 req.nchannels = as->nchannels;
bellard1d14ffa2005-10-30 18:58:22 +0000626 req.period_size = conf.period_size_out;
627 req.buffer_size = conf.buffer_size_out;
malc23fb6002008-07-03 11:29:15 +0000628 req.size_in_usec = conf.size_in_usec_out;
malc64333892008-07-09 19:25:28 +0000629 req.override_mask = !!conf.period_size_out_overridden
630 | (!!conf.buffer_size_out_overridden << 1);
bellard1d14ffa2005-10-30 18:58:22 +0000631
632 if (alsa_open (0, &req, &obt, &handle)) {
633 return -1;
634 }
635
bellardc0fe3822005-11-05 18:55:28 +0000636 obt_as.freq = obt.freq;
637 obt_as.nchannels = obt.nchannels;
balrogca9cc282008-01-14 04:24:29 +0000638 obt_as.fmt = obt.fmt;
639 obt_as.endianness = obt.endianness;
bellardc0fe3822005-11-05 18:55:28 +0000640
bellardd929eba2006-07-04 21:47:22 +0000641 audio_pcm_init_info (&hw->info, &obt_as);
bellardc0fe3822005-11-05 18:55:28 +0000642 hw->samples = obt.samples;
bellard1d14ffa2005-10-30 18:58:22 +0000643
bellardc0fe3822005-11-05 18:55:28 +0000644 alsa->pcm_buf = audio_calloc (AUDIO_FUNC, obt.samples, 1 << hw->info.shift);
bellard1d14ffa2005-10-30 18:58:22 +0000645 if (!alsa->pcm_buf) {
bellard4787c712005-11-11 00:06:10 +0000646 dolog ("Could not allocate DAC buffer (%d samples, each %d bytes)\n",
647 hw->samples, 1 << hw->info.shift);
bellard1d14ffa2005-10-30 18:58:22 +0000648 alsa_anal_close (&handle);
649 return -1;
650 }
651
652 alsa->handle = handle;
bellard571ec3d2005-11-20 16:24:34 +0000653 return 0;
654}
655
656static int alsa_voice_ctl (snd_pcm_t *handle, const char *typ, int pause)
657{
658 int err;
659
660 if (pause) {
661 err = snd_pcm_drop (handle);
662 if (err < 0) {
bellard32d448c2005-11-20 18:53:05 +0000663 alsa_logerr (err, "Could not stop %s\n", typ);
bellard571ec3d2005-11-20 16:24:34 +0000664 return -1;
665 }
666 }
667 else {
668 err = snd_pcm_prepare (handle);
669 if (err < 0) {
bellard32d448c2005-11-20 18:53:05 +0000670 alsa_logerr (err, "Could not prepare handle for %s\n", typ);
bellard571ec3d2005-11-20 16:24:34 +0000671 return -1;
672 }
673 }
674
bellard1d14ffa2005-10-30 18:58:22 +0000675 return 0;
676}
677
678static int alsa_ctl_out (HWVoiceOut *hw, int cmd, ...)
679{
bellard1d14ffa2005-10-30 18:58:22 +0000680 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
681
682 switch (cmd) {
683 case VOICE_ENABLE:
684 ldebug ("enabling voice\n");
bellard571ec3d2005-11-20 16:24:34 +0000685 return alsa_voice_ctl (alsa->handle, "playback", 0);
bellard1d14ffa2005-10-30 18:58:22 +0000686
687 case VOICE_DISABLE:
688 ldebug ("disabling voice\n");
bellard571ec3d2005-11-20 16:24:34 +0000689 return alsa_voice_ctl (alsa->handle, "playback", 1);
bellard1d14ffa2005-10-30 18:58:22 +0000690 }
bellard571ec3d2005-11-20 16:24:34 +0000691
692 return -1;
bellard1d14ffa2005-10-30 18:58:22 +0000693}
694
bellardc0fe3822005-11-05 18:55:28 +0000695static int alsa_init_in (HWVoiceIn *hw, audsettings_t *as)
bellard1d14ffa2005-10-30 18:58:22 +0000696{
697 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw;
698 struct alsa_params_req req;
699 struct alsa_params_obt obt;
bellard1d14ffa2005-10-30 18:58:22 +0000700 snd_pcm_t *handle;
bellardc0fe3822005-11-05 18:55:28 +0000701 audsettings_t obt_as;
bellard1d14ffa2005-10-30 18:58:22 +0000702
bellardc0fe3822005-11-05 18:55:28 +0000703 req.fmt = aud_to_alsafmt (as->fmt);
704 req.freq = as->freq;
705 req.nchannels = as->nchannels;
bellard1d14ffa2005-10-30 18:58:22 +0000706 req.period_size = conf.period_size_in;
707 req.buffer_size = conf.buffer_size_in;
malc7a24c802008-06-21 17:14:57 +0000708 req.size_in_usec = conf.size_in_usec_in;
malc64333892008-07-09 19:25:28 +0000709 req.override_mask = !!conf.period_size_in_overridden
710 | (!!conf.buffer_size_in_overridden << 1);
bellard1d14ffa2005-10-30 18:58:22 +0000711
712 if (alsa_open (1, &req, &obt, &handle)) {
713 return -1;
714 }
715
bellardc0fe3822005-11-05 18:55:28 +0000716 obt_as.freq = obt.freq;
717 obt_as.nchannels = obt.nchannels;
balrogca9cc282008-01-14 04:24:29 +0000718 obt_as.fmt = obt.fmt;
719 obt_as.endianness = obt.endianness;
bellardc0fe3822005-11-05 18:55:28 +0000720
bellardd929eba2006-07-04 21:47:22 +0000721 audio_pcm_init_info (&hw->info, &obt_as);
bellardc0fe3822005-11-05 18:55:28 +0000722 hw->samples = obt.samples;
723
724 alsa->pcm_buf = audio_calloc (AUDIO_FUNC, hw->samples, 1 << hw->info.shift);
bellard1d14ffa2005-10-30 18:58:22 +0000725 if (!alsa->pcm_buf) {
bellard4787c712005-11-11 00:06:10 +0000726 dolog ("Could not allocate ADC buffer (%d samples, each %d bytes)\n",
727 hw->samples, 1 << hw->info.shift);
bellard1d14ffa2005-10-30 18:58:22 +0000728 alsa_anal_close (&handle);
729 return -1;
730 }
731
732 alsa->handle = handle;
733 return 0;
734}
735
736static void alsa_fini_in (HWVoiceIn *hw)
737{
738 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw;
739
740 alsa_anal_close (&alsa->handle);
741
742 if (alsa->pcm_buf) {
743 qemu_free (alsa->pcm_buf);
744 alsa->pcm_buf = NULL;
745 }
746}
747
748static int alsa_run_in (HWVoiceIn *hw)
749{
750 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw;
751 int hwshift = hw->info.shift;
752 int i;
753 int live = audio_pcm_hw_get_live_in (hw);
754 int dead = hw->samples - live;
bellard571ec3d2005-11-20 16:24:34 +0000755 int decr;
bellard1d14ffa2005-10-30 18:58:22 +0000756 struct {
757 int add;
758 int len;
759 } bufs[2] = {
760 { hw->wpos, 0 },
761 { 0, 0 }
762 };
bellard571ec3d2005-11-20 16:24:34 +0000763 snd_pcm_sframes_t avail;
bellard1d14ffa2005-10-30 18:58:22 +0000764 snd_pcm_uframes_t read_samples = 0;
765
766 if (!dead) {
767 return 0;
768 }
769
bellard571ec3d2005-11-20 16:24:34 +0000770 avail = alsa_get_avail (alsa->handle);
771 if (avail < 0) {
772 dolog ("Could not get number of captured frames\n");
773 return 0;
bellard1d14ffa2005-10-30 18:58:22 +0000774 }
775
bellard571ec3d2005-11-20 16:24:34 +0000776 if (!avail && (snd_pcm_state (alsa->handle) == SND_PCM_STATE_PREPARED)) {
777 avail = hw->samples;
778 }
779
780 decr = audio_MIN (dead, avail);
781 if (!decr) {
782 return 0;
783 }
784
785 if (hw->wpos + decr > hw->samples) {
786 bufs[0].len = (hw->samples - hw->wpos);
787 bufs[1].len = (decr - (hw->samples - hw->wpos));
788 }
789 else {
790 bufs[0].len = decr;
791 }
bellard1d14ffa2005-10-30 18:58:22 +0000792
793 for (i = 0; i < 2; ++i) {
794 void *src;
795 st_sample_t *dst;
796 snd_pcm_sframes_t nread;
797 snd_pcm_uframes_t len;
798
799 len = bufs[i].len;
800
801 src = advance (alsa->pcm_buf, bufs[i].add << hwshift);
802 dst = hw->conv_buf + bufs[i].add;
803
804 while (len) {
805 nread = snd_pcm_readi (alsa->handle, src, len);
806
bellard571ec3d2005-11-20 16:24:34 +0000807 if (nread <= 0) {
bellard1d14ffa2005-10-30 18:58:22 +0000808 switch (nread) {
bellard571ec3d2005-11-20 16:24:34 +0000809 case 0:
810 if (conf.verbose) {
811 dolog ("Failed to read %ld frames (read zero)\n", len);
bellard1d14ffa2005-10-30 18:58:22 +0000812 }
bellard1d14ffa2005-10-30 18:58:22 +0000813 goto exit;
814
bellard571ec3d2005-11-20 16:24:34 +0000815 case -EPIPE:
816 if (alsa_recover (alsa->handle)) {
817 alsa_logerr (nread, "Failed to read %ld frames\n", len);
818 goto exit;
819 }
820 if (conf.verbose) {
821 dolog ("Recovering from capture xrun\n");
822 }
bellard1d14ffa2005-10-30 18:58:22 +0000823 continue;
824
bellard571ec3d2005-11-20 16:24:34 +0000825 case -EAGAIN:
826 goto exit;
827
bellard1d14ffa2005-10-30 18:58:22 +0000828 default:
829 alsa_logerr (
830 nread,
831 "Failed to read %ld frames from %p\n",
832 len,
833 src
834 );
835 goto exit;
836 }
837 }
838
839 hw->conv (dst, src, nread, &nominal_volume);
840
841 src = advance (src, nread << hwshift);
842 dst += nread;
843
844 read_samples += nread;
845 len -= nread;
846 }
847 }
848
849 exit:
850 hw->wpos = (hw->wpos + read_samples) % hw->samples;
851 return read_samples;
852}
853
854static int alsa_read (SWVoiceIn *sw, void *buf, int size)
855{
856 return audio_pcm_sw_read (sw, buf, size);
857}
858
859static int alsa_ctl_in (HWVoiceIn *hw, int cmd, ...)
860{
bellard571ec3d2005-11-20 16:24:34 +0000861 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw;
862
863 switch (cmd) {
864 case VOICE_ENABLE:
865 ldebug ("enabling voice\n");
866 return alsa_voice_ctl (alsa->handle, "capture", 0);
867
868 case VOICE_DISABLE:
869 ldebug ("disabling voice\n");
870 return alsa_voice_ctl (alsa->handle, "capture", 1);
871 }
872
873 return -1;
bellard1d14ffa2005-10-30 18:58:22 +0000874}
875
876static void *alsa_audio_init (void)
877{
878 return &conf;
879}
880
881static void alsa_audio_fini (void *opaque)
882{
883 (void) opaque;
884}
885
886static struct audio_option alsa_options[] = {
887 {"DAC_SIZE_IN_USEC", AUD_OPT_BOOL, &conf.size_in_usec_out,
888 "DAC period/buffer size in microseconds (otherwise in frames)", NULL, 0},
889 {"DAC_PERIOD_SIZE", AUD_OPT_INT, &conf.period_size_out,
malc7a24c802008-06-21 17:14:57 +0000890 "DAC period size (0 to go with system default)",
891 &conf.period_size_out_overridden, 0},
bellard1d14ffa2005-10-30 18:58:22 +0000892 {"DAC_BUFFER_SIZE", AUD_OPT_INT, &conf.buffer_size_out,
malc7a24c802008-06-21 17:14:57 +0000893 "DAC buffer size (0 to go with system default)",
894 &conf.buffer_size_out_overridden, 0},
bellard1d14ffa2005-10-30 18:58:22 +0000895
896 {"ADC_SIZE_IN_USEC", AUD_OPT_BOOL, &conf.size_in_usec_in,
897 "ADC period/buffer size in microseconds (otherwise in frames)", NULL, 0},
898 {"ADC_PERIOD_SIZE", AUD_OPT_INT, &conf.period_size_in,
malc7a24c802008-06-21 17:14:57 +0000899 "ADC period size (0 to go with system default)",
900 &conf.period_size_in_overridden, 0},
bellard1d14ffa2005-10-30 18:58:22 +0000901 {"ADC_BUFFER_SIZE", AUD_OPT_INT, &conf.buffer_size_in,
malc7a24c802008-06-21 17:14:57 +0000902 "ADC buffer size (0 to go with system default)",
903 &conf.buffer_size_in_overridden, 0},
bellard1d14ffa2005-10-30 18:58:22 +0000904
905 {"THRESHOLD", AUD_OPT_INT, &conf.threshold,
906 "(undocumented)", NULL, 0},
907
908 {"DAC_DEV", AUD_OPT_STR, &conf.pcm_name_out,
909 "DAC device name (for instance dmix)", NULL, 0},
910
911 {"ADC_DEV", AUD_OPT_STR, &conf.pcm_name_in,
912 "ADC device name", NULL, 0},
bellard571ec3d2005-11-20 16:24:34 +0000913
914 {"VERBOSE", AUD_OPT_BOOL, &conf.verbose,
915 "Behave in a more verbose way", NULL, 0},
916
bellard1d14ffa2005-10-30 18:58:22 +0000917 {NULL, 0, NULL, NULL, NULL, 0}
918};
919
920static struct audio_pcm_ops alsa_pcm_ops = {
921 alsa_init_out,
922 alsa_fini_out,
923 alsa_run_out,
924 alsa_write,
925 alsa_ctl_out,
926
927 alsa_init_in,
928 alsa_fini_in,
929 alsa_run_in,
930 alsa_read,
931 alsa_ctl_in
932};
933
934struct audio_driver alsa_audio_driver = {
935 INIT_FIELD (name = ) "alsa",
936 INIT_FIELD (descr = ) "ALSA http://www.alsa-project.org",
937 INIT_FIELD (options = ) alsa_options,
938 INIT_FIELD (init = ) alsa_audio_init,
939 INIT_FIELD (fini = ) alsa_audio_fini,
940 INIT_FIELD (pcm_ops = ) &alsa_pcm_ops,
941 INIT_FIELD (can_be_default = ) 1,
942 INIT_FIELD (max_voices_out = ) INT_MAX,
943 INIT_FIELD (max_voices_in = ) INT_MAX,
944 INIT_FIELD (voice_size_out = ) sizeof (ALSAVoiceOut),
945 INIT_FIELD (voice_size_in = ) sizeof (ALSAVoiceIn)
946};