1 /* 2 * Copyright (C) 2018 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 BLUEKITCHEN 24 * GMBH 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 #define BTSTACK_FILE__ "nordic_spp_service_server.c" 39 40 /** 41 * Implementation of the Nordic SPP-like profile 42 * 43 * To use with your application, add `#import <nordic_spp_service.gatt>` to your .gatt file 44 * and call all functions below. All strings and blobs need to stay valid after calling the functions. 45 */ 46 47 #include <stdint.h> 48 #include <string.h> 49 50 #include "ble/att_db.h" 51 #include "ble/att_server.h" 52 #include "btstack_debug.h" 53 #include "btstack_event.h" 54 55 #include "ble/gatt-service/nordic_spp_service_server.h" 56 57 static att_service_handler_t nordic_spp_service; 58 static btstack_packet_handler_t client_packet_handler; 59 static btstack_packet_callback_registration_t nordic_spp_service_hci_event_callback_registration; 60 61 static uint16_t nordic_spp_rx_value_handle; 62 static uint16_t nordic_spp_tx_value_handle; 63 static uint16_t nordic_spp_tx_client_configuration_handle; 64 static uint16_t nordic_spp_tx_client_configuration_value; 65 66 static void nordic_spp_service_emit_state(hci_con_handle_t con_handle, bool enabled){ 67 uint8_t event[5]; 68 uint8_t pos = 0; 69 event[pos++] = HCI_EVENT_GATTSERVICE_META; 70 event[pos++] = sizeof(event) - 2; 71 event[pos++] = enabled ? GATTSERVICE_SUBEVENT_SPP_SERVICE_CONNECTED : GATTSERVICE_SUBEVENT_SPP_SERVICE_DISCONNECTED; 72 little_endian_store_16(event,pos, (uint16_t) con_handle); 73 pos += 2; 74 (*client_packet_handler)(HCI_EVENT_PACKET, 0, event, pos); 75 } 76 77 static uint16_t nordic_spp_service_read_callback(hci_con_handle_t con_handle, uint16_t attribute_handle, uint16_t offset, uint8_t * buffer, uint16_t buffer_size){ 78 UNUSED(con_handle); 79 UNUSED(offset); 80 UNUSED(buffer_size); 81 82 if (attribute_handle == nordic_spp_tx_client_configuration_handle){ 83 if (buffer != NULL){ 84 little_endian_store_16(buffer, 0, nordic_spp_tx_client_configuration_value); 85 } 86 return 2; 87 } 88 return 0; 89 } 90 91 static int nordic_spp_service_write_callback(hci_con_handle_t con_handle, uint16_t attribute_handle, uint16_t transaction_mode, uint16_t offset, uint8_t *buffer, uint16_t buffer_size){ 92 UNUSED(offset); 93 UNUSED(buffer_size); 94 95 if (transaction_mode != ATT_TRANSACTION_MODE_NONE){ 96 return 0; 97 } 98 99 if (attribute_handle == nordic_spp_rx_value_handle){ 100 (*client_packet_handler)(RFCOMM_DATA_PACKET, (uint16_t) con_handle, buffer, buffer_size); 101 } 102 103 if (attribute_handle == nordic_spp_tx_client_configuration_handle){ 104 nordic_spp_tx_client_configuration_value = little_endian_read_16(buffer, 0); 105 bool enabled = (nordic_spp_tx_client_configuration_value != 0); 106 nordic_spp_service_emit_state(con_handle, enabled); 107 } 108 109 return 0; 110 } 111 112 static void nordic_spp_service_hci_event_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){ 113 UNUSED(channel); 114 UNUSED(size); 115 116 if (packet_type != HCI_EVENT_PACKET) return; 117 118 hci_con_handle_t con_handle; 119 120 switch (hci_event_packet_get_type(packet)){ 121 case HCI_EVENT_DISCONNECTION_COMPLETE: 122 if (nordic_spp_tx_client_configuration_value > 0){ 123 nordic_spp_tx_client_configuration_value = 0; 124 con_handle = hci_event_disconnection_complete_get_connection_handle(packet); 125 nordic_spp_service_emit_state(con_handle, false); 126 } 127 break; 128 default: 129 break; 130 } 131 } 132 133 /** 134 * @brief Init Nordic SPP Service Server with ATT DB 135 * @param callback for tx data from peer 136 */ 137 void nordic_spp_service_server_init(btstack_packet_handler_t packet_handler){ 138 139 static const uint8_t nordic_spp_profile_uuid128[] = { 0x6E, 0x40, 0x00, 0x01, 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E }; 140 static const uint8_t nordic_spp_rx_uuid128[] = { 0x6E, 0x40, 0x00, 0x02, 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E }; 141 static const uint8_t nordic_spp_tx_uuid128[] = { 0x6E, 0x40, 0x00, 0x03, 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E }; 142 143 client_packet_handler = packet_handler; 144 145 // get service handle range 146 uint16_t start_handle = 0; 147 uint16_t end_handle = 0xffff; 148 int service_found = gatt_server_get_handle_range_for_service_with_uuid128(nordic_spp_profile_uuid128, &start_handle, &end_handle); 149 btstack_assert(service_found != 0); 150 UNUSED(service_found); 151 152 // get characteristic value handle and client configuration handle 153 nordic_spp_rx_value_handle = gatt_server_get_value_handle_for_characteristic_with_uuid128(start_handle, end_handle, nordic_spp_rx_uuid128); 154 nordic_spp_tx_value_handle = gatt_server_get_value_handle_for_characteristic_with_uuid128(start_handle, end_handle, nordic_spp_tx_uuid128); 155 nordic_spp_tx_client_configuration_handle = gatt_server_get_client_configuration_handle_for_characteristic_with_uuid128(start_handle, end_handle, nordic_spp_tx_uuid128); 156 157 log_info("nordic_spp_rx_value_handle 0x%02x", nordic_spp_rx_value_handle); 158 log_info("nordic_spp_tx_value_handle 0x%02x", nordic_spp_tx_value_handle); 159 log_info("nordic_spp_tx_client_configuration_handle 0x%02x", nordic_spp_tx_client_configuration_handle); 160 161 // register service with ATT Server 162 nordic_spp_service.start_handle = start_handle; 163 nordic_spp_service.end_handle = end_handle; 164 nordic_spp_service.read_callback = &nordic_spp_service_read_callback; 165 nordic_spp_service.write_callback = &nordic_spp_service_write_callback; 166 att_server_register_service_handler(&nordic_spp_service); 167 168 // register HCI packet handler 169 nordic_spp_service_hci_event_callback_registration.callback = &nordic_spp_service_hci_event_handler; 170 hci_add_event_handler(&nordic_spp_service_hci_event_callback_registration); 171 } 172 173 /** 174 * @brief Queue send request. When called, one packet can be send via nordic_spp_service_send below 175 * @param request 176 * @param con_handle 177 */ 178 void nordic_spp_service_server_request_can_send_now(btstack_context_callback_registration_t * request, hci_con_handle_t con_handle){ 179 att_server_request_to_send_notification(request, con_handle); 180 } 181 182 /** 183 * @brief Send data 184 * @param con_handle 185 * @param data 186 * @param size 187 */ 188 int nordic_spp_service_server_send(hci_con_handle_t con_handle, const uint8_t * data, uint16_t size){ 189 return att_server_notify(con_handle, nordic_spp_tx_value_handle, data, size); 190 } 191 192