xref: /btstack/example/a2dp_sink_demo.c (revision 596b7fdcf4574fd380e2d792fcf6f074e536901e)
1 /*
2  * Copyright (C) 2016 BlueKitchen GmbH
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  *
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the copyright holders nor the names of
14  *    contributors may be used to endorse or promote products derived
15  *    from this software without specific prior written permission.
16  * 4. Any redistribution, use, or modification is done solely for
17  *    personal benefit and not for any commercial purpose or for
18  *    monetary gain.
19  *
20  * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS
21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS
24  * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
27  * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
28  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
29  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
30  * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  * Please inquire about commercial licensing options at
34  * [email protected]
35  *
36  */
37 
38 
39 #include <stdint.h>
40 #include <stdio.h>
41 #include <stdlib.h>
42 #include <string.h>
43 
44 #include "btstack.h"
45 
46 #define AVRCP_BROWSING_ENABLED 0
47 
48 #ifdef HAVE_BTSTACK_STDIN
49 #include "btstack_stdin.h"
50 #endif
51 
52 #ifdef HAVE_AUDIO_DMA
53 #include "btstack_ring_buffer.h"
54 #include "hal_audio_dma.h"
55 #endif
56 
57 #ifdef HAVE_PORTAUDIO
58 #include "btstack_ring_buffer.h"
59 #include <portaudio.h>
60 #endif
61 
62 #ifdef HAVE_POSIX_FILE_IO
63 #include "wav_util.h"
64 #define STORE_SBC_TO_SBC_FILE
65 #define STORE_SBC_TO_WAV_FILE
66 #endif
67 
68 #if defined(HAVE_PORTAUDIO) || defined(STORE_SBC_TO_WAV_FILE) || defined(HAVE_AUDIO_DMA)
69 #define DECODE_SBC
70 #endif
71 
72 #define NUM_CHANNELS 2
73 #define BYTES_PER_FRAME     (2*NUM_CHANNELS)
74 #define MAX_SBC_FRAME_SIZE 120
75 
76 // SBC Decoder for WAV file or PortAudio
77 #ifdef DECODE_SBC
78 static btstack_sbc_decoder_state_t state;
79 static btstack_sbc_mode_t mode = SBC_MODE_STANDARD;
80 #endif
81 
82 #if defined(HAVE_PORTAUDIO) || defined (HAVE_AUDIO_DMA)
83 #define PREBUFFER_MS        200
84 static int audio_stream_started = 0;
85 static int audio_stream_paused = 0;
86 static btstack_ring_buffer_t ring_buffer;
87 #endif
88 
89 #ifdef HAVE_AUDIO_DMA
90 // below 30: add samples, 30-40: fine, above 40: drop samples
91 #define OPTIMAL_FRAMES_MIN 30
92 #define OPTIMAL_FRAMES_MAX 40
93 #define ADDITIONAL_FRAMES  10
94 #define DMA_AUDIO_FRAMES 128
95 #define DMA_MAX_FILL_FRAMES 1
96 #define NUM_AUDIO_BUFFERS 2
97 
98 static uint16_t audio_samples[(DMA_AUDIO_FRAMES + DMA_MAX_FILL_FRAMES)*2*NUM_AUDIO_BUFFERS];
99 static uint16_t audio_samples_len[NUM_AUDIO_BUFFERS];
100 static uint8_t ring_buffer_storage[(OPTIMAL_FRAMES_MAX + ADDITIONAL_FRAMES) * MAX_SBC_FRAME_SIZE];
101 static const uint16_t silent_buffer[DMA_AUDIO_FRAMES*2];
102 static volatile int playback_buffer;
103 static int write_buffer;
104 static uint8_t sbc_frame_size;
105 static int sbc_samples_fix;
106 #endif
107 
108 // PortAdudio - live playback
109 #ifdef HAVE_PORTAUDIO
110 #define PA_SAMPLE_TYPE      paInt16
111 #define SAMPLE_RATE 48000
112 #define FRAMES_PER_BUFFER   128
113 #define PREBUFFER_BYTES     (PREBUFFER_MS*SAMPLE_RATE/1000*BYTES_PER_FRAME)
114 static PaStream * stream;
115 static uint8_t ring_buffer_storage[2*PREBUFFER_BYTES];
116 #endif
117 
118 // WAV File
119 #ifdef STORE_SBC_TO_WAV_FILE
120 static int frame_count = 0;
121 static char * wav_filename = "avdtp_sink.wav";
122 #endif
123 
124 #ifdef STORE_SBC_TO_SBC_FILE
125 static FILE * sbc_file;
126 static char * sbc_filename = "avdtp_sink.sbc";
127 #endif
128 
129 typedef struct {
130     // bitmaps
131     uint8_t sampling_frequency_bitmap;
132     uint8_t channel_mode_bitmap;
133     uint8_t block_length_bitmap;
134     uint8_t subbands_bitmap;
135     uint8_t allocation_method_bitmap;
136     uint8_t min_bitpool_value;
137     uint8_t max_bitpool_value;
138 } adtvp_media_codec_information_sbc_t;
139 
140 typedef struct {
141     int reconfigure;
142     int num_channels;
143     int sampling_frequency;
144     int channel_mode;
145     int block_length;
146     int subbands;
147     int allocation_method;
148     int min_bitpool_value;
149     int max_bitpool_value;
150     int frames_per_buffer;
151 } avdtp_media_codec_configuration_sbc_t;
152 
153 #ifdef HAVE_BTSTACK_STDIN
154 // mac 2011: static bd_addr_t remote = {0x04, 0x0C, 0xCE, 0xE4, 0x85, 0xD3};
155 // pts: static bd_addr_t remote = {0x00, 0x1B, 0xDC, 0x08, 0x0A, 0xA5};
156 // mac 2013:
157 // mac 2013: static const char * device_addr_string = "84:38:35:65:d1:15";
158 // iPhone 5S:
159 static const char * device_addr_string = "54:E4:3A:26:A2:39";
160 #endif
161 
162 // bt dongle: -u 02-02 static bd_addr_t remote = {0x00, 0x02, 0x72, 0xDC, 0x31, 0xC1};
163 
164 static uint8_t  sdp_avdtp_sink_service_buffer[150];
165 static avdtp_media_codec_configuration_sbc_t sbc_configuration;
166 static uint16_t a2dp_cid = 0;
167 static uint8_t  local_seid = 0;
168 static uint8_t  value[100];
169 
170 typedef enum {
171     AVDTP_APPLICATION_IDLE,
172     AVDTP_APPLICATION_CONNECTED,
173     AVDTP_APPLICATION_STREAMING
174 } avdtp_application_state_t;
175 
176 avdtp_application_state_t app_state = AVDTP_APPLICATION_IDLE;
177 
178 static btstack_packet_callback_registration_t hci_event_callback_registration;
179 
180 static int media_initialized = 0;
181 
182 #ifdef HAVE_BTSTACK_STDIN
183 static bd_addr_t device_addr;
184 #endif
185 
186 static uint16_t avrcp_cid = 0;
187 static uint8_t sdp_avrcp_controller_service_buffer[200];
188 
189 #ifdef HAVE_PORTAUDIO
190 static int patestCallback( const void *inputBuffer, void *outputBuffer,
191                            unsigned long framesPerBuffer,
192                            const PaStreamCallbackTimeInfo* timeInfo,
193                            PaStreamCallbackFlags statusFlags,
194                            void *userData ) {
195 
196     /** patestCallback is called from different thread, don't use hci_dump / log_info here without additional checks */
197 
198     (void) timeInfo; /* Prevent unused variable warnings. */
199     (void) statusFlags;
200     (void) inputBuffer;
201     (void) userData;
202 
203     int bytes_to_copy = framesPerBuffer * BYTES_PER_FRAME;
204 
205     // fill with silence while paused
206     if (audio_stream_paused){
207 
208         if (btstack_ring_buffer_bytes_available(&ring_buffer) < PREBUFFER_BYTES){
209             // printf("PA: silence\n");
210             memset(outputBuffer, 0, bytes_to_copy);
211             return 0;
212         } else {
213             // resume playback
214             audio_stream_paused = 0;
215         }
216     }
217 
218     // get data from ringbuffer
219     uint32_t bytes_read = 0;
220     btstack_ring_buffer_read(&ring_buffer, outputBuffer, bytes_to_copy, &bytes_read);
221     bytes_to_copy -= bytes_read;
222 
223     // fill with 0 if not enough
224     if (bytes_to_copy){
225         memset(outputBuffer + bytes_read, 0, bytes_to_copy);
226         audio_stream_paused = 1;
227     }
228     return 0;
229 }
230 #endif
231 
232 #ifdef HAVE_AUDIO_DMA
233 static int next_buffer(int current){
234 	if (current == NUM_AUDIO_BUFFERS-1) return 0;
235 	return current + 1;
236 }
237 static uint8_t * start_of_buffer(int num){
238 	return (uint8_t *) &audio_samples[num * DMA_AUDIO_FRAMES * 2];
239 }
240 void hal_audio_dma_done(void){
241 	if (audio_stream_paused){
242 		hal_audio_dma_play((const uint8_t *) silent_buffer, DMA_AUDIO_FRAMES*4);
243 		return;
244 	}
245 	// next buffer
246 	int next_playback_buffer = next_buffer(playback_buffer);
247 	uint8_t * playback_data;
248 	if (next_playback_buffer == write_buffer){
249 
250 		// TODO: stop codec while playing silence when getting 'stream paused'
251 
252 		// start playing silence
253 		audio_stream_paused = 1;
254 		hal_audio_dma_play((const uint8_t *) silent_buffer, DMA_AUDIO_FRAMES*4);
255 		printf("%6u - paused - bytes in buffer %u\n", (int) btstack_run_loop_get_time_ms(), btstack_ring_buffer_bytes_available(&ring_buffer));
256 		return;
257 	}
258 	playback_buffer = next_playback_buffer;
259 	playback_data = start_of_buffer(playback_buffer);
260 	hal_audio_dma_play(playback_data, audio_samples_len[playback_buffer]);
261     // btstack_run_loop_embedded_trigger();
262 }
263 #endif
264 
265 #if defined(HAVE_PORTAUDIO) || defined(STORE_SBC_TO_WAV_FILE)
266 
267 static void handle_pcm_data(int16_t * data, int num_samples, int num_channels, int sample_rate, void * context){
268     UNUSED(sample_rate);
269     UNUSED(context);
270 
271 #ifdef STORE_SBC_TO_WAV_FILE
272     wav_writer_write_int16(num_samples*num_channels, data);
273     frame_count++;
274 #endif
275 
276 #ifdef HAVE_PORTAUDIO
277     // store pcm samples in ringbuffer
278     btstack_ring_buffer_write(&ring_buffer, (uint8_t *)data, num_samples*num_channels*2);
279 
280     if (!audio_stream_started){
281         audio_stream_paused  = 1;
282         /* -- start stream -- */
283         PaError err = Pa_StartStream(stream);
284         if (err != paNoError){
285             printf("Error starting the stream: \"%s\"\n",  Pa_GetErrorText(err));
286             return;
287         }
288         audio_stream_started = 1;
289     }
290 #endif
291 
292 }
293 #endif
294 
295 
296 #ifdef HAVE_AUDIO_DMA
297 
298 static void handle_pcm_data(int16_t * data, int num_samples, int num_channels, int sample_rate, void * context){
299     UNUSED(sample_rate);
300     UNUSED(context);
301 
302     // store in ring buffer
303     uint8_t * write_data = start_of_buffer(write_buffer);
304     uint16_t len = num_samples*num_channels*2;
305     memcpy(write_data, data, len);
306     audio_samples_len[write_buffer] = len;
307 
308     // add/drop audio frame to fix drift
309     if (sbc_samples_fix > 0){
310         memcpy(write_data + len, write_data + len - 4, 4);
311         audio_samples_len[write_buffer] += 4;
312     }
313     if (sbc_samples_fix < 0){
314         audio_samples_len[write_buffer] -= 4;
315     }
316 
317     write_buffer = next_buffer(write_buffer);
318 }
319 
320 static void hal_audio_dma_process(btstack_data_source_t * ds, btstack_data_source_callback_type_t callback_type){
321 	UNUSED(ds);
322 	UNUSED(callback_type);
323 
324 	if (!media_initialized) return;
325 
326 	int trigger_resume = 0;
327 	if (audio_stream_paused) {
328 		if (sbc_frame_size && btstack_ring_buffer_bytes_available(&ring_buffer) >= OPTIMAL_FRAMES_MIN * sbc_frame_size){
329 			trigger_resume = 1;
330 			// reset buffers
331 			playback_buffer = NUM_AUDIO_BUFFERS - 1;
332 			write_buffer = 0;
333 		} else {
334 			return;
335 		}
336 	}
337 
338 	while (playback_buffer != write_buffer && btstack_ring_buffer_bytes_available(&ring_buffer) >= sbc_frame_size ){
339 		uint8_t frame[MAX_SBC_FRAME_SIZE];
340 	    uint32_t bytes_read = 0;
341 	    btstack_ring_buffer_read(&ring_buffer, frame, sbc_frame_size, &bytes_read);
342 	    btstack_sbc_decoder_process_data(&state, 0, frame, sbc_frame_size);
343 	}
344 
345 	if (trigger_resume){
346 		printf("%6u - resume\n", (int) btstack_run_loop_get_time_ms());
347 		audio_stream_paused = 0;
348 	}
349 }
350 
351 #endif
352 
353 static int media_processing_init(avdtp_media_codec_configuration_sbc_t configuration){
354     if (media_initialized) return 0;
355 
356 #ifdef DECODE_SBC
357     btstack_sbc_decoder_init(&state, mode, handle_pcm_data, NULL);
358 #endif
359 
360 #ifdef STORE_SBC_TO_WAV_FILE
361     wav_writer_open(wav_filename, configuration.num_channels, configuration.sampling_frequency);
362 #endif
363 
364 #ifdef STORE_SBC_TO_SBC_FILE
365    sbc_file = fopen(sbc_filename, "wb");
366 #endif
367 
368 #ifdef HAVE_PORTAUDIO
369     // int frames_per_buffer = configuration.frames_per_buffer;
370     PaError err;
371     PaStreamParameters outputParameters;
372     const PaDeviceInfo *deviceInfo;
373 
374     /* -- initialize PortAudio -- */
375     err = Pa_Initialize();
376     if (err != paNoError){
377         printf("Error initializing portaudio: \"%s\"\n",  Pa_GetErrorText(err));
378         return err;
379     }
380     /* -- setup input and output -- */
381     outputParameters.device = Pa_GetDefaultOutputDevice(); /* default output device */
382     outputParameters.channelCount = configuration.num_channels;
383     outputParameters.sampleFormat = PA_SAMPLE_TYPE;
384     outputParameters.suggestedLatency = Pa_GetDeviceInfo( outputParameters.device )->defaultHighOutputLatency;
385     outputParameters.hostApiSpecificStreamInfo = NULL;
386     deviceInfo = Pa_GetDeviceInfo( outputParameters.device );
387     printf("PortAudio: Output device: %s\n", deviceInfo->name);
388     log_info("PortAudio: Output device: %s", deviceInfo->name);
389     /* -- setup stream -- */
390     err = Pa_OpenStream(
391            &stream,
392            NULL,                /* &inputParameters */
393            &outputParameters,
394 		   configuration.sampling_frequency,
395            0,
396            paClipOff,           /* we won't output out of range samples so don't bother clipping them */
397            patestCallback,      /* use callback */
398            NULL );
399 
400     if (err != paNoError){
401         printf("Error initializing portaudio: \"%s\"\n",  Pa_GetErrorText(err));
402         return err;
403     }
404     log_info("PortAudio: stream opened");
405     printf("PortAudio: stream opened\n");
406 #endif
407 #ifdef HAVE_AUDIO_DMA
408     audio_stream_paused  = 1;
409     hal_audio_dma_init(configuration.sampling_frequency);
410     hal_audio_dma_set_audio_played(&hal_audio_dma_done);
411     // start playing silence
412     hal_audio_dma_done();
413 #endif
414 
415  #if defined(HAVE_PORTAUDIO) || defined (HAVE_AUDIO_DMA)
416     memset(ring_buffer_storage, 0, sizeof(ring_buffer_storage));
417     btstack_ring_buffer_init(&ring_buffer, ring_buffer_storage, sizeof(ring_buffer_storage));
418     audio_stream_started = 0;
419 #endif
420     media_initialized = 1;
421     return 0;
422 }
423 
424 static void media_processing_close(void){
425     if (!media_initialized) return;
426     media_initialized = 0;
427 
428 #ifdef STORE_SBC_TO_WAV_FILE
429     wav_writer_close();
430     int total_frames_nr = state.good_frames_nr + state.bad_frames_nr + state.zero_frames_nr;
431 
432     printf("WAV Writer: Decoding done. Processed totaly %d frames:\n - %d good\n - %d bad\n - %d zero frames\n", total_frames_nr, state.good_frames_nr, state.bad_frames_nr, state.zero_frames_nr);
433     printf("WAV Writer: Written %d frames to wav file: %s\n", frame_count, wav_filename);
434 #endif
435 
436 #ifdef STORE_SBC_TO_SBC_FILE
437     fclose(sbc_file);
438 #endif
439 
440 #if defined(HAVE_PORTAUDIO) || defined (HAVE_AUDIO_DMA)
441     audio_stream_started = 0;
442 #endif
443 
444 #ifdef HAVE_PORTAUDIO
445     printf("PortAudio: Steram closed\n");
446     log_info("PortAudio: Stream closed");
447 
448     PaError err = Pa_StopStream(stream);
449     if (err != paNoError){
450         printf("Error stopping the stream: \"%s\"\n",  Pa_GetErrorText(err));
451         log_error("Error stopping the stream: \"%s\"",  Pa_GetErrorText(err));
452         return;
453     }
454     err = Pa_CloseStream(stream);
455     if (err != paNoError){
456         printf("Error closing the stream: \"%s\"\n",  Pa_GetErrorText(err));
457         log_error("Error closing the stream: \"%s\"",  Pa_GetErrorText(err));
458         return;
459     }
460     err = Pa_Terminate();
461     if (err != paNoError){
462         printf("Error terminating portaudio: \"%s\"\n",  Pa_GetErrorText(err));
463         log_error("Error terminating portaudio: \"%s\"",  Pa_GetErrorText(err));
464         return;
465     }
466 #endif
467 
468 #ifdef HAVE_AUDIO_DMA
469     hal_audio_dma_close();
470 #endif
471 }
472 
473 static void handle_l2cap_media_data_packet(uint8_t seid, uint8_t *packet, uint16_t size){
474     UNUSED(seid);
475     int pos = 0;
476 
477     avdtp_media_packet_header_t media_header;
478     media_header.version = packet[pos] & 0x03;
479     media_header.padding = get_bit16(packet[pos],2);
480     media_header.extension = get_bit16(packet[pos],3);
481     media_header.csrc_count = (packet[pos] >> 4) & 0x0F;
482 
483     pos++;
484 
485     media_header.marker = get_bit16(packet[pos],0);
486     media_header.payload_type  = (packet[pos] >> 1) & 0x7F;
487     pos++;
488 
489     media_header.sequence_number = big_endian_read_16(packet, pos);
490     pos+=2;
491 
492     media_header.timestamp = big_endian_read_32(packet, pos);
493     pos+=4;
494 
495     media_header.synchronization_source = big_endian_read_32(packet, pos);
496     pos+=4;
497 
498     UNUSED(media_header);
499 
500     // TODO: read csrc list
501 
502     // printf_hexdump( packet, pos );
503     // printf("MEDIA HEADER: %u timestamp, version %u, padding %u, extension %u, csrc_count %u\n",
504     //     media_header.timestamp, media_header.version, media_header.padding, media_header.extension, media_header.csrc_count);
505     // printf("MEDIA HEADER: marker %02x, payload_type %02x, sequence_number %u, synchronization_source %u\n",
506     //     media_header.marker, media_header.payload_type, media_header.sequence_number, media_header.synchronization_source);
507 
508     avdtp_sbc_codec_header_t sbc_header;
509     sbc_header.fragmentation = get_bit16(packet[pos], 7);
510     sbc_header.starting_packet = get_bit16(packet[pos], 6);
511     sbc_header.last_packet = get_bit16(packet[pos], 5);
512     sbc_header.num_frames = packet[pos] & 0x0f;
513     pos++;
514 
515 #ifdef HAVE_AUDIO_DMA
516     // store sbc frame size for buffer management
517     sbc_frame_size = (size-pos)/ sbc_header.num_frames;
518 #endif
519 
520     UNUSED(sbc_header);
521     // printf("SBC HEADER: num_frames %u, fragmented %u, start %u, stop %u\n", sbc_header.num_frames, sbc_header.fragmentation, sbc_header.starting_packet, sbc_header.last_packet);
522     // printf_hexdump( packet+pos, size-pos );
523 
524 #if defined(HAVE_PORTAUDIO) || defined(STORE_SBC_TO_WAV_FILE)
525     btstack_sbc_decoder_process_data(&state, 0, packet+pos, size-pos);
526 #endif
527 
528 #ifdef HAVE_AUDIO_DMA
529     btstack_ring_buffer_write(&ring_buffer,  packet+pos, size-pos);
530 
531     // decide on audio sync drift based on number of sbc frames in queue
532     int sbc_frames_in_buffer = btstack_ring_buffer_bytes_available(&ring_buffer) / sbc_frame_size;
533     if (sbc_frames_in_buffer < OPTIMAL_FRAMES_MIN){
534     	sbc_samples_fix = 1;	// duplicate last sample
535     } else if (sbc_frames_in_buffer <= OPTIMAL_FRAMES_MAX){
536     	sbc_samples_fix = 0;	// nothing to do
537     } else {
538     	sbc_samples_fix = -1;	// drop last sample
539     }
540 
541     // dump
542     printf("%6u %03u %d\n",  (int) btstack_run_loop_get_time_ms(), sbc_frames_in_buffer, sbc_samples_fix);
543 
544 #endif
545 
546 #ifdef STORE_SBC_TO_SBC_FILE
547     fwrite(packet+pos, size-pos, 1, sbc_file);
548 #endif
549 }
550 
551 static void dump_sbc_configuration(avdtp_media_codec_configuration_sbc_t configuration){
552     printf(" -- a2dp sink demo: Received media codec configuration:\n");
553     printf("    - num_channels: %d\n", configuration.num_channels);
554     printf("    - sampling_frequency: %d\n", configuration.sampling_frequency);
555     printf("    - channel_mode: %d\n", configuration.channel_mode);
556     printf("    - block_length: %d\n", configuration.block_length);
557     printf("    - subbands: %d\n", configuration.subbands);
558     printf("    - allocation_method: %d\n", configuration.allocation_method);
559     printf("    - bitpool_value [%d, %d] \n", configuration.min_bitpool_value, configuration.max_bitpool_value);
560     printf("\n");
561 }
562 
563 static void avrcp_controller_packet_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
564     UNUSED(channel);
565     UNUSED(size);
566     uint16_t local_cid;
567     uint8_t  status = 0xFF;
568     bd_addr_t adress;
569 
570     if (packet_type != HCI_EVENT_PACKET) return;
571     if (hci_event_packet_get_type(packet) != HCI_EVENT_AVRCP_META) return;
572     switch (packet[2]){
573         case AVRCP_SUBEVENT_CONNECTION_ESTABLISHED: {
574             local_cid = avrcp_subevent_connection_established_get_avrcp_cid(packet);
575             if (avrcp_cid != 0 && avrcp_cid != local_cid) {
576                 printf("AVRCP Connection failed, expected 0x%02X l2cap cid, received 0x%02X\n", avrcp_cid, local_cid);
577                 return;
578             }
579 
580             status = avrcp_subevent_connection_established_get_status(packet);
581             if (status != ERROR_CODE_SUCCESS){
582                 printf("AVRCP Connection failed: status 0x%02x\n", status);
583                 avrcp_cid = 0;
584                 return;
585             }
586 
587             avrcp_cid = local_cid;
588             avrcp_subevent_connection_established_get_bd_addr(packet, adress);
589             printf("Channel successfully opened: %s, avrcp_cid 0x%02x\n", bd_addr_to_str(adress), avrcp_cid);
590 
591             // automatically enable notifications
592             avrcp_controller_enable_notification(avrcp_cid, AVRCP_NOTIFICATION_EVENT_PLAYBACK_STATUS_CHANGED);
593             avrcp_controller_enable_notification(avrcp_cid, AVRCP_NOTIFICATION_EVENT_NOW_PLAYING_CONTENT_CHANGED);
594             return;
595         }
596         case AVRCP_SUBEVENT_CONNECTION_RELEASED:
597             printf("Channel released: avrcp_cid 0x%02x\n", avrcp_subevent_connection_released_get_avrcp_cid(packet));
598             avrcp_cid = 0;
599             return;
600         default:
601             break;
602     }
603 
604     status = packet[5];
605     if (!avrcp_cid) return;
606 
607     // avoid printing INTERIM status
608     if (status == AVRCP_CTYPE_RESPONSE_INTERIM) return;
609 
610     printf("AVRCP: command status: %s, ", avrcp_ctype2str(status));
611     switch (packet[2]){
612         case AVRCP_SUBEVENT_NOTIFICATION_PLAYBACK_STATUS_CHANGED:
613             printf("notification, playback status changed %s\n", avrcp_play_status2str(avrcp_subevent_notification_playback_status_changed_get_play_status(packet)));
614             return;
615         case AVRCP_SUBEVENT_NOTIFICATION_NOW_PLAYING_CONTENT_CHANGED:
616             printf("notification, playing content changed\n");
617             return;
618         case AVRCP_SUBEVENT_NOTIFICATION_TRACK_CHANGED:
619             printf("notification track changed\n");
620             return;
621         case AVRCP_SUBEVENT_NOTIFICATION_VOLUME_CHANGED:
622             printf("notification absolute volume changed %d\n", avrcp_subevent_notification_volume_changed_get_absolute_volume(packet));
623             return;
624         case AVRCP_SUBEVENT_NOTIFICATION_AVAILABLE_PLAYERS_CHANGED:
625             printf("notification changed\n");
626             return;
627         case AVRCP_SUBEVENT_SHUFFLE_AND_REPEAT_MODE:{
628             uint8_t shuffle_mode = avrcp_subevent_shuffle_and_repeat_mode_get_shuffle_mode(packet);
629             uint8_t repeat_mode  = avrcp_subevent_shuffle_and_repeat_mode_get_repeat_mode(packet);
630             printf("%s, %s\n", avrcp_shuffle2str(shuffle_mode), avrcp_repeat2str(repeat_mode));
631             break;
632         }
633         case AVRCP_SUBEVENT_NOW_PLAYING_TITLE_INFO:
634             printf("AVRCP_SUBEVENT_NOW_PLAYING_TITLE_INFO len %d \n", avrcp_subevent_now_playing_title_info_get_value_len(packet));
635             if (avrcp_subevent_now_playing_title_info_get_value_len(packet) > 0){
636                 memcpy(value, avrcp_subevent_now_playing_title_info_get_value(packet), avrcp_subevent_now_playing_title_info_get_value_len(packet));
637                 printf("    Title: %s\n", value);
638             }
639             break;
640 
641         case AVRCP_SUBEVENT_NOW_PLAYING_ARTIST_INFO:
642             if (avrcp_subevent_now_playing_artist_info_get_value_len(packet) > 0){
643                 memcpy(value, avrcp_subevent_now_playing_artist_info_get_value(packet), avrcp_subevent_now_playing_artist_info_get_value_len(packet));
644                 printf("    Title: %s\n", value);
645             }
646             break;
647 
648         case AVRCP_SUBEVENT_NOW_PLAYING_ALBUM_INFO:
649             if (avrcp_subevent_now_playing_album_info_get_value_len(packet) > 0){
650                 memcpy(value, avrcp_subevent_now_playing_album_info_get_value(packet), avrcp_subevent_now_playing_album_info_get_value_len(packet));
651                 printf("    Title: %s\n", value);
652             }
653             break;
654 
655         case AVRCP_SUBEVENT_NOW_PLAYING_GENRE_INFO:
656             if (avrcp_subevent_now_playing_genre_info_get_value_len(packet) > 0){
657                 memcpy(value, avrcp_subevent_now_playing_genre_info_get_value(packet), avrcp_subevent_now_playing_genre_info_get_value_len(packet));
658                 printf("    Title: %s\n", value);
659             }
660             break;
661 
662         // case AVRCP_SUBEVENT_NOW_PLAYING_INFO:{
663         //     uint8_t value[100];
664         //     printf("now playing: \n");
665         //     if (avrcp_subevent_now_playing_info_get_title_len(packet) > 0){
666         //         memcpy(value, avrcp_subevent_now_playing_info_get_title(packet), avrcp_subevent_now_playing_info_get_title_len(packet));
667         //         printf("    Title: %s\n", value);
668         //     }
669         //     if (avrcp_subevent_now_playing_info_get_album_len(packet) > 0){
670         //         memcpy(value, avrcp_subevent_now_playing_info_get_album(packet), avrcp_subevent_now_playing_info_get_album_len(packet));
671         //         printf("    Album: %s\n", value);
672         //     }
673         //     if (avrcp_subevent_now_playing_info_get_artist_len(packet) > 0){
674         //         memcpy(value, avrcp_subevent_now_playing_info_get_artist(packet), avrcp_subevent_now_playing_info_get_artist_len(packet));
675         //         printf("    Artist: %s\n", value);
676         //     }
677         //     if (avrcp_subevent_now_playing_info_get_genre_len(packet) > 0){
678         //         memcpy(value, avrcp_subevent_now_playing_info_get_genre(packet), avrcp_subevent_now_playing_info_get_genre_len(packet));
679         //         printf("    Genre: %s\n", value);
680         //     }
681         //     printf("    Track: %d\n", avrcp_subevent_now_playing_info_get_track(packet));
682         //     printf("    Total nr. tracks: %d\n", avrcp_subevent_now_playing_info_get_total_tracks(packet));
683         //     printf("    Song length: %d ms\n", avrcp_subevent_now_playing_info_get_song_length(packet));
684         //     break;
685         // }
686         case AVRCP_SUBEVENT_PLAY_STATUS:
687             printf("song length: %d ms, song position: %d ms, play status: %s\n",
688                 avrcp_subevent_play_status_get_song_length(packet),
689                 avrcp_subevent_play_status_get_song_position(packet),
690                 avrcp_play_status2str(avrcp_subevent_play_status_get_play_status(packet)));
691             break;
692         case AVRCP_SUBEVENT_OPERATION_COMPLETE:
693             printf("operation done %s\n", avrcp_operation2str(avrcp_subevent_operation_complete_get_operation_id(packet)));
694             break;
695         case AVRCP_SUBEVENT_OPERATION_START:
696             printf("operation start %s\n", avrcp_operation2str(avrcp_subevent_operation_complete_get_operation_id(packet)));
697             break;
698         case AVRCP_SUBEVENT_PLAYER_APPLICATION_VALUE_RESPONSE:
699             // response to set shuffle and repeat mode
700             printf("\n");
701             break;
702         default:
703             printf("Not implemented\n");
704             break;
705     }
706 }
707 
708 static void packet_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
709     UNUSED(channel);
710     UNUSED(size);
711     uint16_t cid;
712     bd_addr_t address;
713     uint8_t status;
714 
715     if (packet_type != HCI_EVENT_PACKET) return;
716     if (hci_event_packet_get_type(packet) != HCI_EVENT_A2DP_META) return;
717 
718     switch (packet[2]){
719         case A2DP_SUBEVENT_SIGNALING_MEDIA_CODEC_OTHER_CONFIGURATION:
720             printf(" -- a2dp sink demo: received non SBC codec. not implemented.\n");
721             break;
722         case A2DP_SUBEVENT_SIGNALING_MEDIA_CODEC_SBC_CONFIGURATION:{
723             printf(" -- a2dp sink demo: received SBC codec configuration.\n");
724             sbc_configuration.reconfigure = a2dp_subevent_signaling_media_codec_sbc_configuration_get_reconfigure(packet);
725             sbc_configuration.num_channels = a2dp_subevent_signaling_media_codec_sbc_configuration_get_num_channels(packet);
726             sbc_configuration.sampling_frequency = a2dp_subevent_signaling_media_codec_sbc_configuration_get_sampling_frequency(packet);
727             sbc_configuration.channel_mode = a2dp_subevent_signaling_media_codec_sbc_configuration_get_channel_mode(packet);
728             sbc_configuration.block_length = a2dp_subevent_signaling_media_codec_sbc_configuration_get_block_length(packet);
729             sbc_configuration.subbands = a2dp_subevent_signaling_media_codec_sbc_configuration_get_subbands(packet);
730             sbc_configuration.allocation_method = a2dp_subevent_signaling_media_codec_sbc_configuration_get_allocation_method(packet);
731             sbc_configuration.min_bitpool_value = a2dp_subevent_signaling_media_codec_sbc_configuration_get_min_bitpool_value(packet);
732             sbc_configuration.max_bitpool_value = a2dp_subevent_signaling_media_codec_sbc_configuration_get_max_bitpool_value(packet);
733             sbc_configuration.frames_per_buffer = sbc_configuration.subbands * sbc_configuration.block_length;
734             dump_sbc_configuration(sbc_configuration);
735 
736             if (sbc_configuration.reconfigure){
737                 media_processing_close();
738             }
739             // prepare media processing
740             media_processing_init(sbc_configuration);
741             break;
742         }
743         case A2DP_SUBEVENT_STREAM_ESTABLISHED:
744             a2dp_subevent_stream_established_get_bd_addr(packet, address);
745             status = a2dp_subevent_stream_established_get_status(packet);
746             cid = a2dp_subevent_stream_established_get_a2dp_cid(packet);
747             printf("A2DP_SUBEVENT_STREAM_ESTABLISHED %d, %d \n", cid, a2dp_cid);
748             if (!a2dp_cid){
749                 // incoming connection
750                 a2dp_cid = cid;
751             } else if (cid != a2dp_cid) {
752                 break;
753             }
754             if (status){
755                 app_state = AVDTP_APPLICATION_IDLE;
756                 printf(" -- a2dp sink demo: streaming connection failed, status 0x%02x\n", status);
757                 break;
758             }
759             printf(" -- a2dp sink demo: streaming connection is established, address %s, a2dp cid 0x%02X, local_seid %d\n", bd_addr_to_str(address), a2dp_cid, local_seid);
760             local_seid = a2dp_subevent_stream_established_get_local_seid(packet);
761             app_state = AVDTP_APPLICATION_STREAMING;
762             break;
763 
764         case A2DP_SUBEVENT_STREAM_STARTED:
765             cid = a2dp_subevent_stream_started_get_a2dp_cid(packet);
766             if (cid != a2dp_cid) break;
767             local_seid = a2dp_subevent_stream_started_get_local_seid(packet);
768             printf(" -- a2dp sink demo: stream started, a2dp cid 0x%02X, local_seid %d\n", a2dp_cid, local_seid);
769             // started
770             media_processing_init(sbc_configuration);
771             break;
772 
773         case A2DP_SUBEVENT_STREAM_SUSPENDED:
774             cid = a2dp_subevent_stream_suspended_get_a2dp_cid(packet);
775             if (cid != a2dp_cid) break;
776             local_seid = a2dp_subevent_stream_suspended_get_local_seid(packet);
777             printf(" -- a2dp sink demo: stream paused, a2dp cid 0x%02X, local_seid %d\n", a2dp_cid, local_seid);
778             // paused/stopped
779             media_processing_close();
780             break;
781 
782         case A2DP_SUBEVENT_STREAM_RELEASED:
783             cid = a2dp_subevent_stream_released_get_a2dp_cid(packet);
784             if (cid != a2dp_cid) {
785                 printf(" -- a2dp sink demo: unexpected cid 0x%02x instead of 0x%02x\n", cid, a2dp_cid);
786                 break;
787             }
788             local_seid = a2dp_subevent_stream_released_get_local_seid(packet);
789             app_state = AVDTP_APPLICATION_IDLE;
790             printf(" -- a2dp sink demo: stream released, a2dp cid 0x%02X, local_seid %d\n", a2dp_cid, local_seid);
791 
792             // paused/stopped
793             media_processing_close();
794             break;
795         case A2DP_SUBEVENT_SIGNALING_CONNECTION_RELEASED:
796             cid = a2dp_subevent_signaling_connection_released_get_a2dp_cid(packet);
797             if (cid != a2dp_cid) {
798                 printf(" -- a2dp sink demo: unexpected cid 0x%02x instead of 0x%02x\n", cid, a2dp_cid);
799                 break;
800             }
801             app_state = AVDTP_APPLICATION_IDLE;
802             printf(" -- a2dp sink demo: signaling connection released\n");
803             break;
804         default:
805             printf(" -- a2dp sink demo: not parsed 0x%02x\n", packet[2]);
806             break;
807     }
808 }
809 
810 #ifdef HAVE_BTSTACK_STDIN
811 static void show_usage(void){
812     bd_addr_t      iut_address;
813     gap_local_bd_addr(iut_address);
814     printf("\n--- Bluetooth AVDTP Sink/AVRCP Connection Test Console %s ---\n", bd_addr_to_str(iut_address));
815     printf("b      - AVDTP Sink create  connection to addr %s\n", device_addr_string);
816     printf("B      - AVDTP Sink disconnect\n");
817     printf("c      - AVRCP create connection to addr %s\n", device_addr_string);
818     printf("C      - AVRCP disconnect\n");
819 
820     printf("\n--- Bluetooth AVRCP Commands %s ---\n", bd_addr_to_str(iut_address));
821     printf("O - get play status\n");
822     printf("j - get now playing info\n");
823     printf("k - play\n");
824     printf("K - stop\n");
825     printf("L - pause\n");
826     printf("u - start fast forward\n");
827     printf("U - stop  fast forward\n");
828     printf("n - start rewind\n");
829     printf("N - stop rewind\n");
830     printf("i - forward\n");
831     printf("I - backward\n");
832     printf("t - volume up\n");
833     printf("T - volume down\n");
834     printf("p - absolute volume of 50 percent\n");
835     printf("M - mute\n");
836     printf("r - skip\n");
837     printf("q - query repeat and shuffle mode\n");
838     printf("v - repeat single track\n");
839     printf("x - repeat all tracks\n");
840     printf("X - disable repeat mode\n");
841     printf("z - shuffle all tracks\n");
842     printf("Z - disable shuffle mode\n");
843     printf("---\n");
844 }
845 #endif
846 
847 static uint8_t media_sbc_codec_capabilities[] = {
848     0xFF,//(AVDTP_SBC_44100 << 4) | AVDTP_SBC_STEREO,
849     0xFF,//(AVDTP_SBC_BLOCK_LENGTH_16 << 4) | (AVDTP_SBC_SUBBANDS_8 << 2) | AVDTP_SBC_ALLOCATION_METHOD_LOUDNESS,
850     2, 53
851 };
852 
853 static uint8_t media_sbc_codec_configuration[] = {
854     (AVDTP_SBC_44100 << 4) | AVDTP_SBC_STEREO,
855     (AVDTP_SBC_BLOCK_LENGTH_16 << 4) | (AVDTP_SBC_SUBBANDS_8 << 2) | AVDTP_SBC_ALLOCATION_METHOD_LOUDNESS,
856     2, 53
857 };
858 
859 #ifdef HAVE_BTSTACK_STDIN
860 static void stdin_process(char cmd){
861     uint8_t status = ERROR_CODE_SUCCESS;
862     switch (cmd){
863         case 'b':
864             status = a2dp_sink_establish_stream(device_addr, local_seid, &a2dp_cid);
865             printf(" - Create AVDTP connection to addr %s, and local seid %d, expected cid 0x%02x.\n", bd_addr_to_str(device_addr), local_seid, a2dp_cid);
866             break;
867         case 'B':
868             printf(" - AVDTP disconnect from addr %s.\n", bd_addr_to_str(device_addr));
869             status = avdtp_sink_disconnect(a2dp_cid);
870             break;
871         case 'c':
872             printf(" - Create AVRCP connection to addr %s.\n", bd_addr_to_str(device_addr));
873             status = avrcp_controller_connect(device_addr, &avrcp_cid);
874             break;
875         case 'C':
876             printf(" - AVRCP disconnect from addr %s.\n", bd_addr_to_str(device_addr));
877             status = avrcp_controller_disconnect(avrcp_cid);
878             break;
879 
880         case '\n':
881         case '\r':
882             break;
883         case 'O':
884             printf(" - get play status\n");
885             status = avrcp_controller_get_play_status(avrcp_cid);
886             break;
887         case 'j':
888             printf(" - get now playing info\n");
889             status = avrcp_controller_get_now_playing_info(avrcp_cid);
890             break;
891         case 'k':
892             printf(" - play\n");
893             status = avrcp_controller_play(avrcp_cid);
894             break;
895         case 'K':
896             printf(" - stop\n");
897             status = avrcp_controller_stop(avrcp_cid);
898             break;
899         case 'L':
900             printf(" - pause\n");
901             status = avrcp_controller_pause(avrcp_cid);
902             break;
903         case 'u':
904             printf(" - start fast forward\n");
905             status = avrcp_controller_start_fast_forward(avrcp_cid);
906             break;
907         case 'U':
908             printf(" - stop fast forward\n");
909             status = avrcp_controller_stop_fast_forward(avrcp_cid);
910             break;
911         case 'n':
912             printf(" - start rewind\n");
913             status = avrcp_controller_start_rewind(avrcp_cid);
914             break;
915         case 'N':
916             printf(" - stop rewind\n");
917             status = avrcp_controller_stop_rewind(avrcp_cid);
918             break;
919         case 'i':
920             printf(" - forward\n");
921             status = avrcp_controller_forward(avrcp_cid);
922             break;
923         case 'I':
924             printf(" - backward\n");
925             status = avrcp_controller_backward(avrcp_cid);
926             break;
927         case 't':
928             printf(" - volume up\n");
929             status = avrcp_controller_volume_up(avrcp_cid);
930             break;
931         case 'T':
932             printf(" - volume down\n");
933             status = avrcp_controller_volume_down(avrcp_cid);
934             break;
935         case 'p':
936             printf(" - absolute volume of 50 percent\n");
937             status = avrcp_controller_set_absolute_volume(avrcp_cid, 50);
938             break;
939         case 'M':
940             printf(" - mute\n");
941             status = avrcp_controller_mute(avrcp_cid);
942             break;
943         case 'r':
944             printf(" - skip\n");
945             status = avrcp_controller_skip(avrcp_cid);
946             break;
947         case 'q':
948             printf(" - query repeat and shuffle mode\n");
949             status = avrcp_controller_query_shuffle_and_repeat_modes(avrcp_cid);
950             break;
951         case 'v':
952             printf(" - repeat single track\n");
953             status = avrcp_controller_set_repeat_mode(avrcp_cid, AVRCP_REPEAT_MODE_SINGLE_TRACK);
954             break;
955         case 'x':
956             printf(" - repeat all tracks\n");
957             status = avrcp_controller_set_repeat_mode(avrcp_cid, AVRCP_REPEAT_MODE_ALL_TRACKS);
958             break;
959         case 'X':
960             printf(" - disable repeat mode\n");
961             status = avrcp_controller_set_repeat_mode(avrcp_cid, AVRCP_REPEAT_MODE_OFF);
962             break;
963         case 'z':
964             printf(" - shuffle all tracks\n");
965             status = avrcp_controller_set_shuffle_mode(avrcp_cid, AVRCP_SHUFFLE_MODE_ALL_TRACKS);
966             break;
967         case 'Z':
968             printf(" - disable shuffle mode\n");
969             status = avrcp_controller_set_shuffle_mode(avrcp_cid, AVRCP_SHUFFLE_MODE_OFF);
970             break;
971         default:
972             show_usage();
973             return;
974     }
975     if (status != ERROR_CODE_SUCCESS){
976         printf("Could not perform command, status 0x%2x\n", status);
977     }
978 }
979 #endif
980 
981 
982 int btstack_main(int argc, const char * argv[]);
983 int btstack_main(int argc, const char * argv[]){
984 
985     UNUSED(argc);
986     (void)argv;
987 
988     /* Register for HCI events */
989     hci_event_callback_registration.callback = &packet_handler;
990     hci_add_event_handler(&hci_event_callback_registration);
991 
992     l2cap_init();
993     // Initialize AVDTP Sink
994     a2dp_sink_init();
995     a2dp_sink_register_packet_handler(&packet_handler);
996     a2dp_sink_register_media_handler(&handle_l2cap_media_data_packet);
997 
998     uint8_t status = a2dp_sink_create_stream_endpoint(AVDTP_AUDIO, AVDTP_CODEC_SBC, media_sbc_codec_capabilities, sizeof(media_sbc_codec_capabilities), media_sbc_codec_configuration, sizeof(media_sbc_codec_configuration), &local_seid);
999     if (status != ERROR_CODE_SUCCESS){
1000         printf("A2DP Sink: not enough memory to create local stream endpoint\n");
1001         return 1;
1002     }
1003     // Initialize AVRCP COntroller
1004     avrcp_controller_init();
1005     avrcp_controller_register_packet_handler(&avrcp_controller_packet_handler);
1006 
1007     // Initialize SDP
1008     sdp_init();
1009     // setup AVDTP sink
1010     memset(sdp_avdtp_sink_service_buffer, 0, sizeof(sdp_avdtp_sink_service_buffer));
1011     a2dp_sink_create_sdp_record(sdp_avdtp_sink_service_buffer, 0x10001, 1, NULL, NULL);
1012     sdp_register_service(sdp_avdtp_sink_service_buffer);
1013 
1014     // setup AVRCP
1015     memset(sdp_avrcp_controller_service_buffer, 0, sizeof(sdp_avrcp_controller_service_buffer));
1016     avrcp_controller_create_sdp_record(sdp_avrcp_controller_service_buffer, 0x10001, AVRCP_BROWSING_ENABLED, 1, NULL, NULL);
1017     sdp_register_service(sdp_avrcp_controller_service_buffer);
1018 
1019     gap_set_local_name("A2DP Sink Demo 00:00:00:00:00:00");
1020     gap_discoverable_control(1);
1021     gap_set_class_of_device(0x200408);
1022     printf("Starting BTstack ...\n");
1023     // turn on!
1024     hci_power_control(HCI_POWER_ON);
1025 
1026 #ifdef HAVE_AUDIO_DMA
1027     static btstack_data_source_t hal_audio_dma_data_source;
1028     // set up polling data_source
1029     btstack_run_loop_set_data_source_handler(&hal_audio_dma_data_source, &hal_audio_dma_process);
1030     btstack_run_loop_enable_data_source_callbacks(&hal_audio_dma_data_source, DATA_SOURCE_CALLBACK_POLL);
1031     btstack_run_loop_add_data_source(&hal_audio_dma_data_source);
1032 #endif
1033 
1034 #ifdef HAVE_BTSTACK_STDIN
1035     // parse human readable Bluetooth address
1036     sscanf_bd_addr(device_addr_string, device_addr);
1037     btstack_stdin_setup(stdin_process);
1038 #endif
1039 
1040     return 0;
1041 }
1042