?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Add some more device properties to the sink properties list
[pulseaudio-mirror.git] / src / modules / module-bt-device.c
blobe6763f9bf535fc278d60c522154567a39dfed0cf
1 /***
2 This file is part of PulseAudio.
3
4 Copyright 2008 Joao Paulo Rechi Vita
5
6 PulseAudio 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.
10
11 PulseAudio 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.
15
16 You should have received a copy of the GNU Lesser General Public License
17 along with PulseAudio; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
19 USA.
20 ***/
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25
26 #include <string.h>
27 #include <errno.h>
28 #include <poll.h>
29 #include <sys/ioctl.h>
30 #include <linux/sockios.h>
31
32 #include <pulse/xmalloc.h>
33 #include <pulse/timeval.h>
34 #include <pulse/sample.h>
35 #include <pulsecore/module.h>
36 #include <pulsecore/modargs.h>
37 #include <pulsecore/core-util.h>
38 #include <pulsecore/core-error.h>
39 #include <pulsecore/socket-util.h>
40 #include <pulsecore/thread.h>
41 #include <pulsecore/thread-mq.h>
42 #include <pulsecore/rtpoll.h>
43 #include <pulsecore/time-smoother.h>
44 #include <pulsecore/rtclock.h>
45
46 #include "dbus-util.h"
47 #include "module-bt-device-symdef.h"
48 #include "bt-ipc.h"
49 #include "bt-sbc.h"
50 #include "bt-rtp.h"
51
52 #define DEFAULT_SINK_NAME "bluetooth_sink"
53 #define BUFFER_SIZE 2048
54 #define MAX_BITPOOL 64
55 #define MIN_BITPOOL 2
56 #define SOL_SCO 17
57 #define SCO_TXBUFS 0x03
58 #define SCO_RXBUFS 0x04
59
60 PA_MODULE_AUTHOR("Joao Paulo Rechi Vita");
61 PA_MODULE_DESCRIPTION("Bluetooth audio sink and source");
62 PA_MODULE_VERSION(PACKAGE_VERSION);
63 PA_MODULE_LOAD_ONCE(FALSE);
64 PA_MODULE_USAGE(
65 "name=<name of the device> "
66 "addr=<address of the device> "
67 "profile=<a2dp|hsp>");
68
69 struct bt_a2dp {
70 sbc_capabilities_t sbc_capabilities;
71 sbc_t sbc; /* Codec data */
72 pa_bool_t sbc_initialized; /* Keep track if the encoder is initialized */
73 int codesize; /* SBC codesize */
74 int samples; /* Number of encoded samples */
75 uint8_t buffer[BUFFER_SIZE]; /* Codec transfer buffer */
76 int count; /* Codec transfer buffer counter */
77
78 int nsamples; /* Cumulative number of codec samples */
79 uint16_t seq_num; /* Cumulative packet sequence */
80 int frame_count; /* Current frames in buffer*/
81 };
82
83 struct userdata {
84 pa_core *core;
85 pa_module *module;
86 pa_sink *sink;
87
88 pa_thread_mq thread_mq;
89 pa_rtpoll *rtpoll;
90 pa_rtpoll_item *rtpoll_item;
91 pa_thread *thread;
92
93 int64_t offset;
94 pa_smoother *smoother;
95
96 pa_memchunk memchunk;
97 pa_mempool *mempool;
98
99 char *name;
100 char *addr;
101 char *profile;
102 pa_sample_spec ss;
103
104 int audioservice_fd;
105 int stream_fd;
106
107 int transport;
108 char *strtransport;
109 int link_mtu;
110 size_t block_size;
111 pa_usec_t latency;
112
113 struct bt_a2dp a2dp;
114 };
115
116 static const char* const valid_modargs[] = {
117 "name",
118 "addr",
119 "profile",
120 "rate",
121 "channels",
122 NULL
123 };
124
125 static int bt_audioservice_send(int sk, const bt_audio_msg_header_t *msg) {
126 int e;
127 pa_log_debug("sending %s", bt_audio_strmsg(msg->msg_type));
128 if (send(sk, msg, BT_AUDIO_IPC_PACKET_SIZE, 0) > 0)
129 e = 0;
130 else {
131 e = -errno;
132 pa_log_error("Error sending data to audio service: %s(%d)", pa_cstrerror(errno), errno);
133 }
134 return e;
135 }
136
137 static int bt_audioservice_recv(int sk, bt_audio_msg_header_t *inmsg) {
138 int e;
139 const char *type;
140
141 pa_log_debug("trying to receive msg from audio service...");
142 if (recv(sk, inmsg, BT_AUDIO_IPC_PACKET_SIZE, 0) > 0) {
143 type = bt_audio_strmsg(inmsg->msg_type);
144 if (type) {
145 pa_log_debug("Received %s", type);
146 e = 0;
147 }
148 else {
149 e = -EINVAL;
150 pa_log_error("Bogus message type %d received from audio service", inmsg->msg_type);
151 }
152 }
153 else {
154 e = -errno;
155 pa_log_error("Error receiving data from audio service: %s(%d)", pa_cstrerror(errno), errno);
156 }
157
158 return e;
159 }
160
161 static int bt_audioservice_expect(int sk, bt_audio_msg_header_t *rsp_hdr, int expected_type) {
162 int e = bt_audioservice_recv(sk, rsp_hdr);
163 if (e == 0) {
164 if (rsp_hdr->msg_type != expected_type) {
165 e = -EINVAL;
166 pa_log_error("Bogus message %s received while %s was expected", bt_audio_strmsg(rsp_hdr->msg_type),
167 bt_audio_strmsg(expected_type));
168 }
169 }
170 return e;
171 }
172
173 static int bt_getcaps(struct userdata *u) {
174 int e;
175 union {
176 bt_audio_rsp_msg_header_t rsp_hdr;
177 struct bt_getcapabilities_req getcaps_req;
178 struct bt_getcapabilities_rsp getcaps_rsp;
179 uint8_t buf[BT_AUDIO_IPC_PACKET_SIZE];
180 } msg;
181
182 memset(msg.buf, 0, BT_AUDIO_IPC_PACKET_SIZE);
183 msg.getcaps_req.h.msg_type = BT_GETCAPABILITIES_REQ;
184 strncpy(msg.getcaps_req.device, u->addr, 18);
185 if (strcasecmp(u->profile, "a2dp") == 0)
186 msg.getcaps_req.transport = BT_CAPABILITIES_TRANSPORT_A2DP;
187 else if (strcasecmp(u->profile, "hsp") == 0)
188 msg.getcaps_req.transport = BT_CAPABILITIES_TRANSPORT_SCO;
189 else {
190 pa_log_error("invalid profile argument: %s", u->profile);
191 return -1;
192 }
193 msg.getcaps_req.flags = BT_FLAG_AUTOCONNECT;
194
195 e = bt_audioservice_send(u->audioservice_fd, &msg.getcaps_req.h);
196 if (e < 0) {
197 pa_log_error("failed to send GETCAPABILITIES_REQ");
198 return e;
199 }
200
201 e = bt_audioservice_expect(u->audioservice_fd, &msg.rsp_hdr.msg_h, BT_GETCAPABILITIES_RSP);
202 if (e < 0) {
203 pa_log_error("failed to expect for GETCAPABILITIES_RSP");
204 return e;
205 }
206 if (msg.rsp_hdr.posix_errno != 0) {
207 pa_log_error("BT_GETCAPABILITIES failed : %s (%d)", pa_cstrerror(msg.rsp_hdr.posix_errno), msg.rsp_hdr.posix_errno);
208 return -msg.rsp_hdr.posix_errno;
209 }
210
211 if ((u->transport = msg.getcaps_rsp.transport) == BT_CAPABILITIES_TRANSPORT_A2DP)
212 u->a2dp.sbc_capabilities = msg.getcaps_rsp.sbc_capabilities;
213
214 return 0;
215 }
216
217 static uint8_t default_bitpool(uint8_t freq, uint8_t mode) {
218 switch (freq) {
219 case BT_SBC_SAMPLING_FREQ_16000:
220 case BT_SBC_SAMPLING_FREQ_32000:
221 return 53;
222 case BT_SBC_SAMPLING_FREQ_44100:
223 switch (mode) {
224 case BT_A2DP_CHANNEL_MODE_MONO:
225 case BT_A2DP_CHANNEL_MODE_DUAL_CHANNEL:
226 return 31;
227 case BT_A2DP_CHANNEL_MODE_STEREO:
228 case BT_A2DP_CHANNEL_MODE_JOINT_STEREO:
229 return 53;
230 default:
231 pa_log_warn("Invalid channel mode %u", mode);
232 return 53;
233 }
234 case BT_SBC_SAMPLING_FREQ_48000:
235 switch (mode) {
236 case BT_A2DP_CHANNEL_MODE_MONO:
237 case BT_A2DP_CHANNEL_MODE_DUAL_CHANNEL:
238 return 29;
239 case BT_A2DP_CHANNEL_MODE_STEREO:
240 case BT_A2DP_CHANNEL_MODE_JOINT_STEREO:
241 return 51;
242 default:
243 pa_log_warn("Invalid channel mode %u", mode);
244 return 51;
245 }
246 default:
247 pa_log_warn("Invalid sampling freq %u", freq);
248 return 53;
249 }
250 }
251
252 static int bt_a2dp_init(struct userdata *u) {
253 sbc_capabilities_t *cap = &u->a2dp.sbc_capabilities;
254 unsigned int max_bitpool, min_bitpool;
255
256 switch (u->ss.rate) {
257 case 48000:
258 cap->frequency = BT_SBC_SAMPLING_FREQ_48000;
259 break;
260 case 44100:
261 cap->frequency = BT_SBC_SAMPLING_FREQ_44100;
262 break;
263 case 32000:
264 cap->frequency = BT_SBC_SAMPLING_FREQ_32000;
265 break;
266 case 16000:
267 cap->frequency = BT_SBC_SAMPLING_FREQ_16000;
268 break;
269 default:
270 pa_log_error("Rate %d not supported", u->ss.rate);
271 return -1;
272 }
273
274 // if (cfg->has_channel_mode)
275 // cap->channel_mode = cfg->channel_mode;
276 // else
277 if (u->ss.channels == 2) {
278 if (cap->channel_mode & BT_A2DP_CHANNEL_MODE_JOINT_STEREO)
279 cap->channel_mode = BT_A2DP_CHANNEL_MODE_JOINT_STEREO;
280 else if (cap->channel_mode & BT_A2DP_CHANNEL_MODE_STEREO)
281 cap->channel_mode = BT_A2DP_CHANNEL_MODE_STEREO;
282 else if (cap->channel_mode & BT_A2DP_CHANNEL_MODE_DUAL_CHANNEL)
283 cap->channel_mode = BT_A2DP_CHANNEL_MODE_DUAL_CHANNEL;
284 } else {
285 if (cap->channel_mode & BT_A2DP_CHANNEL_MODE_MONO)
286 cap->channel_mode = BT_A2DP_CHANNEL_MODE_MONO;
287 }
288
289 if (!cap->channel_mode) {
290 pa_log_error("No supported channel modes");
291 return -1;
292 }
293
294 // if (cfg->has_block_length)
295 // cap->block_length = cfg->block_length;
296 // else
297 if (cap->block_length & BT_A2DP_BLOCK_LENGTH_16)
298 cap->block_length = BT_A2DP_BLOCK_LENGTH_16;
299 else if (cap->block_length & BT_A2DP_BLOCK_LENGTH_12)
300 cap->block_length = BT_A2DP_BLOCK_LENGTH_12;
301 else if (cap->block_length & BT_A2DP_BLOCK_LENGTH_8)
302 cap->block_length = BT_A2DP_BLOCK_LENGTH_8;
303 else if (cap->block_length & BT_A2DP_BLOCK_LENGTH_4)
304 cap->block_length = BT_A2DP_BLOCK_LENGTH_4;
305 else {
306 pa_log_error("No supported block lengths");
307 return -1;
308 }
309
310 // if (cfg->has_subbands)
311 // cap->subbands = cfg->subbands;
312 if (cap->subbands & BT_A2DP_SUBBANDS_8)
313 cap->subbands = BT_A2DP_SUBBANDS_8;
314 else if (cap->subbands & BT_A2DP_SUBBANDS_4)
315 cap->subbands = BT_A2DP_SUBBANDS_4;
316 else {
317 pa_log_error("No supported subbands");
318 return -1;
319 }
320
321 // if (cfg->has_allocation_method)
322 // cap->allocation_method = cfg->allocation_method;
323 if (cap->allocation_method & BT_A2DP_ALLOCATION_LOUDNESS)
324 cap->allocation_method = BT_A2DP_ALLOCATION_LOUDNESS;
325 else if (cap->allocation_method & BT_A2DP_ALLOCATION_SNR)
326 cap->allocation_method = BT_A2DP_ALLOCATION_SNR;
327
328 // if (cfg->has_bitpool)
329 // min_bitpool = max_bitpool = cfg->bitpool;
330 // else {
331 min_bitpool = PA_MAX(MIN_BITPOOL, cap->min_bitpool);
332 max_bitpool = PA_MIN(default_bitpool(cap->frequency, cap->channel_mode), cap->max_bitpool);
333 // }
334
335 cap->min_bitpool = min_bitpool;
336 cap->max_bitpool = max_bitpool;
337
338 return 0;
339 }
340
341 static void bt_a2dp_setup(struct bt_a2dp *a2dp) {
342 sbc_capabilities_t active_capabilities = a2dp->sbc_capabilities;
343
344 if (a2dp->sbc_initialized)
345 sbc_reinit(&a2dp->sbc, 0);
346 else
347 sbc_init(&a2dp->sbc, 0);
348 a2dp->sbc_initialized = TRUE;
349
350 if (active_capabilities.frequency & BT_SBC_SAMPLING_FREQ_16000)
351 a2dp->sbc.frequency = SBC_FREQ_16000;
352
353 if (active_capabilities.frequency & BT_SBC_SAMPLING_FREQ_32000)
354 a2dp->sbc.frequency = SBC_FREQ_32000;
355
356 if (active_capabilities.frequency & BT_SBC_SAMPLING_FREQ_44100)
357 a2dp->sbc.frequency = SBC_FREQ_44100;
358
359 if (active_capabilities.frequency & BT_SBC_SAMPLING_FREQ_48000)
360 a2dp->sbc.frequency = SBC_FREQ_48000;
361
362 if (active_capabilities.channel_mode & BT_A2DP_CHANNEL_MODE_MONO)
363 a2dp->sbc.mode = SBC_MODE_MONO;
364
365 if (active_capabilities.channel_mode & BT_A2DP_CHANNEL_MODE_DUAL_CHANNEL)
366 a2dp->sbc.mode = SBC_MODE_DUAL_CHANNEL;
367
368 if (active_capabilities.channel_mode & BT_A2DP_CHANNEL_MODE_STEREO)
369 a2dp->sbc.mode = SBC_MODE_STEREO;
370
371 if (active_capabilities.channel_mode & BT_A2DP_CHANNEL_MODE_JOINT_STEREO)
372 a2dp->sbc.mode = SBC_MODE_JOINT_STEREO;
373
374 a2dp->sbc.allocation = (active_capabilities.allocation_method == BT_A2DP_ALLOCATION_SNR ? SBC_AM_SNR : SBC_AM_LOUDNESS);
375
376 switch (active_capabilities.subbands) {
377 case BT_A2DP_SUBBANDS_4:
378 a2dp->sbc.subbands = SBC_SB_4;
379 break;
380 case BT_A2DP_SUBBANDS_8:
381 a2dp->sbc.subbands = SBC_SB_8;
382 break;
383 }
384
385 switch (active_capabilities.block_length) {
386 case BT_A2DP_BLOCK_LENGTH_4:
387 a2dp->sbc.blocks = SBC_BLK_4;
388 break;
389 case BT_A2DP_BLOCK_LENGTH_8:
390 a2dp->sbc.blocks = SBC_BLK_8;
391 break;
392 case BT_A2DP_BLOCK_LENGTH_12:
393 a2dp->sbc.blocks = SBC_BLK_12;
394 break;
395 case BT_A2DP_BLOCK_LENGTH_16:
396 a2dp->sbc.blocks = SBC_BLK_16;
397 break;
398 }
399
400 a2dp->sbc.bitpool = active_capabilities.max_bitpool;
401 a2dp->codesize = sbc_get_codesize(&a2dp->sbc);
402 a2dp->count = sizeof(struct rtp_header) + sizeof(struct rtp_payload);
403 }
404
405 static int bt_setconf(struct userdata *u) {
406 int e;
407 union {
408 bt_audio_rsp_msg_header_t rsp_hdr;
409 struct bt_setconfiguration_req setconf_req;
410 struct bt_setconfiguration_rsp setconf_rsp;
411 uint8_t buf[BT_AUDIO_IPC_PACKET_SIZE];
412 } msg;
413
414 if (u->transport == BT_CAPABILITIES_TRANSPORT_A2DP) {
415 e = bt_a2dp_init(u);
416 if (e < 0) {
417 pa_log_error("a2dp_init error");
418 return e;
419 }
420 u->ss.format = PA_SAMPLE_S16LE;
421 }
422 else
423 u->ss.format = PA_SAMPLE_U8;
424
425 memset(msg.buf, 0, BT_AUDIO_IPC_PACKET_SIZE);
426 msg.setconf_req.h.msg_type = BT_SETCONFIGURATION_REQ;
427 strncpy(msg.setconf_req.device, u->addr, 18);
428 msg.setconf_req.transport = u->transport;
429 if (u->transport == BT_CAPABILITIES_TRANSPORT_A2DP)
430 msg.setconf_req.sbc_capabilities = u->a2dp.sbc_capabilities;
431 msg.setconf_req.access_mode = BT_CAPABILITIES_ACCESS_MODE_WRITE;
432
433 e = bt_audioservice_send(u->audioservice_fd, &msg.setconf_req.h);
434 if (e < 0) {
435 pa_log_error("failed to send BT_SETCONFIGURATION_REQ");
436 return e;
437 }
438
439 e = bt_audioservice_expect(u->audioservice_fd, &msg.rsp_hdr.msg_h, BT_SETCONFIGURATION_RSP);
440 if (e < 0) {
441 pa_log_error("failed to expect BT_SETCONFIGURATION_RSP");
442 return e;
443 }
444
445 if (msg.rsp_hdr.posix_errno != 0) {
446 pa_log_error("BT_SETCONFIGURATION failed : %s(%d)", pa_cstrerror(msg.rsp_hdr.posix_errno), msg.rsp_hdr.posix_errno);
447 return -msg.rsp_hdr.posix_errno;
448 }
449
450 u->transport = msg.setconf_rsp.transport;
451 u->strtransport = (u->transport == BT_CAPABILITIES_TRANSPORT_A2DP ? pa_xstrdup("A2DP") : pa_xstrdup("SCO"));
452 u->link_mtu = msg.setconf_rsp.link_mtu;
453
454 /* setup SBC encoder now we agree on parameters */
455 if (u->transport == BT_CAPABILITIES_TRANSPORT_A2DP) {
456 bt_a2dp_setup(&u->a2dp);
457 u->block_size = u->a2dp.codesize;
458 pa_log_info("sbc parameters:\n\tallocation=%u\n\tsubbands=%u\n\tblocks=%u\n\tbitpool=%u\n",
459 u->a2dp.sbc.allocation, u->a2dp.sbc.subbands, u->a2dp.sbc.blocks, u->a2dp.sbc.bitpool);
460 }
461 else
462 u->block_size = u->link_mtu;
463
464 return 0;
465 }
466
467 static int bt_getstreamfd(struct userdata *u) {
468 int e;
469 // uint32_t period_count = io->buffer_size / io->period_size;
470 union {
471 bt_audio_rsp_msg_header_t rsp_hdr;
472 struct bt_streamstart_req start_req;
473 struct bt_streamfd_ind streamfd_ind;
474 uint8_t buf[BT_AUDIO_IPC_PACKET_SIZE];
475 } msg;
476
477 memset(msg.buf, 0, BT_AUDIO_IPC_PACKET_SIZE);
478 msg.start_req.h.msg_type = BT_STREAMSTART_REQ;
479
480 e = bt_audioservice_send(u->audioservice_fd, &msg.start_req.h);
481 if (e < 0) {
482 pa_log_error("failed to send BT_STREAMSTART_REQ");
483 return e;
484 }
485
486 e = bt_audioservice_expect(u->audioservice_fd, &msg.rsp_hdr.msg_h, BT_STREAMSTART_RSP);
487 if (e < 0) {
488 pa_log_error("failed to expect BT_STREAMSTART_RSP");
489 return e;
490 }
491
492 if (msg.rsp_hdr.posix_errno != 0) {
493 pa_log_error("BT_START failed : %s(%d)", pa_cstrerror(msg.rsp_hdr.posix_errno), msg.rsp_hdr.posix_errno);
494 return -msg.rsp_hdr.posix_errno;
495 }
496
497 e = bt_audioservice_expect(u->audioservice_fd, &msg.streamfd_ind.h, BT_STREAMFD_IND);
498 if (e < 0) {
499 pa_log_error("failed to expect BT_STREAMFD_IND");
500 return e;
501 }
502
503 if (u->stream_fd >= 0)
504 pa_close(u->stream_fd);
505
506 u->stream_fd = bt_audio_service_get_data_fd(u->audioservice_fd);
507 if (u->stream_fd < 0) {
508 pa_log_error("failed to get data fd: %s (%d)",pa_cstrerror(errno), errno);
509 return -errno;
510 }
511
512 if (u->transport == BT_CAPABILITIES_TRANSPORT_A2DP) {
513 if (pa_socket_set_sndbuf(u->stream_fd, 10*u->link_mtu) < 0) {
514 pa_log_error("failed to set socket options for A2DP: %s (%d)",pa_cstrerror(errno), errno);
515 return -errno;
516 }
517 }
518
519 // if (setsockopt(u->stream_fd, SOL_SCO, SCO_TXBUFS, &period_count, sizeof(period_count)) == 0)
520 // return 0;
521 // if (setsockopt(u->stream_fd, SOL_SCO, SO_SNDBUF, &period_count, sizeof(period_count)) == 0)
522 // return 0;
523 // /* FIXME : handle error codes */
524 pa_make_fd_nonblock(u->stream_fd);
525 // pa_make_socket_low_delay(u->stream_fd);
526
527 return 0;
528 }
529
530 static int sink_process_msg(pa_msgobject *o, int code, void *data, int64_t offset, pa_memchunk *chunk) {
531 struct userdata *u = PA_SINK(o)->userdata;
532
533 pa_log_debug("got message: %d", code);
534 switch (code) {
535
536 case PA_SINK_MESSAGE_SET_STATE:
537 switch ((pa_sink_state_t) PA_PTR_TO_UINT(data)) {
538 case PA_SINK_SUSPENDED:
539 pa_assert(PA_SINK_IS_OPENED(u->sink->thread_info.state));
540 pa_smoother_pause(u->smoother, pa_rtclock_usec());
541 break;
542 case PA_SINK_IDLE:
543 case PA_SINK_RUNNING:
544 if (u->sink->thread_info.state == PA_SINK_SUSPENDED)
545 pa_smoother_resume(u->smoother, pa_rtclock_usec());
546 break;
547 case PA_SINK_UNLINKED:
548 case PA_SINK_INIT:
549 ;
550 }
551 break;
552
553 case PA_SINK_MESSAGE_GET_LATENCY: {
554 pa_usec_t w, r;
555 r = pa_smoother_get(u->smoother, pa_rtclock_usec());
556 w = pa_bytes_to_usec(u->offset + u->memchunk.length, &u->sink->sample_spec);
557 *((pa_usec_t*) data) = w > r ? w - r : 0;
558 return 0;
559 }
560
561 }
562
563 return pa_sink_process_msg(o, code, data, offset, chunk);
564 }
565
566 static void sco_thread_func(void *userdata) {
567 struct userdata *u = userdata;
568 int write_type = 0;
569
570 pa_assert(u);
571
572 pa_log_debug("SCO thread starting up");
573
574 pa_thread_mq_install(&u->thread_mq);
575 pa_rtpoll_install(u->rtpoll);
576
577 pa_smoother_set_time_offset(u->smoother, pa_rtclock_usec());
578
579 for (;;) {
580 int ret;
581 struct pollfd *pollfd;
582
583 if (PA_SINK_IS_OPENED(u->sink->thread_info.state)) {
584 if (u->sink->thread_info.rewind_requested) {
585 pa_sink_process_rewind(u->sink, 0);
586 }
587 }
588
589 pollfd = pa_rtpoll_item_get_pollfd(u->rtpoll_item, NULL);
590
591 if (PA_SINK_IS_OPENED(u->sink->thread_info.state) && pollfd->revents) {
592 pa_usec_t usec;
593 int64_t n;
594 ssize_t l;
595
596 for (;;) {
597 /* Render some data and write it to the fifo */
598 void *p;
599
600 u->memchunk.memblock = pa_memblock_new(u->mempool, u->block_size);
601 pa_log_debug("memblock asked size %d", u->block_size);
602 u->memchunk.length = pa_memblock_get_length(u->memchunk.memblock);
603 pa_log_debug("memchunk length %d", u->memchunk.length);
604 pa_sink_render_into_full(u->sink, &u->memchunk);
605
606 pa_assert(u->memchunk.length > 0);
607
608 p = pa_memblock_acquire(u->memchunk.memblock);
609
610 l = pa_write(u->stream_fd, (uint8_t*) p, u->memchunk.length, &write_type);
611 pa_log_debug("memblock written to socket: %d bytes", l);
612 pa_memblock_release(u->memchunk.memblock);
613 pa_memblock_unref(u->memchunk.memblock);
614 pa_memchunk_reset(&u->memchunk);
615 pa_log("memchunk reseted");
616
617 pa_assert(l != 0);
618
619 if (l < 0) {
620 if (errno == EINTR) {
621 pa_log_debug("EINTR");
622 continue;
623 }
624 else if (errno == EAGAIN) {
625 pa_log_debug("EAGAIN");
626 goto filled_up;
627 }
628 else {
629 pa_log("Failed to write data to FIFO: %s", pa_cstrerror(errno));
630 goto fail;
631 }
632 } else {
633 u->offset += l;
634 pollfd->revents = 0;
635 }
636 }
637
638 filled_up:
639 n = u->offset;
640 if (ioctl(u->stream_fd, SIOCOUTQ, &l) >= 0 && l > 0)
641 n -= l;
642 usec = pa_bytes_to_usec(n, &u->sink->sample_spec);
643 if (usec > u->latency)
644 usec -= u->latency;
645 else
646 usec = 0;
647 pa_smoother_put(u->smoother, pa_rtclock_usec(), usec);
648 }
649
650 /* Hmm, nothing to do. Let's sleep */
651 pa_log_debug("SCO thread going to sleep");
652 pollfd->events = PA_SINK_IS_OPENED(u->sink->thread_info.state) ? POLLOUT : 0;
653 if ((ret = pa_rtpoll_run(u->rtpoll, TRUE)) < 0) {
654 pa_log("rtpoll_run < 0");
655 goto fail;
656 }
657 pa_log_debug("SCO thread waking up");
658
659 if (ret == 0) {
660 pa_log_debug("rtpoll_run == 0");
661 goto finish;
662 }
663
664 pollfd = pa_rtpoll_item_get_pollfd(u->rtpoll_item, NULL);
665 if (pollfd->revents & ~POLLOUT) {
666 pa_log_error("FIFO shutdown.");
667 goto fail;
668 }
669 }
670
671 fail:
672 /* If this was no regular exit from the loop we have to continue processing messages until we receive PA_MESSAGE_SHUTDOWN */
673 pa_log_debug("SCO thread failed");
674 pa_asyncmsgq_post(u->thread_mq.outq, PA_MSGOBJECT(u->core), PA_CORE_MESSAGE_UNLOAD_MODULE, u->module, 0, NULL, NULL);
675 pa_asyncmsgq_wait_for(u->thread_mq.inq, PA_MESSAGE_SHUTDOWN);
676
677 finish:
678 pa_log_debug("SCO thread shutting down");
679 }
680
681 static int a2dp_process_render(struct userdata *u) {
682 ssize_t l;
683 int write_type = 0, written;
684 struct bt_a2dp *a2dp = &u->a2dp;
685 struct rtp_header *header = (void *) a2dp->buffer;
686 struct rtp_payload *payload = (void *) (a2dp->buffer + sizeof(*header));
687
688 pa_assert(u);
689
690 do {
691 /* Render some data */
692 int frame_size, encoded;
693 void *p;
694
695 u->memchunk.memblock = pa_memblock_new(u->mempool, u->block_size);
696 pa_log_debug("memblock asked size %d", u->block_size);
697 u->memchunk.length = pa_memblock_get_length(u->memchunk.memblock);
698 pa_log_debug("memchunk length %d", u->memchunk.length);
699 pa_sink_render_into_full(u->sink, &u->memchunk);
700
701 pa_assert(u->memchunk.length > 0);
702
703 p = pa_memblock_acquire(u->memchunk.memblock);
704 frame_size = sbc_get_frame_length(&a2dp->sbc);
705 pa_log_debug("SBC frame_size: %d", frame_size);
706
707 encoded = sbc_encode(&a2dp->sbc, (uint8_t*) p, a2dp->codesize, a2dp->buffer + a2dp->count,
708 sizeof(a2dp->buffer) - a2dp->count, &written);
709 pa_log_debug("SBC: encoded: %d; written: %d", encoded, written);
710 if (encoded <= 0) {
711 pa_log_error("SBC encoding error (%d)", encoded);
712 return -1;
713 }
714 pa_memblock_release(u->memchunk.memblock);
715 pa_memblock_unref(u->memchunk.memblock);
716 pa_memchunk_reset(&u->memchunk);
717 pa_log_debug("memchunk reseted");
718
719 a2dp->count += written;
720 a2dp->frame_count++;
721 a2dp->samples += encoded / frame_size;
722 a2dp->nsamples += encoded / frame_size;
723
724 } while (a2dp->count + written <= u->link_mtu);
725
726 /* write it to the fifo */
727 memset(a2dp->buffer, 0, sizeof(*header) + sizeof(*payload));
728 payload->frame_count = a2dp->frame_count;
729 header->v = 2;
730 header->pt = 1;
731 header->sequence_number = htons(a2dp->seq_num);
732 header->timestamp = htonl(a2dp->nsamples);
733 header->ssrc = htonl(1);
734
735 avdtp_write:
736 l = pa_write(u->stream_fd, a2dp->buffer, a2dp->count, write_type);
737 pa_log_debug("avdtp_write: requested %d bytes; written %d bytes", a2dp->count, l);
738
739 pa_assert(l != 0);
740
741 if (l < 0) {
742 if (errno == EINTR) {
743 pa_log_debug("EINTR");
744 goto avdtp_write;
745 }
746 else if (errno == EAGAIN) {
747 pa_log_debug("EAGAIN");
748 goto avdtp_write;
749 }
750 else {
751 pa_log_error("Failed to write data to FIFO: %s", pa_cstrerror(errno));
752 return -1;
753 }
754 }
755
756 u->offset += a2dp->codesize*a2dp->frame_count;
757
758 /* Reset buffer of data to send */
759 a2dp->count = sizeof(struct rtp_header) + sizeof(struct rtp_payload);
760 a2dp->frame_count = 0;
761 a2dp->samples = 0;
762 a2dp->seq_num++;
763
764 return 0;
765 }
766
767 static void a2dp_thread_func(void *userdata) {
768 struct userdata *u = userdata;
769
770 pa_assert(u);
771
772 pa_log_debug("A2DP Thread starting up");
773
774 pa_thread_mq_install(&u->thread_mq);
775 pa_rtpoll_install(u->rtpoll);
776
777 pa_smoother_set_time_offset(u->smoother, pa_rtclock_usec());
778
779 for (;;) {
780 int ret, l;
781 struct pollfd *pollfd;
782 int64_t n;
783 pa_usec_t usec;
784
785 if (PA_SINK_IS_OPENED(u->sink->thread_info.state)) {
786 if (u->sink->thread_info.rewind_requested) {
787 pa_sink_process_rewind(u->sink, 0);
788 }
789 }
790
791 pollfd = pa_rtpoll_item_get_pollfd(u->rtpoll_item, NULL);
792
793 if (PA_SINK_IS_OPENED(u->sink->thread_info.state) && pollfd->revents) {
794 if (l = a2dp_process_render(u) < 0)
795 goto fail;
796 pollfd->revents = 0;
797
798 /* feed the time smoother */
799 n = u->offset;
800 if (ioctl(u->stream_fd, SIOCOUTQ, &l) >= 0 && l > 0)
801 n -= l;
802 usec = pa_bytes_to_usec(n, &u->sink->sample_spec);
803 if (usec > u->latency)
804 usec -= u->latency;
805 else
806 usec = 0;
807 pa_smoother_put(u->smoother, pa_rtclock_usec(), usec);
808 }
809
810 /* Hmm, nothing to do. Let's sleep */
811 pa_log_debug("A2DP thread going to sleep");
812 pollfd->events = PA_SINK_IS_OPENED(u->sink->thread_info.state) ? POLLOUT : 0;
813 if ((ret = pa_rtpoll_run(u->rtpoll, TRUE)) < 0) {
814 pa_log_error("rtpoll_run < 0");
815 goto fail;
816 }
817 pa_log_debug("A2DP thread waking up");
818
819 if (ret == 0) {
820 pa_log_debug("rtpoll_run == 0");
821 goto finish;
822 }
823
824 pollfd = pa_rtpoll_item_get_pollfd(u->rtpoll_item, NULL);
825 if (pollfd->revents & ~POLLOUT) {
826 pa_log_error("FIFO shutdown.");
827 goto fail;
828 }
829 }
830
831 fail:
832 /* If this was no regular exit from the loop we have to continue processing messages until we receive PA_MESSAGE_SHUTDOWN */
833 pa_log_debug("A2DP thread failed");
834 pa_asyncmsgq_post(u->thread_mq.outq, PA_MSGOBJECT(u->core), PA_CORE_MESSAGE_UNLOAD_MODULE, u->module, 0, NULL, NULL);
835 pa_asyncmsgq_wait_for(u->thread_mq.inq, PA_MESSAGE_SHUTDOWN);
836
837 finish:
838 pa_log_debug("A2DP thread shutting down");
839 }
840
841 int pa__init(pa_module* m) {
842 int e;
843 pa_modargs *ma;
844 pa_sink_new_data data;
845 struct pollfd *pollfd;
846 struct userdata *u;
847
848 pa_assert(m);
849 m->userdata = u = pa_xnew0(struct userdata, 1);
850 u->module = m;
851 u->core = m->core;
852 u->audioservice_fd = -1;
853 u->stream_fd = -1;
854 u->transport = -1;
855 u->offset = 0;
856 u->latency = 0;
857 u->a2dp.sbc_initialized = FALSE;
858 u->smoother = pa_smoother_new(PA_USEC_PER_SEC, PA_USEC_PER_SEC*2, TRUE, 10);
859 u->mempool = pa_mempool_new(FALSE);
860 pa_memchunk_reset(&u->memchunk);
861 u->rtpoll = pa_rtpoll_new();
862 pa_thread_mq_init(&u->thread_mq, u->core->mainloop, u->rtpoll);
863 u->rtpoll_item = NULL;
864
865 if (!(ma = pa_modargs_new(m->argument, valid_modargs))) {
866 pa_log_error("failed to parse module arguments");
867 goto fail;
868 }
869 if (!(u->name = pa_xstrdup(pa_modargs_get_value(ma, "name", DEFAULT_SINK_NAME)))) {
870 pa_log_error("failed to get device name from module arguments");
871 goto fail;
872 }
873 if (!(u->addr = pa_xstrdup(pa_modargs_get_value(ma, "addr", NULL)))) {
874 pa_log_error("failed to get device address from module arguments");
875 goto fail;
876 }
877 if (!(u->profile = pa_xstrdup(pa_modargs_get_value(ma, "profile", NULL)))) {
878 pa_log_error("failed to get profile from module arguments");
879 goto fail;
880 }
881 if (pa_modargs_get_value_u32(ma, "rate", &u->ss.rate) < 0) {
882 pa_log_error("failed to get rate from module arguments");
883 goto fail;
884 }
885 if (pa_modargs_get_value_u32(ma, "channels", &u->ss.channels) < 0) {
886 pa_log_error("failed to get channels from module arguments");
887 goto fail;
888 }
889
890 /* connect to the bluez audio service */
891 u->audioservice_fd = bt_audio_service_open();
892 if (u->audioservice_fd <= 0) {
893 pa_log_error("couldn't connect to bluetooth audio service");
894 goto fail;
895 }
896 pa_log_debug("connected to the bluetooth audio service");
897
898 /* queries device capabilities */
899 e = bt_getcaps(u);
900 if (e < 0) {
901 pa_log_error("failed to get device capabilities");
902 goto fail;
903 }
904 pa_log_debug("got device capabilities");
905
906 /* configures the connection */
907 e = bt_setconf(u);
908 if (e < 0) {
909 pa_log_error("failed to set config");
910 goto fail;
911 }
912 pa_log_debug("connection to the device configured");
913
914 /* gets the device socket */
915 e = bt_getstreamfd(u);
916 if (e < 0) {
917 pa_log_error("failed to get stream fd (%d)", e);
918 goto fail;
919 }
920 pa_log_debug("got the device socket");
921
922 /* create sink */
923 pa_sink_new_data_init(&data);
924 data.driver = __FILE__;
925 data.module = m;
926 pa_sink_new_data_set_name(&data, u->name);
927 pa_sink_new_data_set_sample_spec(&data, &u->ss);
928 pa_proplist_sets(data.proplist, PA_PROP_DEVICE_STRING, u->name);
929 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_DESCRIPTION, "Bluetooth %s '%s' (%s)", u->strtransport, u->name, u->addr);
930 pa_proplist_setf(data.proplist, "bluetooth.protocol", u->profile);
931 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_API, "bluez");
932 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_CLASS, "sound");
933 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_CONNECTOR, "bluetooth");
934 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_FORM_FACTOR, "headset"); /*FIXME*/
935 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_VENDOR_PRODUCT_ID, "product_id"); /*FIXME*/
936 pa_proplist_setf(data.proplist, PA_PROP_DEVICE_SERIAL, "serial"); /*FIXME*/
937 u->sink = pa_sink_new(m->core, &data, PA_SINK_HARDWARE|PA_SINK_LATENCY);
938 pa_sink_new_data_done(&data);
939 if (!u->sink) {
940 pa_log_error("failed to create sink");
941 goto fail;
942 }
943 u->sink->userdata = u;
944 u->sink->parent.process_msg = sink_process_msg;
945 pa_sink_set_asyncmsgq(u->sink, u->thread_mq.inq);
946 pa_sink_set_rtpoll(u->sink, u->rtpoll);
947
948 u->rtpoll_item = pa_rtpoll_item_new(u->rtpoll, PA_RTPOLL_NEVER, 1);
949 pollfd = pa_rtpoll_item_get_pollfd(u->rtpoll_item, NULL);
950 pollfd->fd = u->stream_fd;
951 pollfd->events = pollfd->revents = 0;
952
953 /* start rt thread */
954 if (u->transport == BT_CAPABILITIES_TRANSPORT_A2DP) {
955 if (!(u->thread = pa_thread_new(a2dp_thread_func, u))) {
956 pa_log_error("failed to create A2DP thread");
957 goto fail;
958 }
959 }
960 else {
961 if (!(u->thread = pa_thread_new(sco_thread_func, u))) {
962 pa_log_error("failed to create SCO thread");
963 goto fail;
964 }
965 }
966 pa_sink_put(u->sink);
967
968 pa_modargs_free(ma);
969 return 0;
970
971 fail:
972 if (ma)
973 pa_modargs_free(ma);
974 pa__done(m);
975 return -1;
976 }
977
978 void pa__done(pa_module *m) {
979 struct userdata *u;
980 pa_assert(m);
981
982 if (!(u = m->userdata))
983 return;
984
985 if (u->sink)
986 pa_sink_unlink(u->sink);
987
988 if (u->thread) {
989 pa_asyncmsgq_send(u->thread_mq.inq, NULL, PA_MESSAGE_SHUTDOWN, NULL, 0, NULL);
990 pa_thread_free(u->thread);
991 }
992
993 pa_thread_mq_done(&u->thread_mq);
994
995 if (u->sink)
996 pa_sink_unref(u->sink);
997
998 if (u->rtpoll_item)
999 pa_rtpoll_item_free(u->rtpoll_item);
1000
1001 if (u->rtpoll)
1002 pa_rtpoll_free(u->rtpoll);
1003
1004 if (u->memchunk.memblock)
1005 pa_memblock_unref(u->memchunk.memblock);
1006 /* TODO: free mempool */
1007
1008 if (u->smoother)
1009 pa_smoother_free(u->smoother);
1010
1011 if (u->name)
1012 pa_xfree(u->name);
1013
1014 if (u->addr)
1015 pa_xfree(u->addr);
1016
1017 if (u->profile)
1018 pa_xfree(u->profile);
1019
1020 if (u->stream_fd >= 0)
1021 pa_close(u->stream_fd);
1022
1023 if (u->audioservice_fd >= 0)
1024 pa_close(u->audioservice_fd);
1025
1026 pa_xfree(u);
1027 }
A mirror of the PulseAudio repo