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 static hci_con_handle_t nordic_spp_con_handle;
66
nordic_spp_service_emit_state(hci_con_handle_t con_handle,bool enabled)67 static void nordic_spp_service_emit_state(hci_con_handle_t con_handle, bool enabled){
68 uint8_t event[5];
69 uint8_t pos = 0;
70 event[pos++] = HCI_EVENT_GATTSERVICE_META;
71 event[pos++] = sizeof(event) - 2;
72 event[pos++] = enabled ? GATTSERVICE_SUBEVENT_SPP_SERVICE_CONNECTED : GATTSERVICE_SUBEVENT_SPP_SERVICE_DISCONNECTED;
73 little_endian_store_16(event,pos, (uint16_t) con_handle);
74 pos += 2;
75 (*client_packet_handler)(HCI_EVENT_PACKET, 0, event, pos);
76 }
77
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 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){
79 UNUSED(con_handle);
80 UNUSED(offset);
81 UNUSED(buffer_size);
82
83 if (attribute_handle == nordic_spp_tx_client_configuration_handle){
84 if (buffer != NULL){
85 little_endian_store_16(buffer, 0, nordic_spp_tx_client_configuration_value);
86 }
87 return 2;
88 }
89 return 0;
90 }
91
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 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){
93 UNUSED(offset);
94 UNUSED(buffer_size);
95
96 if (transaction_mode != ATT_TRANSACTION_MODE_NONE){
97 return 0;
98 }
99
100 if (attribute_handle == nordic_spp_rx_value_handle){
101 (*client_packet_handler)(RFCOMM_DATA_PACKET, (uint16_t) con_handle, buffer, buffer_size);
102 }
103
104 if (attribute_handle == nordic_spp_tx_client_configuration_handle){
105 nordic_spp_tx_client_configuration_value = little_endian_read_16(buffer, 0);
106 bool enabled = (nordic_spp_tx_client_configuration_value != 0);
107 nordic_spp_con_handle = con_handle;
108 nordic_spp_service_emit_state(con_handle, enabled);
109 }
110
111 return 0;
112 }
113
nordic_spp_service_hci_event_handler(uint8_t packet_type,uint16_t channel,uint8_t * packet,uint16_t size)114 static void nordic_spp_service_hci_event_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
115 UNUSED(channel);
116 UNUSED(size);
117
118 if (packet_type != HCI_EVENT_PACKET) return;
119
120 hci_con_handle_t con_handle;
121
122 switch (hci_event_packet_get_type(packet)){
123 case HCI_EVENT_DISCONNECTION_COMPLETE:
124 con_handle = hci_event_disconnection_complete_get_connection_handle(packet);
125 if (con_handle == nordic_spp_con_handle){
126 nordic_spp_con_handle = HCI_CON_HANDLE_INVALID;
127 if (nordic_spp_tx_client_configuration_value > 0){
128 nordic_spp_tx_client_configuration_value = 0;
129 nordic_spp_service_emit_state(con_handle, false);
130 }
131 }
132 break;
133 default:
134 break;
135 }
136 }
137
138 /**
139 * @brief Init Nordic SPP Service Server with ATT DB
140 * @param callback for tx data from peer
141 */
nordic_spp_service_server_init(btstack_packet_handler_t packet_handler)142 void nordic_spp_service_server_init(btstack_packet_handler_t packet_handler){
143
144 static const uint8_t nordic_spp_profile_uuid128[] = { 0x6E, 0x40, 0x00, 0x01, 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E };
145 static const uint8_t nordic_spp_rx_uuid128[] = { 0x6E, 0x40, 0x00, 0x02, 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E };
146 static const uint8_t nordic_spp_tx_uuid128[] = { 0x6E, 0x40, 0x00, 0x03, 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E };
147
148 client_packet_handler = packet_handler;
149
150 // get service handle range
151 uint16_t start_handle = 0;
152 uint16_t end_handle = 0xffff;
153 int service_found = gatt_server_get_handle_range_for_service_with_uuid128(nordic_spp_profile_uuid128, &start_handle, &end_handle);
154 btstack_assert(service_found != 0);
155 UNUSED(service_found);
156
157 // get characteristic value handle and client configuration handle
158 nordic_spp_rx_value_handle = gatt_server_get_value_handle_for_characteristic_with_uuid128(start_handle, end_handle, nordic_spp_rx_uuid128);
159 nordic_spp_tx_value_handle = gatt_server_get_value_handle_for_characteristic_with_uuid128(start_handle, end_handle, nordic_spp_tx_uuid128);
160 nordic_spp_tx_client_configuration_handle = gatt_server_get_client_configuration_handle_for_characteristic_with_uuid128(start_handle, end_handle, nordic_spp_tx_uuid128);
161
162 log_info("nordic_spp_rx_value_handle 0x%02x", nordic_spp_rx_value_handle);
163 log_info("nordic_spp_tx_value_handle 0x%02x", nordic_spp_tx_value_handle);
164 log_info("nordic_spp_tx_client_configuration_handle 0x%02x", nordic_spp_tx_client_configuration_handle);
165
166 // register service with ATT Server
167 nordic_spp_service.start_handle = start_handle;
168 nordic_spp_service.end_handle = end_handle;
169 nordic_spp_service.read_callback = &nordic_spp_service_read_callback;
170 nordic_spp_service.write_callback = &nordic_spp_service_write_callback;
171 att_server_register_service_handler(&nordic_spp_service);
172
173 // register HCI packet handler
174 nordic_spp_service_hci_event_callback_registration.callback = &nordic_spp_service_hci_event_handler;
175 hci_add_event_handler(&nordic_spp_service_hci_event_callback_registration);
176
177 // reset connection
178 nordic_spp_con_handle = HCI_CON_HANDLE_INVALID;
179 }
180
181 /**
182 * @brief Queue send request. When called, one packet can be send via nordic_spp_service_send below
183 * @param request
184 * @param con_handle
185 */
nordic_spp_service_server_request_can_send_now(btstack_context_callback_registration_t * request,hci_con_handle_t con_handle)186 void nordic_spp_service_server_request_can_send_now(btstack_context_callback_registration_t * request, hci_con_handle_t con_handle){
187 att_server_request_to_send_notification(request, con_handle);
188 }
189
190 /**
191 * @brief Send data
192 * @param con_handle
193 * @param data
194 * @param size
195 */
nordic_spp_service_server_send(hci_con_handle_t con_handle,const uint8_t * data,uint16_t size)196 int nordic_spp_service_server_send(hci_con_handle_t con_handle, const uint8_t * data, uint16_t size){
197 return att_server_notify(con_handle, nordic_spp_tx_value_handle, data, size);
198 }
199
200