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