1733ac1e8SMilanka Ringwald /* 2733ac1e8SMilanka Ringwald * Copyright (C) 2014 BlueKitchen GmbH 3733ac1e8SMilanka Ringwald * 4733ac1e8SMilanka Ringwald * Redistribution and use in source and binary forms, with or without 5733ac1e8SMilanka Ringwald * modification, are permitted provided that the following conditions 6733ac1e8SMilanka Ringwald * are met: 7733ac1e8SMilanka Ringwald * 8733ac1e8SMilanka Ringwald * 1. Redistributions of source code must retain the above copyright 9733ac1e8SMilanka Ringwald * notice, this list of conditions and the following disclaimer. 10733ac1e8SMilanka Ringwald * 2. Redistributions in binary form must reproduce the above copyright 11733ac1e8SMilanka Ringwald * notice, this list of conditions and the following disclaimer in the 12733ac1e8SMilanka Ringwald * documentation and/or other materials provided with the distribution. 13733ac1e8SMilanka Ringwald * 3. Neither the name of the copyright holders nor the names of 14733ac1e8SMilanka Ringwald * contributors may be used to endorse or promote products derived 15733ac1e8SMilanka Ringwald * from this software without specific prior written permission. 16733ac1e8SMilanka Ringwald * 4. Any redistribution, use, or modification is done solely for 17733ac1e8SMilanka Ringwald * personal benefit and not for any commercial purpose or for 18733ac1e8SMilanka Ringwald * monetary gain. 19733ac1e8SMilanka Ringwald * 20733ac1e8SMilanka Ringwald * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS 21733ac1e8SMilanka Ringwald * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 22733ac1e8SMilanka Ringwald * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 23733ac1e8SMilanka Ringwald * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS 24733ac1e8SMilanka Ringwald * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, 25733ac1e8SMilanka Ringwald * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 26733ac1e8SMilanka Ringwald * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS 27733ac1e8SMilanka Ringwald * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 28733ac1e8SMilanka Ringwald * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 29733ac1e8SMilanka Ringwald * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF 30733ac1e8SMilanka Ringwald * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31733ac1e8SMilanka Ringwald * SUCH DAMAGE. 32733ac1e8SMilanka Ringwald * 33733ac1e8SMilanka Ringwald * Please inquire about commercial licensing options at 34733ac1e8SMilanka Ringwald * [email protected] 35733ac1e8SMilanka Ringwald * 36733ac1e8SMilanka Ringwald */ 37733ac1e8SMilanka Ringwald 38733ac1e8SMilanka Ringwald #define __BTSTACK_FILE__ "ublox_le_counter.c" 39733ac1e8SMilanka Ringwald 40733ac1e8SMilanka Ringwald // ***************************************************************************** 41733ac1e8SMilanka Ringwald /* EXAMPLE_START(ublox_le_counter): LE Peripheral - Nordic SPP-like profile 42733ac1e8SMilanka Ringwald * 43733ac1e8SMilanka Ringwald */ 44733ac1e8SMilanka Ringwald // ***************************************************************************** 45733ac1e8SMilanka Ringwald 46733ac1e8SMilanka Ringwald #include <stdint.h> 47733ac1e8SMilanka Ringwald #include <stdio.h> 48733ac1e8SMilanka Ringwald #include <stdlib.h> 49733ac1e8SMilanka Ringwald #include <string.h> 50733ac1e8SMilanka Ringwald 51733ac1e8SMilanka Ringwald #include "ublox_spp_le_counter.h" 52733ac1e8SMilanka Ringwald #include "btstack.h" 53733ac1e8SMilanka Ringwald #include "ble/gatt-service/ublox_spp_service_server.h" 54733ac1e8SMilanka Ringwald 55733ac1e8SMilanka Ringwald #define HEARTBEAT_PERIOD_MS 1000 56733ac1e8SMilanka Ringwald 57733ac1e8SMilanka Ringwald /* @section Main Application Setup 58733ac1e8SMilanka Ringwald * 59733ac1e8SMilanka Ringwald * @text Listing MainConfiguration shows main application code. 60733ac1e8SMilanka Ringwald * It initializes L2CAP, the Security Manager and configures the ATT Server with the pre-compiled 61733ac1e8SMilanka Ringwald * ATT Database generated from $ublox_le_counter.gatt$. 62733ac1e8SMilanka Ringwald * Additionally, it enables the Battery Service Server with the current battery level. 63733ac1e8SMilanka Ringwald * Finally, it configures the advertisements 64733ac1e8SMilanka Ringwald * and the heartbeat handler and boots the Bluetooth stack. 65733ac1e8SMilanka Ringwald * In this example, the Advertisement contains the Flags attribute and the device name. 66733ac1e8SMilanka Ringwald * The flag 0x06 indicates: LE General Discoverable Mode and BR/EDR not supported. 67733ac1e8SMilanka Ringwald */ 68733ac1e8SMilanka Ringwald 69733ac1e8SMilanka Ringwald /* LISTING_START(MainConfiguration): Init L2CAP SM ATT Server and start heartbeat timer */ 70733ac1e8SMilanka Ringwald static btstack_timer_source_t heartbeat; 71733ac1e8SMilanka Ringwald static hci_con_handle_t con_handle = HCI_CON_HANDLE_INVALID; 72733ac1e8SMilanka Ringwald static btstack_context_callback_registration_t send_request; 73733ac1e8SMilanka Ringwald static btstack_packet_callback_registration_t hci_event_callback_registration; 74733ac1e8SMilanka Ringwald 75733ac1e8SMilanka Ringwald const uint8_t adv_data[] = { 76733ac1e8SMilanka Ringwald // Flags general discoverable, BR/EDR not supported 77733ac1e8SMilanka Ringwald 2, BLUETOOTH_DATA_TYPE_FLAGS, 0x06, 78733ac1e8SMilanka Ringwald // Name 7940a35d0aSMilanka Ringwald 5, BLUETOOTH_DATA_TYPE_COMPLETE_LOCAL_NAME, '6', '-','5', '6', 80733ac1e8SMilanka Ringwald // UUID ... 81733ac1e8SMilanka Ringwald 17, BLUETOOTH_DATA_TYPE_COMPLETE_LIST_OF_128_BIT_SERVICE_CLASS_UUIDS, 0x1, 0xd7, 0xe9, 0x1, 0x4f, 0xf3, 0x44, 0xe7, 0x83, 0x8f, 0xe2, 0x26, 0xb9, 0xe1, 0x56, 0x24, 82733ac1e8SMilanka Ringwald }; 83733ac1e8SMilanka Ringwald 84733ac1e8SMilanka Ringwald const uint8_t adv_data_len = sizeof(adv_data); 85733ac1e8SMilanka Ringwald 86733ac1e8SMilanka Ringwald /* LISTING_END */ 87733ac1e8SMilanka Ringwald 88733ac1e8SMilanka Ringwald /* 89733ac1e8SMilanka Ringwald * @section Heartbeat Handler 90733ac1e8SMilanka Ringwald * 91733ac1e8SMilanka Ringwald * @text The heartbeat handler updates the value of the single Characteristic provided in this example, 92733ac1e8SMilanka Ringwald * and request a ATT_EVENT_CAN_SEND_NOW to send a notification if enabled see Listing heartbeat. 93733ac1e8SMilanka Ringwald */ 94733ac1e8SMilanka Ringwald 95733ac1e8SMilanka Ringwald /* LISTING_START(heartbeat): Hearbeat Handler */ 96733ac1e8SMilanka Ringwald static int counter = 0; 97733ac1e8SMilanka Ringwald static char counter_string[30]; 98733ac1e8SMilanka Ringwald static int counter_string_len; 99733ac1e8SMilanka Ringwald 100733ac1e8SMilanka Ringwald static void beat(void){ 101733ac1e8SMilanka Ringwald counter++; 102733ac1e8SMilanka Ringwald counter_string_len = sprintf(counter_string, "BTstack counter %03u", counter); 103733ac1e8SMilanka Ringwald } 104733ac1e8SMilanka Ringwald 105733ac1e8SMilanka Ringwald static void ublox_can_send(void * context){ 106733ac1e8SMilanka Ringwald UNUSED(context); 107733ac1e8SMilanka Ringwald beat(); 108733ac1e8SMilanka Ringwald printf("SEND: %s\n", counter_string); 109733ac1e8SMilanka Ringwald ublox_spp_service_server_send(con_handle, (uint8_t*) counter_string, counter_string_len); 110733ac1e8SMilanka Ringwald } 111733ac1e8SMilanka Ringwald 112733ac1e8SMilanka Ringwald static void heartbeat_handler(struct btstack_timer_source *ts){ 113733ac1e8SMilanka Ringwald if (con_handle != HCI_CON_HANDLE_INVALID) { 114733ac1e8SMilanka Ringwald send_request.callback = &ublox_can_send; 115733ac1e8SMilanka Ringwald ublox_spp_service_server_request_can_send_now(&send_request, con_handle); 116733ac1e8SMilanka Ringwald } 117733ac1e8SMilanka Ringwald btstack_run_loop_set_timer(ts, HEARTBEAT_PERIOD_MS); 118733ac1e8SMilanka Ringwald btstack_run_loop_add_timer(ts); 119733ac1e8SMilanka Ringwald } 120733ac1e8SMilanka Ringwald /* LISTING_END */ 121733ac1e8SMilanka Ringwald 122733ac1e8SMilanka Ringwald static void ublox_data(hci_con_handle_t handle, const uint8_t * data, uint16_t size){ 123733ac1e8SMilanka Ringwald if (size == 0 && con_handle == HCI_CON_HANDLE_INVALID ){ 124733ac1e8SMilanka Ringwald con_handle = handle; 125733ac1e8SMilanka Ringwald printf("Connected with handle 0x%04x\n", con_handle); 126733ac1e8SMilanka Ringwald } else { 127733ac1e8SMilanka Ringwald printf("RECV: "); 128733ac1e8SMilanka Ringwald printf_hexdump(data, size); 129733ac1e8SMilanka Ringwald } 130733ac1e8SMilanka Ringwald } 131733ac1e8SMilanka Ringwald 132733ac1e8SMilanka Ringwald static void ublox_flow_control(hci_con_handle_t handle, uint16_t credits){ 133733ac1e8SMilanka Ringwald if (con_handle == HCI_CON_HANDLE_INVALID ){ 134733ac1e8SMilanka Ringwald con_handle = handle; 135733ac1e8SMilanka Ringwald printf("Connected with handle 0x%04x\n", handle); 136733ac1e8SMilanka Ringwald } 137733ac1e8SMilanka Ringwald printf("credits %d\n", credits); 138733ac1e8SMilanka Ringwald } 139733ac1e8SMilanka Ringwald /* 140733ac1e8SMilanka Ringwald * @section Packet Handler 141733ac1e8SMilanka Ringwald * 142733ac1e8SMilanka Ringwald * @text The packet handler is used to: 143733ac1e8SMilanka Ringwald * - stop the counter after a disconnect 144733ac1e8SMilanka Ringwald */ 145733ac1e8SMilanka Ringwald 146733ac1e8SMilanka Ringwald /* LISTING_START(packetHandler): Packet Handler */ 147733ac1e8SMilanka Ringwald static void packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){ 148733ac1e8SMilanka Ringwald UNUSED(channel); 149733ac1e8SMilanka Ringwald UNUSED(size); 150733ac1e8SMilanka Ringwald 151733ac1e8SMilanka Ringwald switch (packet_type) { 152733ac1e8SMilanka Ringwald case HCI_EVENT_PACKET: 153733ac1e8SMilanka Ringwald switch (hci_event_packet_get_type(packet)) { 154733ac1e8SMilanka Ringwald case HCI_EVENT_DISCONNECTION_COMPLETE: 155733ac1e8SMilanka Ringwald con_handle = HCI_CON_HANDLE_INVALID; 156733ac1e8SMilanka Ringwald break; 157733ac1e8SMilanka Ringwald default: 158733ac1e8SMilanka Ringwald break; 159733ac1e8SMilanka Ringwald } 160733ac1e8SMilanka Ringwald break; 161733ac1e8SMilanka Ringwald } 162733ac1e8SMilanka Ringwald } 163733ac1e8SMilanka Ringwald /* LISTING_END */ 164733ac1e8SMilanka Ringwald 165733ac1e8SMilanka Ringwald 166733ac1e8SMilanka Ringwald int btstack_main(void); 167733ac1e8SMilanka Ringwald int btstack_main(void) 168733ac1e8SMilanka Ringwald { 169733ac1e8SMilanka Ringwald // register for HCI events 170733ac1e8SMilanka Ringwald hci_event_callback_registration.callback = &packet_handler; 171733ac1e8SMilanka Ringwald hci_add_event_handler(&hci_event_callback_registration); 172733ac1e8SMilanka Ringwald 173733ac1e8SMilanka Ringwald l2cap_init(); 174733ac1e8SMilanka Ringwald 175733ac1e8SMilanka Ringwald // setup LE device DB 176733ac1e8SMilanka Ringwald le_device_db_init(); 177733ac1e8SMilanka Ringwald 178733ac1e8SMilanka Ringwald // setup SM: Display only 179733ac1e8SMilanka Ringwald sm_init(); 180733ac1e8SMilanka Ringwald 181733ac1e8SMilanka Ringwald // setup ATT server 182733ac1e8SMilanka Ringwald att_server_init(profile_data, NULL, NULL); 183*16e3e4afSMilanka Ringwald // setup device information service 184*16e3e4afSMilanka Ringwald device_information_service_server_init(); 185733ac1e8SMilanka Ringwald // setup Nordic SPP service 186733ac1e8SMilanka Ringwald ublox_spp_service_server_init(&ublox_data, &ublox_flow_control); 187733ac1e8SMilanka Ringwald 188733ac1e8SMilanka Ringwald // setup advertisements 189733ac1e8SMilanka Ringwald uint16_t adv_int_min = 0x0030; 190733ac1e8SMilanka Ringwald uint16_t adv_int_max = 0x0030; 191733ac1e8SMilanka Ringwald uint8_t adv_type = 0; 192733ac1e8SMilanka Ringwald bd_addr_t null_addr; 193733ac1e8SMilanka Ringwald memset(null_addr, 0, 6); 194733ac1e8SMilanka Ringwald gap_advertisements_set_params(adv_int_min, adv_int_max, adv_type, 0, null_addr, 0x07, 0x00); 195733ac1e8SMilanka Ringwald gap_advertisements_set_data(adv_data_len, (uint8_t*) adv_data); 196733ac1e8SMilanka Ringwald gap_advertisements_enable(1); 197733ac1e8SMilanka Ringwald 198733ac1e8SMilanka Ringwald // set one-shot timer 199733ac1e8SMilanka Ringwald heartbeat.process = &heartbeat_handler; 200733ac1e8SMilanka Ringwald btstack_run_loop_set_timer(&heartbeat, HEARTBEAT_PERIOD_MS); 201733ac1e8SMilanka Ringwald btstack_run_loop_add_timer(&heartbeat); 202733ac1e8SMilanka Ringwald 203733ac1e8SMilanka Ringwald // beat once 204733ac1e8SMilanka Ringwald beat(); 205733ac1e8SMilanka Ringwald 206733ac1e8SMilanka Ringwald // turn on! 207733ac1e8SMilanka Ringwald hci_power_control(HCI_POWER_ON); 208733ac1e8SMilanka Ringwald 209733ac1e8SMilanka Ringwald return 0; 210733ac1e8SMilanka Ringwald } 211733ac1e8SMilanka Ringwald /* EXAMPLE_END */ 212