1fffdd288SMatthias Ringwald /* 2fffdd288SMatthias Ringwald * Copyright (C) 2014 BlueKitchen GmbH 3fffdd288SMatthias Ringwald * 4fffdd288SMatthias Ringwald * Redistribution and use in source and binary forms, with or without 5fffdd288SMatthias Ringwald * modification, are permitted provided that the following conditions 6fffdd288SMatthias Ringwald * are met: 7fffdd288SMatthias Ringwald * 8fffdd288SMatthias Ringwald * 1. Redistributions of source code must retain the above copyright 9fffdd288SMatthias Ringwald * notice, this list of conditions and the following disclaimer. 10fffdd288SMatthias Ringwald * 2. Redistributions in binary form must reproduce the above copyright 11fffdd288SMatthias Ringwald * notice, this list of conditions and the following disclaimer in the 12fffdd288SMatthias Ringwald * documentation and/or other materials provided with the distribution. 13fffdd288SMatthias Ringwald * 3. Neither the name of the copyright holders nor the names of 14fffdd288SMatthias Ringwald * contributors may be used to endorse or promote products derived 15fffdd288SMatthias Ringwald * from this software without specific prior written permission. 16fffdd288SMatthias Ringwald * 4. Any redistribution, use, or modification is done solely for 17fffdd288SMatthias Ringwald * personal benefit and not for any commercial purpose or for 18fffdd288SMatthias Ringwald * monetary gain. 19fffdd288SMatthias Ringwald * 20fffdd288SMatthias Ringwald * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS 21fffdd288SMatthias Ringwald * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 22fffdd288SMatthias Ringwald * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 23fffdd288SMatthias Ringwald * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS 24fffdd288SMatthias Ringwald * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, 25fffdd288SMatthias Ringwald * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 26fffdd288SMatthias Ringwald * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS 27fffdd288SMatthias Ringwald * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 28fffdd288SMatthias Ringwald * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 29fffdd288SMatthias Ringwald * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF 30fffdd288SMatthias Ringwald * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31fffdd288SMatthias Ringwald * SUCH DAMAGE. 32fffdd288SMatthias Ringwald * 33fffdd288SMatthias Ringwald * Please inquire about commercial licensing options at 34fffdd288SMatthias Ringwald * [email protected] 35fffdd288SMatthias Ringwald * 36fffdd288SMatthias Ringwald */ 37ab2c6ae4SMatthias Ringwald 38e501bae0SMatthias Ringwald #define BTSTACK_FILE__ "hfp_ag_demo.c" 39fffdd288SMatthias Ringwald 40fffdd288SMatthias Ringwald /* 41fffdd288SMatthias Ringwald * hfp_ag_demo.c 42fffdd288SMatthias Ringwald */ 43fffdd288SMatthias Ringwald 44fffdd288SMatthias Ringwald // ***************************************************************************** 45ec8ae085SMilanka Ringwald /* EXAMPLE_START(hfp_ag_demo): HFP AG - Audio Gateway 46fffdd288SMatthias Ringwald * 47fffdd288SMatthias Ringwald * @text This HFP Audio Gateway example demonstrates how to receive 48fffdd288SMatthias Ringwald * an output from a remote HFP Hands-Free (HF) unit, and, 497ea7688aSMatthias Ringwald * if HAVE_BTSTACK_STDIN is defined, how to control the HFP HF. 50fffdd288SMatthias Ringwald */ 51fffdd288SMatthias Ringwald // ***************************************************************************** 52fffdd288SMatthias Ringwald 53fffdd288SMatthias Ringwald 54fffdd288SMatthias Ringwald #include <stdint.h> 55fffdd288SMatthias Ringwald #include <stdio.h> 56fffdd288SMatthias Ringwald #include <stdlib.h> 57fffdd288SMatthias Ringwald #include <string.h> 58fffdd288SMatthias Ringwald 59fffdd288SMatthias Ringwald #include "btstack.h" 60185c8cd4SMatthias Ringwald #include "sco_demo_util.h" 617ea7688aSMatthias Ringwald #ifdef HAVE_BTSTACK_STDIN 627ea7688aSMatthias Ringwald #include "btstack_stdin.h" 634af4141bSMatthias Ringwald #endif 64fffdd288SMatthias Ringwald 6580b0ebb6SMatthias Ringwald // uncomment to temp disable mSBC codec 6680b0ebb6SMatthias Ringwald // #undef ENABLE_HFP_WIDE_BAND_SPEECH 6780b0ebb6SMatthias Ringwald 68fffdd288SMatthias Ringwald uint8_t hfp_service_buffer[150]; 69fffdd288SMatthias Ringwald const uint8_t rfcomm_channel_nr = 1; 700c2b8870SMatthias Ringwald const char hfp_ag_service_name[] = "HFP AG Demo"; 71fffdd288SMatthias Ringwald 720e62b7a5SMatthias Ringwald static bd_addr_t device_addr; 7305d93378SMilanka Ringwald static const char * device_addr_string = "00:21:3C:AC:F7:38"; 74fffdd288SMatthias Ringwald 751bbecc2bSMatthias Ringwald #ifdef ENABLE_HFP_WIDE_BAND_SPEECH 76fa5e2954SMatthias Ringwald static uint8_t codecs[] = {HFP_CODEC_CVSD, HFP_CODEC_MSBC}; 771bbecc2bSMatthias Ringwald #else 781bbecc2bSMatthias Ringwald static uint8_t codecs[] = {HFP_CODEC_CVSD}; 791bbecc2bSMatthias Ringwald #endif 801bbecc2bSMatthias Ringwald 81220eb563SMilanka Ringwald static uint8_t negotiated_codec = HFP_CODEC_CVSD; 82220eb563SMilanka Ringwald 8380b0ebb6SMatthias Ringwald static hci_con_handle_t acl_handle = HCI_CON_HANDLE_INVALID; 8480b0ebb6SMatthias Ringwald static hci_con_handle_t sco_handle = HCI_CON_HANDLE_INVALID; 85fffdd288SMatthias Ringwald static int memory_1_enabled = 1; 86186bfbecSMatthias Ringwald static btstack_packet_callback_registration_t hci_event_callback_registration; 87fffdd288SMatthias Ringwald 88fffdd288SMatthias Ringwald static int ag_indicators_nr = 7; 89fffdd288SMatthias Ringwald static hfp_ag_indicator_t ag_indicators[] = { 90fffdd288SMatthias Ringwald // index, name, min range, max range, status, mandatory, enabled, status changed 91fffdd288SMatthias Ringwald {1, "service", 0, 1, 1, 0, 0, 0}, 92fffdd288SMatthias Ringwald {2, "call", 0, 1, 0, 1, 1, 0}, 93fffdd288SMatthias Ringwald {3, "callsetup", 0, 3, 0, 1, 1, 0}, 94fffdd288SMatthias Ringwald {4, "battchg", 0, 5, 3, 0, 0, 0}, 95fffdd288SMatthias Ringwald {5, "signal", 0, 5, 5, 0, 1, 0}, 96fffdd288SMatthias Ringwald {6, "roam", 0, 1, 0, 0, 1, 0}, 97fffdd288SMatthias Ringwald {7, "callheld", 0, 2, 0, 1, 1, 0} 98fffdd288SMatthias Ringwald }; 99fffdd288SMatthias Ringwald 100fffdd288SMatthias Ringwald static int call_hold_services_nr = 5; 101fffdd288SMatthias Ringwald static const char* call_hold_services[] = {"1", "1x", "2", "2x", "3"}; 102fffdd288SMatthias Ringwald 103fffdd288SMatthias Ringwald static int hf_indicators_nr = 2; 104fffdd288SMatthias Ringwald static hfp_generic_status_indicator_t hf_indicators[] = { 105fffdd288SMatthias Ringwald {1, 1}, 106fffdd288SMatthias Ringwald {2, 1}, 107fffdd288SMatthias Ringwald }; 108fffdd288SMatthias Ringwald 109fffdd288SMatthias Ringwald #define INQUIRY_INTERVAL 5 110fffdd288SMatthias Ringwald 111fffdd288SMatthias Ringwald enum STATE {INIT, W4_INQUIRY_MODE_COMPLETE, ACTIVE} ; 112fffdd288SMatthias Ringwald enum STATE state = INIT; 113fffdd288SMatthias Ringwald 1143b9522a6SMatthias Ringwald static void dump_supported_codecs(void){ 115249d94cfSMatthias Ringwald unsigned int i; 116f9f7adeeSMatthias Ringwald int mSBC_skipped = 0; 117b3f76298SMilanka Ringwald printf("Supported codecs: "); 118b3f76298SMilanka Ringwald for (i = 0; i < sizeof(codecs); i++){ 119b3f76298SMilanka Ringwald switch(codecs[i]){ 120b3f76298SMilanka Ringwald case HFP_CODEC_CVSD: 121b3f76298SMilanka Ringwald printf("CVSD"); 122b3f76298SMilanka Ringwald break; 123b3f76298SMilanka Ringwald case HFP_CODEC_MSBC: 124f9f7adeeSMatthias Ringwald if (hci_extended_sco_link_supported()){ 1252308e108SMilanka Ringwald printf(", mSBC"); 126f9f7adeeSMatthias Ringwald } else { 127f9f7adeeSMatthias Ringwald mSBC_skipped = 1; 128f9f7adeeSMatthias Ringwald } 129b3f76298SMilanka Ringwald break; 1307bbeb3adSMilanka Ringwald default: 1317bbeb3adSMilanka Ringwald btstack_assert(false); 1327bbeb3adSMilanka Ringwald break; 133b3f76298SMilanka Ringwald } 134b3f76298SMilanka Ringwald } 135b3f76298SMilanka Ringwald printf("\n"); 136f9f7adeeSMatthias Ringwald if (mSBC_skipped){ 137f9f7adeeSMatthias Ringwald printf("mSBC codec disabled because eSCO not supported by local controller.\n"); 138f9f7adeeSMatthias Ringwald } 139b3f76298SMilanka Ringwald } 140fffdd288SMatthias Ringwald 1417ea7688aSMatthias Ringwald #ifdef HAVE_BTSTACK_STDIN 142fffdd288SMatthias Ringwald // Testig User Interface 143fffdd288SMatthias Ringwald static void show_usage(void){ 144e64e0086SMatthias Ringwald bd_addr_t iut_address; 145e64e0086SMatthias Ringwald gap_local_bd_addr(iut_address); 146e64e0086SMatthias Ringwald 147e64e0086SMatthias Ringwald printf("\n--- Bluetooth HFP Audiogateway (AG) unit Test Console %s ---\n", bd_addr_to_str(iut_address)); 1488a7d93dcSMatthias Ringwald printf("\n"); 149fffdd288SMatthias Ringwald 15005d93378SMilanka Ringwald printf("a - establish HFP connection to %s\n", bd_addr_to_str(device_addr)); 15105d93378SMilanka Ringwald // printf("A - release HFP connection\n"); 152fffdd288SMatthias Ringwald 1538a7d93dcSMatthias Ringwald printf("b - establish AUDIO connection | B - release AUDIO connection\n"); 1548a7d93dcSMatthias Ringwald printf("c - simulate incoming call from 1234567 | C - simulate call from 1234567 dropped\n"); 155fffdd288SMatthias Ringwald printf("d - report AG failure\n"); 156584803f1SMatthias Ringwald printf("D - delete all link keys\n"); 1578a7d93dcSMatthias Ringwald printf("e - answer call on AG | E - reject call on AG\n"); 1588a7d93dcSMatthias Ringwald printf("r - disable in-band ring tone | R - enable in-band ring tone\n"); 1598a7d93dcSMatthias Ringwald printf("f - Disable cellular network | F - Enable cellular network\n"); 1608a7d93dcSMatthias Ringwald printf("g - Set signal strength to 0 | G - Set signal strength to 5\n"); 1618a7d93dcSMatthias Ringwald printf("h - Disable roaming | H - Enable roaming\n"); 1628a7d93dcSMatthias Ringwald printf("i - Set battery level to 3 | I - Set battery level to 5\n"); 163fffdd288SMatthias Ringwald printf("j - Answering call on remote side\n"); 1648a7d93dcSMatthias Ringwald printf("k - Clear memory #1 | K - Set memory #1\n"); 1658a7d93dcSMatthias Ringwald printf("l - Clear last number | L - Set last number\n"); 166fffdd288SMatthias Ringwald printf("m - simulate incoming call from 7654321\n"); 167fffdd288SMatthias Ringwald // printf("M - simulate call from 7654321 dropped\n"); 1688a7d93dcSMatthias Ringwald printf("n - Disable Voice Regocnition | N - Enable Voice Recognition\n"); 1698a7d93dcSMatthias Ringwald printf("o - Set speaker volume to 0 (minimum) | O - Set speaker volume to 9 (default)\n"); 1708a7d93dcSMatthias Ringwald printf("p - Set speaker volume to 12 (higher) | P - Set speaker volume to 15 (maximum)\n"); 1718a7d93dcSMatthias Ringwald printf("q - Set microphone gain to 0 (minimum) | Q - Set microphone gain to 9 (default)\n"); 1728a7d93dcSMatthias Ringwald printf("s - Set microphone gain to 12 (higher) | S - Set microphone gain to 15 (maximum)\n"); 173fffdd288SMatthias Ringwald printf("t - terminate connection\n"); 174fffdd288SMatthias Ringwald printf("u - join held call\n"); 175fffdd288SMatthias Ringwald printf("v - discover nearby HF units\n"); 176fffdd288SMatthias Ringwald printf("w - put incoming call on hold (Response and Hold)\n"); 177fffdd288SMatthias Ringwald printf("x - accept held incoming call (Response and Hold)\n"); 178fffdd288SMatthias Ringwald printf("X - reject held incoming call (Response and Hold)\n"); 179fffdd288SMatthias Ringwald printf("---\n"); 180fffdd288SMatthias Ringwald } 181fffdd288SMatthias Ringwald 18295a8ee01SMatthias Ringwald static void stdin_process(char cmd){ 183fffdd288SMatthias Ringwald switch (cmd){ 184fffdd288SMatthias Ringwald case 'a': 185fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 18605d93378SMilanka Ringwald printf("Establish HFP service level connection to %s...\n", bd_addr_to_str(device_addr)); 187fffdd288SMatthias Ringwald hfp_ag_establish_service_level_connection(device_addr); 188fffdd288SMatthias Ringwald break; 189fffdd288SMatthias Ringwald case 'A': 190fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 191fffdd288SMatthias Ringwald printf("Release HFP service level connection.\n"); 192d97d752dSMilanka Ringwald hfp_ag_release_service_level_connection(acl_handle); 193fffdd288SMatthias Ringwald break; 194fffdd288SMatthias Ringwald case 'Z': 195fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 196fffdd288SMatthias Ringwald printf("Release HFP service level connection to %s...\n", bd_addr_to_str(device_addr)); 197d97d752dSMilanka Ringwald hfp_ag_release_service_level_connection(acl_handle); 198fffdd288SMatthias Ringwald break; 199fffdd288SMatthias Ringwald case 'b': 200fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 201fffdd288SMatthias Ringwald printf("Establish Audio connection %s...\n", bd_addr_to_str(device_addr)); 202d97d752dSMilanka Ringwald hfp_ag_establish_audio_connection(acl_handle); 203fffdd288SMatthias Ringwald break; 204fffdd288SMatthias Ringwald case 'B': 205fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 206fffdd288SMatthias Ringwald printf("Release Audio connection.\n"); 207d97d752dSMilanka Ringwald hfp_ag_release_audio_connection(acl_handle); 208fffdd288SMatthias Ringwald break; 209fffdd288SMatthias Ringwald case 'c': 210fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 211fffdd288SMatthias Ringwald printf("Simulate incoming call from 1234567\n"); 212fffdd288SMatthias Ringwald hfp_ag_set_clip(129, "1234567"); 213fffdd288SMatthias Ringwald hfp_ag_incoming_call(); 214fffdd288SMatthias Ringwald break; 215584803f1SMatthias Ringwald case 'D': 216584803f1SMatthias Ringwald printf("Deleting all link keys\n"); 217584803f1SMatthias Ringwald gap_delete_all_link_keys(); 218584803f1SMatthias Ringwald break; 219fffdd288SMatthias Ringwald case 'm': 220fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 221fffdd288SMatthias Ringwald printf("Simulate incoming call from 7654321\n"); 222fffdd288SMatthias Ringwald hfp_ag_set_clip(129, "7654321"); 223fffdd288SMatthias Ringwald hfp_ag_incoming_call(); 224fffdd288SMatthias Ringwald break; 225fffdd288SMatthias Ringwald case 'C': 226fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 227fffdd288SMatthias Ringwald printf("Simulate terminate call\n"); 228fffdd288SMatthias Ringwald hfp_ag_call_dropped(); 229fffdd288SMatthias Ringwald break; 230fffdd288SMatthias Ringwald case 'd': 231fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 232fffdd288SMatthias Ringwald printf("Report AG failure\n"); 233d97d752dSMilanka Ringwald hfp_ag_report_extended_audio_gateway_error_result_code(acl_handle, HFP_CME_ERROR_AG_FAILURE); 234fffdd288SMatthias Ringwald break; 235fffdd288SMatthias Ringwald case 'e': 236fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 237fffdd288SMatthias Ringwald printf("Answer call on AG\n"); 238fffdd288SMatthias Ringwald hfp_ag_answer_incoming_call(); 239fffdd288SMatthias Ringwald break; 240fffdd288SMatthias Ringwald case 'E': 241fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 242fffdd288SMatthias Ringwald printf("Reject call on AG\n"); 243fffdd288SMatthias Ringwald hfp_ag_terminate_call(); 244fffdd288SMatthias Ringwald break; 245fffdd288SMatthias Ringwald case 'f': 246fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 247fffdd288SMatthias Ringwald printf("Disable cellular network\n"); 248fffdd288SMatthias Ringwald hfp_ag_set_registration_status(0); 249fffdd288SMatthias Ringwald break; 250fffdd288SMatthias Ringwald case 'F': 251fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 252fffdd288SMatthias Ringwald printf("Enable cellular network\n"); 253fffdd288SMatthias Ringwald hfp_ag_set_registration_status(1); 254fffdd288SMatthias Ringwald break; 255fffdd288SMatthias Ringwald case 'g': 256fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 257fffdd288SMatthias Ringwald printf("Set signal strength to 0\n"); 258fffdd288SMatthias Ringwald hfp_ag_set_signal_strength(0); 259fffdd288SMatthias Ringwald break; 260fffdd288SMatthias Ringwald case 'G': 261fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 262fffdd288SMatthias Ringwald printf("Set signal strength to 5\n"); 263fffdd288SMatthias Ringwald hfp_ag_set_signal_strength(5); 264fffdd288SMatthias Ringwald break; 265fffdd288SMatthias Ringwald case 'h': 266fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 267fffdd288SMatthias Ringwald printf("Disable roaming\n"); 268fffdd288SMatthias Ringwald hfp_ag_set_roaming_status(0); 269fffdd288SMatthias Ringwald break; 270fffdd288SMatthias Ringwald case 'H': 271fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 272fffdd288SMatthias Ringwald printf("Enable roaming\n"); 273fffdd288SMatthias Ringwald hfp_ag_set_roaming_status(1); 274fffdd288SMatthias Ringwald break; 275fffdd288SMatthias Ringwald case 'i': 276fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 277fffdd288SMatthias Ringwald printf("Set battery level to 3\n"); 278fffdd288SMatthias Ringwald hfp_ag_set_battery_level(3); 279fffdd288SMatthias Ringwald break; 280fffdd288SMatthias Ringwald case 'I': 281fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 282fffdd288SMatthias Ringwald printf("Set battery level to 5\n"); 283fffdd288SMatthias Ringwald hfp_ag_set_battery_level(5); 284fffdd288SMatthias Ringwald break; 285fffdd288SMatthias Ringwald case 'j': 286fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 287fffdd288SMatthias Ringwald printf("Answering call on remote side\n"); 288fffdd288SMatthias Ringwald hfp_ag_outgoing_call_established(); 289fffdd288SMatthias Ringwald break; 290fffdd288SMatthias Ringwald case 'r': 291fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 292fffdd288SMatthias Ringwald printf("Disable in-band ring tone\n"); 293fffdd288SMatthias Ringwald hfp_ag_set_use_in_band_ring_tone(0); 294fffdd288SMatthias Ringwald break; 295fffdd288SMatthias Ringwald case 'k': 296fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 297fffdd288SMatthias Ringwald printf("Memory 1 cleared\n"); 298fffdd288SMatthias Ringwald memory_1_enabled = 0; 299fffdd288SMatthias Ringwald break; 300fffdd288SMatthias Ringwald case 'K': 301fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 302fffdd288SMatthias Ringwald printf("Memory 1 set\n"); 303fffdd288SMatthias Ringwald memory_1_enabled = 1; 304fffdd288SMatthias Ringwald break; 305fffdd288SMatthias Ringwald case 'l': 306fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 307fffdd288SMatthias Ringwald printf("Last dialed number cleared\n"); 308fffdd288SMatthias Ringwald hfp_ag_clear_last_dialed_number(); 309fffdd288SMatthias Ringwald break; 310fffdd288SMatthias Ringwald case 'L': 311fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 312fffdd288SMatthias Ringwald printf("Outgoing call connected, ringing\n"); 313fffdd288SMatthias Ringwald hfp_ag_outgoing_call_ringing(); 314fffdd288SMatthias Ringwald break; 315fffdd288SMatthias Ringwald case 'n': 316fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 317fffdd288SMatthias Ringwald printf("Disable Voice Recognition\n"); 318d97d752dSMilanka Ringwald hfp_ag_activate_voice_recognition(acl_handle, 0); 319fffdd288SMatthias Ringwald break; 320fffdd288SMatthias Ringwald case 'N': 321fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 322fffdd288SMatthias Ringwald printf("Enable Voice Recognition\n"); 323d97d752dSMilanka Ringwald hfp_ag_activate_voice_recognition(acl_handle, 1); 324fffdd288SMatthias Ringwald break; 325fffdd288SMatthias Ringwald case 'o': 326fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 327fffdd288SMatthias Ringwald printf("Set speaker gain to 0 (minimum)\n"); 328d97d752dSMilanka Ringwald hfp_ag_set_speaker_gain(acl_handle, 0); 329fffdd288SMatthias Ringwald break; 330fffdd288SMatthias Ringwald case 'O': 331fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 332fffdd288SMatthias Ringwald printf("Set speaker gain to 9 (default)\n"); 333d97d752dSMilanka Ringwald hfp_ag_set_speaker_gain(acl_handle, 9); 334fffdd288SMatthias Ringwald break; 335fffdd288SMatthias Ringwald case 'p': 336fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 337fffdd288SMatthias Ringwald printf("Set speaker gain to 12 (higher)\n"); 338d97d752dSMilanka Ringwald hfp_ag_set_speaker_gain(acl_handle, 12); 339fffdd288SMatthias Ringwald break; 340fffdd288SMatthias Ringwald case 'P': 341fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 342fffdd288SMatthias Ringwald printf("Set speaker gain to 15 (maximum)\n"); 343d97d752dSMilanka Ringwald hfp_ag_set_speaker_gain(acl_handle, 15); 344fffdd288SMatthias Ringwald break; 345fffdd288SMatthias Ringwald case 'q': 346fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 347fffdd288SMatthias Ringwald printf("Set microphone gain to 0\n"); 348d97d752dSMilanka Ringwald hfp_ag_set_microphone_gain(acl_handle, 0); 349fffdd288SMatthias Ringwald break; 350fffdd288SMatthias Ringwald case 'Q': 351fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 352fffdd288SMatthias Ringwald printf("Set microphone gain to 9\n"); 353d97d752dSMilanka Ringwald hfp_ag_set_microphone_gain(acl_handle, 9); 354fffdd288SMatthias Ringwald break; 355fffdd288SMatthias Ringwald case 's': 356fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 357fffdd288SMatthias Ringwald printf("Set microphone gain to 12\n"); 358d97d752dSMilanka Ringwald hfp_ag_set_microphone_gain(acl_handle, 12); 359fffdd288SMatthias Ringwald break; 360fffdd288SMatthias Ringwald case 'S': 361fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 362fffdd288SMatthias Ringwald printf("Set microphone gain to 15\n"); 363d97d752dSMilanka Ringwald hfp_ag_set_microphone_gain(acl_handle, 15); 364fffdd288SMatthias Ringwald break; 365fffdd288SMatthias Ringwald case 'R': 366fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 367fffdd288SMatthias Ringwald printf("Enable in-band ring tone\n"); 368fffdd288SMatthias Ringwald hfp_ag_set_use_in_band_ring_tone(1); 369fffdd288SMatthias Ringwald break; 370fffdd288SMatthias Ringwald case 't': 371fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 372d97d752dSMilanka Ringwald printf("Terminate HCI connection. 0x%2x\n", acl_handle); 373d97d752dSMilanka Ringwald gap_disconnect(acl_handle); 374fffdd288SMatthias Ringwald break; 375fffdd288SMatthias Ringwald case 'u': 376fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 377fffdd288SMatthias Ringwald printf("Join held call\n"); 378fffdd288SMatthias Ringwald hfp_ag_join_held_call(); 379fffdd288SMatthias Ringwald break; 380fffdd288SMatthias Ringwald case 'v': 3816e87f20cSMatthias Ringwald printf("Start scanning...\n"); 3826e87f20cSMatthias Ringwald gap_inquiry_start(INQUIRY_INTERVAL); 383fffdd288SMatthias Ringwald break; 384fffdd288SMatthias Ringwald case 'w': 385fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 386fffdd288SMatthias Ringwald printf("AG: Put incoming call on hold (Response and Hold)\n"); 387fffdd288SMatthias Ringwald hfp_ag_hold_incoming_call(); 388fffdd288SMatthias Ringwald break; 389fffdd288SMatthias Ringwald case 'x': 390fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 391fffdd288SMatthias Ringwald printf("AG: Accept held incoming call (Response and Hold)\n"); 392fffdd288SMatthias Ringwald hfp_ag_accept_held_incoming_call(); 393fffdd288SMatthias Ringwald break; 394fffdd288SMatthias Ringwald case 'X': 395fffdd288SMatthias Ringwald log_info("USER:\'%c\'", cmd); 396fffdd288SMatthias Ringwald printf("AG: Reject held incoming call (Response and Hold)\n"); 397fffdd288SMatthias Ringwald hfp_ag_reject_held_incoming_call(); 398fffdd288SMatthias Ringwald break; 399fffdd288SMatthias Ringwald default: 400fffdd288SMatthias Ringwald show_usage(); 401fffdd288SMatthias Ringwald break; 402fffdd288SMatthias Ringwald } 403fffdd288SMatthias Ringwald } 404fffdd288SMatthias Ringwald #endif 405fffdd288SMatthias Ringwald 40613839019SMatthias Ringwald static void packet_handler(uint8_t packet_type, uint16_t channel, uint8_t * event, uint16_t event_size){ 4079ec2630cSMatthias Ringwald UNUSED(channel); 4086e87f20cSMatthias Ringwald bd_addr_t addr; 40905d93378SMilanka Ringwald uint8_t status; 4103cef842bSMatthias Ringwald switch (packet_type){ 4113cef842bSMatthias Ringwald case HCI_EVENT_PACKET: 41205d93378SMilanka Ringwald switch(hci_event_packet_get_type(event)){ 41305d93378SMilanka Ringwald #ifndef HAVE_BTSTACK_STDIN 41405d93378SMilanka Ringwald case BTSTACK_EVENT_STATE: 41505d93378SMilanka Ringwald if (btstack_event_state_get_state(event) != HCI_STATE_WORKING) break; 41605d93378SMilanka Ringwald printf("Establish HFP AG service level connection to %s...\n", bd_addr_to_str(device_addr)); 41705d93378SMilanka Ringwald hfp_ag_establish_service_level_connection(device_addr); 41805d93378SMilanka Ringwald break; 41905d93378SMilanka Ringwald #endif 4206e87f20cSMatthias Ringwald case GAP_EVENT_INQUIRY_RESULT: 4216e87f20cSMatthias Ringwald gap_event_inquiry_result_get_bd_addr(event, addr); 4226e87f20cSMatthias Ringwald // print info 4236e87f20cSMatthias Ringwald printf("Device found: %s ", bd_addr_to_str(addr)); 4246e87f20cSMatthias Ringwald printf("with COD: 0x%06x, ", (unsigned int) gap_event_inquiry_result_get_class_of_device(event)); 425eaac31e8SMatthias Ringwald if (gap_event_inquiry_result_get_rssi_available(event)){ 4266e87f20cSMatthias Ringwald printf(", rssi %d dBm", (int8_t) gap_event_inquiry_result_get_rssi(event)); 4276e87f20cSMatthias Ringwald } 4286e87f20cSMatthias Ringwald if (gap_event_inquiry_result_get_name_available(event)){ 4296e87f20cSMatthias Ringwald char name_buffer[240]; 4306e87f20cSMatthias Ringwald int name_len = gap_event_inquiry_result_get_name_len(event); 4316e87f20cSMatthias Ringwald memcpy(name_buffer, gap_event_inquiry_result_get_name(event), name_len); 4326e87f20cSMatthias Ringwald name_buffer[name_len] = 0; 4336e87f20cSMatthias Ringwald printf(", name '%s'", name_buffer); 4346e87f20cSMatthias Ringwald } 4356e87f20cSMatthias Ringwald printf("\n"); 4366e87f20cSMatthias Ringwald break; 4376e87f20cSMatthias Ringwald case GAP_EVENT_INQUIRY_COMPLETE: 4386e87f20cSMatthias Ringwald printf("Inquiry scan complete.\n"); 439fffdd288SMatthias Ringwald break; 44013839019SMatthias Ringwald case HCI_EVENT_SCO_CAN_SEND_NOW: 441185c8cd4SMatthias Ringwald sco_demo_send(sco_handle); 44213839019SMatthias Ringwald break; 44392bac129SMatthias Ringwald case HCI_EVENT_COMMAND_COMPLETE: 44492bac129SMatthias Ringwald if (HCI_EVENT_IS_COMMAND_COMPLETE(event, hci_read_local_supported_features)){ 445f9f7adeeSMatthias Ringwald dump_supported_codecs(); 44692bac129SMatthias Ringwald } 44792bac129SMatthias Ringwald break; 448fffdd288SMatthias Ringwald default: 449fffdd288SMatthias Ringwald break; 450fffdd288SMatthias Ringwald } 451fffdd288SMatthias Ringwald 45205d93378SMilanka Ringwald if (hci_event_packet_get_type(event) != HCI_EVENT_HFP_META) return; 453fffdd288SMatthias Ringwald 4549b9bd84aSMatthias Ringwald if ((event_size > 3) 4559b9bd84aSMatthias Ringwald && (event[3] != 0) 4569b9bd84aSMatthias Ringwald && (hci_event_hfp_meta_get_subevent_code(event) != HFP_SUBEVENT_PLACE_CALL_WITH_NUMBER) 4579b9bd84aSMatthias Ringwald && (hci_event_hfp_meta_get_subevent_code(event) != HFP_SUBEVENT_ATTACH_NUMBER_TO_VOICE_TAG) 4589b9bd84aSMatthias Ringwald && (hci_event_hfp_meta_get_subevent_code(event) != HFP_SUBEVENT_TRANSMIT_DTMF_CODES)){ 459fffdd288SMatthias Ringwald printf("ERROR, status: %u\n", event[3]); 460fffdd288SMatthias Ringwald return; 461fffdd288SMatthias Ringwald } 462fffdd288SMatthias Ringwald 46305d93378SMilanka Ringwald switch (hci_event_hfp_meta_get_subevent_code(event)) { 464fffdd288SMatthias Ringwald case HFP_SUBEVENT_SERVICE_LEVEL_CONNECTION_ESTABLISHED: 46505d93378SMilanka Ringwald status = hfp_subevent_service_level_connection_established_get_status(event); 466*6058cb0dSMatthias Ringwald if (status != ERROR_CODE_SUCCESS){ 46705d93378SMilanka Ringwald printf("Connection failed, staus 0x%02x\n", status); 46805d93378SMilanka Ringwald break; 46905d93378SMilanka Ringwald } 470d97d752dSMilanka Ringwald acl_handle = hfp_subevent_service_level_connection_established_get_con_handle(event); 47166c297f9SMilanka Ringwald hfp_subevent_service_level_connection_established_get_bd_addr(event, device_addr); 47205d93378SMilanka Ringwald printf("Service level connection established to %s.\n", bd_addr_to_str(device_addr)); 473b3f76298SMilanka Ringwald dump_supported_codecs(); 47405d93378SMilanka Ringwald #ifndef HAVE_BTSTACK_STDIN 47505d93378SMilanka Ringwald log_info("Establish Audio connection %s", bd_addr_to_str(device_addr)); 47605d93378SMilanka Ringwald printf("Establish Audio connection %s...\n", bd_addr_to_str(device_addr)); 47705d93378SMilanka Ringwald hfp_ag_establish_audio_connection(acl_handle); 47805d93378SMilanka Ringwald #endif 479fffdd288SMatthias Ringwald break; 480fffdd288SMatthias Ringwald case HFP_SUBEVENT_SERVICE_LEVEL_CONNECTION_RELEASED: 481fffdd288SMatthias Ringwald printf("Service level connection released.\n"); 48280b0ebb6SMatthias Ringwald acl_handle = HCI_CON_HANDLE_INVALID; 483fffdd288SMatthias Ringwald break; 484fffdd288SMatthias Ringwald case HFP_SUBEVENT_AUDIO_CONNECTION_ESTABLISHED: 485*6058cb0dSMatthias Ringwald if (hfp_subevent_audio_connection_established_get_status(event) != ERROR_CODE_SUCCESS){ 4863cef842bSMatthias Ringwald printf("Audio connection establishment failed with status %u\n", hfp_subevent_audio_connection_established_get_status(event)); 4873cef842bSMatthias Ringwald } else { 4883cef842bSMatthias Ringwald sco_handle = hfp_subevent_audio_connection_established_get_handle(event); 4893cef842bSMatthias Ringwald printf("Audio connection established with SCO handle 0x%04x.\n", sco_handle); 490d0c4aea6SMilanka Ringwald negotiated_codec = hfp_subevent_audio_connection_established_get_negotiated_codec(event); 491f9f7adeeSMatthias Ringwald switch (negotiated_codec){ 492f9f7adeeSMatthias Ringwald case 0x01: 493f9f7adeeSMatthias Ringwald printf("Using CVSD codec.\n"); 494f9f7adeeSMatthias Ringwald break; 495f9f7adeeSMatthias Ringwald case 0x02: 496f9f7adeeSMatthias Ringwald printf("Using mSBC codec.\n"); 497f9f7adeeSMatthias Ringwald break; 498f9f7adeeSMatthias Ringwald default: 499f9f7adeeSMatthias Ringwald printf("Using unknown codec 0x%02x.\n", negotiated_codec); 500f9f7adeeSMatthias Ringwald break; 501f9f7adeeSMatthias Ringwald } 502d0c4aea6SMilanka Ringwald sco_demo_set_codec(negotiated_codec); 5033cef842bSMatthias Ringwald hci_request_sco_can_send_now_event(); 5043cef842bSMatthias Ringwald } 505fffdd288SMatthias Ringwald break; 506fffdd288SMatthias Ringwald case HFP_SUBEVENT_AUDIO_CONNECTION_RELEASED: 507b038503dSMatthias Ringwald printf("Audio connection released\n"); 50880b0ebb6SMatthias Ringwald sco_handle = HCI_CON_HANDLE_INVALID; 509b038503dSMatthias Ringwald sco_demo_close(); 510fffdd288SMatthias Ringwald break; 511fffdd288SMatthias Ringwald case HFP_SUBEVENT_START_RINGINIG: 512b038503dSMatthias Ringwald printf("Start Ringing\n"); 513fffdd288SMatthias Ringwald break; 514fffdd288SMatthias Ringwald case HFP_SUBEVENT_STOP_RINGINIG: 515b038503dSMatthias Ringwald printf("Stop Ringing\n"); 516fffdd288SMatthias Ringwald break; 517fffdd288SMatthias Ringwald case HFP_SUBEVENT_PLACE_CALL_WITH_NUMBER: 518b038503dSMatthias Ringwald printf("Outgoing call '%s'\n", hfp_subevent_place_call_with_number_get_number(event)); 519fffdd288SMatthias Ringwald // validate number 5200696953aSMilanka Ringwald if ( strcmp("1234567", hfp_subevent_place_call_with_number_get_number(event)) == 0 5210696953aSMilanka Ringwald || strcmp("7654321", hfp_subevent_place_call_with_number_get_number(event)) == 0 5220696953aSMilanka Ringwald || (memory_1_enabled && strcmp(">1", hfp_subevent_place_call_with_number_get_number(event)) == 0)){ 523fffdd288SMatthias Ringwald printf("Dialstring valid: accept call\n"); 524fffdd288SMatthias Ringwald hfp_ag_outgoing_call_accepted(); 525fffdd288SMatthias Ringwald } else { 526fffdd288SMatthias Ringwald printf("Dialstring invalid: reject call\n"); 527fffdd288SMatthias Ringwald hfp_ag_outgoing_call_rejected(); 528fffdd288SMatthias Ringwald } 529fffdd288SMatthias Ringwald break; 530fffdd288SMatthias Ringwald 531fffdd288SMatthias Ringwald case HFP_SUBEVENT_ATTACH_NUMBER_TO_VOICE_TAG: 532b038503dSMatthias Ringwald printf("Attach number to voice tag. Sending '1234567\n"); 533d97d752dSMilanka Ringwald hfp_ag_send_phone_number_for_voice_tag(acl_handle, "1234567"); 534fffdd288SMatthias Ringwald break; 535fffdd288SMatthias Ringwald case HFP_SUBEVENT_TRANSMIT_DTMF_CODES: 536b038503dSMatthias Ringwald printf("Send DTMF Codes: '%s'\n", hfp_subevent_transmit_dtmf_codes_get_dtmf(event)); 537d97d752dSMilanka Ringwald hfp_ag_send_dtmf_code_done(acl_handle); 538fffdd288SMatthias Ringwald break; 5390696953aSMilanka Ringwald case HFP_SUBEVENT_CALL_ANSWERED: 540fffdd288SMatthias Ringwald printf("Call answered by HF\n"); 541fffdd288SMatthias Ringwald break; 542fffdd288SMatthias Ringwald default: 54305d93378SMilanka Ringwald printf("Event not handled %u\n", hci_event_hfp_meta_get_subevent_code(event)); 544fffdd288SMatthias Ringwald break; 545fffdd288SMatthias Ringwald } 54696205903SMatthias Ringwald break; 547185c8cd4SMatthias Ringwald case HCI_SCO_DATA_PACKET: 54880b0ebb6SMatthias Ringwald if (READ_SCO_CONNECTION_HANDLE(event) != sco_handle) break; 549185c8cd4SMatthias Ringwald sco_demo_receive(event, event_size); 550185c8cd4SMatthias Ringwald break; 55113839019SMatthias Ringwald default: 55213839019SMatthias Ringwald break; 55313839019SMatthias Ringwald } 554fffdd288SMatthias Ringwald } 555fffdd288SMatthias Ringwald 556fffdd288SMatthias Ringwald static hfp_phone_number_t subscriber_number = { 557fffdd288SMatthias Ringwald 129, "225577" 558fffdd288SMatthias Ringwald }; 559fffdd288SMatthias Ringwald 560fffdd288SMatthias Ringwald /* @section Main Application Setup 561fffdd288SMatthias Ringwald * 562fffdd288SMatthias Ringwald * @text Listing MainConfiguration shows main application code. 563fffdd288SMatthias Ringwald * To run a HFP AG service you need to initialize the SDP, and to create and register HFP AG record with it. 564fffdd288SMatthias Ringwald * The packet_handler is used for sending commands to the HFP HF. It also receives the HFP HF's answers. 565fffdd288SMatthias Ringwald * The stdin_process callback allows for sending commands to the HFP HF. 566fffdd288SMatthias Ringwald * At the end the Bluetooth stack is started. 567fffdd288SMatthias Ringwald */ 568fffdd288SMatthias Ringwald 569fffdd288SMatthias Ringwald /* LISTING_START(MainConfiguration): Setup HFP Audio Gateway */ 570fffdd288SMatthias Ringwald 571fffdd288SMatthias Ringwald int btstack_main(int argc, const char * argv[]); 572fffdd288SMatthias Ringwald int btstack_main(int argc, const char * argv[]){ 5739ec2630cSMatthias Ringwald (void)argc; 5749ec2630cSMatthias Ringwald (void)argv; 575fffdd288SMatthias Ringwald 576185c8cd4SMatthias Ringwald sco_demo_init(); 577185c8cd4SMatthias Ringwald 5780c2b8870SMatthias Ringwald gap_set_local_name("HFP AG Demo 00:00:00:00:00:00"); 579e64e0086SMatthias Ringwald gap_discoverable_control(1); 580e64e0086SMatthias Ringwald 581e64e0086SMatthias Ringwald // L2CAP 582e64e0086SMatthias Ringwald l2cap_init(); 583e64e0086SMatthias Ringwald 5844f84bf36SMatthias Ringwald uint16_t supported_features = 5854f84bf36SMatthias Ringwald (1<<HFP_AGSF_ESCO_S4) | 5864f84bf36SMatthias Ringwald (1<<HFP_AGSF_HF_INDICATORS) | 5874f84bf36SMatthias Ringwald (1<<HFP_AGSF_CODEC_NEGOTIATION) | 5884f84bf36SMatthias Ringwald (1<<HFP_AGSF_EXTENDED_ERROR_RESULT_CODES) | 5894f84bf36SMatthias Ringwald (1<<HFP_AGSF_ENHANCED_CALL_CONTROL) | 5904f84bf36SMatthias Ringwald (1<<HFP_AGSF_ENHANCED_CALL_STATUS) | 5914f84bf36SMatthias Ringwald (1<<HFP_AGSF_ABILITY_TO_REJECT_A_CALL) | 5924f84bf36SMatthias Ringwald (1<<HFP_AGSF_IN_BAND_RING_TONE) | 5934f84bf36SMatthias Ringwald (1<<HFP_AGSF_VOICE_RECOGNITION_FUNCTION) | 5944f84bf36SMatthias Ringwald (1<<HFP_AGSF_THREE_WAY_CALLING); 5954f84bf36SMatthias Ringwald int wide_band_speech = 1; 5964f84bf36SMatthias Ringwald 597e64e0086SMatthias Ringwald // HFP 598e64e0086SMatthias Ringwald rfcomm_init(); 599fffdd288SMatthias Ringwald hfp_ag_init(rfcomm_channel_nr); 6004f84bf36SMatthias Ringwald hfp_ag_init_supported_features(supported_features); 601fffdd288SMatthias Ringwald hfp_ag_init_codecs(sizeof(codecs), codecs); 602fffdd288SMatthias Ringwald hfp_ag_init_ag_indicators(ag_indicators_nr, ag_indicators); 603fffdd288SMatthias Ringwald hfp_ag_init_hf_indicators(hf_indicators_nr, hf_indicators); 604fffdd288SMatthias Ringwald hfp_ag_init_call_hold_services(call_hold_services_nr, call_hold_services); 605fffdd288SMatthias Ringwald hfp_ag_set_subcriber_number_information(&subscriber_number, 1); 606fffdd288SMatthias Ringwald 607e64e0086SMatthias Ringwald // SDP Server 608e64e0086SMatthias Ringwald sdp_init(); 609fffdd288SMatthias Ringwald memset(hfp_service_buffer, 0, sizeof(hfp_service_buffer)); 6104f84bf36SMatthias Ringwald hfp_ag_create_sdp_record( hfp_service_buffer, 0x10001, rfcomm_channel_nr, hfp_ag_service_name, 0, supported_features, wide_band_speech); 611fffdd288SMatthias Ringwald printf("SDP service record size: %u\n", de_get_len( hfp_service_buffer)); 612fffdd288SMatthias Ringwald sdp_register_service(hfp_service_buffer); 613fffdd288SMatthias Ringwald 614a4fe6467SMatthias Ringwald // register for HCI events and SCO packets 615a4fe6467SMatthias Ringwald hci_event_callback_registration.callback = &packet_handler; 616a4fe6467SMatthias Ringwald hci_add_event_handler(&hci_event_callback_registration); 617a4fe6467SMatthias Ringwald hci_register_sco_packet_handler(&packet_handler); 618a4fe6467SMatthias Ringwald 619a4fe6467SMatthias Ringwald // register for HFP events 620a4fe6467SMatthias Ringwald hfp_ag_register_packet_handler(&packet_handler); 621a4fe6467SMatthias Ringwald 6220e62b7a5SMatthias Ringwald // parse humand readable Bluetooth address 6230e62b7a5SMatthias Ringwald sscanf_bd_addr(device_addr_string, device_addr); 6240e62b7a5SMatthias Ringwald 6257ea7688aSMatthias Ringwald #ifdef HAVE_BTSTACK_STDIN 626fffdd288SMatthias Ringwald btstack_stdin_setup(stdin_process); 627fffdd288SMatthias Ringwald #endif 628fffdd288SMatthias Ringwald // turn on! 629fffdd288SMatthias Ringwald hci_power_control(HCI_POWER_ON); 630fffdd288SMatthias Ringwald return 0; 631fffdd288SMatthias Ringwald } 632fffdd288SMatthias Ringwald /* LISTING_END */ 6332b6b8c15SMilanka Ringwald /* EXAMPLE_END */ 634