xref: /btstack/example/gatt_streamer_server.c (revision e3ba22907f903f11cd12321c31e7936b8dd1157e)
1 /*
2  * Copyright (C) 2014 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__ "gatt_streamer_server.c"
39 
40 // *****************************************************************************
41 /* EXAMPLE_START(gatt_streamer_server): Performance - Stream Data over GATT (Server)
42  *
43  * @text All newer operating systems provide GATT Client functionality.
44  * This example shows how to get a maximal throughput via BLE:
45  * - send whenever possible,
46  * - use the max ATT MTU.
47  *
48  * @text In theory, we should also update the connection parameters, but we already get
49  * a connection interval of 30 ms and there's no public way to use a shorter
50  * interval with iOS (if we're not implementing an HID device).
51  *
52  * @text Note: To start the streaming, run the example.
53  * On remote device use some GATT Explorer, e.g. LightBlue, BLExplr to enable notifications.
54  */
55  // *****************************************************************************
56 
57 #include <inttypes.h>
58 #include <stdint.h>
59 #include <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
62 
63 #include "btstack.h"
64 
65 // le_streamer.gatt contains the declaration of the provided GATT Services + Characteristics
66 // le_streamer.h    contains the binary representation of le_streamer.gatt
67 // it is generated by the build system by calling: $BTSTACK_ROOT/tool/compile_gatt.py le_streamer.gatt le_streamer.h
68 // it needs to be regenerated when the GATT Database declared in le_streamer.gatt file is modified
69 #include "gatt_streamer_server.h"
70 
71 #define REPORT_INTERVAL_MS 3000
72 #define MAX_NR_CONNECTIONS 3
73 
74 
75 static void  hci_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size);
76 static void  att_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size);
77 static int   att_write_callback(hci_con_handle_t con_handle, uint16_t att_handle, uint16_t transaction_mode, uint16_t offset, uint8_t *buffer, uint16_t buffer_size);
78 static void  streamer(void);
79 
80 // Flags general discoverable, BR/EDR supported (== not supported flag not set) when ENABLE_GATT_OVER_CLASSIC is enabled
81 #ifdef ENABLE_GATT_OVER_CLASSIC
82 #define APP_AD_FLAGS 0x02
83 #else
84 #define APP_AD_FLAGS 0x06
85 #endif
86 
87 const uint8_t adv_data[] = {
88     // Flags general discoverable
89     0x02, BLUETOOTH_DATA_TYPE_FLAGS, APP_AD_FLAGS,
90     // Name
91     0x0c, BLUETOOTH_DATA_TYPE_COMPLETE_LOCAL_NAME, 'L', 'E', ' ', 'S', 't', 'r', 'e', 'a', 'm', 'e', 'r',
92     // Incomplete List of 16-bit Service Class UUIDs -- FF10 - only valid for testing!
93     0x03, BLUETOOTH_DATA_TYPE_INCOMPLETE_LIST_OF_16_BIT_SERVICE_CLASS_UUIDS, 0x10, 0xff,
94 };
95 const uint8_t adv_data_len = sizeof(adv_data);
96 
97 static btstack_packet_callback_registration_t hci_event_callback_registration;
98 
99 // support for multiple clients
100 typedef struct {
101     char name;
102     int le_notification_enabled;
103     uint16_t value_handle;
104     hci_con_handle_t connection_handle;
105     int  counter;
106     char test_data[200];
107     int  test_data_len;
108     uint32_t test_data_sent;
109     uint32_t test_data_start;
110 } le_streamer_connection_t;
111 static le_streamer_connection_t le_streamer_connections[MAX_NR_CONNECTIONS];
112 
113 // round robin sending
114 static int connection_index;
115 
116 #ifdef ENABLE_GATT_OVER_CLASSIC
117 static uint8_t gatt_service_buffer[70];
118 #endif
119 
120 static void init_connections(void){
121     // track connections
122     int i;
123     for (i=0;i<MAX_NR_CONNECTIONS;i++){
124         le_streamer_connections[i].connection_handle = HCI_CON_HANDLE_INVALID;
125         le_streamer_connections[i].name = 'A' + i;
126     }
127 }
128 
129 static le_streamer_connection_t * connection_for_conn_handle(hci_con_handle_t conn_handle){
130     int i;
131     for (i=0;i<MAX_NR_CONNECTIONS;i++){
132         if (le_streamer_connections[i].connection_handle == conn_handle) return &le_streamer_connections[i];
133     }
134     return NULL;
135 }
136 
137 static void next_connection_index(void){
138     connection_index++;
139     if (connection_index == MAX_NR_CONNECTIONS){
140         connection_index = 0;
141     }
142 }
143 
144 /* @section Main Application Setup
145  *
146  * @text Listing MainConfiguration shows main application code.
147  * It initializes L2CAP, the Security Manager, and configures the ATT Server with the pre-compiled
148  * ATT Database generated from $le_streamer.gatt$. Finally, it configures the advertisements
149  * and boots the Bluetooth stack.
150  */
151 
152 /* LISTING_START(MainConfiguration): Init L2CAP, SM, ATT Server, and enable advertisements */
153 
154 static void le_streamer_setup(void){
155 
156     l2cap_init();
157 
158     // setup SM: Display only
159     sm_init();
160 
161 #ifdef ENABLE_GATT_OVER_CLASSIC
162     // init SDP, create record for GATT and register with SDP
163     sdp_init();
164     memset(gatt_service_buffer, 0, sizeof(gatt_service_buffer));
165     gatt_create_sdp_record(gatt_service_buffer, 0x10001, ATT_SERVICE_GATT_SERVICE_START_HANDLE, ATT_SERVICE_GATT_SERVICE_END_HANDLE);
166     sdp_register_service(gatt_service_buffer);
167     printf("SDP service record size: %u\n", de_get_len(gatt_service_buffer));
168 
169     // configure Classic GAP
170     gap_set_local_name("GATT Streamer BR/EDR 00:00:00:00:00:00");
171     gap_ssp_set_io_capability(SSP_IO_CAPABILITY_DISPLAY_YES_NO);
172     gap_discoverable_control(1);
173 #endif
174 
175     // setup ATT server
176     att_server_init(profile_data, NULL, att_write_callback);
177 
178     // register for HCI events
179     hci_event_callback_registration.callback = &hci_packet_handler;
180     hci_add_event_handler(&hci_event_callback_registration);
181 
182     // register for ATT events
183     att_server_register_packet_handler(att_packet_handler);
184 
185     // setup advertisements
186     uint16_t adv_int_min = 0x0030;
187     uint16_t adv_int_max = 0x0030;
188     uint8_t adv_type = 0;
189     bd_addr_t null_addr;
190     memset(null_addr, 0, 6);
191     gap_advertisements_set_params(adv_int_min, adv_int_max, adv_type, 0, null_addr, 0x07, 0x00);
192     gap_advertisements_set_data(adv_data_len, (uint8_t*) adv_data);
193     gap_advertisements_enable(1);
194 
195     // init client state
196     init_connections();
197 }
198 /* LISTING_END */
199 
200 /*
201  * @section Track throughput
202  * @text We calculate the throughput by setting a start time and measuring the amount of
203  * data sent. After a configurable REPORT_INTERVAL_MS, we print the throughput in kB/s
204  * and reset the counter and start time.
205  */
206 
207 /* LISTING_START(tracking): Tracking throughput */
208 
209 static void test_reset(le_streamer_connection_t * context){
210     context->test_data_start = btstack_run_loop_get_time_ms();
211     context->test_data_sent = 0;
212 }
213 
214 static void test_track_sent(le_streamer_connection_t * context, int bytes_sent){
215     context->test_data_sent += bytes_sent;
216     // evaluate
217     uint32_t now = btstack_run_loop_get_time_ms();
218     uint32_t time_passed = now - context->test_data_start;
219     if (time_passed < REPORT_INTERVAL_MS) return;
220     // print speed
221     int bytes_per_second = context->test_data_sent * 1000 / time_passed;
222     printf("%c: %"PRIu32" bytes sent-> %u.%03u kB/s\n", context->name, context->test_data_sent, bytes_per_second / 1000, bytes_per_second % 1000);
223 
224     // restart
225     context->test_data_start = now;
226     context->test_data_sent  = 0;
227 }
228 /* LISTING_END(tracking): Tracking throughput */
229 
230 /*
231  * @section HCI Packet Handler
232  *
233  * @text The packet handler is used track incoming connections and to stop notifications on disconnect
234  * It is also a good place to request the connection parameter update as indicated
235  * in the commented code block.
236  */
237 
238 /* LISTING_START(hciPacketHandler): Packet Handler */
239 static void hci_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
240     UNUSED(channel);
241     UNUSED(size);
242 
243     uint16_t conn_interval;
244     hci_con_handle_t con_handle;
245 
246     if (packet_type != HCI_EVENT_PACKET) return;
247 
248     switch (hci_event_packet_get_type(packet)) {
249         case BTSTACK_EVENT_STATE:
250             // BTstack activated, get started
251             if (btstack_event_state_get_state(packet) == HCI_STATE_WORKING) {
252                 printf("To start the streaming, please run the le_streamer_client example on other device, or use some GATT Explorer, e.g. LightBlue, BLExplr.\n");
253             }
254             break;
255         case HCI_EVENT_DISCONNECTION_COMPLETE:
256             con_handle = hci_event_disconnection_complete_get_connection_handle(packet);
257             printf("- LE Connection 0x%04x: disconnect, reason %02x\n", con_handle, hci_event_disconnection_complete_get_reason(packet));
258             break;
259         case HCI_EVENT_LE_META:
260             switch (hci_event_le_meta_get_subevent_code(packet)) {
261                 case HCI_SUBEVENT_LE_CONNECTION_COMPLETE:
262                     // print connection parameters (without using float operations)
263                     con_handle    = hci_subevent_le_connection_complete_get_connection_handle(packet);
264                     conn_interval = hci_subevent_le_connection_complete_get_conn_interval(packet);
265                     printf("- LE Connection 0x%04x: connected - connection interval %u.%02u ms, latency %u\n", con_handle, conn_interval * 125 / 100,
266                         25 * (conn_interval & 3), hci_subevent_le_connection_complete_get_conn_latency(packet));
267 
268                     // request min con interval 15 ms for iOS 11+
269                     printf("- LE Connection 0x%04x: request 15 ms connection interval\n", con_handle);
270                     gap_request_connection_parameter_update(con_handle, 12, 12, 0, 0x0048);
271                     break;
272                 case HCI_SUBEVENT_LE_CONNECTION_UPDATE_COMPLETE:
273                     // print connection parameters (without using float operations)
274                     con_handle    = hci_subevent_le_connection_update_complete_get_connection_handle(packet);
275                     conn_interval = hci_subevent_le_connection_update_complete_get_conn_interval(packet);
276                     printf("- LE Connection 0x%04x: connection update - connection interval %u.%02u ms, latency %u\n", con_handle, conn_interval * 125 / 100,
277                         25 * (conn_interval & 3), hci_subevent_le_connection_update_complete_get_conn_latency(packet));
278                     break;
279                 default:
280                     break;
281             }
282             break;
283 
284         default:
285             break;
286     }
287 }
288 
289 /* LISTING_END */
290 
291 /*
292  * @section ATT Packet Handler
293  *
294  * @text The packet handler is used to track the ATT MTU Exchange and trigger ATT send
295  */
296 
297 /* LISTING_START(attPacketHandler): Packet Handler */
298 static void att_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
299     UNUSED(channel);
300     UNUSED(size);
301 
302     int mtu;
303     le_streamer_connection_t * context;
304     switch (packet_type) {
305         case HCI_EVENT_PACKET:
306             switch (hci_event_packet_get_type(packet)) {
307                 case ATT_EVENT_CONNECTED:
308                     // setup new
309                     context = connection_for_conn_handle(HCI_CON_HANDLE_INVALID);
310                     if (!context) break;
311                     context->counter = 'A';
312                     context->connection_handle = att_event_connected_get_handle(packet);
313                     context->test_data_len = btstack_min(att_server_get_mtu(context->connection_handle) - 3, sizeof(context->test_data));
314                     printf("%c: ATT connected, handle 0x%04x, test data len %u\n", context->name, context->connection_handle, context->test_data_len);
315                     break;
316                 case ATT_EVENT_MTU_EXCHANGE_COMPLETE:
317                     mtu = att_event_mtu_exchange_complete_get_MTU(packet) - 3;
318                     context = connection_for_conn_handle(att_event_mtu_exchange_complete_get_handle(packet));
319                     if (!context) break;
320                     context->test_data_len = btstack_min(mtu - 3, sizeof(context->test_data));
321                     printf("%c: ATT MTU = %u => use test data of len %u\n", context->name, mtu, context->test_data_len);
322                     break;
323                 case ATT_EVENT_CAN_SEND_NOW:
324                     streamer();
325                     break;
326                 case ATT_EVENT_DISCONNECTED:
327                     context = connection_for_conn_handle(att_event_disconnected_get_handle(packet));
328                     if (!context) break;
329                     // free connection
330                     printf("%c: ATT disconnected, handle 0x%04x\n", context->name, context->connection_handle);
331                     context->le_notification_enabled = 0;
332                     context->connection_handle = HCI_CON_HANDLE_INVALID;
333                     break;
334                 default:
335                     break;
336             }
337             break;
338         default:
339             break;
340     }
341 }
342 /* LISTING_END */
343 
344 /*
345  * @section Streamer
346  *
347  * @text The streamer function checks if notifications are enabled and if a notification can be sent now.
348  * It creates some test data - a single letter that gets increased every time - and tracks the data sent.
349  */
350 
351  /* LISTING_START(streamer): Streaming code */
352 static void streamer(void){
353 
354     // find next active streaming connection
355     int old_connection_index = connection_index;
356     while (1){
357         // active found?
358         if ((le_streamer_connections[connection_index].connection_handle != HCI_CON_HANDLE_INVALID) &&
359             (le_streamer_connections[connection_index].le_notification_enabled)) break;
360 
361         // check next
362         next_connection_index();
363 
364         // none found
365         if (connection_index == old_connection_index) return;
366     }
367 
368     le_streamer_connection_t * context = &le_streamer_connections[connection_index];
369 
370     // create test data
371     context->counter++;
372     if (context->counter > 'Z') context->counter = 'A';
373     memset(context->test_data, context->counter, context->test_data_len);
374 
375     // send
376     att_server_notify(context->connection_handle, context->value_handle, (uint8_t*) context->test_data, context->test_data_len);
377 
378     // track
379     test_track_sent(context, context->test_data_len);
380 
381     // request next send event
382     att_server_request_can_send_now_event(context->connection_handle);
383 
384     // check next
385     next_connection_index();
386 }
387 /* LISTING_END */
388 
389 /*
390  * @section ATT Write
391  *
392  * @text The only valid ATT write in this example is to the Client Characteristic Configuration, which configures notification
393  * and indication. If the ATT handle matches the client configuration handle, the new configuration value is stored.
394  * If notifications get enabled, an ATT_EVENT_CAN_SEND_NOW is requested. See Listing attWrite.
395  */
396 
397 /* LISTING_START(attWrite): ATT Write */
398 static int att_write_callback(hci_con_handle_t con_handle, uint16_t att_handle, uint16_t transaction_mode, uint16_t offset, uint8_t *buffer, uint16_t buffer_size){
399     UNUSED(offset);
400 
401     // printf("att_write_callback att_handle 0x%04x, transaction mode %u\n", att_handle, transaction_mode);
402     if (transaction_mode != ATT_TRANSACTION_MODE_NONE) return 0;
403     le_streamer_connection_t * context = connection_for_conn_handle(con_handle);
404     switch(att_handle){
405         case ATT_CHARACTERISTIC_0000FF11_0000_1000_8000_00805F9B34FB_01_CLIENT_CONFIGURATION_HANDLE:
406         case ATT_CHARACTERISTIC_0000FF12_0000_1000_8000_00805F9B34FB_01_CLIENT_CONFIGURATION_HANDLE:
407             context->le_notification_enabled = little_endian_read_16(buffer, 0) == GATT_CLIENT_CHARACTERISTICS_CONFIGURATION_NOTIFICATION;
408             printf("%c: Notifications enabled %u\n", context->name, context->le_notification_enabled);
409             if (context->le_notification_enabled){
410                 switch (att_handle){
411                     case ATT_CHARACTERISTIC_0000FF11_0000_1000_8000_00805F9B34FB_01_CLIENT_CONFIGURATION_HANDLE:
412                         context->value_handle = ATT_CHARACTERISTIC_0000FF11_0000_1000_8000_00805F9B34FB_01_VALUE_HANDLE;
413                         break;
414                     case ATT_CHARACTERISTIC_0000FF12_0000_1000_8000_00805F9B34FB_01_CLIENT_CONFIGURATION_HANDLE:
415                         context->value_handle = ATT_CHARACTERISTIC_0000FF12_0000_1000_8000_00805F9B34FB_01_VALUE_HANDLE;
416                         break;
417                     default:
418                         break;
419                 }
420                 att_server_request_can_send_now_event(context->connection_handle);
421             }
422             test_reset(context);
423             break;
424         case ATT_CHARACTERISTIC_0000FF11_0000_1000_8000_00805F9B34FB_01_VALUE_HANDLE:
425         case ATT_CHARACTERISTIC_0000FF12_0000_1000_8000_00805F9B34FB_01_VALUE_HANDLE:
426             test_track_sent(context, buffer_size);
427             break;
428         default:
429             printf("Write to 0x%04x, len %u\n", att_handle, buffer_size);
430             break;
431     }
432     return 0;
433 }
434 /* LISTING_END */
435 
436 int btstack_main(void);
437 int btstack_main(void)
438 {
439     le_streamer_setup();
440 
441     // turn on!
442 	hci_power_control(HCI_POWER_ON);
443 
444     return 0;
445 }
446 /* EXAMPLE_END */
447