xref: /btstack/src/hci.c (revision cf01e8888ddd40b7860e88b8069a674e2ff2ee0e)
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 MATTHIAS
24  * RINGWALD 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__ "hci.c"
39 
40 /*
41  *  hci.c
42  *
43  *  Created by Matthias Ringwald on 4/29/09.
44  *
45  */
46 
47 #include "btstack_config.h"
48 
49 
50 #ifdef ENABLE_CLASSIC
51 #ifdef HAVE_EMBEDDED_TICK
52 #include "btstack_run_loop_embedded.h"
53 #endif
54 #endif
55 
56 #ifdef HAVE_PLATFORM_IPHONE_OS
57 #include "../port/ios/src/btstack_control_iphone.h"
58 #endif
59 
60 #ifdef ENABLE_BLE
61 #include "gap.h"
62 #include "ble/le_device_db.h"
63 #endif
64 
65 #include <stdarg.h>
66 #include <string.h>
67 #include <inttypes.h>
68 
69 #include "btstack_debug.h"
70 #include "btstack_event.h"
71 #include "btstack_linked_list.h"
72 #include "btstack_memory.h"
73 #include "bluetooth_company_id.h"
74 #include "bluetooth_data_types.h"
75 #include "gap.h"
76 #include "hci.h"
77 #include "hci_cmd.h"
78 #include "hci_dump.h"
79 #include "ad_parser.h"
80 
81 #ifdef ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL
82 #ifndef HCI_HOST_ACL_PACKET_NUM
83 #error "ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL requires to define HCI_HOST_ACL_PACKET_NUM"
84 #endif
85 #ifndef HCI_HOST_ACL_PACKET_LEN
86 #error "ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL requires to define HCI_HOST_ACL_PACKET_LEN"
87 #endif
88 #ifndef HCI_HOST_SCO_PACKET_NUM
89 #error "ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL requires to define HCI_HOST_SCO_PACKET_NUM"
90 #endif
91 #ifndef HCI_HOST_SCO_PACKET_LEN
92 #error "ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL requires to define HCI_HOST_SCO_PACKET_LEN"
93 #endif
94 #endif
95 
96 #define HCI_CONNECTION_TIMEOUT_MS 10000
97 
98 #ifndef HCI_RESET_RESEND_TIMEOUT_MS
99 #define HCI_RESET_RESEND_TIMEOUT_MS 200
100 #endif
101 
102 // Names are arbitrarily shortened to 32 bytes if not requested otherwise
103 #ifndef GAP_INQUIRY_MAX_NAME_LEN
104 #define GAP_INQUIRY_MAX_NAME_LEN 32
105 #endif
106 
107 // GAP inquiry state: 0 = off, 0x01 - 0x30 = requested duration, 0xfe = active, 0xff = stop requested
108 #define GAP_INQUIRY_DURATION_MIN 0x01
109 #define GAP_INQUIRY_DURATION_MAX 0x30
110 #define GAP_INQUIRY_STATE_ACTIVE 0x80
111 #define GAP_INQUIRY_STATE_IDLE 0
112 #define GAP_INQUIRY_STATE_W2_CANCEL 0x81
113 #define GAP_INQUIRY_STATE_W4_CANCELLED 0x82
114 
115 // GAP Remote Name Request
116 #define GAP_REMOTE_NAME_STATE_IDLE 0
117 #define GAP_REMOTE_NAME_STATE_W2_SEND 1
118 #define GAP_REMOTE_NAME_STATE_W4_COMPLETE 2
119 
120 // GAP Pairing
121 #define GAP_PAIRING_STATE_IDLE                       0
122 #define GAP_PAIRING_STATE_SEND_PIN                   1
123 #define GAP_PAIRING_STATE_SEND_PIN_NEGATIVE          2
124 #define GAP_PAIRING_STATE_SEND_PASSKEY               3
125 #define GAP_PAIRING_STATE_SEND_PASSKEY_NEGATIVE      4
126 #define GAP_PAIRING_STATE_SEND_CONFIRMATION          5
127 #define GAP_PAIRING_STATE_SEND_CONFIRMATION_NEGATIVE 6
128 
129 
130 // prototypes
131 #ifdef ENABLE_CLASSIC
132 static void hci_update_scan_enable(void);
133 static void hci_emit_discoverable_enabled(uint8_t enabled);
134 static int  hci_local_ssp_activated(void);
135 static int  hci_remote_ssp_supported(hci_con_handle_t con_handle);
136 static bool hci_ssp_supported(hci_connection_t * connection);
137 static void hci_notify_if_sco_can_send_now(void);
138 static void hci_emit_connection_complete(bd_addr_t address, hci_con_handle_t con_handle, uint8_t status);
139 static gap_security_level_t gap_security_level_for_connection(hci_connection_t * connection);
140 static void hci_emit_security_level(hci_con_handle_t con_handle, gap_security_level_t level);
141 static void hci_connection_timeout_handler(btstack_timer_source_t *timer);
142 static void hci_connection_timestamp(hci_connection_t *connection);
143 static void hci_emit_l2cap_check_timeout(hci_connection_t *conn);
144 static void gap_inquiry_explode(uint8_t *packet, uint16_t size);
145 #endif
146 
147 static int  hci_power_control_on(void);
148 static void hci_power_control_off(void);
149 static void hci_state_reset(void);
150 static void hci_emit_transport_packet_sent(void);
151 static void hci_emit_disconnection_complete(hci_con_handle_t con_handle, uint8_t reason);
152 static void hci_emit_nr_connections_changed(void);
153 static void hci_emit_hci_open_failed(void);
154 static void hci_emit_dedicated_bonding_result(bd_addr_t address, uint8_t status);
155 static void hci_emit_event(uint8_t * event, uint16_t size, int dump);
156 static void hci_emit_acl_packet(uint8_t * packet, uint16_t size);
157 static void hci_run(void);
158 static int  hci_is_le_connection(hci_connection_t * connection);
159 static int  hci_number_free_acl_slots_for_connection_type( bd_addr_type_t address_type);
160 
161 #ifdef ENABLE_CLASSIC
162 static int hci_have_usb_transport(void);
163 #endif
164 
165 #ifdef ENABLE_BLE
166 #ifdef ENABLE_LE_CENTRAL
167 // called from test/ble_client/advertising_data_parser.c
168 void le_handle_advertisement_report(uint8_t *packet, uint16_t size);
169 static uint8_t hci_whitelist_remove(bd_addr_type_t address_type, const bd_addr_t address);
170 static hci_connection_t * gap_get_outgoing_connection(void);
171 #endif
172 #endif
173 
174 // the STACK is here
175 #ifndef HAVE_MALLOC
176 static hci_stack_t   hci_stack_static;
177 #endif
178 static hci_stack_t * hci_stack = NULL;
179 
180 #ifdef ENABLE_CLASSIC
181 // default name
182 static const char * default_classic_name = "BTstack 00:00:00:00:00:00";
183 
184 // test helper
185 static uint8_t disable_l2cap_timeouts = 0;
186 #endif
187 
188 /**
189  * create connection for given address
190  *
191  * @return connection OR NULL, if no memory left
192  */
193 static hci_connection_t * create_connection_for_bd_addr_and_type(const bd_addr_t addr, bd_addr_type_t addr_type){
194     log_info("create_connection_for_addr %s, type %x", bd_addr_to_str(addr), addr_type);
195     hci_connection_t * conn = btstack_memory_hci_connection_get();
196     if (!conn) return NULL;
197     bd_addr_copy(conn->address, addr);
198     conn->role = HCI_ROLE_INVALID;
199     conn->address_type = addr_type;
200     conn->con_handle = 0xffff;
201     conn->authentication_flags = AUTH_FLAGS_NONE;
202     conn->bonding_flags = 0;
203     conn->requested_security_level = LEVEL_0;
204 #ifdef ENABLE_CLASSIC
205     conn->request_role = HCI_ROLE_INVALID;
206     btstack_run_loop_set_timer_handler(&conn->timeout, hci_connection_timeout_handler);
207     btstack_run_loop_set_timer_context(&conn->timeout, conn);
208     hci_connection_timestamp(conn);
209 #endif
210     conn->acl_recombination_length = 0;
211     conn->acl_recombination_pos = 0;
212     conn->num_packets_sent = 0;
213 
214     conn->le_con_parameter_update_state = CON_PARAMETER_UPDATE_NONE;
215 #ifdef ENABLE_BLE
216     conn->le_phy_update_all_phys = 0xff;
217 #endif
218 #ifdef ENABLE_LE_LIMIT_ACL_FRAGMENT_BY_MAX_OCTETS
219     conn->le_max_tx_octets = 27;
220 #endif
221     btstack_linked_list_add(&hci_stack->connections, (btstack_linked_item_t *) conn);
222     return conn;
223 }
224 
225 
226 /**
227  * get le connection parameter range
228 *
229  * @return le connection parameter range struct
230  */
231 void gap_get_connection_parameter_range(le_connection_parameter_range_t * range){
232     *range = hci_stack->le_connection_parameter_range;
233 }
234 
235 /**
236  * set le connection parameter range
237  *
238  */
239 
240 void gap_set_connection_parameter_range(le_connection_parameter_range_t *range){
241     hci_stack->le_connection_parameter_range = *range;
242 }
243 
244 /**
245  * @brief Test if connection parameters are inside in existing rage
246  * @param conn_interval_min (unit: 1.25ms)
247  * @param conn_interval_max (unit: 1.25ms)
248  * @param conn_latency
249  * @param supervision_timeout (unit: 10ms)
250  * @returns 1 if included
251  */
252 int gap_connection_parameter_range_included(le_connection_parameter_range_t * existing_range, uint16_t le_conn_interval_min, uint16_t le_conn_interval_max, uint16_t le_conn_latency, uint16_t le_supervision_timeout){
253     if (le_conn_interval_min < existing_range->le_conn_interval_min) return 0;
254     if (le_conn_interval_max > existing_range->le_conn_interval_max) return 0;
255 
256     if (le_conn_latency < existing_range->le_conn_latency_min) return 0;
257     if (le_conn_latency > existing_range->le_conn_latency_max) return 0;
258 
259     if (le_supervision_timeout < existing_range->le_supervision_timeout_min) return 0;
260     if (le_supervision_timeout > existing_range->le_supervision_timeout_max) return 0;
261 
262     return 1;
263 }
264 
265 /**
266  * @brief Set max number of connections in LE Peripheral role (if Bluetooth Controller supports it)
267  * @note: default: 1
268  * @param max_peripheral_connections
269  */
270 #ifdef ENABLE_LE_PERIPHERAL
271 void gap_set_max_number_peripheral_connections(int max_peripheral_connections){
272     hci_stack->le_max_number_peripheral_connections = max_peripheral_connections;
273 }
274 #endif
275 
276 /**
277  * get hci connections iterator
278  *
279  * @return hci connections iterator
280  */
281 
282 void hci_connections_get_iterator(btstack_linked_list_iterator_t *it){
283     btstack_linked_list_iterator_init(it, &hci_stack->connections);
284 }
285 
286 /**
287  * get connection for a given handle
288  *
289  * @return connection OR NULL, if not found
290  */
291 hci_connection_t * hci_connection_for_handle(hci_con_handle_t con_handle){
292     btstack_linked_list_iterator_t it;
293     btstack_linked_list_iterator_init(&it, &hci_stack->connections);
294     while (btstack_linked_list_iterator_has_next(&it)){
295         hci_connection_t * item = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
296         if ( item->con_handle == con_handle ) {
297             return item;
298         }
299     }
300     return NULL;
301 }
302 
303 /**
304  * get connection for given address
305  *
306  * @return connection OR NULL, if not found
307  */
308 hci_connection_t * hci_connection_for_bd_addr_and_type(const bd_addr_t  addr, bd_addr_type_t addr_type){
309     btstack_linked_list_iterator_t it;
310     btstack_linked_list_iterator_init(&it, &hci_stack->connections);
311     while (btstack_linked_list_iterator_has_next(&it)){
312         hci_connection_t * connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
313         if (connection->address_type != addr_type)  continue;
314         if (memcmp(addr, connection->address, 6) != 0) continue;
315         return connection;
316     }
317     return NULL;
318 }
319 
320 inline static void connectionClearAuthenticationFlags(hci_connection_t * conn, hci_authentication_flags_t flags){
321     conn->authentication_flags = (hci_authentication_flags_t)(conn->authentication_flags & ~flags);
322 }
323 
324 inline static void connectionSetAuthenticationFlags(hci_connection_t * conn, hci_authentication_flags_t flags){
325     conn->authentication_flags = (hci_authentication_flags_t)(conn->authentication_flags | flags);
326 }
327 
328 #ifdef ENABLE_CLASSIC
329 
330 #ifdef ENABLE_SCO_OVER_HCI
331 static int hci_number_sco_connections(void){
332     int connections = 0;
333     btstack_linked_list_iterator_t it;
334     btstack_linked_list_iterator_init(&it, &hci_stack->connections);
335     while (btstack_linked_list_iterator_has_next(&it)){
336         hci_connection_t * connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
337         if (connection->address_type != BD_ADDR_TYPE_SCO) continue;
338         connections++;
339     }
340     return connections;
341 }
342 #endif
343 
344 static void hci_connection_timeout_handler(btstack_timer_source_t *timer){
345     hci_connection_t * connection = (hci_connection_t *) btstack_run_loop_get_timer_context(timer);
346 #ifdef HAVE_EMBEDDED_TICK
347     if (btstack_run_loop_embedded_get_ticks() > connection->timestamp + btstack_run_loop_embedded_ticks_for_ms(HCI_CONNECTION_TIMEOUT_MS)){
348         // connections might be timed out
349         hci_emit_l2cap_check_timeout(connection);
350     }
351 #else
352     if (btstack_run_loop_get_time_ms() > (connection->timestamp + HCI_CONNECTION_TIMEOUT_MS)){
353         // connections might be timed out
354         hci_emit_l2cap_check_timeout(connection);
355     }
356 #endif
357 }
358 
359 static void hci_connection_timestamp(hci_connection_t *connection){
360 #ifdef HAVE_EMBEDDED_TICK
361     connection->timestamp = btstack_run_loop_embedded_get_ticks();
362 #else
363     connection->timestamp = btstack_run_loop_get_time_ms();
364 #endif
365 }
366 
367 /**
368  * add authentication flags and reset timer
369  * @note: assumes classic connection
370  * @note: bd_addr is passed in as litle endian uint8_t * as it is called from parsing packets
371  */
372 static void hci_add_connection_flags_for_flipped_bd_addr(uint8_t *bd_addr, hci_authentication_flags_t flags){
373     bd_addr_t addr;
374     reverse_bd_addr(bd_addr, addr);
375     hci_connection_t * conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
376     if (conn) {
377         connectionSetAuthenticationFlags(conn, flags);
378         hci_connection_timestamp(conn);
379     }
380 }
381 
382 int  hci_authentication_active_for_handle(hci_con_handle_t handle){
383     hci_connection_t * conn = hci_connection_for_handle(handle);
384     if (!conn) return 0;
385     if (conn->authentication_flags & LEGACY_PAIRING_ACTIVE) return 1;
386     if (conn->authentication_flags & SSP_PAIRING_ACTIVE) return 1;
387     return 0;
388 }
389 
390 void gap_drop_link_key_for_bd_addr(bd_addr_t addr){
391     if (!hci_stack->link_key_db) return;
392     log_info("gap_drop_link_key_for_bd_addr: %s", bd_addr_to_str(addr));
393     hci_stack->link_key_db->delete_link_key(addr);
394 }
395 
396 void gap_store_link_key_for_bd_addr(bd_addr_t addr, link_key_t link_key, link_key_type_t type){
397     if (!hci_stack->link_key_db) return;
398     log_info("gap_store_link_key_for_bd_addr: %s, type %u", bd_addr_to_str(addr), type);
399     hci_stack->link_key_db->put_link_key(addr, link_key, type);
400 }
401 
402 bool gap_get_link_key_for_bd_addr(bd_addr_t addr, link_key_t link_key, link_key_type_t * type){
403 	if (!hci_stack->link_key_db) return false;
404 	int result = hci_stack->link_key_db->get_link_key(addr, link_key, type) != 0;
405 	log_info("link key for %s available %u, type %u", bd_addr_to_str(addr), result, (int) *type);
406 	return result;
407 }
408 
409 void gap_delete_all_link_keys(void){
410     bd_addr_t  addr;
411     link_key_t link_key;
412     link_key_type_t type;
413     btstack_link_key_iterator_t it;
414     int ok = gap_link_key_iterator_init(&it);
415     if (!ok) {
416         log_error("could not initialize iterator");
417         return;
418     }
419     while (gap_link_key_iterator_get_next(&it, addr, link_key, &type)){
420         gap_drop_link_key_for_bd_addr(addr);
421     }
422     gap_link_key_iterator_done(&it);
423 }
424 
425 int gap_link_key_iterator_init(btstack_link_key_iterator_t * it){
426     if (!hci_stack->link_key_db) return 0;
427     if (!hci_stack->link_key_db->iterator_init) return 0;
428     return hci_stack->link_key_db->iterator_init(it);
429 }
430 int gap_link_key_iterator_get_next(btstack_link_key_iterator_t * it, bd_addr_t bd_addr, link_key_t link_key, link_key_type_t * type){
431     if (!hci_stack->link_key_db) return 0;
432     return hci_stack->link_key_db->iterator_get_next(it, bd_addr, link_key, type);
433 }
434 void gap_link_key_iterator_done(btstack_link_key_iterator_t * it){
435     if (!hci_stack->link_key_db) return;
436     hci_stack->link_key_db->iterator_done(it);
437 }
438 #endif
439 
440 static bool hci_is_le_connection_type(bd_addr_type_t address_type){
441     switch (address_type){
442         case BD_ADDR_TYPE_LE_PUBLIC:
443         case BD_ADDR_TYPE_LE_RANDOM:
444         case BD_ADDR_TYPE_LE_PRIVAT_FALLBACK_PUBLIC:
445         case BD_ADDR_TYPE_LE_PRIVAT_FALLBACK_RANDOM:
446             return true;
447         default:
448             return false;
449     }
450 }
451 
452 static int hci_is_le_connection(hci_connection_t * connection){
453     return hci_is_le_connection_type(connection->address_type);
454 }
455 
456 /**
457  * count connections
458  */
459 static int nr_hci_connections(void){
460     int count = 0;
461     btstack_linked_item_t *it;
462     for (it = (btstack_linked_item_t *) hci_stack->connections; it != NULL ; it = it->next){
463         count++;
464     }
465     return count;
466 }
467 
468 static int hci_number_free_acl_slots_for_connection_type(bd_addr_type_t address_type){
469 
470     unsigned int num_packets_sent_classic = 0;
471     unsigned int num_packets_sent_le = 0;
472 
473     btstack_linked_item_t *it;
474     for (it = (btstack_linked_item_t *) hci_stack->connections; it != NULL; it = it->next){
475         hci_connection_t * connection = (hci_connection_t *) it;
476         if (hci_is_le_connection(connection)){
477             num_packets_sent_le += connection->num_packets_sent;
478         }
479         if (connection->address_type == BD_ADDR_TYPE_ACL){
480             num_packets_sent_classic += connection->num_packets_sent;
481         }
482     }
483     log_debug("ACL classic buffers: %u used of %u", num_packets_sent_classic, hci_stack->acl_packets_total_num);
484     int free_slots_classic = hci_stack->acl_packets_total_num - num_packets_sent_classic;
485     int free_slots_le = 0;
486 
487     if (free_slots_classic < 0){
488         log_error("hci_number_free_acl_slots: outgoing classic packets (%u) > total classic packets (%u)", num_packets_sent_classic, hci_stack->acl_packets_total_num);
489         return 0;
490     }
491 
492     if (hci_stack->le_acl_packets_total_num){
493         // if we have LE slots, they are used
494         free_slots_le = hci_stack->le_acl_packets_total_num - num_packets_sent_le;
495         if (free_slots_le < 0){
496             log_error("hci_number_free_acl_slots: outgoing le packets (%u) > total le packets (%u)", num_packets_sent_le, hci_stack->le_acl_packets_total_num);
497             return 0;
498         }
499     } else {
500         // otherwise, classic slots are used for LE, too
501         free_slots_classic -= num_packets_sent_le;
502         if (free_slots_classic < 0){
503             log_error("hci_number_free_acl_slots: outgoing classic + le packets (%u + %u) > total packets (%u)", num_packets_sent_classic, num_packets_sent_le, hci_stack->acl_packets_total_num);
504             return 0;
505         }
506     }
507 
508     switch (address_type){
509         case BD_ADDR_TYPE_UNKNOWN:
510             log_error("hci_number_free_acl_slots: unknown address type");
511             return 0;
512 
513         case BD_ADDR_TYPE_ACL:
514             return free_slots_classic;
515 
516         default:
517            if (hci_stack->le_acl_packets_total_num){
518                return free_slots_le;
519            }
520            return free_slots_classic;
521     }
522 }
523 
524 int hci_number_free_acl_slots_for_handle(hci_con_handle_t con_handle){
525     // get connection type
526     hci_connection_t * connection = hci_connection_for_handle(con_handle);
527     if (!connection){
528         log_error("hci_number_free_acl_slots: handle 0x%04x not in connection list", con_handle);
529         return 0;
530     }
531     return hci_number_free_acl_slots_for_connection_type(connection->address_type);
532 }
533 
534 #ifdef ENABLE_CLASSIC
535 static int hci_number_free_sco_slots(void){
536     unsigned int num_sco_packets_sent  = 0;
537     btstack_linked_item_t *it;
538     if (hci_stack->synchronous_flow_control_enabled){
539         // explicit flow control
540         for (it = (btstack_linked_item_t *) hci_stack->connections; it ; it = it->next){
541             hci_connection_t * connection = (hci_connection_t *) it;
542             if (connection->address_type != BD_ADDR_TYPE_SCO) continue;
543             num_sco_packets_sent += connection->num_packets_sent;
544         }
545         if (num_sco_packets_sent > hci_stack->sco_packets_total_num){
546             log_info("hci_number_free_sco_slots:packets (%u) > total packets (%u)", num_sco_packets_sent, hci_stack->sco_packets_total_num);
547             return 0;
548         }
549         return hci_stack->sco_packets_total_num - num_sco_packets_sent;
550     } else {
551         // implicit flow control -- TODO
552         int num_ready = 0;
553         for (it = (btstack_linked_item_t *) hci_stack->connections; it ; it = it->next){
554             hci_connection_t * connection = (hci_connection_t *) it;
555             if (connection->address_type != BD_ADDR_TYPE_SCO) continue;
556             if (connection->sco_tx_ready == 0) continue;
557             num_ready++;
558         }
559         return num_ready;
560     }
561 }
562 #endif
563 
564 // only used to send HCI Host Number Completed Packets
565 static int hci_can_send_comand_packet_transport(void){
566     if (hci_stack->hci_packet_buffer_reserved) return 0;
567 
568     // check for async hci transport implementations
569     if (hci_stack->hci_transport->can_send_packet_now){
570         if (!hci_stack->hci_transport->can_send_packet_now(HCI_COMMAND_DATA_PACKET)){
571             return 0;
572         }
573     }
574     return 1;
575 }
576 
577 // new functions replacing hci_can_send_packet_now[_using_packet_buffer]
578 int hci_can_send_command_packet_now(void){
579     if (hci_can_send_comand_packet_transport() == 0) return 0;
580     return hci_stack->num_cmd_packets > 0u;
581 }
582 
583 static int hci_transport_can_send_prepared_packet_now(uint8_t packet_type){
584     // check for async hci transport implementations
585     if (!hci_stack->hci_transport->can_send_packet_now) return 1;
586     return hci_stack->hci_transport->can_send_packet_now(packet_type);
587 }
588 
589 static int hci_can_send_prepared_acl_packet_for_address_type(bd_addr_type_t address_type){
590     if (!hci_transport_can_send_prepared_packet_now(HCI_ACL_DATA_PACKET)) return 0;
591     return hci_number_free_acl_slots_for_connection_type(address_type) > 0;
592 }
593 
594 int hci_can_send_acl_le_packet_now(void){
595     if (hci_stack->hci_packet_buffer_reserved) return 0;
596     return hci_can_send_prepared_acl_packet_for_address_type(BD_ADDR_TYPE_LE_PUBLIC);
597 }
598 
599 int hci_can_send_prepared_acl_packet_now(hci_con_handle_t con_handle) {
600     if (!hci_transport_can_send_prepared_packet_now(HCI_ACL_DATA_PACKET)) return 0;
601     return hci_number_free_acl_slots_for_handle(con_handle) > 0;
602 }
603 
604 int hci_can_send_acl_packet_now(hci_con_handle_t con_handle){
605     if (hci_stack->hci_packet_buffer_reserved) return 0;
606     return hci_can_send_prepared_acl_packet_now(con_handle);
607 }
608 
609 #ifdef ENABLE_CLASSIC
610 int hci_can_send_acl_classic_packet_now(void){
611     if (hci_stack->hci_packet_buffer_reserved) return 0;
612     return hci_can_send_prepared_acl_packet_for_address_type(BD_ADDR_TYPE_ACL);
613 }
614 
615 int hci_can_send_prepared_sco_packet_now(void){
616     if (!hci_transport_can_send_prepared_packet_now(HCI_SCO_DATA_PACKET)) return 0;
617     if (hci_have_usb_transport()){
618         return hci_stack->sco_can_send_now;
619     } else {
620         return hci_number_free_sco_slots() > 0;
621     }
622 }
623 
624 int hci_can_send_sco_packet_now(void){
625     if (hci_stack->hci_packet_buffer_reserved) return 0;
626     return hci_can_send_prepared_sco_packet_now();
627 }
628 
629 void hci_request_sco_can_send_now_event(void){
630     hci_stack->sco_waiting_for_can_send_now = 1;
631     hci_notify_if_sco_can_send_now();
632 }
633 #endif
634 
635 // used for internal checks in l2cap.c
636 int hci_is_packet_buffer_reserved(void){
637     return hci_stack->hci_packet_buffer_reserved;
638 }
639 
640 // reserves outgoing packet buffer. @returns 1 if successful
641 int hci_reserve_packet_buffer(void){
642     if (hci_stack->hci_packet_buffer_reserved) {
643         log_error("hci_reserve_packet_buffer called but buffer already reserved");
644         return 0;
645     }
646     hci_stack->hci_packet_buffer_reserved = 1;
647     return 1;
648 }
649 
650 void hci_release_packet_buffer(void){
651     hci_stack->hci_packet_buffer_reserved = 0;
652 }
653 
654 // assumption: synchronous implementations don't provide can_send_packet_now as they don't keep the buffer after the call
655 static int hci_transport_synchronous(void){
656     return hci_stack->hci_transport->can_send_packet_now == NULL;
657 }
658 
659 static int hci_send_acl_packet_fragments(hci_connection_t *connection){
660 
661     // log_info("hci_send_acl_packet_fragments  %u/%u (con 0x%04x)", hci_stack->acl_fragmentation_pos, hci_stack->acl_fragmentation_total_size, connection->con_handle);
662 
663     // max ACL data packet length depends on connection type (LE vs. Classic) and available buffers
664     uint16_t max_acl_data_packet_length = hci_stack->acl_data_packet_length;
665     if (hci_is_le_connection(connection) && (hci_stack->le_data_packets_length > 0u)){
666         max_acl_data_packet_length = hci_stack->le_data_packets_length;
667     }
668 
669 #ifdef ENABLE_LE_LIMIT_ACL_FRAGMENT_BY_MAX_OCTETS
670     if (hci_is_le_connection(connection)){
671         max_acl_data_packet_length = connection->le_max_tx_octets;
672     }
673 #endif
674 
675     log_debug("hci_send_acl_packet_fragments entered");
676 
677     int err;
678     // multiple packets could be send on a synchronous HCI transport
679     while (true){
680 
681         log_debug("hci_send_acl_packet_fragments loop entered");
682 
683         // get current data
684         const uint16_t acl_header_pos = hci_stack->acl_fragmentation_pos - 4u;
685         int current_acl_data_packet_length = hci_stack->acl_fragmentation_total_size - hci_stack->acl_fragmentation_pos;
686         bool more_fragments = false;
687 
688         // if ACL packet is larger than Bluetooth packet buffer, only send max_acl_data_packet_length
689         if (current_acl_data_packet_length > max_acl_data_packet_length){
690             more_fragments = true;
691             current_acl_data_packet_length = max_acl_data_packet_length;
692         }
693 
694         // copy handle_and_flags if not first fragment and update packet boundary flags to be 01 (continuing fragmnent)
695         if (acl_header_pos > 0u){
696             uint16_t handle_and_flags = little_endian_read_16(hci_stack->hci_packet_buffer, 0);
697             handle_and_flags = (handle_and_flags & 0xcfffu) | (1u << 12u);
698             little_endian_store_16(hci_stack->hci_packet_buffer, acl_header_pos, handle_and_flags);
699         }
700 
701         // update header len
702         little_endian_store_16(hci_stack->hci_packet_buffer, acl_header_pos + 2u, current_acl_data_packet_length);
703 
704         // count packet
705         connection->num_packets_sent++;
706         log_debug("hci_send_acl_packet_fragments loop before send (more fragments %d)", (int) more_fragments);
707 
708         // update state for next fragment (if any) as "transport done" might be sent during send_packet already
709         if (more_fragments){
710             // update start of next fragment to send
711             hci_stack->acl_fragmentation_pos += current_acl_data_packet_length;
712         } else {
713             // done
714             hci_stack->acl_fragmentation_pos = 0;
715             hci_stack->acl_fragmentation_total_size = 0;
716         }
717 
718         // send packet
719         uint8_t * packet = &hci_stack->hci_packet_buffer[acl_header_pos];
720         const int size = current_acl_data_packet_length + 4;
721         hci_dump_packet(HCI_ACL_DATA_PACKET, 0, packet, size);
722         hci_stack->acl_fragmentation_tx_active = 1;
723         err = hci_stack->hci_transport->send_packet(HCI_ACL_DATA_PACKET, packet, size);
724 
725         log_debug("hci_send_acl_packet_fragments loop after send (more fragments %d)", (int) more_fragments);
726 
727         // done yet?
728         if (!more_fragments) break;
729 
730         // can send more?
731         if (!hci_can_send_prepared_acl_packet_now(connection->con_handle)) return err;
732     }
733 
734     log_debug("hci_send_acl_packet_fragments loop over");
735 
736     // release buffer now for synchronous transport
737     if (hci_transport_synchronous()){
738         hci_stack->acl_fragmentation_tx_active = 0;
739         hci_release_packet_buffer();
740         hci_emit_transport_packet_sent();
741     }
742 
743     return err;
744 }
745 
746 // pre: caller has reserved the packet buffer
747 int hci_send_acl_packet_buffer(int size){
748 
749     // log_info("hci_send_acl_packet_buffer size %u", size);
750 
751     if (!hci_stack->hci_packet_buffer_reserved) {
752         log_error("hci_send_acl_packet_buffer called without reserving packet buffer");
753         return 0;
754     }
755 
756     uint8_t * packet = hci_stack->hci_packet_buffer;
757     hci_con_handle_t con_handle = READ_ACL_CONNECTION_HANDLE(packet);
758 
759     // check for free places on Bluetooth module
760     if (!hci_can_send_prepared_acl_packet_now(con_handle)) {
761         log_error("hci_send_acl_packet_buffer called but no free ACL buffers on controller");
762         hci_release_packet_buffer();
763         hci_emit_transport_packet_sent();
764         return BTSTACK_ACL_BUFFERS_FULL;
765     }
766 
767     hci_connection_t *connection = hci_connection_for_handle( con_handle);
768     if (!connection) {
769         log_error("hci_send_acl_packet_buffer called but no connection for handle 0x%04x", con_handle);
770         hci_release_packet_buffer();
771         hci_emit_transport_packet_sent();
772         return 0;
773     }
774 
775 #ifdef ENABLE_CLASSIC
776     hci_connection_timestamp(connection);
777 #endif
778 
779     // hci_dump_packet( HCI_ACL_DATA_PACKET, 0, packet, size);
780 
781     // setup data
782     hci_stack->acl_fragmentation_total_size = size;
783     hci_stack->acl_fragmentation_pos = 4;   // start of L2CAP packet
784 
785     return hci_send_acl_packet_fragments(connection);
786 }
787 
788 #ifdef ENABLE_CLASSIC
789 // pre: caller has reserved the packet buffer
790 int hci_send_sco_packet_buffer(int size){
791 
792     // log_info("hci_send_acl_packet_buffer size %u", size);
793 
794     if (!hci_stack->hci_packet_buffer_reserved) {
795         log_error("hci_send_acl_packet_buffer called without reserving packet buffer");
796         return 0;
797     }
798 
799     uint8_t * packet = hci_stack->hci_packet_buffer;
800 
801     // skip checks in loopback mode
802     if (!hci_stack->loopback_mode){
803         hci_con_handle_t con_handle = READ_ACL_CONNECTION_HANDLE(packet);   // same for ACL and SCO
804 
805         // check for free places on Bluetooth module
806         if (!hci_can_send_prepared_sco_packet_now()) {
807             log_error("hci_send_sco_packet_buffer called but no free SCO buffers on controller");
808             hci_release_packet_buffer();
809             hci_emit_transport_packet_sent();
810             return BTSTACK_ACL_BUFFERS_FULL;
811         }
812 
813         // track send packet in connection struct
814         hci_connection_t *connection = hci_connection_for_handle( con_handle);
815         if (!connection) {
816             log_error("hci_send_sco_packet_buffer called but no connection for handle 0x%04x", con_handle);
817             hci_release_packet_buffer();
818             hci_emit_transport_packet_sent();
819             return 0;
820         }
821 
822         if (hci_have_usb_transport()){
823             // token used
824             hci_stack->sco_can_send_now = 0;
825         } else {
826             if (hci_stack->synchronous_flow_control_enabled){
827                 connection->num_packets_sent++;
828             } else {
829                 connection->sco_tx_ready--;
830             }
831         }
832     }
833 
834     hci_dump_packet( HCI_SCO_DATA_PACKET, 0, packet, size);
835     int err = hci_stack->hci_transport->send_packet(HCI_SCO_DATA_PACKET, packet, size);
836 
837     if (hci_transport_synchronous()){
838         hci_release_packet_buffer();
839         hci_emit_transport_packet_sent();
840     }
841 
842     return err;
843 }
844 #endif
845 
846 static void acl_handler(uint8_t *packet, uint16_t size){
847 
848     // get info
849     hci_con_handle_t con_handle = READ_ACL_CONNECTION_HANDLE(packet);
850     hci_connection_t *conn      = hci_connection_for_handle(con_handle);
851     uint8_t  acl_flags          = READ_ACL_FLAGS(packet);
852     uint16_t acl_length         = READ_ACL_LENGTH(packet);
853 
854     // ignore non-registered handle
855     if (!conn){
856         log_error("acl_handler called with non-registered handle %u!" , con_handle);
857         return;
858     }
859 
860     // assert packet is complete
861     if ((acl_length + 4u) != size){
862         log_error("acl_handler called with ACL packet of wrong size %d, expected %u => dropping packet", size, acl_length + 4);
863         return;
864     }
865 
866 #ifdef ENABLE_CLASSIC
867     // update idle timestamp
868     hci_connection_timestamp(conn);
869 #endif
870 
871 #ifdef ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL
872     hci_stack->host_completed_packets = 1;
873     conn->num_packets_completed++;
874 #endif
875 
876     // handle different packet types
877     switch (acl_flags & 0x03u) {
878 
879         case 0x01: // continuation fragment
880 
881             // sanity checks
882             if (conn->acl_recombination_pos == 0u) {
883                 log_error( "ACL Cont Fragment but no first fragment for handle 0x%02x", con_handle);
884                 return;
885             }
886             if ((conn->acl_recombination_pos + acl_length) > (4u + HCI_ACL_BUFFER_SIZE)){
887                 log_error( "ACL Cont Fragment to large: combined packet %u > buffer size %u for handle 0x%02x",
888                     conn->acl_recombination_pos + acl_length, 4 + HCI_ACL_BUFFER_SIZE, con_handle);
889                 conn->acl_recombination_pos = 0;
890                 return;
891             }
892 
893             // append fragment payload (header already stored)
894             (void)memcpy(&conn->acl_recombination_buffer[HCI_INCOMING_PRE_BUFFER_SIZE + conn->acl_recombination_pos],
895                          &packet[4], acl_length);
896             conn->acl_recombination_pos += acl_length;
897 
898             // forward complete L2CAP packet if complete.
899             if (conn->acl_recombination_pos >= (conn->acl_recombination_length + 4u + 4u)){ // pos already incl. ACL header
900                 hci_emit_acl_packet(&conn->acl_recombination_buffer[HCI_INCOMING_PRE_BUFFER_SIZE], conn->acl_recombination_pos);
901                 // reset recombination buffer
902                 conn->acl_recombination_length = 0;
903                 conn->acl_recombination_pos = 0;
904             }
905             break;
906 
907         case 0x02: { // first fragment
908 
909             // sanity check
910             if (conn->acl_recombination_pos) {
911                 log_error( "ACL First Fragment but data in buffer for handle 0x%02x, dropping stale fragments", con_handle);
912                 conn->acl_recombination_pos = 0;
913             }
914 
915             // peek into L2CAP packet!
916             uint16_t l2cap_length = READ_L2CAP_LENGTH( packet );
917 
918             // compare fragment size to L2CAP packet size
919             if (acl_length >= (l2cap_length + 4u)){
920                 // forward fragment as L2CAP packet
921                 hci_emit_acl_packet(packet, acl_length + 4u);
922             } else {
923 
924                 if (acl_length > HCI_ACL_BUFFER_SIZE){
925                     log_error( "ACL First Fragment to large: fragment %u > buffer size %u for handle 0x%02x",
926                         4 + acl_length, 4 + HCI_ACL_BUFFER_SIZE, con_handle);
927                     return;
928                 }
929 
930                 // store first fragment and tweak acl length for complete package
931                 (void)memcpy(&conn->acl_recombination_buffer[HCI_INCOMING_PRE_BUFFER_SIZE],
932                              packet, acl_length + 4u);
933                 conn->acl_recombination_pos    = acl_length + 4u;
934                 conn->acl_recombination_length = l2cap_length;
935                 little_endian_store_16(conn->acl_recombination_buffer, HCI_INCOMING_PRE_BUFFER_SIZE + 2u, l2cap_length +4u);
936             }
937             break;
938 
939         }
940         default:
941             log_error( "acl_handler called with invalid packet boundary flags %u", acl_flags & 0x03);
942             return;
943     }
944 
945     // execute main loop
946     hci_run();
947 }
948 
949 static void hci_shutdown_connection(hci_connection_t *conn){
950     log_info("Connection closed: handle 0x%x, %s", conn->con_handle, bd_addr_to_str(conn->address));
951 
952 #ifdef ENABLE_CLASSIC
953 #ifdef ENABLE_SCO_OVER_HCI
954     int addr_type = conn->address_type;
955 #endif
956 #endif
957 
958     btstack_run_loop_remove_timer(&conn->timeout);
959 
960     btstack_linked_list_remove(&hci_stack->connections, (btstack_linked_item_t *) conn);
961     btstack_memory_hci_connection_free( conn );
962 
963     // now it's gone
964     hci_emit_nr_connections_changed();
965 
966 #ifdef ENABLE_CLASSIC
967 #ifdef ENABLE_SCO_OVER_HCI
968     // update SCO
969     if (addr_type == BD_ADDR_TYPE_SCO && hci_stack->hci_transport && hci_stack->hci_transport->set_sco_config){
970         hci_stack->hci_transport->set_sco_config(hci_stack->sco_voice_setting_active, hci_number_sco_connections());
971     }
972 #endif
973 #endif
974 }
975 
976 #ifdef ENABLE_CLASSIC
977 
978 static const uint16_t packet_type_sizes[] = {
979     0, HCI_ACL_2DH1_SIZE, HCI_ACL_3DH1_SIZE, HCI_ACL_DM1_SIZE,
980     HCI_ACL_DH1_SIZE, 0, 0, 0,
981     HCI_ACL_2DH3_SIZE, HCI_ACL_3DH3_SIZE, HCI_ACL_DM3_SIZE, HCI_ACL_DH3_SIZE,
982     HCI_ACL_2DH5_SIZE, HCI_ACL_3DH5_SIZE, HCI_ACL_DM5_SIZE, HCI_ACL_DH5_SIZE
983 };
984 static const uint8_t  packet_type_feature_requirement_bit[] = {
985      0, // 3 slot packets
986      1, // 5 slot packets
987     25, // EDR 2 mpbs
988     26, // EDR 3 mbps
989     39, // 3 slot EDR packts
990     40, // 5 slot EDR packet
991 };
992 static const uint16_t packet_type_feature_packet_mask[] = {
993     0x0f00, // 3 slot packets
994     0xf000, // 5 slot packets
995     0x1102, // EDR 2 mpbs
996     0x2204, // EDR 3 mbps
997     0x0300, // 3 slot EDR packts
998     0x3000, // 5 slot EDR packet
999 };
1000 
1001 static uint16_t hci_acl_packet_types_for_buffer_size_and_local_features(uint16_t buffer_size, uint8_t * local_supported_features){
1002     // enable packet types based on size
1003     uint16_t packet_types = 0;
1004     unsigned int i;
1005     for (i=0;i<16;i++){
1006         if (packet_type_sizes[i] == 0) continue;
1007         if (packet_type_sizes[i] <= buffer_size){
1008             packet_types |= 1 << i;
1009         }
1010     }
1011     // disable packet types due to missing local supported features
1012     for (i=0;i<sizeof(packet_type_feature_requirement_bit);i++){
1013         unsigned int bit_idx = packet_type_feature_requirement_bit[i];
1014         int feature_set = (local_supported_features[bit_idx >> 3] & (1<<(bit_idx & 7))) != 0;
1015         if (feature_set) continue;
1016         log_info("Features bit %02u is not set, removing packet types 0x%04x", bit_idx, packet_type_feature_packet_mask[i]);
1017         packet_types &= ~packet_type_feature_packet_mask[i];
1018     }
1019     // flip bits for "may not be used"
1020     packet_types ^= 0x3306;
1021     return packet_types;
1022 }
1023 
1024 uint16_t hci_usable_acl_packet_types(void){
1025     return hci_stack->packet_types;
1026 }
1027 #endif
1028 
1029 uint8_t* hci_get_outgoing_packet_buffer(void){
1030     // hci packet buffer is >= acl data packet length
1031     return hci_stack->hci_packet_buffer;
1032 }
1033 
1034 uint16_t hci_max_acl_data_packet_length(void){
1035     return hci_stack->acl_data_packet_length;
1036 }
1037 
1038 #ifdef ENABLE_CLASSIC
1039 int hci_extended_sco_link_supported(void){
1040     // No. 31, byte 3, bit 7
1041     return (hci_stack->local_supported_features[3] & (1 << 7)) != 0;
1042 }
1043 #endif
1044 
1045 int hci_non_flushable_packet_boundary_flag_supported(void){
1046     // No. 54, byte 6, bit 6
1047     return (hci_stack->local_supported_features[6u] & (1u << 6u)) != 0u;
1048 }
1049 
1050 static int gap_ssp_supported(void){
1051     // No. 51, byte 6, bit 3
1052     return (hci_stack->local_supported_features[6u] & (1u << 3u)) != 0u;
1053 }
1054 
1055 static int hci_classic_supported(void){
1056 #ifdef ENABLE_CLASSIC
1057     // No. 37, byte 4, bit 5, = No BR/EDR Support
1058     return (hci_stack->local_supported_features[4] & (1 << 5)) == 0;
1059 #else
1060     return 0;
1061 #endif
1062 }
1063 
1064 static int hci_le_supported(void){
1065 #ifdef ENABLE_BLE
1066     // No. 37, byte 4, bit 6 = LE Supported (Controller)
1067     return (hci_stack->local_supported_features[4u] & (1u << 6u)) != 0u;
1068 #else
1069     return 0;
1070 #endif
1071 }
1072 
1073 #ifdef ENABLE_BLE
1074 
1075 /**
1076  * @brief Get addr type and address used for LE in Advertisements, Scan Responses,
1077  */
1078 void gap_le_get_own_address(uint8_t * addr_type, bd_addr_t addr){
1079     *addr_type = hci_stack->le_own_addr_type;
1080     if (hci_stack->le_own_addr_type){
1081         (void)memcpy(addr, hci_stack->le_random_address, 6);
1082     } else {
1083         (void)memcpy(addr, hci_stack->local_bd_addr, 6);
1084     }
1085 }
1086 
1087 #ifdef ENABLE_LE_CENTRAL
1088 void le_handle_advertisement_report(uint8_t *packet, uint16_t size){
1089 
1090     int offset = 3;
1091     int num_reports = packet[offset];
1092     offset += 1;
1093 
1094     int i;
1095     // log_info("HCI: handle adv report with num reports: %d", num_reports);
1096     uint8_t event[12 + LE_ADVERTISING_DATA_SIZE]; // use upper bound to avoid var size automatic var
1097     for (i=0; (i<num_reports) && (offset < size);i++){
1098         // sanity checks on data_length:
1099         uint8_t data_length = packet[offset + 8];
1100         if (data_length > LE_ADVERTISING_DATA_SIZE) return;
1101         if ((offset + 9u + data_length + 1u) > size)    return;
1102         // setup event
1103         uint8_t event_size = 10u + data_length;
1104         int pos = 0;
1105         event[pos++] = GAP_EVENT_ADVERTISING_REPORT;
1106         event[pos++] = event_size;
1107         (void)memcpy(&event[pos], &packet[offset], 1 + 1 + 6); // event type + address type + address
1108         offset += 8;
1109         pos += 8;
1110         event[pos++] = packet[offset + 1 + data_length]; // rssi
1111         event[pos++] = data_length;
1112         offset++;
1113         (void)memcpy(&event[pos], &packet[offset], data_length);
1114         pos +=    data_length;
1115         offset += data_length + 1u; // rssi
1116         hci_emit_event(event, pos, 1);
1117     }
1118 }
1119 #endif
1120 #endif
1121 
1122 #ifdef ENABLE_BLE
1123 #ifdef ENABLE_LE_PERIPHERAL
1124 static void hci_update_advertisements_enabled_for_current_roles(void){
1125     if (hci_stack->le_advertisements_enabled){
1126         // get number of active le slave connections
1127         int num_slave_connections = 0;
1128         btstack_linked_list_iterator_t it;
1129         btstack_linked_list_iterator_init(&it, &hci_stack->connections);
1130         while (btstack_linked_list_iterator_has_next(&it)){
1131             hci_connection_t * con = (hci_connection_t*) btstack_linked_list_iterator_next(&it);
1132             log_info("state %u, role %u, le_con %u", con->state, con->role, hci_is_le_connection(con));
1133             if (con->state != OPEN) continue;
1134             if (con->role  != HCI_ROLE_SLAVE) continue;
1135             if (!hci_is_le_connection(con)) continue;
1136             num_slave_connections++;
1137         }
1138         log_info("Num LE Peripheral roles: %u of %u", num_slave_connections, hci_stack->le_max_number_peripheral_connections);
1139         hci_stack->le_advertisements_enabled_for_current_roles = num_slave_connections < hci_stack->le_max_number_peripheral_connections;
1140     } else {
1141         hci_stack->le_advertisements_enabled_for_current_roles = false;
1142     }
1143 }
1144 #endif
1145 #endif
1146 
1147 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1148 
1149 static uint32_t hci_transport_uart_get_main_baud_rate(void){
1150     if (!hci_stack->config) return 0;
1151     uint32_t baud_rate = ((hci_transport_config_uart_t *)hci_stack->config)->baudrate_main;
1152     // Limit baud rate for Broadcom chipsets to 3 mbps
1153     if ((hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_BROADCOM_CORPORATION) && (baud_rate > 3000000)){
1154         baud_rate = 3000000;
1155     }
1156     return baud_rate;
1157 }
1158 
1159 static void hci_initialization_timeout_handler(btstack_timer_source_t * ds){
1160     UNUSED(ds);
1161 
1162     switch (hci_stack->substate){
1163         case HCI_INIT_W4_SEND_RESET:
1164             log_info("Resend HCI Reset");
1165             hci_stack->substate = HCI_INIT_SEND_RESET;
1166             hci_stack->num_cmd_packets = 1;
1167             hci_run();
1168             break;
1169         case HCI_INIT_W4_CUSTOM_INIT_CSR_WARM_BOOT_LINK_RESET:
1170             log_info("Resend HCI Reset - CSR Warm Boot with Link Reset");
1171             if (hci_stack->hci_transport->reset_link){
1172                 hci_stack->hci_transport->reset_link();
1173             }
1174 
1175             /* fall through */
1176 
1177         case HCI_INIT_W4_CUSTOM_INIT_CSR_WARM_BOOT:
1178             log_info("Resend HCI Reset - CSR Warm Boot");
1179             hci_stack->substate = HCI_INIT_SEND_RESET_CSR_WARM_BOOT;
1180             hci_stack->num_cmd_packets = 1;
1181             hci_run();
1182             break;
1183         case HCI_INIT_W4_SEND_BAUD_CHANGE:
1184             if (hci_stack->hci_transport->set_baudrate){
1185                 uint32_t baud_rate = hci_transport_uart_get_main_baud_rate();
1186                 log_info("Local baud rate change to %" PRIu32 "(timeout handler)", baud_rate);
1187                 hci_stack->hci_transport->set_baudrate(baud_rate);
1188             }
1189             // For CSR, HCI Reset is sent on new baud rate. Don't forget to reset link for H5/BCSP
1190             if (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_CAMBRIDGE_SILICON_RADIO){
1191                 if (hci_stack->hci_transport->reset_link){
1192                     log_info("Link Reset");
1193                     hci_stack->hci_transport->reset_link();
1194                 }
1195                 hci_stack->substate = HCI_INIT_SEND_RESET_CSR_WARM_BOOT;
1196                 hci_run();
1197             }
1198             break;
1199         case HCI_INIT_W4_CUSTOM_INIT_BCM_DELAY:
1200             // otherwise continue
1201             hci_stack->substate = HCI_INIT_W4_READ_LOCAL_SUPPORTED_COMMANDS;
1202             hci_send_cmd(&hci_read_local_supported_commands);
1203             break;
1204         default:
1205             break;
1206     }
1207 }
1208 #endif
1209 
1210 static void hci_initializing_next_state(void){
1211     hci_stack->substate = (hci_substate_t )( ((int) hci_stack->substate) + 1);
1212 }
1213 
1214 // assumption: hci_can_send_command_packet_now() == true
1215 static void hci_initializing_run(void){
1216     log_debug("hci_initializing_run: substate %u, can send %u", hci_stack->substate, hci_can_send_command_packet_now());
1217     switch (hci_stack->substate){
1218         case HCI_INIT_SEND_RESET:
1219             hci_state_reset();
1220 
1221 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1222             // prepare reset if command complete not received in 100ms
1223             btstack_run_loop_set_timer(&hci_stack->timeout, HCI_RESET_RESEND_TIMEOUT_MS);
1224             btstack_run_loop_set_timer_handler(&hci_stack->timeout, hci_initialization_timeout_handler);
1225             btstack_run_loop_add_timer(&hci_stack->timeout);
1226 #endif
1227             // send command
1228             hci_stack->substate = HCI_INIT_W4_SEND_RESET;
1229             hci_send_cmd(&hci_reset);
1230             break;
1231         case HCI_INIT_SEND_READ_LOCAL_VERSION_INFORMATION:
1232             hci_send_cmd(&hci_read_local_version_information);
1233             hci_stack->substate = HCI_INIT_W4_SEND_READ_LOCAL_VERSION_INFORMATION;
1234             break;
1235         case HCI_INIT_SEND_READ_LOCAL_NAME:
1236             hci_send_cmd(&hci_read_local_name);
1237             hci_stack->substate = HCI_INIT_W4_SEND_READ_LOCAL_NAME;
1238             break;
1239 
1240 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1241         case HCI_INIT_SEND_RESET_CSR_WARM_BOOT:
1242             hci_state_reset();
1243             // prepare reset if command complete not received in 100ms
1244             btstack_run_loop_set_timer(&hci_stack->timeout, HCI_RESET_RESEND_TIMEOUT_MS);
1245             btstack_run_loop_set_timer_handler(&hci_stack->timeout, hci_initialization_timeout_handler);
1246             btstack_run_loop_add_timer(&hci_stack->timeout);
1247             // send command
1248             hci_stack->substate = HCI_INIT_W4_CUSTOM_INIT_CSR_WARM_BOOT;
1249             hci_send_cmd(&hci_reset);
1250             break;
1251         case HCI_INIT_SEND_RESET_ST_WARM_BOOT:
1252             hci_state_reset();
1253             hci_stack->substate = HCI_INIT_W4_SEND_RESET_ST_WARM_BOOT;
1254             hci_send_cmd(&hci_reset);
1255             break;
1256         case HCI_INIT_SEND_BAUD_CHANGE: {
1257             uint32_t baud_rate = hci_transport_uart_get_main_baud_rate();
1258             hci_stack->chipset->set_baudrate_command(baud_rate, hci_stack->hci_packet_buffer);
1259             hci_stack->last_cmd_opcode = little_endian_read_16(hci_stack->hci_packet_buffer, 0);
1260             hci_stack->substate = HCI_INIT_W4_SEND_BAUD_CHANGE;
1261             hci_send_cmd_packet(hci_stack->hci_packet_buffer, 3u + hci_stack->hci_packet_buffer[2u]);
1262             // STLC25000D: baudrate change happens within 0.5 s after command was send,
1263             // use timer to update baud rate after 100 ms (knowing exactly, when command was sent is non-trivial)
1264             if (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_ST_MICROELECTRONICS){
1265                 btstack_run_loop_set_timer(&hci_stack->timeout, HCI_RESET_RESEND_TIMEOUT_MS);
1266                 btstack_run_loop_add_timer(&hci_stack->timeout);
1267             }
1268             break;
1269         }
1270         case HCI_INIT_SEND_BAUD_CHANGE_BCM: {
1271             uint32_t baud_rate = hci_transport_uart_get_main_baud_rate();
1272             hci_stack->chipset->set_baudrate_command(baud_rate, hci_stack->hci_packet_buffer);
1273             hci_stack->last_cmd_opcode = little_endian_read_16(hci_stack->hci_packet_buffer, 0);
1274             hci_stack->substate = HCI_INIT_W4_SEND_BAUD_CHANGE_BCM;
1275             hci_send_cmd_packet(hci_stack->hci_packet_buffer, 3u + hci_stack->hci_packet_buffer[2u]);
1276             break;
1277         }
1278         case HCI_INIT_CUSTOM_INIT:
1279             // Custom initialization
1280             if (hci_stack->chipset && hci_stack->chipset->next_command){
1281                 hci_stack->chipset_result = (*hci_stack->chipset->next_command)(hci_stack->hci_packet_buffer);
1282                 bool send_cmd = false;
1283                 switch (hci_stack->chipset_result){
1284                     case BTSTACK_CHIPSET_VALID_COMMAND:
1285                         send_cmd = true;
1286                         hci_stack->substate = HCI_INIT_W4_CUSTOM_INIT;
1287                         break;
1288                     case BTSTACK_CHIPSET_WARMSTART_REQUIRED:
1289                         send_cmd = true;
1290                         // CSR Warm Boot: Wait a bit, then send HCI Reset until HCI Command Complete
1291                         log_info("CSR Warm Boot");
1292                         btstack_run_loop_set_timer(&hci_stack->timeout, HCI_RESET_RESEND_TIMEOUT_MS);
1293                         btstack_run_loop_set_timer_handler(&hci_stack->timeout, hci_initialization_timeout_handler);
1294                         btstack_run_loop_add_timer(&hci_stack->timeout);
1295                         if ((hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_CAMBRIDGE_SILICON_RADIO)
1296                             && hci_stack->config
1297                             && hci_stack->chipset
1298                             // && hci_stack->chipset->set_baudrate_command -- there's no such command
1299                             && hci_stack->hci_transport->set_baudrate
1300                             && hci_transport_uart_get_main_baud_rate()){
1301                             hci_stack->substate = HCI_INIT_W4_SEND_BAUD_CHANGE;
1302                         } else {
1303                            hci_stack->substate = HCI_INIT_W4_CUSTOM_INIT_CSR_WARM_BOOT_LINK_RESET;
1304                         }
1305                         break;
1306                     default:
1307                         break;
1308                 }
1309 
1310                 if (send_cmd){
1311                     int size = 3u + hci_stack->hci_packet_buffer[2u];
1312                     hci_stack->last_cmd_opcode = little_endian_read_16(hci_stack->hci_packet_buffer, 0);
1313                     hci_dump_packet(HCI_COMMAND_DATA_PACKET, 0, hci_stack->hci_packet_buffer, size);
1314                     hci_stack->hci_transport->send_packet(HCI_COMMAND_DATA_PACKET, hci_stack->hci_packet_buffer, size);
1315                     break;
1316                 }
1317                 log_info("Init script done");
1318 
1319                 // Init script download on Broadcom chipsets causes:
1320                 if ( (hci_stack->chipset_result != BTSTACK_CHIPSET_NO_INIT_SCRIPT) &&
1321                    (  (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_BROADCOM_CORPORATION)
1322                 ||    (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_EM_MICROELECTRONIC_MARIN_SA)) ){
1323 
1324                     // - baud rate to reset, restore UART baud rate if needed
1325                     int need_baud_change = hci_stack->config
1326                         && hci_stack->chipset
1327                         && hci_stack->chipset->set_baudrate_command
1328                         && hci_stack->hci_transport->set_baudrate
1329                         && ((hci_transport_config_uart_t *)hci_stack->config)->baudrate_main;
1330                     if (need_baud_change) {
1331                         uint32_t baud_rate = ((hci_transport_config_uart_t *)hci_stack->config)->baudrate_init;
1332                         log_info("Local baud rate change to %" PRIu32 " after init script (bcm)", baud_rate);
1333                         hci_stack->hci_transport->set_baudrate(baud_rate);
1334                     }
1335 
1336                     uint16_t bcm_delay_ms = 300;
1337                     // - UART may or may not be disabled during update and Controller RTS may or may not be high during this time
1338                     //   -> Work around: wait here.
1339                     log_info("BCM delay (%u ms) after init script", bcm_delay_ms);
1340                     hci_stack->substate = HCI_INIT_W4_CUSTOM_INIT_BCM_DELAY;
1341                     btstack_run_loop_set_timer(&hci_stack->timeout, bcm_delay_ms);
1342                     btstack_run_loop_set_timer_handler(&hci_stack->timeout, hci_initialization_timeout_handler);
1343                     btstack_run_loop_add_timer(&hci_stack->timeout);
1344                     break;
1345                 }
1346             }
1347             // otherwise continue
1348             hci_stack->substate = HCI_INIT_W4_READ_LOCAL_SUPPORTED_COMMANDS;
1349             hci_send_cmd(&hci_read_local_supported_commands);
1350             break;
1351         case HCI_INIT_SET_BD_ADDR:
1352             log_info("Set Public BD ADDR to %s", bd_addr_to_str(hci_stack->custom_bd_addr));
1353             hci_stack->chipset->set_bd_addr_command(hci_stack->custom_bd_addr, hci_stack->hci_packet_buffer);
1354             hci_stack->last_cmd_opcode = little_endian_read_16(hci_stack->hci_packet_buffer, 0);
1355             hci_stack->substate = HCI_INIT_W4_SET_BD_ADDR;
1356             hci_send_cmd_packet(hci_stack->hci_packet_buffer, 3u + hci_stack->hci_packet_buffer[2u]);
1357             break;
1358 #endif
1359 
1360         case HCI_INIT_READ_LOCAL_SUPPORTED_COMMANDS:
1361             log_info("Resend hci_read_local_supported_commands after CSR Warm Boot double reset");
1362             hci_stack->substate = HCI_INIT_W4_READ_LOCAL_SUPPORTED_COMMANDS;
1363             hci_send_cmd(&hci_read_local_supported_commands);
1364             break;
1365         case HCI_INIT_READ_BD_ADDR:
1366             hci_stack->substate = HCI_INIT_W4_READ_BD_ADDR;
1367             hci_send_cmd(&hci_read_bd_addr);
1368             break;
1369         case HCI_INIT_READ_BUFFER_SIZE:
1370             hci_stack->substate = HCI_INIT_W4_READ_BUFFER_SIZE;
1371             hci_send_cmd(&hci_read_buffer_size);
1372             break;
1373         case HCI_INIT_READ_LOCAL_SUPPORTED_FEATURES:
1374             hci_stack->substate = HCI_INIT_W4_READ_LOCAL_SUPPORTED_FEATURES;
1375             hci_send_cmd(&hci_read_local_supported_features);
1376             break;
1377 
1378 #ifdef ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL
1379         case HCI_INIT_SET_CONTROLLER_TO_HOST_FLOW_CONTROL:
1380             hci_stack->substate = HCI_INIT_W4_SET_CONTROLLER_TO_HOST_FLOW_CONTROL;
1381             hci_send_cmd(&hci_set_controller_to_host_flow_control, 3);  // ACL + SCO Flow Control
1382             break;
1383         case HCI_INIT_HOST_BUFFER_SIZE:
1384             hci_stack->substate = HCI_INIT_W4_HOST_BUFFER_SIZE;
1385             hci_send_cmd(&hci_host_buffer_size, HCI_HOST_ACL_PACKET_LEN, HCI_HOST_SCO_PACKET_LEN,
1386                                                 HCI_HOST_ACL_PACKET_NUM, HCI_HOST_SCO_PACKET_NUM);
1387             break;
1388 #endif
1389 
1390         case HCI_INIT_SET_EVENT_MASK:
1391             hci_stack->substate = HCI_INIT_W4_SET_EVENT_MASK;
1392             if (hci_le_supported()){
1393                 hci_send_cmd(&hci_set_event_mask,0xffffffff, 0x3FFFFFFF);
1394             } else {
1395                 // Kensington Bluetooth 2.1 USB Dongle (CSR Chipset) returns an error for 0xffff...
1396                 hci_send_cmd(&hci_set_event_mask,0xffffffff, 0x1FFFFFFF);
1397             }
1398             break;
1399 
1400 #ifdef ENABLE_CLASSIC
1401         case HCI_INIT_WRITE_SIMPLE_PAIRING_MODE:
1402             hci_stack->substate = HCI_INIT_W4_WRITE_SIMPLE_PAIRING_MODE;
1403             hci_send_cmd(&hci_write_simple_pairing_mode, hci_stack->ssp_enable);
1404             break;
1405         case HCI_INIT_WRITE_PAGE_TIMEOUT:
1406             hci_stack->substate = HCI_INIT_W4_WRITE_PAGE_TIMEOUT;
1407             hci_send_cmd(&hci_write_page_timeout, 0x6000);  // ca. 15 sec
1408             break;
1409         case HCI_INIT_WRITE_DEFAULT_LINK_POLICY_SETTING:
1410             hci_stack->substate = HCI_INIT_W4_WRITE_DEFAULT_LINK_POLICY_SETTING;
1411             hci_send_cmd(&hci_write_default_link_policy_setting, hci_stack->default_link_policy_settings);
1412             break;
1413         case HCI_INIT_WRITE_CLASS_OF_DEVICE:
1414             hci_stack->substate = HCI_INIT_W4_WRITE_CLASS_OF_DEVICE;
1415             hci_send_cmd(&hci_write_class_of_device, hci_stack->class_of_device);
1416             break;
1417         case HCI_INIT_WRITE_LOCAL_NAME: {
1418             hci_stack->substate = HCI_INIT_W4_WRITE_LOCAL_NAME;
1419             hci_reserve_packet_buffer();
1420             uint8_t * packet = hci_stack->hci_packet_buffer;
1421             // construct HCI Command and send
1422             uint16_t opcode = hci_write_local_name.opcode;
1423             hci_stack->last_cmd_opcode = opcode;
1424             packet[0] = opcode & 0xff;
1425             packet[1] = opcode >> 8;
1426             packet[2] = DEVICE_NAME_LEN;
1427             memset(&packet[3], 0, DEVICE_NAME_LEN);
1428             uint16_t name_len = (uint16_t) strlen(hci_stack->local_name);
1429             uint16_t bytes_to_copy = btstack_min(name_len, DEVICE_NAME_LEN);
1430             // if shorter than DEVICE_NAME_LEN, it's implicitly NULL-terminated by memset call
1431             (void)memcpy(&packet[3], hci_stack->local_name, bytes_to_copy);
1432             // expand '00:00:00:00:00:00' in name with bd_addr
1433             btstack_replace_bd_addr_placeholder(&packet[3], bytes_to_copy, hci_stack->local_bd_addr);
1434             hci_send_cmd_packet(packet, HCI_CMD_HEADER_SIZE + DEVICE_NAME_LEN);
1435             break;
1436         }
1437         case HCI_INIT_WRITE_EIR_DATA: {
1438             hci_stack->substate = HCI_INIT_W4_WRITE_EIR_DATA;
1439             hci_reserve_packet_buffer();
1440             uint8_t * packet = hci_stack->hci_packet_buffer;
1441             // construct HCI Command in-place and send
1442             uint16_t opcode = hci_write_extended_inquiry_response.opcode;
1443             hci_stack->last_cmd_opcode = opcode;
1444             uint16_t offset = 0;
1445             packet[offset++] = opcode & 0xff;
1446             packet[offset++] = opcode >> 8;
1447             packet[offset++] = 1 + EXTENDED_INQUIRY_RESPONSE_DATA_LEN;
1448             packet[offset++] = 0;  // FEC not required
1449             memset(&packet[offset], 0, EXTENDED_INQUIRY_RESPONSE_DATA_LEN);
1450             if (hci_stack->eir_data){
1451                 // copy items and expand '00:00:00:00:00:00' in name with bd_addr
1452                 ad_context_t context;
1453                 for (ad_iterator_init(&context, EXTENDED_INQUIRY_RESPONSE_DATA_LEN, hci_stack->eir_data) ; ad_iterator_has_more(&context) ; ad_iterator_next(&context)) {
1454                     uint8_t data_type   = ad_iterator_get_data_type(&context);
1455                     uint8_t size        = ad_iterator_get_data_len(&context);
1456                     const uint8_t *data = ad_iterator_get_data(&context);
1457                     // copy item
1458                     packet[offset++] = size + 1;
1459                     packet[offset++] = data_type;
1460                     memcpy(&packet[offset], data, size);
1461                     // update name item
1462                     if ((data_type == BLUETOOTH_DATA_TYPE_SHORTENED_LOCAL_NAME) || (data_type == BLUETOOTH_DATA_TYPE_COMPLETE_LOCAL_NAME)){
1463                         btstack_replace_bd_addr_placeholder(&packet[offset], size, hci_stack->local_bd_addr);
1464                     }
1465                     offset += size;
1466                 }
1467             } else {
1468                 uint16_t name_len = (uint16_t) strlen(hci_stack->local_name);
1469                 uint16_t bytes_to_copy = btstack_min(name_len, EXTENDED_INQUIRY_RESPONSE_DATA_LEN - 2);
1470                 packet[offset++] = bytes_to_copy + 1;
1471                 packet[offset++] = BLUETOOTH_DATA_TYPE_COMPLETE_LOCAL_NAME;
1472                 (void)memcpy(&packet[6], hci_stack->local_name, bytes_to_copy);
1473                 // expand '00:00:00:00:00:00' in name with bd_addr
1474                 btstack_replace_bd_addr_placeholder(&packet[offset], bytes_to_copy, hci_stack->local_bd_addr);
1475             }
1476             hci_send_cmd_packet(packet, HCI_CMD_HEADER_SIZE + 1 + EXTENDED_INQUIRY_RESPONSE_DATA_LEN);
1477             break;
1478         }
1479         case HCI_INIT_WRITE_INQUIRY_MODE:
1480             hci_stack->substate = HCI_INIT_W4_WRITE_INQUIRY_MODE;
1481             hci_send_cmd(&hci_write_inquiry_mode, (int) hci_stack->inquiry_mode);
1482             break;
1483         case HCI_INIT_WRITE_SECURE_CONNECTIONS_HOST_ENABLE:
1484             hci_send_cmd(&hci_write_secure_connections_host_support, 1);
1485 			hci_stack->secure_connections_active = true;
1486             hci_stack->substate = HCI_INIT_W4_WRITE_SECURE_CONNECTIONS_HOST_ENABLE;
1487             break;
1488         case HCI_INIT_WRITE_SCAN_ENABLE:
1489             hci_send_cmd(&hci_write_scan_enable, (hci_stack->connectable << 1) | hci_stack->discoverable); // page scan
1490             hci_stack->substate = HCI_INIT_W4_WRITE_SCAN_ENABLE;
1491             break;
1492         // only sent if ENABLE_SCO_OVER_HCI is defined
1493         case HCI_INIT_WRITE_SYNCHRONOUS_FLOW_CONTROL_ENABLE:
1494             hci_stack->substate = HCI_INIT_W4_WRITE_SYNCHRONOUS_FLOW_CONTROL_ENABLE;
1495             hci_send_cmd(&hci_write_synchronous_flow_control_enable, 1); // SCO tracking enabled
1496             break;
1497         case HCI_INIT_WRITE_DEFAULT_ERRONEOUS_DATA_REPORTING:
1498             hci_stack->substate = HCI_INIT_W4_WRITE_DEFAULT_ERRONEOUS_DATA_REPORTING;
1499             hci_send_cmd(&hci_write_default_erroneous_data_reporting, 1);
1500             break;
1501         // only sent if manufacturer is Broadcom and ENABLE_SCO_OVER_HCI or ENABLE_SCO_OVER_PCM is defined
1502         case HCI_INIT_BCM_WRITE_SCO_PCM_INT:
1503             hci_stack->substate = HCI_INIT_W4_BCM_WRITE_SCO_PCM_INT;
1504 #ifdef ENABLE_SCO_OVER_HCI
1505             log_info("BCM: Route SCO data via HCI transport");
1506             hci_send_cmd(&hci_bcm_write_sco_pcm_int, 1, 0, 0, 0, 0);
1507 #endif
1508 #ifdef ENABLE_SCO_OVER_PCM
1509             log_info("BCM: Route SCO data via PCM interface");
1510             hci_send_cmd(&hci_bcm_write_sco_pcm_int, 0, 4, 0, 1, 1);
1511 #endif
1512             break;
1513 
1514 #endif
1515 #ifdef ENABLE_BLE
1516         // LE INIT
1517         case HCI_INIT_LE_READ_BUFFER_SIZE:
1518             hci_stack->substate = HCI_INIT_W4_LE_READ_BUFFER_SIZE;
1519             hci_send_cmd(&hci_le_read_buffer_size);
1520             break;
1521         case HCI_INIT_LE_SET_EVENT_MASK:
1522             hci_stack->substate = HCI_INIT_W4_LE_SET_EVENT_MASK;
1523             hci_send_cmd(&hci_le_set_event_mask, 0x809FF, 0x0); // bits 0-8, 11, 19
1524             break;
1525         case HCI_INIT_WRITE_LE_HOST_SUPPORTED:
1526             // LE Supported Host = 1, Simultaneous Host = 0
1527             hci_stack->substate = HCI_INIT_W4_WRITE_LE_HOST_SUPPORTED;
1528             hci_send_cmd(&hci_write_le_host_supported, 1, 0);
1529             break;
1530 #endif
1531 
1532 #ifdef ENABLE_LE_DATA_LENGTH_EXTENSION
1533         case HCI_INIT_LE_READ_MAX_DATA_LENGTH:
1534             hci_stack->substate = HCI_INIT_W4_LE_READ_MAX_DATA_LENGTH;
1535             hci_send_cmd(&hci_le_read_maximum_data_length);
1536             break;
1537         case HCI_INIT_LE_WRITE_SUGGESTED_DATA_LENGTH:
1538             hci_stack->substate = HCI_INIT_W4_LE_WRITE_SUGGESTED_DATA_LENGTH;
1539             hci_send_cmd(&hci_le_write_suggested_default_data_length, hci_stack->le_supported_max_tx_octets, hci_stack->le_supported_max_tx_time);
1540             break;
1541 #endif
1542 
1543 #ifdef ENABLE_LE_CENTRAL
1544         case HCI_INIT_READ_WHITE_LIST_SIZE:
1545             hci_stack->substate = HCI_INIT_W4_READ_WHITE_LIST_SIZE;
1546             hci_send_cmd(&hci_le_read_white_list_size);
1547             break;
1548         case HCI_INIT_LE_SET_SCAN_PARAMETERS:
1549             hci_stack->substate = HCI_INIT_W4_LE_SET_SCAN_PARAMETERS;
1550             hci_send_cmd(&hci_le_set_scan_parameters, hci_stack->le_scan_type, hci_stack->le_scan_interval, hci_stack->le_scan_window, hci_stack->le_own_addr_type, hci_stack->le_scan_filter_policy);
1551             break;
1552 #endif
1553         default:
1554             return;
1555     }
1556 }
1557 
1558 static void hci_init_done(void){
1559     // done. tell the app
1560     log_info("hci_init_done -> HCI_STATE_WORKING");
1561     hci_stack->state = HCI_STATE_WORKING;
1562     hci_emit_state();
1563     hci_run();
1564 }
1565 
1566 static bool hci_initializing_event_handler_command_completed(const uint8_t * packet){
1567     bool command_completed = false;
1568     if (hci_event_packet_get_type(packet) == HCI_EVENT_COMMAND_COMPLETE){
1569         uint16_t opcode = little_endian_read_16(packet,3);
1570         if (opcode == hci_stack->last_cmd_opcode){
1571             command_completed = true;
1572             log_debug("Command complete for expected opcode %04x at substate %u", opcode, hci_stack->substate);
1573         } else {
1574             log_info("Command complete for different opcode %04x, expected %04x, at substate %u", opcode, hci_stack->last_cmd_opcode, hci_stack->substate);
1575         }
1576     }
1577 
1578     if (hci_event_packet_get_type(packet) == HCI_EVENT_COMMAND_STATUS){
1579         uint8_t  status = packet[2];
1580         uint16_t opcode = little_endian_read_16(packet,4);
1581         if (opcode == hci_stack->last_cmd_opcode){
1582             if (status){
1583                 command_completed = true;
1584                 log_debug("Command status error 0x%02x for expected opcode %04x at substate %u", status, opcode, hci_stack->substate);
1585             } else {
1586                 log_info("Command status OK for expected opcode %04x, waiting for command complete", opcode);
1587             }
1588         } else {
1589             log_debug("Command status for opcode %04x, expected %04x", opcode, hci_stack->last_cmd_opcode);
1590         }
1591     }
1592 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1593     // Vendor == CSR
1594     if ((hci_stack->substate == HCI_INIT_W4_CUSTOM_INIT) && (hci_event_packet_get_type(packet) == HCI_EVENT_VENDOR_SPECIFIC)){
1595         // TODO: track actual command
1596         command_completed = true;
1597     }
1598 
1599     // Vendor == Toshiba
1600     if ((hci_stack->substate == HCI_INIT_W4_SEND_BAUD_CHANGE) && (hci_event_packet_get_type(packet) == HCI_EVENT_VENDOR_SPECIFIC)){
1601         // TODO: track actual command
1602         command_completed = true;
1603         // Fix: no HCI Command Complete received, so num_cmd_packets not reset
1604         hci_stack->num_cmd_packets = 1;
1605     }
1606 #endif
1607 
1608     return command_completed;
1609 }
1610 
1611 static void hci_initializing_event_handler(const uint8_t * packet, uint16_t size){
1612 
1613     UNUSED(size);   // ok: less than 6 bytes are read from our buffer
1614 
1615     bool command_completed =  hci_initializing_event_handler_command_completed(packet);
1616 
1617 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1618 
1619     // Late response (> 100 ms) for HCI Reset e.g. on Toshiba TC35661:
1620     // Command complete for HCI Reset arrives after we've resent the HCI Reset command
1621     //
1622     // HCI Reset
1623     // Timeout 100 ms
1624     // HCI Reset
1625     // Command Complete Reset
1626     // HCI Read Local Version Information
1627     // Command Complete Reset - but we expected Command Complete Read Local Version Information
1628     // hang...
1629     //
1630     // Fix: Command Complete for HCI Reset in HCI_INIT_W4_SEND_READ_LOCAL_VERSION_INFORMATION trigger resend
1631     if (!command_completed
1632             && (hci_event_packet_get_type(packet) == HCI_EVENT_COMMAND_COMPLETE)
1633             && (hci_stack->substate == HCI_INIT_W4_SEND_READ_LOCAL_VERSION_INFORMATION)){
1634 
1635         uint16_t opcode = little_endian_read_16(packet,3);
1636         if (opcode == hci_reset.opcode){
1637             hci_stack->substate = HCI_INIT_SEND_READ_LOCAL_VERSION_INFORMATION;
1638             return;
1639         }
1640     }
1641 
1642     // CSR & H5
1643     // Fix: Command Complete for HCI Reset in HCI_INIT_W4_SEND_READ_LOCAL_VERSION_INFORMATION trigger resend
1644     if (!command_completed
1645             && (hci_event_packet_get_type(packet) == HCI_EVENT_COMMAND_COMPLETE)
1646             && (hci_stack->substate == HCI_INIT_W4_READ_LOCAL_SUPPORTED_COMMANDS)){
1647 
1648         uint16_t opcode = little_endian_read_16(packet,3);
1649         if (opcode == hci_reset.opcode){
1650             hci_stack->substate = HCI_INIT_READ_LOCAL_SUPPORTED_COMMANDS;
1651             return;
1652         }
1653     }
1654 
1655     // on CSR with BCSP/H5, the reset resend timeout leads to substate == HCI_INIT_SEND_RESET or HCI_INIT_SEND_RESET_CSR_WARM_BOOT
1656     // fix: Correct substate and behave as command below
1657     if (command_completed){
1658         switch (hci_stack->substate){
1659             case HCI_INIT_SEND_RESET:
1660                 hci_stack->substate = HCI_INIT_W4_SEND_RESET;
1661                 break;
1662             case HCI_INIT_SEND_RESET_CSR_WARM_BOOT:
1663                 hci_stack->substate = HCI_INIT_W4_CUSTOM_INIT_CSR_WARM_BOOT;
1664                 break;
1665             default:
1666                 break;
1667         }
1668     }
1669 
1670 #endif
1671 
1672     if (!command_completed) return;
1673 
1674     bool need_baud_change = false;
1675     bool need_addr_change = false;
1676 
1677 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1678     need_baud_change = hci_stack->config
1679                         && hci_stack->chipset
1680                         && hci_stack->chipset->set_baudrate_command
1681                         && hci_stack->hci_transport->set_baudrate
1682                         && ((hci_transport_config_uart_t *)hci_stack->config)->baudrate_main;
1683 
1684     need_addr_change = hci_stack->custom_bd_addr_set
1685                         && hci_stack->chipset
1686                         && hci_stack->chipset->set_bd_addr_command;
1687 #endif
1688 
1689     switch(hci_stack->substate){
1690 
1691 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1692         case HCI_INIT_SEND_RESET:
1693             // on CSR with BCSP/H5, resend triggers resend of HCI Reset and leads to substate == HCI_INIT_SEND_RESET
1694             // fix: just correct substate and behave as command below
1695             hci_stack->substate = HCI_INIT_W4_SEND_RESET;
1696             btstack_run_loop_remove_timer(&hci_stack->timeout);
1697             break;
1698         case HCI_INIT_W4_SEND_RESET:
1699             btstack_run_loop_remove_timer(&hci_stack->timeout);
1700             break;
1701         case HCI_INIT_W4_SEND_READ_LOCAL_NAME:
1702             log_info("Received local name, need baud change %d", (int) need_baud_change);
1703             if (need_baud_change){
1704                 hci_stack->substate = HCI_INIT_SEND_BAUD_CHANGE;
1705                 return;
1706             }
1707             // skip baud change
1708             hci_stack->substate = HCI_INIT_CUSTOM_INIT;
1709             return;
1710         case HCI_INIT_W4_SEND_BAUD_CHANGE:
1711             // for STLC2500D, baud rate change already happened.
1712             // for others, baud rate gets changed now
1713             if ((hci_stack->manufacturer != BLUETOOTH_COMPANY_ID_ST_MICROELECTRONICS) && need_baud_change){
1714                 uint32_t baud_rate = hci_transport_uart_get_main_baud_rate();
1715                 log_info("Local baud rate change to %" PRIu32 "(w4_send_baud_change)", baud_rate);
1716                 hci_stack->hci_transport->set_baudrate(baud_rate);
1717             }
1718             hci_stack->substate = HCI_INIT_CUSTOM_INIT;
1719             return;
1720         case HCI_INIT_W4_CUSTOM_INIT_CSR_WARM_BOOT:
1721             btstack_run_loop_remove_timer(&hci_stack->timeout);
1722             hci_stack->substate = HCI_INIT_CUSTOM_INIT;
1723             return;
1724         case HCI_INIT_W4_CUSTOM_INIT:
1725             // repeat custom init
1726             hci_stack->substate = HCI_INIT_CUSTOM_INIT;
1727             return;
1728 #else
1729         case HCI_INIT_W4_SEND_RESET:
1730             hci_stack->substate = HCI_INIT_READ_LOCAL_SUPPORTED_COMMANDS;
1731             return ;
1732 #endif
1733 
1734         case HCI_INIT_W4_READ_LOCAL_SUPPORTED_COMMANDS:
1735             if (need_baud_change && (hci_stack->chipset_result != BTSTACK_CHIPSET_NO_INIT_SCRIPT) &&
1736               ((hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_BROADCOM_CORPORATION) ||
1737                (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_EM_MICROELECTRONIC_MARIN_SA))) {
1738                 hci_stack->substate = HCI_INIT_SEND_BAUD_CHANGE_BCM;
1739                 return;
1740             }
1741             if (need_addr_change){
1742                 hci_stack->substate = HCI_INIT_SET_BD_ADDR;
1743                 return;
1744             }
1745             hci_stack->substate = HCI_INIT_READ_BD_ADDR;
1746             return;
1747 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
1748         case HCI_INIT_W4_SEND_BAUD_CHANGE_BCM:
1749             if (need_baud_change){
1750                 uint32_t baud_rate = hci_transport_uart_get_main_baud_rate();
1751                 log_info("Local baud rate change to %" PRIu32 "(w4_send_baud_change_bcm))", baud_rate);
1752                 hci_stack->hci_transport->set_baudrate(baud_rate);
1753             }
1754             if (need_addr_change){
1755                 hci_stack->substate = HCI_INIT_SET_BD_ADDR;
1756                 return;
1757             }
1758             hci_stack->substate = HCI_INIT_READ_BD_ADDR;
1759             return;
1760         case HCI_INIT_W4_SET_BD_ADDR:
1761             // for STLC2500D + ATWILC3000, bd addr change only gets active after sending reset command
1762             if ((hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_ST_MICROELECTRONICS)
1763             ||  (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_ATMEL_CORPORATION)){
1764                 hci_stack->substate = HCI_INIT_SEND_RESET_ST_WARM_BOOT;
1765                 return;
1766             }
1767             // skipping st warm boot
1768             hci_stack->substate = HCI_INIT_READ_BD_ADDR;
1769             return;
1770         case HCI_INIT_W4_SEND_RESET_ST_WARM_BOOT:
1771             hci_stack->substate = HCI_INIT_READ_BD_ADDR;
1772             return;
1773 #endif
1774         case HCI_INIT_W4_READ_BD_ADDR:
1775             // only read buffer size if supported
1776             if (hci_stack->local_supported_commands[0u] & 0x01u) {
1777                 hci_stack->substate = HCI_INIT_READ_BUFFER_SIZE;
1778                 return;
1779             }
1780             // skipping read buffer size
1781             hci_stack->substate = HCI_INIT_READ_LOCAL_SUPPORTED_FEATURES;
1782             return;
1783         case HCI_INIT_W4_SET_EVENT_MASK:
1784             // skip Classic init commands for LE only chipsets
1785             if (!hci_classic_supported()){
1786 #ifdef ENABLE_BLE
1787                 if (hci_le_supported()){
1788                     hci_stack->substate = HCI_INIT_LE_READ_BUFFER_SIZE; // skip all classic command
1789                     return;
1790                 }
1791 #endif
1792                 log_error("Neither BR/EDR nor LE supported");
1793                 hci_init_done();
1794                 return;
1795             }
1796             if (!gap_ssp_supported()){
1797                 hci_stack->substate = HCI_INIT_WRITE_PAGE_TIMEOUT;
1798                 return;
1799             }
1800             break;
1801 #ifdef ENABLE_BLE
1802         case HCI_INIT_W4_LE_READ_BUFFER_SIZE:
1803             // skip write le host if not supported (e.g. on LE only EM9301)
1804             if (hci_stack->local_supported_commands[0u] & 0x02u) break;
1805             hci_stack->substate = HCI_INIT_LE_SET_EVENT_MASK;
1806             return;
1807 
1808 #ifdef ENABLE_LE_DATA_LENGTH_EXTENSION
1809         case HCI_INIT_W4_WRITE_LE_HOST_SUPPORTED:
1810             log_info("Supported commands %x", hci_stack->local_supported_commands[0] & 0x30);
1811             if ((hci_stack->local_supported_commands[0u] & 0x30u) == 0x30u){
1812                 hci_stack->substate = HCI_INIT_LE_SET_EVENT_MASK;
1813                 return;
1814             }
1815             // explicit fall through to reduce repetitions
1816 
1817 #ifdef ENABLE_LE_CENTRAL
1818             hci_stack->substate = HCI_INIT_READ_WHITE_LIST_SIZE;
1819 #else
1820             hci_init_done();
1821 #endif
1822             return;
1823 #endif  /* ENABLE_LE_DATA_LENGTH_EXTENSION */
1824 
1825 #endif  /* ENABLE_BLE */
1826 
1827         case HCI_INIT_W4_WRITE_INQUIRY_MODE:
1828             // skip write secure connections host support if not supported or disabled
1829             if (!hci_stack->secure_connections_enable || (hci_stack->local_supported_commands[1u] & 0x02u) == 0u) {
1830                 hci_stack->substate = HCI_INIT_WRITE_SCAN_ENABLE;
1831                 return;
1832             }
1833             break;
1834 
1835 #ifdef ENABLE_SCO_OVER_HCI
1836         case HCI_INIT_W4_WRITE_SCAN_ENABLE:
1837             // skip write synchronous flow control if not supported
1838             if (hci_stack->local_supported_commands[0] & 0x04) break;
1839             hci_stack->substate = HCI_INIT_W4_WRITE_SYNCHRONOUS_FLOW_CONTROL_ENABLE;
1840 
1841             /* fall through */
1842 
1843         case HCI_INIT_W4_WRITE_SYNCHRONOUS_FLOW_CONTROL_ENABLE:
1844             // skip write default erroneous data reporting if not supported
1845             if (hci_stack->local_supported_commands[0] & 0x08) break;
1846             hci_stack->substate = HCI_INIT_W4_WRITE_DEFAULT_ERRONEOUS_DATA_REPORTING;
1847 
1848             /* fall through */
1849 
1850         case HCI_INIT_W4_WRITE_DEFAULT_ERRONEOUS_DATA_REPORTING:
1851             // skip bcm set sco pcm config on non-Broadcom chipsets
1852             if (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_BROADCOM_CORPORATION) break;
1853             hci_stack->substate = HCI_INIT_W4_BCM_WRITE_SCO_PCM_INT;
1854 
1855             /* fall through */
1856 
1857         case HCI_INIT_W4_BCM_WRITE_SCO_PCM_INT:
1858             if (!hci_le_supported()){
1859                 // SKIP LE init for Classic only configuration
1860                 hci_init_done();
1861                 return;
1862             }
1863             break;
1864 
1865 #else /* !ENABLE_SCO_OVER_HCI */
1866 
1867         case HCI_INIT_W4_WRITE_SCAN_ENABLE:
1868 #ifdef ENABLE_SCO_OVER_PCM
1869             if (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_BROADCOM_CORPORATION) {
1870                 hci_stack->substate = HCI_INIT_BCM_WRITE_SCO_PCM_INT;
1871                 return;
1872             }
1873 #endif
1874             /* fall through */
1875 
1876         case HCI_INIT_W4_BCM_WRITE_SCO_PCM_INT:
1877 #ifdef ENABLE_BLE
1878             if (hci_le_supported()){
1879                 hci_stack->substate = HCI_INIT_LE_READ_BUFFER_SIZE;
1880                 return;
1881             }
1882 #endif
1883             // SKIP LE init for Classic only configuration
1884             hci_init_done();
1885             return;
1886 #endif /* ENABLE_SCO_OVER_HCI */
1887 
1888 // avoid compile error due to duplicate cases: HCI_INIT_W4_BCM_WRITE_SCO_PCM_INT == HCI_INIT_DONE-1
1889 #if defined(ENABLE_BLE) || defined(ENABLE_LE_DATA_LENGTH_EXTENSION) || defined(ENABLE_LE_CENTRAL)
1890         // Response to command before init done state -> init done
1891         case (HCI_INIT_DONE-1):
1892             hci_init_done();
1893             return;
1894 #endif
1895 
1896         default:
1897             break;
1898     }
1899     hci_initializing_next_state();
1900 }
1901 
1902 static void hci_handle_connection_failed(hci_connection_t * conn, uint8_t status){
1903     log_info("Outgoing connection to %s failed", bd_addr_to_str(conn->address));
1904     bd_addr_t bd_address;
1905     (void)memcpy(&bd_address, conn->address, 6);
1906 
1907 #ifdef ENABLE_CLASSIC
1908     // cache needed data
1909     int notify_dedicated_bonding_failed = conn->bonding_flags & BONDING_DEDICATED;
1910 #endif
1911 
1912     // connection failed, remove entry
1913     btstack_linked_list_remove(&hci_stack->connections, (btstack_linked_item_t *) conn);
1914     btstack_memory_hci_connection_free( conn );
1915 
1916 #ifdef ENABLE_CLASSIC
1917     // notify client if dedicated bonding
1918     if (notify_dedicated_bonding_failed){
1919         log_info("hci notify_dedicated_bonding_failed");
1920         hci_emit_dedicated_bonding_result(bd_address, status);
1921     }
1922 
1923     // if authentication error, also delete link key
1924     if (status == ERROR_CODE_AUTHENTICATION_FAILURE) {
1925         gap_drop_link_key_for_bd_addr(bd_address);
1926     }
1927 #else
1928     UNUSED(status);
1929 #endif
1930 }
1931 
1932 #ifdef ENABLE_CLASSIC
1933 static void hci_handle_remote_features_page_0(hci_connection_t * conn, const uint8_t * features){
1934     // SSP Controller
1935     if (features[6] & (1 << 3)){
1936         conn->bonding_flags |= BONDING_REMOTE_SUPPORTS_SSP_CONTROLLER;
1937     }
1938     // eSCO
1939     if (features[3] & (1<<7)){
1940         conn->remote_supported_features[0] |= 1;
1941     }
1942     // Extended features
1943     if (features[7] & (1<<7)){
1944         conn->remote_supported_features[0] |= 2;
1945     }
1946 }
1947 
1948 static void hci_handle_remote_features_page_1(hci_connection_t * conn, const uint8_t * features){
1949     // SSP Host
1950     if (features[0] & (1 << 0)){
1951         conn->bonding_flags |= BONDING_REMOTE_SUPPORTS_SSP_HOST;
1952     }
1953     // SC Host
1954     if (features[0] & (1 << 3)){
1955         conn->bonding_flags |= BONDING_REMOTE_SUPPORTS_SC_HOST;
1956     }
1957 }
1958 
1959 static void hci_handle_remote_features_page_2(hci_connection_t * conn, const uint8_t * features){
1960     // SC Controller
1961     if (features[1] & (1 << 0)){
1962         conn->bonding_flags |= BONDING_REMOTE_SUPPORTS_SC_CONTROLLER;
1963     }
1964 }
1965 
1966 static void hci_handle_remote_features_received(hci_connection_t * conn){
1967     conn->bonding_flags |= BONDING_RECEIVED_REMOTE_FEATURES;
1968     log_info("Remote features %02x, bonding flags %x", conn->remote_supported_features[0], conn->bonding_flags);
1969     if (conn->bonding_flags & BONDING_DEDICATED){
1970         conn->bonding_flags |= BONDING_SEND_AUTHENTICATE_REQUEST;
1971     }
1972 }
1973 #endif
1974 
1975 static void handle_event_for_current_stack_state(const uint8_t * packet, uint16_t size) {
1976     // handle BT initialization
1977     if (hci_stack->state == HCI_STATE_INITIALIZING) {
1978         hci_initializing_event_handler(packet, size);
1979     }
1980 
1981     // help with BT sleep
1982     if ((hci_stack->state == HCI_STATE_FALLING_ASLEEP)
1983         && (hci_stack->substate == HCI_FALLING_ASLEEP_W4_WRITE_SCAN_ENABLE)
1984         && HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_write_scan_enable)) {
1985         hci_initializing_next_state();
1986     }
1987 }
1988 
1989 #ifdef ENABLE_CLASSIC
1990 static void hci_handle_read_encryption_key_size_complete(hci_connection_t * conn, uint8_t encryption_key_size) {
1991     conn->authentication_flags |= CONNECTION_ENCRYPTED;
1992     conn->encryption_key_size = encryption_key_size;
1993 
1994     if ((conn->authentication_flags & CONNECTION_AUTHENTICATED) != 0) {
1995         hci_emit_security_level(conn->con_handle, gap_security_level_for_connection(conn));
1996         return;
1997     }
1998 
1999     // Request Authentication if not already done
2000     if ((conn->bonding_flags & BONDING_SENT_AUTHENTICATE_REQUEST) != 0) return;
2001     conn->bonding_flags |= BONDING_SEND_AUTHENTICATE_REQUEST;
2002 }
2003 #endif
2004 
2005 static void handle_command_complete_event(uint8_t * packet, uint16_t size){
2006     UNUSED(size);
2007 
2008     uint16_t manufacturer;
2009 #ifdef ENABLE_CLASSIC
2010     hci_con_handle_t handle;
2011     hci_connection_t * conn;
2012     uint8_t status;
2013 #endif
2014     // get num cmd packets - limit to 1 to reduce complexity
2015     hci_stack->num_cmd_packets = packet[2] ? 1 : 0;
2016 
2017     uint16_t opcode = hci_event_command_complete_get_command_opcode(packet);
2018     switch (opcode){
2019         case HCI_OPCODE_HCI_READ_LOCAL_NAME:
2020             if (packet[5]) break;
2021             // terminate, name 248 chars
2022             packet[6+248] = 0;
2023             log_info("local name: %s", &packet[6]);
2024             break;
2025         case HCI_OPCODE_HCI_READ_BUFFER_SIZE:
2026             // "The HC_ACL_Data_Packet_Length return parameter will be used to determine the size of the L2CAP segments contained in ACL Data Packets"
2027             if (hci_stack->state == HCI_STATE_INITIALIZING) {
2028                 uint16_t acl_len = little_endian_read_16(packet, 6);
2029                 uint16_t sco_len = packet[8];
2030 
2031                 // determine usable ACL/SCO payload size
2032                 hci_stack->acl_data_packet_length = btstack_min(acl_len, HCI_ACL_PAYLOAD_SIZE);
2033                 hci_stack->sco_data_packet_length = btstack_min(sco_len, HCI_ACL_PAYLOAD_SIZE);
2034 
2035                 hci_stack->acl_packets_total_num = little_endian_read_16(packet, 9);
2036                 hci_stack->sco_packets_total_num = little_endian_read_16(packet, 11);
2037 
2038                 log_info("hci_read_buffer_size: ACL size module %u -> used %u, count %u / SCO size %u, count %u",
2039                          acl_len, hci_stack->acl_data_packet_length, hci_stack->acl_packets_total_num,
2040                          hci_stack->sco_data_packet_length, hci_stack->sco_packets_total_num);
2041             }
2042             break;
2043         case HCI_OPCODE_HCI_READ_RSSI:
2044             if (packet[5] == ERROR_CODE_SUCCESS){
2045                 uint8_t event[5];
2046                 event[0] = GAP_EVENT_RSSI_MEASUREMENT;
2047                 event[1] = 3;
2048                 (void)memcpy(&event[2], &packet[6], 3);
2049                 hci_emit_event(event, sizeof(event), 1);
2050             }
2051             break;
2052 #ifdef ENABLE_BLE
2053         case HCI_OPCODE_HCI_LE_READ_BUFFER_SIZE:
2054             hci_stack->le_data_packets_length = little_endian_read_16(packet, 6);
2055             hci_stack->le_acl_packets_total_num = packet[8];
2056             // determine usable ACL payload size
2057             if (HCI_ACL_PAYLOAD_SIZE < hci_stack->le_data_packets_length){
2058                 hci_stack->le_data_packets_length = HCI_ACL_PAYLOAD_SIZE;
2059             }
2060             log_info("hci_le_read_buffer_size: size %u, count %u", hci_stack->le_data_packets_length, hci_stack->le_acl_packets_total_num);
2061             break;
2062 #endif
2063 #ifdef ENABLE_LE_DATA_LENGTH_EXTENSION
2064         case HCI_OPCODE_HCI_LE_READ_MAXIMUM_DATA_LENGTH:
2065             hci_stack->le_supported_max_tx_octets = little_endian_read_16(packet, 6);
2066             hci_stack->le_supported_max_tx_time = little_endian_read_16(packet, 8);
2067             log_info("hci_le_read_maximum_data_length: tx octets %u, tx time %u us", hci_stack->le_supported_max_tx_octets, hci_stack->le_supported_max_tx_time);
2068             break;
2069 #endif
2070 #ifdef ENABLE_LE_CENTRAL
2071         case HCI_OPCODE_HCI_LE_READ_WHITE_LIST_SIZE:
2072             hci_stack->le_whitelist_capacity = packet[6];
2073             log_info("hci_le_read_white_list_size: size %u", hci_stack->le_whitelist_capacity);
2074             break;
2075 #endif
2076         case HCI_OPCODE_HCI_READ_BD_ADDR:
2077             reverse_bd_addr(&packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE + 1], hci_stack->local_bd_addr);
2078             log_info("Local Address, Status: 0x%02x: Addr: %s", packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE], bd_addr_to_str(hci_stack->local_bd_addr));
2079 #ifdef ENABLE_CLASSIC
2080             if (hci_stack->link_key_db){
2081                 hci_stack->link_key_db->set_local_bd_addr(hci_stack->local_bd_addr);
2082             }
2083 #endif
2084             break;
2085 #ifdef ENABLE_CLASSIC
2086         case HCI_OPCODE_HCI_WRITE_SCAN_ENABLE:
2087             hci_emit_discoverable_enabled(hci_stack->discoverable);
2088             break;
2089         case HCI_OPCODE_HCI_INQUIRY_CANCEL:
2090             if (hci_stack->inquiry_state == GAP_INQUIRY_STATE_W4_CANCELLED){
2091                 hci_stack->inquiry_state = GAP_INQUIRY_STATE_IDLE;
2092                 uint8_t event[] = { GAP_EVENT_INQUIRY_COMPLETE, 1, 0};
2093                 hci_emit_event(event, sizeof(event), 1);
2094             }
2095             break;
2096 #endif
2097         case HCI_OPCODE_HCI_READ_LOCAL_SUPPORTED_FEATURES:
2098             (void)memcpy(hci_stack->local_supported_features, &packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE + 1], 8);
2099 
2100 #ifdef ENABLE_CLASSIC
2101             // determine usable ACL packet types based on host buffer size and supported features
2102             hci_stack->packet_types = hci_acl_packet_types_for_buffer_size_and_local_features(HCI_ACL_PAYLOAD_SIZE, &hci_stack->local_supported_features[0]);
2103             log_info("Packet types %04x, eSCO %u", hci_stack->packet_types, hci_extended_sco_link_supported());
2104 #endif
2105             // Classic/LE
2106             log_info("BR/EDR support %u, LE support %u", hci_classic_supported(), hci_le_supported());
2107             break;
2108         case HCI_OPCODE_HCI_READ_LOCAL_VERSION_INFORMATION:
2109             manufacturer = little_endian_read_16(packet, 10);
2110             // map Cypress to Broadcom
2111             if (manufacturer  == BLUETOOTH_COMPANY_ID_CYPRESS_SEMICONDUCTOR){
2112                 log_info("Treat Cypress as Broadcom");
2113                 manufacturer = BLUETOOTH_COMPANY_ID_BROADCOM_CORPORATION;
2114                 little_endian_store_16(packet, 10, manufacturer);
2115             }
2116             hci_stack->manufacturer = manufacturer;
2117             log_info("Manufacturer: 0x%04x", hci_stack->manufacturer);
2118             break;
2119         case HCI_OPCODE_HCI_READ_LOCAL_SUPPORTED_COMMANDS:
2120             hci_stack->local_supported_commands[0] =
2121                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+14u] & 0x80u) >> 7u) |  // bit  0 = Octet 14, bit 7 / Read Buffer Size
2122                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+24u] & 0x40u) >> 5u) |  // bit  1 = Octet 24, bit 6 / Write Le Host Supported
2123                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+10u] & 0x10u) >> 2u) |  // bit  2 = Octet 10, bit 4 / Write Synchronous Flow Control Enable
2124                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+18u] & 0x08u)     )  |  // bit  3 = Octet 18, bit 3 / Write Default Erroneous Data Reporting
2125                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+34u] & 0x01u) << 4u) |  // bit  4 = Octet 34, bit 0 / LE Write Suggested Default Data Length
2126                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+35u] & 0x08u) << 2u) |  // bit  5 = Octet 35, bit 3 / LE Read Maximum Data Length
2127                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+35u] & 0x20u) << 1u) |  // bit  6 = Octet 35, bit 5 / LE Set Default PHY
2128                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+20u] & 0x10u) << 3u);   // bit  7 = Octet 20, bit 4 / Read Encryption Key Size
2129             hci_stack->local_supported_commands[1] =
2130                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+ 2u] & 0x40u) >> 6u) |  // bit  8 = Octet  2, bit 6 / Read Remote Extended Features
2131                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+32u] & 0x08u) >> 2u) |  // bit  9 = Octet 32, bit 3 / Write Secure Connections Host
2132                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+35u] & 0x02u) << 1u) |  // bit 10 = Octet 35, bit 1 / LE Set Address Resolution Enable
2133                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+32u] & 0x02u) << 2u) |  // bit 11 = Octet 32, bit 1 / Remote OOB Extended Data Request Reply
2134                 ((packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1u+32u] & 0x40u) >> 2u);   // bit 12 = Octet 32, bit 6 / Read Local OOB Extended Data command
2135             log_info("Local supported commands summary %02x - %02x", hci_stack->local_supported_commands[0],  hci_stack->local_supported_commands[1]);
2136             break;
2137 #ifdef ENABLE_CLASSIC
2138         case HCI_OPCODE_HCI_WRITE_SYNCHRONOUS_FLOW_CONTROL_ENABLE:
2139             if (packet[5]) return;
2140             hci_stack->synchronous_flow_control_enabled = 1;
2141             break;
2142         case HCI_OPCODE_HCI_READ_ENCRYPTION_KEY_SIZE:
2143             status = packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE];
2144             handle = little_endian_read_16(packet, OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1);
2145             conn   = hci_connection_for_handle(handle);
2146             if (conn != NULL) {
2147                 uint8_t key_size = 0;
2148                 if (status == 0){
2149                     key_size = packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+3];
2150                     log_info("Handle %04x key Size: %u", handle, key_size);
2151                 } else {
2152                     log_info("Read Encryption Key Size failed 0x%02x-> assuming insecure connection with key size of 1", status);
2153                 }
2154                 hci_handle_read_encryption_key_size_complete(conn, key_size);
2155             }
2156             break;
2157 #ifdef ENABLE_CLASSIC_PAIRING_OOB
2158         case HCI_OPCODE_HCI_READ_LOCAL_OOB_DATA:
2159         case HCI_OPCODE_HCI_READ_LOCAL_EXTENDED_OOB_DATA:{
2160             uint8_t event[67];
2161             event[0] = GAP_EVENT_LOCAL_OOB_DATA;
2162             event[1] = 65;
2163             (void)memset(&event[2], 0, 65);
2164             if (packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE] == ERROR_CODE_SUCCESS){
2165                 (void)memcpy(&event[3], &packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+1], 32);
2166                 if (opcode == HCI_OPCODE_HCI_READ_LOCAL_EXTENDED_OOB_DATA){
2167                     event[2] = 3;
2168                     (void)memcpy(&event[35], &packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE+33], 32);
2169                 } else {
2170                     event[2] = 1;
2171                 }
2172             }
2173             hci_emit_event(event, sizeof(event), 0);
2174             break;
2175         }
2176 #endif
2177 #endif
2178         default:
2179             break;
2180     }
2181 }
2182 
2183 #ifdef ENABLE_BLE
2184 static void event_handle_le_connection_complete(const uint8_t * packet){
2185 	bd_addr_t addr;
2186 	bd_addr_type_t addr_type;
2187 	hci_connection_t * conn;
2188 
2189 	// Connection management
2190 	reverse_bd_addr(&packet[8], addr);
2191 	addr_type = (bd_addr_type_t)packet[7];
2192 	log_info("LE Connection_complete (status=%u) type %u, %s", packet[3], addr_type, bd_addr_to_str(addr));
2193 	conn = hci_connection_for_bd_addr_and_type(addr, addr_type);
2194 
2195 #ifdef ENABLE_LE_CENTRAL
2196 	// handle error: error is reported only to the initiator -> outgoing connection
2197 	if (packet[3]){
2198 
2199 		// handle cancelled outgoing connection
2200 		// "If the cancellation was successful then, after the Command Complete event for the LE_Create_Connection_Cancel command,
2201 		//  either an LE Connection Complete or an LE Enhanced Connection Complete event shall be generated.
2202 		//  In either case, the event shall be sent with the error code Unknown Connection Identifier (0x02)."
2203 		if (packet[3] == ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER){
2204 			// whitelist connect
2205 			if (hci_is_le_connection_type(addr_type)){
2206 				hci_stack->le_connecting_state   = LE_CONNECTING_IDLE;
2207 			}
2208 			// get outgoing connection conn struct for direct connect
2209 			conn = gap_get_outgoing_connection();
2210 		}
2211 
2212 		// outgoing le connection establishment is done
2213 		if (conn){
2214 			// remove entry
2215 			btstack_linked_list_remove(&hci_stack->connections, (btstack_linked_item_t *) conn);
2216 			btstack_memory_hci_connection_free( conn );
2217 		}
2218 		return;
2219 	}
2220 #endif
2221 
2222 	// on success, both hosts receive connection complete event
2223 	if (packet[6] == HCI_ROLE_MASTER){
2224 #ifdef ENABLE_LE_CENTRAL
2225 		// if we're master on an le connection, it was an outgoing connection and we're done with it
2226 		// note: no hci_connection_t object exists yet for connect with whitelist
2227 		if (hci_is_le_connection_type(addr_type)){
2228 			hci_stack->le_connecting_state   = LE_CONNECTING_IDLE;
2229 			hci_stack->le_connecting_request = LE_CONNECTING_IDLE;
2230 		}
2231 #endif
2232 	} else {
2233 #ifdef ENABLE_LE_PERIPHERAL
2234 		// if we're slave, it was an incoming connection, advertisements have stopped
2235 		hci_stack->le_advertisements_active = false;
2236 #endif
2237 	}
2238 
2239 	// LE connections are auto-accepted, so just create a connection if there isn't one already
2240 	if (!conn){
2241 		conn = create_connection_for_bd_addr_and_type(addr, addr_type);
2242 	}
2243 
2244 	// no memory, sorry.
2245 	if (!conn){
2246 		return;
2247 	}
2248 
2249 	conn->state = OPEN;
2250 	conn->role  = packet[6];
2251 	conn->con_handle             = hci_subevent_le_connection_complete_get_connection_handle(packet);
2252 	conn->le_connection_interval = hci_subevent_le_connection_complete_get_conn_interval(packet);
2253 
2254 #ifdef ENABLE_LE_PERIPHERAL
2255 	if (packet[6] == HCI_ROLE_SLAVE){
2256 		hci_update_advertisements_enabled_for_current_roles();
2257 	}
2258 #endif
2259 
2260     // init unenhanced att bearer mtu
2261     conn->att_connection.mtu = ATT_DEFAULT_MTU;
2262     conn->att_connection.mtu_exchanged = false;
2263 
2264     // TODO: store - role, peer address type, conn_interval, conn_latency, supervision timeout, master clock
2265 
2266 	// restart timer
2267 	// btstack_run_loop_set_timer(&conn->timeout, HCI_CONNECTION_TIMEOUT_MS);
2268 	// btstack_run_loop_add_timer(&conn->timeout);
2269 
2270 	log_info("New connection: handle %u, %s", conn->con_handle, bd_addr_to_str(conn->address));
2271 
2272 	hci_emit_nr_connections_changed();
2273 }
2274 #endif
2275 
2276 static void event_handler(uint8_t *packet, uint16_t size){
2277 
2278     uint16_t event_length = packet[1];
2279 
2280     // assert packet is complete
2281     if (size != (event_length + 2u)){
2282         log_error("event_handler called with packet of wrong size %d, expected %u => dropping packet", size, event_length + 2);
2283         return;
2284     }
2285 
2286     bd_addr_type_t addr_type;
2287     hci_con_handle_t handle;
2288     hci_connection_t * conn;
2289     int i;
2290     int create_connection_cmd;
2291 
2292 #ifdef ENABLE_CLASSIC
2293     hci_link_type_t link_type;
2294     bd_addr_t addr;
2295 #endif
2296 
2297     // log_info("HCI:EVENT:%02x", hci_event_packet_get_type(packet));
2298 
2299     switch (hci_event_packet_get_type(packet)) {
2300 
2301         case HCI_EVENT_COMMAND_COMPLETE:
2302             handle_command_complete_event(packet, size);
2303             break;
2304 
2305         case HCI_EVENT_COMMAND_STATUS:
2306             // get num cmd packets - limit to 1 to reduce complexity
2307             hci_stack->num_cmd_packets = packet[3] ? 1 : 0;
2308 
2309             // check command status to detected failed outgoing connections
2310             create_connection_cmd = 0;
2311 #ifdef ENABLE_CLASSIC
2312             if (HCI_EVENT_IS_COMMAND_STATUS(packet, hci_create_connection)){
2313                 create_connection_cmd = 1;
2314             }
2315 #endif
2316 #ifdef ENABLE_LE_CENTRAL
2317             if (HCI_EVENT_IS_COMMAND_STATUS(packet, hci_le_create_connection)){
2318                 create_connection_cmd = 1;
2319             }
2320 #endif
2321             if (create_connection_cmd) {
2322                 uint8_t status = hci_event_command_status_get_status(packet);
2323                 addr_type = hci_stack->outgoing_addr_type;
2324                 conn = hci_connection_for_bd_addr_and_type(hci_stack->outgoing_addr, addr_type);
2325                 log_info("command status (create connection), status %x, connection %p, addr %s, type %x", status, conn, bd_addr_to_str(hci_stack->outgoing_addr), addr_type);
2326 
2327                 // reset outgoing address info
2328                 memset(hci_stack->outgoing_addr, 0, 6);
2329                 hci_stack->outgoing_addr_type = BD_ADDR_TYPE_UNKNOWN;
2330 
2331                 // on error
2332                 if (status != ERROR_CODE_SUCCESS){
2333 #ifdef ENABLE_LE_CENTRAL
2334                     if (hci_is_le_connection_type(addr_type)){
2335                         hci_stack->le_connecting_state = LE_CONNECTING_IDLE;
2336                     }
2337 #endif
2338                     // error => outgoing connection failed
2339                     if (conn != NULL){
2340                         hci_handle_connection_failed(conn, status);
2341                     }
2342                 }
2343             }
2344             break;
2345 
2346         case HCI_EVENT_NUMBER_OF_COMPLETED_PACKETS:{
2347             if (size < 3) return;
2348             uint16_t num_handles = packet[2];
2349             if (size != (3u + num_handles * 4u)) return;
2350             uint16_t offset = 3;
2351             for (i=0; i<num_handles;i++){
2352                 handle = little_endian_read_16(packet, offset) & 0x0fffu;
2353                 offset += 2u;
2354                 uint16_t num_packets = little_endian_read_16(packet, offset);
2355                 offset += 2u;
2356 
2357                 conn = hci_connection_for_handle(handle);
2358                 if (!conn){
2359                     log_error("hci_number_completed_packet lists unused con handle %u", handle);
2360                     continue;
2361                 }
2362 
2363                 if (conn->num_packets_sent >= num_packets){
2364                     conn->num_packets_sent -= num_packets;
2365                 } else {
2366                     log_error("hci_number_completed_packets, more packet slots freed then sent.");
2367                     conn->num_packets_sent = 0;
2368                 }
2369                 // log_info("hci_number_completed_packet %u processed for handle %u, outstanding %u", num_packets, handle, conn->num_packets_sent);
2370 
2371 #ifdef ENABLE_CLASSIC
2372                 // For SCO, we do the can_send_now_check here
2373                 hci_notify_if_sco_can_send_now();
2374 #endif
2375             }
2376             break;
2377         }
2378 
2379 #ifdef ENABLE_CLASSIC
2380         case HCI_EVENT_INQUIRY_COMPLETE:
2381             if (hci_stack->inquiry_state == GAP_INQUIRY_STATE_ACTIVE){
2382                 hci_stack->inquiry_state = GAP_INQUIRY_STATE_IDLE;
2383                 uint8_t event[] = { GAP_EVENT_INQUIRY_COMPLETE, 1, 0};
2384                 hci_emit_event(event, sizeof(event), 1);
2385             }
2386             break;
2387         case HCI_EVENT_REMOTE_NAME_REQUEST_COMPLETE:
2388             if (hci_stack->remote_name_state == GAP_REMOTE_NAME_STATE_W4_COMPLETE){
2389                 hci_stack->remote_name_state = GAP_REMOTE_NAME_STATE_IDLE;
2390             }
2391             break;
2392         case HCI_EVENT_CONNECTION_REQUEST:
2393             reverse_bd_addr(&packet[2], addr);
2394             link_type = (hci_link_type_t) packet[11];
2395             if (hci_stack->gap_classic_accept_callback != NULL){
2396                 if ((*hci_stack->gap_classic_accept_callback)(addr, link_type) == 0){
2397                     hci_stack->decline_reason = ERROR_CODE_CONNECTION_REJECTED_DUE_TO_UNACCEPTABLE_BD_ADDR;
2398                     bd_addr_copy(hci_stack->decline_addr, addr);
2399                     break;
2400                 }
2401             }
2402 
2403             // TODO: eval COD 8-10
2404             log_info("Connection_incoming: %s, type %u", bd_addr_to_str(addr), (unsigned int) link_type);
2405             addr_type = (link_type == HCI_LINK_TYPE_ACL) ? BD_ADDR_TYPE_ACL : BD_ADDR_TYPE_SCO;
2406             conn = hci_connection_for_bd_addr_and_type(addr, addr_type);
2407             if (!conn) {
2408                 conn = create_connection_for_bd_addr_and_type(addr, addr_type);
2409             }
2410             if (!conn) {
2411                 // CONNECTION REJECTED DUE TO LIMITED RESOURCES (0X0D)
2412                 hci_stack->decline_reason = ERROR_CODE_CONNECTION_REJECTED_DUE_TO_LIMITED_RESOURCES;
2413                 bd_addr_copy(hci_stack->decline_addr, addr);
2414                 break;
2415             }
2416             conn->role  = HCI_ROLE_SLAVE;
2417             conn->state = RECEIVED_CONNECTION_REQUEST;
2418             // store info about eSCO
2419             if (link_type == HCI_LINK_TYPE_ESCO){
2420                 conn->remote_supported_features[0] |= 1;
2421             }
2422             hci_run();
2423             break;
2424 
2425         case HCI_EVENT_CONNECTION_COMPLETE:
2426             // Connection management
2427             reverse_bd_addr(&packet[5], addr);
2428             log_info("Connection_complete (status=%u) %s", packet[2], bd_addr_to_str(addr));
2429             addr_type = BD_ADDR_TYPE_ACL;
2430             conn = hci_connection_for_bd_addr_and_type(addr, addr_type);
2431             if (conn) {
2432                 if (!packet[2]){
2433                     conn->state = OPEN;
2434                     conn->con_handle = little_endian_read_16(packet, 3);
2435 
2436                     // queue get remote feature
2437                     conn->bonding_flags |= BONDING_REQUEST_REMOTE_FEATURES_PAGE_0;
2438 
2439                     // queue set supervision timeout if we're master
2440                     if ((hci_stack->link_supervision_timeout != 0) && (conn->role == HCI_ROLE_MASTER)){
2441                         connectionSetAuthenticationFlags(conn, WRITE_SUPERVISION_TIMEOUT);
2442                     }
2443 
2444                     // restart timer
2445                     btstack_run_loop_set_timer(&conn->timeout, HCI_CONNECTION_TIMEOUT_MS);
2446                     btstack_run_loop_add_timer(&conn->timeout);
2447 
2448                     log_info("New connection: handle %u, %s", conn->con_handle, bd_addr_to_str(conn->address));
2449 
2450                     hci_emit_nr_connections_changed();
2451                 } else {
2452                     // connection failed
2453                     hci_handle_connection_failed(conn, packet[2]);
2454                 }
2455             }
2456             break;
2457 
2458         case HCI_EVENT_SYNCHRONOUS_CONNECTION_COMPLETE:
2459             reverse_bd_addr(&packet[5], addr);
2460             log_info("Synchronous Connection Complete (status=%u) %s", packet[2], bd_addr_to_str(addr));
2461             if (packet[2]){
2462                 // connection failed
2463                 break;
2464             }
2465             conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_SCO);
2466             if (!conn) {
2467                 conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_SCO);
2468             }
2469             if (!conn) {
2470                 break;
2471             }
2472             conn->state = OPEN;
2473             conn->con_handle = little_endian_read_16(packet, 3);
2474 
2475 #ifdef ENABLE_SCO_OVER_HCI
2476             // update SCO
2477             if (conn->address_type == BD_ADDR_TYPE_SCO && hci_stack->hci_transport && hci_stack->hci_transport->set_sco_config){
2478                 hci_stack->hci_transport->set_sco_config(hci_stack->sco_voice_setting_active, hci_number_sco_connections());
2479             }
2480             // trigger can send now
2481             if (hci_have_usb_transport()){
2482                 hci_stack->sco_can_send_now = 1;
2483             }
2484 #endif
2485             break;
2486 
2487         case HCI_EVENT_READ_REMOTE_SUPPORTED_FEATURES_COMPLETE:
2488             handle = little_endian_read_16(packet, 3);
2489             conn = hci_connection_for_handle(handle);
2490             if (!conn) break;
2491             if (!packet[2]){
2492                 const uint8_t * features = &packet[5];
2493                 hci_handle_remote_features_page_0(conn, features);
2494 
2495                 // read extended features if possible
2496                 if (((hci_stack->local_supported_commands[1] & 1) != 0) && ((conn->remote_supported_features[0] & 2) != 0)) {
2497                     conn->bonding_flags |= BONDING_REQUEST_REMOTE_FEATURES_PAGE_1;
2498                     break;
2499                 }
2500             }
2501             hci_handle_remote_features_received(conn);
2502             break;
2503 
2504         case HCI_EVENT_READ_REMOTE_EXTENDED_FEATURES_COMPLETE:
2505             handle = little_endian_read_16(packet, 3);
2506             conn = hci_connection_for_handle(handle);
2507             if (!conn) break;
2508             // status = ok, page = 1
2509             if (!packet[2]) {
2510                 uint8_t page_number = packet[5];
2511                 uint8_t maximum_page_number = packet[6];
2512                 const uint8_t * features = &packet[7];
2513                 bool done = false;
2514                 switch (page_number){
2515                     case 1:
2516                         hci_handle_remote_features_page_1(conn, features);
2517                         if (maximum_page_number >= 2){
2518                             // get Secure Connections (Controller) from Page 2 if available
2519                             conn->bonding_flags |= BONDING_REQUEST_REMOTE_FEATURES_PAGE_2;
2520                         } else {
2521                             // otherwise, assume SC (Controller) == SC (Host)
2522                             if ((conn->bonding_flags & BONDING_REMOTE_SUPPORTS_SC_HOST) != 0){
2523                                 conn->bonding_flags |= BONDING_REMOTE_SUPPORTS_SC_CONTROLLER;
2524                             }
2525                             done = true;
2526                         }
2527                         break;
2528                     case 2:
2529                         hci_handle_remote_features_page_2(conn, features);
2530                         done = true;
2531                         break;
2532                     default:
2533                         break;
2534                 }
2535                 if (!done) break;
2536             }
2537             hci_handle_remote_features_received(conn);
2538             break;
2539 
2540         case HCI_EVENT_LINK_KEY_REQUEST:
2541             log_info("HCI_EVENT_LINK_KEY_REQUEST");
2542             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], RECV_LINK_KEY_REQUEST);
2543             // request handled by hci_run()
2544             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], HANDLE_LINK_KEY_REQUEST);
2545             break;
2546 
2547         case HCI_EVENT_LINK_KEY_NOTIFICATION: {
2548             reverse_bd_addr(&packet[2], addr);
2549             conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
2550             if (!conn) break;
2551             conn->authentication_flags |= RECV_LINK_KEY_NOTIFICATION;
2552             link_key_type_t link_key_type = (link_key_type_t)packet[24];
2553             // Change Connection Encryption keeps link key type
2554             if (link_key_type != CHANGED_COMBINATION_KEY){
2555                 conn->link_key_type = link_key_type;
2556             }
2557             gap_store_link_key_for_bd_addr(addr, &packet[8], conn->link_key_type);
2558             // still forward event to allow dismiss of pairing dialog
2559             break;
2560         }
2561 
2562         case HCI_EVENT_PIN_CODE_REQUEST:
2563             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], LEGACY_PAIRING_ACTIVE);
2564             // non-bondable mode: pin code negative reply will be sent
2565             if (!hci_stack->bondable){
2566                 hci_add_connection_flags_for_flipped_bd_addr(&packet[2], DENY_PIN_CODE_REQUEST);
2567                 hci_run();
2568                 return;
2569             }
2570             // PIN CODE REQUEST means the link key request didn't succee -> delete stored link key
2571             if (!hci_stack->link_key_db) break;
2572             hci_event_pin_code_request_get_bd_addr(packet, addr);
2573             hci_stack->link_key_db->delete_link_key(addr);
2574             break;
2575 
2576         case HCI_EVENT_IO_CAPABILITY_REQUEST:
2577             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], RECV_IO_CAPABILITIES_REQUEST);
2578             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SEND_IO_CAPABILITIES_REPLY);
2579             break;
2580 
2581 #ifdef ENABLE_CLASSIC_PAIRING_OOB
2582         case HCI_EVENT_REMOTE_OOB_DATA_REQUEST:
2583             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SSP_PAIRING_ACTIVE);
2584             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SEND_REMOTE_OOB_DATA_REPLY);
2585             break;
2586 #endif
2587 
2588         case HCI_EVENT_USER_CONFIRMATION_REQUEST:
2589             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SSP_PAIRING_ACTIVE);
2590             if (!hci_stack->ssp_auto_accept) break;
2591             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SEND_USER_CONFIRM_REPLY);
2592             break;
2593 
2594         case HCI_EVENT_USER_PASSKEY_REQUEST:
2595             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SSP_PAIRING_ACTIVE);
2596             if (!hci_stack->ssp_auto_accept) break;
2597             hci_add_connection_flags_for_flipped_bd_addr(&packet[2], SEND_USER_PASSKEY_REPLY);
2598             break;
2599 
2600         case HCI_EVENT_MODE_CHANGE:
2601             handle = hci_event_mode_change_get_handle(packet);
2602             conn = hci_connection_for_handle(handle);
2603             if (!conn) break;
2604             conn->connection_mode = hci_event_mode_change_get_mode(packet);
2605             log_info("HCI_EVENT_MODE_CHANGE, handle 0x%04x, mode %u", handle, conn->connection_mode);
2606             break;
2607 #endif
2608 
2609         case HCI_EVENT_ENCRYPTION_CHANGE:
2610             handle = hci_event_encryption_change_get_connection_handle(packet);
2611             conn = hci_connection_for_handle(handle);
2612             if (!conn) break;
2613             if (hci_event_encryption_change_get_status(packet) == 0u) {
2614                 uint8_t encryption_enabled = hci_event_encryption_change_get_encryption_enabled(packet);
2615                 if (encryption_enabled){
2616                     if (hci_is_le_connection(conn)){
2617                         // For LE, we accept connection as encrypted
2618                         conn->authentication_flags |= CONNECTION_ENCRYPTED;
2619                     }
2620 #ifdef ENABLE_CLASSIC
2621                     else {
2622                         // Detect Secure Connection -> Legacy Connection Downgrade Attack (BIAS)
2623                         bool sc_used_during_pairing = gap_secure_connection_for_link_key_type(conn->link_key_type) != 0;
2624                         bool connected_uses_aes_ccm = encryption_enabled == 2;
2625                         if (hci_stack->secure_connections_active && sc_used_during_pairing && !connected_uses_aes_ccm){
2626                             log_info("SC during pairing, but only E0 now -> abort");
2627                             conn->bonding_flags |= BONDING_DISCONNECT_SECURITY_BLOCK;
2628                             break;
2629                         }
2630 
2631                         // if AES-CCM is used, authentication used SC -> authentication was mutual and we can skip explicit authentication
2632                         if (connected_uses_aes_ccm){
2633                             conn->authentication_flags |= CONNECTION_AUTHENTICATED;
2634                         }
2635 
2636                         if ((hci_stack->local_supported_commands[0] & 0x80) != 0){
2637                             // For Classic, we need to validate encryption key size first, if possible (== supported by Controller)
2638                             conn->bonding_flags |= BONDING_SEND_READ_ENCRYPTION_KEY_SIZE;
2639                         } else {
2640                             // if not, pretend everything is perfect
2641                             hci_handle_read_encryption_key_size_complete(conn, 16);
2642                         }
2643                     }
2644 #endif
2645                 } else {
2646                     conn->authentication_flags &= ~CONNECTION_ENCRYPTED;
2647                 }
2648             }
2649 
2650             break;
2651 
2652 #ifdef ENABLE_CLASSIC
2653         case HCI_EVENT_AUTHENTICATION_COMPLETE_EVENT:
2654             handle = hci_event_authentication_complete_get_connection_handle(packet);
2655             conn = hci_connection_for_handle(handle);
2656             if (!conn) break;
2657 
2658             // ignore authentication event if we didn't request it
2659             if ((conn->bonding_flags & BONDING_SENT_AUTHENTICATE_REQUEST) == 0) break;
2660 
2661             // dedicated bonding: send result and disconnect
2662             if (conn->bonding_flags & BONDING_DEDICATED){
2663                 conn->bonding_flags &= ~BONDING_DEDICATED;
2664                 conn->bonding_flags |= BONDING_DISCONNECT_DEDICATED_DONE;
2665                 conn->bonding_status = packet[2];
2666                 break;
2667             }
2668 
2669             // authenticated only if auth status == 0
2670             if (hci_event_authentication_complete_get_status(packet) == 0){
2671                 // authenticated
2672                 conn->authentication_flags |= CONNECTION_AUTHENTICATED;
2673 
2674                 // If link key sufficient for requested security and not already encrypted, start encryption
2675                 if (((gap_security_level_for_link_key_type(conn->link_key_type) >= conn->requested_security_level)) &&
2676                     ((conn->authentication_flags & CONNECTION_ENCRYPTED) == 0)){
2677                     conn->bonding_flags |= BONDING_SEND_ENCRYPTION_REQUEST;
2678                     break;
2679                 }
2680             }
2681 
2682             // emit updated security level
2683             hci_emit_security_level(handle, gap_security_level_for_connection(conn));
2684             break;
2685 #endif
2686 
2687         // HCI_EVENT_DISCONNECTION_COMPLETE
2688         // has been split, to first notify stack before shutting connection down
2689         // see end of function, too.
2690         case HCI_EVENT_DISCONNECTION_COMPLETE:
2691             if (packet[2]) break;   // status != 0
2692             handle = little_endian_read_16(packet, 3);
2693             // drop outgoing ACL fragments if it is for closed connection and release buffer if tx not active
2694             if (hci_stack->acl_fragmentation_total_size > 0u) {
2695                 if (handle == READ_ACL_CONNECTION_HANDLE(hci_stack->hci_packet_buffer)){
2696                     int release_buffer = hci_stack->acl_fragmentation_tx_active == 0u;
2697                     log_info("drop fragmented ACL data for closed connection, release buffer %u", release_buffer);
2698                     hci_stack->acl_fragmentation_total_size = 0;
2699                     hci_stack->acl_fragmentation_pos = 0;
2700                     if (release_buffer){
2701                         hci_release_packet_buffer();
2702                     }
2703                 }
2704             }
2705 
2706             conn = hci_connection_for_handle(handle);
2707             if (!conn) break;
2708             // mark connection for shutdown
2709             conn->state = RECEIVED_DISCONNECTION_COMPLETE;
2710 
2711             // emit dedicatd bonding event
2712             if (conn->bonding_flags & BONDING_EMIT_COMPLETE_ON_DISCONNECT){
2713                 hci_emit_dedicated_bonding_result(conn->address, conn->bonding_status);
2714             }
2715 
2716 #ifdef ENABLE_BLE
2717 #ifdef ENABLE_LE_PERIPHERAL
2718             // re-enable advertisements for le connections if active
2719             if (hci_is_le_connection(conn)){
2720                 hci_update_advertisements_enabled_for_current_roles();
2721             }
2722 #endif
2723 #endif
2724             break;
2725 
2726         case HCI_EVENT_HARDWARE_ERROR:
2727             log_error("Hardware Error: 0x%02x", packet[2]);
2728             if (hci_stack->hardware_error_callback){
2729                 (*hci_stack->hardware_error_callback)(packet[2]);
2730             } else {
2731                 // if no special requests, just reboot stack
2732                 hci_power_control_off();
2733                 hci_power_control_on();
2734             }
2735             break;
2736 
2737 #ifdef ENABLE_CLASSIC
2738         case HCI_EVENT_ROLE_CHANGE:
2739             if (packet[2]) break;   // status != 0
2740             reverse_bd_addr(&packet[3], addr);
2741             addr_type = BD_ADDR_TYPE_ACL;
2742             conn = hci_connection_for_bd_addr_and_type(addr, addr_type);
2743             if (!conn) break;
2744             conn->role = packet[9];
2745             break;
2746 #endif
2747 
2748         case HCI_EVENT_TRANSPORT_PACKET_SENT:
2749             // release packet buffer only for asynchronous transport and if there are not further fragements
2750             if (hci_transport_synchronous()) {
2751                 log_error("Synchronous HCI Transport shouldn't send HCI_EVENT_TRANSPORT_PACKET_SENT");
2752                 return; // instead of break: to avoid re-entering hci_run()
2753             }
2754             hci_stack->acl_fragmentation_tx_active = 0;
2755             if (hci_stack->acl_fragmentation_total_size) break;
2756             hci_release_packet_buffer();
2757 
2758             // L2CAP receives this event via the hci_emit_event below
2759 
2760 #ifdef ENABLE_CLASSIC
2761             // For SCO, we do the can_send_now_check here
2762             hci_notify_if_sco_can_send_now();
2763 #endif
2764             break;
2765 
2766 #ifdef ENABLE_CLASSIC
2767         case HCI_EVENT_SCO_CAN_SEND_NOW:
2768             // For SCO, we do the can_send_now_check here
2769             hci_stack->sco_can_send_now = 1;
2770             hci_notify_if_sco_can_send_now();
2771             return;
2772 
2773         // explode inquriy results for easier consumption
2774         case HCI_EVENT_INQUIRY_RESULT:
2775         case HCI_EVENT_INQUIRY_RESULT_WITH_RSSI:
2776         case HCI_EVENT_EXTENDED_INQUIRY_RESPONSE:
2777             gap_inquiry_explode(packet, size);
2778             break;
2779 #endif
2780 
2781 #ifdef ENABLE_BLE
2782         case HCI_EVENT_LE_META:
2783             switch (packet[2]){
2784 #ifdef ENABLE_LE_CENTRAL
2785                 case HCI_SUBEVENT_LE_ADVERTISING_REPORT:
2786                     // log_info("advertising report received");
2787                     if (!hci_stack->le_scanning_enabled) break;
2788                     le_handle_advertisement_report(packet, size);
2789                     break;
2790 #endif
2791                 case HCI_SUBEVENT_LE_CONNECTION_COMPLETE:
2792 					event_handle_le_connection_complete(packet);
2793                     break;
2794 
2795                 // log_info("LE buffer size: %u, count %u", little_endian_read_16(packet,6), packet[8]);
2796                 case HCI_SUBEVENT_LE_CONNECTION_UPDATE_COMPLETE:
2797                     handle = hci_subevent_le_connection_update_complete_get_connection_handle(packet);
2798                     conn = hci_connection_for_handle(handle);
2799                     if (!conn) break;
2800                     conn->le_connection_interval = hci_subevent_le_connection_update_complete_get_conn_interval(packet);
2801                     break;
2802 
2803                 case HCI_SUBEVENT_LE_REMOTE_CONNECTION_PARAMETER_REQUEST:
2804                     // connection
2805                     handle = hci_subevent_le_remote_connection_parameter_request_get_connection_handle(packet);
2806                     conn = hci_connection_for_handle(handle);
2807                     if (conn) {
2808                         // read arguments
2809                         uint16_t le_conn_interval_min   = hci_subevent_le_remote_connection_parameter_request_get_interval_min(packet);
2810                         uint16_t le_conn_interval_max   = hci_subevent_le_remote_connection_parameter_request_get_interval_max(packet);
2811                         uint16_t le_conn_latency        = hci_subevent_le_remote_connection_parameter_request_get_latency(packet);
2812                         uint16_t le_supervision_timeout = hci_subevent_le_remote_connection_parameter_request_get_timeout(packet);
2813 
2814                         // validate against current connection parameter range
2815                         le_connection_parameter_range_t existing_range;
2816                         gap_get_connection_parameter_range(&existing_range);
2817                         int update_parameter = gap_connection_parameter_range_included(&existing_range, le_conn_interval_min, le_conn_interval_max, le_conn_latency, le_supervision_timeout);
2818                         if (update_parameter){
2819                             conn->le_con_parameter_update_state = CON_PARAMETER_UPDATE_REPLY;
2820                             conn->le_conn_interval_min = le_conn_interval_min;
2821                             conn->le_conn_interval_max = le_conn_interval_max;
2822                             conn->le_conn_latency = le_conn_latency;
2823                             conn->le_supervision_timeout = le_supervision_timeout;
2824                         } else {
2825                             conn->le_con_parameter_update_state = CON_PARAMETER_UPDATE_NEGATIVE_REPLY;
2826                         }
2827                     }
2828                     break;
2829 #ifdef ENABLE_LE_LIMIT_ACL_FRAGMENT_BY_MAX_OCTETS
2830                 case HCI_SUBEVENT_LE_DATA_LENGTH_CHANGE:
2831                     handle = hci_subevent_le_data_length_change_get_connection_handle(packet);
2832                     conn = hci_connection_for_handle(handle);
2833                     if (conn) {
2834                         conn->le_max_tx_octets = hci_subevent_le_data_length_change_get_max_tx_octets(packet);
2835                     }
2836                     break;
2837 #endif
2838                 default:
2839                     break;
2840             }
2841             break;
2842 #endif
2843         case HCI_EVENT_VENDOR_SPECIFIC:
2844             // Vendor specific commands often create vendor specific event instead of num completed packets
2845             // To avoid getting stuck as num_cmds_packets is zero, reset it to 1 for controllers with this behaviour
2846             switch (hci_stack->manufacturer){
2847                 case BLUETOOTH_COMPANY_ID_CAMBRIDGE_SILICON_RADIO:
2848                     hci_stack->num_cmd_packets = 1;
2849                     break;
2850                 default:
2851                     break;
2852             }
2853             break;
2854         default:
2855             break;
2856     }
2857 
2858     handle_event_for_current_stack_state(packet, size);
2859 
2860     // notify upper stack
2861 	hci_emit_event(packet, size, 0);   // don't dump, already happened in packet handler
2862 
2863     // moved here to give upper stack a chance to close down everything with hci_connection_t intact
2864     if ((hci_event_packet_get_type(packet) == HCI_EVENT_DISCONNECTION_COMPLETE) && (packet[2] == 0)){
2865 		handle = little_endian_read_16(packet, 3);
2866 		hci_connection_t * aConn = hci_connection_for_handle(handle);
2867 		// discard connection if app did not trigger a reconnect in the event handler
2868 		if (aConn && aConn->state == RECEIVED_DISCONNECTION_COMPLETE){
2869 			hci_shutdown_connection(aConn);
2870 		}
2871     }
2872 
2873 	// execute main loop
2874 	hci_run();
2875 }
2876 
2877 #ifdef ENABLE_CLASSIC
2878 
2879 static void sco_tx_timeout_handler(btstack_timer_source_t * ts);
2880 static void sco_schedule_tx(hci_connection_t * conn);
2881 
2882 static void sco_tx_timeout_handler(btstack_timer_source_t * ts){
2883     log_debug("SCO TX Timeout");
2884     hci_con_handle_t con_handle = (hci_con_handle_t) (uintptr_t) btstack_run_loop_get_timer_context(ts);
2885     hci_connection_t * conn = hci_connection_for_handle(con_handle);
2886     if (!conn) return;
2887 
2888     // trigger send
2889     conn->sco_tx_ready = 1;
2890     // extra packet if CVSD but SCO buffer is too short
2891     if (((hci_stack->sco_voice_setting_active & 0x03) != 0x03) && (hci_stack->sco_data_packet_length < 123)){
2892         conn->sco_tx_ready++;
2893     }
2894     hci_notify_if_sco_can_send_now();
2895 }
2896 
2897 
2898 #define SCO_TX_AFTER_RX_MS (6)
2899 
2900 static void sco_schedule_tx(hci_connection_t * conn){
2901 
2902     uint32_t now = btstack_run_loop_get_time_ms();
2903     uint32_t sco_tx_ms = conn->sco_rx_ms + SCO_TX_AFTER_RX_MS;
2904     int time_delta_ms = sco_tx_ms - now;
2905 
2906     btstack_timer_source_t * timer = (conn->sco_rx_count & 1) ? &conn->timeout : &conn->timeout_sco;
2907 
2908     // log_error("SCO TX at %u in %u", (int) sco_tx_ms, time_delta_ms);
2909     btstack_run_loop_set_timer(timer, time_delta_ms);
2910     btstack_run_loop_set_timer_context(timer, (void *) (uintptr_t) conn->con_handle);
2911     btstack_run_loop_set_timer_handler(timer, &sco_tx_timeout_handler);
2912     btstack_run_loop_add_timer(timer);
2913 }
2914 
2915 static void sco_handler(uint8_t * packet, uint16_t size){
2916     // lookup connection struct
2917     hci_con_handle_t con_handle = READ_SCO_CONNECTION_HANDLE(packet);
2918     hci_connection_t * conn     = hci_connection_for_handle(con_handle);
2919     if (!conn) return;
2920 
2921     // CSR 8811 prefixes 60 byte SCO packet in transparent mode with 20 zero bytes -> skip first 20 payload bytes
2922     if (hci_stack->manufacturer == BLUETOOTH_COMPANY_ID_CAMBRIDGE_SILICON_RADIO){
2923         if ((size == 83) && ((hci_stack->sco_voice_setting_active & 0x03) == 0x03)){
2924             packet[2] = 0x3c;
2925             memmove(&packet[3], &packet[23], 63);
2926             size = 63;
2927         }
2928     }
2929 
2930     if (hci_have_usb_transport()){
2931         // Nothing to do
2932     } else {
2933         // log_debug("sco flow %u, handle 0x%04x, packets sent %u, bytes send %u", hci_stack->synchronous_flow_control_enabled, (int) con_handle, conn->num_packets_sent, conn->num_sco_bytes_sent);
2934         if (hci_stack->synchronous_flow_control_enabled == 0){
2935             uint32_t now = btstack_run_loop_get_time_ms();
2936 
2937             if (!conn->sco_rx_valid){
2938                 // ignore first 10 packets
2939                 conn->sco_rx_count++;
2940                 // log_debug("sco rx count %u", conn->sco_rx_count);
2941                 if (conn->sco_rx_count == 10) {
2942                     // use first timestamp as is and pretent it just started
2943                     conn->sco_rx_ms = now;
2944                     conn->sco_rx_valid = 1;
2945                     conn->sco_rx_count = 0;
2946                     sco_schedule_tx(conn);
2947                 }
2948             } else {
2949                 // track expected arrival timme
2950                 conn->sco_rx_count++;
2951                 conn->sco_rx_ms += 7;
2952                 int delta = (int32_t) (now - conn->sco_rx_ms);
2953                 if (delta > 0){
2954                     conn->sco_rx_ms++;
2955                 }
2956                 // log_debug("sco rx %u", conn->sco_rx_ms);
2957                 sco_schedule_tx(conn);
2958             }
2959         }
2960     }
2961     // deliver to app
2962     if (hci_stack->sco_packet_handler) {
2963         hci_stack->sco_packet_handler(HCI_SCO_DATA_PACKET, 0, packet, size);
2964     }
2965 
2966 #ifdef ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL
2967     conn->num_packets_completed++;
2968     hci_stack->host_completed_packets = 1;
2969     hci_run();
2970 #endif
2971 }
2972 #endif
2973 
2974 static void packet_handler(uint8_t packet_type, uint8_t *packet, uint16_t size){
2975     hci_dump_packet(packet_type, 1, packet, size);
2976     switch (packet_type) {
2977         case HCI_EVENT_PACKET:
2978             event_handler(packet, size);
2979             break;
2980         case HCI_ACL_DATA_PACKET:
2981             acl_handler(packet, size);
2982             break;
2983 #ifdef ENABLE_CLASSIC
2984         case HCI_SCO_DATA_PACKET:
2985             sco_handler(packet, size);
2986             break;
2987 #endif
2988         default:
2989             break;
2990     }
2991 }
2992 
2993 /**
2994  * @brief Add event packet handler.
2995  */
2996 void hci_add_event_handler(btstack_packet_callback_registration_t * callback_handler){
2997     btstack_linked_list_add_tail(&hci_stack->event_handlers, (btstack_linked_item_t*) callback_handler);
2998 }
2999 
3000 
3001 /** Register HCI packet handlers */
3002 void hci_register_acl_packet_handler(btstack_packet_handler_t handler){
3003     hci_stack->acl_packet_handler = handler;
3004 }
3005 
3006 #ifdef ENABLE_CLASSIC
3007 /**
3008  * @brief Registers a packet handler for SCO data. Used for HSP and HFP profiles.
3009  */
3010 void hci_register_sco_packet_handler(btstack_packet_handler_t handler){
3011     hci_stack->sco_packet_handler = handler;
3012 }
3013 #endif
3014 
3015 static void hci_state_reset(void){
3016     // no connections yet
3017     hci_stack->connections = NULL;
3018 
3019     // keep discoverable/connectable as this has been requested by the client(s)
3020     // hci_stack->discoverable = 0;
3021     // hci_stack->connectable = 0;
3022     // hci_stack->bondable = 1;
3023     // hci_stack->own_addr_type = 0;
3024 
3025     // buffer is free
3026     hci_stack->hci_packet_buffer_reserved = 0;
3027 
3028     // no pending cmds
3029     hci_stack->decline_reason = 0;
3030     hci_stack->new_scan_enable_value = 0xff;
3031 
3032     hci_stack->secure_connections_active = false;
3033 
3034 #ifdef ENABLE_CLASSIC_PAIRING_OOB
3035     hci_stack->classic_read_local_oob_data = true;
3036 #endif
3037 
3038     // LE
3039 #ifdef ENABLE_BLE
3040     memset(hci_stack->le_random_address, 0, 6);
3041     hci_stack->le_random_address_set = 0;
3042 #endif
3043 #ifdef ENABLE_LE_CENTRAL
3044     hci_stack->le_scanning_active  = 0;
3045     hci_stack->le_connecting_state = LE_CONNECTING_IDLE;
3046     hci_stack->le_connecting_request = LE_CONNECTING_IDLE;
3047     hci_stack->le_whitelist_capacity = 0;
3048 #endif
3049 }
3050 
3051 #ifdef ENABLE_CLASSIC
3052 /**
3053  * @brief Configure Bluetooth hardware control. Has to be called before power on.
3054  */
3055 void hci_set_link_key_db(btstack_link_key_db_t const * link_key_db){
3056     // store and open remote device db
3057     hci_stack->link_key_db = link_key_db;
3058     if (hci_stack->link_key_db) {
3059         hci_stack->link_key_db->open();
3060     }
3061 }
3062 #endif
3063 
3064 void hci_init(const hci_transport_t *transport, const void *config){
3065 
3066 #ifdef HAVE_MALLOC
3067     if (!hci_stack) {
3068         hci_stack = (hci_stack_t*) malloc(sizeof(hci_stack_t));
3069     }
3070 #else
3071     hci_stack = &hci_stack_static;
3072 #endif
3073     memset(hci_stack, 0, sizeof(hci_stack_t));
3074 
3075     // reference to use transport layer implementation
3076     hci_stack->hci_transport = transport;
3077 
3078     // reference to used config
3079     hci_stack->config = config;
3080 
3081     // setup pointer for outgoing packet buffer
3082     hci_stack->hci_packet_buffer = &hci_stack->hci_packet_buffer_data[HCI_OUTGOING_PRE_BUFFER_SIZE];
3083 
3084     // max acl payload size defined in config.h
3085     hci_stack->acl_data_packet_length = HCI_ACL_PAYLOAD_SIZE;
3086 
3087     // register packet handlers with transport
3088     transport->register_packet_handler(&packet_handler);
3089 
3090     hci_stack->state = HCI_STATE_OFF;
3091 
3092     // class of device
3093     hci_stack->class_of_device = 0x007a020c; // Smartphone
3094 
3095     // bondable by default
3096     hci_stack->bondable = 1;
3097 
3098 #ifdef ENABLE_CLASSIC
3099     // classic name
3100     hci_stack->local_name = default_classic_name;
3101 
3102     // Master slave policy
3103     hci_stack->master_slave_policy = 1;
3104 
3105     // Allow Role Switch
3106     hci_stack->allow_role_switch = 1;
3107 
3108     // Default / minimum security level = 2
3109     hci_stack->gap_security_level = LEVEL_2;
3110 
3111     // Errata-11838 mandates 7 bytes for GAP Security Level 1-3
3112     hci_stack->gap_required_encyrption_key_size = 7;
3113 #endif
3114 
3115     // Secure Simple Pairing default: enable, no I/O capabilities, general bonding, mitm not required, auto accept
3116     hci_stack->ssp_enable = 1;
3117     hci_stack->ssp_io_capability = SSP_IO_CAPABILITY_NO_INPUT_NO_OUTPUT;
3118     hci_stack->ssp_authentication_requirement = SSP_IO_AUTHREQ_MITM_PROTECTION_NOT_REQUIRED_GENERAL_BONDING;
3119     hci_stack->ssp_auto_accept = 1;
3120 
3121     // Secure Connections: enable (requires support from Controller)
3122     hci_stack->secure_connections_enable = true;
3123 
3124     // voice setting - signed 16 bit pcm data with CVSD over the air
3125     hci_stack->sco_voice_setting = 0x60;
3126 
3127 #ifdef ENABLE_LE_CENTRAL
3128     // connection parameter to use for outgoing connections
3129     hci_stack->le_connection_scan_interval = 0x0060;   // 60ms
3130     hci_stack->le_connection_scan_window  = 0x0030;    // 30ms
3131     hci_stack->le_connection_interval_min = 0x0008;    // 10 ms
3132     hci_stack->le_connection_interval_max = 0x0018;    // 30 ms
3133     hci_stack->le_connection_latency      = 4;         // 4
3134     hci_stack->le_supervision_timeout     = 0x0048;    // 720 ms
3135     hci_stack->le_minimum_ce_length       = 2;         // 1.25 ms
3136     hci_stack->le_maximum_ce_length       = 0x0030;    // 30 ms
3137 
3138     // default LE Scanning
3139     hci_stack->le_scan_type     =   0x1; // active
3140     hci_stack->le_scan_interval = 0x1e0; // 300 ms
3141     hci_stack->le_scan_window   =  0x30; //  30 ms
3142 #endif
3143 
3144 #ifdef ENABLE_LE_PERIPHERAL
3145     hci_stack->le_max_number_peripheral_connections = 1; // only single connection as peripheral
3146 #endif
3147 
3148     // connection parameter range used to answer connection parameter update requests in l2cap
3149     hci_stack->le_connection_parameter_range.le_conn_interval_min =          6;
3150     hci_stack->le_connection_parameter_range.le_conn_interval_max =       3200;
3151     hci_stack->le_connection_parameter_range.le_conn_latency_min =           0;
3152     hci_stack->le_connection_parameter_range.le_conn_latency_max =         500;
3153     hci_stack->le_connection_parameter_range.le_supervision_timeout_min =   10;
3154     hci_stack->le_connection_parameter_range.le_supervision_timeout_max = 3200;
3155 
3156     hci_state_reset();
3157 }
3158 
3159 void hci_deinit(void){
3160 #ifdef HAVE_MALLOC
3161     if (hci_stack) {
3162         free(hci_stack);
3163     }
3164 #endif
3165     hci_stack = NULL;
3166 
3167 #ifdef ENABLE_CLASSIC
3168     disable_l2cap_timeouts = 0;
3169 #endif
3170 }
3171 
3172 /**
3173  * @brief Configure Bluetooth chipset driver. Has to be called before power on, or right after receiving the local version information
3174  */
3175 void hci_set_chipset(const btstack_chipset_t *chipset_driver){
3176     hci_stack->chipset = chipset_driver;
3177 
3178     // reset chipset driver - init is also called on power_up
3179     if (hci_stack->chipset && hci_stack->chipset->init){
3180         hci_stack->chipset->init(hci_stack->config);
3181     }
3182 }
3183 
3184 /**
3185  * @brief Configure Bluetooth hardware control. Has to be called after hci_init() but before power on.
3186  */
3187 void hci_set_control(const btstack_control_t *hardware_control){
3188     // references to used control implementation
3189     hci_stack->control = hardware_control;
3190     // init with transport config
3191     hardware_control->init(hci_stack->config);
3192 }
3193 
3194 void hci_close(void){
3195     // close remote device db
3196     if (hci_stack->link_key_db) {
3197         hci_stack->link_key_db->close();
3198     }
3199 
3200     btstack_linked_list_iterator_t lit;
3201     btstack_linked_list_iterator_init(&lit, &hci_stack->connections);
3202     while (btstack_linked_list_iterator_has_next(&lit)){
3203         // cancel all l2cap connections by emitting dicsconnection complete before shutdown (free) connection
3204         hci_connection_t * connection = (hci_connection_t*) btstack_linked_list_iterator_next(&lit);
3205         hci_emit_disconnection_complete(connection->con_handle, 0x16); // terminated by local host
3206         hci_shutdown_connection(connection);
3207     }
3208 
3209     hci_power_control(HCI_POWER_OFF);
3210 
3211 #ifdef HAVE_MALLOC
3212     free(hci_stack);
3213 #endif
3214     hci_stack = NULL;
3215 }
3216 
3217 #ifdef ENABLE_CLASSIC
3218 void gap_set_required_encryption_key_size(uint8_t encryption_key_size){
3219     // validate ranage and set
3220     if (encryption_key_size < 7)  return;
3221     if (encryption_key_size > 16) return;
3222     hci_stack->gap_required_encyrption_key_size = encryption_key_size;
3223 }
3224 
3225 void gap_set_security_level(gap_security_level_t security_level){
3226     hci_stack->gap_security_level = security_level;
3227 }
3228 
3229 gap_security_level_t gap_get_security_level(void){
3230     return hci_stack->gap_security_level;
3231 }
3232 #endif
3233 
3234 #ifdef ENABLE_CLASSIC
3235 void gap_set_class_of_device(uint32_t class_of_device){
3236     hci_stack->class_of_device = class_of_device;
3237 }
3238 
3239 void gap_set_default_link_policy_settings(uint16_t default_link_policy_settings){
3240     hci_stack->default_link_policy_settings = default_link_policy_settings;
3241 }
3242 
3243 void gap_set_allow_role_switch(bool allow_role_switch){
3244     hci_stack->allow_role_switch = allow_role_switch ? 1 : 0;
3245 }
3246 
3247 uint8_t hci_get_allow_role_switch(void){
3248     return  hci_stack->allow_role_switch;
3249 }
3250 
3251 void gap_set_link_supervision_timeout(uint16_t link_supervision_timeout){
3252     hci_stack->link_supervision_timeout = link_supervision_timeout;
3253 }
3254 
3255 void hci_disable_l2cap_timeout_check(void){
3256     disable_l2cap_timeouts = 1;
3257 }
3258 #endif
3259 
3260 #if !defined(HAVE_PLATFORM_IPHONE_OS) && !defined (HAVE_HOST_CONTROLLER_API)
3261 // Set Public BD ADDR - passed on to Bluetooth chipset if supported in bt_control_h
3262 void hci_set_bd_addr(bd_addr_t addr){
3263     (void)memcpy(hci_stack->custom_bd_addr, addr, 6);
3264     hci_stack->custom_bd_addr_set = 1;
3265 }
3266 #endif
3267 
3268 // State-Module-Driver overview
3269 // state                    module  low-level
3270 // HCI_STATE_OFF             off      close
3271 // HCI_STATE_INITIALIZING,   on       open
3272 // HCI_STATE_WORKING,        on       open
3273 // HCI_STATE_HALTING,        on       open
3274 // HCI_STATE_SLEEPING,    off/sleep   close
3275 // HCI_STATE_FALLING_ASLEEP  on       open
3276 
3277 static int hci_power_control_on(void){
3278 
3279     // power on
3280     int err = 0;
3281     if (hci_stack->control && hci_stack->control->on){
3282         err = (*hci_stack->control->on)();
3283     }
3284     if (err){
3285         log_error( "POWER_ON failed");
3286         hci_emit_hci_open_failed();
3287         return err;
3288     }
3289 
3290     // int chipset driver
3291     if (hci_stack->chipset && hci_stack->chipset->init){
3292         hci_stack->chipset->init(hci_stack->config);
3293     }
3294 
3295     // init transport
3296     if (hci_stack->hci_transport->init){
3297         hci_stack->hci_transport->init(hci_stack->config);
3298     }
3299 
3300     // open transport
3301     err = hci_stack->hci_transport->open();
3302     if (err){
3303         log_error( "HCI_INIT failed, turning Bluetooth off again");
3304         if (hci_stack->control && hci_stack->control->off){
3305             (*hci_stack->control->off)();
3306         }
3307         hci_emit_hci_open_failed();
3308         return err;
3309     }
3310     return 0;
3311 }
3312 
3313 static void hci_power_control_off(void){
3314 
3315     log_info("hci_power_control_off");
3316 
3317     // close low-level device
3318     hci_stack->hci_transport->close();
3319 
3320     log_info("hci_power_control_off - hci_transport closed");
3321 
3322     // power off
3323     if (hci_stack->control && hci_stack->control->off){
3324         (*hci_stack->control->off)();
3325     }
3326 
3327     log_info("hci_power_control_off - control closed");
3328 
3329     hci_stack->state = HCI_STATE_OFF;
3330 }
3331 
3332 static void hci_power_control_sleep(void){
3333 
3334     log_info("hci_power_control_sleep");
3335 
3336 #if 0
3337     // don't close serial port during sleep
3338 
3339     // close low-level device
3340     hci_stack->hci_transport->close(hci_stack->config);
3341 #endif
3342 
3343     // sleep mode
3344     if (hci_stack->control && hci_stack->control->sleep){
3345         (*hci_stack->control->sleep)();
3346     }
3347 
3348     hci_stack->state = HCI_STATE_SLEEPING;
3349 }
3350 
3351 static int hci_power_control_wake(void){
3352 
3353     log_info("hci_power_control_wake");
3354 
3355     // wake on
3356     if (hci_stack->control && hci_stack->control->wake){
3357         (*hci_stack->control->wake)();
3358     }
3359 
3360 #if 0
3361     // open low-level device
3362     int err = hci_stack->hci_transport->open(hci_stack->config);
3363     if (err){
3364         log_error( "HCI_INIT failed, turning Bluetooth off again");
3365         if (hci_stack->control && hci_stack->control->off){
3366             (*hci_stack->control->off)();
3367         }
3368         hci_emit_hci_open_failed();
3369         return err;
3370     }
3371 #endif
3372 
3373     return 0;
3374 }
3375 
3376 static void hci_power_transition_to_initializing(void){
3377     // set up state machine
3378     hci_stack->num_cmd_packets = 1; // assume that one cmd can be sent
3379     hci_stack->hci_packet_buffer_reserved = 0;
3380     hci_stack->state = HCI_STATE_INITIALIZING;
3381     hci_stack->substate = HCI_INIT_SEND_RESET;
3382 }
3383 
3384 // returns error
3385 static int hci_power_control_state_off(HCI_POWER_MODE power_mode){
3386     int err;
3387     switch (power_mode){
3388         case HCI_POWER_ON:
3389             err = hci_power_control_on();
3390             if (err != 0) {
3391                 log_error("hci_power_control_on() error %d", err);
3392                 return err;
3393             }
3394             hci_power_transition_to_initializing();
3395             break;
3396         case HCI_POWER_OFF:
3397             // do nothing
3398             break;
3399         case HCI_POWER_SLEEP:
3400             // do nothing (with SLEEP == OFF)
3401             break;
3402         default:
3403             btstack_assert(false);
3404             break;
3405     }
3406     return ERROR_CODE_SUCCESS;
3407 }
3408 
3409 static int hci_power_control_state_initializing(HCI_POWER_MODE power_mode){
3410     switch (power_mode){
3411         case HCI_POWER_ON:
3412             // do nothing
3413             break;
3414         case HCI_POWER_OFF:
3415             // no connections yet, just turn it off
3416             hci_power_control_off();
3417             break;
3418         case HCI_POWER_SLEEP:
3419             // no connections yet, just turn it off
3420             hci_power_control_sleep();
3421             break;
3422         default:
3423             btstack_assert(false);
3424             break;
3425     }
3426     return ERROR_CODE_SUCCESS;
3427 }
3428 
3429 static int hci_power_control_state_working(HCI_POWER_MODE power_mode) {
3430     switch (power_mode){
3431         case HCI_POWER_ON:
3432             // do nothing
3433             break;
3434         case HCI_POWER_OFF:
3435             // see hci_run
3436             hci_stack->state = HCI_STATE_HALTING;
3437             hci_stack->substate = HCI_HALTING_DISCONNECT_ALL_NO_TIMER;
3438             break;
3439         case HCI_POWER_SLEEP:
3440             // see hci_run
3441             hci_stack->state = HCI_STATE_FALLING_ASLEEP;
3442             hci_stack->substate = HCI_FALLING_ASLEEP_DISCONNECT;
3443             break;
3444         default:
3445             btstack_assert(false);
3446             break;
3447     }
3448     return ERROR_CODE_SUCCESS;
3449 }
3450 
3451 static int hci_power_control_state_halting(HCI_POWER_MODE power_mode) {
3452     switch (power_mode){
3453         case HCI_POWER_ON:
3454             hci_power_transition_to_initializing();
3455             break;
3456         case HCI_POWER_OFF:
3457             // do nothing
3458             break;
3459         case HCI_POWER_SLEEP:
3460             // see hci_run
3461             hci_stack->state = HCI_STATE_FALLING_ASLEEP;
3462             hci_stack->substate = HCI_FALLING_ASLEEP_DISCONNECT;
3463             break;
3464         default:
3465             btstack_assert(false);
3466             break;
3467     }
3468     return ERROR_CODE_SUCCESS;
3469 }
3470 
3471 static int hci_power_control_state_falling_asleep(HCI_POWER_MODE power_mode) {
3472     switch (power_mode){
3473         case HCI_POWER_ON:
3474 
3475 #ifdef HAVE_PLATFORM_IPHONE_OS
3476             // nothing to do, if H4 supports power management
3477                     if (btstack_control_iphone_power_management_enabled()){
3478                         hci_stack->state = HCI_STATE_INITIALIZING;
3479                         hci_stack->substate = HCI_INIT_WRITE_SCAN_ENABLE;   // init after sleep
3480                         break;
3481                     }
3482 #endif
3483             hci_power_transition_to_initializing();
3484             break;
3485         case HCI_POWER_OFF:
3486             // see hci_run
3487             hci_stack->state = HCI_STATE_HALTING;
3488             hci_stack->substate = HCI_HALTING_DISCONNECT_ALL_NO_TIMER;
3489             break;
3490         case HCI_POWER_SLEEP:
3491             // do nothing
3492             break;
3493         default:
3494             btstack_assert(false);
3495             break;
3496     }
3497     return ERROR_CODE_SUCCESS;
3498 }
3499 
3500 static int hci_power_control_state_sleeping(HCI_POWER_MODE power_mode) {
3501     int err;
3502     switch (power_mode){
3503         case HCI_POWER_ON:
3504 #ifdef HAVE_PLATFORM_IPHONE_OS
3505             // nothing to do, if H4 supports power management
3506                     if (btstack_control_iphone_power_management_enabled()){
3507                         hci_stack->state = HCI_STATE_INITIALIZING;
3508                         hci_stack->substate = HCI_INIT_AFTER_SLEEP;
3509                         hci_update_scan_enable();
3510                         break;
3511                     }
3512 #endif
3513             err = hci_power_control_wake();
3514             if (err) return err;
3515             hci_power_transition_to_initializing();
3516             break;
3517         case HCI_POWER_OFF:
3518             hci_stack->state = HCI_STATE_HALTING;
3519             hci_stack->substate = HCI_HALTING_DISCONNECT_ALL_NO_TIMER;
3520             break;
3521         case HCI_POWER_SLEEP:
3522             // do nothing
3523             break;
3524         default:
3525             btstack_assert(false);
3526             break;
3527     }
3528     return ERROR_CODE_SUCCESS;
3529 }
3530 
3531 int hci_power_control(HCI_POWER_MODE power_mode){
3532     log_info("hci_power_control: %d, current mode %u", power_mode, hci_stack->state);
3533     int err;
3534     switch (hci_stack->state){
3535         case HCI_STATE_OFF:
3536             err = hci_power_control_state_off(power_mode);
3537             break;
3538         case HCI_STATE_INITIALIZING:
3539             err = hci_power_control_state_initializing(power_mode);
3540             break;
3541         case HCI_STATE_WORKING:
3542             err = hci_power_control_state_working(power_mode);
3543             break;
3544         case HCI_STATE_HALTING:
3545             err = hci_power_control_state_halting(power_mode);
3546             break;
3547         case HCI_STATE_FALLING_ASLEEP:
3548             err = hci_power_control_state_falling_asleep(power_mode);
3549             break;
3550         case HCI_STATE_SLEEPING:
3551             err = hci_power_control_state_sleeping(power_mode);
3552             break;
3553         default:
3554             btstack_assert(false);
3555             break;
3556     }
3557     if (err){
3558         return err;
3559     }
3560 
3561     // create internal event
3562 	hci_emit_state();
3563 
3564 	// trigger next/first action
3565 	hci_run();
3566 
3567     return 0;
3568 }
3569 
3570 
3571 #ifdef ENABLE_CLASSIC
3572 
3573 static void hci_update_scan_enable(void){
3574     // 2 = page scan, 1 = inq scan
3575     hci_stack->new_scan_enable_value  = (hci_stack->connectable << 1) | hci_stack->discoverable;
3576     hci_run();
3577 }
3578 
3579 void gap_discoverable_control(uint8_t enable){
3580     if (enable) enable = 1; // normalize argument
3581 
3582     if (hci_stack->discoverable == enable){
3583         hci_emit_discoverable_enabled(hci_stack->discoverable);
3584         return;
3585     }
3586 
3587     hci_stack->discoverable = enable;
3588     hci_update_scan_enable();
3589 }
3590 
3591 void gap_connectable_control(uint8_t enable){
3592     if (enable) enable = 1; // normalize argument
3593 
3594     // don't emit event
3595     if (hci_stack->connectable == enable) return;
3596 
3597     hci_stack->connectable = enable;
3598     hci_update_scan_enable();
3599 }
3600 #endif
3601 
3602 void gap_local_bd_addr(bd_addr_t address_buffer){
3603     (void)memcpy(address_buffer, hci_stack->local_bd_addr, 6);
3604 }
3605 
3606 #ifdef ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL
3607 static void hci_host_num_completed_packets(void){
3608 
3609     // create packet manually as arrays are not supported and num_commands should not get reduced
3610     hci_reserve_packet_buffer();
3611     uint8_t * packet = hci_get_outgoing_packet_buffer();
3612 
3613     uint16_t size = 0;
3614     uint16_t num_handles = 0;
3615     packet[size++] = 0x35;
3616     packet[size++] = 0x0c;
3617     size++;  // skip param len
3618     size++;  // skip num handles
3619 
3620     // add { handle, packets } entries
3621     btstack_linked_item_t * it;
3622     for (it = (btstack_linked_item_t *) hci_stack->connections; it ; it = it->next){
3623         hci_connection_t * connection = (hci_connection_t *) it;
3624         if (connection->num_packets_completed){
3625             little_endian_store_16(packet, size, connection->con_handle);
3626             size += 2;
3627             little_endian_store_16(packet, size, connection->num_packets_completed);
3628             size += 2;
3629             //
3630             num_handles++;
3631             connection->num_packets_completed = 0;
3632         }
3633     }
3634 
3635     packet[2] = size - 3;
3636     packet[3] = num_handles;
3637 
3638     hci_stack->host_completed_packets = 0;
3639 
3640     hci_dump_packet(HCI_COMMAND_DATA_PACKET, 0, packet, size);
3641     hci_stack->hci_transport->send_packet(HCI_COMMAND_DATA_PACKET, packet, size);
3642 
3643     // release packet buffer for synchronous transport implementations
3644     if (hci_transport_synchronous()){
3645         hci_release_packet_buffer();
3646         hci_emit_transport_packet_sent();
3647     }
3648 }
3649 #endif
3650 
3651 static void hci_halting_timeout_handler(btstack_timer_source_t * ds){
3652     UNUSED(ds);
3653     hci_stack->substate = HCI_HALTING_CLOSE;
3654     // allow packet handlers to defer final shutdown
3655     hci_emit_state();
3656     hci_run();
3657 }
3658 
3659 static bool hci_run_acl_fragments(void){
3660     if (hci_stack->acl_fragmentation_total_size > 0u) {
3661         hci_con_handle_t con_handle = READ_ACL_CONNECTION_HANDLE(hci_stack->hci_packet_buffer);
3662         hci_connection_t *connection = hci_connection_for_handle(con_handle);
3663         if (connection) {
3664             if (hci_can_send_prepared_acl_packet_now(con_handle)){
3665                 hci_send_acl_packet_fragments(connection);
3666                 return true;
3667             }
3668         } else {
3669             // connection gone -> discard further fragments
3670             log_info("hci_run: fragmented ACL packet no connection -> discard fragment");
3671             hci_stack->acl_fragmentation_total_size = 0;
3672             hci_stack->acl_fragmentation_pos = 0;
3673         }
3674     }
3675     return false;
3676 }
3677 
3678 #ifdef ENABLE_CLASSIC
3679 static bool hci_run_general_gap_classic(void){
3680 
3681     // decline incoming connections
3682     if (hci_stack->decline_reason){
3683         uint8_t reason = hci_stack->decline_reason;
3684         hci_stack->decline_reason = 0;
3685         hci_send_cmd(&hci_reject_connection_request, hci_stack->decline_addr, reason);
3686         return true;
3687     }
3688     // send scan enable
3689     if ((hci_stack->state == HCI_STATE_WORKING) && (hci_stack->new_scan_enable_value != 0xff) && hci_classic_supported()){
3690         hci_send_cmd(&hci_write_scan_enable, hci_stack->new_scan_enable_value);
3691         hci_stack->new_scan_enable_value = 0xff;
3692         return true;
3693     }
3694     // start/stop inquiry
3695     if ((hci_stack->inquiry_state >= GAP_INQUIRY_DURATION_MIN) && (hci_stack->inquiry_state <= GAP_INQUIRY_DURATION_MAX)){
3696         uint8_t duration = hci_stack->inquiry_state;
3697         hci_stack->inquiry_state = GAP_INQUIRY_STATE_ACTIVE;
3698         hci_send_cmd(&hci_inquiry, GAP_IAC_GENERAL_INQUIRY, duration, 0);
3699         return true;
3700     }
3701     if (hci_stack->inquiry_state == GAP_INQUIRY_STATE_W2_CANCEL){
3702         hci_stack->inquiry_state = GAP_INQUIRY_STATE_W4_CANCELLED;
3703         hci_send_cmd(&hci_inquiry_cancel);
3704         return true;
3705     }
3706     // remote name request
3707     if (hci_stack->remote_name_state == GAP_REMOTE_NAME_STATE_W2_SEND){
3708         hci_stack->remote_name_state = GAP_REMOTE_NAME_STATE_W4_COMPLETE;
3709         hci_send_cmd(&hci_remote_name_request, hci_stack->remote_name_addr,
3710                      hci_stack->remote_name_page_scan_repetition_mode, 0, hci_stack->remote_name_clock_offset);
3711         return true;
3712     }
3713 #ifdef ENABLE_CLASSIC_PAIRING_OOB
3714     // Local OOB data
3715     if ((hci_stack->state == HCI_STATE_WORKING) && hci_stack->classic_read_local_oob_data){
3716         hci_stack->classic_read_local_oob_data = false;
3717         if (hci_stack->local_supported_commands[1] & 0x10u){
3718             hci_send_cmd(&hci_read_local_extended_oob_data);
3719         } else {
3720             hci_send_cmd(&hci_read_local_oob_data);
3721         }
3722     }
3723 #endif
3724     // pairing
3725     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE){
3726         uint8_t state = hci_stack->gap_pairing_state;
3727         hci_stack->gap_pairing_state = GAP_PAIRING_STATE_IDLE;
3728         switch (state){
3729             case GAP_PAIRING_STATE_SEND_PIN:
3730                 hci_send_cmd(&hci_pin_code_request_reply, hci_stack->gap_pairing_addr, hci_stack->gap_pairing_pin_len, hci_stack->gap_pairing_input.gap_pairing_pin);
3731                 break;
3732             case GAP_PAIRING_STATE_SEND_PIN_NEGATIVE:
3733                 hci_send_cmd(&hci_pin_code_request_negative_reply, hci_stack->gap_pairing_addr);
3734                 break;
3735             case GAP_PAIRING_STATE_SEND_PASSKEY:
3736                 hci_send_cmd(&hci_user_passkey_request_reply, hci_stack->gap_pairing_addr, hci_stack->gap_pairing_input.gap_pairing_passkey);
3737                 break;
3738             case GAP_PAIRING_STATE_SEND_PASSKEY_NEGATIVE:
3739                 hci_send_cmd(&hci_user_passkey_request_negative_reply, hci_stack->gap_pairing_addr);
3740                 break;
3741             case GAP_PAIRING_STATE_SEND_CONFIRMATION:
3742                 hci_send_cmd(&hci_user_confirmation_request_reply, hci_stack->gap_pairing_addr);
3743                 break;
3744             case GAP_PAIRING_STATE_SEND_CONFIRMATION_NEGATIVE:
3745                 hci_send_cmd(&hci_user_confirmation_request_negative_reply, hci_stack->gap_pairing_addr);
3746                 break;
3747             default:
3748                 break;
3749         }
3750         return true;
3751     }
3752     return false;
3753 }
3754 #endif
3755 
3756 #ifdef ENABLE_BLE
3757 static bool hci_run_general_gap_le(void){
3758 
3759     // advertisements, active scanning, and creating connections requires random address to be set if using private address
3760 
3761     if (hci_stack->state != HCI_STATE_WORKING) return false;
3762     if ( (hci_stack->le_own_addr_type != BD_ADDR_TYPE_LE_PUBLIC) && (hci_stack->le_random_address_set == 0u) ) return false;
3763 
3764 
3765     // Phase 1: collect what to stop
3766 
3767     bool scanning_stop = false;
3768     bool connecting_stop = false;
3769     bool advertising_stop = false;
3770 
3771 #ifndef ENABLE_LE_CENTRAL
3772     UNUSED(scanning_stop);
3773     UNUSED(connecting_stop);
3774 #endif
3775 #ifndef ENABLE_LE_PERIPHERAL
3776     UNUSED(advertising_stop);
3777 #endif
3778 
3779     // check if whitelist needs modification
3780     bool whitelist_modification_pending = false;
3781     btstack_linked_list_iterator_t lit;
3782     btstack_linked_list_iterator_init(&lit, &hci_stack->le_whitelist);
3783     while (btstack_linked_list_iterator_has_next(&lit)){
3784         whitelist_entry_t * entry = (whitelist_entry_t*) btstack_linked_list_iterator_next(&lit);
3785         if (entry->state & (LE_WHITELIST_REMOVE_FROM_CONTROLLER | LE_WHITELIST_ADD_TO_CONTROLLER)){
3786             whitelist_modification_pending = true;
3787             break;
3788         }
3789     }
3790     // check if resolving list needs modification
3791     bool resolving_list_modification_pending = false;
3792 #ifdef ENABLE_LE_PRIVACY_ADDRESS_RESOLUTION
3793     bool resolving_list_supported = (hci_stack->local_supported_commands[1] & (1 << 2)) != 0;
3794 	if (resolving_list_supported && hci_stack->le_resolving_list_state != LE_RESOLVING_LIST_DONE){
3795         resolving_list_modification_pending = true;
3796     }
3797 #endif
3798 
3799 #ifdef ENABLE_LE_CENTRAL
3800     // scanning control
3801     if (hci_stack->le_scanning_active) {
3802         // stop if:
3803         // - parameter change required
3804         // - it's disabled
3805         // - whitelist change required but used for scanning
3806         // - resolving list modified
3807         bool scanning_uses_whitelist = (hci_stack->le_scan_filter_policy & 1) == 1;
3808         if ((hci_stack->le_scanning_param_update) ||
3809             !hci_stack->le_scanning_enabled ||
3810             scanning_uses_whitelist ||
3811             resolving_list_modification_pending){
3812 
3813             scanning_stop = true;
3814         }
3815     }
3816 #endif
3817 
3818 #ifdef ENABLE_LE_CENTRAL
3819     // connecting control
3820     bool connecting_with_whitelist;
3821     switch (hci_stack->le_connecting_state){
3822         case LE_CONNECTING_DIRECT:
3823         case LE_CONNECTING_WHITELIST:
3824             // stop connecting if:
3825             // - connecting uses white and whitelist modification pending
3826             // - if it got disabled
3827             // - resolving list modified
3828             connecting_with_whitelist = hci_stack->le_connecting_state == LE_CONNECTING_WHITELIST;
3829             if ((connecting_with_whitelist && whitelist_modification_pending) ||
3830                 (hci_stack->le_connecting_request == LE_CONNECTING_IDLE) ||
3831                 resolving_list_modification_pending) {
3832 
3833                 connecting_stop = true;
3834             }
3835             break;
3836         default:
3837             break;
3838     }
3839 #endif
3840 
3841 #ifdef ENABLE_LE_PERIPHERAL
3842     // le advertisement control
3843     if (hci_stack->le_advertisements_active){
3844         // stop if:
3845         // - parameter change required
3846         // - it's disabled
3847         // - whitelist change required but used for advertisement filter policy
3848         // - resolving list modified
3849         bool advertising_uses_whitelist = hci_stack->le_advertisements_filter_policy > 0;
3850         if ((hci_stack->le_advertisements_todo != 0) ||
3851             !hci_stack->le_advertisements_enabled_for_current_roles ||
3852             (advertising_uses_whitelist & whitelist_modification_pending) ||
3853             resolving_list_modification_pending) {
3854 
3855             advertising_stop = true;
3856         }
3857     }
3858 #endif
3859 
3860 
3861     // Phase 2: stop everything that should be off during modifications
3862 
3863 #ifdef ENABLE_LE_CENTRAL
3864     if (scanning_stop){
3865         hci_stack->le_scanning_active = false;
3866         hci_send_cmd(&hci_le_set_scan_enable, 0, 0);
3867         return true;
3868     }
3869 #endif
3870 
3871 #ifdef ENABLE_LE_CENTRAL
3872     if (connecting_stop){
3873         hci_send_cmd(&hci_le_create_connection_cancel);
3874         return true;
3875     }
3876 #endif
3877 
3878 #ifdef ENABLE_LE_PERIPHERAL
3879     if (advertising_stop){
3880         hci_stack->le_advertisements_active = false;
3881         hci_send_cmd(&hci_le_set_advertise_enable, 0);
3882         return true;
3883     }
3884 #endif
3885 
3886     // Phase 3: modify
3887 
3888 #ifdef ENABLE_LE_CENTRAL
3889     if (hci_stack->le_scanning_param_update){
3890         hci_stack->le_scanning_param_update = false;
3891         hci_send_cmd(&hci_le_set_scan_parameters, hci_stack->le_scan_type, hci_stack->le_scan_interval, hci_stack->le_scan_window,
3892                      hci_stack->le_own_addr_type, hci_stack->le_scan_filter_policy);
3893         return true;
3894     }
3895 #endif
3896 
3897 #ifdef ENABLE_LE_PERIPHERAL
3898     if (hci_stack->le_advertisements_todo & LE_ADVERTISEMENT_TASKS_SET_PARAMS){
3899         hci_stack->le_advertisements_todo &= ~LE_ADVERTISEMENT_TASKS_SET_PARAMS;
3900         hci_send_cmd(&hci_le_set_advertising_parameters,
3901                      hci_stack->le_advertisements_interval_min,
3902                      hci_stack->le_advertisements_interval_max,
3903                      hci_stack->le_advertisements_type,
3904                      hci_stack->le_own_addr_type,
3905                      hci_stack->le_advertisements_direct_address_type,
3906                      hci_stack->le_advertisements_direct_address,
3907                      hci_stack->le_advertisements_channel_map,
3908                      hci_stack->le_advertisements_filter_policy);
3909         return true;
3910     }
3911     if (hci_stack->le_advertisements_todo & LE_ADVERTISEMENT_TASKS_SET_ADV_DATA){
3912         hci_stack->le_advertisements_todo &= ~LE_ADVERTISEMENT_TASKS_SET_ADV_DATA;
3913         uint8_t adv_data_clean[31];
3914         memset(adv_data_clean, 0, sizeof(adv_data_clean));
3915         (void)memcpy(adv_data_clean, hci_stack->le_advertisements_data,
3916                      hci_stack->le_advertisements_data_len);
3917         btstack_replace_bd_addr_placeholder(adv_data_clean, hci_stack->le_advertisements_data_len, hci_stack->local_bd_addr);
3918         hci_send_cmd(&hci_le_set_advertising_data, hci_stack->le_advertisements_data_len, adv_data_clean);
3919         return true;
3920     }
3921     if (hci_stack->le_advertisements_todo & LE_ADVERTISEMENT_TASKS_SET_SCAN_DATA){
3922         hci_stack->le_advertisements_todo &= ~LE_ADVERTISEMENT_TASKS_SET_SCAN_DATA;
3923         uint8_t scan_data_clean[31];
3924         memset(scan_data_clean, 0, sizeof(scan_data_clean));
3925         (void)memcpy(scan_data_clean, hci_stack->le_scan_response_data,
3926                      hci_stack->le_scan_response_data_len);
3927         btstack_replace_bd_addr_placeholder(scan_data_clean, hci_stack->le_scan_response_data_len, hci_stack->local_bd_addr);
3928         hci_send_cmd(&hci_le_set_scan_response_data, hci_stack->le_scan_response_data_len, scan_data_clean);
3929         return true;
3930     }
3931 #endif
3932 
3933 
3934 #ifdef ENABLE_LE_CENTRAL
3935     // if connect with whitelist was active and is not cancelled yet, wait until next time
3936     if (hci_stack->le_connecting_state == LE_CONNECTING_CANCEL) return false;
3937 #endif
3938 
3939     // LE Whitelist Management
3940     if (whitelist_modification_pending){
3941         // add/remove entries
3942         btstack_linked_list_iterator_init(&lit, &hci_stack->le_whitelist);
3943         while (btstack_linked_list_iterator_has_next(&lit)){
3944             whitelist_entry_t * entry = (whitelist_entry_t*) btstack_linked_list_iterator_next(&lit);
3945 			if (entry->state & LE_WHITELIST_REMOVE_FROM_CONTROLLER){
3946 				entry->state &= ~LE_WHITELIST_REMOVE_FROM_CONTROLLER;
3947 				hci_send_cmd(&hci_le_remove_device_from_white_list, entry->address_type, entry->address);
3948 				return true;
3949 			}
3950             if (entry->state & LE_WHITELIST_ADD_TO_CONTROLLER){
3951 				entry->state &= ~LE_WHITELIST_ADD_TO_CONTROLLER;
3952                 entry->state |= LE_WHITELIST_ON_CONTROLLER;
3953                 hci_send_cmd(&hci_le_add_device_to_white_list, entry->address_type, entry->address);
3954                 return true;
3955             }
3956             if ((entry->state & LE_WHITELIST_ON_CONTROLLER) == 0){
3957 				btstack_linked_list_remove(&hci_stack->le_whitelist, (btstack_linked_item_t *) entry);
3958 				btstack_memory_whitelist_entry_free(entry);
3959             }
3960         }
3961     }
3962 
3963 #ifdef ENABLE_LE_PRIVACY_ADDRESS_RESOLUTION
3964     // LE Resolving List Management
3965     if (resolving_list_supported) {
3966 		uint16_t i;
3967 		switch (hci_stack->le_resolving_list_state) {
3968 			case LE_RESOLVING_LIST_SEND_ENABLE_ADDRESS_RESOLUTION:
3969 				hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_READ_SIZE;
3970 				hci_send_cmd(&hci_le_set_address_resolution_enabled, 1);
3971 				return true;
3972 			case LE_RESOLVING_LIST_READ_SIZE:
3973 				hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_SEND_CLEAR;
3974 				hci_send_cmd(&hci_le_read_resolving_list_size);
3975 				return true;
3976 			case LE_RESOLVING_LIST_SEND_CLEAR:
3977 				hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_REMOVE_ENTRIES;
3978 				(void) memset(hci_stack->le_resolving_list_add_entries, 0xff,
3979 							  sizeof(hci_stack->le_resolving_list_add_entries));
3980 				(void) memset(hci_stack->le_resolving_list_remove_entries, 0,
3981 							  sizeof(hci_stack->le_resolving_list_remove_entries));
3982 				hci_send_cmd(&hci_le_clear_resolving_list);
3983 				return true;
3984 			case LE_RESOLVING_LIST_REMOVE_ENTRIES:
3985 				for (i = 0; i < MAX_NUM_RESOLVING_LIST_ENTRIES && i < le_device_db_max_count(); i++) {
3986 					uint8_t offset = i >> 3;
3987 					uint8_t mask = 1 << (i & 7);
3988 					if ((hci_stack->le_resolving_list_remove_entries[offset] & mask) == 0) continue;
3989 					hci_stack->le_resolving_list_remove_entries[offset] &= ~mask;
3990 					bd_addr_t peer_identity_addreses;
3991 					int peer_identity_addr_type = (int) BD_ADDR_TYPE_UNKNOWN;
3992 					sm_key_t peer_irk;
3993 					le_device_db_info(i, &peer_identity_addr_type, peer_identity_addreses, peer_irk);
3994 					if (peer_identity_addr_type == BD_ADDR_TYPE_UNKNOWN) continue;
3995 
3996 #ifdef ENABLE_LE_WHITELIST_TOUCH_AFTER_RESOLVING_LIST_UPDATE
3997 					// trigger whitelist entry 'update' (work around for controller bug)
3998 					btstack_linked_list_iterator_init(&lit, &hci_stack->le_whitelist);
3999 					while (btstack_linked_list_iterator_has_next(&lit)) {
4000 						whitelist_entry_t *entry = (whitelist_entry_t *) btstack_linked_list_iterator_next(&lit);
4001 						if (entry->address_type != peer_identity_addr_type) continue;
4002 						if (memcmp(entry->address, peer_identity_addreses, 6) != 0) continue;
4003 						log_info("trigger whitelist update %s", bd_addr_to_str(peer_identity_addreses));
4004 						entry->state |= LE_WHITELIST_REMOVE_FROM_CONTROLLER | LE_WHITELIST_ADD_TO_CONTROLLER;
4005 					}
4006 #endif
4007 
4008 					hci_send_cmd(&hci_le_remove_device_from_resolving_list, peer_identity_addr_type,
4009 								 peer_identity_addreses);
4010 					return true;
4011 				}
4012 
4013 				hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_ADD_ENTRIES;
4014 
4015 				/* fall through */
4016 
4017 			case LE_RESOLVING_LIST_ADD_ENTRIES:
4018 				for (i = 0; i < MAX_NUM_RESOLVING_LIST_ENTRIES && i < le_device_db_max_count(); i++) {
4019 					uint8_t offset = i >> 3;
4020 					uint8_t mask = 1 << (i & 7);
4021 					if ((hci_stack->le_resolving_list_add_entries[offset] & mask) == 0) continue;
4022 					hci_stack->le_resolving_list_add_entries[offset] &= ~mask;
4023 					bd_addr_t peer_identity_addreses;
4024 					int peer_identity_addr_type = (int) BD_ADDR_TYPE_UNKNOWN;
4025 					sm_key_t peer_irk;
4026 					le_device_db_info(i, &peer_identity_addr_type, peer_identity_addreses, peer_irk);
4027 					if (peer_identity_addr_type == BD_ADDR_TYPE_UNKNOWN) continue;
4028 					const uint8_t *local_irk = gap_get_persistent_irk();
4029 					// command uses format specifier 'P' that stores 16-byte value without flip
4030 					uint8_t local_irk_flipped[16];
4031 					uint8_t peer_irk_flipped[16];
4032 					reverse_128(local_irk, local_irk_flipped);
4033 					reverse_128(peer_irk, peer_irk_flipped);
4034 					hci_send_cmd(&hci_le_add_device_to_resolving_list, peer_identity_addr_type, peer_identity_addreses,
4035 								 peer_irk_flipped, local_irk_flipped);
4036 					return true;
4037 				}
4038 				hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_DONE;
4039 				break;
4040 
4041 			default:
4042 				break;
4043 		}
4044 	}
4045     hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_DONE;
4046 #endif
4047 
4048     // Phase 4: restore state
4049 
4050 #ifdef ENABLE_LE_CENTRAL
4051     // re-start scanning
4052     if ((hci_stack->le_scanning_enabled && !hci_stack->le_scanning_active)){
4053         hci_stack->le_scanning_active = true;
4054         hci_send_cmd(&hci_le_set_scan_enable, 1, 0);
4055         return true;
4056     }
4057 #endif
4058 
4059 #ifdef ENABLE_LE_CENTRAL
4060     // re-start connecting
4061     if ( (hci_stack->le_connecting_state == LE_CONNECTING_IDLE) && (hci_stack->le_connecting_request == LE_CONNECTING_WHITELIST)){
4062         bd_addr_t null_addr;
4063         memset(null_addr, 0, 6);
4064         hci_send_cmd(&hci_le_create_connection,
4065                      hci_stack->le_connection_scan_interval,    // scan interval: 60 ms
4066                      hci_stack->le_connection_scan_window,    // scan interval: 30 ms
4067                      1,         // use whitelist
4068                      0,         // peer address type
4069                      null_addr, // peer bd addr
4070                      hci_stack->le_own_addr_type, // our addr type:
4071                      hci_stack->le_connection_interval_min,    // conn interval min
4072                      hci_stack->le_connection_interval_max,    // conn interval max
4073                      hci_stack->le_connection_latency,         // conn latency
4074                      hci_stack->le_supervision_timeout,        // conn latency
4075                      hci_stack->le_minimum_ce_length,          // min ce length
4076                      hci_stack->le_maximum_ce_length           // max ce length
4077         );
4078         return true;
4079     }
4080 #endif
4081 
4082 #ifdef ENABLE_LE_PERIPHERAL
4083     // re-start advertising
4084     if (hci_stack->le_advertisements_enabled_for_current_roles && !hci_stack->le_advertisements_active){
4085         // check if advertisements should be enabled given
4086         hci_stack->le_advertisements_active = true;
4087         hci_send_cmd(&hci_le_set_advertise_enable, 1);
4088         return true;
4089     }
4090 #endif
4091 
4092     return false;
4093 }
4094 #endif
4095 
4096 static bool hci_run_general_pending_commands(void){
4097     btstack_linked_item_t * it;
4098     for (it = (btstack_linked_item_t *) hci_stack->connections; it != NULL; it = it->next){
4099         hci_connection_t * connection = (hci_connection_t *) it;
4100 
4101         switch(connection->state){
4102             case SEND_CREATE_CONNECTION:
4103                 switch(connection->address_type){
4104 #ifdef ENABLE_CLASSIC
4105                     case BD_ADDR_TYPE_ACL:
4106                         log_info("sending hci_create_connection");
4107                         hci_send_cmd(&hci_create_connection, connection->address, hci_usable_acl_packet_types(), 0, 0, 0, hci_stack->allow_role_switch);
4108                         break;
4109 #endif
4110                     default:
4111 #ifdef ENABLE_BLE
4112 #ifdef ENABLE_LE_CENTRAL
4113                         log_info("sending hci_le_create_connection");
4114                         hci_send_cmd(&hci_le_create_connection,
4115                                      hci_stack->le_connection_scan_interval,    // conn scan interval
4116                                      hci_stack->le_connection_scan_window,      // conn scan windows
4117                                      0,         // don't use whitelist
4118                                      connection->address_type, // peer address type
4119                                      connection->address,      // peer bd addr
4120                                      hci_stack->le_own_addr_type, // our addr type:
4121                                      hci_stack->le_connection_interval_min,    // conn interval min
4122                                      hci_stack->le_connection_interval_max,    // conn interval max
4123                                      hci_stack->le_connection_latency,         // conn latency
4124                                      hci_stack->le_supervision_timeout,        // conn latency
4125                                      hci_stack->le_minimum_ce_length,          // min ce length
4126                                      hci_stack->le_maximum_ce_length          // max ce length
4127                         );
4128                         connection->state = SENT_CREATE_CONNECTION;
4129 #endif
4130 #endif
4131                         break;
4132                 }
4133                 return true;
4134 
4135 #ifdef ENABLE_CLASSIC
4136             case RECEIVED_CONNECTION_REQUEST:
4137                 connection->role  = HCI_ROLE_SLAVE;
4138                 if (connection->address_type == BD_ADDR_TYPE_ACL){
4139                     log_info("sending hci_accept_connection_request");
4140                     connection->state = ACCEPTED_CONNECTION_REQUEST;
4141                     hci_send_cmd(&hci_accept_connection_request, connection->address, hci_stack->master_slave_policy);
4142                 }
4143                 return true;
4144 #endif
4145 
4146 #ifdef ENABLE_BLE
4147 #ifdef ENABLE_LE_CENTRAL
4148             case SEND_CANCEL_CONNECTION:
4149                 connection->state = SENT_CANCEL_CONNECTION;
4150                 hci_send_cmd(&hci_le_create_connection_cancel);
4151                 return true;
4152 #endif
4153 #endif
4154             case SEND_DISCONNECT:
4155                 connection->state = SENT_DISCONNECT;
4156                 hci_send_cmd(&hci_disconnect, connection->con_handle, ERROR_CODE_REMOTE_USER_TERMINATED_CONNECTION);
4157                 return true;
4158 
4159             default:
4160                 break;
4161         }
4162 
4163         // no further commands if connection is about to get shut down
4164         if (connection->state == SENT_DISCONNECT) continue;
4165 
4166         if (connection->authentication_flags & READ_RSSI){
4167             connectionClearAuthenticationFlags(connection, READ_RSSI);
4168             hci_send_cmd(&hci_read_rssi, connection->con_handle);
4169             return true;
4170         }
4171 
4172 #ifdef ENABLE_CLASSIC
4173 
4174         if (connection->authentication_flags & WRITE_SUPERVISION_TIMEOUT){
4175             connectionClearAuthenticationFlags(connection, WRITE_SUPERVISION_TIMEOUT);
4176             hci_send_cmd(&hci_write_link_supervision_timeout, connection->con_handle, hci_stack->link_supervision_timeout);
4177             return true;
4178         }
4179 
4180         if (connection->authentication_flags & HANDLE_LINK_KEY_REQUEST){
4181             log_info("responding to link key request, have link key db: %u", hci_stack->link_key_db != NULL);
4182             connectionClearAuthenticationFlags(connection, HANDLE_LINK_KEY_REQUEST);
4183 
4184             link_key_t link_key;
4185             link_key_type_t link_key_type;
4186             bool have_link_key = hci_stack->link_key_db && hci_stack->link_key_db->get_link_key(connection->address, link_key, &link_key_type);
4187 
4188             const uint16_t sc_enabled_mask = BONDING_REMOTE_SUPPORTS_SC_HOST | BONDING_REMOTE_SUPPORTS_SC_CONTROLLER;
4189             bool sc_enabled_remote = (connection->bonding_flags & sc_enabled_mask) == sc_enabled_mask;
4190             bool sc_downgrade = have_link_key && (gap_secure_connection_for_link_key_type(link_key_type) == 1) && !sc_enabled_remote;
4191             if (sc_downgrade){
4192                 log_info("Link key based on SC, but remote does not support SC -> disconnect");
4193                 connection->state = SENT_DISCONNECT;
4194                 hci_send_cmd(&hci_disconnect, connection->con_handle, ERROR_CODE_AUTHENTICATION_FAILURE);
4195                 return true;
4196             }
4197 
4198             bool security_level_sufficient = have_link_key && (gap_security_level_for_link_key_type(link_key_type) >= connection->requested_security_level);
4199             if (have_link_key && security_level_sufficient){
4200                 connection->link_key_type = link_key_type;
4201                 hci_send_cmd(&hci_link_key_request_reply, connection->address, &link_key);
4202             } else {
4203                 hci_send_cmd(&hci_link_key_request_negative_reply, connection->address);
4204             }
4205             return true;
4206         }
4207 
4208         if (connection->authentication_flags & DENY_PIN_CODE_REQUEST){
4209             log_info("denying to pin request");
4210             connectionClearAuthenticationFlags(connection, DENY_PIN_CODE_REQUEST);
4211             hci_send_cmd(&hci_pin_code_request_negative_reply, connection->address);
4212             return true;
4213         }
4214 
4215         if (connection->authentication_flags & SEND_IO_CAPABILITIES_REPLY){
4216             connectionClearAuthenticationFlags(connection, SEND_IO_CAPABILITIES_REPLY);
4217             log_info("IO Capability Request received, stack bondable %u, io cap %u", hci_stack->bondable, hci_stack->ssp_io_capability);
4218             if (hci_stack->bondable && (hci_stack->ssp_io_capability != SSP_IO_CAPABILITY_UNKNOWN)){
4219                 // tweak authentication requirements
4220                 uint8_t authreq = hci_stack->ssp_authentication_requirement;
4221                 if (connection->bonding_flags & BONDING_DEDICATED){
4222                     authreq = SSP_IO_AUTHREQ_MITM_PROTECTION_NOT_REQUIRED_DEDICATED_BONDING;
4223                 }
4224                 if (gap_mitm_protection_required_for_security_level(connection->requested_security_level)){
4225                     authreq |= 1;
4226                 }
4227                 uint8_t have_oob_data = 0;
4228 #ifdef ENABLE_CLASSIC_PAIRING_OOB
4229                 if (connection->classic_oob_c_192 != NULL){
4230                     have_oob_data |= 1;
4231                 }
4232                 if (connection->classic_oob_c_256 != NULL){
4233                     have_oob_data |= 2;
4234                 }
4235 #endif
4236                 hci_send_cmd(&hci_io_capability_request_reply, &connection->address, hci_stack->ssp_io_capability, have_oob_data, authreq);
4237             } else {
4238                 hci_send_cmd(&hci_io_capability_request_negative_reply, &connection->address, ERROR_CODE_PAIRING_NOT_ALLOWED);
4239             }
4240             return true;
4241         }
4242 
4243 #ifdef ENABLE_CLASSIC_PAIRING_OOB
4244         if (connection->authentication_flags & SEND_REMOTE_OOB_DATA_REPLY){
4245             connectionClearAuthenticationFlags(connection, SEND_REMOTE_OOB_DATA_REPLY);
4246             const uint8_t zero[16] = { 0 };
4247             const uint8_t * r_192 = zero;
4248             const uint8_t * c_192 = zero;
4249             const uint8_t * r_256 = zero;
4250             const uint8_t * c_256 = zero;
4251             // verify P-256 OOB
4252             if ((connection->classic_oob_c_256 != NULL) && ((hci_stack->local_supported_commands[1] & 0x08u) != 0)) {
4253                 c_256 = connection->classic_oob_c_256;
4254                 if (connection->classic_oob_r_256 != NULL) {
4255                     r_256 = connection->classic_oob_r_256;
4256                 }
4257             }
4258             // verify P-192 OOB
4259             if ((connection->classic_oob_c_192 != NULL)) {
4260                 c_192 = connection->classic_oob_c_192;
4261                 if (connection->classic_oob_r_192 != NULL) {
4262                     r_192 = connection->classic_oob_r_192;
4263                 }
4264             }
4265             // Reply
4266             if (c_256 != zero) {
4267                 hci_send_cmd(&hci_remote_oob_extended_data_request_reply, &connection->address, c_192, r_192, c_256, r_256);
4268             } else if (c_192 != zero){
4269                 hci_send_cmd(&hci_remote_oob_data_request_reply, &connection->address, c_192, r_192);
4270             } else {
4271                 hci_send_cmd(&hci_remote_oob_data_request_negative_reply, &connection->address);
4272             }
4273             return true;
4274         }
4275 #endif
4276 
4277         if (connection->authentication_flags & SEND_USER_CONFIRM_REPLY){
4278             connectionClearAuthenticationFlags(connection, SEND_USER_CONFIRM_REPLY);
4279             hci_send_cmd(&hci_user_confirmation_request_reply, &connection->address);
4280             return true;
4281         }
4282 
4283         if (connection->authentication_flags & SEND_USER_PASSKEY_REPLY){
4284             connectionClearAuthenticationFlags(connection, SEND_USER_PASSKEY_REPLY);
4285             hci_send_cmd(&hci_user_passkey_request_reply, &connection->address, 000000);
4286             return true;
4287         }
4288 
4289         if (connection->bonding_flags & BONDING_REQUEST_REMOTE_FEATURES_PAGE_0){
4290             connection->bonding_flags &= ~BONDING_REQUEST_REMOTE_FEATURES_PAGE_0;
4291             hci_send_cmd(&hci_read_remote_supported_features_command, connection->con_handle);
4292             return true;
4293         }
4294 
4295         if (connection->bonding_flags & BONDING_REQUEST_REMOTE_FEATURES_PAGE_1){
4296             connection->bonding_flags &= ~BONDING_REQUEST_REMOTE_FEATURES_PAGE_1;
4297             hci_send_cmd(&hci_read_remote_extended_features_command, connection->con_handle, 1);
4298             return true;
4299         }
4300 
4301         if (connection->bonding_flags & BONDING_REQUEST_REMOTE_FEATURES_PAGE_2){
4302             connection->bonding_flags &= ~BONDING_REQUEST_REMOTE_FEATURES_PAGE_2;
4303             hci_send_cmd(&hci_read_remote_extended_features_command, connection->con_handle, 2);
4304             return true;
4305         }
4306 
4307         if (connection->bonding_flags & BONDING_DISCONNECT_DEDICATED_DONE){
4308             connection->bonding_flags &= ~BONDING_DISCONNECT_DEDICATED_DONE;
4309             connection->bonding_flags |= BONDING_EMIT_COMPLETE_ON_DISCONNECT;
4310             connection->state = SENT_DISCONNECT;
4311             hci_send_cmd(&hci_disconnect, connection->con_handle, ERROR_CODE_REMOTE_USER_TERMINATED_CONNECTION);
4312             return true;
4313         }
4314 
4315         if (connection->bonding_flags & BONDING_SEND_AUTHENTICATE_REQUEST){
4316             connection->bonding_flags &= ~BONDING_SEND_AUTHENTICATE_REQUEST;
4317             connection->bonding_flags |= BONDING_SENT_AUTHENTICATE_REQUEST;
4318             hci_send_cmd(&hci_authentication_requested, connection->con_handle);
4319             return true;
4320         }
4321 
4322         if (connection->bonding_flags & BONDING_SEND_ENCRYPTION_REQUEST){
4323             connection->bonding_flags &= ~BONDING_SEND_ENCRYPTION_REQUEST;
4324             hci_send_cmd(&hci_set_connection_encryption, connection->con_handle, 1);
4325             return true;
4326         }
4327         if (connection->bonding_flags & BONDING_SEND_READ_ENCRYPTION_KEY_SIZE){
4328             connection->bonding_flags &= ~BONDING_SEND_READ_ENCRYPTION_KEY_SIZE;
4329             hci_send_cmd(&hci_read_encryption_key_size, connection->con_handle, 1);
4330             return true;
4331         }
4332 #endif
4333 
4334         if (connection->bonding_flags & BONDING_DISCONNECT_SECURITY_BLOCK){
4335             connection->bonding_flags &= ~BONDING_DISCONNECT_SECURITY_BLOCK;
4336             if (connection->state != SENT_DISCONNECT){
4337                 connection->state = SENT_DISCONNECT;
4338                 hci_send_cmd(&hci_disconnect, connection->con_handle, ERROR_CODE_AUTHENTICATION_FAILURE);
4339                 return true;
4340             }
4341         }
4342 
4343 #ifdef ENABLE_CLASSIC
4344         uint16_t sniff_min_interval;
4345         switch (connection->sniff_min_interval){
4346             case 0:
4347                 break;
4348             case 0xffff:
4349                 connection->sniff_min_interval = 0;
4350                 hci_send_cmd(&hci_exit_sniff_mode, connection->con_handle);
4351                 return true;
4352             default:
4353                 sniff_min_interval = connection->sniff_min_interval;
4354                 connection->sniff_min_interval = 0;
4355                 hci_send_cmd(&hci_sniff_mode, connection->con_handle, connection->sniff_max_interval, sniff_min_interval, connection->sniff_attempt, connection->sniff_timeout);
4356                 return true;
4357         }
4358 
4359         if (connection->request_role != HCI_ROLE_INVALID){
4360             hci_role_t  role = connection->request_role;
4361             connection->request_role = HCI_ROLE_INVALID;
4362             hci_send_cmd(&hci_switch_role_command, connection->address, role);
4363             return true;
4364         }
4365 #endif
4366 
4367 #ifdef ENABLE_BLE
4368         switch (connection->le_con_parameter_update_state){
4369             // response to L2CAP CON PARAMETER UPDATE REQUEST
4370             case CON_PARAMETER_UPDATE_CHANGE_HCI_CON_PARAMETERS:
4371                 connection->le_con_parameter_update_state = CON_PARAMETER_UPDATE_NONE;
4372                 hci_send_cmd(&hci_le_connection_update, connection->con_handle, connection->le_conn_interval_min,
4373                              connection->le_conn_interval_max, connection->le_conn_latency, connection->le_supervision_timeout,
4374                              0x0000, 0xffff);
4375                 return true;
4376             case CON_PARAMETER_UPDATE_REPLY:
4377                 connection->le_con_parameter_update_state = CON_PARAMETER_UPDATE_NONE;
4378                 hci_send_cmd(&hci_le_remote_connection_parameter_request_reply, connection->con_handle, connection->le_conn_interval_min,
4379                              connection->le_conn_interval_max, connection->le_conn_latency, connection->le_supervision_timeout,
4380                              0x0000, 0xffff);
4381                 return true;
4382             case CON_PARAMETER_UPDATE_NEGATIVE_REPLY:
4383                 connection->le_con_parameter_update_state = CON_PARAMETER_UPDATE_NONE;
4384                 hci_send_cmd(&hci_le_remote_connection_parameter_request_negative_reply, ERROR_CODE_UNSUPPORTED_LMP_PARAMETER_VALUE_UNSUPPORTED_LL_PARAMETER_VALUE);
4385                 return true;
4386             default:
4387                 break;
4388         }
4389         if (connection->le_phy_update_all_phys != 0xffu){
4390             uint8_t all_phys = connection->le_phy_update_all_phys;
4391             connection->le_phy_update_all_phys = 0xff;
4392             hci_send_cmd(&hci_le_set_phy, connection->con_handle, all_phys, connection->le_phy_update_tx_phys, connection->le_phy_update_rx_phys, connection->le_phy_update_phy_options);
4393             return true;
4394         }
4395 #endif
4396     }
4397     return false;
4398 }
4399 
4400 static void hci_run(void){
4401 
4402     bool done;
4403 
4404     // send continuation fragments first, as they block the prepared packet buffer
4405     done = hci_run_acl_fragments();
4406     if (done) return;
4407 
4408 #ifdef ENABLE_HCI_CONTROLLER_TO_HOST_FLOW_CONTROL
4409     // send host num completed packets next as they don't require num_cmd_packets > 0
4410     if (!hci_can_send_comand_packet_transport()) return;
4411     if (hci_stack->host_completed_packets){
4412         hci_host_num_completed_packets();
4413         return;
4414     }
4415 #endif
4416 
4417     if (!hci_can_send_command_packet_now()) return;
4418 
4419     // global/non-connection oriented commands
4420 
4421 
4422 #ifdef ENABLE_CLASSIC
4423     // general gap classic
4424     done = hci_run_general_gap_classic();
4425     if (done) return;
4426 #endif
4427 
4428 #ifdef ENABLE_BLE
4429     // general gap le
4430     done = hci_run_general_gap_le();
4431     if (done) return;
4432 #endif
4433 
4434     // send pending HCI commands
4435     done = hci_run_general_pending_commands();
4436     if (done) return;
4437 
4438     // stack state sub statemachines
4439     hci_connection_t * connection;
4440     switch (hci_stack->state){
4441         case HCI_STATE_INITIALIZING:
4442             hci_initializing_run();
4443             break;
4444 
4445         case HCI_STATE_HALTING:
4446 
4447             log_info("HCI_STATE_HALTING, substate %x\n", hci_stack->substate);
4448             switch (hci_stack->substate){
4449                 case HCI_HALTING_DISCONNECT_ALL_NO_TIMER:
4450                 case HCI_HALTING_DISCONNECT_ALL_TIMER:
4451 
4452 #ifdef ENABLE_BLE
4453 #ifdef ENABLE_LE_CENTRAL
4454                     // free whitelist entries
4455                     {
4456                         btstack_linked_list_iterator_t lit;
4457                         btstack_linked_list_iterator_init(&lit, &hci_stack->le_whitelist);
4458                         while (btstack_linked_list_iterator_has_next(&lit)){
4459                             whitelist_entry_t * entry = (whitelist_entry_t*) btstack_linked_list_iterator_next(&lit);
4460                             btstack_linked_list_remove(&hci_stack->le_whitelist, (btstack_linked_item_t *) entry);
4461                             btstack_memory_whitelist_entry_free(entry);
4462                         }
4463                     }
4464 #endif
4465 #endif
4466                     // close all open connections
4467                     connection =  (hci_connection_t *) hci_stack->connections;
4468                     if (connection){
4469                         hci_con_handle_t con_handle = (uint16_t) connection->con_handle;
4470                         if (!hci_can_send_command_packet_now()) return;
4471 
4472                         // check state
4473                         if (connection->state == SENT_DISCONNECT) return;
4474                         connection->state = SENT_DISCONNECT;
4475 
4476                         log_info("HCI_STATE_HALTING, connection %p, handle %u", connection, con_handle);
4477 
4478                         // cancel all l2cap connections right away instead of waiting for disconnection complete event ...
4479                         hci_emit_disconnection_complete(con_handle, 0x16); // terminated by local host
4480 
4481                         // ... which would be ignored anyway as we shutdown (free) the connection now
4482                         hci_shutdown_connection(connection);
4483 
4484                         // finally, send the disconnect command
4485                         hci_send_cmd(&hci_disconnect, con_handle, ERROR_CODE_REMOTE_USER_TERMINATED_CONNECTION);
4486                         return;
4487                     }
4488 
4489                     if (hci_stack->substate == HCI_HALTING_DISCONNECT_ALL_TIMER){
4490                         // no connections left, wait a bit to assert that btstack_cyrpto isn't waiting for an HCI event
4491                         log_info("HCI_STATE_HALTING: wait 50 ms");
4492                         hci_stack->substate = HCI_HALTING_W4_TIMER;
4493                         btstack_run_loop_set_timer(&hci_stack->timeout, 50);
4494                         btstack_run_loop_set_timer_handler(&hci_stack->timeout, hci_halting_timeout_handler);
4495                         btstack_run_loop_add_timer(&hci_stack->timeout);
4496                         break;
4497                     }
4498 
4499                     /* fall through */
4500 
4501                 case HCI_HALTING_CLOSE:
4502                     log_info("HCI_STATE_HALTING, calling off");
4503 
4504                     // switch mode
4505                     hci_power_control_off();
4506 
4507                     log_info("HCI_STATE_HALTING, emitting state");
4508                     hci_emit_state();
4509                     log_info("HCI_STATE_HALTING, done");
4510                     break;
4511 
4512                 case HCI_HALTING_W4_TIMER:
4513                     // keep waiting
4514 
4515                     break;
4516                 default:
4517                     break;
4518             }
4519 
4520             break;
4521 
4522         case HCI_STATE_FALLING_ASLEEP:
4523             switch(hci_stack->substate) {
4524                 case HCI_FALLING_ASLEEP_DISCONNECT:
4525                     log_info("HCI_STATE_FALLING_ASLEEP");
4526                     // close all open connections
4527                     connection =  (hci_connection_t *) hci_stack->connections;
4528 
4529 #ifdef HAVE_PLATFORM_IPHONE_OS
4530                     // don't close connections, if H4 supports power management
4531                     if (btstack_control_iphone_power_management_enabled()){
4532                         connection = NULL;
4533                     }
4534 #endif
4535                     if (connection){
4536 
4537                         // send disconnect
4538                         if (!hci_can_send_command_packet_now()) return;
4539 
4540                         log_info("HCI_STATE_FALLING_ASLEEP, connection %p, handle %u", connection, (uint16_t)connection->con_handle);
4541                         hci_send_cmd(&hci_disconnect, connection->con_handle, ERROR_CODE_REMOTE_USER_TERMINATED_CONNECTION);
4542 
4543                         // send disconnected event right away - causes higher layer connections to get closed, too.
4544                         hci_shutdown_connection(connection);
4545                         return;
4546                     }
4547 
4548                     if (hci_classic_supported()){
4549                         // disable page and inquiry scan
4550                         if (!hci_can_send_command_packet_now()) return;
4551 
4552                         log_info("HCI_STATE_HALTING, disabling inq scans");
4553                         hci_send_cmd(&hci_write_scan_enable, hci_stack->connectable << 1); // drop inquiry scan but keep page scan
4554 
4555                         // continue in next sub state
4556                         hci_stack->substate = HCI_FALLING_ASLEEP_W4_WRITE_SCAN_ENABLE;
4557                         break;
4558                     }
4559 
4560                     /* fall through */
4561 
4562                 case HCI_FALLING_ASLEEP_COMPLETE:
4563                     log_info("HCI_STATE_HALTING, calling sleep");
4564 #ifdef HAVE_PLATFORM_IPHONE_OS
4565                     // don't actually go to sleep, if H4 supports power management
4566                     if (btstack_control_iphone_power_management_enabled()){
4567                         // SLEEP MODE reached
4568                         hci_stack->state = HCI_STATE_SLEEPING;
4569                         hci_emit_state();
4570                         break;
4571                     }
4572 #endif
4573                     // switch mode
4574                     hci_power_control_sleep();  // changes hci_stack->state to SLEEP
4575                     hci_emit_state();
4576                     break;
4577 
4578                 default:
4579                     break;
4580             }
4581             break;
4582 
4583         default:
4584             break;
4585     }
4586 }
4587 
4588 int hci_send_cmd_packet(uint8_t *packet, int size){
4589     // house-keeping
4590 
4591 #ifdef ENABLE_CLASSIC
4592     bd_addr_t addr;
4593     hci_connection_t * conn;
4594 #endif
4595 #ifdef ENABLE_LE_CENTRAL
4596     uint8_t initiator_filter_policy;
4597 #endif
4598 
4599     uint16_t opcode = little_endian_read_16(packet, 0);
4600     switch (opcode) {
4601         case HCI_OPCODE_HCI_WRITE_LOOPBACK_MODE:
4602             hci_stack->loopback_mode = packet[3];
4603             break;
4604 
4605 #ifdef ENABLE_CLASSIC
4606         case HCI_OPCODE_HCI_CREATE_CONNECTION:
4607             reverse_bd_addr(&packet[3], addr);
4608             log_info("Create_connection to %s", bd_addr_to_str(addr));
4609 
4610             conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
4611             if (!conn) {
4612                 conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
4613                 if (!conn) {
4614                     // notify client that alloc failed
4615                     hci_emit_connection_complete(addr, 0, BTSTACK_MEMORY_ALLOC_FAILED);
4616                     return -1; // packet not sent to controller
4617                 }
4618                 conn->state = SEND_CREATE_CONNECTION;
4619                 conn->role  = HCI_ROLE_MASTER;
4620             }
4621             log_info("conn state %u", conn->state);
4622             switch (conn->state) {
4623                 // if connection active exists
4624                 case OPEN:
4625                     // and OPEN, emit connection complete command
4626                     hci_emit_connection_complete(addr, conn->con_handle, 0);
4627                     return -1; // packet not sent to controller
4628                 case RECEIVED_DISCONNECTION_COMPLETE:
4629                     // create connection triggered in disconnect complete event, let's do it now
4630                     break;
4631                 case SEND_CREATE_CONNECTION:
4632                     // connection created by hci, e.g. dedicated bonding, but not executed yet, let's do it now
4633                     break;
4634                 default:
4635                     // otherwise, just ignore as it is already in the open process
4636                     return -1; // packet not sent to controller
4637             }
4638             conn->state = SENT_CREATE_CONNECTION;
4639 
4640             // track outgoing connection
4641             hci_stack->outgoing_addr_type = BD_ADDR_TYPE_ACL;
4642             (void) memcpy(hci_stack->outgoing_addr, addr, 6);
4643             break;
4644         case HCI_OPCODE_HCI_LINK_KEY_REQUEST_REPLY:
4645             hci_add_connection_flags_for_flipped_bd_addr(&packet[3], SENT_LINK_KEY_REPLY);
4646             break;
4647         case HCI_OPCODE_HCI_LINK_KEY_REQUEST_NEGATIVE_REPLY:
4648             hci_add_connection_flags_for_flipped_bd_addr(&packet[3], SENT_LINK_KEY_NEGATIVE_REQUEST);
4649             break;
4650         case HCI_OPCODE_HCI_DELETE_STORED_LINK_KEY:
4651             if (hci_stack->link_key_db) {
4652                 reverse_bd_addr(&packet[3], addr);
4653                 hci_stack->link_key_db->delete_link_key(addr);
4654             }
4655             break;
4656         case HCI_OPCODE_HCI_PIN_CODE_REQUEST_NEGATIVE_REPLY:
4657         case HCI_OPCODE_HCI_PIN_CODE_REQUEST_REPLY:
4658             reverse_bd_addr(&packet[3], addr);
4659             conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
4660             if (conn) {
4661                 connectionClearAuthenticationFlags(conn, LEGACY_PAIRING_ACTIVE);
4662             }
4663             break;
4664         case HCI_OPCODE_HCI_USER_CONFIRMATION_REQUEST_NEGATIVE_REPLY:
4665         case HCI_OPCODE_HCI_USER_CONFIRMATION_REQUEST_REPLY:
4666         case HCI_OPCODE_HCI_USER_PASSKEY_REQUEST_NEGATIVE_REPLY:
4667         case HCI_OPCODE_HCI_USER_PASSKEY_REQUEST_REPLY:
4668             reverse_bd_addr(&packet[3], addr);
4669             conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
4670             if (conn) {
4671                 connectionClearAuthenticationFlags(conn, SSP_PAIRING_ACTIVE);
4672             }
4673             break;
4674 
4675 #ifdef ENABLE_SCO_OVER_HCI
4676         case HCI_OPCODE_HCI_SETUP_SYNCHRONOUS_CONNECTION:
4677             // setup_synchronous_connection? Voice setting at offset 22
4678             // TODO: compare to current setting if sco connection already active
4679             hci_stack->sco_voice_setting_active = little_endian_read_16(packet, 15);
4680             break;
4681         case HCI_OPCODE_HCI_ACCEPT_SYNCHRONOUS_CONNECTION:
4682             // accept_synchronus_connection? Voice setting at offset 18
4683             // TODO: compare to current setting if sco connection already active
4684             hci_stack->sco_voice_setting_active = little_endian_read_16(packet, 19);
4685             break;
4686 #endif
4687 #endif
4688 
4689 #ifdef ENABLE_BLE
4690         case HCI_OPCODE_HCI_LE_SET_RANDOM_ADDRESS:
4691             hci_stack->le_random_address_set = 1;
4692             reverse_bd_addr(&packet[3], hci_stack->le_random_address);
4693             break;
4694 #ifdef ENABLE_LE_PERIPHERAL
4695         case HCI_OPCODE_HCI_LE_SET_ADVERTISE_ENABLE:
4696             hci_stack->le_advertisements_active = packet[3] != 0;
4697             break;
4698 #endif
4699 #ifdef ENABLE_LE_CENTRAL
4700         case HCI_OPCODE_HCI_LE_CREATE_CONNECTION:
4701             // white list used?
4702             initiator_filter_policy = packet[7];
4703             switch (initiator_filter_policy) {
4704                 case 0:
4705                     // whitelist not used
4706                     hci_stack->le_connecting_state = LE_CONNECTING_DIRECT;
4707                     break;
4708                 case 1:
4709                     hci_stack->le_connecting_state = LE_CONNECTING_WHITELIST;
4710                     break;
4711                 default:
4712                     log_error("Invalid initiator_filter_policy in LE Create Connection %u", initiator_filter_policy);
4713                     break;
4714             }
4715             // track outgoing connection
4716             hci_stack->outgoing_addr_type = (bd_addr_type_t) packet[8]; // peer addres type
4717             reverse_bd_addr( &packet[9], hci_stack->outgoing_addr); // peer address
4718             break;
4719         case HCI_OPCODE_HCI_LE_CREATE_CONNECTION_CANCEL:
4720             hci_stack->le_connecting_state = LE_CONNECTING_CANCEL;
4721             break;
4722 #endif
4723 #endif
4724         default:
4725             break;
4726     }
4727 
4728     hci_stack->num_cmd_packets--;
4729 
4730     hci_dump_packet(HCI_COMMAND_DATA_PACKET, 0, packet, size);
4731     return hci_stack->hci_transport->send_packet(HCI_COMMAND_DATA_PACKET, packet, size);
4732 }
4733 
4734 // disconnect because of security block
4735 void hci_disconnect_security_block(hci_con_handle_t con_handle){
4736     hci_connection_t * connection = hci_connection_for_handle(con_handle);
4737     if (!connection) return;
4738     connection->bonding_flags |= BONDING_DISCONNECT_SECURITY_BLOCK;
4739 }
4740 
4741 
4742 // Configure Secure Simple Pairing
4743 
4744 #ifdef ENABLE_CLASSIC
4745 
4746 // enable will enable SSP during init
4747 void gap_ssp_set_enable(int enable){
4748     hci_stack->ssp_enable = enable;
4749 }
4750 
4751 static int hci_local_ssp_activated(void){
4752     return gap_ssp_supported() && hci_stack->ssp_enable;
4753 }
4754 
4755 // if set, BTstack will respond to io capability request using authentication requirement
4756 void gap_ssp_set_io_capability(int io_capability){
4757     hci_stack->ssp_io_capability = io_capability;
4758 }
4759 void gap_ssp_set_authentication_requirement(int authentication_requirement){
4760     hci_stack->ssp_authentication_requirement = authentication_requirement;
4761 }
4762 
4763 // if set, BTstack will confirm a numberic comparion and enter '000000' if requested
4764 void gap_ssp_set_auto_accept(int auto_accept){
4765     hci_stack->ssp_auto_accept = auto_accept;
4766 }
4767 
4768 void gap_secure_connections_enable(bool enable){
4769     hci_stack->secure_connections_enable = enable;
4770 }
4771 
4772 #endif
4773 
4774 // va_list part of hci_send_cmd
4775 int hci_send_cmd_va_arg(const hci_cmd_t *cmd, va_list argptr){
4776     if (!hci_can_send_command_packet_now()){
4777         log_error("hci_send_cmd called but cannot send packet now");
4778         return 0;
4779     }
4780 
4781     // for HCI INITIALIZATION
4782     // log_info("hci_send_cmd: opcode %04x", cmd->opcode);
4783     hci_stack->last_cmd_opcode = cmd->opcode;
4784 
4785     hci_reserve_packet_buffer();
4786     uint8_t * packet = hci_stack->hci_packet_buffer;
4787     uint16_t size = hci_cmd_create_from_template(packet, cmd, argptr);
4788     int err = hci_send_cmd_packet(packet, size);
4789 
4790     // release packet buffer on error or for synchronous transport implementations
4791     if ((err < 0) || hci_transport_synchronous()){
4792         hci_release_packet_buffer();
4793         hci_emit_transport_packet_sent();
4794     }
4795 
4796     return err;
4797 }
4798 
4799 /**
4800  * pre: numcmds >= 0 - it's allowed to send a command to the controller
4801  */
4802 int hci_send_cmd(const hci_cmd_t *cmd, ...){
4803     va_list argptr;
4804     va_start(argptr, cmd);
4805     int res = hci_send_cmd_va_arg(cmd, argptr);
4806     va_end(argptr);
4807     return res;
4808 }
4809 
4810 // Create various non-HCI events.
4811 // TODO: generalize, use table similar to hci_create_command
4812 
4813 static void hci_emit_event(uint8_t * event, uint16_t size, int dump){
4814     // dump packet
4815     if (dump) {
4816         hci_dump_packet( HCI_EVENT_PACKET, 0, event, size);
4817     }
4818 
4819     // dispatch to all event handlers
4820     btstack_linked_list_iterator_t it;
4821     btstack_linked_list_iterator_init(&it, &hci_stack->event_handlers);
4822     while (btstack_linked_list_iterator_has_next(&it)){
4823         btstack_packet_callback_registration_t * entry = (btstack_packet_callback_registration_t*) btstack_linked_list_iterator_next(&it);
4824         entry->callback(HCI_EVENT_PACKET, 0, event, size);
4825     }
4826 }
4827 
4828 static void hci_emit_acl_packet(uint8_t * packet, uint16_t size){
4829     if (!hci_stack->acl_packet_handler) return;
4830     hci_stack->acl_packet_handler(HCI_ACL_DATA_PACKET, 0, packet, size);
4831 }
4832 
4833 #ifdef ENABLE_CLASSIC
4834 static void hci_notify_if_sco_can_send_now(void){
4835     // notify SCO sender if waiting
4836     if (!hci_stack->sco_waiting_for_can_send_now) return;
4837     if (hci_can_send_sco_packet_now()){
4838         hci_stack->sco_waiting_for_can_send_now = 0;
4839         uint8_t event[2] = { HCI_EVENT_SCO_CAN_SEND_NOW, 0 };
4840         hci_dump_packet(HCI_EVENT_PACKET, 1, event, sizeof(event));
4841         hci_stack->sco_packet_handler(HCI_EVENT_PACKET, 0, event, sizeof(event));
4842     }
4843 }
4844 
4845 // parsing end emitting has been merged to reduce code size
4846 static void gap_inquiry_explode(uint8_t *packet, uint16_t size) {
4847     uint8_t event[19+GAP_INQUIRY_MAX_NAME_LEN];
4848 
4849     uint8_t * eir_data;
4850     ad_context_t context;
4851     const uint8_t * name;
4852     uint8_t         name_len;
4853 
4854     if (size < 3) return;
4855 
4856     int event_type = hci_event_packet_get_type(packet);
4857     int num_reserved_fields = (event_type == HCI_EVENT_INQUIRY_RESULT) ? 2 : 1;    // 2 for old event, 1 otherwise
4858     int num_responses       = hci_event_inquiry_result_get_num_responses(packet);
4859 
4860     switch (event_type){
4861         case HCI_EVENT_INQUIRY_RESULT:
4862         case HCI_EVENT_INQUIRY_RESULT_WITH_RSSI:
4863             if (size != (3 + (num_responses * 14))) return;
4864             break;
4865         case HCI_EVENT_EXTENDED_INQUIRY_RESPONSE:
4866             if (size != 257) return;
4867             if (num_responses != 1) return;
4868             break;
4869         default:
4870             return;
4871     }
4872 
4873     // event[1] is set at the end
4874     int i;
4875     for (i=0; i<num_responses;i++){
4876         memset(event, 0, sizeof(event));
4877         event[0] = GAP_EVENT_INQUIRY_RESULT;
4878         uint8_t event_size = 18;    // if name is not set by EIR
4879 
4880         (void)memcpy(&event[2], &packet[3 + (i * 6)], 6); // bd_addr
4881         event[8] =          packet[3 + (num_responses*(6))                         + (i*1)];     // page_scan_repetition_mode
4882         (void)memcpy(&event[9],
4883                      &packet[3 + (num_responses * (6 + 1 + num_reserved_fields)) + (i * 3)],
4884                      3); // class of device
4885         (void)memcpy(&event[12],
4886                      &packet[3 + (num_responses * (6 + 1 + num_reserved_fields + 3)) + (i * 2)],
4887                      2); // clock offset
4888 
4889         switch (event_type){
4890             case HCI_EVENT_INQUIRY_RESULT:
4891                 // 14,15,16,17 = 0, size 18
4892                 break;
4893             case HCI_EVENT_INQUIRY_RESULT_WITH_RSSI:
4894                 event[14] = 1;
4895                 event[15] = packet [3 + (num_responses*(6+1+num_reserved_fields+3+2)) + (i*1)]; // rssi
4896                 // 16,17 = 0, size 18
4897                 break;
4898             case HCI_EVENT_EXTENDED_INQUIRY_RESPONSE:
4899                 event[14] = 1;
4900                 event[15] = packet [3 + (num_responses*(6+1+num_reserved_fields+3+2)) + (i*1)]; // rssi
4901                 // EIR packets only contain a single inquiry response
4902                 eir_data = &packet[3 + (6+1+num_reserved_fields+3+2+1)];
4903                 name = NULL;
4904                 // Iterate over EIR data
4905                 for (ad_iterator_init(&context, EXTENDED_INQUIRY_RESPONSE_DATA_LEN, eir_data) ; ad_iterator_has_more(&context) ; ad_iterator_next(&context)){
4906                     uint8_t data_type    = ad_iterator_get_data_type(&context);
4907                     uint8_t data_size    = ad_iterator_get_data_len(&context);
4908                     const uint8_t * data = ad_iterator_get_data(&context);
4909                     // Prefer Complete Local Name over Shortend Local Name
4910                     switch (data_type){
4911                         case BLUETOOTH_DATA_TYPE_SHORTENED_LOCAL_NAME:
4912                             if (name) continue;
4913                             /* fall through */
4914                         case BLUETOOTH_DATA_TYPE_COMPLETE_LOCAL_NAME:
4915                             name = data;
4916                             name_len = data_size;
4917                             break;
4918                         default:
4919                             break;
4920                     }
4921                 }
4922                 if (name){
4923                     event[16] = 1;
4924                     // truncate name if needed
4925                     int len = btstack_min(name_len, GAP_INQUIRY_MAX_NAME_LEN);
4926                     event[17] = len;
4927                     (void)memcpy(&event[18], name, len);
4928                     event_size += len;
4929                 }
4930                 break;
4931             default:
4932                 return;
4933         }
4934         event[1] = event_size - 2;
4935         hci_emit_event(event, event_size, 1);
4936     }
4937 }
4938 #endif
4939 
4940 void hci_emit_state(void){
4941     log_info("BTSTACK_EVENT_STATE %u", hci_stack->state);
4942     uint8_t event[3];
4943     event[0] = BTSTACK_EVENT_STATE;
4944     event[1] = sizeof(event) - 2u;
4945     event[2] = hci_stack->state;
4946     hci_emit_event(event, sizeof(event), 1);
4947 }
4948 
4949 #ifdef ENABLE_CLASSIC
4950 static void hci_emit_connection_complete(bd_addr_t address, hci_con_handle_t con_handle, uint8_t status){
4951     uint8_t event[13];
4952     event[0] = HCI_EVENT_CONNECTION_COMPLETE;
4953     event[1] = sizeof(event) - 2;
4954     event[2] = status;
4955     little_endian_store_16(event, 3, con_handle);
4956     reverse_bd_addr(address, &event[5]);
4957     event[11] = 1; // ACL connection
4958     event[12] = 0; // encryption disabled
4959     hci_emit_event(event, sizeof(event), 1);
4960 }
4961 static void hci_emit_l2cap_check_timeout(hci_connection_t *conn){
4962     if (disable_l2cap_timeouts) return;
4963     log_info("L2CAP_EVENT_TIMEOUT_CHECK");
4964     uint8_t event[4];
4965     event[0] = L2CAP_EVENT_TIMEOUT_CHECK;
4966     event[1] = sizeof(event) - 2;
4967     little_endian_store_16(event, 2, conn->con_handle);
4968     hci_emit_event(event, sizeof(event), 1);
4969 }
4970 #endif
4971 
4972 #ifdef ENABLE_BLE
4973 #ifdef ENABLE_LE_CENTRAL
4974 static void hci_emit_le_connection_complete(uint8_t address_type, const bd_addr_t address, hci_con_handle_t con_handle, uint8_t status){
4975     uint8_t event[21];
4976     event[0] = HCI_EVENT_LE_META;
4977     event[1] = sizeof(event) - 2u;
4978     event[2] = HCI_SUBEVENT_LE_CONNECTION_COMPLETE;
4979     event[3] = status;
4980     little_endian_store_16(event, 4, con_handle);
4981     event[6] = 0; // TODO: role
4982     event[7] = address_type;
4983     reverse_bd_addr(address, &event[8]);
4984     little_endian_store_16(event, 14, 0); // interval
4985     little_endian_store_16(event, 16, 0); // latency
4986     little_endian_store_16(event, 18, 0); // supervision timeout
4987     event[20] = 0; // master clock accuracy
4988     hci_emit_event(event, sizeof(event), 1);
4989 }
4990 #endif
4991 #endif
4992 
4993 static void hci_emit_transport_packet_sent(void){
4994     // notify upper stack that it might be possible to send again
4995     uint8_t event[] = { HCI_EVENT_TRANSPORT_PACKET_SENT, 0};
4996     hci_emit_event(&event[0], sizeof(event), 0);  // don't dump
4997 }
4998 
4999 static void hci_emit_disconnection_complete(hci_con_handle_t con_handle, uint8_t reason){
5000     uint8_t event[6];
5001     event[0] = HCI_EVENT_DISCONNECTION_COMPLETE;
5002     event[1] = sizeof(event) - 2u;
5003     event[2] = 0; // status = OK
5004     little_endian_store_16(event, 3, con_handle);
5005     event[5] = reason;
5006     hci_emit_event(event, sizeof(event), 1);
5007 }
5008 
5009 static void hci_emit_nr_connections_changed(void){
5010     log_info("BTSTACK_EVENT_NR_CONNECTIONS_CHANGED %u", nr_hci_connections());
5011     uint8_t event[3];
5012     event[0] = BTSTACK_EVENT_NR_CONNECTIONS_CHANGED;
5013     event[1] = sizeof(event) - 2u;
5014     event[2] = nr_hci_connections();
5015     hci_emit_event(event, sizeof(event), 1);
5016 }
5017 
5018 static void hci_emit_hci_open_failed(void){
5019     log_info("BTSTACK_EVENT_POWERON_FAILED");
5020     uint8_t event[2];
5021     event[0] = BTSTACK_EVENT_POWERON_FAILED;
5022     event[1] = sizeof(event) - 2u;
5023     hci_emit_event(event, sizeof(event), 1);
5024 }
5025 
5026 static void hci_emit_dedicated_bonding_result(bd_addr_t address, uint8_t status){
5027     log_info("hci_emit_dedicated_bonding_result %u ", status);
5028     uint8_t event[9];
5029     int pos = 0;
5030     event[pos++] = GAP_EVENT_DEDICATED_BONDING_COMPLETED;
5031     event[pos++] = sizeof(event) - 2u;
5032     event[pos++] = status;
5033     reverse_bd_addr(address, &event[pos]);
5034     hci_emit_event(event, sizeof(event), 1);
5035 }
5036 
5037 
5038 #ifdef ENABLE_CLASSIC
5039 
5040 static void hci_emit_security_level(hci_con_handle_t con_handle, gap_security_level_t level){
5041     log_info("hci_emit_security_level %u for handle %x", level, con_handle);
5042     uint8_t event[5];
5043     int pos = 0;
5044     event[pos++] = GAP_EVENT_SECURITY_LEVEL;
5045     event[pos++] = sizeof(event) - 2;
5046     little_endian_store_16(event, 2, con_handle);
5047     pos += 2;
5048     event[pos++] = level;
5049     hci_emit_event(event, sizeof(event), 1);
5050 }
5051 
5052 static gap_security_level_t gap_security_level_for_connection(hci_connection_t * connection){
5053     if (!connection) return LEVEL_0;
5054     if ((connection->authentication_flags & CONNECTION_ENCRYPTED) == 0) return LEVEL_0;
5055     if ((connection->authentication_flags & CONNECTION_AUTHENTICATED) == 0) return LEVEL_0;
5056     if (connection->encryption_key_size < hci_stack->gap_required_encyrption_key_size) return LEVEL_0;
5057     gap_security_level_t security_level = gap_security_level_for_link_key_type(connection->link_key_type);
5058     // LEVEL 4 always requires 128 bit encrytion key size
5059     if ((security_level == LEVEL_4) && (connection->encryption_key_size < 16)){
5060         security_level = LEVEL_3;
5061     }
5062     return security_level;
5063 }
5064 
5065 static void hci_emit_discoverable_enabled(uint8_t enabled){
5066     log_info("BTSTACK_EVENT_DISCOVERABLE_ENABLED %u", enabled);
5067     uint8_t event[3];
5068     event[0] = BTSTACK_EVENT_DISCOVERABLE_ENABLED;
5069     event[1] = sizeof(event) - 2;
5070     event[2] = enabled;
5071     hci_emit_event(event, sizeof(event), 1);
5072 }
5073 
5074 // query if remote side supports eSCO
5075 int hci_remote_esco_supported(hci_con_handle_t con_handle){
5076     hci_connection_t * connection = hci_connection_for_handle(con_handle);
5077     if (!connection) return 0;
5078     return (connection->remote_supported_features[0] & 1) != 0;
5079 }
5080 
5081 static bool hci_ssp_supported(hci_connection_t * connection){
5082     const uint8_t mask = BONDING_REMOTE_SUPPORTS_SSP_CONTROLLER | BONDING_REMOTE_SUPPORTS_SSP_HOST;
5083     return (connection->bonding_flags & mask) == mask;
5084 }
5085 
5086 // query if remote side supports SSP
5087 int hci_remote_ssp_supported(hci_con_handle_t con_handle){
5088     hci_connection_t * connection = hci_connection_for_handle(con_handle);
5089     if (!connection) return 0;
5090     return hci_ssp_supported(connection) ? 1 : 0;
5091 }
5092 
5093 int gap_ssp_supported_on_both_sides(hci_con_handle_t handle){
5094     return hci_local_ssp_activated() && hci_remote_ssp_supported(handle);
5095 }
5096 
5097 // GAP API
5098 /**
5099  * @bbrief enable/disable bonding. default is enabled
5100  * @praram enabled
5101  */
5102 void gap_set_bondable_mode(int enable){
5103     hci_stack->bondable = enable ? 1 : 0;
5104 }
5105 /**
5106  * @brief Get bondable mode.
5107  * @return 1 if bondable
5108  */
5109 int gap_get_bondable_mode(void){
5110     return hci_stack->bondable;
5111 }
5112 
5113 /**
5114  * @brief map link keys to security levels
5115  */
5116 gap_security_level_t gap_security_level_for_link_key_type(link_key_type_t link_key_type){
5117     switch (link_key_type){
5118         case AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256:
5119             return LEVEL_4;
5120         case COMBINATION_KEY:
5121         case AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P192:
5122             return LEVEL_3;
5123         default:
5124             return LEVEL_2;
5125     }
5126 }
5127 
5128 /**
5129  * @brief map link keys to secure connection yes/no
5130  */
5131 int gap_secure_connection_for_link_key_type(link_key_type_t link_key_type){
5132     switch (link_key_type){
5133         case AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256:
5134         case UNAUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256:
5135             return 1;
5136         default:
5137             return 0;
5138     }
5139 }
5140 
5141 /**
5142  * @brief map link keys to authenticated
5143  */
5144 int gap_authenticated_for_link_key_type(link_key_type_t link_key_type){
5145     switch (link_key_type){
5146         case AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256:
5147         case AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P192:
5148             return 1;
5149         default:
5150             return 0;
5151     }
5152 }
5153 
5154 int gap_mitm_protection_required_for_security_level(gap_security_level_t level){
5155     log_info("gap_mitm_protection_required_for_security_level %u", level);
5156     return level > LEVEL_2;
5157 }
5158 
5159 /**
5160  * @brief get current security level
5161  */
5162 gap_security_level_t gap_security_level(hci_con_handle_t con_handle){
5163     hci_connection_t * connection = hci_connection_for_handle(con_handle);
5164     if (!connection) return LEVEL_0;
5165     return gap_security_level_for_connection(connection);
5166 }
5167 
5168 /**
5169  * @brief request connection to device to
5170  * @result GAP_AUTHENTICATION_RESULT
5171  */
5172 void gap_request_security_level(hci_con_handle_t con_handle, gap_security_level_t requested_level){
5173     hci_connection_t * connection = hci_connection_for_handle(con_handle);
5174     if (!connection){
5175         hci_emit_security_level(con_handle, LEVEL_0);
5176         return;
5177     }
5178 
5179     btstack_assert(hci_is_le_connection(connection) == false);
5180 
5181     gap_security_level_t current_level = gap_security_level(con_handle);
5182     log_info("gap_request_security_level requested level %u, planned level %u, current level %u",
5183         requested_level, connection->requested_security_level, current_level);
5184 
5185     // assumption: earlier requested security higher than current level => security request is active
5186     if (current_level < connection->requested_security_level){
5187         if (connection->requested_security_level < requested_level){
5188             // increase requested level as new level is higher
5189 
5190             // TODO: handle re-authentication when done
5191 
5192             connection->requested_security_level = requested_level;
5193         }
5194         return;
5195     }
5196 
5197     // no request active, notify if security sufficient
5198     if (requested_level <= current_level){
5199         hci_emit_security_level(con_handle, current_level);
5200         return;
5201     }
5202 
5203     // store request
5204     connection->requested_security_level = requested_level;
5205 
5206     // start to authenticate connection if authentication not already active
5207     if ((connection->bonding_flags & BONDING_SENT_AUTHENTICATE_REQUEST) != 0) return;
5208     connection->bonding_flags |= BONDING_SEND_AUTHENTICATE_REQUEST;
5209     hci_run();
5210 }
5211 
5212 /**
5213  * @brief start dedicated bonding with device. disconnect after bonding
5214  * @param device
5215  * @param request MITM protection
5216  * @result GAP_DEDICATED_BONDING_COMPLETE
5217  */
5218 int gap_dedicated_bonding(bd_addr_t device, int mitm_protection_required){
5219 
5220     // create connection state machine
5221     hci_connection_t * connection = create_connection_for_bd_addr_and_type(device, BD_ADDR_TYPE_ACL);
5222 
5223     if (!connection){
5224         return BTSTACK_MEMORY_ALLOC_FAILED;
5225     }
5226 
5227     // delete linkn key
5228     gap_drop_link_key_for_bd_addr(device);
5229 
5230     // configure LEVEL_2/3, dedicated bonding
5231     connection->state = SEND_CREATE_CONNECTION;
5232     connection->requested_security_level = mitm_protection_required ? LEVEL_3 : LEVEL_2;
5233     log_info("gap_dedicated_bonding, mitm %d -> level %u", mitm_protection_required, connection->requested_security_level);
5234     connection->bonding_flags = BONDING_DEDICATED;
5235 
5236     // wait for GAP Security Result and send GAP Dedicated Bonding complete
5237 
5238     // handle: connnection failure (connection complete != ok)
5239     // handle: authentication failure
5240     // handle: disconnect on done
5241 
5242     hci_run();
5243 
5244     return 0;
5245 }
5246 #endif
5247 
5248 void gap_set_local_name(const char * local_name){
5249     hci_stack->local_name = local_name;
5250 }
5251 
5252 
5253 #ifdef ENABLE_BLE
5254 
5255 #ifdef ENABLE_LE_CENTRAL
5256 void gap_start_scan(void){
5257     hci_stack->le_scanning_enabled = true;
5258     hci_run();
5259 }
5260 
5261 void gap_stop_scan(void){
5262     hci_stack->le_scanning_enabled = false;
5263     hci_run();
5264 }
5265 
5266 void gap_set_scan_params(uint8_t scan_type, uint16_t scan_interval, uint16_t scan_window, uint8_t scanning_filter_policy){
5267     hci_stack->le_scan_type          = scan_type;
5268     hci_stack->le_scan_filter_policy = scanning_filter_policy;
5269     hci_stack->le_scan_interval      = scan_interval;
5270     hci_stack->le_scan_window        = scan_window;
5271     hci_stack->le_scanning_param_update = true;
5272     hci_run();
5273 }
5274 
5275 void gap_set_scan_parameters(uint8_t scan_type, uint16_t scan_interval, uint16_t scan_window){
5276     gap_set_scan_params(scan_type, scan_interval, scan_window, 0);
5277 }
5278 
5279 uint8_t gap_connect(const bd_addr_t addr, bd_addr_type_t addr_type){
5280     hci_connection_t * conn = hci_connection_for_bd_addr_and_type(addr, addr_type);
5281     if (!conn){
5282         // disallow if le connection is already outgoing
5283         if (hci_is_le_connection_type(addr_type) && hci_stack->le_connecting_request != LE_CONNECTING_IDLE){
5284             log_error("le connection already active");
5285             return ERROR_CODE_COMMAND_DISALLOWED;
5286         }
5287 
5288         log_info("gap_connect: no connection exists yet, creating context");
5289         conn = create_connection_for_bd_addr_and_type(addr, addr_type);
5290         if (!conn){
5291             // notify client that alloc failed
5292             hci_emit_le_connection_complete(addr_type, addr, 0, BTSTACK_MEMORY_ALLOC_FAILED);
5293             log_info("gap_connect: failed to alloc hci_connection_t");
5294             return GATT_CLIENT_NOT_CONNECTED; // don't sent packet to controller
5295         }
5296 
5297         // set le connecting state
5298         if (hci_is_le_connection_type(addr_type)){
5299             hci_stack->le_connecting_request = LE_CONNECTING_DIRECT;
5300         }
5301 
5302         conn->state = SEND_CREATE_CONNECTION;
5303         log_info("gap_connect: send create connection next");
5304         hci_run();
5305         return ERROR_CODE_SUCCESS;
5306     }
5307 
5308     if (!hci_is_le_connection(conn) ||
5309         (conn->state == SEND_CREATE_CONNECTION) ||
5310         (conn->state == SENT_CREATE_CONNECTION)) {
5311         hci_emit_le_connection_complete(conn->address_type, conn->address, 0, ERROR_CODE_COMMAND_DISALLOWED);
5312         log_error("gap_connect: classic connection or connect is already being created");
5313         return GATT_CLIENT_IN_WRONG_STATE;
5314     }
5315 
5316     // check if connection was just disconnected
5317     if (conn->state == RECEIVED_DISCONNECTION_COMPLETE){
5318         log_info("gap_connect: send create connection (again)");
5319         conn->state = SEND_CREATE_CONNECTION;
5320         hci_run();
5321         return ERROR_CODE_SUCCESS;
5322     }
5323 
5324     log_info("gap_connect: context exists with state %u", conn->state);
5325     hci_emit_le_connection_complete(conn->address_type, conn->address, conn->con_handle, ERROR_CODE_SUCCESS);
5326     hci_run();
5327     return ERROR_CODE_SUCCESS;
5328 }
5329 
5330 // @assumption: only a single outgoing LE Connection exists
5331 static hci_connection_t * gap_get_outgoing_connection(void){
5332     btstack_linked_item_t *it;
5333     for (it = (btstack_linked_item_t *) hci_stack->connections; it != NULL; it = it->next){
5334         hci_connection_t * conn = (hci_connection_t *) it;
5335         if (!hci_is_le_connection(conn)) continue;
5336         switch (conn->state){
5337             case SEND_CREATE_CONNECTION:
5338             case SENT_CREATE_CONNECTION:
5339             case SENT_CANCEL_CONNECTION:
5340                 return conn;
5341             default:
5342                 break;
5343         };
5344     }
5345     return NULL;
5346 }
5347 
5348 uint8_t gap_connect_cancel(void){
5349     hci_connection_t * conn = gap_get_outgoing_connection();
5350     if (!conn) return 0;
5351     switch (conn->state){
5352         case SEND_CREATE_CONNECTION:
5353             // skip sending create connection and emit event instead
5354             hci_emit_le_connection_complete(conn->address_type, conn->address, 0, ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER);
5355             btstack_linked_list_remove(&hci_stack->connections, (btstack_linked_item_t *) conn);
5356             btstack_memory_hci_connection_free( conn );
5357             break;
5358         case SENT_CREATE_CONNECTION:
5359             // request to send cancel connection
5360             conn->state = SEND_CANCEL_CONNECTION;
5361             hci_run();
5362             break;
5363         default:
5364             break;
5365     }
5366     return 0;
5367 }
5368 #endif
5369 
5370 #ifdef ENABLE_LE_CENTRAL
5371 /**
5372  * @brief Set connection parameters for outgoing connections
5373  * @param conn_scan_interval (unit: 0.625 msec), default: 60 ms
5374  * @param conn_scan_window (unit: 0.625 msec), default: 30 ms
5375  * @param conn_interval_min (unit: 1.25ms), default: 10 ms
5376  * @param conn_interval_max (unit: 1.25ms), default: 30 ms
5377  * @param conn_latency, default: 4
5378  * @param supervision_timeout (unit: 10ms), default: 720 ms
5379  * @param min_ce_length (unit: 0.625ms), default: 10 ms
5380  * @param max_ce_length (unit: 0.625ms), default: 30 ms
5381  */
5382 
5383 void gap_set_connection_parameters(uint16_t conn_scan_interval, uint16_t conn_scan_window,
5384     uint16_t conn_interval_min, uint16_t conn_interval_max, uint16_t conn_latency,
5385     uint16_t supervision_timeout, uint16_t min_ce_length, uint16_t max_ce_length){
5386     hci_stack->le_connection_scan_interval = conn_scan_interval;
5387     hci_stack->le_connection_scan_window = conn_scan_window;
5388     hci_stack->le_connection_interval_min = conn_interval_min;
5389     hci_stack->le_connection_interval_max = conn_interval_max;
5390     hci_stack->le_connection_latency = conn_latency;
5391     hci_stack->le_supervision_timeout = supervision_timeout;
5392     hci_stack->le_minimum_ce_length = min_ce_length;
5393     hci_stack->le_maximum_ce_length = max_ce_length;
5394 }
5395 #endif
5396 
5397 /**
5398  * @brief Updates the connection parameters for a given LE connection
5399  * @param handle
5400  * @param conn_interval_min (unit: 1.25ms)
5401  * @param conn_interval_max (unit: 1.25ms)
5402  * @param conn_latency
5403  * @param supervision_timeout (unit: 10ms)
5404  * @returns 0 if ok
5405  */
5406 int gap_update_connection_parameters(hci_con_handle_t con_handle, uint16_t conn_interval_min,
5407     uint16_t conn_interval_max, uint16_t conn_latency, uint16_t supervision_timeout){
5408     hci_connection_t * connection = hci_connection_for_handle(con_handle);
5409     if (!connection) return ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER;
5410     connection->le_conn_interval_min = conn_interval_min;
5411     connection->le_conn_interval_max = conn_interval_max;
5412     connection->le_conn_latency = conn_latency;
5413     connection->le_supervision_timeout = supervision_timeout;
5414     connection->le_con_parameter_update_state = CON_PARAMETER_UPDATE_CHANGE_HCI_CON_PARAMETERS;
5415     hci_run();
5416     return 0;
5417 }
5418 
5419 /**
5420  * @brief Request an update of the connection parameter for a given LE connection
5421  * @param handle
5422  * @param conn_interval_min (unit: 1.25ms)
5423  * @param conn_interval_max (unit: 1.25ms)
5424  * @param conn_latency
5425  * @param supervision_timeout (unit: 10ms)
5426  * @returns 0 if ok
5427  */
5428 int gap_request_connection_parameter_update(hci_con_handle_t con_handle, uint16_t conn_interval_min,
5429     uint16_t conn_interval_max, uint16_t conn_latency, uint16_t supervision_timeout){
5430     hci_connection_t * connection = hci_connection_for_handle(con_handle);
5431     if (!connection) return ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER;
5432     connection->le_conn_interval_min = conn_interval_min;
5433     connection->le_conn_interval_max = conn_interval_max;
5434     connection->le_conn_latency = conn_latency;
5435     connection->le_supervision_timeout = supervision_timeout;
5436     connection->le_con_parameter_update_state = CON_PARAMETER_UPDATE_SEND_REQUEST;
5437     uint8_t l2cap_trigger_run_event[2] = { L2CAP_EVENT_TRIGGER_RUN, 0};
5438     hci_emit_event(l2cap_trigger_run_event, sizeof(l2cap_trigger_run_event), 0);
5439     return 0;
5440 }
5441 
5442 #ifdef ENABLE_LE_PERIPHERAL
5443 
5444 /**
5445  * @brief Set Advertisement Data
5446  * @param advertising_data_length
5447  * @param advertising_data (max 31 octets)
5448  * @note data is not copied, pointer has to stay valid
5449  */
5450 void gap_advertisements_set_data(uint8_t advertising_data_length, uint8_t * advertising_data){
5451     hci_stack->le_advertisements_data_len = advertising_data_length;
5452     hci_stack->le_advertisements_data = advertising_data;
5453     hci_stack->le_advertisements_todo |= LE_ADVERTISEMENT_TASKS_SET_ADV_DATA;
5454     hci_run();
5455 }
5456 
5457 /**
5458  * @brief Set Scan Response Data
5459  * @param advertising_data_length
5460  * @param advertising_data (max 31 octets)
5461  * @note data is not copied, pointer has to stay valid
5462  */
5463 void gap_scan_response_set_data(uint8_t scan_response_data_length, uint8_t * scan_response_data){
5464     hci_stack->le_scan_response_data_len = scan_response_data_length;
5465     hci_stack->le_scan_response_data = scan_response_data;
5466     hci_stack->le_advertisements_todo |= LE_ADVERTISEMENT_TASKS_SET_SCAN_DATA;
5467     hci_run();
5468 }
5469 
5470 /**
5471  * @brief Set Advertisement Parameters
5472  * @param adv_int_min
5473  * @param adv_int_max
5474  * @param adv_type
5475  * @param direct_address_type
5476  * @param direct_address
5477  * @param channel_map
5478  * @param filter_policy
5479  *
5480  * @note internal use. use gap_advertisements_set_params from gap_le.h instead.
5481  */
5482  void hci_le_advertisements_set_params(uint16_t adv_int_min, uint16_t adv_int_max, uint8_t adv_type,
5483     uint8_t direct_address_typ, bd_addr_t direct_address,
5484     uint8_t channel_map, uint8_t filter_policy) {
5485 
5486     hci_stack->le_advertisements_interval_min = adv_int_min;
5487     hci_stack->le_advertisements_interval_max = adv_int_max;
5488     hci_stack->le_advertisements_type = adv_type;
5489     hci_stack->le_advertisements_direct_address_type = direct_address_typ;
5490     hci_stack->le_advertisements_channel_map = channel_map;
5491     hci_stack->le_advertisements_filter_policy = filter_policy;
5492     (void)memcpy(hci_stack->le_advertisements_direct_address, direct_address,
5493                  6);
5494 
5495     hci_stack->le_advertisements_todo |= LE_ADVERTISEMENT_TASKS_SET_PARAMS;
5496     hci_run();
5497  }
5498 
5499 /**
5500  * @brief Enable/Disable Advertisements
5501  * @param enabled
5502  */
5503 void gap_advertisements_enable(int enabled){
5504     hci_stack->le_advertisements_enabled = enabled != 0;
5505     hci_update_advertisements_enabled_for_current_roles();
5506     hci_run();
5507 }
5508 
5509 #endif
5510 
5511 void hci_le_set_own_address_type(uint8_t own_address_type){
5512     log_info("hci_le_set_own_address_type: old %u, new %u", hci_stack->le_own_addr_type, own_address_type);
5513     if (own_address_type == hci_stack->le_own_addr_type) return;
5514     hci_stack->le_own_addr_type = own_address_type;
5515 
5516 #ifdef ENABLE_LE_PERIPHERAL
5517     // update advertisement parameters, too
5518     hci_stack->le_advertisements_todo |= LE_ADVERTISEMENT_TASKS_SET_PARAMS;
5519     hci_run();
5520 #endif
5521 #ifdef ENABLE_LE_CENTRAL
5522     // note: we don't update scan parameters or modify ongoing connection attempts
5523 #endif
5524 }
5525 
5526 #endif
5527 
5528 uint8_t gap_disconnect(hci_con_handle_t handle){
5529     hci_connection_t * conn = hci_connection_for_handle(handle);
5530     if (!conn){
5531         hci_emit_disconnection_complete(handle, 0);
5532         return 0;
5533     }
5534     // ignore if already disconnected
5535     if (conn->state == RECEIVED_DISCONNECTION_COMPLETE){
5536         return 0;
5537     }
5538     conn->state = SEND_DISCONNECT;
5539     hci_run();
5540     return 0;
5541 }
5542 
5543 int gap_read_rssi(hci_con_handle_t con_handle){
5544     hci_connection_t * hci_connection = hci_connection_for_handle(con_handle);
5545     if (hci_connection == NULL) return 0;
5546     connectionSetAuthenticationFlags(hci_connection, READ_RSSI);
5547     hci_run();
5548     return 1;
5549 }
5550 
5551 /**
5552  * @brief Get connection type
5553  * @param con_handle
5554  * @result connection_type
5555  */
5556 gap_connection_type_t gap_get_connection_type(hci_con_handle_t connection_handle){
5557     hci_connection_t * conn = hci_connection_for_handle(connection_handle);
5558     if (!conn) return GAP_CONNECTION_INVALID;
5559     switch (conn->address_type){
5560         case BD_ADDR_TYPE_LE_PUBLIC:
5561         case BD_ADDR_TYPE_LE_RANDOM:
5562             return GAP_CONNECTION_LE;
5563         case BD_ADDR_TYPE_SCO:
5564             return GAP_CONNECTION_SCO;
5565         case BD_ADDR_TYPE_ACL:
5566             return GAP_CONNECTION_ACL;
5567         default:
5568             return GAP_CONNECTION_INVALID;
5569     }
5570 }
5571 
5572 hci_role_t gap_get_role(hci_con_handle_t connection_handle){
5573     hci_connection_t * conn = hci_connection_for_handle(connection_handle);
5574     if (!conn) return HCI_ROLE_INVALID;
5575     return (hci_role_t) conn->role;
5576 }
5577 
5578 
5579 #ifdef ENABLE_CLASSIC
5580 uint8_t gap_request_role(const bd_addr_t addr, hci_role_t role){
5581     hci_connection_t * conn = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
5582     if (!conn) return ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER;
5583     conn->request_role = role;
5584     hci_run();
5585     return ERROR_CODE_SUCCESS;
5586 }
5587 #endif
5588 
5589 #ifdef ENABLE_BLE
5590 
5591 uint8_t gap_le_set_phy(hci_con_handle_t connection_handle, uint8_t all_phys, uint8_t tx_phys, uint8_t rx_phys, uint8_t phy_options){
5592     hci_connection_t * conn = hci_connection_for_handle(connection_handle);
5593     if (!conn) return ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER;
5594 
5595     conn->le_phy_update_all_phys    = all_phys;
5596     conn->le_phy_update_tx_phys     = tx_phys;
5597     conn->le_phy_update_rx_phys     = rx_phys;
5598     conn->le_phy_update_phy_options = phy_options;
5599 
5600     hci_run();
5601 
5602     return 0;
5603 }
5604 
5605 static uint8_t hci_whitelist_add(bd_addr_type_t address_type, const bd_addr_t address){
5606     // check if already in list
5607     btstack_linked_list_iterator_t it;
5608     btstack_linked_list_iterator_init(&it, &hci_stack->le_whitelist);
5609     while (btstack_linked_list_iterator_has_next(&it)) {
5610         whitelist_entry_t *entry = (whitelist_entry_t *) btstack_linked_list_iterator_next(&it);
5611         if (entry->address_type != address_type) {
5612             continue;
5613         }
5614         if (memcmp(entry->address, address, 6) != 0) {
5615             continue;
5616         }
5617 		// disallow if already scheduled to add
5618 		if ((entry->state & LE_WHITELIST_ADD_TO_CONTROLLER) != 0){
5619 			return ERROR_CODE_COMMAND_DISALLOWED;
5620 		}
5621 		// still on controller, but scheduled to remove -> re-add
5622 		entry->state |= LE_WHITELIST_ADD_TO_CONTROLLER;
5623 		return ERROR_CODE_SUCCESS;
5624     }
5625     // alloc and add to list
5626     whitelist_entry_t * entry = btstack_memory_whitelist_entry_get();
5627     if (!entry) return BTSTACK_MEMORY_ALLOC_FAILED;
5628     entry->address_type = address_type;
5629     (void)memcpy(entry->address, address, 6);
5630     entry->state = LE_WHITELIST_ADD_TO_CONTROLLER;
5631     btstack_linked_list_add(&hci_stack->le_whitelist, (btstack_linked_item_t*) entry);
5632     return ERROR_CODE_SUCCESS;
5633 }
5634 
5635 static uint8_t hci_whitelist_remove(bd_addr_type_t address_type, const bd_addr_t address){
5636     btstack_linked_list_iterator_t it;
5637     btstack_linked_list_iterator_init(&it, &hci_stack->le_whitelist);
5638     while (btstack_linked_list_iterator_has_next(&it)){
5639         whitelist_entry_t * entry = (whitelist_entry_t*) btstack_linked_list_iterator_next(&it);
5640         if (entry->address_type != address_type) {
5641             continue;
5642         }
5643         if (memcmp(entry->address, address, 6) != 0) {
5644             continue;
5645         }
5646         if (entry->state & LE_WHITELIST_ON_CONTROLLER){
5647             // remove from controller if already present
5648             entry->state |= LE_WHITELIST_REMOVE_FROM_CONTROLLER;
5649         }  else {
5650             // directly remove entry from whitelist
5651             btstack_linked_list_iterator_remove(&it);
5652             btstack_memory_whitelist_entry_free(entry);
5653         }
5654         return ERROR_CODE_SUCCESS;
5655     }
5656     return ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER;
5657 }
5658 
5659 static void hci_whitelist_clear(void){
5660     btstack_linked_list_iterator_t it;
5661     btstack_linked_list_iterator_init(&it, &hci_stack->le_whitelist);
5662     while (btstack_linked_list_iterator_has_next(&it)){
5663         whitelist_entry_t * entry = (whitelist_entry_t*) btstack_linked_list_iterator_next(&it);
5664         if (entry->state & LE_WHITELIST_ON_CONTROLLER){
5665             // remove from controller if already present
5666             entry->state |= LE_WHITELIST_REMOVE_FROM_CONTROLLER;
5667             continue;
5668         }
5669         // directly remove entry from whitelist
5670         btstack_linked_list_iterator_remove(&it);
5671         btstack_memory_whitelist_entry_free(entry);
5672     }
5673 }
5674 
5675 /**
5676  * @brief Clear Whitelist
5677  * @returns 0 if ok
5678  */
5679 uint8_t gap_whitelist_clear(void){
5680     hci_whitelist_clear();
5681     hci_run();
5682     return ERROR_CODE_SUCCESS;
5683 }
5684 
5685 /**
5686  * @brief Add Device to Whitelist
5687  * @param address_typ
5688  * @param address
5689  * @returns 0 if ok
5690  */
5691 uint8_t gap_whitelist_add(bd_addr_type_t address_type, const bd_addr_t address){
5692     uint8_t status = hci_whitelist_add(address_type, address);
5693     if (status){
5694         return status;
5695     }
5696     hci_run();
5697     return ERROR_CODE_SUCCESS;
5698 }
5699 
5700 /**
5701  * @brief Remove Device from Whitelist
5702  * @param address_typ
5703  * @param address
5704  * @returns 0 if ok
5705  */
5706 uint8_t gap_whitelist_remove(bd_addr_type_t address_type, const bd_addr_t address){
5707     uint8_t status = hci_whitelist_remove(address_type, address);
5708     if (status){
5709         return status;
5710     }
5711     hci_run();
5712     return ERROR_CODE_SUCCESS;
5713 }
5714 
5715 #ifdef ENABLE_LE_CENTRAL
5716 /**
5717  *  @brief Connect with Whitelist
5718  *  @note Explicit whitelist management and this connect with whitelist replace deprecated gap_auto_connection_* functions
5719  *  @returns - if ok
5720  */
5721 uint8_t gap_connect_with_whitelist(void){
5722     if (hci_stack->le_connecting_request != LE_CONNECTING_IDLE){
5723         return ERROR_CODE_COMMAND_DISALLOWED;
5724     }
5725     hci_stack->le_connecting_request = LE_CONNECTING_WHITELIST;
5726     hci_run();
5727     return ERROR_CODE_SUCCESS;
5728 }
5729 
5730 /**
5731  * @brief Auto Connection Establishment - Start Connecting to device
5732  * @param address_typ
5733  * @param address
5734  * @returns 0 if ok
5735  */
5736 uint8_t gap_auto_connection_start(bd_addr_type_t address_type, const bd_addr_t address){
5737     if (hci_stack->le_connecting_request == LE_CONNECTING_DIRECT){
5738         return ERROR_CODE_COMMAND_DISALLOWED;
5739     }
5740 
5741     uint8_t status = hci_whitelist_add(address_type, address);
5742     if (status == BTSTACK_MEMORY_ALLOC_FAILED) {
5743         return status;
5744     }
5745 
5746     hci_stack->le_connecting_request = LE_CONNECTING_WHITELIST;
5747 
5748     hci_run();
5749     return ERROR_CODE_SUCCESS;
5750 }
5751 
5752 /**
5753  * @brief Auto Connection Establishment - Stop Connecting to device
5754  * @param address_typ
5755  * @param address
5756  * @returns 0 if ok
5757  */
5758 uint8_t gap_auto_connection_stop(bd_addr_type_t address_type, const bd_addr_t address){
5759     if (hci_stack->le_connecting_request == LE_CONNECTING_DIRECT){
5760         return ERROR_CODE_COMMAND_DISALLOWED;
5761     }
5762 
5763     hci_whitelist_remove(address_type, address);
5764     if (btstack_linked_list_empty(&hci_stack->le_whitelist)){
5765         hci_stack->le_connecting_request = LE_CONNECTING_IDLE;
5766     }
5767     hci_run();
5768     return 0;
5769 }
5770 
5771 /**
5772  * @brief Auto Connection Establishment - Stop everything
5773  * @note  Convenience function to stop all active auto connection attempts
5774  */
5775 uint8_t gap_auto_connection_stop_all(void){
5776     if (hci_stack->le_connecting_request == LE_CONNECTING_DIRECT) {
5777         return ERROR_CODE_COMMAND_DISALLOWED;
5778     }
5779     hci_whitelist_clear();
5780     hci_stack->le_connecting_request = LE_CONNECTING_IDLE;
5781     hci_run();
5782     return ERROR_CODE_SUCCESS;
5783 }
5784 
5785 uint16_t gap_le_connection_interval(hci_con_handle_t connection_handle){
5786     hci_connection_t * conn = hci_connection_for_handle(connection_handle);
5787     if (!conn) return 0;
5788     return conn->le_connection_interval;
5789 }
5790 #endif
5791 #endif
5792 
5793 #ifdef ENABLE_CLASSIC
5794 /**
5795  * @brief Set Extended Inquiry Response data
5796  * @param eir_data size HCI_EXTENDED_INQUIRY_RESPONSE_DATA_LEN (240) bytes, is not copied make sure memory is accessible during stack startup
5797  * @note has to be done before stack starts up
5798  */
5799 void gap_set_extended_inquiry_response(const uint8_t * data){
5800     hci_stack->eir_data = data;
5801 }
5802 
5803 /**
5804  * @brief Start GAP Classic Inquiry
5805  * @param duration in 1.28s units
5806  * @return 0 if ok
5807  * @events: GAP_EVENT_INQUIRY_RESULT, GAP_EVENT_INQUIRY_COMPLETE
5808  */
5809 int gap_inquiry_start(uint8_t duration_in_1280ms_units){
5810     if (hci_stack->state != HCI_STATE_WORKING) return ERROR_CODE_COMMAND_DISALLOWED;
5811     if (hci_stack->inquiry_state != GAP_INQUIRY_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5812     if ((duration_in_1280ms_units < GAP_INQUIRY_DURATION_MIN) || (duration_in_1280ms_units > GAP_INQUIRY_DURATION_MAX)){
5813         return ERROR_CODE_INVALID_HCI_COMMAND_PARAMETERS;
5814     }
5815     hci_stack->inquiry_state = duration_in_1280ms_units;
5816     hci_run();
5817     return 0;
5818 }
5819 
5820 /**
5821  * @brief Stop GAP Classic Inquiry
5822  * @returns 0 if ok
5823  */
5824 int gap_inquiry_stop(void){
5825     if ((hci_stack->inquiry_state >= GAP_INQUIRY_DURATION_MIN) && (hci_stack->inquiry_state <= GAP_INQUIRY_DURATION_MAX)) {
5826         // emit inquiry complete event, before it even started
5827         uint8_t event[] = { GAP_EVENT_INQUIRY_COMPLETE, 1, 0};
5828         hci_emit_event(event, sizeof(event), 1);
5829         return 0;
5830     }
5831     if (hci_stack->inquiry_state != GAP_INQUIRY_STATE_ACTIVE) return ERROR_CODE_COMMAND_DISALLOWED;
5832     hci_stack->inquiry_state = GAP_INQUIRY_STATE_W2_CANCEL;
5833     hci_run();
5834     return 0;
5835 }
5836 
5837 
5838 /**
5839  * @brief Remote Name Request
5840  * @param addr
5841  * @param page_scan_repetition_mode
5842  * @param clock_offset only used when bit 15 is set
5843  * @events: HCI_EVENT_REMOTE_NAME_REQUEST_COMPLETE
5844  */
5845 int gap_remote_name_request(const bd_addr_t addr, uint8_t page_scan_repetition_mode, uint16_t clock_offset){
5846     if (hci_stack->remote_name_state != GAP_REMOTE_NAME_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5847     (void)memcpy(hci_stack->remote_name_addr, addr, 6);
5848     hci_stack->remote_name_page_scan_repetition_mode = page_scan_repetition_mode;
5849     hci_stack->remote_name_clock_offset = clock_offset;
5850     hci_stack->remote_name_state = GAP_REMOTE_NAME_STATE_W2_SEND;
5851     hci_run();
5852     return 0;
5853 }
5854 
5855 static int gap_pairing_set_state_and_run(const bd_addr_t addr, uint8_t state){
5856     hci_stack->gap_pairing_state = state;
5857     (void)memcpy(hci_stack->gap_pairing_addr, addr, 6);
5858     hci_run();
5859     return 0;
5860 }
5861 
5862 /**
5863  * @brief Legacy Pairing Pin Code Response for binary data / non-strings
5864  * @param addr
5865  * @param pin_data
5866  * @param pin_len
5867  * @return 0 if ok
5868  */
5869 int gap_pin_code_response_binary(const bd_addr_t addr, const uint8_t * pin_data, uint8_t pin_len){
5870     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5871     hci_stack->gap_pairing_input.gap_pairing_pin = pin_data;
5872     hci_stack->gap_pairing_pin_len = pin_len;
5873     return gap_pairing_set_state_and_run(addr, GAP_PAIRING_STATE_SEND_PIN);
5874 }
5875 
5876 /**
5877  * @brief Legacy Pairing Pin Code Response
5878  * @param addr
5879  * @param pin
5880  * @return 0 if ok
5881  */
5882 int gap_pin_code_response(const bd_addr_t addr, const char * pin){
5883     return gap_pin_code_response_binary(addr, (const uint8_t*) pin, strlen(pin));
5884 }
5885 
5886 /**
5887  * @brief Abort Legacy Pairing
5888  * @param addr
5889  * @param pin
5890  * @return 0 if ok
5891  */
5892 int gap_pin_code_negative(bd_addr_t addr){
5893     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5894     return gap_pairing_set_state_and_run(addr, GAP_PAIRING_STATE_SEND_PIN_NEGATIVE);
5895 }
5896 
5897 /**
5898  * @brief SSP Passkey Response
5899  * @param addr
5900  * @param passkey
5901  * @return 0 if ok
5902  */
5903 int gap_ssp_passkey_response(const bd_addr_t addr, uint32_t passkey){
5904     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5905     hci_stack->gap_pairing_input.gap_pairing_passkey = passkey;
5906     return gap_pairing_set_state_and_run(addr, GAP_PAIRING_STATE_SEND_PASSKEY);
5907 }
5908 
5909 /**
5910  * @brief Abort SSP Passkey Entry/Pairing
5911  * @param addr
5912  * @param pin
5913  * @return 0 if ok
5914  */
5915 int gap_ssp_passkey_negative(const bd_addr_t addr){
5916     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5917     return gap_pairing_set_state_and_run(addr, GAP_PAIRING_STATE_SEND_PASSKEY_NEGATIVE);
5918 }
5919 
5920 /**
5921  * @brief Accept SSP Numeric Comparison
5922  * @param addr
5923  * @param passkey
5924  * @return 0 if ok
5925  */
5926 int gap_ssp_confirmation_response(const bd_addr_t addr){
5927     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5928     return gap_pairing_set_state_and_run(addr, GAP_PAIRING_STATE_SEND_CONFIRMATION);
5929 }
5930 
5931 /**
5932  * @brief Abort SSP Numeric Comparison/Pairing
5933  * @param addr
5934  * @param pin
5935  * @return 0 if ok
5936  */
5937 int gap_ssp_confirmation_negative(const bd_addr_t addr){
5938     if (hci_stack->gap_pairing_state != GAP_PAIRING_STATE_IDLE) return ERROR_CODE_COMMAND_DISALLOWED;
5939     return gap_pairing_set_state_and_run(addr, GAP_PAIRING_STATE_SEND_CONFIRMATION_NEGATIVE);
5940 }
5941 
5942 #ifdef ENABLE_CLASSIC_PAIRING_OOB
5943 /**
5944  * @brief Report Remote OOB Data
5945  * @param bd_addr
5946  * @param c_192 Simple Pairing Hash C derived from P-192 public key
5947  * @param r_192 Simple Pairing Randomizer derived from P-192 public key
5948  * @param c_256 Simple Pairing Hash C derived from P-256 public key
5949  * @param r_256 Simple Pairing Randomizer derived from P-256 public key
5950  */
5951 uint8_t gap_ssp_remote_oob_data(const bd_addr_t addr, const uint8_t * c_192, const uint8_t * r_192, const uint8_t * c_256, const uint8_t * r_256){
5952     hci_connection_t * connection = hci_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
5953     if (connection == NULL) {
5954         return ERROR_CODE_UNKNOWN_CONNECTION_IDENTIFIER;
5955     }
5956     connection->classic_oob_c_192 = c_192;
5957     connection->classic_oob_r_192 = r_192;
5958     connection->classic_oob_c_256 = c_256;
5959     connection->classic_oob_r_256 = r_256;
5960     return ERROR_CODE_SUCCESS;
5961 }
5962 /**
5963  * @brief Generate new OOB data
5964  * @note OOB data will be provided in GAP_EVENT_LOCAL_OOB_DATA and be used in future pairing procedures
5965  */
5966 void gap_ssp_generate_oob_data(void){
5967     hci_stack->classic_read_local_oob_data = true;
5968     hci_run();
5969 }
5970 
5971 #endif
5972 
5973 /**
5974  * @brief Set inquiry mode: standard, with RSSI, with RSSI + Extended Inquiry Results. Has to be called before power on.
5975  * @param inquiry_mode see bluetooth_defines.h
5976  */
5977 void hci_set_inquiry_mode(inquiry_mode_t mode){
5978     hci_stack->inquiry_mode = mode;
5979 }
5980 
5981 /**
5982  * @brief Configure Voice Setting for use with SCO data in HSP/HFP
5983  */
5984 void hci_set_sco_voice_setting(uint16_t voice_setting){
5985     hci_stack->sco_voice_setting = voice_setting;
5986 }
5987 
5988 /**
5989  * @brief Get SCO Voice Setting
5990  * @return current voice setting
5991  */
5992 uint16_t hci_get_sco_voice_setting(void){
5993     return hci_stack->sco_voice_setting;
5994 }
5995 
5996 static int hci_have_usb_transport(void){
5997     if (!hci_stack->hci_transport) return 0;
5998     const char * transport_name = hci_stack->hci_transport->name;
5999     if (!transport_name) return 0;
6000     return (transport_name[0] == 'H') && (transport_name[1] == '2');
6001 }
6002 
6003 /** @brief Get SCO packet length for current SCO Voice setting
6004  *  @note  Using SCO packets of the exact length is required for USB transfer
6005  *  @return Length of SCO packets in bytes (not audio frames)
6006  */
6007 int hci_get_sco_packet_length(void){
6008     int sco_packet_length = 0;
6009 
6010 #ifdef ENABLE_SCO_OVER_HCI
6011 
6012     // Transparent = mSBC => 1, CVSD with 16-bit samples requires twice as much bytes
6013     int multiplier = ((hci_stack->sco_voice_setting_active & 0x03) == 0x03) ? 1 : 2;
6014 
6015     if (hci_have_usb_transport()){
6016         // see Core Spec for H2 USB Transfer.
6017         // 3 byte SCO header + 24 bytes per connection
6018         int num_sco_connections = btstack_max(1, hci_number_sco_connections());
6019         sco_packet_length = 3 + 24 * num_sco_connections * multiplier;
6020     } else {
6021         // 3 byte SCO header + SCO packet size over the air (60 bytes)
6022         sco_packet_length = 3 + 60 * multiplier;
6023         // assert that it still fits inside an SCO buffer
6024         if (sco_packet_length > hci_stack->sco_data_packet_length){
6025             sco_packet_length = 3 + 60;
6026         }
6027     }
6028 #endif
6029     return sco_packet_length;
6030 }
6031 
6032 /**
6033 * @brief Sets the master/slave policy
6034 * @param policy (0: attempt to become master, 1: let connecting device decide)
6035 */
6036 void hci_set_master_slave_policy(uint8_t policy){
6037     hci_stack->master_slave_policy = policy;
6038 }
6039 
6040 #endif
6041 
6042 HCI_STATE hci_get_state(void){
6043     return hci_stack->state;
6044 }
6045 
6046 #ifdef ENABLE_CLASSIC
6047 void gap_register_classic_connection_filter(int (*accept_callback)(bd_addr_t addr, hci_link_type_t link_type)){
6048     hci_stack->gap_classic_accept_callback = accept_callback;
6049 }
6050 #endif
6051 
6052 /**
6053  * @brief Set callback for Bluetooth Hardware Error
6054  */
6055 void hci_set_hardware_error_callback(void (*fn)(uint8_t error)){
6056     hci_stack->hardware_error_callback = fn;
6057 }
6058 
6059 void hci_disconnect_all(void){
6060     btstack_linked_list_iterator_t it;
6061     btstack_linked_list_iterator_init(&it, &hci_stack->connections);
6062     while (btstack_linked_list_iterator_has_next(&it)){
6063         hci_connection_t * con = (hci_connection_t*) btstack_linked_list_iterator_next(&it);
6064         if (con->state == SENT_DISCONNECT) continue;
6065         con->state = SEND_DISCONNECT;
6066     }
6067     hci_run();
6068 }
6069 
6070 uint16_t hci_get_manufacturer(void){
6071     return hci_stack->manufacturer;
6072 }
6073 
6074 #ifdef ENABLE_BLE
6075 
6076 static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle){
6077     hci_connection_t * hci_con = hci_connection_for_handle(con_handle);
6078     if (!hci_con) return NULL;
6079     return &hci_con->sm_connection;
6080 }
6081 
6082 // extracted from sm.c to allow enabling of l2cap le data channels without adding sm.c to the build
6083 // without sm.c default values from create_connection_for_bd_addr_and_type() resulg in non-encrypted, not-authenticated
6084 
6085 int gap_encryption_key_size(hci_con_handle_t con_handle){
6086     hci_connection_t * hci_connection = hci_connection_for_handle(con_handle);
6087     if (hci_connection == NULL) return 0;
6088     if (hci_is_le_connection(hci_connection)){
6089         sm_connection_t * sm_conn = &hci_connection->sm_connection;
6090         if (sm_conn->sm_connection_encrypted) {
6091             return sm_conn->sm_actual_encryption_key_size;
6092         }
6093     }
6094 #ifdef ENABLE_CLASSIC
6095     else {
6096         if ((hci_connection->authentication_flags & CONNECTION_ENCRYPTED)){
6097             return hci_connection->encryption_key_size;
6098         }
6099     }
6100 #endif
6101     return 0;
6102 }
6103 
6104 int gap_authenticated(hci_con_handle_t con_handle){
6105     hci_connection_t * hci_connection = hci_connection_for_handle(con_handle);
6106     if (hci_connection == NULL) return 0;
6107 
6108     switch (hci_connection->address_type){
6109         case BD_ADDR_TYPE_LE_PUBLIC:
6110         case BD_ADDR_TYPE_LE_RANDOM:
6111             if (hci_connection->sm_connection.sm_connection_encrypted == 0) return 0; // unencrypted connection cannot be authenticated
6112             return hci_connection->sm_connection.sm_connection_authenticated;
6113 #ifdef ENABLE_CLASSIC
6114         case BD_ADDR_TYPE_SCO:
6115         case BD_ADDR_TYPE_ACL:
6116             return gap_authenticated_for_link_key_type(hci_connection->link_key_type);
6117 #endif
6118         default:
6119             return 0;
6120     }
6121 }
6122 
6123 int gap_secure_connection(hci_con_handle_t con_handle){
6124     hci_connection_t * hci_connection = hci_connection_for_handle(con_handle);
6125     if (hci_connection == NULL) return 0;
6126 
6127     switch (hci_connection->address_type){
6128         case BD_ADDR_TYPE_LE_PUBLIC:
6129         case BD_ADDR_TYPE_LE_RANDOM:
6130             if (hci_connection->sm_connection.sm_connection_encrypted == 0) return 0; // unencrypted connection cannot be authenticated
6131             return hci_connection->sm_connection.sm_connection_sc;
6132 #ifdef ENABLE_CLASSIC
6133         case BD_ADDR_TYPE_SCO:
6134         case BD_ADDR_TYPE_ACL:
6135             return gap_secure_connection_for_link_key_type(hci_connection->link_key_type);
6136 #endif
6137         default:
6138             return 0;
6139     }
6140 }
6141 
6142 bool gap_bonded(hci_con_handle_t con_handle){
6143 	hci_connection_t * hci_connection = hci_connection_for_handle(con_handle);
6144 	if (hci_connection == NULL) return 0;
6145 
6146 #ifdef ENABLE_CLASSIC
6147 	link_key_t link_key;
6148 	link_key_type_t link_key_type;
6149 #endif
6150 	switch (hci_connection->address_type){
6151 		case BD_ADDR_TYPE_LE_PUBLIC:
6152 		case BD_ADDR_TYPE_LE_RANDOM:
6153 			return hci_connection->sm_connection.sm_le_db_index >= 0;
6154 #ifdef ENABLE_CLASSIC
6155 		case BD_ADDR_TYPE_SCO:
6156 		case BD_ADDR_TYPE_ACL:
6157 			return hci_stack->link_key_db && hci_stack->link_key_db->get_link_key(hci_connection->address, link_key, &link_key_type);
6158 #endif
6159 		default:
6160 			return false;
6161 	}
6162 }
6163 
6164 
6165 authorization_state_t gap_authorization_state(hci_con_handle_t con_handle){
6166     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
6167     if (!sm_conn) return AUTHORIZATION_UNKNOWN;     // wrong connection
6168     if (!sm_conn->sm_connection_encrypted)               return AUTHORIZATION_UNKNOWN; // unencrypted connection cannot be authorized
6169     if (!sm_conn->sm_connection_authenticated)           return AUTHORIZATION_UNKNOWN; // unauthenticatd connection cannot be authorized
6170     return sm_conn->sm_connection_authorization_state;
6171 }
6172 #endif
6173 
6174 #ifdef ENABLE_CLASSIC
6175 uint8_t gap_sniff_mode_enter(hci_con_handle_t con_handle, uint16_t sniff_min_interval, uint16_t sniff_max_interval, uint16_t sniff_attempt, uint16_t sniff_timeout){
6176     hci_connection_t * conn = hci_connection_for_handle(con_handle);
6177     if (!conn) return GAP_CONNECTION_INVALID;
6178     conn->sniff_min_interval = sniff_min_interval;
6179     conn->sniff_max_interval = sniff_max_interval;
6180     conn->sniff_attempt = sniff_attempt;
6181     conn->sniff_timeout = sniff_timeout;
6182     hci_run();
6183     return 0;
6184 }
6185 
6186 /**
6187  * @brief Exit Sniff mode
6188  * @param con_handle
6189  @ @return 0 if ok
6190  */
6191 uint8_t gap_sniff_mode_exit(hci_con_handle_t con_handle){
6192     hci_connection_t * conn = hci_connection_for_handle(con_handle);
6193     if (!conn) return GAP_CONNECTION_INVALID;
6194     conn->sniff_min_interval = 0xffff;
6195     hci_run();
6196     return 0;
6197 }
6198 #endif
6199 
6200 void hci_halting_defer(void){
6201     if (hci_stack->state != HCI_STATE_HALTING) return;
6202     switch (hci_stack->substate){
6203         case HCI_HALTING_DISCONNECT_ALL_NO_TIMER:
6204         case HCI_HALTING_CLOSE:
6205             hci_stack->substate = HCI_HALTING_DISCONNECT_ALL_TIMER;
6206             break;
6207         default:
6208             break;
6209     }
6210 }
6211 
6212 #ifdef ENABLE_LE_PRIVACY_ADDRESS_RESOLUTION
6213 void hci_load_le_device_db_entry_into_resolving_list(uint16_t le_device_db_index){
6214     if (le_device_db_index >= MAX_NUM_RESOLVING_LIST_ENTRIES) return;
6215     if (le_device_db_index >= le_device_db_max_count()) return;
6216     uint8_t offset = le_device_db_index >> 3;
6217     uint8_t mask = 1 << (le_device_db_index & 7);
6218     hci_stack->le_resolving_list_add_entries[offset] |= mask;
6219     if (hci_stack->le_resolving_list_state == LE_RESOLVING_LIST_DONE){
6220     	// note: go back to remove entries, otherwise, a remove + add will skip the add
6221         hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_REMOVE_ENTRIES;
6222     }
6223 }
6224 
6225 void hci_remove_le_device_db_entry_from_resolving_list(uint16_t le_device_db_index){
6226 	if (le_device_db_index >= MAX_NUM_RESOLVING_LIST_ENTRIES) return;
6227 	if (le_device_db_index >= le_device_db_max_count()) return;
6228 	uint8_t offset = le_device_db_index >> 3;
6229 	uint8_t mask = 1 << (le_device_db_index & 7);
6230 	hci_stack->le_resolving_list_remove_entries[offset] |= mask;
6231 	if (hci_stack->le_resolving_list_state == LE_RESOLVING_LIST_DONE){
6232 		hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_REMOVE_ENTRIES;
6233 	}
6234 }
6235 
6236 uint8_t gap_load_resolving_list_from_le_device_db(void){
6237 	if ((hci_stack->local_supported_commands[1] & (1 << 2)) == 0) {
6238 		return ERROR_CODE_UNSUPPORTED_FEATURE_OR_PARAMETER_VALUE;
6239 	}
6240 	if (hci_stack->le_resolving_list_state != LE_RESOLVING_LIST_SEND_ENABLE_ADDRESS_RESOLUTION){
6241 		// restart le resolving list update
6242 		hci_stack->le_resolving_list_state = LE_RESOLVING_LIST_READ_SIZE;
6243 	}
6244 	return ERROR_CODE_SUCCESS;
6245 }
6246 #endif
6247 
6248 #ifdef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION
6249 void hci_setup_test_connections_fuzz(void){
6250     hci_connection_t * conn;
6251 
6252     // default address: 66:55:44:33:00:01
6253     bd_addr_t addr = { 0x66, 0x55, 0x44, 0x33, 0x00, 0x00};
6254 
6255     // setup Controller info
6256     hci_stack->num_cmd_packets = 255;
6257     hci_stack->acl_packets_total_num = 255;
6258 
6259     // setup incoming Classic ACL connection with con handle 0x0001, 66:55:44:33:22:01
6260     addr[5] = 0x01;
6261     conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
6262     conn->con_handle = addr[5];
6263     conn->role  = HCI_ROLE_SLAVE;
6264     conn->state = RECEIVED_CONNECTION_REQUEST;
6265     conn->sm_connection.sm_role = HCI_ROLE_SLAVE;
6266 
6267     // setup incoming Classic SCO connection with con handle 0x0002
6268     addr[5] = 0x02;
6269     conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_SCO);
6270     conn->con_handle = addr[5];
6271     conn->role  = HCI_ROLE_SLAVE;
6272     conn->state = RECEIVED_CONNECTION_REQUEST;
6273     conn->sm_connection.sm_role = HCI_ROLE_SLAVE;
6274 
6275     // setup ready Classic ACL connection with con handle 0x0003
6276     addr[5] = 0x03;
6277     conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_ACL);
6278     conn->con_handle = addr[5];
6279     conn->role  = HCI_ROLE_SLAVE;
6280     conn->state = OPEN;
6281     conn->sm_connection.sm_role = HCI_ROLE_SLAVE;
6282 
6283     // setup ready Classic SCO connection with con handle 0x0004
6284     addr[5] = 0x04;
6285     conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_SCO);
6286     conn->con_handle = addr[5];
6287     conn->role  = HCI_ROLE_SLAVE;
6288     conn->state = OPEN;
6289     conn->sm_connection.sm_role = HCI_ROLE_SLAVE;
6290 
6291     // setup ready LE ACL connection with con handle 0x005 and public address
6292     addr[5] = 0x05;
6293     conn = create_connection_for_bd_addr_and_type(addr, BD_ADDR_TYPE_LE_PUBLIC);
6294     conn->con_handle = addr[5];
6295     conn->role  = HCI_ROLE_SLAVE;
6296     conn->state = OPEN;
6297     conn->sm_connection.sm_role = HCI_ROLE_SLAVE;
6298 }
6299 
6300 void hci_free_connections_fuzz(void){
6301     btstack_linked_list_iterator_t it;
6302     btstack_linked_list_iterator_init(&it, &hci_stack->connections);
6303     while (btstack_linked_list_iterator_has_next(&it)){
6304         hci_connection_t * con = (hci_connection_t*) btstack_linked_list_iterator_next(&it);
6305         btstack_linked_list_iterator_remove(&it);
6306         btstack_memory_hci_connection_free(con);
6307     }
6308 }
6309 void hci_simulate_working_fuzz(void){
6310     hci_init_done();
6311     hci_stack->num_cmd_packets = 255;
6312 }
6313 #endif
6314