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