xref: /openbmc/qemu/audio/paaudio.c (revision c5a58398)
1 /* public domain */
2 
3 #include "qemu/osdep.h"
4 #include "qemu/module.h"
5 #include "qemu-common.h"
6 #include "audio.h"
7 #include "qapi/opts-visitor.h"
8 
9 #include <pulse/pulseaudio.h>
10 
11 #define AUDIO_CAP "pulseaudio"
12 #include "audio_int.h"
13 
14 typedef struct PAConnection {
15     char *server;
16     int refcount;
17     QTAILQ_ENTRY(PAConnection) list;
18 
19     pa_threaded_mainloop *mainloop;
20     pa_context *context;
21 } PAConnection;
22 
23 static QTAILQ_HEAD(PAConnectionHead, PAConnection) pa_conns =
24     QTAILQ_HEAD_INITIALIZER(pa_conns);
25 
26 typedef struct {
27     Audiodev *dev;
28     PAConnection *conn;
29 } paaudio;
30 
31 typedef struct {
32     HWVoiceOut hw;
33     pa_stream *stream;
34     paaudio *g;
35 } PAVoiceOut;
36 
37 typedef struct {
38     HWVoiceIn hw;
39     pa_stream *stream;
40     const void *read_data;
41     size_t read_length;
42     paaudio *g;
43 } PAVoiceIn;
44 
45 static void qpa_conn_fini(PAConnection *c);
46 
47 static void GCC_FMT_ATTR (2, 3) qpa_logerr (int err, const char *fmt, ...)
48 {
49     va_list ap;
50 
51     va_start (ap, fmt);
52     AUD_vlog (AUDIO_CAP, fmt, ap);
53     va_end (ap);
54 
55     AUD_log (AUDIO_CAP, "Reason: %s\n", pa_strerror (err));
56 }
57 
58 #ifndef PA_CONTEXT_IS_GOOD
59 static inline int PA_CONTEXT_IS_GOOD(pa_context_state_t x)
60 {
61     return
62         x == PA_CONTEXT_CONNECTING ||
63         x == PA_CONTEXT_AUTHORIZING ||
64         x == PA_CONTEXT_SETTING_NAME ||
65         x == PA_CONTEXT_READY;
66 }
67 #endif
68 
69 #ifndef PA_STREAM_IS_GOOD
70 static inline int PA_STREAM_IS_GOOD(pa_stream_state_t x)
71 {
72     return
73         x == PA_STREAM_CREATING ||
74         x == PA_STREAM_READY;
75 }
76 #endif
77 
78 #define CHECK_SUCCESS_GOTO(c, expression, label, msg)           \
79     do {                                                        \
80         if (!(expression)) {                                    \
81             qpa_logerr(pa_context_errno((c)->context), msg);    \
82             goto label;                                         \
83         }                                                       \
84     } while (0)
85 
86 #define CHECK_DEAD_GOTO(c, stream, label, msg)                          \
87     do {                                                                \
88         if (!(c)->context || !PA_CONTEXT_IS_GOOD (pa_context_get_state((c)->context)) || \
89             !(stream) || !PA_STREAM_IS_GOOD (pa_stream_get_state ((stream)))) { \
90             if (((c)->context && pa_context_get_state ((c)->context) == PA_CONTEXT_FAILED) || \
91                 ((stream) && pa_stream_get_state ((stream)) == PA_STREAM_FAILED)) { \
92                 qpa_logerr(pa_context_errno((c)->context), msg);        \
93             } else {                                                    \
94                 qpa_logerr(PA_ERR_BADSTATE, msg);                       \
95             }                                                           \
96             goto label;                                                 \
97         }                                                               \
98     } while (0)
99 
100 static void *qpa_get_buffer_in(HWVoiceIn *hw, size_t *size)
101 {
102     PAVoiceIn *p = (PAVoiceIn *) hw;
103     PAConnection *c = p->g->conn;
104     int r;
105 
106     pa_threaded_mainloop_lock(c->mainloop);
107 
108     CHECK_DEAD_GOTO(c, p->stream, unlock_and_fail,
109                     "pa_threaded_mainloop_lock failed\n");
110 
111     if (!p->read_length) {
112         r = pa_stream_peek(p->stream, &p->read_data, &p->read_length);
113         CHECK_SUCCESS_GOTO(c, r == 0, unlock_and_fail,
114                            "pa_stream_peek failed\n");
115     }
116 
117     *size = MIN(p->read_length, *size);
118 
119     pa_threaded_mainloop_unlock(c->mainloop);
120     return (void *) p->read_data;
121 
122 unlock_and_fail:
123     pa_threaded_mainloop_unlock(c->mainloop);
124     *size = 0;
125     return NULL;
126 }
127 
128 static void qpa_put_buffer_in(HWVoiceIn *hw, void *buf, size_t size)
129 {
130     PAVoiceIn *p = (PAVoiceIn *) hw;
131     PAConnection *c = p->g->conn;
132     int r;
133 
134     pa_threaded_mainloop_lock(c->mainloop);
135 
136     CHECK_DEAD_GOTO(c, p->stream, unlock,
137                     "pa_threaded_mainloop_lock failed\n");
138 
139     assert(buf == p->read_data && size <= p->read_length);
140 
141     p->read_data += size;
142     p->read_length -= size;
143 
144     if (size && !p->read_length) {
145         r = pa_stream_drop(p->stream);
146         CHECK_SUCCESS_GOTO(c, r == 0, unlock, "pa_stream_drop failed\n");
147     }
148 
149 unlock:
150     pa_threaded_mainloop_unlock(c->mainloop);
151 }
152 
153 static size_t qpa_read(HWVoiceIn *hw, void *data, size_t length)
154 {
155     PAVoiceIn *p = (PAVoiceIn *) hw;
156     PAConnection *c = p->g->conn;
157     size_t total = 0;
158 
159     pa_threaded_mainloop_lock(c->mainloop);
160 
161     CHECK_DEAD_GOTO(c, p->stream, unlock_and_fail,
162                     "pa_threaded_mainloop_lock failed\n");
163     if (pa_stream_get_state(p->stream) != PA_STREAM_READY) {
164         /* wait for stream to become ready */
165         goto unlock;
166     }
167 
168     while (total < length) {
169         size_t l;
170         int r;
171 
172         if (!p->read_length) {
173             r = pa_stream_peek(p->stream, &p->read_data, &p->read_length);
174             CHECK_SUCCESS_GOTO(c, r == 0, unlock_and_fail,
175                                "pa_stream_peek failed\n");
176             if (!p->read_length) {
177                 /* buffer is empty */
178                 break;
179             }
180         }
181 
182         l = MIN(p->read_length, length - total);
183         memcpy((char *)data + total, p->read_data, l);
184 
185         p->read_data += l;
186         p->read_length -= l;
187         total += l;
188 
189         if (!p->read_length) {
190             r = pa_stream_drop(p->stream);
191             CHECK_SUCCESS_GOTO(c, r == 0, unlock_and_fail,
192                                "pa_stream_drop failed\n");
193         }
194     }
195 
196 unlock:
197     pa_threaded_mainloop_unlock(c->mainloop);
198     return total;
199 
200 unlock_and_fail:
201     pa_threaded_mainloop_unlock(c->mainloop);
202     return 0;
203 }
204 
205 static void *qpa_get_buffer_out(HWVoiceOut *hw, size_t *size)
206 {
207     PAVoiceOut *p = (PAVoiceOut *) hw;
208     PAConnection *c = p->g->conn;
209     void *ret;
210     int r;
211 
212     pa_threaded_mainloop_lock(c->mainloop);
213 
214     CHECK_DEAD_GOTO(c, p->stream, unlock_and_fail,
215                     "pa_threaded_mainloop_lock failed\n");
216 
217     *size = -1;
218     r = pa_stream_begin_write(p->stream, &ret, size);
219     CHECK_SUCCESS_GOTO(c, r >= 0, unlock_and_fail,
220                        "pa_stream_begin_write failed\n");
221 
222     pa_threaded_mainloop_unlock(c->mainloop);
223     return ret;
224 
225 unlock_and_fail:
226     pa_threaded_mainloop_unlock(c->mainloop);
227     *size = 0;
228     return NULL;
229 }
230 
231 static size_t qpa_write(HWVoiceOut *hw, void *data, size_t length)
232 {
233     PAVoiceOut *p = (PAVoiceOut *) hw;
234     PAConnection *c = p->g->conn;
235     size_t l;
236     int r;
237 
238     pa_threaded_mainloop_lock(c->mainloop);
239 
240     CHECK_DEAD_GOTO(c, p->stream, unlock_and_fail,
241                     "pa_threaded_mainloop_lock failed\n");
242 
243     l = pa_stream_writable_size(p->stream);
244 
245     CHECK_SUCCESS_GOTO(c, l != (size_t) -1, unlock_and_fail,
246                        "pa_stream_writable_size failed\n");
247 
248     if (l > length) {
249         l = length;
250     }
251 
252     r = pa_stream_write(p->stream, data, l, NULL, 0LL, PA_SEEK_RELATIVE);
253     CHECK_SUCCESS_GOTO(c, r >= 0, unlock_and_fail, "pa_stream_write failed\n");
254 
255     pa_threaded_mainloop_unlock(c->mainloop);
256     return l;
257 
258 unlock_and_fail:
259     pa_threaded_mainloop_unlock(c->mainloop);
260     return 0;
261 }
262 
263 static pa_sample_format_t audfmt_to_pa (AudioFormat afmt, int endianness)
264 {
265     int format;
266 
267     switch (afmt) {
268     case AUDIO_FORMAT_S8:
269     case AUDIO_FORMAT_U8:
270         format = PA_SAMPLE_U8;
271         break;
272     case AUDIO_FORMAT_S16:
273     case AUDIO_FORMAT_U16:
274         format = endianness ? PA_SAMPLE_S16BE : PA_SAMPLE_S16LE;
275         break;
276     case AUDIO_FORMAT_S32:
277     case AUDIO_FORMAT_U32:
278         format = endianness ? PA_SAMPLE_S32BE : PA_SAMPLE_S32LE;
279         break;
280     case AUDIO_FORMAT_F32:
281         format = endianness ? PA_SAMPLE_FLOAT32BE : PA_SAMPLE_FLOAT32LE;
282         break;
283     default:
284         dolog ("Internal logic error: Bad audio format %d\n", afmt);
285         format = PA_SAMPLE_U8;
286         break;
287     }
288     return format;
289 }
290 
291 static AudioFormat pa_to_audfmt (pa_sample_format_t fmt, int *endianness)
292 {
293     switch (fmt) {
294     case PA_SAMPLE_U8:
295         return AUDIO_FORMAT_U8;
296     case PA_SAMPLE_S16BE:
297         *endianness = 1;
298         return AUDIO_FORMAT_S16;
299     case PA_SAMPLE_S16LE:
300         *endianness = 0;
301         return AUDIO_FORMAT_S16;
302     case PA_SAMPLE_S32BE:
303         *endianness = 1;
304         return AUDIO_FORMAT_S32;
305     case PA_SAMPLE_S32LE:
306         *endianness = 0;
307         return AUDIO_FORMAT_S32;
308     case PA_SAMPLE_FLOAT32BE:
309         *endianness = 1;
310         return AUDIO_FORMAT_F32;
311     case PA_SAMPLE_FLOAT32LE:
312         *endianness = 0;
313         return AUDIO_FORMAT_F32;
314     default:
315         dolog ("Internal logic error: Bad pa_sample_format %d\n", fmt);
316         return AUDIO_FORMAT_U8;
317     }
318 }
319 
320 static void context_state_cb (pa_context *c, void *userdata)
321 {
322     PAConnection *conn = userdata;
323 
324     switch (pa_context_get_state(c)) {
325     case PA_CONTEXT_READY:
326     case PA_CONTEXT_TERMINATED:
327     case PA_CONTEXT_FAILED:
328         pa_threaded_mainloop_signal(conn->mainloop, 0);
329         break;
330 
331     case PA_CONTEXT_UNCONNECTED:
332     case PA_CONTEXT_CONNECTING:
333     case PA_CONTEXT_AUTHORIZING:
334     case PA_CONTEXT_SETTING_NAME:
335         break;
336     }
337 }
338 
339 static void stream_state_cb (pa_stream *s, void * userdata)
340 {
341     PAConnection *c = userdata;
342 
343     switch (pa_stream_get_state (s)) {
344 
345     case PA_STREAM_READY:
346     case PA_STREAM_FAILED:
347     case PA_STREAM_TERMINATED:
348         pa_threaded_mainloop_signal(c->mainloop, 0);
349         break;
350 
351     case PA_STREAM_UNCONNECTED:
352     case PA_STREAM_CREATING:
353         break;
354     }
355 }
356 
357 static pa_stream *qpa_simple_new (
358         PAConnection *c,
359         const char *name,
360         pa_stream_direction_t dir,
361         const char *dev,
362         const pa_sample_spec *ss,
363         const pa_buffer_attr *attr,
364         int *rerror)
365 {
366     int r;
367     pa_stream *stream = NULL;
368     pa_stream_flags_t flags;
369     pa_channel_map map;
370 
371     pa_threaded_mainloop_lock(c->mainloop);
372 
373     pa_channel_map_init(&map);
374     map.channels = ss->channels;
375 
376     /*
377      * TODO: This currently expects the only frontend supporting more than 2
378      * channels is the usb-audio.  We will need some means to set channel
379      * order when a new frontend gains multi-channel support.
380      */
381     switch (ss->channels) {
382     case 1:
383         map.map[0] = PA_CHANNEL_POSITION_MONO;
384         break;
385 
386     case 2:
387         map.map[0] = PA_CHANNEL_POSITION_LEFT;
388         map.map[1] = PA_CHANNEL_POSITION_RIGHT;
389         break;
390 
391     case 6:
392         map.map[0] = PA_CHANNEL_POSITION_FRONT_LEFT;
393         map.map[1] = PA_CHANNEL_POSITION_FRONT_RIGHT;
394         map.map[2] = PA_CHANNEL_POSITION_CENTER;
395         map.map[3] = PA_CHANNEL_POSITION_LFE;
396         map.map[4] = PA_CHANNEL_POSITION_REAR_LEFT;
397         map.map[5] = PA_CHANNEL_POSITION_REAR_RIGHT;
398         break;
399 
400     case 8:
401         map.map[0] = PA_CHANNEL_POSITION_FRONT_LEFT;
402         map.map[1] = PA_CHANNEL_POSITION_FRONT_RIGHT;
403         map.map[2] = PA_CHANNEL_POSITION_CENTER;
404         map.map[3] = PA_CHANNEL_POSITION_LFE;
405         map.map[4] = PA_CHANNEL_POSITION_REAR_LEFT;
406         map.map[5] = PA_CHANNEL_POSITION_REAR_RIGHT;
407         map.map[6] = PA_CHANNEL_POSITION_SIDE_LEFT;
408         map.map[7] = PA_CHANNEL_POSITION_SIDE_RIGHT;
409         break;
410 
411     default:
412         dolog("Internal error: unsupported channel count %d\n", ss->channels);
413         goto fail;
414     }
415 
416     stream = pa_stream_new(c->context, name, ss, &map);
417     if (!stream) {
418         goto fail;
419     }
420 
421     pa_stream_set_state_callback(stream, stream_state_cb, c);
422 
423     flags =
424         PA_STREAM_INTERPOLATE_TIMING
425         | PA_STREAM_AUTO_TIMING_UPDATE
426         | PA_STREAM_EARLY_REQUESTS;
427 
428     if (dev) {
429         /* don't move the stream if the user specified a sink/source */
430         flags |= PA_STREAM_DONT_MOVE;
431     }
432 
433     if (dir == PA_STREAM_PLAYBACK) {
434         r = pa_stream_connect_playback(stream, dev, attr, flags, NULL, NULL);
435     } else {
436         r = pa_stream_connect_record(stream, dev, attr, flags);
437     }
438 
439     if (r < 0) {
440       goto fail;
441     }
442 
443     pa_threaded_mainloop_unlock(c->mainloop);
444 
445     return stream;
446 
447 fail:
448     pa_threaded_mainloop_unlock(c->mainloop);
449 
450     if (stream) {
451         pa_stream_unref (stream);
452     }
453 
454     *rerror = pa_context_errno(c->context);
455 
456     return NULL;
457 }
458 
459 static int qpa_init_out(HWVoiceOut *hw, struct audsettings *as,
460                         void *drv_opaque)
461 {
462     int error;
463     pa_sample_spec ss;
464     pa_buffer_attr ba;
465     struct audsettings obt_as = *as;
466     PAVoiceOut *pa = (PAVoiceOut *) hw;
467     paaudio *g = pa->g = drv_opaque;
468     AudiodevPaOptions *popts = &g->dev->u.pa;
469     AudiodevPaPerDirectionOptions *ppdo = popts->out;
470     PAConnection *c = g->conn;
471 
472     ss.format = audfmt_to_pa (as->fmt, as->endianness);
473     ss.channels = as->nchannels;
474     ss.rate = as->freq;
475 
476     ba.tlength = pa_usec_to_bytes(ppdo->latency, &ss);
477     ba.minreq = -1;
478     ba.maxlength = -1;
479     ba.prebuf = -1;
480 
481     obt_as.fmt = pa_to_audfmt (ss.format, &obt_as.endianness);
482 
483     pa->stream = qpa_simple_new (
484         c,
485         ppdo->has_stream_name ? ppdo->stream_name : g->dev->id,
486         PA_STREAM_PLAYBACK,
487         ppdo->has_name ? ppdo->name : NULL,
488         &ss,
489         &ba,                    /* buffering attributes */
490         &error
491         );
492     if (!pa->stream) {
493         qpa_logerr (error, "pa_simple_new for playback failed\n");
494         goto fail1;
495     }
496 
497     audio_pcm_init_info (&hw->info, &obt_as);
498     hw->samples = audio_buffer_samples(
499         qapi_AudiodevPaPerDirectionOptions_base(ppdo),
500         &obt_as, ppdo->buffer_length);
501 
502     return 0;
503 
504  fail1:
505     return -1;
506 }
507 
508 static int qpa_init_in(HWVoiceIn *hw, struct audsettings *as, void *drv_opaque)
509 {
510     int error;
511     pa_sample_spec ss;
512     pa_buffer_attr ba;
513     struct audsettings obt_as = *as;
514     PAVoiceIn *pa = (PAVoiceIn *) hw;
515     paaudio *g = pa->g = drv_opaque;
516     AudiodevPaOptions *popts = &g->dev->u.pa;
517     AudiodevPaPerDirectionOptions *ppdo = popts->in;
518     PAConnection *c = g->conn;
519 
520     ss.format = audfmt_to_pa (as->fmt, as->endianness);
521     ss.channels = as->nchannels;
522     ss.rate = as->freq;
523 
524     ba.fragsize = pa_usec_to_bytes(ppdo->latency, &ss);
525     ba.maxlength = pa_usec_to_bytes(ppdo->latency * 2, &ss);
526     ba.minreq = -1;
527     ba.prebuf = -1;
528 
529     obt_as.fmt = pa_to_audfmt (ss.format, &obt_as.endianness);
530 
531     pa->stream = qpa_simple_new (
532         c,
533         ppdo->has_stream_name ? ppdo->stream_name : g->dev->id,
534         PA_STREAM_RECORD,
535         ppdo->has_name ? ppdo->name : NULL,
536         &ss,
537         &ba,                    /* buffering attributes */
538         &error
539         );
540     if (!pa->stream) {
541         qpa_logerr (error, "pa_simple_new for capture failed\n");
542         goto fail1;
543     }
544 
545     audio_pcm_init_info (&hw->info, &obt_as);
546     hw->samples = audio_buffer_samples(
547         qapi_AudiodevPaPerDirectionOptions_base(ppdo),
548         &obt_as, ppdo->buffer_length);
549 
550     return 0;
551 
552  fail1:
553     return -1;
554 }
555 
556 static void qpa_simple_disconnect(PAConnection *c, pa_stream *stream)
557 {
558     int err;
559 
560     /*
561      * wait until actually connects. workaround pa bug #247
562      * https://gitlab.freedesktop.org/pulseaudio/pulseaudio/issues/247
563      */
564     while (pa_stream_get_state(stream) == PA_STREAM_CREATING) {
565         pa_threaded_mainloop_wait(c->mainloop);
566     }
567 
568     err = pa_stream_disconnect(stream);
569     if (err != 0) {
570         dolog("Failed to disconnect! err=%d\n", err);
571     }
572     pa_stream_unref(stream);
573 }
574 
575 static void qpa_fini_out (HWVoiceOut *hw)
576 {
577     PAVoiceOut *pa = (PAVoiceOut *) hw;
578 
579     if (pa->stream) {
580         PAConnection *c = pa->g->conn;
581 
582         pa_threaded_mainloop_lock(c->mainloop);
583         qpa_simple_disconnect(c, pa->stream);
584         pa->stream = NULL;
585         pa_threaded_mainloop_unlock(c->mainloop);
586     }
587 }
588 
589 static void qpa_fini_in (HWVoiceIn *hw)
590 {
591     PAVoiceIn *pa = (PAVoiceIn *) hw;
592 
593     if (pa->stream) {
594         PAConnection *c = pa->g->conn;
595 
596         pa_threaded_mainloop_lock(c->mainloop);
597         if (pa->read_length) {
598             int r = pa_stream_drop(pa->stream);
599             if (r) {
600                 qpa_logerr(pa_context_errno(c->context),
601                            "pa_stream_drop failed\n");
602             }
603             pa->read_length = 0;
604         }
605         qpa_simple_disconnect(c, pa->stream);
606         pa->stream = NULL;
607         pa_threaded_mainloop_unlock(c->mainloop);
608     }
609 }
610 
611 static void qpa_volume_out(HWVoiceOut *hw, Volume *vol)
612 {
613     PAVoiceOut *pa = (PAVoiceOut *) hw;
614     pa_operation *op;
615     pa_cvolume v;
616     PAConnection *c = pa->g->conn;
617     int i;
618 
619 #ifdef PA_CHECK_VERSION    /* macro is present in 0.9.16+ */
620     pa_cvolume_init (&v);  /* function is present in 0.9.13+ */
621 #endif
622 
623     v.channels = vol->channels;
624     for (i = 0; i < vol->channels; ++i) {
625         v.values[i] = ((PA_VOLUME_NORM - PA_VOLUME_MUTED) * vol->vol[i]) / 255;
626     }
627 
628     pa_threaded_mainloop_lock(c->mainloop);
629 
630     op = pa_context_set_sink_input_volume(c->context,
631                                           pa_stream_get_index(pa->stream),
632                                           &v, NULL, NULL);
633     if (!op) {
634         qpa_logerr(pa_context_errno(c->context),
635                    "set_sink_input_volume() failed\n");
636     } else {
637         pa_operation_unref(op);
638     }
639 
640     op = pa_context_set_sink_input_mute(c->context,
641                                         pa_stream_get_index(pa->stream),
642                                         vol->mute, NULL, NULL);
643     if (!op) {
644         qpa_logerr(pa_context_errno(c->context),
645                    "set_sink_input_mute() failed\n");
646     } else {
647         pa_operation_unref(op);
648     }
649 
650     pa_threaded_mainloop_unlock(c->mainloop);
651 }
652 
653 static void qpa_volume_in(HWVoiceIn *hw, Volume *vol)
654 {
655     PAVoiceIn *pa = (PAVoiceIn *) hw;
656     pa_operation *op;
657     pa_cvolume v;
658     PAConnection *c = pa->g->conn;
659     int i;
660 
661 #ifdef PA_CHECK_VERSION
662     pa_cvolume_init (&v);
663 #endif
664 
665     v.channels = vol->channels;
666     for (i = 0; i < vol->channels; ++i) {
667         v.values[i] = ((PA_VOLUME_NORM - PA_VOLUME_MUTED) * vol->vol[i]) / 255;
668     }
669 
670     pa_threaded_mainloop_lock(c->mainloop);
671 
672     op = pa_context_set_source_output_volume(c->context,
673         pa_stream_get_index(pa->stream),
674         &v, NULL, NULL);
675     if (!op) {
676         qpa_logerr(pa_context_errno(c->context),
677                    "set_source_output_volume() failed\n");
678     } else {
679         pa_operation_unref(op);
680     }
681 
682     op = pa_context_set_source_output_mute(c->context,
683         pa_stream_get_index(pa->stream),
684         vol->mute, NULL, NULL);
685     if (!op) {
686         qpa_logerr(pa_context_errno(c->context),
687                    "set_source_output_mute() failed\n");
688     } else {
689         pa_operation_unref(op);
690     }
691 
692     pa_threaded_mainloop_unlock(c->mainloop);
693 }
694 
695 static int qpa_validate_per_direction_opts(Audiodev *dev,
696                                            AudiodevPaPerDirectionOptions *pdo)
697 {
698     if (!pdo->has_buffer_length) {
699         pdo->has_buffer_length = true;
700         pdo->buffer_length = 46440;
701     }
702     if (!pdo->has_latency) {
703         pdo->has_latency = true;
704         pdo->latency = 15000;
705     }
706     return 1;
707 }
708 
709 /* common */
710 static void *qpa_conn_init(const char *server)
711 {
712     const char *vm_name;
713     PAConnection *c = g_malloc0(sizeof(PAConnection));
714     QTAILQ_INSERT_TAIL(&pa_conns, c, list);
715 
716     c->mainloop = pa_threaded_mainloop_new();
717     if (!c->mainloop) {
718         goto fail;
719     }
720 
721     vm_name = qemu_get_vm_name();
722     c->context = pa_context_new(pa_threaded_mainloop_get_api(c->mainloop),
723                                 vm_name ? vm_name : "qemu");
724     if (!c->context) {
725         goto fail;
726     }
727 
728     pa_context_set_state_callback(c->context, context_state_cb, c);
729 
730     if (pa_context_connect(c->context, server, 0, NULL) < 0) {
731         qpa_logerr(pa_context_errno(c->context),
732                    "pa_context_connect() failed\n");
733         goto fail;
734     }
735 
736     pa_threaded_mainloop_lock(c->mainloop);
737 
738     if (pa_threaded_mainloop_start(c->mainloop) < 0) {
739         goto unlock_and_fail;
740     }
741 
742     for (;;) {
743         pa_context_state_t state;
744 
745         state = pa_context_get_state(c->context);
746 
747         if (state == PA_CONTEXT_READY) {
748             break;
749         }
750 
751         if (!PA_CONTEXT_IS_GOOD(state)) {
752             qpa_logerr(pa_context_errno(c->context),
753                        "Wrong context state\n");
754             goto unlock_and_fail;
755         }
756 
757         /* Wait until the context is ready */
758         pa_threaded_mainloop_wait(c->mainloop);
759     }
760 
761     pa_threaded_mainloop_unlock(c->mainloop);
762     return c;
763 
764 unlock_and_fail:
765     pa_threaded_mainloop_unlock(c->mainloop);
766 fail:
767     AUD_log (AUDIO_CAP, "Failed to initialize PA context");
768     qpa_conn_fini(c);
769     return NULL;
770 }
771 
772 static void *qpa_audio_init(Audiodev *dev)
773 {
774     paaudio *g;
775     AudiodevPaOptions *popts = &dev->u.pa;
776     const char *server;
777     PAConnection *c;
778 
779     assert(dev->driver == AUDIODEV_DRIVER_PA);
780 
781     if (!popts->has_server) {
782         char pidfile[64];
783         char *runtime;
784         struct stat st;
785 
786         runtime = getenv("XDG_RUNTIME_DIR");
787         if (!runtime) {
788             return NULL;
789         }
790         snprintf(pidfile, sizeof(pidfile), "%s/pulse/pid", runtime);
791         if (stat(pidfile, &st) != 0) {
792             return NULL;
793         }
794     }
795 
796     if (!qpa_validate_per_direction_opts(dev, popts->in)) {
797         return NULL;
798     }
799     if (!qpa_validate_per_direction_opts(dev, popts->out)) {
800         return NULL;
801     }
802 
803     g = g_malloc0(sizeof(paaudio));
804     server = popts->has_server ? popts->server : NULL;
805 
806     g->dev = dev;
807 
808     QTAILQ_FOREACH(c, &pa_conns, list) {
809         if (server == NULL || c->server == NULL ?
810             server == c->server :
811             strcmp(server, c->server) == 0) {
812             g->conn = c;
813             break;
814         }
815     }
816     if (!g->conn) {
817         g->conn = qpa_conn_init(server);
818     }
819     if (!g->conn) {
820         g_free(g);
821         return NULL;
822     }
823 
824     ++g->conn->refcount;
825     return g;
826 }
827 
828 static void qpa_conn_fini(PAConnection *c)
829 {
830     if (c->mainloop) {
831         pa_threaded_mainloop_stop(c->mainloop);
832     }
833 
834     if (c->context) {
835         pa_context_disconnect(c->context);
836         pa_context_unref(c->context);
837     }
838 
839     if (c->mainloop) {
840         pa_threaded_mainloop_free(c->mainloop);
841     }
842 
843     QTAILQ_REMOVE(&pa_conns, c, list);
844     g_free(c);
845 }
846 
847 static void qpa_audio_fini (void *opaque)
848 {
849     paaudio *g = opaque;
850     PAConnection *c = g->conn;
851 
852     if (--c->refcount == 0) {
853         qpa_conn_fini(c);
854     }
855 
856     g_free(g);
857 }
858 
859 static struct audio_pcm_ops qpa_pcm_ops = {
860     .init_out = qpa_init_out,
861     .fini_out = qpa_fini_out,
862     .write    = qpa_write,
863     .get_buffer_out = qpa_get_buffer_out,
864     .put_buffer_out = qpa_write, /* pa handles it */
865     .volume_out = qpa_volume_out,
866 
867     .init_in  = qpa_init_in,
868     .fini_in  = qpa_fini_in,
869     .read     = qpa_read,
870     .get_buffer_in = qpa_get_buffer_in,
871     .put_buffer_in = qpa_put_buffer_in,
872     .volume_in = qpa_volume_in
873 };
874 
875 static struct audio_driver pa_audio_driver = {
876     .name           = "pa",
877     .descr          = "http://www.pulseaudio.org/",
878     .init           = qpa_audio_init,
879     .fini           = qpa_audio_fini,
880     .pcm_ops        = &qpa_pcm_ops,
881     .can_be_default = 1,
882     .max_voices_out = INT_MAX,
883     .max_voices_in  = INT_MAX,
884     .voice_size_out = sizeof (PAVoiceOut),
885     .voice_size_in  = sizeof (PAVoiceIn),
886 };
887 
888 static void register_audio_pa(void)
889 {
890     audio_driver_register(&pa_audio_driver);
891 }
892 type_init(register_audio_pa);
893