xref: /btstack/src/ble/sm.c (revision 880113226d0b1be0f7fed2aeab81e9fb3d27b97e)
13deb3ec6SMatthias Ringwald /*
23deb3ec6SMatthias Ringwald  * Copyright (C) 2014 BlueKitchen GmbH
33deb3ec6SMatthias Ringwald  *
43deb3ec6SMatthias Ringwald  * Redistribution and use in source and binary forms, with or without
53deb3ec6SMatthias Ringwald  * modification, are permitted provided that the following conditions
63deb3ec6SMatthias Ringwald  * are met:
73deb3ec6SMatthias Ringwald  *
83deb3ec6SMatthias Ringwald  * 1. Redistributions of source code must retain the above copyright
93deb3ec6SMatthias Ringwald  *    notice, this list of conditions and the following disclaimer.
103deb3ec6SMatthias Ringwald  * 2. Redistributions in binary form must reproduce the above copyright
113deb3ec6SMatthias Ringwald  *    notice, this list of conditions and the following disclaimer in the
123deb3ec6SMatthias Ringwald  *    documentation and/or other materials provided with the distribution.
133deb3ec6SMatthias Ringwald  * 3. Neither the name of the copyright holders nor the names of
143deb3ec6SMatthias Ringwald  *    contributors may be used to endorse or promote products derived
153deb3ec6SMatthias Ringwald  *    from this software without specific prior written permission.
163deb3ec6SMatthias Ringwald  * 4. Any redistribution, use, or modification is done solely for
173deb3ec6SMatthias Ringwald  *    personal benefit and not for any commercial purpose or for
183deb3ec6SMatthias Ringwald  *    monetary gain.
193deb3ec6SMatthias Ringwald  *
203deb3ec6SMatthias Ringwald  * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS
213deb3ec6SMatthias Ringwald  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
223deb3ec6SMatthias Ringwald  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
233deb3ec6SMatthias Ringwald  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS
243deb3ec6SMatthias Ringwald  * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
253deb3ec6SMatthias Ringwald  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
263deb3ec6SMatthias Ringwald  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
273deb3ec6SMatthias Ringwald  * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
283deb3ec6SMatthias Ringwald  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
293deb3ec6SMatthias Ringwald  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
303deb3ec6SMatthias Ringwald  * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
313deb3ec6SMatthias Ringwald  * SUCH DAMAGE.
323deb3ec6SMatthias Ringwald  *
333deb3ec6SMatthias Ringwald  * Please inquire about commercial licensing options at
343deb3ec6SMatthias Ringwald  * [email protected]
353deb3ec6SMatthias Ringwald  *
363deb3ec6SMatthias Ringwald  */
37ab2c6ae4SMatthias Ringwald 
38ab2c6ae4SMatthias Ringwald #define __BTSTACK_FILE__ "sm.c"
393deb3ec6SMatthias Ringwald 
403deb3ec6SMatthias Ringwald #include <stdio.h>
413deb3ec6SMatthias Ringwald #include <string.h>
423deb3ec6SMatthias Ringwald #include <inttypes.h>
433deb3ec6SMatthias Ringwald 
443edc84c5SMatthias Ringwald #include "ble/le_device_db.h"
4559c6af15SMatthias Ringwald #include "ble/core.h"
463edc84c5SMatthias Ringwald #include "ble/sm.h"
4761f37892SMatthias Ringwald #include "bluetooth_company_id.h"
480e2df43fSMatthias Ringwald #include "btstack_debug.h"
490e2df43fSMatthias Ringwald #include "btstack_event.h"
500e2df43fSMatthias Ringwald #include "btstack_linked_list.h"
510e2df43fSMatthias Ringwald #include "btstack_memory.h"
52f7a05cdaSMatthias Ringwald #include "gap.h"
530e2df43fSMatthias Ringwald #include "hci.h"
5413377825SMatthias Ringwald #include "hci_dump.h"
550e2df43fSMatthias Ringwald #include "l2cap.h"
563deb3ec6SMatthias Ringwald 
571a682202SMatthias Ringwald #if !defined(ENABLE_LE_PERIPHERAL) && !defined(ENABLE_LE_CENTRAL)
581a682202SMatthias Ringwald #error "LE Security Manager used, but neither ENABLE_LE_PERIPHERAL nor ENABLE_LE_CENTRAL defined. Please add at least one to btstack_config.h."
591a682202SMatthias Ringwald #endif
601a682202SMatthias Ringwald 
6142134bc6SMatthias Ringwald #if defined(ENABLE_LE_PERIPHERAL) && defined(ENABLE_LE_CENTRAL)
6242134bc6SMatthias Ringwald #define IS_RESPONDER(role) (role)
6342134bc6SMatthias Ringwald #else
6442134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
6542134bc6SMatthias Ringwald // only central - never responder (avoid 'unused variable' warnings)
6642134bc6SMatthias Ringwald #define IS_RESPONDER(role) (0 && role)
6742134bc6SMatthias Ringwald #else
6842134bc6SMatthias Ringwald // only peripheral - always responder (avoid 'unused variable' warnings)
6942134bc6SMatthias Ringwald #define IS_RESPONDER(role) (1 || role)
7042134bc6SMatthias Ringwald #endif
7142134bc6SMatthias Ringwald #endif
7242134bc6SMatthias Ringwald 
73e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
7435ef8655SMatthias Ringwald // assert SM Public Key can be sent/received
7535ef8655SMatthias Ringwald #if HCI_ACL_PAYLOAD_SIZE < 69
7635ef8655SMatthias Ringwald #error "HCI_ACL_PAYLOAD_SIZE must be at least 69 bytes when using LE Secure Conection. Please increase HCI_ACL_PAYLOAD_SIZE or disable ENABLE_LE_SECURE_CONNECTIONS"
7735ef8655SMatthias Ringwald #endif
7835ef8655SMatthias Ringwald 
797df18c15SMatthias Ringwald #ifdef HAVE_HCI_CONTROLLER_DHKEY_SUPPORT
807df18c15SMatthias Ringwald #error "Support for DHKEY Support in HCI Controller not implemented yet. Please use software implementation"
817df18c15SMatthias Ringwald #else
82c692d776SMatthias Ringwald // #define USE_MBEDTLS_FOR_ECDH
83c692d776SMatthias Ringwald #define USE_MICROECC_FOR_ECDH
847df18c15SMatthias Ringwald #endif
857df18c15SMatthias Ringwald #endif
867df18c15SMatthias Ringwald 
8727c32905SMatthias Ringwald // Software ECDH implementation provided by mbedtls
8827c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
8927c32905SMatthias Ringwald #include "mbedtls/config.h"
9027c32905SMatthias Ringwald #include "mbedtls/platform.h"
9127c32905SMatthias Ringwald #include "mbedtls/ecp.h"
9268437d83SMatthias Ringwald #include "sm_mbedtls_allocator.h"
93d3bd9600SMatthias Ringwald #endif
94d3bd9600SMatthias Ringwald 
95c692d776SMatthias Ringwald // Software ECDH implementation provided by micro-ecc
96c692d776SMatthias Ringwald #ifdef USE_MICROECC_FOR_ECDH
97c692d776SMatthias Ringwald #include "uECC.h"
98c692d776SMatthias Ringwald #endif
99c692d776SMatthias Ringwald 
1007a766ebfSMatthias Ringwald #if defined(ENABLE_LE_SIGNED_WRITE) || defined(ENABLE_LE_SECURE_CONNECTIONS)
1017a766ebfSMatthias Ringwald #define ENABLE_CMAC_ENGINE
1027a766ebfSMatthias Ringwald #endif
1037a766ebfSMatthias Ringwald 
1043deb3ec6SMatthias Ringwald //
1053deb3ec6SMatthias Ringwald // SM internal types and globals
1063deb3ec6SMatthias Ringwald //
1073deb3ec6SMatthias Ringwald 
1083deb3ec6SMatthias Ringwald typedef enum {
1093deb3ec6SMatthias Ringwald     DKG_W4_WORKING,
1103deb3ec6SMatthias Ringwald     DKG_CALC_IRK,
1113deb3ec6SMatthias Ringwald     DKG_W4_IRK,
1123deb3ec6SMatthias Ringwald     DKG_CALC_DHK,
1133deb3ec6SMatthias Ringwald     DKG_W4_DHK,
1143deb3ec6SMatthias Ringwald     DKG_READY
1153deb3ec6SMatthias Ringwald } derived_key_generation_t;
1163deb3ec6SMatthias Ringwald 
1173deb3ec6SMatthias Ringwald typedef enum {
1183deb3ec6SMatthias Ringwald     RAU_W4_WORKING,
1193deb3ec6SMatthias Ringwald     RAU_IDLE,
1203deb3ec6SMatthias Ringwald     RAU_GET_RANDOM,
1213deb3ec6SMatthias Ringwald     RAU_W4_RANDOM,
1223deb3ec6SMatthias Ringwald     RAU_GET_ENC,
1233deb3ec6SMatthias Ringwald     RAU_W4_ENC,
1243deb3ec6SMatthias Ringwald     RAU_SET_ADDRESS,
1253deb3ec6SMatthias Ringwald } random_address_update_t;
1263deb3ec6SMatthias Ringwald 
1273deb3ec6SMatthias Ringwald typedef enum {
1283deb3ec6SMatthias Ringwald     CMAC_IDLE,
1293deb3ec6SMatthias Ringwald     CMAC_CALC_SUBKEYS,
1303deb3ec6SMatthias Ringwald     CMAC_W4_SUBKEYS,
1313deb3ec6SMatthias Ringwald     CMAC_CALC_MI,
1323deb3ec6SMatthias Ringwald     CMAC_W4_MI,
1333deb3ec6SMatthias Ringwald     CMAC_CALC_MLAST,
1343deb3ec6SMatthias Ringwald     CMAC_W4_MLAST
1353deb3ec6SMatthias Ringwald } cmac_state_t;
1363deb3ec6SMatthias Ringwald 
1373deb3ec6SMatthias Ringwald typedef enum {
1383deb3ec6SMatthias Ringwald     JUST_WORKS,
13927c32905SMatthias Ringwald     PK_RESP_INPUT,  // Initiator displays PK, responder inputs PK
14027c32905SMatthias Ringwald     PK_INIT_INPUT,  // Responder displays PK, initiator inputs PK
1413deb3ec6SMatthias Ringwald     OK_BOTH_INPUT,  // Only input on both, both input PK
14227c32905SMatthias Ringwald     NK_BOTH_INPUT,  // Only numerical compparison (yes/no) on on both sides
1433deb3ec6SMatthias Ringwald     OOB             // OOB available on both sides
1443deb3ec6SMatthias Ringwald } stk_generation_method_t;
1453deb3ec6SMatthias Ringwald 
1463deb3ec6SMatthias Ringwald typedef enum {
1473deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_IDLE,
1483deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_PENDING,
1493deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_CONFIRM,
1503deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_PASSKEY,
1513deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_DECLINE
1523deb3ec6SMatthias Ringwald } sm_user_response_t;
1533deb3ec6SMatthias Ringwald 
1543deb3ec6SMatthias Ringwald typedef enum {
1553deb3ec6SMatthias Ringwald     SM_AES128_IDLE,
1563deb3ec6SMatthias Ringwald     SM_AES128_ACTIVE
1573deb3ec6SMatthias Ringwald } sm_aes128_state_t;
1583deb3ec6SMatthias Ringwald 
1593deb3ec6SMatthias Ringwald typedef enum {
1603deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_IDLE,
1613deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_GENERAL,
1623deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_FOR_CONNECTION,
1633deb3ec6SMatthias Ringwald } address_resolution_mode_t;
1643deb3ec6SMatthias Ringwald 
1653deb3ec6SMatthias Ringwald typedef enum {
1663deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_SUCEEDED,
1673deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_FAILED,
1683deb3ec6SMatthias Ringwald } address_resolution_event_t;
169901c000fSMatthias Ringwald 
170901c000fSMatthias Ringwald typedef enum {
1717df18c15SMatthias Ringwald     EC_KEY_GENERATION_IDLE,
1727df18c15SMatthias Ringwald     EC_KEY_GENERATION_ACTIVE,
17309e4d397SMatthias Ringwald     EC_KEY_GENERATION_W4_KEY,
1747df18c15SMatthias Ringwald     EC_KEY_GENERATION_DONE,
1757df18c15SMatthias Ringwald } ec_key_generation_state_t;
1767df18c15SMatthias Ringwald 
1777df18c15SMatthias Ringwald typedef enum {
178901c000fSMatthias Ringwald     SM_STATE_VAR_DHKEY_COMMAND_RECEIVED = 1 << 0
179901c000fSMatthias Ringwald } sm_state_var_t;
180901c000fSMatthias Ringwald 
1813deb3ec6SMatthias Ringwald //
1823deb3ec6SMatthias Ringwald // GLOBAL DATA
1833deb3ec6SMatthias Ringwald //
1843deb3ec6SMatthias Ringwald 
1853deb3ec6SMatthias Ringwald static uint8_t test_use_fixed_local_csrk;
1863deb3ec6SMatthias Ringwald 
1873deb3ec6SMatthias Ringwald // configuration
1883deb3ec6SMatthias Ringwald static uint8_t sm_accepted_stk_generation_methods;
1893deb3ec6SMatthias Ringwald static uint8_t sm_max_encryption_key_size;
1903deb3ec6SMatthias Ringwald static uint8_t sm_min_encryption_key_size;
1913deb3ec6SMatthias Ringwald static uint8_t sm_auth_req = 0;
1923deb3ec6SMatthias Ringwald static uint8_t sm_io_capabilities = IO_CAPABILITY_NO_INPUT_NO_OUTPUT;
1933deb3ec6SMatthias Ringwald static uint8_t sm_slave_request_security;
19431c09488SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
195df86eb96SMatthias Ringwald static uint8_t sm_have_ec_keypair;
19631c09488SMatthias Ringwald #endif
1973deb3ec6SMatthias Ringwald 
1983deb3ec6SMatthias Ringwald // Security Manager Master Keys, please use sm_set_er(er) and sm_set_ir(ir) with your own 128 bit random values
1993deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_er;
2003deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_ir;
2013deb3ec6SMatthias Ringwald 
2023deb3ec6SMatthias Ringwald // derived from sm_persistent_ir
2033deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_dhk;
2043deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_irk;
2053deb3ec6SMatthias Ringwald static uint8_t  sm_persistent_irk_ready = 0;    // used for testing
2063deb3ec6SMatthias Ringwald static derived_key_generation_t dkg_state;
2073deb3ec6SMatthias Ringwald 
2083deb3ec6SMatthias Ringwald // derived from sm_persistent_er
2093deb3ec6SMatthias Ringwald // ..
2103deb3ec6SMatthias Ringwald 
2113deb3ec6SMatthias Ringwald // random address update
2123deb3ec6SMatthias Ringwald static random_address_update_t rau_state;
2133deb3ec6SMatthias Ringwald static bd_addr_t sm_random_address;
2143deb3ec6SMatthias Ringwald 
215514d35fcSMatthias Ringwald // CMAC Calculation: General
2167a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
2173deb3ec6SMatthias Ringwald static cmac_state_t sm_cmac_state;
2183deb3ec6SMatthias Ringwald static uint16_t     sm_cmac_message_len;
219514d35fcSMatthias Ringwald static sm_key_t     sm_cmac_k;
2203deb3ec6SMatthias Ringwald static sm_key_t     sm_cmac_x;
221514d35fcSMatthias Ringwald static sm_key_t     sm_cmac_m_last;
2223deb3ec6SMatthias Ringwald static uint8_t      sm_cmac_block_current;
2233deb3ec6SMatthias Ringwald static uint8_t      sm_cmac_block_count;
224514d35fcSMatthias Ringwald static uint8_t      (*sm_cmac_get_byte)(uint16_t offset);
225514d35fcSMatthias Ringwald static void         (*sm_cmac_done_handler)(uint8_t * hash);
2267a766ebfSMatthias Ringwald #endif
227514d35fcSMatthias Ringwald 
228514d35fcSMatthias Ringwald // CMAC for ATT Signed Writes
2297a766ebfSMatthias Ringwald #ifdef ENABLE_LE_SIGNED_WRITE
230514d35fcSMatthias Ringwald static uint8_t      sm_cmac_header[3];
231aec94140SMatthias Ringwald static const uint8_t * sm_cmac_message;
232514d35fcSMatthias Ringwald static uint8_t      sm_cmac_sign_counter[4];
2337a766ebfSMatthias Ringwald #endif
234514d35fcSMatthias Ringwald 
235514d35fcSMatthias Ringwald // CMAC for Secure Connection functions
236514d35fcSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
237aec94140SMatthias Ringwald static sm_connection_t * sm_cmac_connection;
238514d35fcSMatthias Ringwald static uint8_t           sm_cmac_sc_buffer[80];
239514d35fcSMatthias Ringwald #endif
2403deb3ec6SMatthias Ringwald 
2413deb3ec6SMatthias Ringwald // resolvable private address lookup / CSRK calculation
2423deb3ec6SMatthias Ringwald static int       sm_address_resolution_test;
2433deb3ec6SMatthias Ringwald static int       sm_address_resolution_ah_calculation_active;
2443deb3ec6SMatthias Ringwald static uint8_t   sm_address_resolution_addr_type;
2453deb3ec6SMatthias Ringwald static bd_addr_t sm_address_resolution_address;
2463deb3ec6SMatthias Ringwald static void *    sm_address_resolution_context;
2473deb3ec6SMatthias Ringwald static address_resolution_mode_t sm_address_resolution_mode;
2488f2a52f4SMatthias Ringwald static btstack_linked_list_t sm_address_resolution_general_queue;
2493deb3ec6SMatthias Ringwald 
2503deb3ec6SMatthias Ringwald // aes128 crypto engine. store current sm_connection_t in sm_aes128_context
2513deb3ec6SMatthias Ringwald static sm_aes128_state_t  sm_aes128_state;
2523deb3ec6SMatthias Ringwald static void *             sm_aes128_context;
2533deb3ec6SMatthias Ringwald 
2543deb3ec6SMatthias Ringwald // random engine. store context (ususally sm_connection_t)
2553deb3ec6SMatthias Ringwald static void * sm_random_context;
2563deb3ec6SMatthias Ringwald 
257e03e489aSMatthias Ringwald // to receive hci events
258e03e489aSMatthias Ringwald static btstack_packet_callback_registration_t hci_event_callback_registration;
259e03e489aSMatthias Ringwald 
26089a78d34SMatthias Ringwald /* to dispatch sm event */
26189a78d34SMatthias Ringwald static btstack_linked_list_t sm_event_handlers;
26289a78d34SMatthias Ringwald 
26309e4d397SMatthias Ringwald // LE Secure Connections
26409e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
26509e4d397SMatthias Ringwald static ec_key_generation_state_t ec_key_generation_state;
26609e4d397SMatthias Ringwald static uint8_t ec_d[32];
267fc5bff5fSMatthias Ringwald static uint8_t ec_q[64];
26809e4d397SMatthias Ringwald #endif
269df86eb96SMatthias Ringwald 
27027c32905SMatthias Ringwald // Software ECDH implementation provided by mbedtls
27127c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
272e722521aSMatthias Ringwald // group is always valid
273e722521aSMatthias Ringwald static mbedtls_ecp_group   mbedtls_ec_group;
27468437d83SMatthias Ringwald #ifndef HAVE_MALLOC
275ae4aa2b6SMatthias Ringwald // COMP Method with Window 2
276ae4aa2b6SMatthias Ringwald // 1300 bytes with 23 allocations
277ae4aa2b6SMatthias Ringwald // #define MBEDTLS_ALLOC_BUFFER_SIZE (1300+23*sizeof(void *))
278ae4aa2b6SMatthias Ringwald // NAIVE Method with safe cond assignments (without safe cond, order changes and allocations fail)
279ae4aa2b6SMatthias Ringwald #define MBEDTLS_ALLOC_BUFFER_SIZE (700+18*sizeof(void *))
280df86eb96SMatthias Ringwald static uint8_t mbedtls_memory_buffer[MBEDTLS_ALLOC_BUFFER_SIZE];
281d3bd9600SMatthias Ringwald #endif
28227c32905SMatthias Ringwald #endif
28327c32905SMatthias Ringwald 
2843deb3ec6SMatthias Ringwald //
2853deb3ec6SMatthias Ringwald // Volume 3, Part H, Chapter 24
2863deb3ec6SMatthias Ringwald // "Security shall be initiated by the Security Manager in the device in the master role.
2873deb3ec6SMatthias Ringwald // The device in the slave role shall be the responding device."
2883deb3ec6SMatthias Ringwald // -> master := initiator, slave := responder
2893deb3ec6SMatthias Ringwald //
2903deb3ec6SMatthias Ringwald 
2913deb3ec6SMatthias Ringwald // data needed for security setup
2923deb3ec6SMatthias Ringwald typedef struct sm_setup_context {
2933deb3ec6SMatthias Ringwald 
294ec820d77SMatthias Ringwald     btstack_timer_source_t sm_timeout;
2953deb3ec6SMatthias Ringwald 
2963deb3ec6SMatthias Ringwald     // used in all phases
2973deb3ec6SMatthias Ringwald     uint8_t   sm_pairing_failed_reason;
2983deb3ec6SMatthias Ringwald 
2993deb3ec6SMatthias Ringwald     // user response, (Phase 1 and/or 2)
3003deb3ec6SMatthias Ringwald     uint8_t   sm_user_response;
3013d7fe1e9SMatthias Ringwald     uint8_t   sm_keypress_notification;
3023deb3ec6SMatthias Ringwald 
3033deb3ec6SMatthias Ringwald     // defines which keys will be send after connection is encrypted - calculated during Phase 1, used Phase 3
3043deb3ec6SMatthias Ringwald     int       sm_key_distribution_send_set;
3053deb3ec6SMatthias Ringwald     int       sm_key_distribution_received_set;
3063deb3ec6SMatthias Ringwald 
3073deb3ec6SMatthias Ringwald     // Phase 2 (Pairing over SMP)
3083deb3ec6SMatthias Ringwald     stk_generation_method_t sm_stk_generation_method;
3093deb3ec6SMatthias Ringwald     sm_key_t  sm_tk;
31027c32905SMatthias Ringwald     uint8_t   sm_use_secure_connections;
3113deb3ec6SMatthias Ringwald 
3123deb3ec6SMatthias Ringwald     sm_key_t  sm_c1_t3_value;   // c1 calculation
3133deb3ec6SMatthias Ringwald     sm_pairing_packet_t sm_m_preq; // pairing request - needed only for c1
3143deb3ec6SMatthias Ringwald     sm_pairing_packet_t sm_s_pres; // pairing response - needed only for c1
3153deb3ec6SMatthias Ringwald     sm_key_t  sm_local_random;
3163deb3ec6SMatthias Ringwald     sm_key_t  sm_local_confirm;
3173deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_random;
3183deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_confirm;
3193deb3ec6SMatthias Ringwald     uint8_t   sm_m_addr_type;   // address and type can be removed
3203deb3ec6SMatthias Ringwald     uint8_t   sm_s_addr_type;   //  ''
3213deb3ec6SMatthias Ringwald     bd_addr_t sm_m_address;     //  ''
3223deb3ec6SMatthias Ringwald     bd_addr_t sm_s_address;     //  ''
3233deb3ec6SMatthias Ringwald     sm_key_t  sm_ltk;
3243deb3ec6SMatthias Ringwald 
32568437d83SMatthias Ringwald     uint8_t   sm_state_vars;
326e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
327fc5bff5fSMatthias Ringwald     uint8_t   sm_peer_q[64];    // also stores random for EC key generation during init
328446a8c36SMatthias Ringwald     sm_key_t  sm_peer_nonce;    // might be combined with sm_peer_random
329446a8c36SMatthias Ringwald     sm_key_t  sm_local_nonce;   // might be combined with sm_local_random
330e53be891SMatthias Ringwald     sm_key_t  sm_peer_dhkey_check;
331e53be891SMatthias Ringwald     sm_key_t  sm_local_dhkey_check;
332446a8c36SMatthias Ringwald     sm_key_t  sm_ra;
333446a8c36SMatthias Ringwald     sm_key_t  sm_rb;
3342bacf595SMatthias Ringwald     sm_key_t  sm_t;             // used for f5 and h6
335a9f29768SMatthias Ringwald     sm_key_t  sm_mackey;
3367df18c15SMatthias Ringwald     uint8_t   sm_passkey_bit;   // also stores number of generated random bytes for EC key generation
337e53be891SMatthias Ringwald #endif
33827c32905SMatthias Ringwald 
3393deb3ec6SMatthias Ringwald     // Phase 3
3403deb3ec6SMatthias Ringwald 
3413deb3ec6SMatthias Ringwald     // key distribution, we generate
3423deb3ec6SMatthias Ringwald     uint16_t  sm_local_y;
3433deb3ec6SMatthias Ringwald     uint16_t  sm_local_div;
3443deb3ec6SMatthias Ringwald     uint16_t  sm_local_ediv;
3453deb3ec6SMatthias Ringwald     uint8_t   sm_local_rand[8];
3463deb3ec6SMatthias Ringwald     sm_key_t  sm_local_ltk;
3473deb3ec6SMatthias Ringwald     sm_key_t  sm_local_csrk;
3483deb3ec6SMatthias Ringwald     sm_key_t  sm_local_irk;
3493deb3ec6SMatthias Ringwald     // sm_local_address/addr_type not needed
3503deb3ec6SMatthias Ringwald 
3513deb3ec6SMatthias Ringwald     // key distribution, received from peer
3523deb3ec6SMatthias Ringwald     uint16_t  sm_peer_y;
3533deb3ec6SMatthias Ringwald     uint16_t  sm_peer_div;
3543deb3ec6SMatthias Ringwald     uint16_t  sm_peer_ediv;
3553deb3ec6SMatthias Ringwald     uint8_t   sm_peer_rand[8];
3563deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_ltk;
3573deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_irk;
3583deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_csrk;
3593deb3ec6SMatthias Ringwald     uint8_t   sm_peer_addr_type;
3603deb3ec6SMatthias Ringwald     bd_addr_t sm_peer_address;
3613deb3ec6SMatthias Ringwald 
3623deb3ec6SMatthias Ringwald } sm_setup_context_t;
3633deb3ec6SMatthias Ringwald 
3643deb3ec6SMatthias Ringwald //
3653deb3ec6SMatthias Ringwald static sm_setup_context_t the_setup;
3663deb3ec6SMatthias Ringwald static sm_setup_context_t * setup = &the_setup;
3673deb3ec6SMatthias Ringwald 
3683deb3ec6SMatthias Ringwald // active connection - the one for which the_setup is used for
3693deb3ec6SMatthias Ringwald static uint16_t sm_active_connection = 0;
3703deb3ec6SMatthias Ringwald 
3713deb3ec6SMatthias Ringwald // @returns 1 if oob data is available
3723deb3ec6SMatthias Ringwald // stores oob data in provided 16 byte buffer if not null
3733deb3ec6SMatthias Ringwald static int (*sm_get_oob_data)(uint8_t addres_type, bd_addr_t addr, uint8_t * oob_data) = NULL;
3743deb3ec6SMatthias Ringwald 
3753deb3ec6SMatthias Ringwald // horizontal: initiator capabilities
3763deb3ec6SMatthias Ringwald // vertial:    responder capabilities
3773deb3ec6SMatthias Ringwald static const stk_generation_method_t stk_generation_method [5] [5] = {
3783deb3ec6SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       PK_INIT_INPUT,   JUST_WORKS,    PK_INIT_INPUT },
3793deb3ec6SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       PK_INIT_INPUT,   JUST_WORKS,    PK_INIT_INPUT },
3803deb3ec6SMatthias Ringwald     { PK_RESP_INPUT,   PK_RESP_INPUT,    OK_BOTH_INPUT,   JUST_WORKS,    PK_RESP_INPUT },
3813deb3ec6SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       JUST_WORKS,      JUST_WORKS,    JUST_WORKS    },
3823deb3ec6SMatthias Ringwald     { PK_RESP_INPUT,   PK_RESP_INPUT,    PK_INIT_INPUT,   JUST_WORKS,    PK_RESP_INPUT },
3833deb3ec6SMatthias Ringwald };
3843deb3ec6SMatthias Ringwald 
38527c32905SMatthias Ringwald // uses numeric comparison if one side has DisplayYesNo and KeyboardDisplay combinations
38627c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
38727c32905SMatthias Ringwald static const stk_generation_method_t stk_generation_method_with_secure_connection[5][5] = {
38827c32905SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       PK_INIT_INPUT,   JUST_WORKS,    PK_INIT_INPUT },
38927c32905SMatthias Ringwald     { JUST_WORKS,      NK_BOTH_INPUT,    PK_INIT_INPUT,   JUST_WORKS,    NK_BOTH_INPUT },
39027c32905SMatthias Ringwald     { PK_RESP_INPUT,   PK_RESP_INPUT,    OK_BOTH_INPUT,   JUST_WORKS,    PK_RESP_INPUT },
39127c32905SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       JUST_WORKS,      JUST_WORKS,    JUST_WORKS    },
39227c32905SMatthias Ringwald     { PK_RESP_INPUT,   NK_BOTH_INPUT,    PK_INIT_INPUT,   JUST_WORKS,    NK_BOTH_INPUT },
39327c32905SMatthias Ringwald };
39427c32905SMatthias Ringwald #endif
39527c32905SMatthias Ringwald 
3963deb3ec6SMatthias Ringwald static void sm_run(void);
397711e6c80SMatthias Ringwald static void sm_done_for_handle(hci_con_handle_t con_handle);
398711e6c80SMatthias Ringwald static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle);
3993deb3ec6SMatthias Ringwald static inline int sm_calc_actual_encryption_key_size(int other);
4003deb3ec6SMatthias Ringwald static int sm_validate_stk_generation_method(void);
4013deb3ec6SMatthias Ringwald 
4023deb3ec6SMatthias Ringwald static void log_info_hex16(const char * name, uint16_t value){
4033deb3ec6SMatthias Ringwald     log_info("%-6s 0x%04x", name, value);
4043deb3ec6SMatthias Ringwald }
4053deb3ec6SMatthias Ringwald 
4063deb3ec6SMatthias Ringwald // @returns 1 if all bytes are 0
4073764b551SMatthias Ringwald static int sm_is_null(uint8_t * data, int size){
4083deb3ec6SMatthias Ringwald     int i;
4093764b551SMatthias Ringwald     for (i=0; i < size ; i++){
4103764b551SMatthias Ringwald         if (data[i]) return 0;
4113deb3ec6SMatthias Ringwald     }
4123deb3ec6SMatthias Ringwald     return 1;
4133deb3ec6SMatthias Ringwald }
4143deb3ec6SMatthias Ringwald 
4153764b551SMatthias Ringwald static int sm_is_null_random(uint8_t random[8]){
4163764b551SMatthias Ringwald     return sm_is_null(random, 8);
4173764b551SMatthias Ringwald }
4183764b551SMatthias Ringwald 
4193764b551SMatthias Ringwald static int sm_is_null_key(uint8_t * key){
4203764b551SMatthias Ringwald     return sm_is_null(key, 16);
4213764b551SMatthias Ringwald }
4223764b551SMatthias Ringwald 
4233deb3ec6SMatthias Ringwald // Key utils
4243deb3ec6SMatthias Ringwald static void sm_reset_tk(void){
4253deb3ec6SMatthias Ringwald     int i;
4263deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
4273deb3ec6SMatthias Ringwald         setup->sm_tk[i] = 0;
4283deb3ec6SMatthias Ringwald     }
4293deb3ec6SMatthias Ringwald }
4303deb3ec6SMatthias Ringwald 
4313deb3ec6SMatthias Ringwald // "For example, if a 128-bit encryption key is 0x123456789ABCDEF0123456789ABCDEF0
4323deb3ec6SMatthias Ringwald // and it is reduced to 7 octets (56 bits), then the resulting key is 0x0000000000000000003456789ABCDEF0.""
4333deb3ec6SMatthias Ringwald static void sm_truncate_key(sm_key_t key, int max_encryption_size){
4343deb3ec6SMatthias Ringwald     int i;
4353deb3ec6SMatthias Ringwald     for (i = max_encryption_size ; i < 16 ; i++){
4363deb3ec6SMatthias Ringwald         key[15-i] = 0;
4373deb3ec6SMatthias Ringwald     }
4383deb3ec6SMatthias Ringwald }
4393deb3ec6SMatthias Ringwald 
4403deb3ec6SMatthias Ringwald // SMP Timeout implementation
4413deb3ec6SMatthias Ringwald 
4423deb3ec6SMatthias Ringwald // Upon transmission of the Pairing Request command or reception of the Pairing Request command,
4433deb3ec6SMatthias Ringwald // the Security Manager Timer shall be reset and started.
4443deb3ec6SMatthias Ringwald //
4453deb3ec6SMatthias Ringwald // The Security Manager Timer shall be reset when an L2CAP SMP command is queued for transmission.
4463deb3ec6SMatthias Ringwald //
4473deb3ec6SMatthias Ringwald // If the Security Manager Timer reaches 30 seconds, the procedure shall be considered to have failed,
4483deb3ec6SMatthias Ringwald // and the local higher layer shall be notified. No further SMP commands shall be sent over the L2CAP
4493deb3ec6SMatthias Ringwald // Security Manager Channel. A new SM procedure shall only be performed when a new physical link has been
4503deb3ec6SMatthias Ringwald // established.
4513deb3ec6SMatthias Ringwald 
452ec820d77SMatthias Ringwald static void sm_timeout_handler(btstack_timer_source_t * timer){
4533deb3ec6SMatthias Ringwald     log_info("SM timeout");
454c5b64319SMatthias Ringwald     sm_connection_t * sm_conn = (sm_connection_t*) btstack_run_loop_get_timer_context(timer);
4553deb3ec6SMatthias Ringwald     sm_conn->sm_engine_state = SM_GENERAL_TIMEOUT;
4563deb3ec6SMatthias Ringwald     sm_done_for_handle(sm_conn->sm_handle);
4573deb3ec6SMatthias Ringwald 
4583deb3ec6SMatthias Ringwald     // trigger handling of next ready connection
4593deb3ec6SMatthias Ringwald     sm_run();
4603deb3ec6SMatthias Ringwald }
4613deb3ec6SMatthias Ringwald static void sm_timeout_start(sm_connection_t * sm_conn){
462528a4a3bSMatthias Ringwald     btstack_run_loop_remove_timer(&setup->sm_timeout);
46391a977e8SMatthias Ringwald     btstack_run_loop_set_timer_context(&setup->sm_timeout, sm_conn);
464528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer_handler(&setup->sm_timeout, sm_timeout_handler);
465528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer(&setup->sm_timeout, 30000); // 30 seconds sm timeout
466528a4a3bSMatthias Ringwald     btstack_run_loop_add_timer(&setup->sm_timeout);
4673deb3ec6SMatthias Ringwald }
4683deb3ec6SMatthias Ringwald static void sm_timeout_stop(void){
469528a4a3bSMatthias Ringwald     btstack_run_loop_remove_timer(&setup->sm_timeout);
4703deb3ec6SMatthias Ringwald }
4713deb3ec6SMatthias Ringwald static void sm_timeout_reset(sm_connection_t * sm_conn){
4723deb3ec6SMatthias Ringwald     sm_timeout_stop();
4733deb3ec6SMatthias Ringwald     sm_timeout_start(sm_conn);
4743deb3ec6SMatthias Ringwald }
4753deb3ec6SMatthias Ringwald 
4763deb3ec6SMatthias Ringwald // end of sm timeout
4773deb3ec6SMatthias Ringwald 
4783deb3ec6SMatthias Ringwald // GAP Random Address updates
4793deb3ec6SMatthias Ringwald static gap_random_address_type_t gap_random_adress_type;
480ec820d77SMatthias Ringwald static btstack_timer_source_t gap_random_address_update_timer;
4813deb3ec6SMatthias Ringwald static uint32_t gap_random_adress_update_period;
4823deb3ec6SMatthias Ringwald 
4833deb3ec6SMatthias Ringwald static void gap_random_address_trigger(void){
4843deb3ec6SMatthias Ringwald     if (rau_state != RAU_IDLE) return;
4853deb3ec6SMatthias Ringwald     log_info("gap_random_address_trigger");
4863deb3ec6SMatthias Ringwald     rau_state = RAU_GET_RANDOM;
4873deb3ec6SMatthias Ringwald     sm_run();
4883deb3ec6SMatthias Ringwald }
4893deb3ec6SMatthias Ringwald 
490ec820d77SMatthias Ringwald static void gap_random_address_update_handler(btstack_timer_source_t * timer){
4919ec2630cSMatthias Ringwald     UNUSED(timer);
4929ec2630cSMatthias Ringwald 
4933deb3ec6SMatthias Ringwald     log_info("GAP Random Address Update due");
494528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer(&gap_random_address_update_timer, gap_random_adress_update_period);
495528a4a3bSMatthias Ringwald     btstack_run_loop_add_timer(&gap_random_address_update_timer);
4963deb3ec6SMatthias Ringwald     gap_random_address_trigger();
4973deb3ec6SMatthias Ringwald }
4983deb3ec6SMatthias Ringwald 
4993deb3ec6SMatthias Ringwald static void gap_random_address_update_start(void){
500528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer_handler(&gap_random_address_update_timer, gap_random_address_update_handler);
501528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer(&gap_random_address_update_timer, gap_random_adress_update_period);
502528a4a3bSMatthias Ringwald     btstack_run_loop_add_timer(&gap_random_address_update_timer);
5033deb3ec6SMatthias Ringwald }
5043deb3ec6SMatthias Ringwald 
5053deb3ec6SMatthias Ringwald static void gap_random_address_update_stop(void){
506528a4a3bSMatthias Ringwald     btstack_run_loop_remove_timer(&gap_random_address_update_timer);
5073deb3ec6SMatthias Ringwald }
5083deb3ec6SMatthias Ringwald 
5093deb3ec6SMatthias Ringwald 
5103deb3ec6SMatthias Ringwald static void sm_random_start(void * context){
5113deb3ec6SMatthias Ringwald     sm_random_context = context;
5123deb3ec6SMatthias Ringwald     hci_send_cmd(&hci_le_rand);
5133deb3ec6SMatthias Ringwald }
5143deb3ec6SMatthias Ringwald 
5153deb3ec6SMatthias Ringwald // pre: sm_aes128_state != SM_AES128_ACTIVE, hci_can_send_command == 1
5163deb3ec6SMatthias Ringwald // context is made availabe to aes128 result handler by this
5173deb3ec6SMatthias Ringwald static void sm_aes128_start(sm_key_t key, sm_key_t plaintext, void * context){
5183deb3ec6SMatthias Ringwald     sm_aes128_state = SM_AES128_ACTIVE;
5193deb3ec6SMatthias Ringwald     sm_key_t key_flipped, plaintext_flipped;
5209c80e4ccSMatthias Ringwald     reverse_128(key, key_flipped);
5219c80e4ccSMatthias Ringwald     reverse_128(plaintext, plaintext_flipped);
5223deb3ec6SMatthias Ringwald     sm_aes128_context = context;
5233deb3ec6SMatthias Ringwald     hci_send_cmd(&hci_le_encrypt, key_flipped, plaintext_flipped);
5243deb3ec6SMatthias Ringwald }
5253deb3ec6SMatthias Ringwald 
5263deb3ec6SMatthias Ringwald // ah(k,r) helper
5273deb3ec6SMatthias Ringwald // r = padding || r
5283deb3ec6SMatthias Ringwald // r - 24 bit value
5294a6806f3SMatthias Ringwald static void sm_ah_r_prime(uint8_t r[3], uint8_t * r_prime){
5303deb3ec6SMatthias Ringwald     // r'= padding || r
5313deb3ec6SMatthias Ringwald     memset(r_prime, 0, 16);
5323deb3ec6SMatthias Ringwald     memcpy(&r_prime[13], r, 3);
5333deb3ec6SMatthias Ringwald }
5343deb3ec6SMatthias Ringwald 
5353deb3ec6SMatthias Ringwald // d1 helper
5363deb3ec6SMatthias Ringwald // d' = padding || r || d
5373deb3ec6SMatthias Ringwald // d,r - 16 bit values
5384a6806f3SMatthias Ringwald static void sm_d1_d_prime(uint16_t d, uint16_t r, uint8_t * d1_prime){
5393deb3ec6SMatthias Ringwald     // d'= padding || r || d
5403deb3ec6SMatthias Ringwald     memset(d1_prime, 0, 16);
541f8fbdce0SMatthias Ringwald     big_endian_store_16(d1_prime, 12, r);
542f8fbdce0SMatthias Ringwald     big_endian_store_16(d1_prime, 14, d);
5433deb3ec6SMatthias Ringwald }
5443deb3ec6SMatthias Ringwald 
5453deb3ec6SMatthias Ringwald // dm helper
5463deb3ec6SMatthias Ringwald // r’ = padding || r
5473deb3ec6SMatthias Ringwald // r - 64 bit value
5484a6806f3SMatthias Ringwald static void sm_dm_r_prime(uint8_t r[8], uint8_t * r_prime){
5493deb3ec6SMatthias Ringwald     memset(r_prime, 0, 16);
5503deb3ec6SMatthias Ringwald     memcpy(&r_prime[8], r, 8);
5513deb3ec6SMatthias Ringwald }
5523deb3ec6SMatthias Ringwald 
5533deb3ec6SMatthias Ringwald // calculate arguments for first AES128 operation in C1 function
5544a6806f3SMatthias Ringwald static void sm_c1_t1(sm_key_t r, uint8_t preq[7], uint8_t pres[7], uint8_t iat, uint8_t rat, uint8_t * t1){
5553deb3ec6SMatthias Ringwald 
5563deb3ec6SMatthias Ringwald     // p1 = pres || preq || rat’ || iat’
5573deb3ec6SMatthias Ringwald     // "The octet of iat’ becomes the least significant octet of p1 and the most signifi-
5583deb3ec6SMatthias Ringwald     // cant octet of pres becomes the most significant octet of p1.
5593deb3ec6SMatthias Ringwald     // For example, if the 8-bit iat’ is 0x01, the 8-bit rat’ is 0x00, the 56-bit preq
5603deb3ec6SMatthias Ringwald     // is 0x07071000000101 and the 56 bit pres is 0x05000800000302 then
5613deb3ec6SMatthias Ringwald     // p1 is 0x05000800000302070710000001010001."
5623deb3ec6SMatthias Ringwald 
5633deb3ec6SMatthias Ringwald     sm_key_t p1;
5649c80e4ccSMatthias Ringwald     reverse_56(pres, &p1[0]);
5659c80e4ccSMatthias Ringwald     reverse_56(preq, &p1[7]);
5663deb3ec6SMatthias Ringwald     p1[14] = rat;
5673deb3ec6SMatthias Ringwald     p1[15] = iat;
5688314c363SMatthias Ringwald     log_info_key("p1", p1);
5698314c363SMatthias Ringwald     log_info_key("r", r);
5703deb3ec6SMatthias Ringwald 
5713deb3ec6SMatthias Ringwald     // t1 = r xor p1
5723deb3ec6SMatthias Ringwald     int i;
5733deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
5743deb3ec6SMatthias Ringwald         t1[i] = r[i] ^ p1[i];
5753deb3ec6SMatthias Ringwald     }
5768314c363SMatthias Ringwald     log_info_key("t1", t1);
5773deb3ec6SMatthias Ringwald }
5783deb3ec6SMatthias Ringwald 
5793deb3ec6SMatthias Ringwald // calculate arguments for second AES128 operation in C1 function
5804a6806f3SMatthias Ringwald static void sm_c1_t3(sm_key_t t2, bd_addr_t ia, bd_addr_t ra, uint8_t * t3){
5813deb3ec6SMatthias Ringwald      // p2 = padding || ia || ra
5823deb3ec6SMatthias Ringwald     // "The least significant octet of ra becomes the least significant octet of p2 and
5833deb3ec6SMatthias Ringwald     // the most significant octet of padding becomes the most significant octet of p2.
5843deb3ec6SMatthias Ringwald     // For example, if 48-bit ia is 0xA1A2A3A4A5A6 and the 48-bit ra is
5853deb3ec6SMatthias Ringwald     // 0xB1B2B3B4B5B6 then p2 is 0x00000000A1A2A3A4A5A6B1B2B3B4B5B6.
5863deb3ec6SMatthias Ringwald 
5873deb3ec6SMatthias Ringwald     sm_key_t p2;
5883deb3ec6SMatthias Ringwald     memset(p2, 0, 16);
5893deb3ec6SMatthias Ringwald     memcpy(&p2[4],  ia, 6);
5903deb3ec6SMatthias Ringwald     memcpy(&p2[10], ra, 6);
5918314c363SMatthias Ringwald     log_info_key("p2", p2);
5923deb3ec6SMatthias Ringwald 
5933deb3ec6SMatthias Ringwald     // c1 = e(k, t2_xor_p2)
5943deb3ec6SMatthias Ringwald     int i;
5953deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
5963deb3ec6SMatthias Ringwald         t3[i] = t2[i] ^ p2[i];
5973deb3ec6SMatthias Ringwald     }
5988314c363SMatthias Ringwald     log_info_key("t3", t3);
5993deb3ec6SMatthias Ringwald }
6003deb3ec6SMatthias Ringwald 
6014a6806f3SMatthias Ringwald static void sm_s1_r_prime(sm_key_t r1, sm_key_t r2, uint8_t * r_prime){
6028314c363SMatthias Ringwald     log_info_key("r1", r1);
6038314c363SMatthias Ringwald     log_info_key("r2", r2);
6043deb3ec6SMatthias Ringwald     memcpy(&r_prime[8], &r2[8], 8);
6053deb3ec6SMatthias Ringwald     memcpy(&r_prime[0], &r1[8], 8);
6063deb3ec6SMatthias Ringwald }
6073deb3ec6SMatthias Ringwald 
608e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
609e53be891SMatthias Ringwald // Software implementations of crypto toolbox for LE Secure Connection
610e53be891SMatthias Ringwald // TODO: replace with code to use AES Engine of HCI Controller
611e53be891SMatthias Ringwald typedef uint8_t sm_key24_t[3];
612e53be891SMatthias Ringwald typedef uint8_t sm_key56_t[7];
613e53be891SMatthias Ringwald typedef uint8_t sm_key256_t[32];
614e53be891SMatthias Ringwald 
615bd57ffebSMatthias Ringwald #if 0
616e53be891SMatthias Ringwald static void aes128_calc_cyphertext(const uint8_t key[16], const uint8_t plaintext[16], uint8_t cyphertext[16]){
617e53be891SMatthias Ringwald     uint32_t rk[RKLENGTH(KEYBITS)];
618e53be891SMatthias Ringwald     int nrounds = rijndaelSetupEncrypt(rk, &key[0], KEYBITS);
619e53be891SMatthias Ringwald     rijndaelEncrypt(rk, nrounds, plaintext, cyphertext);
620e53be891SMatthias Ringwald }
621e53be891SMatthias Ringwald 
622e53be891SMatthias Ringwald static void calc_subkeys(sm_key_t k0, sm_key_t k1, sm_key_t k2){
623e53be891SMatthias Ringwald     memcpy(k1, k0, 16);
624e53be891SMatthias Ringwald     sm_shift_left_by_one_bit_inplace(16, k1);
625e53be891SMatthias Ringwald     if (k0[0] & 0x80){
626e53be891SMatthias Ringwald         k1[15] ^= 0x87;
627e53be891SMatthias Ringwald     }
628e53be891SMatthias Ringwald     memcpy(k2, k1, 16);
629e53be891SMatthias Ringwald     sm_shift_left_by_one_bit_inplace(16, k2);
630e53be891SMatthias Ringwald     if (k1[0] & 0x80){
631e53be891SMatthias Ringwald         k2[15] ^= 0x87;
632e53be891SMatthias Ringwald     }
633e53be891SMatthias Ringwald }
634e53be891SMatthias Ringwald 
635e53be891SMatthias Ringwald static void aes_cmac(sm_key_t aes_cmac, const sm_key_t key, const uint8_t * data, int cmac_message_len){
636e53be891SMatthias Ringwald     sm_key_t k0, k1, k2, zero;
637e53be891SMatthias Ringwald     memset(zero, 0, 16);
638e53be891SMatthias Ringwald 
639e53be891SMatthias Ringwald     aes128_calc_cyphertext(key, zero, k0);
640e53be891SMatthias Ringwald     calc_subkeys(k0, k1, k2);
641e53be891SMatthias Ringwald 
642e53be891SMatthias Ringwald     int cmac_block_count = (cmac_message_len + 15) / 16;
643e53be891SMatthias Ringwald 
644e53be891SMatthias Ringwald     // step 3: ..
645e53be891SMatthias Ringwald     if (cmac_block_count==0){
646e53be891SMatthias Ringwald         cmac_block_count = 1;
647e53be891SMatthias Ringwald     }
648e53be891SMatthias Ringwald 
649e53be891SMatthias Ringwald     // step 4: set m_last
650e53be891SMatthias Ringwald     sm_key_t cmac_m_last;
651e53be891SMatthias Ringwald     int sm_cmac_last_block_complete = cmac_message_len != 0 && (cmac_message_len & 0x0f) == 0;
652e53be891SMatthias Ringwald     int i;
653e53be891SMatthias Ringwald     if (sm_cmac_last_block_complete){
654e53be891SMatthias Ringwald         for (i=0;i<16;i++){
655e53be891SMatthias Ringwald             cmac_m_last[i] = data[cmac_message_len - 16 + i] ^ k1[i];
656e53be891SMatthias Ringwald         }
657e53be891SMatthias Ringwald     } else {
658e53be891SMatthias Ringwald         int valid_octets_in_last_block = cmac_message_len & 0x0f;
659e53be891SMatthias Ringwald         for (i=0;i<16;i++){
660e53be891SMatthias Ringwald             if (i < valid_octets_in_last_block){
661e53be891SMatthias Ringwald                 cmac_m_last[i] = data[(cmac_message_len & 0xfff0) + i] ^ k2[i];
662e53be891SMatthias Ringwald                 continue;
663e53be891SMatthias Ringwald             }
664e53be891SMatthias Ringwald             if (i == valid_octets_in_last_block){
665e53be891SMatthias Ringwald                 cmac_m_last[i] = 0x80 ^ k2[i];
666e53be891SMatthias Ringwald                 continue;
667e53be891SMatthias Ringwald             }
668e53be891SMatthias Ringwald             cmac_m_last[i] = k2[i];
669e53be891SMatthias Ringwald         }
670e53be891SMatthias Ringwald     }
671e53be891SMatthias Ringwald 
672e53be891SMatthias Ringwald     // printf("sm_cmac_start: len %u, block count %u\n", cmac_message_len, cmac_block_count);
673e53be891SMatthias Ringwald     // LOG_KEY(cmac_m_last);
674e53be891SMatthias Ringwald 
675e53be891SMatthias Ringwald     // Step 5
676e53be891SMatthias Ringwald     sm_key_t cmac_x;
677e53be891SMatthias Ringwald     memset(cmac_x, 0, 16);
678e53be891SMatthias Ringwald 
679e53be891SMatthias Ringwald     // Step 6
680e53be891SMatthias Ringwald     sm_key_t sm_cmac_y;
681e53be891SMatthias Ringwald     for (int block = 0 ; block < cmac_block_count-1 ; block++){
682e53be891SMatthias Ringwald         for (i=0;i<16;i++){
683e53be891SMatthias Ringwald             sm_cmac_y[i] = cmac_x[i] ^ data[block * 16 + i];
684e53be891SMatthias Ringwald         }
685e53be891SMatthias Ringwald         aes128_calc_cyphertext(key, sm_cmac_y, cmac_x);
686e53be891SMatthias Ringwald     }
687e53be891SMatthias Ringwald     for (i=0;i<16;i++){
688e53be891SMatthias Ringwald         sm_cmac_y[i] = cmac_x[i] ^ cmac_m_last[i];
689e53be891SMatthias Ringwald     }
690e53be891SMatthias Ringwald 
691e53be891SMatthias Ringwald     // Step 7
692e53be891SMatthias Ringwald     aes128_calc_cyphertext(key, sm_cmac_y, aes_cmac);
693e53be891SMatthias Ringwald }
694bd57ffebSMatthias Ringwald #endif
695e53be891SMatthias Ringwald #endif
696e53be891SMatthias Ringwald 
697711e6c80SMatthias Ringwald static void sm_setup_event_base(uint8_t * event, int event_size, uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address){
6983deb3ec6SMatthias Ringwald     event[0] = type;
6993deb3ec6SMatthias Ringwald     event[1] = event_size - 2;
700711e6c80SMatthias Ringwald     little_endian_store_16(event, 2, con_handle);
7013deb3ec6SMatthias Ringwald     event[4] = addr_type;
702724d70a2SMatthias Ringwald     reverse_bd_addr(address, &event[5]);
7033deb3ec6SMatthias Ringwald }
7043deb3ec6SMatthias Ringwald 
70589a78d34SMatthias Ringwald static void sm_dispatch_event(uint8_t packet_type, uint16_t channel, uint8_t * packet, uint16_t size){
7069ec2630cSMatthias Ringwald     UNUSED(channel);
7079ec2630cSMatthias Ringwald 
70813377825SMatthias Ringwald     // log event
70913377825SMatthias Ringwald     hci_dump_packet(packet_type, 1, packet, size);
71089a78d34SMatthias Ringwald     // dispatch to all event handlers
71189a78d34SMatthias Ringwald     btstack_linked_list_iterator_t it;
71289a78d34SMatthias Ringwald     btstack_linked_list_iterator_init(&it, &sm_event_handlers);
71389a78d34SMatthias Ringwald     while (btstack_linked_list_iterator_has_next(&it)){
71489a78d34SMatthias Ringwald         btstack_packet_callback_registration_t * entry = (btstack_packet_callback_registration_t*) btstack_linked_list_iterator_next(&it);
715d9a7306aSMatthias Ringwald         entry->callback(packet_type, 0, packet, size);
71689a78d34SMatthias Ringwald     }
71789a78d34SMatthias Ringwald }
71889a78d34SMatthias Ringwald 
719711e6c80SMatthias Ringwald static void sm_notify_client_base(uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address){
7203deb3ec6SMatthias Ringwald     uint8_t event[11];
721711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
72289a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event));
7233deb3ec6SMatthias Ringwald }
7243deb3ec6SMatthias Ringwald 
725711e6c80SMatthias Ringwald static void sm_notify_client_passkey(uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address, uint32_t passkey){
7263deb3ec6SMatthias Ringwald     uint8_t event[15];
727711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
728f8fbdce0SMatthias Ringwald     little_endian_store_32(event, 11, passkey);
72989a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event));
7303deb3ec6SMatthias Ringwald }
7313deb3ec6SMatthias Ringwald 
732711e6c80SMatthias Ringwald static void sm_notify_client_index(uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address, uint16_t index){
73313377825SMatthias Ringwald     // fetch addr and addr type from db
73413377825SMatthias Ringwald     bd_addr_t identity_address;
73513377825SMatthias Ringwald     int identity_address_type;
73613377825SMatthias Ringwald     le_device_db_info(index, &identity_address_type, identity_address, NULL);
73713377825SMatthias Ringwald 
738334126b3SMatthias Ringwald     uint8_t event[19];
739711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
74013377825SMatthias Ringwald     event[11] = identity_address_type;
74113377825SMatthias Ringwald     reverse_bd_addr(identity_address, &event[12]);
742334126b3SMatthias Ringwald     event[18] = index;
74389a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event));
7443deb3ec6SMatthias Ringwald }
7453deb3ec6SMatthias Ringwald 
746711e6c80SMatthias Ringwald static void sm_notify_client_authorization(uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address, uint8_t result){
7473deb3ec6SMatthias Ringwald 
7483deb3ec6SMatthias Ringwald     uint8_t event[18];
749711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
7503deb3ec6SMatthias Ringwald     event[11] = result;
75189a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, (uint8_t*) &event, sizeof(event));
7523deb3ec6SMatthias Ringwald }
7533deb3ec6SMatthias Ringwald 
7543deb3ec6SMatthias Ringwald // decide on stk generation based on
7553deb3ec6SMatthias Ringwald // - pairing request
7563deb3ec6SMatthias Ringwald // - io capabilities
7573deb3ec6SMatthias Ringwald // - OOB data availability
7583deb3ec6SMatthias Ringwald static void sm_setup_tk(void){
7593deb3ec6SMatthias Ringwald 
7603deb3ec6SMatthias Ringwald     // default: just works
7613deb3ec6SMatthias Ringwald     setup->sm_stk_generation_method = JUST_WORKS;
7623deb3ec6SMatthias Ringwald 
76327c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
76427c32905SMatthias Ringwald     setup->sm_use_secure_connections = ( sm_pairing_packet_get_auth_req(setup->sm_m_preq)
76527c32905SMatthias Ringwald                                        & sm_pairing_packet_get_auth_req(setup->sm_s_pres)
76627c32905SMatthias Ringwald                                        & SM_AUTHREQ_SECURE_CONNECTION ) != 0;
767446a8c36SMatthias Ringwald     memset(setup->sm_ra, 0, 16);
768446a8c36SMatthias Ringwald     memset(setup->sm_rb, 0, 16);
76927c32905SMatthias Ringwald #else
77027c32905SMatthias Ringwald     setup->sm_use_secure_connections = 0;
77127c32905SMatthias Ringwald #endif
77227c32905SMatthias Ringwald 
77327c32905SMatthias Ringwald     // If both devices have not set the MITM option in the Authentication Requirements
77427c32905SMatthias Ringwald     // Flags, then the IO capabilities shall be ignored and the Just Works association
77527c32905SMatthias Ringwald     // model shall be used.
77627c32905SMatthias Ringwald     if (((sm_pairing_packet_get_auth_req(setup->sm_m_preq) & SM_AUTHREQ_MITM_PROTECTION) == 0)
77727c32905SMatthias Ringwald     &&  ((sm_pairing_packet_get_auth_req(setup->sm_s_pres) & SM_AUTHREQ_MITM_PROTECTION) == 0)){
77827c32905SMatthias Ringwald         log_info("SM: MITM not required by both -> JUST WORKS");
77927c32905SMatthias Ringwald         return;
78027c32905SMatthias Ringwald     }
78127c32905SMatthias Ringwald 
78227c32905SMatthias Ringwald     // TODO: with LE SC, OOB is used to transfer data OOB during pairing, single device with OOB is sufficient
78327c32905SMatthias Ringwald 
7843deb3ec6SMatthias Ringwald     // If both devices have out of band authentication data, then the Authentication
7853deb3ec6SMatthias Ringwald     // Requirements Flags shall be ignored when selecting the pairing method and the
7863deb3ec6SMatthias Ringwald     // Out of Band pairing method shall be used.
7871ad129beSMatthias Ringwald     if (sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq)
7881ad129beSMatthias Ringwald     &&  sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres)){
7893deb3ec6SMatthias Ringwald         log_info("SM: have OOB data");
7908314c363SMatthias Ringwald         log_info_key("OOB", setup->sm_tk);
7913deb3ec6SMatthias Ringwald         setup->sm_stk_generation_method = OOB;
7923deb3ec6SMatthias Ringwald         return;
7933deb3ec6SMatthias Ringwald     }
7943deb3ec6SMatthias Ringwald 
7953deb3ec6SMatthias Ringwald     // Reset TK as it has been setup in sm_init_setup
7963deb3ec6SMatthias Ringwald     sm_reset_tk();
7973deb3ec6SMatthias Ringwald 
7983deb3ec6SMatthias Ringwald     // Also use just works if unknown io capabilites
7998da2e96dSMatthias Ringwald     if ((sm_pairing_packet_get_io_capability(setup->sm_m_preq) > IO_CAPABILITY_KEYBOARD_DISPLAY) || (sm_pairing_packet_get_io_capability(setup->sm_s_pres) > IO_CAPABILITY_KEYBOARD_DISPLAY)){
8003deb3ec6SMatthias Ringwald         return;
8013deb3ec6SMatthias Ringwald     }
8023deb3ec6SMatthias Ringwald 
8033deb3ec6SMatthias Ringwald     // Otherwise the IO capabilities of the devices shall be used to determine the
8043deb3ec6SMatthias Ringwald     // pairing method as defined in Table 2.4.
80527c32905SMatthias Ringwald     // see http://stackoverflow.com/a/1052837/393697 for how to specify pointer to 2-dimensional array
80627c32905SMatthias Ringwald     const stk_generation_method_t (*generation_method)[5] = stk_generation_method;
80727c32905SMatthias Ringwald 
80827c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
809c6b7cbd9SMatthias Ringwald     // table not define by default
81027c32905SMatthias Ringwald     if (setup->sm_use_secure_connections){
81127c32905SMatthias Ringwald         generation_method = stk_generation_method_with_secure_connection;
81227c32905SMatthias Ringwald     }
81327c32905SMatthias Ringwald #endif
81427c32905SMatthias Ringwald     setup->sm_stk_generation_method = generation_method[sm_pairing_packet_get_io_capability(setup->sm_s_pres)][sm_pairing_packet_get_io_capability(setup->sm_m_preq)];
81527c32905SMatthias Ringwald 
8163deb3ec6SMatthias Ringwald     log_info("sm_setup_tk: master io cap: %u, slave io cap: %u -> method %u",
8171ad129beSMatthias Ringwald         sm_pairing_packet_get_io_capability(setup->sm_m_preq), sm_pairing_packet_get_io_capability(setup->sm_s_pres), setup->sm_stk_generation_method);
8183deb3ec6SMatthias Ringwald }
8193deb3ec6SMatthias Ringwald 
8203deb3ec6SMatthias Ringwald static int sm_key_distribution_flags_for_set(uint8_t key_set){
8213deb3ec6SMatthias Ringwald     int flags = 0;
8223deb3ec6SMatthias Ringwald     if (key_set & SM_KEYDIST_ENC_KEY){
8233deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION;
8243deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_MASTER_IDENTIFICATION;
8253deb3ec6SMatthias Ringwald     }
8263deb3ec6SMatthias Ringwald     if (key_set & SM_KEYDIST_ID_KEY){
8273deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_IDENTITY_INFORMATION;
8283deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION;
8293deb3ec6SMatthias Ringwald     }
8303deb3ec6SMatthias Ringwald     if (key_set & SM_KEYDIST_SIGN){
8313deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION;
8323deb3ec6SMatthias Ringwald     }
8333deb3ec6SMatthias Ringwald     return flags;
8343deb3ec6SMatthias Ringwald }
8353deb3ec6SMatthias Ringwald 
8363deb3ec6SMatthias Ringwald static void sm_setup_key_distribution(uint8_t key_set){
8373deb3ec6SMatthias Ringwald     setup->sm_key_distribution_received_set = 0;
8383deb3ec6SMatthias Ringwald     setup->sm_key_distribution_send_set = sm_key_distribution_flags_for_set(key_set);
8393deb3ec6SMatthias Ringwald }
8403deb3ec6SMatthias Ringwald 
8413deb3ec6SMatthias Ringwald // CSRK Key Lookup
8423deb3ec6SMatthias Ringwald 
8433deb3ec6SMatthias Ringwald 
8443deb3ec6SMatthias Ringwald static int sm_address_resolution_idle(void){
8453deb3ec6SMatthias Ringwald     return sm_address_resolution_mode == ADDRESS_RESOLUTION_IDLE;
8463deb3ec6SMatthias Ringwald }
8473deb3ec6SMatthias Ringwald 
848711e6c80SMatthias Ringwald static void sm_address_resolution_start_lookup(uint8_t addr_type, hci_con_handle_t con_handle, bd_addr_t addr, address_resolution_mode_t mode, void * context){
8493deb3ec6SMatthias Ringwald     memcpy(sm_address_resolution_address, addr, 6);
8503deb3ec6SMatthias Ringwald     sm_address_resolution_addr_type = addr_type;
8513deb3ec6SMatthias Ringwald     sm_address_resolution_test = 0;
8523deb3ec6SMatthias Ringwald     sm_address_resolution_mode = mode;
8533deb3ec6SMatthias Ringwald     sm_address_resolution_context = context;
854711e6c80SMatthias Ringwald     sm_notify_client_base(SM_EVENT_IDENTITY_RESOLVING_STARTED, con_handle, addr_type, addr);
8553deb3ec6SMatthias Ringwald }
8563deb3ec6SMatthias Ringwald 
8573deb3ec6SMatthias Ringwald int sm_address_resolution_lookup(uint8_t address_type, bd_addr_t address){
8583deb3ec6SMatthias Ringwald     // check if already in list
859665d90f2SMatthias Ringwald     btstack_linked_list_iterator_t it;
8603deb3ec6SMatthias Ringwald     sm_lookup_entry_t * entry;
861665d90f2SMatthias Ringwald     btstack_linked_list_iterator_init(&it, &sm_address_resolution_general_queue);
862665d90f2SMatthias Ringwald     while(btstack_linked_list_iterator_has_next(&it)){
863665d90f2SMatthias Ringwald         entry = (sm_lookup_entry_t *) btstack_linked_list_iterator_next(&it);
8643deb3ec6SMatthias Ringwald         if (entry->address_type != address_type) continue;
8653deb3ec6SMatthias Ringwald         if (memcmp(entry->address, address, 6))  continue;
8663deb3ec6SMatthias Ringwald         // already in list
8673deb3ec6SMatthias Ringwald         return BTSTACK_BUSY;
8683deb3ec6SMatthias Ringwald     }
8693deb3ec6SMatthias Ringwald     entry = btstack_memory_sm_lookup_entry_get();
8703deb3ec6SMatthias Ringwald     if (!entry) return BTSTACK_MEMORY_ALLOC_FAILED;
8713deb3ec6SMatthias Ringwald     entry->address_type = (bd_addr_type_t) address_type;
8723deb3ec6SMatthias Ringwald     memcpy(entry->address, address, 6);
873665d90f2SMatthias Ringwald     btstack_linked_list_add(&sm_address_resolution_general_queue, (btstack_linked_item_t *) entry);
8743deb3ec6SMatthias Ringwald     sm_run();
8753deb3ec6SMatthias Ringwald     return 0;
8763deb3ec6SMatthias Ringwald }
8773deb3ec6SMatthias Ringwald 
8783deb3ec6SMatthias Ringwald // while x_state++ for an enum is possible in C, it isn't in C++. we use this helpers to avoid compile errors for now
8793deb3ec6SMatthias Ringwald static inline void sm_next_responding_state(sm_connection_t * sm_conn){
8803deb3ec6SMatthias Ringwald     sm_conn->sm_engine_state = (security_manager_state_t) (((int)sm_conn->sm_engine_state) + 1);
8813deb3ec6SMatthias Ringwald }
8823deb3ec6SMatthias Ringwald static inline void dkg_next_state(void){
8833deb3ec6SMatthias Ringwald     dkg_state = (derived_key_generation_t) (((int)dkg_state) + 1);
8843deb3ec6SMatthias Ringwald }
8853deb3ec6SMatthias Ringwald static inline void rau_next_state(void){
8863deb3ec6SMatthias Ringwald     rau_state = (random_address_update_t) (((int)rau_state) + 1);
8873deb3ec6SMatthias Ringwald }
888514d35fcSMatthias Ringwald 
889514d35fcSMatthias Ringwald // CMAC calculation using AES Engine
8907a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
891514d35fcSMatthias Ringwald 
8923deb3ec6SMatthias Ringwald static inline void sm_cmac_next_state(void){
8933deb3ec6SMatthias Ringwald     sm_cmac_state = (cmac_state_t) (((int)sm_cmac_state) + 1);
8943deb3ec6SMatthias Ringwald }
895514d35fcSMatthias Ringwald 
8963deb3ec6SMatthias Ringwald static int sm_cmac_last_block_complete(void){
8973deb3ec6SMatthias Ringwald     if (sm_cmac_message_len == 0) return 0;
8983deb3ec6SMatthias Ringwald     return (sm_cmac_message_len & 0x0f) == 0;
8993deb3ec6SMatthias Ringwald }
900514d35fcSMatthias Ringwald 
9014dfd504aSMatthias Ringwald int sm_cmac_ready(void){
9024dfd504aSMatthias Ringwald     return sm_cmac_state == CMAC_IDLE;
9033deb3ec6SMatthias Ringwald }
9043deb3ec6SMatthias Ringwald 
905514d35fcSMatthias Ringwald // generic cmac calculation
906aec94140SMatthias Ringwald void sm_cmac_general_start(const sm_key_t key, uint16_t message_len, uint8_t (*get_byte_callback)(uint16_t offset), void (*done_callback)(uint8_t hash[8])){
907514d35fcSMatthias Ringwald     // Generalized CMAC
908514d35fcSMatthias Ringwald     memcpy(sm_cmac_k, key, 16);
9093deb3ec6SMatthias Ringwald     memset(sm_cmac_x, 0, 16);
910514d35fcSMatthias Ringwald     sm_cmac_block_current = 0;
911514d35fcSMatthias Ringwald     sm_cmac_message_len  = message_len;
912514d35fcSMatthias Ringwald     sm_cmac_done_handler = done_callback;
913514d35fcSMatthias Ringwald     sm_cmac_get_byte     = get_byte_callback;
9143deb3ec6SMatthias Ringwald 
9153deb3ec6SMatthias Ringwald     // step 2: n := ceil(len/const_Bsize);
9163deb3ec6SMatthias Ringwald     sm_cmac_block_count = (sm_cmac_message_len + 15) / 16;
9173deb3ec6SMatthias Ringwald 
9183deb3ec6SMatthias Ringwald     // step 3: ..
9193deb3ec6SMatthias Ringwald     if (sm_cmac_block_count==0){
9203deb3ec6SMatthias Ringwald         sm_cmac_block_count = 1;
9213deb3ec6SMatthias Ringwald     }
922514d35fcSMatthias Ringwald     log_info("sm_cmac_general_start: len %u, block count %u", sm_cmac_message_len, sm_cmac_block_count);
9233deb3ec6SMatthias Ringwald 
9243deb3ec6SMatthias Ringwald     // first, we need to compute l for k1, k2, and m_last
9253deb3ec6SMatthias Ringwald     sm_cmac_state = CMAC_CALC_SUBKEYS;
9263deb3ec6SMatthias Ringwald 
9273deb3ec6SMatthias Ringwald     // let's go
9283deb3ec6SMatthias Ringwald     sm_run();
9293deb3ec6SMatthias Ringwald }
9307a766ebfSMatthias Ringwald #endif
9313deb3ec6SMatthias Ringwald 
932514d35fcSMatthias Ringwald // cmac for ATT Message signing
9337a766ebfSMatthias Ringwald #ifdef ENABLE_LE_SIGNED_WRITE
9344dfd504aSMatthias Ringwald static uint8_t sm_cmac_signed_write_message_get_byte(uint16_t offset){
9354dfd504aSMatthias Ringwald     if (offset >= sm_cmac_message_len) {
9364dfd504aSMatthias Ringwald         log_error("sm_cmac_signed_write_message_get_byte. out of bounds, access %u, len %u", offset, sm_cmac_message_len);
9374dfd504aSMatthias Ringwald         return 0;
9384dfd504aSMatthias Ringwald     }
9394dfd504aSMatthias Ringwald 
9404dfd504aSMatthias Ringwald     offset = sm_cmac_message_len - 1 - offset;
9414dfd504aSMatthias Ringwald 
9424dfd504aSMatthias Ringwald     // sm_cmac_header[3] | message[] | sm_cmac_sign_counter[4]
9434dfd504aSMatthias Ringwald     if (offset < 3){
9444dfd504aSMatthias Ringwald         return sm_cmac_header[offset];
9454dfd504aSMatthias Ringwald     }
9464dfd504aSMatthias Ringwald     int actual_message_len_incl_header = sm_cmac_message_len - 4;
9474dfd504aSMatthias Ringwald     if (offset <  actual_message_len_incl_header){
9484dfd504aSMatthias Ringwald         return sm_cmac_message[offset - 3];
9494dfd504aSMatthias Ringwald     }
9504dfd504aSMatthias Ringwald     return sm_cmac_sign_counter[offset - actual_message_len_incl_header];
9514dfd504aSMatthias Ringwald }
9524dfd504aSMatthias Ringwald 
9534dfd504aSMatthias Ringwald void sm_cmac_signed_write_start(const sm_key_t k, uint8_t opcode, hci_con_handle_t con_handle, uint16_t message_len, const uint8_t * message, uint32_t sign_counter, void (*done_handler)(uint8_t * hash)){
954514d35fcSMatthias Ringwald     // ATT Message Signing
955514d35fcSMatthias Ringwald     sm_cmac_header[0] = opcode;
956514d35fcSMatthias Ringwald     little_endian_store_16(sm_cmac_header, 1, con_handle);
957514d35fcSMatthias Ringwald     little_endian_store_32(sm_cmac_sign_counter, 0, sign_counter);
958514d35fcSMatthias Ringwald     uint16_t total_message_len = 3 + message_len + 4;  // incl. virtually prepended att opcode, handle and appended sign_counter in LE
959514d35fcSMatthias Ringwald     sm_cmac_message = message;
9604dfd504aSMatthias Ringwald     sm_cmac_general_start(k, total_message_len, &sm_cmac_signed_write_message_get_byte, done_handler);
961514d35fcSMatthias Ringwald }
9627a766ebfSMatthias Ringwald #endif
963514d35fcSMatthias Ringwald 
9647a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
9653deb3ec6SMatthias Ringwald static void sm_cmac_handle_aes_engine_ready(void){
9663deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
9673deb3ec6SMatthias Ringwald         case CMAC_CALC_SUBKEYS: {
9683deb3ec6SMatthias Ringwald             sm_key_t const_zero;
9693deb3ec6SMatthias Ringwald             memset(const_zero, 0, 16);
9703deb3ec6SMatthias Ringwald             sm_cmac_next_state();
9713deb3ec6SMatthias Ringwald             sm_aes128_start(sm_cmac_k, const_zero, NULL);
9723deb3ec6SMatthias Ringwald             break;
9733deb3ec6SMatthias Ringwald         }
9743deb3ec6SMatthias Ringwald         case CMAC_CALC_MI: {
9753deb3ec6SMatthias Ringwald             int j;
9763deb3ec6SMatthias Ringwald             sm_key_t y;
9773deb3ec6SMatthias Ringwald             for (j=0;j<16;j++){
978514d35fcSMatthias Ringwald                 y[j] = sm_cmac_x[j] ^ sm_cmac_get_byte(sm_cmac_block_current*16 + j);
9793deb3ec6SMatthias Ringwald             }
9803deb3ec6SMatthias Ringwald             sm_cmac_block_current++;
9813deb3ec6SMatthias Ringwald             sm_cmac_next_state();
9823deb3ec6SMatthias Ringwald             sm_aes128_start(sm_cmac_k, y, NULL);
9833deb3ec6SMatthias Ringwald             break;
9843deb3ec6SMatthias Ringwald         }
9853deb3ec6SMatthias Ringwald         case CMAC_CALC_MLAST: {
9863deb3ec6SMatthias Ringwald             int i;
9873deb3ec6SMatthias Ringwald             sm_key_t y;
9883deb3ec6SMatthias Ringwald             for (i=0;i<16;i++){
9893deb3ec6SMatthias Ringwald                 y[i] = sm_cmac_x[i] ^ sm_cmac_m_last[i];
9903deb3ec6SMatthias Ringwald             }
9918314c363SMatthias Ringwald             log_info_key("Y", y);
9923deb3ec6SMatthias Ringwald             sm_cmac_block_current++;
9933deb3ec6SMatthias Ringwald             sm_cmac_next_state();
9943deb3ec6SMatthias Ringwald             sm_aes128_start(sm_cmac_k, y, NULL);
9953deb3ec6SMatthias Ringwald             break;
9963deb3ec6SMatthias Ringwald         }
9973deb3ec6SMatthias Ringwald         default:
9983deb3ec6SMatthias Ringwald             log_info("sm_cmac_handle_aes_engine_ready called in state %u", sm_cmac_state);
9993deb3ec6SMatthias Ringwald             break;
10003deb3ec6SMatthias Ringwald     }
10013deb3ec6SMatthias Ringwald }
10023deb3ec6SMatthias Ringwald 
10037a766ebfSMatthias Ringwald // CMAC Implementation using AES128 engine
10047a766ebfSMatthias Ringwald static void sm_shift_left_by_one_bit_inplace(int len, uint8_t * data){
10057a766ebfSMatthias Ringwald     int i;
10067a766ebfSMatthias Ringwald     int carry = 0;
10077a766ebfSMatthias Ringwald     for (i=len-1; i >= 0 ; i--){
10087a766ebfSMatthias Ringwald         int new_carry = data[i] >> 7;
10097a766ebfSMatthias Ringwald         data[i] = data[i] << 1 | carry;
10107a766ebfSMatthias Ringwald         carry = new_carry;
10117a766ebfSMatthias Ringwald     }
10127a766ebfSMatthias Ringwald }
10137a766ebfSMatthias Ringwald 
10143deb3ec6SMatthias Ringwald static void sm_cmac_handle_encryption_result(sm_key_t data){
10153deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
10163deb3ec6SMatthias Ringwald         case CMAC_W4_SUBKEYS: {
10173deb3ec6SMatthias Ringwald             sm_key_t k1;
10183deb3ec6SMatthias Ringwald             memcpy(k1, data, 16);
10193deb3ec6SMatthias Ringwald             sm_shift_left_by_one_bit_inplace(16, k1);
10203deb3ec6SMatthias Ringwald             if (data[0] & 0x80){
10213deb3ec6SMatthias Ringwald                 k1[15] ^= 0x87;
10223deb3ec6SMatthias Ringwald             }
10233deb3ec6SMatthias Ringwald             sm_key_t k2;
10243deb3ec6SMatthias Ringwald             memcpy(k2, k1, 16);
10253deb3ec6SMatthias Ringwald             sm_shift_left_by_one_bit_inplace(16, k2);
10263deb3ec6SMatthias Ringwald             if (k1[0] & 0x80){
10273deb3ec6SMatthias Ringwald                 k2[15] ^= 0x87;
10283deb3ec6SMatthias Ringwald             }
10293deb3ec6SMatthias Ringwald 
10308314c363SMatthias Ringwald             log_info_key("k", sm_cmac_k);
10318314c363SMatthias Ringwald             log_info_key("k1", k1);
10328314c363SMatthias Ringwald             log_info_key("k2", k2);
10333deb3ec6SMatthias Ringwald 
10343deb3ec6SMatthias Ringwald             // step 4: set m_last
10353deb3ec6SMatthias Ringwald             int i;
10363deb3ec6SMatthias Ringwald             if (sm_cmac_last_block_complete()){
10373deb3ec6SMatthias Ringwald                 for (i=0;i<16;i++){
1038514d35fcSMatthias Ringwald                     sm_cmac_m_last[i] = sm_cmac_get_byte(sm_cmac_message_len - 16 + i) ^ k1[i];
10393deb3ec6SMatthias Ringwald                 }
10403deb3ec6SMatthias Ringwald             } else {
10413deb3ec6SMatthias Ringwald                 int valid_octets_in_last_block = sm_cmac_message_len & 0x0f;
10423deb3ec6SMatthias Ringwald                 for (i=0;i<16;i++){
10433deb3ec6SMatthias Ringwald                     if (i < valid_octets_in_last_block){
1044514d35fcSMatthias Ringwald                         sm_cmac_m_last[i] = sm_cmac_get_byte((sm_cmac_message_len & 0xfff0) + i) ^ k2[i];
10453deb3ec6SMatthias Ringwald                         continue;
10463deb3ec6SMatthias Ringwald                     }
10473deb3ec6SMatthias Ringwald                     if (i == valid_octets_in_last_block){
10483deb3ec6SMatthias Ringwald                         sm_cmac_m_last[i] = 0x80 ^ k2[i];
10493deb3ec6SMatthias Ringwald                         continue;
10503deb3ec6SMatthias Ringwald                     }
10513deb3ec6SMatthias Ringwald                     sm_cmac_m_last[i] = k2[i];
10523deb3ec6SMatthias Ringwald                 }
10533deb3ec6SMatthias Ringwald             }
10543deb3ec6SMatthias Ringwald 
10553deb3ec6SMatthias Ringwald             // next
10563deb3ec6SMatthias Ringwald             sm_cmac_state = sm_cmac_block_current < sm_cmac_block_count - 1 ? CMAC_CALC_MI : CMAC_CALC_MLAST;
10573deb3ec6SMatthias Ringwald             break;
10583deb3ec6SMatthias Ringwald         }
10593deb3ec6SMatthias Ringwald         case CMAC_W4_MI:
10603deb3ec6SMatthias Ringwald             memcpy(sm_cmac_x, data, 16);
10613deb3ec6SMatthias Ringwald             sm_cmac_state = sm_cmac_block_current < sm_cmac_block_count - 1 ? CMAC_CALC_MI : CMAC_CALC_MLAST;
10623deb3ec6SMatthias Ringwald             break;
10633deb3ec6SMatthias Ringwald         case CMAC_W4_MLAST:
10643deb3ec6SMatthias Ringwald             // done
10650346c37cSMatthias Ringwald             log_info("Setting CMAC Engine to IDLE");
10660346c37cSMatthias Ringwald             sm_cmac_state = CMAC_IDLE;
10678314c363SMatthias Ringwald             log_info_key("CMAC", data);
10683deb3ec6SMatthias Ringwald             sm_cmac_done_handler(data);
10693deb3ec6SMatthias Ringwald             break;
10703deb3ec6SMatthias Ringwald         default:
10713deb3ec6SMatthias Ringwald             log_info("sm_cmac_handle_encryption_result called in state %u", sm_cmac_state);
10723deb3ec6SMatthias Ringwald             break;
10733deb3ec6SMatthias Ringwald     }
10743deb3ec6SMatthias Ringwald }
10757a766ebfSMatthias Ringwald #endif
10763deb3ec6SMatthias Ringwald 
10773deb3ec6SMatthias Ringwald static void sm_trigger_user_response(sm_connection_t * sm_conn){
1078446a8c36SMatthias Ringwald     // notify client for: JUST WORKS confirm, Numeric comparison confirm, PASSKEY display or input
10793deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_IDLE;
10803deb3ec6SMatthias Ringwald     switch (setup->sm_stk_generation_method){
10813deb3ec6SMatthias Ringwald         case PK_RESP_INPUT:
108242134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
10833deb3ec6SMatthias Ringwald                 setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10845611a760SMatthias Ringwald                 sm_notify_client_base(SM_EVENT_PASSKEY_INPUT_NUMBER, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address);
10853deb3ec6SMatthias Ringwald             } else {
1086c9b8fdd9SMatthias Ringwald                 sm_notify_client_passkey(SM_EVENT_PASSKEY_DISPLAY_NUMBER, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, big_endian_read_32(setup->sm_tk, 12));
10873deb3ec6SMatthias Ringwald             }
10883deb3ec6SMatthias Ringwald             break;
10893deb3ec6SMatthias Ringwald         case PK_INIT_INPUT:
109042134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
1091c9b8fdd9SMatthias Ringwald                 sm_notify_client_passkey(SM_EVENT_PASSKEY_DISPLAY_NUMBER, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, big_endian_read_32(setup->sm_tk, 12));
10923deb3ec6SMatthias Ringwald             } else {
10933deb3ec6SMatthias Ringwald                 setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10945611a760SMatthias Ringwald                 sm_notify_client_base(SM_EVENT_PASSKEY_INPUT_NUMBER, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address);
10953deb3ec6SMatthias Ringwald             }
10963deb3ec6SMatthias Ringwald             break;
10973deb3ec6SMatthias Ringwald         case OK_BOTH_INPUT:
10983deb3ec6SMatthias Ringwald             setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10995611a760SMatthias Ringwald             sm_notify_client_base(SM_EVENT_PASSKEY_INPUT_NUMBER, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address);
11003deb3ec6SMatthias Ringwald             break;
110127c32905SMatthias Ringwald         case NK_BOTH_INPUT:
1102446a8c36SMatthias Ringwald             setup->sm_user_response = SM_USER_RESPONSE_PENDING;
1103c8c46d51SMatthias Ringwald             sm_notify_client_passkey(SM_EVENT_NUMERIC_COMPARISON_REQUEST, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, big_endian_read_32(setup->sm_tk, 12));
110427c32905SMatthias Ringwald             break;
11053deb3ec6SMatthias Ringwald         case JUST_WORKS:
11063deb3ec6SMatthias Ringwald             setup->sm_user_response = SM_USER_RESPONSE_PENDING;
11075611a760SMatthias Ringwald             sm_notify_client_base(SM_EVENT_JUST_WORKS_REQUEST, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address);
11083deb3ec6SMatthias Ringwald             break;
11093deb3ec6SMatthias Ringwald         case OOB:
11103deb3ec6SMatthias Ringwald             // client already provided OOB data, let's skip notification.
11113deb3ec6SMatthias Ringwald             break;
11123deb3ec6SMatthias Ringwald     }
11133deb3ec6SMatthias Ringwald }
11143deb3ec6SMatthias Ringwald 
11153deb3ec6SMatthias Ringwald static int sm_key_distribution_all_received(sm_connection_t * sm_conn){
11163deb3ec6SMatthias Ringwald     int recv_flags;
111742134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
111852f9cf63SMatthias Ringwald         // slave / responder
11191ad129beSMatthias Ringwald         recv_flags = sm_key_distribution_flags_for_set(sm_pairing_packet_get_initiator_key_distribution(setup->sm_s_pres));
11203deb3ec6SMatthias Ringwald     } else {
11213deb3ec6SMatthias Ringwald         // master / initiator
11221ad129beSMatthias Ringwald         recv_flags = sm_key_distribution_flags_for_set(sm_pairing_packet_get_responder_key_distribution(setup->sm_s_pres));
11233deb3ec6SMatthias Ringwald     }
11243deb3ec6SMatthias Ringwald     log_debug("sm_key_distribution_all_received: received 0x%02x, expecting 0x%02x", setup->sm_key_distribution_received_set, recv_flags);
11253deb3ec6SMatthias Ringwald     return recv_flags == setup->sm_key_distribution_received_set;
11263deb3ec6SMatthias Ringwald }
11273deb3ec6SMatthias Ringwald 
1128711e6c80SMatthias Ringwald static void sm_done_for_handle(hci_con_handle_t con_handle){
1129711e6c80SMatthias Ringwald     if (sm_active_connection == con_handle){
11303deb3ec6SMatthias Ringwald         sm_timeout_stop();
11313deb3ec6SMatthias Ringwald         sm_active_connection = 0;
1132711e6c80SMatthias Ringwald         log_info("sm: connection 0x%x released setup context", con_handle);
11333deb3ec6SMatthias Ringwald     }
11343deb3ec6SMatthias Ringwald }
11353deb3ec6SMatthias Ringwald 
11363deb3ec6SMatthias Ringwald static int sm_key_distribution_flags_for_auth_req(void){
11373deb3ec6SMatthias Ringwald     int flags = SM_KEYDIST_ID_KEY | SM_KEYDIST_SIGN;
11383deb3ec6SMatthias Ringwald     if (sm_auth_req & SM_AUTHREQ_BONDING){
11393deb3ec6SMatthias Ringwald         // encryption information only if bonding requested
11403deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_ENC_KEY;
11413deb3ec6SMatthias Ringwald     }
11423deb3ec6SMatthias Ringwald     return flags;
11433deb3ec6SMatthias Ringwald }
11443deb3ec6SMatthias Ringwald 
1145d7471931SMatthias Ringwald static void sm_reset_setup(void){
11463deb3ec6SMatthias Ringwald     // fill in sm setup
1147901c000fSMatthias Ringwald     setup->sm_state_vars = 0;
11483d7fe1e9SMatthias Ringwald     setup->sm_keypress_notification = 0xff;
11493deb3ec6SMatthias Ringwald     sm_reset_tk();
1150d7471931SMatthias Ringwald }
1151d7471931SMatthias Ringwald 
1152d7471931SMatthias Ringwald static void sm_init_setup(sm_connection_t * sm_conn){
1153d7471931SMatthias Ringwald 
1154d7471931SMatthias Ringwald     // fill in sm setup
11553deb3ec6SMatthias Ringwald     setup->sm_peer_addr_type = sm_conn->sm_peer_addr_type;
11563deb3ec6SMatthias Ringwald     memcpy(setup->sm_peer_address, sm_conn->sm_peer_address, 6);
11573deb3ec6SMatthias Ringwald 
11583deb3ec6SMatthias Ringwald     // query client for OOB data
11593deb3ec6SMatthias Ringwald     int have_oob_data = 0;
11603deb3ec6SMatthias Ringwald     if (sm_get_oob_data) {
11613deb3ec6SMatthias Ringwald         have_oob_data = (*sm_get_oob_data)(sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, setup->sm_tk);
11623deb3ec6SMatthias Ringwald     }
11633deb3ec6SMatthias Ringwald 
11643deb3ec6SMatthias Ringwald     sm_pairing_packet_t * local_packet;
116542134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
11663deb3ec6SMatthias Ringwald         // slave
11673deb3ec6SMatthias Ringwald         local_packet = &setup->sm_s_pres;
1168b95a5a35SMatthias Ringwald         gap_le_get_own_address(&setup->sm_s_addr_type, setup->sm_s_address);
11693deb3ec6SMatthias Ringwald         setup->sm_m_addr_type = sm_conn->sm_peer_addr_type;
11703deb3ec6SMatthias Ringwald         memcpy(setup->sm_m_address, sm_conn->sm_peer_address, 6);
11713deb3ec6SMatthias Ringwald     } else {
11723deb3ec6SMatthias Ringwald         // master
11733deb3ec6SMatthias Ringwald         local_packet = &setup->sm_m_preq;
1174b95a5a35SMatthias Ringwald         gap_le_get_own_address(&setup->sm_m_addr_type, setup->sm_m_address);
11753deb3ec6SMatthias Ringwald         setup->sm_s_addr_type = sm_conn->sm_peer_addr_type;
11763deb3ec6SMatthias Ringwald         memcpy(setup->sm_s_address, sm_conn->sm_peer_address, 6);
11773deb3ec6SMatthias Ringwald 
11783deb3ec6SMatthias Ringwald         int key_distribution_flags = sm_key_distribution_flags_for_auth_req();
11791ad129beSMatthias Ringwald         sm_pairing_packet_set_initiator_key_distribution(setup->sm_m_preq, key_distribution_flags);
11801ad129beSMatthias Ringwald         sm_pairing_packet_set_responder_key_distribution(setup->sm_m_preq, key_distribution_flags);
11813deb3ec6SMatthias Ringwald     }
11823deb3ec6SMatthias Ringwald 
1183df86eb96SMatthias Ringwald     uint8_t auth_req = sm_auth_req;
11841ad129beSMatthias Ringwald     sm_pairing_packet_set_io_capability(*local_packet, sm_io_capabilities);
11851ad129beSMatthias Ringwald     sm_pairing_packet_set_oob_data_flag(*local_packet, have_oob_data);
1186df86eb96SMatthias Ringwald     sm_pairing_packet_set_auth_req(*local_packet, auth_req);
11871ad129beSMatthias Ringwald     sm_pairing_packet_set_max_encryption_key_size(*local_packet, sm_max_encryption_key_size);
11883deb3ec6SMatthias Ringwald }
11893deb3ec6SMatthias Ringwald 
11903deb3ec6SMatthias Ringwald static int sm_stk_generation_init(sm_connection_t * sm_conn){
11913deb3ec6SMatthias Ringwald 
11923deb3ec6SMatthias Ringwald     sm_pairing_packet_t * remote_packet;
11933deb3ec6SMatthias Ringwald     int                   remote_key_request;
119442134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
119552f9cf63SMatthias Ringwald         // slave / responder
11963deb3ec6SMatthias Ringwald         remote_packet      = &setup->sm_m_preq;
11971ad129beSMatthias Ringwald         remote_key_request = sm_pairing_packet_get_responder_key_distribution(setup->sm_m_preq);
11983deb3ec6SMatthias Ringwald     } else {
11993deb3ec6SMatthias Ringwald         // master / initiator
12003deb3ec6SMatthias Ringwald         remote_packet      = &setup->sm_s_pres;
12011ad129beSMatthias Ringwald         remote_key_request = sm_pairing_packet_get_initiator_key_distribution(setup->sm_s_pres);
12023deb3ec6SMatthias Ringwald     }
12033deb3ec6SMatthias Ringwald 
12043deb3ec6SMatthias Ringwald     // check key size
12051ad129beSMatthias Ringwald     sm_conn->sm_actual_encryption_key_size = sm_calc_actual_encryption_key_size(sm_pairing_packet_get_max_encryption_key_size(*remote_packet));
12063deb3ec6SMatthias Ringwald     if (sm_conn->sm_actual_encryption_key_size == 0) return SM_REASON_ENCRYPTION_KEY_SIZE;
12073deb3ec6SMatthias Ringwald 
12083deb3ec6SMatthias Ringwald     // decide on STK generation method
12093deb3ec6SMatthias Ringwald     sm_setup_tk();
12103deb3ec6SMatthias Ringwald     log_info("SMP: generation method %u", setup->sm_stk_generation_method);
12113deb3ec6SMatthias Ringwald 
12123deb3ec6SMatthias Ringwald     // check if STK generation method is acceptable by client
12133deb3ec6SMatthias Ringwald     if (!sm_validate_stk_generation_method()) return SM_REASON_AUTHENTHICATION_REQUIREMENTS;
12143deb3ec6SMatthias Ringwald 
121552f9cf63SMatthias Ringwald     // identical to responder
121652f9cf63SMatthias Ringwald     sm_setup_key_distribution(remote_key_request);
121752f9cf63SMatthias Ringwald 
12183deb3ec6SMatthias Ringwald     // JUST WORKS doens't provide authentication
12193deb3ec6SMatthias Ringwald     sm_conn->sm_connection_authenticated = setup->sm_stk_generation_method == JUST_WORKS ? 0 : 1;
12203deb3ec6SMatthias Ringwald 
12213deb3ec6SMatthias Ringwald     return 0;
12223deb3ec6SMatthias Ringwald }
12233deb3ec6SMatthias Ringwald 
12243deb3ec6SMatthias Ringwald static void sm_address_resolution_handle_event(address_resolution_event_t event){
12253deb3ec6SMatthias Ringwald 
12263deb3ec6SMatthias Ringwald     // cache and reset context
12273deb3ec6SMatthias Ringwald     int matched_device_id = sm_address_resolution_test;
12283deb3ec6SMatthias Ringwald     address_resolution_mode_t mode = sm_address_resolution_mode;
12293deb3ec6SMatthias Ringwald     void * context = sm_address_resolution_context;
12303deb3ec6SMatthias Ringwald 
12313deb3ec6SMatthias Ringwald     // reset context
12323deb3ec6SMatthias Ringwald     sm_address_resolution_mode = ADDRESS_RESOLUTION_IDLE;
12333deb3ec6SMatthias Ringwald     sm_address_resolution_context = NULL;
12343deb3ec6SMatthias Ringwald     sm_address_resolution_test = -1;
1235711e6c80SMatthias Ringwald     hci_con_handle_t con_handle = 0;
12363deb3ec6SMatthias Ringwald 
12373deb3ec6SMatthias Ringwald     sm_connection_t * sm_connection;
123842134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
1239d2e90122SMatthias Ringwald     sm_key_t ltk;
124042134bc6SMatthias Ringwald #endif
12413deb3ec6SMatthias Ringwald     switch (mode){
12423deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_GENERAL:
12433deb3ec6SMatthias Ringwald             break;
12443deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_FOR_CONNECTION:
12453deb3ec6SMatthias Ringwald             sm_connection = (sm_connection_t *) context;
1246711e6c80SMatthias Ringwald             con_handle = sm_connection->sm_handle;
12473deb3ec6SMatthias Ringwald             switch (event){
12483deb3ec6SMatthias Ringwald                 case ADDRESS_RESOLUTION_SUCEEDED:
12493deb3ec6SMatthias Ringwald                     sm_connection->sm_irk_lookup_state = IRK_LOOKUP_SUCCEEDED;
12503deb3ec6SMatthias Ringwald                     sm_connection->sm_le_db_index = matched_device_id;
12513deb3ec6SMatthias Ringwald                     log_info("ADDRESS_RESOLUTION_SUCEEDED, index %d", sm_connection->sm_le_db_index);
125242134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
12533deb3ec6SMatthias Ringwald                     if (sm_connection->sm_role) break;
12543deb3ec6SMatthias Ringwald                     if (!sm_connection->sm_bonding_requested && !sm_connection->sm_security_request_received) break;
12553deb3ec6SMatthias Ringwald                     sm_connection->sm_security_request_received = 0;
12563deb3ec6SMatthias Ringwald                     sm_connection->sm_bonding_requested = 0;
1257d2e90122SMatthias Ringwald                     le_device_db_encryption_get(sm_connection->sm_le_db_index, NULL, NULL, ltk, NULL, NULL, NULL);
1258d2e90122SMatthias Ringwald                     if (!sm_is_null_key(ltk)){
12593deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK;
12603deb3ec6SMatthias Ringwald                     } else {
12613deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
12623deb3ec6SMatthias Ringwald                     }
126342134bc6SMatthias Ringwald #endif
12643deb3ec6SMatthias Ringwald                     break;
12653deb3ec6SMatthias Ringwald                 case ADDRESS_RESOLUTION_FAILED:
12663deb3ec6SMatthias Ringwald                     sm_connection->sm_irk_lookup_state = IRK_LOOKUP_FAILED;
126742134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
12683deb3ec6SMatthias Ringwald                     if (sm_connection->sm_role) break;
12693deb3ec6SMatthias Ringwald                     if (!sm_connection->sm_bonding_requested && !sm_connection->sm_security_request_received) break;
12703deb3ec6SMatthias Ringwald                     sm_connection->sm_security_request_received = 0;
12713deb3ec6SMatthias Ringwald                     sm_connection->sm_bonding_requested = 0;
12723deb3ec6SMatthias Ringwald                     sm_connection->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
127342134bc6SMatthias Ringwald #endif
12743deb3ec6SMatthias Ringwald                     break;
12753deb3ec6SMatthias Ringwald             }
12763deb3ec6SMatthias Ringwald             break;
12773deb3ec6SMatthias Ringwald         default:
12783deb3ec6SMatthias Ringwald             break;
12793deb3ec6SMatthias Ringwald     }
12803deb3ec6SMatthias Ringwald 
12813deb3ec6SMatthias Ringwald     switch (event){
12823deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_SUCEEDED:
1283711e6c80SMatthias Ringwald             sm_notify_client_index(SM_EVENT_IDENTITY_RESOLVING_SUCCEEDED, con_handle, sm_address_resolution_addr_type, sm_address_resolution_address, matched_device_id);
12843deb3ec6SMatthias Ringwald             break;
12853deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_FAILED:
1286711e6c80SMatthias Ringwald             sm_notify_client_base(SM_EVENT_IDENTITY_RESOLVING_FAILED, con_handle, sm_address_resolution_addr_type, sm_address_resolution_address);
12873deb3ec6SMatthias Ringwald             break;
12883deb3ec6SMatthias Ringwald     }
12893deb3ec6SMatthias Ringwald }
12903deb3ec6SMatthias Ringwald 
12913deb3ec6SMatthias Ringwald static void sm_key_distribution_handle_all_received(sm_connection_t * sm_conn){
12923deb3ec6SMatthias Ringwald 
12933deb3ec6SMatthias Ringwald     int le_db_index = -1;
12943deb3ec6SMatthias Ringwald 
12953deb3ec6SMatthias Ringwald     // lookup device based on IRK
12963deb3ec6SMatthias Ringwald     if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_INFORMATION){
12973deb3ec6SMatthias Ringwald         int i;
12983deb3ec6SMatthias Ringwald         for (i=0; i < le_device_db_count(); i++){
12993deb3ec6SMatthias Ringwald             sm_key_t irk;
13003deb3ec6SMatthias Ringwald             bd_addr_t address;
13013deb3ec6SMatthias Ringwald             int address_type;
13023deb3ec6SMatthias Ringwald             le_device_db_info(i, &address_type, address, irk);
13033deb3ec6SMatthias Ringwald             if (memcmp(irk, setup->sm_peer_irk, 16) == 0){
13043deb3ec6SMatthias Ringwald                 log_info("sm: device found for IRK, updating");
13053deb3ec6SMatthias Ringwald                 le_db_index = i;
13063deb3ec6SMatthias Ringwald                 break;
13073deb3ec6SMatthias Ringwald             }
13083deb3ec6SMatthias Ringwald         }
13093deb3ec6SMatthias Ringwald     }
13103deb3ec6SMatthias Ringwald 
13113deb3ec6SMatthias Ringwald     // if not found, lookup via public address if possible
13123deb3ec6SMatthias Ringwald     log_info("sm peer addr type %u, peer addres %s", setup->sm_peer_addr_type, bd_addr_to_str(setup->sm_peer_address));
13133deb3ec6SMatthias Ringwald     if (le_db_index < 0 && setup->sm_peer_addr_type == BD_ADDR_TYPE_LE_PUBLIC){
13143deb3ec6SMatthias Ringwald         int i;
13153deb3ec6SMatthias Ringwald         for (i=0; i < le_device_db_count(); i++){
13163deb3ec6SMatthias Ringwald             bd_addr_t address;
13173deb3ec6SMatthias Ringwald             int address_type;
13183deb3ec6SMatthias Ringwald             le_device_db_info(i, &address_type, address, NULL);
13193deb3ec6SMatthias Ringwald             log_info("device %u, sm peer addr type %u, peer addres %s", i, address_type, bd_addr_to_str(address));
13203deb3ec6SMatthias Ringwald             if (address_type == BD_ADDR_TYPE_LE_PUBLIC && memcmp(address, setup->sm_peer_address, 6) == 0){
13213deb3ec6SMatthias Ringwald                 log_info("sm: device found for public address, updating");
13223deb3ec6SMatthias Ringwald                 le_db_index = i;
13233deb3ec6SMatthias Ringwald                 break;
13243deb3ec6SMatthias Ringwald             }
13253deb3ec6SMatthias Ringwald         }
13263deb3ec6SMatthias Ringwald     }
13273deb3ec6SMatthias Ringwald 
13283deb3ec6SMatthias Ringwald     // if not found, add to db
13293deb3ec6SMatthias Ringwald     if (le_db_index < 0) {
13303deb3ec6SMatthias Ringwald         le_db_index = le_device_db_add(setup->sm_peer_addr_type, setup->sm_peer_address, setup->sm_peer_irk);
13313deb3ec6SMatthias Ringwald     }
13323deb3ec6SMatthias Ringwald 
133313377825SMatthias Ringwald     sm_notify_client_index(SM_EVENT_IDENTITY_CREATED, sm_conn->sm_handle, setup->sm_peer_addr_type, setup->sm_peer_address, le_db_index);
133413377825SMatthias Ringwald 
13353deb3ec6SMatthias Ringwald     if (le_db_index >= 0){
13363deb3ec6SMatthias Ringwald 
1337eda85fbfSMatthias Ringwald #ifdef ENABLE_LE_SIGNED_WRITE
13383deb3ec6SMatthias Ringwald         // store local CSRK
13393deb3ec6SMatthias Ringwald         if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){
13403deb3ec6SMatthias Ringwald             log_info("sm: store local CSRK");
13413deb3ec6SMatthias Ringwald             le_device_db_local_csrk_set(le_db_index, setup->sm_local_csrk);
13423deb3ec6SMatthias Ringwald             le_device_db_local_counter_set(le_db_index, 0);
13433deb3ec6SMatthias Ringwald         }
13443deb3ec6SMatthias Ringwald 
13453deb3ec6SMatthias Ringwald         // store remote CSRK
13463deb3ec6SMatthias Ringwald         if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){
13473deb3ec6SMatthias Ringwald             log_info("sm: store remote CSRK");
13483deb3ec6SMatthias Ringwald             le_device_db_remote_csrk_set(le_db_index, setup->sm_peer_csrk);
13493deb3ec6SMatthias Ringwald             le_device_db_remote_counter_set(le_db_index, 0);
13503deb3ec6SMatthias Ringwald         }
1351eda85fbfSMatthias Ringwald #endif
135278f44163SMatthias Ringwald         // store encryption information for secure connections: LTK generated by ECDH
135378f44163SMatthias Ringwald         if (setup->sm_use_secure_connections){
135478f44163SMatthias Ringwald             log_info("sm: store SC LTK (key size %u, authenticatd %u)", sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated);
135578f44163SMatthias Ringwald             uint8_t zero_rand[8];
135678f44163SMatthias Ringwald             memset(zero_rand, 0, 8);
135778f44163SMatthias Ringwald             le_device_db_encryption_set(le_db_index, 0, zero_rand, setup->sm_ltk, sm_conn->sm_actual_encryption_key_size,
135878f44163SMatthias Ringwald                 sm_conn->sm_connection_authenticated, sm_conn->sm_connection_authorization_state == AUTHORIZATION_GRANTED);
135978f44163SMatthias Ringwald         }
136078f44163SMatthias Ringwald 
136178f44163SMatthias Ringwald         // store encryption infromation for legacy pairing: peer LTK, EDIV, RAND
136278f44163SMatthias Ringwald         else if ( (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION)
136378f44163SMatthias Ringwald                && (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_MASTER_IDENTIFICATION )){
13643deb3ec6SMatthias Ringwald             log_info("sm: set encryption information (key size %u, authenticatd %u)", sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated);
13653deb3ec6SMatthias Ringwald             le_device_db_encryption_set(le_db_index, setup->sm_peer_ediv, setup->sm_peer_rand, setup->sm_peer_ltk,
13663deb3ec6SMatthias Ringwald                 sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated, sm_conn->sm_connection_authorization_state == AUTHORIZATION_GRANTED);
136778f44163SMatthias Ringwald 
13683deb3ec6SMatthias Ringwald         }
13693deb3ec6SMatthias Ringwald     }
13703deb3ec6SMatthias Ringwald 
13713deb3ec6SMatthias Ringwald     // keep le_db_index
13723deb3ec6SMatthias Ringwald     sm_conn->sm_le_db_index = le_db_index;
13733deb3ec6SMatthias Ringwald }
13743deb3ec6SMatthias Ringwald 
1375688a08f9SMatthias Ringwald static void sm_pairing_error(sm_connection_t * sm_conn, uint8_t reason){
1376688a08f9SMatthias Ringwald     setup->sm_pairing_failed_reason = reason;
1377688a08f9SMatthias Ringwald     sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
1378688a08f9SMatthias Ringwald }
1379688a08f9SMatthias Ringwald 
1380688a08f9SMatthias Ringwald static inline void sm_pdu_received_in_wrong_state(sm_connection_t * sm_conn){
1381688a08f9SMatthias Ringwald     sm_pairing_error(sm_conn, SM_REASON_UNSPECIFIED_REASON);
1382688a08f9SMatthias Ringwald }
1383688a08f9SMatthias Ringwald 
13849af0f475SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
1385688a08f9SMatthias Ringwald 
1386dc300847SMatthias Ringwald static void sm_sc_prepare_dhkey_check(sm_connection_t * sm_conn);
1387945888f5SMatthias Ringwald static int sm_passkey_used(stk_generation_method_t method);
1388f1c1783eSMatthias Ringwald static int sm_just_works_or_numeric_comparison(stk_generation_method_t method);
1389dc300847SMatthias Ringwald 
139068437d83SMatthias Ringwald static void sm_log_ec_keypair(void){
13912e6217a0SMatthias Ringwald     log_info("Elliptic curve: X");
1392fc5bff5fSMatthias Ringwald     log_info_hexdump(&ec_q[0],32);
13932e6217a0SMatthias Ringwald     log_info("Elliptic curve: Y");
1394fc5bff5fSMatthias Ringwald     log_info_hexdump(&ec_q[32],32);
139568437d83SMatthias Ringwald }
139668437d83SMatthias Ringwald 
1397b35a3de2SMatthias Ringwald static void sm_sc_start_calculating_local_confirm(sm_connection_t * sm_conn){
1398b35a3de2SMatthias Ringwald     if (sm_passkey_used(setup->sm_stk_generation_method)){
1399b35a3de2SMatthias Ringwald         sm_conn->sm_engine_state = SM_SC_W2_GET_RANDOM_A;
1400b35a3de2SMatthias Ringwald     } else {
14011f9d84e9SMatthias Ringwald         sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION;
1402b35a3de2SMatthias Ringwald     }
1403b35a3de2SMatthias Ringwald }
1404b35a3de2SMatthias Ringwald 
1405688a08f9SMatthias Ringwald static void sm_sc_state_after_receiving_random(sm_connection_t * sm_conn){
140642134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
1407688a08f9SMatthias Ringwald         // Responder
1408688a08f9SMatthias Ringwald         sm_conn->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM;
1409688a08f9SMatthias Ringwald     } else {
1410688a08f9SMatthias Ringwald         // Initiator role
1411688a08f9SMatthias Ringwald         switch (setup->sm_stk_generation_method){
1412688a08f9SMatthias Ringwald             case JUST_WORKS:
1413dc300847SMatthias Ringwald                 sm_sc_prepare_dhkey_check(sm_conn);
1414688a08f9SMatthias Ringwald                 break;
1415688a08f9SMatthias Ringwald 
1416f92edc8eSMatthias Ringwald             case NK_BOTH_INPUT:
1417bd57ffebSMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_G2;
1418688a08f9SMatthias Ringwald                 break;
1419688a08f9SMatthias Ringwald             case PK_INIT_INPUT:
1420688a08f9SMatthias Ringwald             case PK_RESP_INPUT:
1421688a08f9SMatthias Ringwald             case OK_BOTH_INPUT:
1422688a08f9SMatthias Ringwald                 if (setup->sm_passkey_bit < 20) {
1423b35a3de2SMatthias Ringwald                     sm_sc_start_calculating_local_confirm(sm_conn);
1424688a08f9SMatthias Ringwald                 } else {
1425dc300847SMatthias Ringwald                     sm_sc_prepare_dhkey_check(sm_conn);
1426688a08f9SMatthias Ringwald                 }
1427688a08f9SMatthias Ringwald                 break;
1428688a08f9SMatthias Ringwald             case OOB:
1429688a08f9SMatthias Ringwald                 // TODO: implement SC OOB
1430688a08f9SMatthias Ringwald                 break;
1431688a08f9SMatthias Ringwald         }
1432688a08f9SMatthias Ringwald     }
1433688a08f9SMatthias Ringwald }
1434688a08f9SMatthias Ringwald 
1435aec94140SMatthias Ringwald static uint8_t sm_sc_cmac_get_byte(uint16_t offset){
1436aec94140SMatthias Ringwald     return sm_cmac_sc_buffer[offset];
1437aec94140SMatthias Ringwald }
1438688a08f9SMatthias Ringwald 
1439aec94140SMatthias Ringwald static void sm_sc_cmac_done(uint8_t * hash){
1440688a08f9SMatthias Ringwald     log_info("sm_sc_cmac_done: ");
1441688a08f9SMatthias Ringwald     log_info_hexdump(hash, 16);
1442688a08f9SMatthias Ringwald 
1443bd57ffebSMatthias Ringwald     sm_connection_t * sm_conn = sm_cmac_connection;
1444bd57ffebSMatthias Ringwald     sm_cmac_connection = NULL;
14452bacf595SMatthias Ringwald     link_key_type_t link_key_type;
1446bd57ffebSMatthias Ringwald 
1447bd57ffebSMatthias Ringwald     switch (sm_conn->sm_engine_state){
1448aec94140SMatthias Ringwald         case SM_SC_W4_CMAC_FOR_CONFIRMATION:
1449aec94140SMatthias Ringwald             memcpy(setup->sm_local_confirm, hash, 16);
1450bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_SEND_CONFIRMATION;
1451aec94140SMatthias Ringwald             break;
1452688a08f9SMatthias Ringwald         case SM_SC_W4_CMAC_FOR_CHECK_CONFIRMATION:
1453688a08f9SMatthias Ringwald             // check
1454688a08f9SMatthias Ringwald             if (0 != memcmp(hash, setup->sm_peer_confirm, 16)){
1455bd57ffebSMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_CONFIRM_VALUE_FAILED);
1456688a08f9SMatthias Ringwald                 break;
1457688a08f9SMatthias Ringwald             }
1458bd57ffebSMatthias Ringwald             sm_sc_state_after_receiving_random(sm_conn);
1459688a08f9SMatthias Ringwald             break;
1460901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_G2: {
1461901c000fSMatthias Ringwald             uint32_t vab = big_endian_read_32(hash, 12) % 1000000;
1462901c000fSMatthias Ringwald             big_endian_store_32(setup->sm_tk, 12, vab);
1463901c000fSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE;
1464901c000fSMatthias Ringwald             sm_trigger_user_response(sm_conn);
1465019005a0SMatthias Ringwald             break;
1466019005a0SMatthias Ringwald         }
14670346c37cSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_SALT:
14680346c37cSMatthias Ringwald             memcpy(setup->sm_t, hash, 16);
1469bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F5_MACKEY;
14700346c37cSMatthias Ringwald             break;
14710346c37cSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_MACKEY:
14720346c37cSMatthias Ringwald             memcpy(setup->sm_mackey, hash, 16);
1473bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F5_LTK;
14740346c37cSMatthias Ringwald             break;
14750346c37cSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_LTK:
1476b18300a6SMatthias Ringwald             // truncate sm_ltk, but keep full LTK for cross-transport key derivation in sm_local_ltk
1477b18300a6SMatthias Ringwald             // Errata Service Release to the Bluetooth Specification: ESR09
1478b18300a6SMatthias Ringwald             //   E6405 – Cross transport key derivation from a key of size less than 128 bits
1479b18300a6SMatthias Ringwald             //   Note: When the BR/EDR link key is being derived from the LTK, the derivation is done before the LTK gets masked."
14800346c37cSMatthias Ringwald             memcpy(setup->sm_ltk, hash, 16);
1481aa7d4d9cSMatthias Ringwald             memcpy(setup->sm_local_ltk, hash, 16);
1482893e9333SMatthias Ringwald             sm_truncate_key(setup->sm_ltk, sm_conn->sm_actual_encryption_key_size);
1483bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK;
1484019005a0SMatthias Ringwald             break;
1485901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK:
1486901c000fSMatthias Ringwald             memcpy(setup->sm_local_dhkey_check, hash, 16);
148742134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
1488901c000fSMatthias Ringwald                 // responder
1489901c000fSMatthias Ringwald                 if (setup->sm_state_vars & SM_STATE_VAR_DHKEY_COMMAND_RECEIVED){
1490901c000fSMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK;
1491901c000fSMatthias Ringwald                 } else {
1492901c000fSMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_W4_DHKEY_CHECK_COMMAND;
1493901c000fSMatthias Ringwald                 }
1494901c000fSMatthias Ringwald             } else {
1495901c000fSMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_SEND_DHKEY_CHECK_COMMAND;
1496901c000fSMatthias Ringwald             }
1497901c000fSMatthias Ringwald             break;
1498901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK:
1499901c000fSMatthias Ringwald             if (0 != memcmp(hash, setup->sm_peer_dhkey_check, 16) ){
1500901c000fSMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_DHKEY_CHECK_FAILED);
1501aec94140SMatthias Ringwald                 break;
1502aec94140SMatthias Ringwald             }
150342134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
1504901c000fSMatthias Ringwald                 // responder
1505901c000fSMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_SEND_DHKEY_CHECK_COMMAND;
1506901c000fSMatthias Ringwald             } else {
1507901c000fSMatthias Ringwald                 // initiator
1508901c000fSMatthias Ringwald                 sm_conn->sm_engine_state = SM_INITIATOR_PH3_SEND_START_ENCRYPTION;
1509bd57ffebSMatthias Ringwald             }
1510901c000fSMatthias Ringwald             break;
15112bacf595SMatthias Ringwald         case SM_SC_W4_CALCULATE_H6_ILK:
15122bacf595SMatthias Ringwald             memcpy(setup->sm_t, hash, 16);
15132bacf595SMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_H6_BR_EDR_LINK_KEY;
15142bacf595SMatthias Ringwald             break;
15152bacf595SMatthias Ringwald         case SM_SC_W4_CALCULATE_H6_BR_EDR_LINK_KEY:
15162bacf595SMatthias Ringwald             reverse_128(hash, setup->sm_t);
15172bacf595SMatthias Ringwald             link_key_type = sm_conn->sm_connection_authenticated ?
15182bacf595SMatthias Ringwald                 AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256 : UNAUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256;
151942134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
152035454696SMatthias Ringwald #ifdef ENABLE_CLASSIC
15212bacf595SMatthias Ringwald                 gap_store_link_key_for_bd_addr(setup->sm_m_address, setup->sm_t, link_key_type);
152235454696SMatthias Ringwald #endif
15232bacf595SMatthias Ringwald                 sm_conn->sm_engine_state = SM_RESPONDER_IDLE;
15242bacf595SMatthias Ringwald             } else {
152535454696SMatthias Ringwald #ifdef ENABLE_CLASSIC
15262bacf595SMatthias Ringwald                 gap_store_link_key_for_bd_addr(setup->sm_s_address, setup->sm_t, link_key_type);
152735454696SMatthias Ringwald #endif
15282bacf595SMatthias Ringwald                 sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
15292bacf595SMatthias Ringwald             }
15302bacf595SMatthias Ringwald             sm_done_for_handle(sm_conn->sm_handle);
15312bacf595SMatthias Ringwald             break;
1532bd57ffebSMatthias Ringwald         default:
1533bd57ffebSMatthias Ringwald             log_error("sm_sc_cmac_done in state %u", sm_conn->sm_engine_state);
1534bd57ffebSMatthias Ringwald             break;
1535bd57ffebSMatthias Ringwald     }
1536aec94140SMatthias Ringwald     sm_run();
1537aec94140SMatthias Ringwald }
1538aec94140SMatthias Ringwald 
1539688a08f9SMatthias Ringwald static void f4_engine(sm_connection_t * sm_conn, const sm_key256_t u, const sm_key256_t v, const sm_key_t x, uint8_t z){
1540dc300847SMatthias Ringwald     const uint16_t message_len = 65;
1541aec94140SMatthias Ringwald     sm_cmac_connection = sm_conn;
1542aec94140SMatthias Ringwald     memcpy(sm_cmac_sc_buffer, u, 32);
1543aec94140SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+32, v, 32);
1544aec94140SMatthias Ringwald     sm_cmac_sc_buffer[64] = z;
1545aec94140SMatthias Ringwald     log_info("f4 key");
1546aec94140SMatthias Ringwald     log_info_hexdump(x, 16);
1547aec94140SMatthias Ringwald     log_info("f4 message");
1548dc300847SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
1549dc300847SMatthias Ringwald     sm_cmac_general_start(x, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
1550aec94140SMatthias Ringwald }
1551aec94140SMatthias Ringwald 
15520346c37cSMatthias Ringwald static const sm_key_t f5_salt = { 0x6C ,0x88, 0x83, 0x91, 0xAA, 0xF5, 0xA5, 0x38, 0x60, 0x37, 0x0B, 0xDB, 0x5A, 0x60, 0x83, 0xBE};
15530346c37cSMatthias Ringwald static const uint8_t f5_key_id[] = { 0x62, 0x74, 0x6c, 0x65 };
15540346c37cSMatthias Ringwald static const uint8_t f5_length[] = { 0x01, 0x00};
15550346c37cSMatthias Ringwald 
15560346c37cSMatthias Ringwald static void sm_sc_calculate_dhkey(sm_key256_t dhkey){
15570346c37cSMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
15580346c37cSMatthias Ringwald     // da * Pb
1559e722521aSMatthias Ringwald     mbedtls_mpi d;
15600346c37cSMatthias Ringwald     mbedtls_ecp_point Q;
1561df86eb96SMatthias Ringwald     mbedtls_ecp_point DH;
1562e722521aSMatthias Ringwald     mbedtls_mpi_init(&d);
15630346c37cSMatthias Ringwald     mbedtls_ecp_point_init(&Q);
1564df86eb96SMatthias Ringwald     mbedtls_ecp_point_init(&DH);
1565e722521aSMatthias Ringwald     mbedtls_mpi_read_binary(&d, ec_d, 32);
1566fc5bff5fSMatthias Ringwald     mbedtls_mpi_read_binary(&Q.X, &setup->sm_peer_q[0] , 32);
1567fc5bff5fSMatthias Ringwald     mbedtls_mpi_read_binary(&Q.Y, &setup->sm_peer_q[32], 32);
1568ae4aa2b6SMatthias Ringwald     mbedtls_mpi_lset(&Q.Z, 1);
1569e722521aSMatthias Ringwald     mbedtls_ecp_mul(&mbedtls_ec_group, &DH, &d, &Q, NULL, NULL);
15700346c37cSMatthias Ringwald     mbedtls_mpi_write_binary(&DH.X, dhkey, 32);
1571ae4aa2b6SMatthias Ringwald     mbedtls_ecp_point_free(&DH);
1572df86eb96SMatthias Ringwald     mbedtls_mpi_free(&d);
1573891bb64aSMatthias Ringwald     mbedtls_ecp_point_free(&Q);
15740346c37cSMatthias Ringwald #endif
1575c692d776SMatthias Ringwald #ifdef USE_MICROECC_FOR_ECDH
1576c692d776SMatthias Ringwald     uECC_shared_secret(setup->sm_peer_q, ec_d, dhkey);
1577c692d776SMatthias Ringwald #endif
15780346c37cSMatthias Ringwald     log_info("dhkey");
15790346c37cSMatthias Ringwald     log_info_hexdump(dhkey, 32);
15800346c37cSMatthias Ringwald }
15810346c37cSMatthias Ringwald 
15820346c37cSMatthias Ringwald static void f5_calculate_salt(sm_connection_t * sm_conn){
15830346c37cSMatthias Ringwald     // calculate DHKEY
15840346c37cSMatthias Ringwald     sm_key256_t dhkey;
15850346c37cSMatthias Ringwald     sm_sc_calculate_dhkey(dhkey);
15860346c37cSMatthias Ringwald 
15870346c37cSMatthias Ringwald     // calculate salt for f5
15880346c37cSMatthias Ringwald     const uint16_t message_len = 32;
15890346c37cSMatthias Ringwald     sm_cmac_connection = sm_conn;
15900346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer, dhkey, message_len);
15910346c37cSMatthias Ringwald     sm_cmac_general_start(f5_salt, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
15920346c37cSMatthias Ringwald }
15930346c37cSMatthias Ringwald 
15940346c37cSMatthias Ringwald static inline void f5_mackkey(sm_connection_t * sm_conn, sm_key_t t, const sm_key_t n1, const sm_key_t n2, const sm_key56_t a1, const sm_key56_t a2){
15950346c37cSMatthias Ringwald     const uint16_t message_len = 53;
15960346c37cSMatthias Ringwald     sm_cmac_connection = sm_conn;
15970346c37cSMatthias Ringwald 
15980346c37cSMatthias Ringwald     // f5(W, N1, N2, A1, A2) = AES-CMACT (Counter = 0 || keyID || N1 || N2|| A1|| A2 || Length = 256) -- this is the MacKey
15990346c37cSMatthias Ringwald     sm_cmac_sc_buffer[0] = 0;
16000346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+01, f5_key_id, 4);
16010346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+05, n1, 16);
16020346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+21, n2, 16);
16030346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+37, a1, 7);
16040346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+44, a2, 7);
16050346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+51, f5_length, 2);
16060346c37cSMatthias Ringwald     log_info("f5 key");
16070346c37cSMatthias Ringwald     log_info_hexdump(t, 16);
16080346c37cSMatthias Ringwald     log_info("f5 message for MacKey");
16090346c37cSMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
16100346c37cSMatthias Ringwald     sm_cmac_general_start(t, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
16110346c37cSMatthias Ringwald }
16120346c37cSMatthias Ringwald 
16130346c37cSMatthias Ringwald static void f5_calculate_mackey(sm_connection_t * sm_conn){
16140346c37cSMatthias Ringwald     sm_key56_t bd_addr_master, bd_addr_slave;
16150346c37cSMatthias Ringwald     bd_addr_master[0] =  setup->sm_m_addr_type;
16160346c37cSMatthias Ringwald     bd_addr_slave[0]  =  setup->sm_s_addr_type;
16170346c37cSMatthias Ringwald     memcpy(&bd_addr_master[1], setup->sm_m_address, 6);
16180346c37cSMatthias Ringwald     memcpy(&bd_addr_slave[1],  setup->sm_s_address, 6);
161942134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
16200346c37cSMatthias Ringwald         // responder
16210346c37cSMatthias Ringwald         f5_mackkey(sm_conn, setup->sm_t, setup->sm_peer_nonce, setup->sm_local_nonce, bd_addr_master, bd_addr_slave);
16220346c37cSMatthias Ringwald     } else {
16230346c37cSMatthias Ringwald         // initiator
16240346c37cSMatthias Ringwald         f5_mackkey(sm_conn, setup->sm_t, setup->sm_local_nonce, setup->sm_peer_nonce, bd_addr_master, bd_addr_slave);
16250346c37cSMatthias Ringwald     }
16260346c37cSMatthias Ringwald }
16270346c37cSMatthias Ringwald 
16280346c37cSMatthias Ringwald // note: must be called right after f5_mackey, as sm_cmac_buffer[1..52] will be reused
16290346c37cSMatthias Ringwald static inline void f5_ltk(sm_connection_t * sm_conn, sm_key_t t){
16300346c37cSMatthias Ringwald     const uint16_t message_len = 53;
16310346c37cSMatthias Ringwald     sm_cmac_connection = sm_conn;
16320346c37cSMatthias Ringwald     sm_cmac_sc_buffer[0] = 1;
16330346c37cSMatthias Ringwald     // 1..52 setup before
16340346c37cSMatthias Ringwald     log_info("f5 key");
16350346c37cSMatthias Ringwald     log_info_hexdump(t, 16);
16360346c37cSMatthias Ringwald     log_info("f5 message for LTK");
16370346c37cSMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
16380346c37cSMatthias Ringwald     sm_cmac_general_start(t, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
16390346c37cSMatthias Ringwald }
1640f92edc8eSMatthias Ringwald 
16410346c37cSMatthias Ringwald static void f5_calculate_ltk(sm_connection_t * sm_conn){
16420346c37cSMatthias Ringwald     f5_ltk(sm_conn, setup->sm_t);
16430346c37cSMatthias Ringwald }
16440346c37cSMatthias Ringwald 
164527163002SMatthias Ringwald static void f6_engine(sm_connection_t * sm_conn, const sm_key_t w, const sm_key_t n1, const sm_key_t n2, const sm_key_t r, const sm_key24_t io_cap, const sm_key56_t a1, const sm_key56_t a2){
1646dc300847SMatthias Ringwald     const uint16_t message_len = 65;
164727163002SMatthias Ringwald     sm_cmac_connection = sm_conn;
1648dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer, n1, 16);
1649dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+16, n2, 16);
1650dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+32, r, 16);
1651dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+48, io_cap, 3);
1652dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+51, a1, 7);
1653dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+58, a2, 7);
1654dc300847SMatthias Ringwald     log_info("f6 key");
1655dc300847SMatthias Ringwald     log_info_hexdump(w, 16);
1656dc300847SMatthias Ringwald     log_info("f6 message");
1657dc300847SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
1658dc300847SMatthias Ringwald     sm_cmac_general_start(w, 65, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
1659dc300847SMatthias Ringwald }
1660dc300847SMatthias Ringwald 
1661f92edc8eSMatthias Ringwald // g2(U, V, X, Y) = AES-CMACX(U || V || Y) mod 2^32
1662f92edc8eSMatthias Ringwald // - U is 256 bits
1663f92edc8eSMatthias Ringwald // - V is 256 bits
1664f92edc8eSMatthias Ringwald // - X is 128 bits
1665f92edc8eSMatthias Ringwald // - Y is 128 bits
1666bd57ffebSMatthias Ringwald static void g2_engine(sm_connection_t * sm_conn, const sm_key256_t u, const sm_key256_t v, const sm_key_t x, const sm_key_t y){
1667bd57ffebSMatthias Ringwald     const uint16_t message_len = 80;
1668bd57ffebSMatthias Ringwald     sm_cmac_connection = sm_conn;
1669bd57ffebSMatthias Ringwald     memcpy(sm_cmac_sc_buffer, u, 32);
1670bd57ffebSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+32, v, 32);
1671bd57ffebSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+64, y, 16);
1672f92edc8eSMatthias Ringwald     log_info("g2 key");
1673f92edc8eSMatthias Ringwald     log_info_hexdump(x, 16);
1674f92edc8eSMatthias Ringwald     log_info("g2 message");
16752bacf595SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
1676bd57ffebSMatthias Ringwald     sm_cmac_general_start(x, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
1677f92edc8eSMatthias Ringwald }
1678f92edc8eSMatthias Ringwald 
1679b35a3de2SMatthias Ringwald static void g2_calculate(sm_connection_t * sm_conn) {
1680f92edc8eSMatthias Ringwald     // calc Va if numeric comparison
168142134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
1682f92edc8eSMatthias Ringwald         // responder
1683fc5bff5fSMatthias Ringwald         g2_engine(sm_conn, setup->sm_peer_q, ec_q, setup->sm_peer_nonce, setup->sm_local_nonce);;
1684f92edc8eSMatthias Ringwald     } else {
1685f92edc8eSMatthias Ringwald         // initiator
1686fc5bff5fSMatthias Ringwald         g2_engine(sm_conn, ec_q, setup->sm_peer_q, setup->sm_local_nonce, setup->sm_peer_nonce);
1687f92edc8eSMatthias Ringwald     }
1688f92edc8eSMatthias Ringwald }
1689f92edc8eSMatthias Ringwald 
1690945888f5SMatthias Ringwald static void sm_sc_calculate_local_confirm(sm_connection_t * sm_conn){
16919af0f475SMatthias Ringwald     uint8_t z = 0;
16929af0f475SMatthias Ringwald     if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT){
16939af0f475SMatthias Ringwald         // some form of passkey
16949af0f475SMatthias Ringwald         uint32_t pk = big_endian_read_32(setup->sm_tk, 12);
16959af0f475SMatthias Ringwald         z = 0x80 | ((pk >> setup->sm_passkey_bit) & 1);
16969af0f475SMatthias Ringwald         setup->sm_passkey_bit++;
16979af0f475SMatthias Ringwald     }
1698fc5bff5fSMatthias Ringwald     f4_engine(sm_conn, ec_q, setup->sm_peer_q, setup->sm_local_nonce, z);
16999af0f475SMatthias Ringwald }
1700688a08f9SMatthias Ringwald 
1701688a08f9SMatthias Ringwald static void sm_sc_calculate_remote_confirm(sm_connection_t * sm_conn){
1702688a08f9SMatthias Ringwald     uint8_t z = 0;
1703688a08f9SMatthias Ringwald     if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT){
1704688a08f9SMatthias Ringwald         // some form of passkey
1705688a08f9SMatthias Ringwald         uint32_t pk = big_endian_read_32(setup->sm_tk, 12);
1706688a08f9SMatthias Ringwald         // sm_passkey_bit was increased before sending confirm value
1707688a08f9SMatthias Ringwald         z = 0x80 | ((pk >> (setup->sm_passkey_bit-1)) & 1);
1708688a08f9SMatthias Ringwald     }
1709fc5bff5fSMatthias Ringwald     f4_engine(sm_conn, setup->sm_peer_q, ec_q, setup->sm_peer_nonce, z);
1710688a08f9SMatthias Ringwald }
1711688a08f9SMatthias Ringwald 
17120346c37cSMatthias Ringwald static void sm_sc_prepare_dhkey_check(sm_connection_t * sm_conn){
17130346c37cSMatthias Ringwald     sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F5_SALT;
1714dc300847SMatthias Ringwald }
1715dc300847SMatthias Ringwald 
1716dc300847SMatthias Ringwald static void sm_sc_calculate_f6_for_dhkey_check(sm_connection_t * sm_conn){
1717dc300847SMatthias Ringwald     // calculate DHKCheck
1718dc300847SMatthias Ringwald     sm_key56_t bd_addr_master, bd_addr_slave;
1719dc300847SMatthias Ringwald     bd_addr_master[0] =  setup->sm_m_addr_type;
1720dc300847SMatthias Ringwald     bd_addr_slave[0]  =  setup->sm_s_addr_type;
1721dc300847SMatthias Ringwald     memcpy(&bd_addr_master[1], setup->sm_m_address, 6);
1722dc300847SMatthias Ringwald     memcpy(&bd_addr_slave[1],  setup->sm_s_address, 6);
1723dc300847SMatthias Ringwald     uint8_t iocap_a[3];
1724dc300847SMatthias Ringwald     iocap_a[0] = sm_pairing_packet_get_auth_req(setup->sm_m_preq);
1725dc300847SMatthias Ringwald     iocap_a[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq);
1726dc300847SMatthias Ringwald     iocap_a[2] = sm_pairing_packet_get_io_capability(setup->sm_m_preq);
1727dc300847SMatthias Ringwald     uint8_t iocap_b[3];
1728dc300847SMatthias Ringwald     iocap_b[0] = sm_pairing_packet_get_auth_req(setup->sm_s_pres);
1729dc300847SMatthias Ringwald     iocap_b[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres);
1730dc300847SMatthias Ringwald     iocap_b[2] = sm_pairing_packet_get_io_capability(setup->sm_s_pres);
173142134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
1732dc300847SMatthias Ringwald         // responder
173327163002SMatthias Ringwald         f6_engine(sm_conn, setup->sm_mackey, setup->sm_local_nonce, setup->sm_peer_nonce, setup->sm_ra, iocap_b, bd_addr_slave, bd_addr_master);
1734dc300847SMatthias Ringwald     } else {
1735dc300847SMatthias Ringwald         // initiator
173627163002SMatthias Ringwald         f6_engine(sm_conn, setup->sm_mackey, setup->sm_local_nonce, setup->sm_peer_nonce, setup->sm_rb, iocap_a, bd_addr_master, bd_addr_slave);
1737dc300847SMatthias Ringwald     }
1738dc300847SMatthias Ringwald }
1739dc300847SMatthias Ringwald 
1740019005a0SMatthias Ringwald static void sm_sc_calculate_f6_to_verify_dhkey_check(sm_connection_t * sm_conn){
1741019005a0SMatthias Ringwald     // validate E = f6()
1742019005a0SMatthias Ringwald     sm_key56_t bd_addr_master, bd_addr_slave;
1743019005a0SMatthias Ringwald     bd_addr_master[0] =  setup->sm_m_addr_type;
1744019005a0SMatthias Ringwald     bd_addr_slave[0]  =  setup->sm_s_addr_type;
1745019005a0SMatthias Ringwald     memcpy(&bd_addr_master[1], setup->sm_m_address, 6);
1746019005a0SMatthias Ringwald     memcpy(&bd_addr_slave[1],  setup->sm_s_address, 6);
1747019005a0SMatthias Ringwald 
1748019005a0SMatthias Ringwald     uint8_t iocap_a[3];
1749019005a0SMatthias Ringwald     iocap_a[0] = sm_pairing_packet_get_auth_req(setup->sm_m_preq);
1750019005a0SMatthias Ringwald     iocap_a[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq);
1751019005a0SMatthias Ringwald     iocap_a[2] = sm_pairing_packet_get_io_capability(setup->sm_m_preq);
1752019005a0SMatthias Ringwald     uint8_t iocap_b[3];
1753019005a0SMatthias Ringwald     iocap_b[0] = sm_pairing_packet_get_auth_req(setup->sm_s_pres);
1754019005a0SMatthias Ringwald     iocap_b[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres);
1755019005a0SMatthias Ringwald     iocap_b[2] = sm_pairing_packet_get_io_capability(setup->sm_s_pres);
175642134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
1757019005a0SMatthias Ringwald         // responder
1758019005a0SMatthias Ringwald         f6_engine(sm_conn, setup->sm_mackey, setup->sm_peer_nonce, setup->sm_local_nonce, setup->sm_rb, iocap_a, bd_addr_master, bd_addr_slave);
1759019005a0SMatthias Ringwald     } else {
1760019005a0SMatthias Ringwald         // initiator
1761019005a0SMatthias Ringwald         f6_engine(sm_conn, setup->sm_mackey, setup->sm_peer_nonce, setup->sm_local_nonce, setup->sm_ra, iocap_b, bd_addr_slave, bd_addr_master);
1762019005a0SMatthias Ringwald     }
1763019005a0SMatthias Ringwald }
17642bacf595SMatthias Ringwald 
17652bacf595SMatthias Ringwald 
17662bacf595SMatthias Ringwald //
17672bacf595SMatthias Ringwald // Link Key Conversion Function h6
17682bacf595SMatthias Ringwald //
17692bacf595SMatthias Ringwald // h6(W, keyID) = AES-CMACW(keyID)
17702bacf595SMatthias Ringwald // - W is 128 bits
17712bacf595SMatthias Ringwald // - keyID is 32 bits
17722bacf595SMatthias Ringwald static void h6_engine(sm_connection_t * sm_conn, const sm_key_t w, const uint32_t key_id){
17732bacf595SMatthias Ringwald     const uint16_t message_len = 4;
17742bacf595SMatthias Ringwald     sm_cmac_connection = sm_conn;
17752bacf595SMatthias Ringwald     big_endian_store_32(sm_cmac_sc_buffer, 0, key_id);
17762bacf595SMatthias Ringwald     log_info("h6 key");
17772bacf595SMatthias Ringwald     log_info_hexdump(w, 16);
17782bacf595SMatthias Ringwald     log_info("h6 message");
17792bacf595SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
17802bacf595SMatthias Ringwald     sm_cmac_general_start(w, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
17812bacf595SMatthias Ringwald }
17822bacf595SMatthias Ringwald 
1783b18300a6SMatthias Ringwald // For SC, setup->sm_local_ltk holds full LTK (sm_ltk is already truncated)
1784b18300a6SMatthias Ringwald // Errata Service Release to the Bluetooth Specification: ESR09
1785b18300a6SMatthias Ringwald //   E6405 – Cross transport key derivation from a key of size less than 128 bits
1786b18300a6SMatthias Ringwald //   "Note: When the BR/EDR link key is being derived from the LTK, the derivation is done before the LTK gets masked."
17872bacf595SMatthias Ringwald static void h6_calculate_ilk(sm_connection_t * sm_conn){
1788b18300a6SMatthias Ringwald     h6_engine(sm_conn, setup->sm_local_ltk, 0x746D7031);    // "tmp1"
17892bacf595SMatthias Ringwald }
17902bacf595SMatthias Ringwald 
17912bacf595SMatthias Ringwald static void h6_calculate_br_edr_link_key(sm_connection_t * sm_conn){
17922bacf595SMatthias Ringwald     h6_engine(sm_conn, setup->sm_t, 0x6c656272);    // "lebr"
17932bacf595SMatthias Ringwald }
17942bacf595SMatthias Ringwald 
17959af0f475SMatthias Ringwald #endif
17969af0f475SMatthias Ringwald 
1797613da3deSMatthias Ringwald // key management legacy connections:
1798613da3deSMatthias Ringwald // - potentially two different LTKs based on direction. each device stores LTK provided by peer
1799613da3deSMatthias Ringwald // - master stores LTK, EDIV, RAND. responder optionally stored master LTK (only if it needs to reconnect)
1800613da3deSMatthias Ringwald // - initiators reconnects: initiator uses stored LTK, EDIV, RAND generated by responder
1801613da3deSMatthias Ringwald // - responder  reconnects: responder uses LTK receveived from master
1802613da3deSMatthias Ringwald 
1803613da3deSMatthias Ringwald // key management secure connections:
1804613da3deSMatthias Ringwald // - both devices store same LTK from ECDH key exchange.
1805613da3deSMatthias Ringwald 
180642134bc6SMatthias Ringwald #if defined(ENABLE_LE_SECURE_CONNECTIONS) || defined(ENABLE_LE_CENTRAL)
18075829ebe2SMatthias Ringwald static void sm_load_security_info(sm_connection_t * sm_connection){
18085829ebe2SMatthias Ringwald     int encryption_key_size;
18095829ebe2SMatthias Ringwald     int authenticated;
18105829ebe2SMatthias Ringwald     int authorized;
18115829ebe2SMatthias Ringwald 
18125829ebe2SMatthias Ringwald     // fetch data from device db - incl. authenticated/authorized/key size. Note all sm_connection_X require encryption enabled
18135829ebe2SMatthias Ringwald     le_device_db_encryption_get(sm_connection->sm_le_db_index, &setup->sm_peer_ediv, setup->sm_peer_rand, setup->sm_peer_ltk,
18145829ebe2SMatthias Ringwald                                 &encryption_key_size, &authenticated, &authorized);
18155829ebe2SMatthias Ringwald     log_info("db index %u, key size %u, authenticated %u, authorized %u", sm_connection->sm_le_db_index, encryption_key_size, authenticated, authorized);
18165829ebe2SMatthias Ringwald     sm_connection->sm_actual_encryption_key_size = encryption_key_size;
18175829ebe2SMatthias Ringwald     sm_connection->sm_connection_authenticated = authenticated;
18185829ebe2SMatthias Ringwald     sm_connection->sm_connection_authorization_state = authorized ? AUTHORIZATION_GRANTED : AUTHORIZATION_UNKNOWN;
18195829ebe2SMatthias Ringwald }
182042134bc6SMatthias Ringwald #endif
1821bd57ffebSMatthias Ringwald 
182242134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
182359066796SMatthias Ringwald static void sm_start_calculating_ltk_from_ediv_and_rand(sm_connection_t * sm_connection){
182459066796SMatthias Ringwald     memcpy(setup->sm_local_rand, sm_connection->sm_local_rand, 8);
182559066796SMatthias Ringwald     setup->sm_local_ediv = sm_connection->sm_local_ediv;
182659066796SMatthias Ringwald     // re-establish used key encryption size
182759066796SMatthias Ringwald     // no db for encryption size hack: encryption size is stored in lowest nibble of setup->sm_local_rand
182859066796SMatthias Ringwald     sm_connection->sm_actual_encryption_key_size = (setup->sm_local_rand[7] & 0x0f) + 1;
182959066796SMatthias Ringwald     // no db for authenticated flag hack: flag is stored in bit 4 of LSB
183059066796SMatthias Ringwald     sm_connection->sm_connection_authenticated = (setup->sm_local_rand[7] & 0x10) >> 4;
183159066796SMatthias Ringwald     log_info("sm: received ltk request with key size %u, authenticated %u",
183259066796SMatthias Ringwald             sm_connection->sm_actual_encryption_key_size, sm_connection->sm_connection_authenticated);
183359066796SMatthias Ringwald     sm_connection->sm_engine_state = SM_RESPONDER_PH4_Y_GET_ENC;
183459066796SMatthias Ringwald }
183542134bc6SMatthias Ringwald #endif
183659066796SMatthias Ringwald 
18373deb3ec6SMatthias Ringwald static void sm_run(void){
18383deb3ec6SMatthias Ringwald 
1839665d90f2SMatthias Ringwald     btstack_linked_list_iterator_t it;
18403deb3ec6SMatthias Ringwald 
18413deb3ec6SMatthias Ringwald     // assert that we can send at least commands
18423deb3ec6SMatthias Ringwald     if (!hci_can_send_command_packet_now()) return;
18433deb3ec6SMatthias Ringwald 
18443deb3ec6SMatthias Ringwald     //
18453deb3ec6SMatthias Ringwald     // non-connection related behaviour
18463deb3ec6SMatthias Ringwald     //
18473deb3ec6SMatthias Ringwald 
18483deb3ec6SMatthias Ringwald     // distributed key generation
18493deb3ec6SMatthias Ringwald     switch (dkg_state){
18503deb3ec6SMatthias Ringwald         case DKG_CALC_IRK:
18513deb3ec6SMatthias Ringwald             // already busy?
18523deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_IDLE) {
18533deb3ec6SMatthias Ringwald                 // IRK = d1(IR, 1, 0)
18543deb3ec6SMatthias Ringwald                 sm_key_t d1_prime;
18553deb3ec6SMatthias Ringwald                 sm_d1_d_prime(1, 0, d1_prime);  // plaintext
18563deb3ec6SMatthias Ringwald                 dkg_next_state();
18573deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_ir, d1_prime, NULL);
18583deb3ec6SMatthias Ringwald                 return;
18593deb3ec6SMatthias Ringwald             }
18603deb3ec6SMatthias Ringwald             break;
18613deb3ec6SMatthias Ringwald         case DKG_CALC_DHK:
18623deb3ec6SMatthias Ringwald             // already busy?
18633deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_IDLE) {
18643deb3ec6SMatthias Ringwald                 // DHK = d1(IR, 3, 0)
18653deb3ec6SMatthias Ringwald                 sm_key_t d1_prime;
18663deb3ec6SMatthias Ringwald                 sm_d1_d_prime(3, 0, d1_prime);  // plaintext
18673deb3ec6SMatthias Ringwald                 dkg_next_state();
18683deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_ir, d1_prime, NULL);
18693deb3ec6SMatthias Ringwald                 return;
18703deb3ec6SMatthias Ringwald             }
18713deb3ec6SMatthias Ringwald             break;
18723deb3ec6SMatthias Ringwald         default:
18733deb3ec6SMatthias Ringwald             break;
18743deb3ec6SMatthias Ringwald     }
18753deb3ec6SMatthias Ringwald 
187609e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
18777df18c15SMatthias Ringwald     if (ec_key_generation_state == EC_KEY_GENERATION_ACTIVE){
1878c692d776SMatthias Ringwald #ifndef HAVE_HCI_CONTROLLER_DHKEY_SUPPORT
18797df18c15SMatthias Ringwald         sm_random_start(NULL);
188009e4d397SMatthias Ringwald #else
188109e4d397SMatthias Ringwald         ec_key_generation_state = EC_KEY_GENERATION_W4_KEY;
188209e4d397SMatthias Ringwald         hci_send_cmd(&hci_le_read_local_p256_public_key);
188309e4d397SMatthias Ringwald #endif
18847df18c15SMatthias Ringwald         return;
18857df18c15SMatthias Ringwald     }
18867df18c15SMatthias Ringwald #endif
18877df18c15SMatthias Ringwald 
18883deb3ec6SMatthias Ringwald     // random address updates
18893deb3ec6SMatthias Ringwald     switch (rau_state){
18903deb3ec6SMatthias Ringwald         case RAU_GET_RANDOM:
18913deb3ec6SMatthias Ringwald             rau_next_state();
18923deb3ec6SMatthias Ringwald             sm_random_start(NULL);
18933deb3ec6SMatthias Ringwald             return;
18943deb3ec6SMatthias Ringwald         case RAU_GET_ENC:
18953deb3ec6SMatthias Ringwald             // already busy?
18963deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_IDLE) {
18973deb3ec6SMatthias Ringwald                 sm_key_t r_prime;
18983deb3ec6SMatthias Ringwald                 sm_ah_r_prime(sm_random_address, r_prime);
18993deb3ec6SMatthias Ringwald                 rau_next_state();
19003deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_irk, r_prime, NULL);
19013deb3ec6SMatthias Ringwald                 return;
19023deb3ec6SMatthias Ringwald             }
19033deb3ec6SMatthias Ringwald             break;
19043deb3ec6SMatthias Ringwald         case RAU_SET_ADDRESS:
19053deb3ec6SMatthias Ringwald             log_info("New random address: %s", bd_addr_to_str(sm_random_address));
19063deb3ec6SMatthias Ringwald             rau_state = RAU_IDLE;
19073deb3ec6SMatthias Ringwald             hci_send_cmd(&hci_le_set_random_address, sm_random_address);
19083deb3ec6SMatthias Ringwald             return;
19093deb3ec6SMatthias Ringwald         default:
19103deb3ec6SMatthias Ringwald             break;
19113deb3ec6SMatthias Ringwald     }
19123deb3ec6SMatthias Ringwald 
19137a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
19143deb3ec6SMatthias Ringwald     // CMAC
19153deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
19163deb3ec6SMatthias Ringwald         case CMAC_CALC_SUBKEYS:
19173deb3ec6SMatthias Ringwald         case CMAC_CALC_MI:
19183deb3ec6SMatthias Ringwald         case CMAC_CALC_MLAST:
19193deb3ec6SMatthias Ringwald             // already busy?
19203deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_ACTIVE) break;
19213deb3ec6SMatthias Ringwald             sm_cmac_handle_aes_engine_ready();
19223deb3ec6SMatthias Ringwald             return;
19233deb3ec6SMatthias Ringwald         default:
19243deb3ec6SMatthias Ringwald             break;
19253deb3ec6SMatthias Ringwald     }
19267a766ebfSMatthias Ringwald #endif
19273deb3ec6SMatthias Ringwald 
19283deb3ec6SMatthias Ringwald     // CSRK Lookup
19293deb3ec6SMatthias Ringwald     // -- if csrk lookup ready, find connection that require csrk lookup
19303deb3ec6SMatthias Ringwald     if (sm_address_resolution_idle()){
19313deb3ec6SMatthias Ringwald         hci_connections_get_iterator(&it);
1932665d90f2SMatthias Ringwald         while(btstack_linked_list_iterator_has_next(&it)){
1933665d90f2SMatthias Ringwald             hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
19343deb3ec6SMatthias Ringwald             sm_connection_t  * sm_connection  = &hci_connection->sm_connection;
19353deb3ec6SMatthias Ringwald             if (sm_connection->sm_irk_lookup_state == IRK_LOOKUP_W4_READY){
19363deb3ec6SMatthias Ringwald                 // and start lookup
19373deb3ec6SMatthias Ringwald                 sm_address_resolution_start_lookup(sm_connection->sm_peer_addr_type, sm_connection->sm_handle, sm_connection->sm_peer_address, ADDRESS_RESOLUTION_FOR_CONNECTION, sm_connection);
19383deb3ec6SMatthias Ringwald                 sm_connection->sm_irk_lookup_state = IRK_LOOKUP_STARTED;
19393deb3ec6SMatthias Ringwald                 break;
19403deb3ec6SMatthias Ringwald             }
19413deb3ec6SMatthias Ringwald         }
19423deb3ec6SMatthias Ringwald     }
19433deb3ec6SMatthias Ringwald 
19443deb3ec6SMatthias Ringwald     // -- if csrk lookup ready, resolved addresses for received addresses
19453deb3ec6SMatthias Ringwald     if (sm_address_resolution_idle()) {
1946665d90f2SMatthias Ringwald         if (!btstack_linked_list_empty(&sm_address_resolution_general_queue)){
19473deb3ec6SMatthias Ringwald             sm_lookup_entry_t * entry = (sm_lookup_entry_t *) sm_address_resolution_general_queue;
1948665d90f2SMatthias Ringwald             btstack_linked_list_remove(&sm_address_resolution_general_queue, (btstack_linked_item_t *) entry);
19493deb3ec6SMatthias Ringwald             sm_address_resolution_start_lookup(entry->address_type, 0, entry->address, ADDRESS_RESOLUTION_GENERAL, NULL);
19503deb3ec6SMatthias Ringwald             btstack_memory_sm_lookup_entry_free(entry);
19513deb3ec6SMatthias Ringwald         }
19523deb3ec6SMatthias Ringwald     }
19533deb3ec6SMatthias Ringwald 
19543deb3ec6SMatthias Ringwald     // -- Continue with CSRK device lookup by public or resolvable private address
19553deb3ec6SMatthias Ringwald     if (!sm_address_resolution_idle()){
19563deb3ec6SMatthias Ringwald         log_info("LE Device Lookup: device %u/%u", sm_address_resolution_test, le_device_db_count());
19573deb3ec6SMatthias Ringwald         while (sm_address_resolution_test < le_device_db_count()){
19583deb3ec6SMatthias Ringwald             int addr_type;
19593deb3ec6SMatthias Ringwald             bd_addr_t addr;
19603deb3ec6SMatthias Ringwald             sm_key_t irk;
19613deb3ec6SMatthias Ringwald             le_device_db_info(sm_address_resolution_test, &addr_type, addr, irk);
19623deb3ec6SMatthias Ringwald             log_info("device type %u, addr: %s", addr_type, bd_addr_to_str(addr));
19633deb3ec6SMatthias Ringwald 
19643deb3ec6SMatthias Ringwald             if (sm_address_resolution_addr_type == addr_type && memcmp(addr, sm_address_resolution_address, 6) == 0){
19653deb3ec6SMatthias Ringwald                 log_info("LE Device Lookup: found CSRK by { addr_type, address} ");
19663deb3ec6SMatthias Ringwald                 sm_address_resolution_handle_event(ADDRESS_RESOLUTION_SUCEEDED);
19673deb3ec6SMatthias Ringwald                 break;
19683deb3ec6SMatthias Ringwald             }
19693deb3ec6SMatthias Ringwald 
19703deb3ec6SMatthias Ringwald             if (sm_address_resolution_addr_type == 0){
19713deb3ec6SMatthias Ringwald                 sm_address_resolution_test++;
19723deb3ec6SMatthias Ringwald                 continue;
19733deb3ec6SMatthias Ringwald             }
19743deb3ec6SMatthias Ringwald 
19753deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_ACTIVE) break;
19763deb3ec6SMatthias Ringwald 
19773deb3ec6SMatthias Ringwald             log_info("LE Device Lookup: calculate AH");
19788314c363SMatthias Ringwald             log_info_key("IRK", irk);
19793deb3ec6SMatthias Ringwald 
19803deb3ec6SMatthias Ringwald             sm_key_t r_prime;
19813deb3ec6SMatthias Ringwald             sm_ah_r_prime(sm_address_resolution_address, r_prime);
19823deb3ec6SMatthias Ringwald             sm_address_resolution_ah_calculation_active = 1;
19833deb3ec6SMatthias Ringwald             sm_aes128_start(irk, r_prime, sm_address_resolution_context);   // keep context
19843deb3ec6SMatthias Ringwald             return;
19853deb3ec6SMatthias Ringwald         }
19863deb3ec6SMatthias Ringwald 
19873deb3ec6SMatthias Ringwald         if (sm_address_resolution_test >= le_device_db_count()){
19883deb3ec6SMatthias Ringwald             log_info("LE Device Lookup: not found");
19893deb3ec6SMatthias Ringwald             sm_address_resolution_handle_event(ADDRESS_RESOLUTION_FAILED);
19903deb3ec6SMatthias Ringwald         }
19913deb3ec6SMatthias Ringwald     }
19923deb3ec6SMatthias Ringwald 
199341d32297SMatthias Ringwald     // handle basic actions that don't requires the full context
199441d32297SMatthias Ringwald     hci_connections_get_iterator(&it);
199541d32297SMatthias Ringwald     while(!sm_active_connection && btstack_linked_list_iterator_has_next(&it)){
199641d32297SMatthias Ringwald         hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
199741d32297SMatthias Ringwald         sm_connection_t  * sm_connection = &hci_connection->sm_connection;
199841d32297SMatthias Ringwald         switch(sm_connection->sm_engine_state){
199941d32297SMatthias Ringwald             // responder side
200041d32297SMatthias Ringwald             case SM_RESPONDER_PH0_SEND_LTK_REQUESTED_NEGATIVE_REPLY:
200141d32297SMatthias Ringwald                 sm_connection->sm_engine_state = SM_RESPONDER_IDLE;
200241d32297SMatthias Ringwald                 hci_send_cmd(&hci_le_long_term_key_negative_reply, sm_connection->sm_handle);
200341d32297SMatthias Ringwald                 return;
20044b8b5afeSMatthias Ringwald 
20054b8b5afeSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
20064b8b5afeSMatthias Ringwald             case SM_SC_RECEIVED_LTK_REQUEST:
20074b8b5afeSMatthias Ringwald                 switch (sm_connection->sm_irk_lookup_state){
20084b8b5afeSMatthias Ringwald                     case IRK_LOOKUP_FAILED:
20094b8b5afeSMatthias Ringwald                         log_info("LTK Request: ediv & random are empty, but no stored LTK (IRK Lookup Failed)");
20104b8b5afeSMatthias Ringwald                         sm_connection->sm_engine_state = SM_RESPONDER_IDLE;
20114b8b5afeSMatthias Ringwald                         hci_send_cmd(&hci_le_long_term_key_negative_reply, sm_connection->sm_handle);
20124b8b5afeSMatthias Ringwald                         return;
20134b8b5afeSMatthias Ringwald                     default:
20144b8b5afeSMatthias Ringwald                         break;
20154b8b5afeSMatthias Ringwald                 }
20164b8b5afeSMatthias Ringwald                 break;
20174b8b5afeSMatthias Ringwald #endif
201841d32297SMatthias Ringwald             default:
201941d32297SMatthias Ringwald                 break;
202041d32297SMatthias Ringwald         }
202141d32297SMatthias Ringwald     }
20223deb3ec6SMatthias Ringwald 
20233deb3ec6SMatthias Ringwald     //
20243deb3ec6SMatthias Ringwald     // active connection handling
20253deb3ec6SMatthias Ringwald     // -- use loop to handle next connection if lock on setup context is released
20263deb3ec6SMatthias Ringwald 
20273deb3ec6SMatthias Ringwald     while (1) {
20283deb3ec6SMatthias Ringwald 
20293deb3ec6SMatthias Ringwald         // Find connections that requires setup context and make active if no other is locked
20303deb3ec6SMatthias Ringwald         hci_connections_get_iterator(&it);
2031665d90f2SMatthias Ringwald         while(!sm_active_connection && btstack_linked_list_iterator_has_next(&it)){
2032665d90f2SMatthias Ringwald             hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
20333deb3ec6SMatthias Ringwald             sm_connection_t  * sm_connection = &hci_connection->sm_connection;
20343deb3ec6SMatthias Ringwald             // - if no connection locked and we're ready/waiting for setup context, fetch it and start
20353deb3ec6SMatthias Ringwald             int done = 1;
20363deb3ec6SMatthias Ringwald             int err;
203742134bc6SMatthias Ringwald             UNUSED(err);
20383deb3ec6SMatthias Ringwald             switch (sm_connection->sm_engine_state) {
203942134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
20403deb3ec6SMatthias Ringwald                 case SM_RESPONDER_SEND_SECURITY_REQUEST:
20413deb3ec6SMatthias Ringwald                     // send packet if possible,
2042adbe29e8SMatthias Ringwald                     if (l2cap_can_send_fixed_channel_packet_now(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL)){
2043b170b20fSMatthias Ringwald                         const uint8_t buffer[2] = { SM_CODE_SECURITY_REQUEST, SM_AUTHREQ_BONDING};
20443deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_RESPONDER_PH1_W4_PAIRING_REQUEST;
20453deb3ec6SMatthias Ringwald                         l2cap_send_connectionless(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2046b170b20fSMatthias Ringwald                     } else {
2047b170b20fSMatthias Ringwald                         l2cap_request_can_send_fix_channel_now_event(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL);
20483deb3ec6SMatthias Ringwald                     }
20495829ebe2SMatthias Ringwald                     // don't lock sxetup context yet
20503deb3ec6SMatthias Ringwald                     done = 0;
20513deb3ec6SMatthias Ringwald                     break;
20523deb3ec6SMatthias Ringwald                 case SM_RESPONDER_PH1_PAIRING_REQUEST_RECEIVED:
2053d7471931SMatthias Ringwald                     sm_reset_setup();
20543deb3ec6SMatthias Ringwald                     sm_init_setup(sm_connection);
20553deb3ec6SMatthias Ringwald                     // recover pairing request
20563deb3ec6SMatthias Ringwald                     memcpy(&setup->sm_m_preq, &sm_connection->sm_m_preq, sizeof(sm_pairing_packet_t));
20573deb3ec6SMatthias Ringwald                     err = sm_stk_generation_init(sm_connection);
20583deb3ec6SMatthias Ringwald                     if (err){
20593deb3ec6SMatthias Ringwald                         setup->sm_pairing_failed_reason = err;
20603deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
20613deb3ec6SMatthias Ringwald                         break;
20623deb3ec6SMatthias Ringwald                     }
20633deb3ec6SMatthias Ringwald                     sm_timeout_start(sm_connection);
20643deb3ec6SMatthias Ringwald                     // generate random number first, if we need to show passkey
20653deb3ec6SMatthias Ringwald                     if (setup->sm_stk_generation_method == PK_INIT_INPUT){
20663deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_PH2_GET_RANDOM_TK;
20673deb3ec6SMatthias Ringwald                         break;
20683deb3ec6SMatthias Ringwald                     }
20693deb3ec6SMatthias Ringwald                     sm_connection->sm_engine_state = SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE;
20703deb3ec6SMatthias Ringwald                     break;
207142134bc6SMatthias Ringwald                 case SM_RESPONDER_PH0_RECEIVED_LTK_REQUEST:
207242134bc6SMatthias Ringwald                     sm_reset_setup();
207342134bc6SMatthias Ringwald                     sm_start_calculating_ltk_from_ediv_and_rand(sm_connection);
207442134bc6SMatthias Ringwald                     break;
207542134bc6SMatthias Ringwald #endif
207642134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
20773deb3ec6SMatthias Ringwald                 case SM_INITIATOR_PH0_HAS_LTK:
2078d7471931SMatthias Ringwald                     sm_reset_setup();
20795829ebe2SMatthias Ringwald                     sm_load_security_info(sm_connection);
20803deb3ec6SMatthias Ringwald                     sm_connection->sm_engine_state = SM_INITIATOR_PH0_SEND_START_ENCRYPTION;
20813deb3ec6SMatthias Ringwald                     break;
208206cd539fSMatthias Ringwald                 case SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST:
208306cd539fSMatthias Ringwald                     sm_reset_setup();
208406cd539fSMatthias Ringwald                     sm_init_setup(sm_connection);
208506cd539fSMatthias Ringwald                     sm_timeout_start(sm_connection);
208606cd539fSMatthias Ringwald                     sm_connection->sm_engine_state = SM_INITIATOR_PH1_SEND_PAIRING_REQUEST;
208706cd539fSMatthias Ringwald                     break;
208842134bc6SMatthias Ringwald #endif
208906cd539fSMatthias Ringwald 
2090549ad5d2SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
209106cd539fSMatthias Ringwald                 case SM_SC_RECEIVED_LTK_REQUEST:
20925829ebe2SMatthias Ringwald                     switch (sm_connection->sm_irk_lookup_state){
2093549ad5d2SMatthias Ringwald                         case IRK_LOOKUP_SUCCEEDED:
2094549ad5d2SMatthias Ringwald                             // assuming Secure Connection, we have a stored LTK and the EDIV/RAND are null
209541d32297SMatthias Ringwald                             // start using context by loading security info
2096d7471931SMatthias Ringwald                             sm_reset_setup();
20975829ebe2SMatthias Ringwald                             sm_load_security_info(sm_connection);
2098549ad5d2SMatthias Ringwald                             if (setup->sm_peer_ediv == 0 && sm_is_null_random(setup->sm_peer_rand) && !sm_is_null_key(setup->sm_peer_ltk)){
2099d7471931SMatthias Ringwald                                 memcpy(setup->sm_ltk, setup->sm_peer_ltk, 16);
2100d7471931SMatthias Ringwald                                 sm_connection->sm_engine_state = SM_RESPONDER_PH4_SEND_LTK_REPLY;
21015829ebe2SMatthias Ringwald                                 break;
21025829ebe2SMatthias Ringwald                             }
2103549ad5d2SMatthias Ringwald                             log_info("LTK Request: ediv & random are empty, but no stored LTK (IRK Lookup Succeeded)");
21044b8b5afeSMatthias Ringwald                             sm_connection->sm_engine_state = SM_RESPONDER_IDLE;
21054b8b5afeSMatthias Ringwald                             hci_send_cmd(&hci_le_long_term_key_negative_reply, sm_connection->sm_handle);
21064b8b5afeSMatthias Ringwald                             // don't lock setup context yet
21074b8b5afeSMatthias Ringwald                             return;
21085829ebe2SMatthias Ringwald                         default:
21095829ebe2SMatthias Ringwald                             // just wait until IRK lookup is completed
211059066796SMatthias Ringwald                             // don't lock setup context yet
21115829ebe2SMatthias Ringwald                             done = 0;
21125829ebe2SMatthias Ringwald                             break;
21135829ebe2SMatthias Ringwald                     }
211406cd539fSMatthias Ringwald                     break;
2115549ad5d2SMatthias Ringwald #endif
21163deb3ec6SMatthias Ringwald                 default:
21173deb3ec6SMatthias Ringwald                     done = 0;
21183deb3ec6SMatthias Ringwald                     break;
21193deb3ec6SMatthias Ringwald             }
21203deb3ec6SMatthias Ringwald             if (done){
21213deb3ec6SMatthias Ringwald                 sm_active_connection = sm_connection->sm_handle;
21223deb3ec6SMatthias Ringwald                 log_info("sm: connection 0x%04x locked setup context as %s", sm_active_connection, sm_connection->sm_role ? "responder" : "initiator");
21233deb3ec6SMatthias Ringwald             }
21243deb3ec6SMatthias Ringwald         }
21253deb3ec6SMatthias Ringwald 
21263deb3ec6SMatthias Ringwald         //
21273deb3ec6SMatthias Ringwald         // active connection handling
21283deb3ec6SMatthias Ringwald         //
21293deb3ec6SMatthias Ringwald 
21303deb3ec6SMatthias Ringwald         if (sm_active_connection == 0) return;
21313deb3ec6SMatthias Ringwald 
21323deb3ec6SMatthias Ringwald         // assert that we could send a SM PDU - not needed for all of the following
2133b170b20fSMatthias Ringwald         if (!l2cap_can_send_fixed_channel_packet_now(sm_active_connection, L2CAP_CID_SECURITY_MANAGER_PROTOCOL)) {
2134b170b20fSMatthias Ringwald             l2cap_request_can_send_fix_channel_now_event(sm_active_connection, L2CAP_CID_SECURITY_MANAGER_PROTOCOL);
2135b170b20fSMatthias Ringwald             return;
2136b170b20fSMatthias Ringwald         }
21373deb3ec6SMatthias Ringwald 
21383deb3ec6SMatthias Ringwald         sm_connection_t * connection = sm_get_connection_for_handle(sm_active_connection);
21393deb3ec6SMatthias Ringwald         if (!connection) return;
21403deb3ec6SMatthias Ringwald 
21413d7fe1e9SMatthias Ringwald         // send keypress notifications
21423d7fe1e9SMatthias Ringwald         if (setup->sm_keypress_notification != 0xff){
21433d7fe1e9SMatthias Ringwald             uint8_t buffer[2];
21443d7fe1e9SMatthias Ringwald             buffer[0] = SM_CODE_KEYPRESS_NOTIFICATION;
21453d7fe1e9SMatthias Ringwald             buffer[1] = setup->sm_keypress_notification;
21463d7fe1e9SMatthias Ringwald             setup->sm_keypress_notification = 0xff;
21473d7fe1e9SMatthias Ringwald             l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2148d7471931SMatthias Ringwald             return;
21493d7fe1e9SMatthias Ringwald         }
21503d7fe1e9SMatthias Ringwald 
21513deb3ec6SMatthias Ringwald         sm_key_t plaintext;
21523deb3ec6SMatthias Ringwald         int key_distribution_flags;
215342134bc6SMatthias Ringwald         UNUSED(key_distribution_flags);
21543deb3ec6SMatthias Ringwald 
21553deb3ec6SMatthias Ringwald         log_info("sm_run: state %u", connection->sm_engine_state);
21563deb3ec6SMatthias Ringwald 
21573deb3ec6SMatthias Ringwald         switch (connection->sm_engine_state){
21583deb3ec6SMatthias Ringwald 
21593deb3ec6SMatthias Ringwald             // general
21603deb3ec6SMatthias Ringwald             case SM_GENERAL_SEND_PAIRING_FAILED: {
21613deb3ec6SMatthias Ringwald                 uint8_t buffer[2];
21623deb3ec6SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_FAILED;
21633deb3ec6SMatthias Ringwald                 buffer[1] = setup->sm_pairing_failed_reason;
21643deb3ec6SMatthias Ringwald                 connection->sm_engine_state = connection->sm_role ? SM_RESPONDER_IDLE : SM_INITIATOR_CONNECTED;
21653deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
21663deb3ec6SMatthias Ringwald                 sm_done_for_handle(connection->sm_handle);
21673deb3ec6SMatthias Ringwald                 break;
21683deb3ec6SMatthias Ringwald             }
21693deb3ec6SMatthias Ringwald 
217041d32297SMatthias Ringwald             // responding state
2171aec94140SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2172f1c1783eSMatthias Ringwald             case SM_SC_W2_GET_RANDOM_A:
2173f1c1783eSMatthias Ringwald                 sm_random_start(connection);
2174f1c1783eSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_GET_RANDOM_A;
2175f1c1783eSMatthias Ringwald                 break;
2176f1c1783eSMatthias Ringwald             case SM_SC_W2_GET_RANDOM_B:
2177f1c1783eSMatthias Ringwald                 sm_random_start(connection);
2178f1c1783eSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_GET_RANDOM_B;
2179f1c1783eSMatthias Ringwald                 break;
2180aec94140SMatthias Ringwald             case SM_SC_W2_CMAC_FOR_CONFIRMATION:
2181aec94140SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2182aec94140SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CMAC_FOR_CONFIRMATION;
2183aec94140SMatthias Ringwald                 sm_sc_calculate_local_confirm(connection);
2184aec94140SMatthias Ringwald                 break;
2185688a08f9SMatthias Ringwald             case SM_SC_W2_CMAC_FOR_CHECK_CONFIRMATION:
2186688a08f9SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2187688a08f9SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CMAC_FOR_CHECK_CONFIRMATION;
2188688a08f9SMatthias Ringwald                 sm_sc_calculate_remote_confirm(connection);
2189688a08f9SMatthias Ringwald                 break;
2190dc300847SMatthias Ringwald             case SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK:
2191dc300847SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2192dc300847SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK;
2193dc300847SMatthias Ringwald                 sm_sc_calculate_f6_for_dhkey_check(connection);
2194dc300847SMatthias Ringwald                 break;
2195019005a0SMatthias Ringwald             case SM_SC_W2_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK:
2196b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2197019005a0SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK;
21980346c37cSMatthias Ringwald                 sm_sc_calculate_f6_to_verify_dhkey_check(connection);
21990346c37cSMatthias Ringwald                 break;
22000346c37cSMatthias Ringwald             case SM_SC_W2_CALCULATE_F5_SALT:
2201b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
22020346c37cSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F5_SALT;
22030346c37cSMatthias Ringwald                 f5_calculate_salt(connection);
22040346c37cSMatthias Ringwald                 break;
22050346c37cSMatthias Ringwald             case SM_SC_W2_CALCULATE_F5_MACKEY:
2206b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
22070346c37cSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F5_MACKEY;
22080346c37cSMatthias Ringwald                 f5_calculate_mackey(connection);
22090346c37cSMatthias Ringwald                 break;
22100346c37cSMatthias Ringwald             case SM_SC_W2_CALCULATE_F5_LTK:
2211b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
22120346c37cSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F5_LTK;
22130346c37cSMatthias Ringwald                 f5_calculate_ltk(connection);
2214019005a0SMatthias Ringwald                 break;
2215bd57ffebSMatthias Ringwald             case SM_SC_W2_CALCULATE_G2:
2216b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2217bd57ffebSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_G2;
2218b35a3de2SMatthias Ringwald                 g2_calculate(connection);
2219bd57ffebSMatthias Ringwald                 break;
22202bacf595SMatthias Ringwald             case SM_SC_W2_CALCULATE_H6_ILK:
22212bacf595SMatthias Ringwald                 if (!sm_cmac_ready()) break;
22222bacf595SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_H6_ILK;
22232bacf595SMatthias Ringwald                 h6_calculate_ilk(connection);
22242bacf595SMatthias Ringwald                 break;
22252bacf595SMatthias Ringwald             case SM_SC_W2_CALCULATE_H6_BR_EDR_LINK_KEY:
22262bacf595SMatthias Ringwald                 if (!sm_cmac_ready()) break;
22272bacf595SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_H6_BR_EDR_LINK_KEY;
22282bacf595SMatthias Ringwald                 h6_calculate_br_edr_link_key(connection);
22292bacf595SMatthias Ringwald                 break;
2230aec94140SMatthias Ringwald #endif
223141d32297SMatthias Ringwald 
223242134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
22333deb3ec6SMatthias Ringwald             // initiator side
22343deb3ec6SMatthias Ringwald             case SM_INITIATOR_PH0_SEND_START_ENCRYPTION: {
22353deb3ec6SMatthias Ringwald                 sm_key_t peer_ltk_flipped;
22369c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_peer_ltk, peer_ltk_flipped);
22373deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED;
22383deb3ec6SMatthias Ringwald                 log_info("sm: hci_le_start_encryption ediv 0x%04x", setup->sm_peer_ediv);
2239c9b8fdd9SMatthias Ringwald                 uint32_t rand_high = big_endian_read_32(setup->sm_peer_rand, 0);
2240c9b8fdd9SMatthias Ringwald                 uint32_t rand_low  = big_endian_read_32(setup->sm_peer_rand, 4);
22413deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_start_encryption, connection->sm_handle,rand_low, rand_high, setup->sm_peer_ediv, peer_ltk_flipped);
22423deb3ec6SMatthias Ringwald                 return;
22433deb3ec6SMatthias Ringwald             }
22443deb3ec6SMatthias Ringwald 
22453deb3ec6SMatthias Ringwald             case SM_INITIATOR_PH1_SEND_PAIRING_REQUEST:
22461ad129beSMatthias Ringwald                 sm_pairing_packet_set_code(setup->sm_m_preq, SM_CODE_PAIRING_REQUEST);
22473deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_INITIATOR_PH1_W4_PAIRING_RESPONSE;
22483deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) &setup->sm_m_preq, sizeof(sm_pairing_packet_t));
22493deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
22503deb3ec6SMatthias Ringwald                 break;
225142134bc6SMatthias Ringwald #endif
22523deb3ec6SMatthias Ringwald 
225327c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
225441d32297SMatthias Ringwald 
2255c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_PUBLIC_KEY_COMMAND: {
225627c32905SMatthias Ringwald                 uint8_t buffer[65];
225727c32905SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_PUBLIC_KEY;
225827c32905SMatthias Ringwald                 //
2259fc5bff5fSMatthias Ringwald                 reverse_256(&ec_q[0],  &buffer[1]);
2260fc5bff5fSMatthias Ringwald                 reverse_256(&ec_q[32], &buffer[33]);
2261e53be891SMatthias Ringwald 
226245a61d50SMatthias Ringwald                 // stk generation method
226345a61d50SMatthias Ringwald                 // passkey entry: notify app to show passkey or to request passkey
226445a61d50SMatthias Ringwald                 switch (setup->sm_stk_generation_method){
226545a61d50SMatthias Ringwald                     case JUST_WORKS:
226645a61d50SMatthias Ringwald                     case NK_BOTH_INPUT:
226742134bc6SMatthias Ringwald                         if (IS_RESPONDER(connection->sm_role)){
226807036a04SMatthias Ringwald                             // responder
2269b35a3de2SMatthias Ringwald                             sm_sc_start_calculating_local_confirm(connection);
227027c32905SMatthias Ringwald                         } else {
227107036a04SMatthias Ringwald                             // initiator
2272c6b7cbd9SMatthias Ringwald                             connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND;
227327c32905SMatthias Ringwald                         }
227445a61d50SMatthias Ringwald                         break;
227545a61d50SMatthias Ringwald                     case PK_INIT_INPUT:
227645a61d50SMatthias Ringwald                     case PK_RESP_INPUT:
227745a61d50SMatthias Ringwald                     case OK_BOTH_INPUT:
227807036a04SMatthias Ringwald                         // use random TK for display
227945a61d50SMatthias Ringwald                         memcpy(setup->sm_ra, setup->sm_tk, 16);
228045a61d50SMatthias Ringwald                         memcpy(setup->sm_rb, setup->sm_tk, 16);
228145a61d50SMatthias Ringwald                         setup->sm_passkey_bit = 0;
228207036a04SMatthias Ringwald 
228342134bc6SMatthias Ringwald                         if (IS_RESPONDER(connection->sm_role)){
228445a61d50SMatthias Ringwald                             // responder
2285c6b7cbd9SMatthias Ringwald                             connection->sm_engine_state = SM_SC_W4_CONFIRMATION;
228645a61d50SMatthias Ringwald                         } else {
228745a61d50SMatthias Ringwald                             // initiator
2288c6b7cbd9SMatthias Ringwald                             connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND;
228945a61d50SMatthias Ringwald                         }
229045a61d50SMatthias Ringwald                         sm_trigger_user_response(connection);
229145a61d50SMatthias Ringwald                         break;
229245a61d50SMatthias Ringwald                     case OOB:
229345a61d50SMatthias Ringwald                         // TODO: implement SC OOB
229445a61d50SMatthias Ringwald                         break;
229545a61d50SMatthias Ringwald                 }
229645a61d50SMatthias Ringwald 
229727c32905SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
229827c32905SMatthias Ringwald                 sm_timeout_reset(connection);
229927c32905SMatthias Ringwald                 break;
230027c32905SMatthias Ringwald             }
2301c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_CONFIRMATION: {
2302e53be891SMatthias Ringwald                 uint8_t buffer[17];
2303e53be891SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_CONFIRM;
23049af0f475SMatthias Ringwald                 reverse_128(setup->sm_local_confirm, &buffer[1]);
230542134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
2306c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM;
2307e53be891SMatthias Ringwald                 } else {
2308c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_CONFIRMATION;
2309e53be891SMatthias Ringwald                 }
2310e53be891SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2311e53be891SMatthias Ringwald                 sm_timeout_reset(connection);
2312e53be891SMatthias Ringwald                 break;
2313e53be891SMatthias Ringwald             }
2314c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_PAIRING_RANDOM: {
2315e53be891SMatthias Ringwald                 uint8_t buffer[17];
2316e53be891SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_RANDOM;
2317e53be891SMatthias Ringwald                 reverse_128(setup->sm_local_nonce, &buffer[1]);
231845a61d50SMatthias Ringwald                 if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT && setup->sm_passkey_bit < 20){
231942134bc6SMatthias Ringwald                     if (IS_RESPONDER(connection->sm_role)){
232045a61d50SMatthias Ringwald                         // responder
2321c6b7cbd9SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W4_CONFIRMATION;
232245a61d50SMatthias Ringwald                     } else {
232345a61d50SMatthias Ringwald                         // initiator
2324c6b7cbd9SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM;
232545a61d50SMatthias Ringwald                     }
232645a61d50SMatthias Ringwald                 } else {
232742134bc6SMatthias Ringwald                     if (IS_RESPONDER(connection->sm_role)){
2328e53be891SMatthias Ringwald                         // responder
2329446a8c36SMatthias Ringwald                         if (setup->sm_stk_generation_method == NK_BOTH_INPUT){
2330901c000fSMatthias Ringwald                             connection->sm_engine_state = SM_SC_W2_CALCULATE_G2;
23312886623dSMatthias Ringwald                         } else {
23322886623dSMatthias Ringwald                             sm_sc_prepare_dhkey_check(connection);
2333446a8c36SMatthias Ringwald                         }
2334e53be891SMatthias Ringwald                     } else {
2335136d331aSMatthias Ringwald                         // initiator
2336c6b7cbd9SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM;
2337e53be891SMatthias Ringwald                     }
233845a61d50SMatthias Ringwald                 }
2339e53be891SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2340e53be891SMatthias Ringwald                 sm_timeout_reset(connection);
2341e53be891SMatthias Ringwald                 break;
2342e53be891SMatthias Ringwald             }
2343c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_DHKEY_CHECK_COMMAND: {
2344e083ca23SMatthias Ringwald                 uint8_t buffer[17];
2345e083ca23SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_DHKEY_CHECK;
2346e53be891SMatthias Ringwald                 reverse_128(setup->sm_local_dhkey_check, &buffer[1]);
2347dc300847SMatthias Ringwald 
234842134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
2349c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_LTK_REQUEST_SC;
2350e53be891SMatthias Ringwald                 } else {
2351c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_DHKEY_CHECK_COMMAND;
2352e53be891SMatthias Ringwald                 }
2353e083ca23SMatthias Ringwald 
2354e53be891SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2355e53be891SMatthias Ringwald                 sm_timeout_reset(connection);
2356e53be891SMatthias Ringwald                 break;
2357e53be891SMatthias Ringwald             }
2358e53be891SMatthias Ringwald 
2359e53be891SMatthias Ringwald #endif
236042134bc6SMatthias Ringwald 
236142134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
23623deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE:
23633deb3ec6SMatthias Ringwald                 // echo initiator for now
23641ad129beSMatthias Ringwald                 sm_pairing_packet_set_code(setup->sm_s_pres,SM_CODE_PAIRING_RESPONSE);
23653deb3ec6SMatthias Ringwald                 key_distribution_flags = sm_key_distribution_flags_for_auth_req();
23661ad129beSMatthias Ringwald 
236727c32905SMatthias Ringwald                 if (setup->sm_use_secure_connections){
2368c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND;
236952f9cf63SMatthias Ringwald                     // skip LTK/EDIV for SC
2370bbf8db22SMatthias Ringwald                     log_info("sm: dropping encryption information flag");
237152f9cf63SMatthias Ringwald                     key_distribution_flags &= ~SM_KEYDIST_ENC_KEY;
23720b8af2a5SMatthias Ringwald                 } else {
23730b8af2a5SMatthias Ringwald                     connection->sm_engine_state = SM_RESPONDER_PH1_W4_PAIRING_CONFIRM;
237427c32905SMatthias Ringwald                 }
23750b8af2a5SMatthias Ringwald 
237652f9cf63SMatthias Ringwald                 sm_pairing_packet_set_initiator_key_distribution(setup->sm_s_pres, sm_pairing_packet_get_initiator_key_distribution(setup->sm_m_preq) & key_distribution_flags);
237752f9cf63SMatthias Ringwald                 sm_pairing_packet_set_responder_key_distribution(setup->sm_s_pres, sm_pairing_packet_get_responder_key_distribution(setup->sm_m_preq) & key_distribution_flags);
2378bbf8db22SMatthias Ringwald                 // update key distribution after ENC was dropped
2379cfd5ff74SMatthias Ringwald                 sm_setup_key_distribution(sm_pairing_packet_get_responder_key_distribution(setup->sm_s_pres));
238052f9cf63SMatthias Ringwald 
23813deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) &setup->sm_s_pres, sizeof(sm_pairing_packet_t));
23823deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
2383446a8c36SMatthias Ringwald                 // SC Numeric Comparison will trigger user response after public keys & nonces have been exchanged
23840b8af2a5SMatthias Ringwald                 if (!setup->sm_use_secure_connections || setup->sm_stk_generation_method == JUST_WORKS){
23853deb3ec6SMatthias Ringwald                     sm_trigger_user_response(connection);
2386446a8c36SMatthias Ringwald                 }
23873deb3ec6SMatthias Ringwald                 return;
238842134bc6SMatthias Ringwald #endif
23893deb3ec6SMatthias Ringwald 
23903deb3ec6SMatthias Ringwald             case SM_PH2_SEND_PAIRING_RANDOM: {
23913deb3ec6SMatthias Ringwald                 uint8_t buffer[17];
23923deb3ec6SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_RANDOM;
23939c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_local_random, &buffer[1]);
239442134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
23953deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_RESPONDER_PH2_W4_LTK_REQUEST;
23963deb3ec6SMatthias Ringwald                 } else {
23973deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_INITIATOR_PH2_W4_PAIRING_RANDOM;
23983deb3ec6SMatthias Ringwald                 }
23993deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
24003deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
24013deb3ec6SMatthias Ringwald                 break;
24023deb3ec6SMatthias Ringwald             }
24033deb3ec6SMatthias Ringwald 
24043deb3ec6SMatthias Ringwald             case SM_PH2_GET_RANDOM_TK:
24053deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_RANDOM_A:
24063deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_RANDOM_B:
24073deb3ec6SMatthias Ringwald             case SM_PH3_GET_RANDOM:
24083deb3ec6SMatthias Ringwald             case SM_PH3_GET_DIV:
24093deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24103deb3ec6SMatthias Ringwald                 sm_random_start(connection);
24113deb3ec6SMatthias Ringwald                 return;
24123deb3ec6SMatthias Ringwald 
24133deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_B:
24143deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_D:
24153deb3ec6SMatthias Ringwald                 // already busy?
24163deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24173deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24183deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, setup->sm_c1_t3_value, connection);
24193deb3ec6SMatthias Ringwald                 return;
24203deb3ec6SMatthias Ringwald 
24213deb3ec6SMatthias Ringwald             case SM_PH3_LTK_GET_ENC:
24223deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH4_LTK_GET_ENC:
24233deb3ec6SMatthias Ringwald                 // already busy?
24243deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_IDLE) {
24253deb3ec6SMatthias Ringwald                     sm_key_t d_prime;
24263deb3ec6SMatthias Ringwald                     sm_d1_d_prime(setup->sm_local_div, 0, d_prime);
24273deb3ec6SMatthias Ringwald                     sm_next_responding_state(connection);
24283deb3ec6SMatthias Ringwald                     sm_aes128_start(sm_persistent_er, d_prime, connection);
24293deb3ec6SMatthias Ringwald                     return;
24303deb3ec6SMatthias Ringwald                 }
24313deb3ec6SMatthias Ringwald                 break;
24323deb3ec6SMatthias Ringwald 
24333deb3ec6SMatthias Ringwald             case SM_PH3_CSRK_GET_ENC:
24343deb3ec6SMatthias Ringwald                 // already busy?
24353deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_IDLE) {
24363deb3ec6SMatthias Ringwald                     sm_key_t d_prime;
24373deb3ec6SMatthias Ringwald                     sm_d1_d_prime(setup->sm_local_div, 1, d_prime);
24383deb3ec6SMatthias Ringwald                     sm_next_responding_state(connection);
24393deb3ec6SMatthias Ringwald                     sm_aes128_start(sm_persistent_er, d_prime, connection);
24403deb3ec6SMatthias Ringwald                     return;
24413deb3ec6SMatthias Ringwald                 }
24423deb3ec6SMatthias Ringwald                 break;
24433deb3ec6SMatthias Ringwald 
24443deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_C:
24453deb3ec6SMatthias Ringwald                 // already busy?
24463deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24473deb3ec6SMatthias Ringwald                 // calculate m_confirm using aes128 engine - step 1
24483deb3ec6SMatthias Ringwald                 sm_c1_t1(setup->sm_peer_random, (uint8_t*) &setup->sm_m_preq, (uint8_t*) &setup->sm_s_pres, setup->sm_m_addr_type, setup->sm_s_addr_type, plaintext);
24493deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24503deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, plaintext, connection);
24513deb3ec6SMatthias Ringwald                 break;
24523deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_A:
24533deb3ec6SMatthias Ringwald                 // already busy?
24543deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24553deb3ec6SMatthias Ringwald                 // calculate confirm using aes128 engine - step 1
24563deb3ec6SMatthias Ringwald                 sm_c1_t1(setup->sm_local_random, (uint8_t*) &setup->sm_m_preq, (uint8_t*) &setup->sm_s_pres, setup->sm_m_addr_type, setup->sm_s_addr_type, plaintext);
24573deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24583deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, plaintext, connection);
24593deb3ec6SMatthias Ringwald                 break;
24603deb3ec6SMatthias Ringwald             case SM_PH2_CALC_STK:
24613deb3ec6SMatthias Ringwald                 // already busy?
24623deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24633deb3ec6SMatthias Ringwald                 // calculate STK
246442134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
24653deb3ec6SMatthias Ringwald                     sm_s1_r_prime(setup->sm_local_random, setup->sm_peer_random, plaintext);
24663deb3ec6SMatthias Ringwald                 } else {
24673deb3ec6SMatthias Ringwald                     sm_s1_r_prime(setup->sm_peer_random, setup->sm_local_random, plaintext);
24683deb3ec6SMatthias Ringwald                 }
24693deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24703deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, plaintext, connection);
24713deb3ec6SMatthias Ringwald                 break;
24723deb3ec6SMatthias Ringwald             case SM_PH3_Y_GET_ENC:
24733deb3ec6SMatthias Ringwald                 // already busy?
24743deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24753deb3ec6SMatthias Ringwald                 // PH3B2 - calculate Y from      - enc
24763deb3ec6SMatthias Ringwald                 // Y = dm(DHK, Rand)
24773deb3ec6SMatthias Ringwald                 sm_dm_r_prime(setup->sm_local_rand, plaintext);
24783deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24793deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_dhk, plaintext, connection);
24803deb3ec6SMatthias Ringwald                 return;
24813deb3ec6SMatthias Ringwald             case SM_PH2_C1_SEND_PAIRING_CONFIRM: {
24823deb3ec6SMatthias Ringwald                 uint8_t buffer[17];
24833deb3ec6SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_CONFIRM;
24849c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_local_confirm, &buffer[1]);
248542134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
24863deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_RESPONDER_PH2_W4_PAIRING_RANDOM;
24873deb3ec6SMatthias Ringwald                 } else {
24883deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_INITIATOR_PH2_W4_PAIRING_CONFIRM;
24893deb3ec6SMatthias Ringwald                 }
24903deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
24913deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
24923deb3ec6SMatthias Ringwald                 return;
24933deb3ec6SMatthias Ringwald             }
249442134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
24953deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH2_SEND_LTK_REPLY: {
24963deb3ec6SMatthias Ringwald                 sm_key_t stk_flipped;
24979c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_ltk, stk_flipped);
24983deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_W4_CONNECTION_ENCRYPTED;
24993deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_long_term_key_request_reply, connection->sm_handle, stk_flipped);
25003deb3ec6SMatthias Ringwald                 return;
25013deb3ec6SMatthias Ringwald             }
2502d7471931SMatthias Ringwald             case SM_RESPONDER_PH4_SEND_LTK_REPLY: {
25033deb3ec6SMatthias Ringwald                 sm_key_t ltk_flipped;
25049c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_ltk, ltk_flipped);
25053deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_RESPONDER_IDLE;
25063deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_long_term_key_request_reply, connection->sm_handle, ltk_flipped);
25073deb3ec6SMatthias Ringwald                 return;
25083deb3ec6SMatthias Ringwald             }
25093deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH4_Y_GET_ENC:
25103deb3ec6SMatthias Ringwald                 // already busy?
25113deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
25123deb3ec6SMatthias Ringwald                 log_info("LTK Request: recalculating with ediv 0x%04x", setup->sm_local_ediv);
25133deb3ec6SMatthias Ringwald                 // Y = dm(DHK, Rand)
25143deb3ec6SMatthias Ringwald                 sm_dm_r_prime(setup->sm_local_rand, plaintext);
25153deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
25163deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_dhk, plaintext, connection);
25173deb3ec6SMatthias Ringwald                 return;
251842134bc6SMatthias Ringwald #endif
251942134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
252042134bc6SMatthias Ringwald             case SM_INITIATOR_PH3_SEND_START_ENCRYPTION: {
252142134bc6SMatthias Ringwald                 sm_key_t stk_flipped;
252242134bc6SMatthias Ringwald                 reverse_128(setup->sm_ltk, stk_flipped);
252342134bc6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_W4_CONNECTION_ENCRYPTED;
252442134bc6SMatthias Ringwald                 hci_send_cmd(&hci_le_start_encryption, connection->sm_handle, 0, 0, 0, stk_flipped);
252542134bc6SMatthias Ringwald                 return;
252642134bc6SMatthias Ringwald             }
252742134bc6SMatthias Ringwald #endif
25283deb3ec6SMatthias Ringwald 
25293deb3ec6SMatthias Ringwald             case SM_PH3_DISTRIBUTE_KEYS:
25303deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION){
25313deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION;
25323deb3ec6SMatthias Ringwald                     uint8_t buffer[17];
25333deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_ENCRYPTION_INFORMATION;
25349c80e4ccSMatthias Ringwald                     reverse_128(setup->sm_ltk, &buffer[1]);
25353deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25363deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25373deb3ec6SMatthias Ringwald                     return;
25383deb3ec6SMatthias Ringwald                 }
25393deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_MASTER_IDENTIFICATION){
25403deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_MASTER_IDENTIFICATION;
25413deb3ec6SMatthias Ringwald                     uint8_t buffer[11];
25423deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_MASTER_IDENTIFICATION;
2543f8fbdce0SMatthias Ringwald                     little_endian_store_16(buffer, 1, setup->sm_local_ediv);
25449c80e4ccSMatthias Ringwald                     reverse_64(setup->sm_local_rand, &buffer[3]);
25453deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25463deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25473deb3ec6SMatthias Ringwald                     return;
25483deb3ec6SMatthias Ringwald                 }
25493deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_IDENTITY_INFORMATION){
25503deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_IDENTITY_INFORMATION;
25513deb3ec6SMatthias Ringwald                     uint8_t buffer[17];
25523deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_IDENTITY_INFORMATION;
25539c80e4ccSMatthias Ringwald                     reverse_128(sm_persistent_irk, &buffer[1]);
25543deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25553deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25563deb3ec6SMatthias Ringwald                     return;
25573deb3ec6SMatthias Ringwald                 }
25583deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION){
25593deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION;
25603deb3ec6SMatthias Ringwald                     bd_addr_t local_address;
25613deb3ec6SMatthias Ringwald                     uint8_t buffer[8];
25623deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_IDENTITY_ADDRESS_INFORMATION;
2563b95a5a35SMatthias Ringwald                     gap_le_get_own_address(&buffer[1], local_address);
2564724d70a2SMatthias Ringwald                     reverse_bd_addr(local_address, &buffer[2]);
25653deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25663deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25673deb3ec6SMatthias Ringwald                     return;
25683deb3ec6SMatthias Ringwald                 }
25693deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){
25703deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION;
25713deb3ec6SMatthias Ringwald 
25723deb3ec6SMatthias Ringwald                     // hack to reproduce test runs
25733deb3ec6SMatthias Ringwald                     if (test_use_fixed_local_csrk){
25743deb3ec6SMatthias Ringwald                         memset(setup->sm_local_csrk, 0xcc, 16);
25753deb3ec6SMatthias Ringwald                     }
25763deb3ec6SMatthias Ringwald 
25773deb3ec6SMatthias Ringwald                     uint8_t buffer[17];
25783deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_SIGNING_INFORMATION;
25799c80e4ccSMatthias Ringwald                     reverse_128(setup->sm_local_csrk, &buffer[1]);
25803deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25813deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25823deb3ec6SMatthias Ringwald                     return;
25833deb3ec6SMatthias Ringwald                 }
25843deb3ec6SMatthias Ringwald 
25853deb3ec6SMatthias Ringwald                 // keys are sent
258642134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
25873deb3ec6SMatthias Ringwald                     // slave -> receive master keys if any
25883deb3ec6SMatthias Ringwald                     if (sm_key_distribution_all_received(connection)){
25893deb3ec6SMatthias Ringwald                         sm_key_distribution_handle_all_received(connection);
25903deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_RESPONDER_IDLE;
25913deb3ec6SMatthias Ringwald                         sm_done_for_handle(connection->sm_handle);
25923deb3ec6SMatthias Ringwald                     } else {
25933deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_PH3_RECEIVE_KEYS;
25943deb3ec6SMatthias Ringwald                     }
25953deb3ec6SMatthias Ringwald                 } else {
25963deb3ec6SMatthias Ringwald                     // master -> all done
25973deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_INITIATOR_CONNECTED;
25983deb3ec6SMatthias Ringwald                     sm_done_for_handle(connection->sm_handle);
25993deb3ec6SMatthias Ringwald                 }
26003deb3ec6SMatthias Ringwald                 break;
26013deb3ec6SMatthias Ringwald 
26023deb3ec6SMatthias Ringwald             default:
26033deb3ec6SMatthias Ringwald                 break;
26043deb3ec6SMatthias Ringwald         }
26053deb3ec6SMatthias Ringwald 
26063deb3ec6SMatthias Ringwald         // check again if active connection was released
26073deb3ec6SMatthias Ringwald         if (sm_active_connection) break;
26083deb3ec6SMatthias Ringwald     }
26093deb3ec6SMatthias Ringwald }
26103deb3ec6SMatthias Ringwald 
26113deb3ec6SMatthias Ringwald // note: aes engine is ready as we just got the aes result
26123deb3ec6SMatthias Ringwald static void sm_handle_encryption_result(uint8_t * data){
26133deb3ec6SMatthias Ringwald 
26143deb3ec6SMatthias Ringwald     sm_aes128_state = SM_AES128_IDLE;
26153deb3ec6SMatthias Ringwald 
26163deb3ec6SMatthias Ringwald     if (sm_address_resolution_ah_calculation_active){
26173deb3ec6SMatthias Ringwald         sm_address_resolution_ah_calculation_active = 0;
26183deb3ec6SMatthias Ringwald         // compare calulated address against connecting device
26193deb3ec6SMatthias Ringwald         uint8_t hash[3];
26209c80e4ccSMatthias Ringwald         reverse_24(data, hash);
26213deb3ec6SMatthias Ringwald         if (memcmp(&sm_address_resolution_address[3], hash, 3) == 0){
26223deb3ec6SMatthias Ringwald             log_info("LE Device Lookup: matched resolvable private address");
26233deb3ec6SMatthias Ringwald             sm_address_resolution_handle_event(ADDRESS_RESOLUTION_SUCEEDED);
26243deb3ec6SMatthias Ringwald             return;
26253deb3ec6SMatthias Ringwald         }
26263deb3ec6SMatthias Ringwald         // no match, try next
26273deb3ec6SMatthias Ringwald         sm_address_resolution_test++;
26283deb3ec6SMatthias Ringwald         return;
26293deb3ec6SMatthias Ringwald     }
26303deb3ec6SMatthias Ringwald 
26313deb3ec6SMatthias Ringwald     switch (dkg_state){
26323deb3ec6SMatthias Ringwald         case DKG_W4_IRK:
26339c80e4ccSMatthias Ringwald             reverse_128(data, sm_persistent_irk);
26348314c363SMatthias Ringwald             log_info_key("irk", sm_persistent_irk);
26353deb3ec6SMatthias Ringwald             dkg_next_state();
26363deb3ec6SMatthias Ringwald             return;
26373deb3ec6SMatthias Ringwald         case DKG_W4_DHK:
26389c80e4ccSMatthias Ringwald             reverse_128(data, sm_persistent_dhk);
26398314c363SMatthias Ringwald             log_info_key("dhk", sm_persistent_dhk);
26403deb3ec6SMatthias Ringwald             dkg_next_state();
26416f792faaSMatthias Ringwald             // SM Init Finished
26423deb3ec6SMatthias Ringwald             return;
26433deb3ec6SMatthias Ringwald         default:
26443deb3ec6SMatthias Ringwald             break;
26453deb3ec6SMatthias Ringwald     }
26463deb3ec6SMatthias Ringwald 
26473deb3ec6SMatthias Ringwald     switch (rau_state){
26483deb3ec6SMatthias Ringwald         case RAU_W4_ENC:
26499c80e4ccSMatthias Ringwald             reverse_24(data, &sm_random_address[3]);
26503deb3ec6SMatthias Ringwald             rau_next_state();
26513deb3ec6SMatthias Ringwald             return;
26523deb3ec6SMatthias Ringwald         default:
26533deb3ec6SMatthias Ringwald             break;
26543deb3ec6SMatthias Ringwald     }
26553deb3ec6SMatthias Ringwald 
26567a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
26573deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
26583deb3ec6SMatthias Ringwald         case CMAC_W4_SUBKEYS:
26593deb3ec6SMatthias Ringwald         case CMAC_W4_MI:
26603deb3ec6SMatthias Ringwald         case CMAC_W4_MLAST:
26613deb3ec6SMatthias Ringwald             {
26623deb3ec6SMatthias Ringwald             sm_key_t t;
26639c80e4ccSMatthias Ringwald             reverse_128(data, t);
26643deb3ec6SMatthias Ringwald             sm_cmac_handle_encryption_result(t);
26653deb3ec6SMatthias Ringwald             }
26663deb3ec6SMatthias Ringwald             return;
26673deb3ec6SMatthias Ringwald         default:
26683deb3ec6SMatthias Ringwald             break;
26693deb3ec6SMatthias Ringwald     }
26707a766ebfSMatthias Ringwald #endif
26713deb3ec6SMatthias Ringwald 
26723deb3ec6SMatthias Ringwald     // retrieve sm_connection provided to sm_aes128_start_encryption
26733deb3ec6SMatthias Ringwald     sm_connection_t * connection = (sm_connection_t*) sm_aes128_context;
26743deb3ec6SMatthias Ringwald     if (!connection) return;
26753deb3ec6SMatthias Ringwald     switch (connection->sm_engine_state){
26763deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_A:
26773deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_C:
26783deb3ec6SMatthias Ringwald             {
26793deb3ec6SMatthias Ringwald             sm_key_t t2;
26809c80e4ccSMatthias Ringwald             reverse_128(data, t2);
26813deb3ec6SMatthias Ringwald             sm_c1_t3(t2, setup->sm_m_address, setup->sm_s_address, setup->sm_c1_t3_value);
26823deb3ec6SMatthias Ringwald             }
26833deb3ec6SMatthias Ringwald             sm_next_responding_state(connection);
26843deb3ec6SMatthias Ringwald             return;
26853deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_B:
26869c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_local_confirm);
26878314c363SMatthias Ringwald             log_info_key("c1!", setup->sm_local_confirm);
26883deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH2_C1_SEND_PAIRING_CONFIRM;
26893deb3ec6SMatthias Ringwald             return;
26903deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_D:
26913deb3ec6SMatthias Ringwald             {
26923deb3ec6SMatthias Ringwald             sm_key_t peer_confirm_test;
26939c80e4ccSMatthias Ringwald             reverse_128(data, peer_confirm_test);
26948314c363SMatthias Ringwald             log_info_key("c1!", peer_confirm_test);
26953deb3ec6SMatthias Ringwald             if (memcmp(setup->sm_peer_confirm, peer_confirm_test, 16) != 0){
26963deb3ec6SMatthias Ringwald                 setup->sm_pairing_failed_reason = SM_REASON_CONFIRM_VALUE_FAILED;
26973deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
26983deb3ec6SMatthias Ringwald                 return;
26993deb3ec6SMatthias Ringwald             }
270042134bc6SMatthias Ringwald             if (IS_RESPONDER(connection->sm_role)){
27013deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_SEND_PAIRING_RANDOM;
27023deb3ec6SMatthias Ringwald             } else {
27033deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_CALC_STK;
27043deb3ec6SMatthias Ringwald             }
27053deb3ec6SMatthias Ringwald             }
27063deb3ec6SMatthias Ringwald             return;
27073deb3ec6SMatthias Ringwald         case SM_PH2_W4_STK:
27089c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_ltk);
27093deb3ec6SMatthias Ringwald             sm_truncate_key(setup->sm_ltk, connection->sm_actual_encryption_key_size);
27108314c363SMatthias Ringwald             log_info_key("stk", setup->sm_ltk);
271142134bc6SMatthias Ringwald             if (IS_RESPONDER(connection->sm_role)){
27123deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_RESPONDER_PH2_SEND_LTK_REPLY;
27133deb3ec6SMatthias Ringwald             } else {
27143deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_INITIATOR_PH3_SEND_START_ENCRYPTION;
27153deb3ec6SMatthias Ringwald             }
27163deb3ec6SMatthias Ringwald             return;
27173deb3ec6SMatthias Ringwald         case SM_PH3_Y_W4_ENC:{
27183deb3ec6SMatthias Ringwald             sm_key_t y128;
27199c80e4ccSMatthias Ringwald             reverse_128(data, y128);
2720f8fbdce0SMatthias Ringwald             setup->sm_local_y = big_endian_read_16(y128, 14);
27213deb3ec6SMatthias Ringwald             log_info_hex16("y", setup->sm_local_y);
27223deb3ec6SMatthias Ringwald             // PH3B3 - calculate EDIV
27233deb3ec6SMatthias Ringwald             setup->sm_local_ediv = setup->sm_local_y ^ setup->sm_local_div;
27243deb3ec6SMatthias Ringwald             log_info_hex16("ediv", setup->sm_local_ediv);
27253deb3ec6SMatthias Ringwald             // PH3B4 - calculate LTK         - enc
27263deb3ec6SMatthias Ringwald             // LTK = d1(ER, DIV, 0))
27273deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_LTK_GET_ENC;
27283deb3ec6SMatthias Ringwald             return;
27293deb3ec6SMatthias Ringwald         }
27303deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH4_Y_W4_ENC:{
27313deb3ec6SMatthias Ringwald             sm_key_t y128;
27329c80e4ccSMatthias Ringwald             reverse_128(data, y128);
2733f8fbdce0SMatthias Ringwald             setup->sm_local_y = big_endian_read_16(y128, 14);
27343deb3ec6SMatthias Ringwald             log_info_hex16("y", setup->sm_local_y);
27353deb3ec6SMatthias Ringwald 
27363deb3ec6SMatthias Ringwald             // PH3B3 - calculate DIV
27373deb3ec6SMatthias Ringwald             setup->sm_local_div = setup->sm_local_y ^ setup->sm_local_ediv;
27383deb3ec6SMatthias Ringwald             log_info_hex16("ediv", setup->sm_local_ediv);
27393deb3ec6SMatthias Ringwald             // PH3B4 - calculate LTK         - enc
27403deb3ec6SMatthias Ringwald             // LTK = d1(ER, DIV, 0))
27413deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_RESPONDER_PH4_LTK_GET_ENC;
27423deb3ec6SMatthias Ringwald             return;
27433deb3ec6SMatthias Ringwald         }
27443deb3ec6SMatthias Ringwald         case SM_PH3_LTK_W4_ENC:
27459c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_ltk);
27468314c363SMatthias Ringwald             log_info_key("ltk", setup->sm_ltk);
27473deb3ec6SMatthias Ringwald             // calc CSRK next
27483deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_CSRK_GET_ENC;
27493deb3ec6SMatthias Ringwald             return;
27503deb3ec6SMatthias Ringwald         case SM_PH3_CSRK_W4_ENC:
27519c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_local_csrk);
27528314c363SMatthias Ringwald             log_info_key("csrk", setup->sm_local_csrk);
27533deb3ec6SMatthias Ringwald             if (setup->sm_key_distribution_send_set){
27543deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS;
27553deb3ec6SMatthias Ringwald             } else {
27563deb3ec6SMatthias Ringwald                 // no keys to send, just continue
275742134bc6SMatthias Ringwald                 if (IS_RESPONDER(connection->sm_role)){
27583deb3ec6SMatthias Ringwald                     // slave -> receive master keys
27593deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_PH3_RECEIVE_KEYS;
27603deb3ec6SMatthias Ringwald                 } else {
27612bacf595SMatthias Ringwald                     if (setup->sm_use_secure_connections && (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION)){
27622bacf595SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W2_CALCULATE_H6_ILK;
27632bacf595SMatthias Ringwald                     } else {
27643deb3ec6SMatthias Ringwald                         // master -> all done
27653deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_INITIATOR_CONNECTED;
27663deb3ec6SMatthias Ringwald                         sm_done_for_handle(connection->sm_handle);
27673deb3ec6SMatthias Ringwald                     }
27683deb3ec6SMatthias Ringwald                 }
27692bacf595SMatthias Ringwald             }
27703deb3ec6SMatthias Ringwald             return;
277142134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
27723deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH4_LTK_W4_ENC:
27739c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_ltk);
27743deb3ec6SMatthias Ringwald             sm_truncate_key(setup->sm_ltk, connection->sm_actual_encryption_key_size);
27758314c363SMatthias Ringwald             log_info_key("ltk", setup->sm_ltk);
2776d7471931SMatthias Ringwald             connection->sm_engine_state = SM_RESPONDER_PH4_SEND_LTK_REPLY;
27773deb3ec6SMatthias Ringwald             return;
277842134bc6SMatthias Ringwald #endif
27793deb3ec6SMatthias Ringwald         default:
27803deb3ec6SMatthias Ringwald             break;
27813deb3ec6SMatthias Ringwald     }
27823deb3ec6SMatthias Ringwald }
27833deb3ec6SMatthias Ringwald 
2784*88011322SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2785c692d776SMatthias Ringwald #ifndef HAVE_HCI_CONTROLLER_DHKEY_SUPPORT
27865198fffaSMatthias Ringwald // @return OK
2787c692d776SMatthias Ringwald static int sm_generate_f_rng(unsigned char * buffer, unsigned size){
27885198fffaSMatthias Ringwald     if (ec_key_generation_state != EC_KEY_GENERATION_ACTIVE) return 0;
27897df18c15SMatthias Ringwald     int offset = setup->sm_passkey_bit;
27907df18c15SMatthias Ringwald     log_info("sm_generate_f_rng: size %u - offset %u", (int) size, offset);
27917df18c15SMatthias Ringwald     while (size) {
2792fc5bff5fSMatthias Ringwald         *buffer++ = setup->sm_peer_q[offset++];
27937df18c15SMatthias Ringwald         size--;
27947df18c15SMatthias Ringwald     }
27957df18c15SMatthias Ringwald     setup->sm_passkey_bit = offset;
27965198fffaSMatthias Ringwald     return 1;
27977df18c15SMatthias Ringwald }
2798c692d776SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
27995198fffaSMatthias Ringwald // @return error
2800c692d776SMatthias Ringwald static int sm_generate_f_rng_mbedtls(void * context, unsigned char * buffer, size_t size){
2801c692d776SMatthias Ringwald     UNUSED(context);
28025198fffaSMatthias Ringwald     return sm_generate_f_rng(buffer, size) == 1;
2803c692d776SMatthias Ringwald }
2804c692d776SMatthias Ringwald #endif
28057df18c15SMatthias Ringwald #endif
2806*88011322SMatthias Ringwald #endif
28077df18c15SMatthias Ringwald 
28083deb3ec6SMatthias Ringwald // note: random generator is ready. this doesn NOT imply that aes engine is unused!
28093deb3ec6SMatthias Ringwald static void sm_handle_random_result(uint8_t * data){
28103deb3ec6SMatthias Ringwald 
2811*88011322SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2812c692d776SMatthias Ringwald #ifndef HAVE_HCI_CONTROLLER_DHKEY_SUPPORT
2813c692d776SMatthias Ringwald 
28147df18c15SMatthias Ringwald     if (ec_key_generation_state == EC_KEY_GENERATION_ACTIVE){
28157df18c15SMatthias Ringwald         int num_bytes = setup->sm_passkey_bit;
2816fc5bff5fSMatthias Ringwald         memcpy(&setup->sm_peer_q[num_bytes], data, 8);
28177df18c15SMatthias Ringwald         num_bytes += 8;
28187df18c15SMatthias Ringwald         setup->sm_passkey_bit = num_bytes;
28197df18c15SMatthias Ringwald 
28207df18c15SMatthias Ringwald         if (num_bytes >= 64){
2821ae4aa2b6SMatthias Ringwald 
2822c692d776SMatthias Ringwald             // init pre-generated random data from sm_peer_q
28237df18c15SMatthias Ringwald             setup->sm_passkey_bit = 0;
2824c692d776SMatthias Ringwald 
2825c692d776SMatthias Ringwald             // generate EC key
2826c692d776SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
2827e722521aSMatthias Ringwald             mbedtls_mpi d;
2828e722521aSMatthias Ringwald             mbedtls_ecp_point P;
2829e722521aSMatthias Ringwald             mbedtls_mpi_init(&d);
2830e722521aSMatthias Ringwald             mbedtls_ecp_point_init(&P);
2831c692d776SMatthias Ringwald             int res = mbedtls_ecp_gen_keypair(&mbedtls_ec_group, &d, &P, &sm_generate_f_rng_mbedtls, NULL);
28322e6217a0SMatthias Ringwald             log_info("gen keypair %x", res);
2833fc5bff5fSMatthias Ringwald             mbedtls_mpi_write_binary(&P.X, &ec_q[0],  32);
2834fc5bff5fSMatthias Ringwald             mbedtls_mpi_write_binary(&P.Y, &ec_q[32], 32);
28352e6217a0SMatthias Ringwald             mbedtls_mpi_write_binary(&d, ec_d, 32);
2836e722521aSMatthias Ringwald             mbedtls_ecp_point_free(&P);
2837e722521aSMatthias Ringwald             mbedtls_mpi_free(&d);
2838c692d776SMatthias Ringwald #endif
2839c692d776SMatthias Ringwald #ifdef USE_MICROECC_FOR_ECDH
2840c692d776SMatthias Ringwald             uECC_set_rng(&sm_generate_f_rng);
2841c692d776SMatthias Ringwald             uECC_make_key(ec_q, ec_d);
2842c692d776SMatthias Ringwald #endif
2843c692d776SMatthias Ringwald 
28447df18c15SMatthias Ringwald             ec_key_generation_state = EC_KEY_GENERATION_DONE;
284509e4d397SMatthias Ringwald             log_info("Elliptic curve: d");
284609e4d397SMatthias Ringwald             log_info_hexdump(ec_d,32);
28472e6217a0SMatthias Ringwald             sm_log_ec_keypair();
28487df18c15SMatthias Ringwald         }
28497df18c15SMatthias Ringwald     }
28507df18c15SMatthias Ringwald #endif
2851*88011322SMatthias Ringwald #endif
28527df18c15SMatthias Ringwald 
28533deb3ec6SMatthias Ringwald     switch (rau_state){
28543deb3ec6SMatthias Ringwald         case RAU_W4_RANDOM:
28553deb3ec6SMatthias Ringwald             // non-resolvable vs. resolvable
28563deb3ec6SMatthias Ringwald             switch (gap_random_adress_type){
28573deb3ec6SMatthias Ringwald                 case GAP_RANDOM_ADDRESS_RESOLVABLE:
28583deb3ec6SMatthias Ringwald                     // resolvable: use random as prand and calc address hash
28593deb3ec6SMatthias Ringwald                     // "The two most significant bits of prand shall be equal to ‘0’ and ‘1"
28603deb3ec6SMatthias Ringwald                     memcpy(sm_random_address, data, 3);
28613deb3ec6SMatthias Ringwald                     sm_random_address[0] &= 0x3f;
28623deb3ec6SMatthias Ringwald                     sm_random_address[0] |= 0x40;
28633deb3ec6SMatthias Ringwald                     rau_state = RAU_GET_ENC;
28643deb3ec6SMatthias Ringwald                     break;
28653deb3ec6SMatthias Ringwald                 case GAP_RANDOM_ADDRESS_NON_RESOLVABLE:
28663deb3ec6SMatthias Ringwald                 default:
28673deb3ec6SMatthias Ringwald                     // "The two most significant bits of the address shall be equal to ‘0’""
28683deb3ec6SMatthias Ringwald                     memcpy(sm_random_address, data, 6);
28693deb3ec6SMatthias Ringwald                     sm_random_address[0] &= 0x3f;
28703deb3ec6SMatthias Ringwald                     rau_state = RAU_SET_ADDRESS;
28713deb3ec6SMatthias Ringwald                     break;
28723deb3ec6SMatthias Ringwald             }
28733deb3ec6SMatthias Ringwald             return;
28743deb3ec6SMatthias Ringwald         default:
28753deb3ec6SMatthias Ringwald             break;
28763deb3ec6SMatthias Ringwald     }
28773deb3ec6SMatthias Ringwald 
28783deb3ec6SMatthias Ringwald     // retrieve sm_connection provided to sm_random_start
28793deb3ec6SMatthias Ringwald     sm_connection_t * connection = (sm_connection_t *) sm_random_context;
28803deb3ec6SMatthias Ringwald     if (!connection) return;
28813deb3ec6SMatthias Ringwald     switch (connection->sm_engine_state){
2882f1c1783eSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2883f1c1783eSMatthias Ringwald         case SM_SC_W4_GET_RANDOM_A:
2884f1c1783eSMatthias Ringwald             memcpy(&setup->sm_local_nonce[0], data, 8);
2885f1c1783eSMatthias Ringwald             connection->sm_engine_state = SM_SC_W2_GET_RANDOM_B;
2886f1c1783eSMatthias Ringwald             break;
2887f1c1783eSMatthias Ringwald         case SM_SC_W4_GET_RANDOM_B:
2888f1c1783eSMatthias Ringwald             memcpy(&setup->sm_local_nonce[8], data, 8);
2889f1c1783eSMatthias Ringwald             // initiator & jw/nc -> send pairing random
2890f1c1783eSMatthias Ringwald             if (connection->sm_role == 0 && sm_just_works_or_numeric_comparison(setup->sm_stk_generation_method)){
2891f1c1783eSMatthias Ringwald                 connection->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM;
2892f1c1783eSMatthias Ringwald                 break;
2893b35a3de2SMatthias Ringwald             } else {
2894b35a3de2SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION;
2895f1c1783eSMatthias Ringwald             }
2896f1c1783eSMatthias Ringwald             break;
2897f1c1783eSMatthias Ringwald #endif
2898f1c1783eSMatthias Ringwald 
28993deb3ec6SMatthias Ringwald         case SM_PH2_W4_RANDOM_TK:
29003deb3ec6SMatthias Ringwald         {
29013deb3ec6SMatthias Ringwald             // map random to 0-999999 without speding much cycles on a modulus operation
2902f8fbdce0SMatthias Ringwald             uint32_t tk = little_endian_read_32(data,0);
29033deb3ec6SMatthias Ringwald             tk = tk & 0xfffff;  // 1048575
29043deb3ec6SMatthias Ringwald             if (tk >= 999999){
29053deb3ec6SMatthias Ringwald                 tk = tk - 999999;
29063deb3ec6SMatthias Ringwald             }
29073deb3ec6SMatthias Ringwald             sm_reset_tk();
2908f8fbdce0SMatthias Ringwald             big_endian_store_32(setup->sm_tk, 12, tk);
290942134bc6SMatthias Ringwald             if (IS_RESPONDER(connection->sm_role)){
29103deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE;
29113deb3ec6SMatthias Ringwald             } else {
2912b41539d5SMatthias Ringwald                 if (setup->sm_use_secure_connections){
2913b41539d5SMatthias Ringwald                     connection->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
2914b41539d5SMatthias Ringwald                 } else {
29153deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
29163deb3ec6SMatthias Ringwald                     sm_trigger_user_response(connection);
29173deb3ec6SMatthias Ringwald                     // response_idle == nothing <--> sm_trigger_user_response() did not require response
29183deb3ec6SMatthias Ringwald                     if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){
29193deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
29203deb3ec6SMatthias Ringwald                     }
29213deb3ec6SMatthias Ringwald                 }
2922b41539d5SMatthias Ringwald             }
29233deb3ec6SMatthias Ringwald             return;
29243deb3ec6SMatthias Ringwald         }
29253deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_RANDOM_A:
29263deb3ec6SMatthias Ringwald             memcpy(&setup->sm_local_random[0], data, 8); // random endinaness
29273deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH2_C1_GET_RANDOM_B;
29283deb3ec6SMatthias Ringwald             return;
29293deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_RANDOM_B:
29303deb3ec6SMatthias Ringwald             memcpy(&setup->sm_local_random[8], data, 8); // random endinaness
29313deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH2_C1_GET_ENC_A;
29323deb3ec6SMatthias Ringwald             return;
29333deb3ec6SMatthias Ringwald         case SM_PH3_W4_RANDOM:
29349c80e4ccSMatthias Ringwald             reverse_64(data, setup->sm_local_rand);
29353deb3ec6SMatthias Ringwald             // no db for encryption size hack: encryption size is stored in lowest nibble of setup->sm_local_rand
29363deb3ec6SMatthias Ringwald             setup->sm_local_rand[7] = (setup->sm_local_rand[7] & 0xf0) + (connection->sm_actual_encryption_key_size - 1);
29373deb3ec6SMatthias Ringwald             // no db for authenticated flag hack: store flag in bit 4 of LSB
29383deb3ec6SMatthias Ringwald             setup->sm_local_rand[7] = (setup->sm_local_rand[7] & 0xef) + (connection->sm_connection_authenticated << 4);
29393deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_GET_DIV;
29403deb3ec6SMatthias Ringwald             return;
29413deb3ec6SMatthias Ringwald         case SM_PH3_W4_DIV:
29423deb3ec6SMatthias Ringwald             // use 16 bit from random value as div
2943f8fbdce0SMatthias Ringwald             setup->sm_local_div = big_endian_read_16(data, 0);
29443deb3ec6SMatthias Ringwald             log_info_hex16("div", setup->sm_local_div);
29453deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_Y_GET_ENC;
29463deb3ec6SMatthias Ringwald             return;
29473deb3ec6SMatthias Ringwald         default:
29483deb3ec6SMatthias Ringwald             break;
29493deb3ec6SMatthias Ringwald     }
29503deb3ec6SMatthias Ringwald }
29513deb3ec6SMatthias Ringwald 
2952d9a7306aSMatthias Ringwald static void sm_event_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
29533deb3ec6SMatthias Ringwald 
29549ec2630cSMatthias Ringwald     UNUSED(channel);
29559ec2630cSMatthias Ringwald     UNUSED(size);
29569ec2630cSMatthias Ringwald 
29573deb3ec6SMatthias Ringwald     sm_connection_t  * sm_conn;
2958711e6c80SMatthias Ringwald     hci_con_handle_t con_handle;
29593deb3ec6SMatthias Ringwald 
29603deb3ec6SMatthias Ringwald     switch (packet_type) {
29613deb3ec6SMatthias Ringwald 
29623deb3ec6SMatthias Ringwald 		case HCI_EVENT_PACKET:
29630e2df43fSMatthias Ringwald 			switch (hci_event_packet_get_type(packet)) {
29643deb3ec6SMatthias Ringwald 
29653deb3ec6SMatthias Ringwald                 case BTSTACK_EVENT_STATE:
29663deb3ec6SMatthias Ringwald 					// bt stack activated, get started
2967be7cc9a0SMilanka Ringwald 					if (btstack_event_state_get_state(packet) == HCI_STATE_WORKING){
29683deb3ec6SMatthias Ringwald                         log_info("HCI Working!");
2969f33ad81dSMatthias Ringwald 
2970f33ad81dSMatthias Ringwald                         // set local addr for le device db
2971f33ad81dSMatthias Ringwald                         bd_addr_t local_bd_addr;
2972f33ad81dSMatthias Ringwald                         gap_local_bd_addr(local_bd_addr);
2973f33ad81dSMatthias Ringwald                         le_device_db_set_local_bd_addr(local_bd_addr);
2974f33ad81dSMatthias Ringwald 
29753deb3ec6SMatthias Ringwald                         dkg_state = sm_persistent_irk_ready ? DKG_CALC_DHK : DKG_CALC_IRK;
297609e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2977df86eb96SMatthias Ringwald                         if (!sm_have_ec_keypair){
29787df18c15SMatthias Ringwald                             setup->sm_passkey_bit = 0;
29797df18c15SMatthias Ringwald                             ec_key_generation_state = EC_KEY_GENERATION_ACTIVE;
29807df18c15SMatthias Ringwald                         }
29817df18c15SMatthias Ringwald #endif
298252b551c3SMatthias Ringwald                         // trigger Random Address generation if requested before
29838f57b085SMatthias Ringwald                         switch (gap_random_adress_type){
29848f57b085SMatthias Ringwald                             case GAP_RANDOM_ADDRESS_TYPE_OFF:
298552b551c3SMatthias Ringwald                                 rau_state = RAU_IDLE;
29868f57b085SMatthias Ringwald                                 break;
29878f57b085SMatthias Ringwald                             case GAP_RANDOM_ADDRESS_TYPE_STATIC:
29888f57b085SMatthias Ringwald                                 rau_state = RAU_SET_ADDRESS;
29898f57b085SMatthias Ringwald                                 break;
29908f57b085SMatthias Ringwald                             default:
29915777861bSMatthias Ringwald                                 rau_state = RAU_GET_RANDOM;
29928f57b085SMatthias Ringwald                                 break;
299352b551c3SMatthias Ringwald                         }
29943deb3ec6SMatthias Ringwald                         sm_run();
29953deb3ec6SMatthias Ringwald 					}
29963deb3ec6SMatthias Ringwald 					break;
29973deb3ec6SMatthias Ringwald 
29983deb3ec6SMatthias Ringwald                 case HCI_EVENT_LE_META:
29993deb3ec6SMatthias Ringwald                     switch (packet[2]) {
30003deb3ec6SMatthias Ringwald                         case HCI_SUBEVENT_LE_CONNECTION_COMPLETE:
30013deb3ec6SMatthias Ringwald 
30023deb3ec6SMatthias Ringwald                             log_info("sm: connected");
30033deb3ec6SMatthias Ringwald 
30043deb3ec6SMatthias Ringwald                             if (packet[3]) return; // connection failed
30053deb3ec6SMatthias Ringwald 
3006711e6c80SMatthias Ringwald                             con_handle = little_endian_read_16(packet, 4);
3007711e6c80SMatthias Ringwald                             sm_conn = sm_get_connection_for_handle(con_handle);
30083deb3ec6SMatthias Ringwald                             if (!sm_conn) break;
30093deb3ec6SMatthias Ringwald 
3010711e6c80SMatthias Ringwald                             sm_conn->sm_handle = con_handle;
30113deb3ec6SMatthias Ringwald                             sm_conn->sm_role = packet[6];
30123deb3ec6SMatthias Ringwald                             sm_conn->sm_peer_addr_type = packet[7];
301313377825SMatthias Ringwald                             reverse_bd_addr(&packet[8], sm_conn->sm_peer_address);
30143deb3ec6SMatthias Ringwald 
30153deb3ec6SMatthias Ringwald                             log_info("New sm_conn, role %s", sm_conn->sm_role ? "slave" : "master");
30163deb3ec6SMatthias Ringwald 
30173deb3ec6SMatthias Ringwald                             // reset security properties
30183deb3ec6SMatthias Ringwald                             sm_conn->sm_connection_encrypted = 0;
30193deb3ec6SMatthias Ringwald                             sm_conn->sm_connection_authenticated = 0;
30203deb3ec6SMatthias Ringwald                             sm_conn->sm_connection_authorization_state = AUTHORIZATION_UNKNOWN;
30213deb3ec6SMatthias Ringwald                             sm_conn->sm_le_db_index = -1;
30223deb3ec6SMatthias Ringwald 
30233deb3ec6SMatthias Ringwald                             // prepare CSRK lookup (does not involve setup)
30243deb3ec6SMatthias Ringwald                             sm_conn->sm_irk_lookup_state = IRK_LOOKUP_W4_READY;
30253deb3ec6SMatthias Ringwald 
30263deb3ec6SMatthias Ringwald                             // just connected -> everything else happens in sm_run()
302742134bc6SMatthias Ringwald                             if (IS_RESPONDER(sm_conn->sm_role)){
30283deb3ec6SMatthias Ringwald                                 // slave - state already could be SM_RESPONDER_SEND_SECURITY_REQUEST instead
30293deb3ec6SMatthias Ringwald                                 if (sm_conn->sm_engine_state == SM_GENERAL_IDLE){
30303deb3ec6SMatthias Ringwald                                     if (sm_slave_request_security) {
30313deb3ec6SMatthias Ringwald                                         // request security if requested by app
30323deb3ec6SMatthias Ringwald                                         sm_conn->sm_engine_state = SM_RESPONDER_SEND_SECURITY_REQUEST;
30333deb3ec6SMatthias Ringwald                                     } else {
30343deb3ec6SMatthias Ringwald                                         // otherwise, wait for pairing request
30353deb3ec6SMatthias Ringwald                                         sm_conn->sm_engine_state = SM_RESPONDER_IDLE;
30363deb3ec6SMatthias Ringwald                                     }
30373deb3ec6SMatthias Ringwald                                 }
30383deb3ec6SMatthias Ringwald                                 break;
30393deb3ec6SMatthias Ringwald                             } else {
30403deb3ec6SMatthias Ringwald                                 // master
30413deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
30423deb3ec6SMatthias Ringwald                             }
30433deb3ec6SMatthias Ringwald                             break;
30443deb3ec6SMatthias Ringwald 
30453deb3ec6SMatthias Ringwald                         case HCI_SUBEVENT_LE_LONG_TERM_KEY_REQUEST:
3046711e6c80SMatthias Ringwald                             con_handle = little_endian_read_16(packet, 3);
3047711e6c80SMatthias Ringwald                             sm_conn = sm_get_connection_for_handle(con_handle);
30483deb3ec6SMatthias Ringwald                             if (!sm_conn) break;
30493deb3ec6SMatthias Ringwald 
30503deb3ec6SMatthias Ringwald                             log_info("LTK Request: state %u", sm_conn->sm_engine_state);
30513deb3ec6SMatthias Ringwald                             if (sm_conn->sm_engine_state == SM_RESPONDER_PH2_W4_LTK_REQUEST){
30523deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_PH2_CALC_STK;
30533deb3ec6SMatthias Ringwald                                 break;
30543deb3ec6SMatthias Ringwald                             }
3055c6b7cbd9SMatthias Ringwald                             if (sm_conn->sm_engine_state == SM_SC_W4_LTK_REQUEST_SC){
3056778b6aadSMatthias Ringwald                                 // PH2 SEND LTK as we need to exchange keys in PH3
3057778b6aadSMatthias Ringwald                                 sm_conn->sm_engine_state = SM_RESPONDER_PH2_SEND_LTK_REPLY;
3058e53be891SMatthias Ringwald                                 break;
3059e53be891SMatthias Ringwald                             }
30603deb3ec6SMatthias Ringwald 
30613deb3ec6SMatthias Ringwald                             // store rand and ediv
30629c80e4ccSMatthias Ringwald                             reverse_64(&packet[5], sm_conn->sm_local_rand);
3063f8fbdce0SMatthias Ringwald                             sm_conn->sm_local_ediv = little_endian_read_16(packet, 13);
3064549ad5d2SMatthias Ringwald 
3065549ad5d2SMatthias Ringwald                             // For Legacy Pairing (<=> EDIV != 0 || RAND != NULL), we need to recalculated our LTK as a
3066549ad5d2SMatthias Ringwald                             // potentially stored LTK is from the master
3067549ad5d2SMatthias Ringwald                             if (sm_conn->sm_local_ediv != 0 || !sm_is_null_random(sm_conn->sm_local_rand)){
306806cd539fSMatthias Ringwald                                 sm_conn->sm_engine_state = SM_RESPONDER_PH0_RECEIVED_LTK_REQUEST;
3069549ad5d2SMatthias Ringwald                                 break;
3070549ad5d2SMatthias Ringwald                             }
3071549ad5d2SMatthias Ringwald 
3072549ad5d2SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
307306cd539fSMatthias Ringwald                             sm_conn->sm_engine_state = SM_SC_RECEIVED_LTK_REQUEST;
3074549ad5d2SMatthias Ringwald #else
3075549ad5d2SMatthias Ringwald                             log_info("LTK Request: ediv & random are empty, but LE Secure Connections not supported");
3076549ad5d2SMatthias Ringwald                             sm_conn->sm_engine_state = SM_RESPONDER_PH0_SEND_LTK_REQUESTED_NEGATIVE_REPLY;
3077549ad5d2SMatthias Ringwald #endif
30783deb3ec6SMatthias Ringwald                             break;
3079804d3e67SMatthias Ringwald 
3080804d3e67SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
308109e4d397SMatthias Ringwald                         case HCI_SUBEVENT_LE_READ_LOCAL_P256_PUBLIC_KEY_COMPLETE:
308209e4d397SMatthias Ringwald                             if (hci_subevent_le_read_local_p256_public_key_complete_get_status(packet)){
308309e4d397SMatthias Ringwald                                 log_error("Read Local P256 Public Key failed");
308409e4d397SMatthias Ringwald                                 break;
308509e4d397SMatthias Ringwald                             }
3086fc5bff5fSMatthias Ringwald                             hci_subevent_le_read_local_p256_public_key_complete_get_dhkey_x(packet, &ec_q[0]);
3087fc5bff5fSMatthias Ringwald                             hci_subevent_le_read_local_p256_public_key_complete_get_dhkey_y(packet, &ec_q[32]);
308809e4d397SMatthias Ringwald                             ec_key_generation_state = EC_KEY_GENERATION_DONE;
308909e4d397SMatthias Ringwald                             sm_log_ec_keypair();
309009e4d397SMatthias Ringwald                             break;
3091804d3e67SMatthias Ringwald #endif
30923deb3ec6SMatthias Ringwald                         default:
30933deb3ec6SMatthias Ringwald                             break;
30943deb3ec6SMatthias Ringwald                     }
30953deb3ec6SMatthias Ringwald                     break;
30963deb3ec6SMatthias Ringwald 
30973deb3ec6SMatthias Ringwald                 case HCI_EVENT_ENCRYPTION_CHANGE:
3098711e6c80SMatthias Ringwald                     con_handle = little_endian_read_16(packet, 3);
3099711e6c80SMatthias Ringwald                     sm_conn = sm_get_connection_for_handle(con_handle);
31003deb3ec6SMatthias Ringwald                     if (!sm_conn) break;
31013deb3ec6SMatthias Ringwald 
31023deb3ec6SMatthias Ringwald                     sm_conn->sm_connection_encrypted = packet[5];
31033deb3ec6SMatthias Ringwald                     log_info("Encryption state change: %u, key size %u", sm_conn->sm_connection_encrypted,
31043deb3ec6SMatthias Ringwald                         sm_conn->sm_actual_encryption_key_size);
31053deb3ec6SMatthias Ringwald                     log_info("event handler, state %u", sm_conn->sm_engine_state);
31063deb3ec6SMatthias Ringwald                     if (!sm_conn->sm_connection_encrypted) break;
31073deb3ec6SMatthias Ringwald                     // continue if part of initial pairing
31083deb3ec6SMatthias Ringwald                     switch (sm_conn->sm_engine_state){
31093deb3ec6SMatthias Ringwald                         case SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED:
31103deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
31113deb3ec6SMatthias Ringwald                             sm_done_for_handle(sm_conn->sm_handle);
31123deb3ec6SMatthias Ringwald                             break;
31133deb3ec6SMatthias Ringwald                         case SM_PH2_W4_CONNECTION_ENCRYPTED:
311442134bc6SMatthias Ringwald                             if (IS_RESPONDER(sm_conn->sm_role)){
31153deb3ec6SMatthias Ringwald                                 // slave
3116bbf8db22SMatthias Ringwald                                 if (setup->sm_use_secure_connections){
3117bbf8db22SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS;
3118bbf8db22SMatthias Ringwald                                 } else {
31193deb3ec6SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
3120bbf8db22SMatthias Ringwald                                 }
31213deb3ec6SMatthias Ringwald                             } else {
31223deb3ec6SMatthias Ringwald                                 // master
31233deb3ec6SMatthias Ringwald                                 if (sm_key_distribution_all_received(sm_conn)){
31243deb3ec6SMatthias Ringwald                                     // skip receiving keys as there are none
31253deb3ec6SMatthias Ringwald                                     sm_key_distribution_handle_all_received(sm_conn);
31263deb3ec6SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
31273deb3ec6SMatthias Ringwald                                 } else {
31283deb3ec6SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_RECEIVE_KEYS;
31293deb3ec6SMatthias Ringwald                                 }
31303deb3ec6SMatthias Ringwald                             }
31313deb3ec6SMatthias Ringwald                             break;
31323deb3ec6SMatthias Ringwald                         default:
31333deb3ec6SMatthias Ringwald                             break;
31343deb3ec6SMatthias Ringwald                     }
31353deb3ec6SMatthias Ringwald                     break;
31363deb3ec6SMatthias Ringwald 
31373deb3ec6SMatthias Ringwald                 case HCI_EVENT_ENCRYPTION_KEY_REFRESH_COMPLETE:
3138711e6c80SMatthias Ringwald                     con_handle = little_endian_read_16(packet, 3);
3139711e6c80SMatthias Ringwald                     sm_conn = sm_get_connection_for_handle(con_handle);
31403deb3ec6SMatthias Ringwald                     if (!sm_conn) break;
31413deb3ec6SMatthias Ringwald 
31423deb3ec6SMatthias Ringwald                     log_info("Encryption key refresh complete, key size %u", sm_conn->sm_actual_encryption_key_size);
31433deb3ec6SMatthias Ringwald                     log_info("event handler, state %u", sm_conn->sm_engine_state);
31443deb3ec6SMatthias Ringwald                     // continue if part of initial pairing
31453deb3ec6SMatthias Ringwald                     switch (sm_conn->sm_engine_state){
31463deb3ec6SMatthias Ringwald                         case SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED:
31473deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
31483deb3ec6SMatthias Ringwald                             sm_done_for_handle(sm_conn->sm_handle);
31493deb3ec6SMatthias Ringwald                             break;
31503deb3ec6SMatthias Ringwald                         case SM_PH2_W4_CONNECTION_ENCRYPTED:
315142134bc6SMatthias Ringwald                             if (IS_RESPONDER(sm_conn->sm_role)){
31523deb3ec6SMatthias Ringwald                                 // slave
31533deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
31543deb3ec6SMatthias Ringwald                             } else {
31553deb3ec6SMatthias Ringwald                                 // master
31563deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_PH3_RECEIVE_KEYS;
31573deb3ec6SMatthias Ringwald                             }
31583deb3ec6SMatthias Ringwald                             break;
31593deb3ec6SMatthias Ringwald                         default:
31603deb3ec6SMatthias Ringwald                             break;
31613deb3ec6SMatthias Ringwald                     }
31623deb3ec6SMatthias Ringwald                     break;
31633deb3ec6SMatthias Ringwald 
31643deb3ec6SMatthias Ringwald 
31653deb3ec6SMatthias Ringwald                 case HCI_EVENT_DISCONNECTION_COMPLETE:
3166711e6c80SMatthias Ringwald                     con_handle = little_endian_read_16(packet, 3);
3167711e6c80SMatthias Ringwald                     sm_done_for_handle(con_handle);
3168711e6c80SMatthias Ringwald                     sm_conn = sm_get_connection_for_handle(con_handle);
31693deb3ec6SMatthias Ringwald                     if (!sm_conn) break;
31703deb3ec6SMatthias Ringwald 
31713deb3ec6SMatthias Ringwald                     // delete stored bonding on disconnect with authentication failure in ph0
31723deb3ec6SMatthias Ringwald                     if (sm_conn->sm_role == 0
31733deb3ec6SMatthias Ringwald                         && sm_conn->sm_engine_state == SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED
31743deb3ec6SMatthias Ringwald                         && packet[2] == ERROR_CODE_AUTHENTICATION_FAILURE){
31753deb3ec6SMatthias Ringwald                         le_device_db_remove(sm_conn->sm_le_db_index);
31763deb3ec6SMatthias Ringwald                     }
31773deb3ec6SMatthias Ringwald 
31783deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_GENERAL_IDLE;
31793deb3ec6SMatthias Ringwald                     sm_conn->sm_handle = 0;
31803deb3ec6SMatthias Ringwald                     break;
31813deb3ec6SMatthias Ringwald 
31823deb3ec6SMatthias Ringwald 				case HCI_EVENT_COMMAND_COMPLETE:
3183073bd0faSMatthias Ringwald                     if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_le_encrypt)){
31843deb3ec6SMatthias Ringwald                         sm_handle_encryption_result(&packet[6]);
31853deb3ec6SMatthias Ringwald                         break;
31863deb3ec6SMatthias Ringwald                     }
3187073bd0faSMatthias Ringwald                     if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_le_rand)){
31883deb3ec6SMatthias Ringwald                         sm_handle_random_result(&packet[6]);
31893deb3ec6SMatthias Ringwald                         break;
31903deb3ec6SMatthias Ringwald                     }
319133373e40SMatthias Ringwald                     if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_read_bd_addr)){
319233373e40SMatthias Ringwald                         // Hack for Nordic nRF5 series that doesn't have public address:
319333373e40SMatthias Ringwald                         // - with patches from port/nrf5-zephyr, hci_read_bd_addr returns random static address
319433373e40SMatthias Ringwald                         // - we use this as default for advertisements/connections
319561f37892SMatthias Ringwald                         if (hci_get_manufacturer() == BLUETOOTH_COMPANY_ID_NORDIC_SEMICONDUCTOR_ASA){
319633373e40SMatthias Ringwald                             log_info("nRF5: using (fake) public address as random static address");
319733373e40SMatthias Ringwald                             bd_addr_t addr;
319833373e40SMatthias Ringwald                             reverse_bd_addr(&packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE + 1], addr);
319933373e40SMatthias Ringwald                             gap_random_address_set(addr);
320033373e40SMatthias Ringwald                         }
320133373e40SMatthias Ringwald                     }
320265b44ffdSMatthias Ringwald                     break;
320365b44ffdSMatthias Ringwald                 default:
320465b44ffdSMatthias Ringwald                     break;
32053deb3ec6SMatthias Ringwald 			}
320665b44ffdSMatthias Ringwald             break;
320765b44ffdSMatthias Ringwald         default:
320865b44ffdSMatthias Ringwald             break;
32093deb3ec6SMatthias Ringwald 	}
32103deb3ec6SMatthias Ringwald 
32113deb3ec6SMatthias Ringwald     sm_run();
32123deb3ec6SMatthias Ringwald }
32133deb3ec6SMatthias Ringwald 
32143deb3ec6SMatthias Ringwald static inline int sm_calc_actual_encryption_key_size(int other){
32153deb3ec6SMatthias Ringwald     if (other < sm_min_encryption_key_size) return 0;
32163deb3ec6SMatthias Ringwald     if (other < sm_max_encryption_key_size) return other;
32173deb3ec6SMatthias Ringwald     return sm_max_encryption_key_size;
32183deb3ec6SMatthias Ringwald }
32193deb3ec6SMatthias Ringwald 
3220945888f5SMatthias Ringwald 
322131c09488SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3222945888f5SMatthias Ringwald static int sm_just_works_or_numeric_comparison(stk_generation_method_t method){
3223945888f5SMatthias Ringwald     switch (method){
3224945888f5SMatthias Ringwald         case JUST_WORKS:
3225945888f5SMatthias Ringwald         case NK_BOTH_INPUT:
3226945888f5SMatthias Ringwald             return 1;
3227945888f5SMatthias Ringwald         default:
3228945888f5SMatthias Ringwald             return 0;
3229945888f5SMatthias Ringwald     }
3230945888f5SMatthias Ringwald }
323107036a04SMatthias Ringwald // responder
3232945888f5SMatthias Ringwald 
3233688a08f9SMatthias Ringwald static int sm_passkey_used(stk_generation_method_t method){
3234688a08f9SMatthias Ringwald     switch (method){
3235688a08f9SMatthias Ringwald         case PK_RESP_INPUT:
3236688a08f9SMatthias Ringwald             return 1;
3237688a08f9SMatthias Ringwald         default:
3238688a08f9SMatthias Ringwald             return 0;
3239688a08f9SMatthias Ringwald     }
3240688a08f9SMatthias Ringwald }
324131c09488SMatthias Ringwald #endif
3242688a08f9SMatthias Ringwald 
32433deb3ec6SMatthias Ringwald /**
32443deb3ec6SMatthias Ringwald  * @return ok
32453deb3ec6SMatthias Ringwald  */
32463deb3ec6SMatthias Ringwald static int sm_validate_stk_generation_method(void){
32473deb3ec6SMatthias Ringwald     // check if STK generation method is acceptable by client
32483deb3ec6SMatthias Ringwald     switch (setup->sm_stk_generation_method){
32493deb3ec6SMatthias Ringwald         case JUST_WORKS:
32503deb3ec6SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_JUST_WORKS) != 0;
32513deb3ec6SMatthias Ringwald         case PK_RESP_INPUT:
32523deb3ec6SMatthias Ringwald         case PK_INIT_INPUT:
32533deb3ec6SMatthias Ringwald         case OK_BOTH_INPUT:
32543deb3ec6SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_PASSKEY) != 0;
32553deb3ec6SMatthias Ringwald         case OOB:
32563deb3ec6SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_OOB) != 0;
3257446a8c36SMatthias Ringwald         case NK_BOTH_INPUT:
3258b4343428SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_NUMERIC_COMPARISON) != 0;
3259446a8c36SMatthias Ringwald             return 1;
32603deb3ec6SMatthias Ringwald         default:
32613deb3ec6SMatthias Ringwald             return 0;
32623deb3ec6SMatthias Ringwald     }
32633deb3ec6SMatthias Ringwald }
32643deb3ec6SMatthias Ringwald 
3265711e6c80SMatthias Ringwald static void sm_pdu_handler(uint8_t packet_type, hci_con_handle_t con_handle, uint8_t *packet, uint16_t size){
32663deb3ec6SMatthias Ringwald 
32679ec2630cSMatthias Ringwald     UNUSED(size);
32689ec2630cSMatthias Ringwald 
3269b170b20fSMatthias Ringwald     if (packet_type == HCI_EVENT_PACKET && packet[0] == L2CAP_EVENT_CAN_SEND_NOW){
3270b170b20fSMatthias Ringwald         sm_run();
3271b170b20fSMatthias Ringwald     }
3272b170b20fSMatthias Ringwald 
32733deb3ec6SMatthias Ringwald     if (packet_type != SM_DATA_PACKET) return;
32743deb3ec6SMatthias Ringwald 
3275711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
32763deb3ec6SMatthias Ringwald     if (!sm_conn) return;
32773deb3ec6SMatthias Ringwald 
32783deb3ec6SMatthias Ringwald     if (packet[0] == SM_CODE_PAIRING_FAILED){
32793deb3ec6SMatthias Ringwald         sm_conn->sm_engine_state = sm_conn->sm_role ? SM_RESPONDER_IDLE : SM_INITIATOR_CONNECTED;
32803deb3ec6SMatthias Ringwald         return;
32813deb3ec6SMatthias Ringwald     }
32823deb3ec6SMatthias Ringwald 
3283e03e489aSMatthias Ringwald     log_debug("sm_pdu_handler: state %u, pdu 0x%02x", sm_conn->sm_engine_state, packet[0]);
32843deb3ec6SMatthias Ringwald 
32853deb3ec6SMatthias Ringwald     int err;
328642134bc6SMatthias Ringwald     UNUSED(err);
32873deb3ec6SMatthias Ringwald 
32883d7fe1e9SMatthias Ringwald     if (packet[0] == SM_CODE_KEYPRESS_NOTIFICATION){
32893d7fe1e9SMatthias Ringwald         uint8_t buffer[5];
32903d7fe1e9SMatthias Ringwald         buffer[0] = SM_EVENT_KEYPRESS_NOTIFICATION;
32913d7fe1e9SMatthias Ringwald         buffer[1] = 3;
32923d7fe1e9SMatthias Ringwald         little_endian_store_16(buffer, 2, con_handle);
32933d7fe1e9SMatthias Ringwald         buffer[4] = packet[1];
32943d7fe1e9SMatthias Ringwald         sm_dispatch_event(HCI_EVENT_PACKET, 0, buffer, sizeof(buffer));
32953d7fe1e9SMatthias Ringwald         return;
32963d7fe1e9SMatthias Ringwald     }
32973d7fe1e9SMatthias Ringwald 
32983deb3ec6SMatthias Ringwald     switch (sm_conn->sm_engine_state){
32993deb3ec6SMatthias Ringwald 
33003deb3ec6SMatthias Ringwald         // a sm timeout requries a new physical connection
33013deb3ec6SMatthias Ringwald         case SM_GENERAL_TIMEOUT:
33023deb3ec6SMatthias Ringwald             return;
33033deb3ec6SMatthias Ringwald 
330442134bc6SMatthias Ringwald #ifdef ENABLE_LE_CENTRAL
330542134bc6SMatthias Ringwald 
33063deb3ec6SMatthias Ringwald         // Initiator
33073deb3ec6SMatthias Ringwald         case SM_INITIATOR_CONNECTED:
33083deb3ec6SMatthias Ringwald             if ((packet[0] != SM_CODE_SECURITY_REQUEST) || (sm_conn->sm_role)){
33093deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33103deb3ec6SMatthias Ringwald                 break;
33113deb3ec6SMatthias Ringwald             }
33123deb3ec6SMatthias Ringwald             if (sm_conn->sm_irk_lookup_state == IRK_LOOKUP_FAILED){
33133deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
33143deb3ec6SMatthias Ringwald                 break;
33153deb3ec6SMatthias Ringwald             }
33163deb3ec6SMatthias Ringwald             if (sm_conn->sm_irk_lookup_state == IRK_LOOKUP_SUCCEEDED){
33173764b551SMatthias Ringwald                 sm_key_t ltk;
331859066796SMatthias Ringwald                 le_device_db_encryption_get(sm_conn->sm_le_db_index, NULL, NULL, ltk, NULL, NULL, NULL);
331959066796SMatthias Ringwald                 if (!sm_is_null_key(ltk)){
33203deb3ec6SMatthias Ringwald                     log_info("sm: Setting up previous ltk/ediv/rand for device index %u", sm_conn->sm_le_db_index);
33213deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK;
33223deb3ec6SMatthias Ringwald                 } else {
33233deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
33243deb3ec6SMatthias Ringwald                 }
33253deb3ec6SMatthias Ringwald                 break;
33263deb3ec6SMatthias Ringwald             }
33273deb3ec6SMatthias Ringwald             // otherwise, store security request
33283deb3ec6SMatthias Ringwald             sm_conn->sm_security_request_received = 1;
33293deb3ec6SMatthias Ringwald             break;
33303deb3ec6SMatthias Ringwald 
33313deb3ec6SMatthias Ringwald         case SM_INITIATOR_PH1_W4_PAIRING_RESPONSE:
33323deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RESPONSE){
33333deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33343deb3ec6SMatthias Ringwald                 break;
33353deb3ec6SMatthias Ringwald             }
33363deb3ec6SMatthias Ringwald             // store pairing request
33373deb3ec6SMatthias Ringwald             memcpy(&setup->sm_s_pres, packet, sizeof(sm_pairing_packet_t));
33383deb3ec6SMatthias Ringwald             err = sm_stk_generation_init(sm_conn);
33393deb3ec6SMatthias Ringwald             if (err){
33403deb3ec6SMatthias Ringwald                 setup->sm_pairing_failed_reason = err;
33413deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
33423deb3ec6SMatthias Ringwald                 break;
33433deb3ec6SMatthias Ringwald             }
3344b41539d5SMatthias Ringwald 
3345b41539d5SMatthias Ringwald             // generate random number first, if we need to show passkey
3346b41539d5SMatthias Ringwald             if (setup->sm_stk_generation_method == PK_RESP_INPUT){
3347b41539d5SMatthias Ringwald                 sm_conn->sm_engine_state = SM_PH2_GET_RANDOM_TK;
3348b41539d5SMatthias Ringwald                 break;
3349b41539d5SMatthias Ringwald             }
3350b41539d5SMatthias Ringwald 
3351136d331aSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3352136d331aSMatthias Ringwald             if (setup->sm_use_secure_connections){
33538cba5ca3SMatthias Ringwald                 // SC Numeric Comparison will trigger user response after public keys & nonces have been exchanged
33548cba5ca3SMatthias Ringwald                 if (setup->sm_stk_generation_method == JUST_WORKS){
3355136d331aSMatthias Ringwald                     sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
3356136d331aSMatthias Ringwald                     sm_trigger_user_response(sm_conn);
3357136d331aSMatthias Ringwald                     if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){
3358c6b7cbd9SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
3359136d331aSMatthias Ringwald                     }
33608cba5ca3SMatthias Ringwald                 } else {
3361c6b7cbd9SMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
33628cba5ca3SMatthias Ringwald                 }
3363136d331aSMatthias Ringwald                 break;
3364136d331aSMatthias Ringwald             }
3365136d331aSMatthias Ringwald #endif
33663deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
33673deb3ec6SMatthias Ringwald             sm_trigger_user_response(sm_conn);
33683deb3ec6SMatthias Ringwald             // response_idle == nothing <--> sm_trigger_user_response() did not require response
33693deb3ec6SMatthias Ringwald             if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){
33703deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
33713deb3ec6SMatthias Ringwald             }
33723deb3ec6SMatthias Ringwald             break;
33733deb3ec6SMatthias Ringwald 
33743deb3ec6SMatthias Ringwald         case SM_INITIATOR_PH2_W4_PAIRING_CONFIRM:
33753deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_CONFIRM){
33763deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33773deb3ec6SMatthias Ringwald                 break;
33783deb3ec6SMatthias Ringwald             }
33793deb3ec6SMatthias Ringwald 
33803deb3ec6SMatthias Ringwald             // store s_confirm
33819c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_confirm);
33823deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_SEND_PAIRING_RANDOM;
33833deb3ec6SMatthias Ringwald             break;
33843deb3ec6SMatthias Ringwald 
33853deb3ec6SMatthias Ringwald         case SM_INITIATOR_PH2_W4_PAIRING_RANDOM:
33863deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RANDOM){
33873deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33883deb3ec6SMatthias Ringwald                 break;;
33893deb3ec6SMatthias Ringwald             }
33903deb3ec6SMatthias Ringwald 
33913deb3ec6SMatthias Ringwald             // received random value
33929c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_random);
33933deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_ENC_C;
33943deb3ec6SMatthias Ringwald             break;
339542134bc6SMatthias Ringwald #endif
33963deb3ec6SMatthias Ringwald 
339742134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
33983deb3ec6SMatthias Ringwald         // Responder
33993deb3ec6SMatthias Ringwald         case SM_RESPONDER_IDLE:
34003deb3ec6SMatthias Ringwald         case SM_RESPONDER_SEND_SECURITY_REQUEST:
34013deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH1_W4_PAIRING_REQUEST:
34023deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_REQUEST){
34033deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
34043deb3ec6SMatthias Ringwald                 break;;
34053deb3ec6SMatthias Ringwald             }
34063deb3ec6SMatthias Ringwald 
34073deb3ec6SMatthias Ringwald             // store pairing request
34083deb3ec6SMatthias Ringwald             memcpy(&sm_conn->sm_m_preq, packet, sizeof(sm_pairing_packet_t));
34093deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_RESPONDER_PH1_PAIRING_REQUEST_RECEIVED;
34103deb3ec6SMatthias Ringwald             break;
341142134bc6SMatthias Ringwald #endif
34123deb3ec6SMatthias Ringwald 
341327c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3414c6b7cbd9SMatthias Ringwald         case SM_SC_W4_PUBLIC_KEY_COMMAND:
341527c32905SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_PUBLIC_KEY){
341627c32905SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
341727c32905SMatthias Ringwald                 break;
341827c32905SMatthias Ringwald             }
3419bccf5e67SMatthias Ringwald 
3420e53be891SMatthias Ringwald             // store public key for DH Key calculation
3421fc5bff5fSMatthias Ringwald             reverse_256(&packet[01], &setup->sm_peer_q[0]);
3422fc5bff5fSMatthias Ringwald             reverse_256(&packet[33], &setup->sm_peer_q[32]);
3423bccf5e67SMatthias Ringwald 
3424bccf5e67SMatthias Ringwald             // validate public key
3425c692d776SMatthias Ringwald             err = 0;
3426c692d776SMatthias Ringwald 
3427c692d776SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
3428bccf5e67SMatthias Ringwald             mbedtls_ecp_point Q;
3429bccf5e67SMatthias Ringwald             mbedtls_ecp_point_init( &Q );
3430fc5bff5fSMatthias Ringwald             mbedtls_mpi_read_binary(&Q.X, &setup->sm_peer_q[0], 32);
3431fc5bff5fSMatthias Ringwald             mbedtls_mpi_read_binary(&Q.Y, &setup->sm_peer_q[32], 32);
3432ae4aa2b6SMatthias Ringwald             mbedtls_mpi_lset(&Q.Z, 1);
3433e722521aSMatthias Ringwald             err = mbedtls_ecp_check_pubkey(&mbedtls_ec_group, &Q);
3434891bb64aSMatthias Ringwald             mbedtls_ecp_point_free( & Q);
3435c692d776SMatthias Ringwald #endif
3436c692d776SMatthias Ringwald #ifdef USE_MICROECC_FOR_ECDH
3437c692d776SMatthias Ringwald             err = uECC_valid_public_key(setup->sm_peer_q) == 0;
3438c692d776SMatthias Ringwald #endif
3439c692d776SMatthias Ringwald 
3440bccf5e67SMatthias Ringwald             if (err){
3441bccf5e67SMatthias Ringwald                 log_error("sm: peer public key invalid %x", err);
3442bccf5e67SMatthias Ringwald                 // uses "unspecified reason", there is no "public key invalid" error code
3443bccf5e67SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
3444bccf5e67SMatthias Ringwald                 break;
3445bccf5e67SMatthias Ringwald             }
3446891bb64aSMatthias Ringwald 
344742134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
3448136d331aSMatthias Ringwald                 // responder
3449c6b7cbd9SMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
3450136d331aSMatthias Ringwald             } else {
3451136d331aSMatthias Ringwald                 // initiator
3452a1e31e9cSMatthias Ringwald                 // stk generation method
3453a1e31e9cSMatthias Ringwald                 // passkey entry: notify app to show passkey or to request passkey
3454a1e31e9cSMatthias Ringwald                 switch (setup->sm_stk_generation_method){
3455a1e31e9cSMatthias Ringwald                     case JUST_WORKS:
3456a1e31e9cSMatthias Ringwald                     case NK_BOTH_INPUT:
3457c6b7cbd9SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_W4_CONFIRMATION;
3458a1e31e9cSMatthias Ringwald                         break;
3459a1e31e9cSMatthias Ringwald                     case PK_RESP_INPUT:
346007036a04SMatthias Ringwald                         sm_sc_start_calculating_local_confirm(sm_conn);
346107036a04SMatthias Ringwald                         break;
346207036a04SMatthias Ringwald                     case PK_INIT_INPUT:
3463a1e31e9cSMatthias Ringwald                     case OK_BOTH_INPUT:
346407036a04SMatthias Ringwald                         if (setup->sm_user_response != SM_USER_RESPONSE_PASSKEY){
346507036a04SMatthias Ringwald                             sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE;
346607036a04SMatthias Ringwald                             break;
346707036a04SMatthias Ringwald                         }
3468b35a3de2SMatthias Ringwald                         sm_sc_start_calculating_local_confirm(sm_conn);
3469a1e31e9cSMatthias Ringwald                         break;
3470a1e31e9cSMatthias Ringwald                     case OOB:
3471a1e31e9cSMatthias Ringwald                         // TODO: implement SC OOB
3472a1e31e9cSMatthias Ringwald                         break;
3473a1e31e9cSMatthias Ringwald                 }
3474136d331aSMatthias Ringwald             }
347527c32905SMatthias Ringwald             break;
3476e53be891SMatthias Ringwald 
3477c6b7cbd9SMatthias Ringwald         case SM_SC_W4_CONFIRMATION:
347845a61d50SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_CONFIRM){
347945a61d50SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
348045a61d50SMatthias Ringwald                 break;
348145a61d50SMatthias Ringwald             }
348245a61d50SMatthias Ringwald             // received confirm value
348345a61d50SMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_confirm);
348445a61d50SMatthias Ringwald 
348542134bc6SMatthias Ringwald             if (IS_RESPONDER(sm_conn->sm_role)){
348645a61d50SMatthias Ringwald                 // responder
348707036a04SMatthias Ringwald                 if (sm_passkey_used(setup->sm_stk_generation_method)){
348807036a04SMatthias Ringwald                     if (setup->sm_user_response != SM_USER_RESPONSE_PASSKEY){
348907036a04SMatthias Ringwald                         // still waiting for passkey
349007036a04SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE;
349107036a04SMatthias Ringwald                         break;
349207036a04SMatthias Ringwald                     }
349307036a04SMatthias Ringwald                 }
3494b35a3de2SMatthias Ringwald                 sm_sc_start_calculating_local_confirm(sm_conn);
349545a61d50SMatthias Ringwald             } else {
349645a61d50SMatthias Ringwald                 // initiator
3497945888f5SMatthias Ringwald                 if (sm_just_works_or_numeric_comparison(setup->sm_stk_generation_method)){
3498f1c1783eSMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_W2_GET_RANDOM_A;
3499f1c1783eSMatthias Ringwald                 } else {
3500c6b7cbd9SMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM;
350145a61d50SMatthias Ringwald                 }
3502f1c1783eSMatthias Ringwald             }
350345a61d50SMatthias Ringwald             break;
350445a61d50SMatthias Ringwald 
3505c6b7cbd9SMatthias Ringwald         case SM_SC_W4_PAIRING_RANDOM:
3506e53be891SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RANDOM){
3507e53be891SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
3508136d331aSMatthias Ringwald                 break;
3509e53be891SMatthias Ringwald             }
3510e53be891SMatthias Ringwald 
3511e53be891SMatthias Ringwald             // received random value
3512e53be891SMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_nonce);
3513e53be891SMatthias Ringwald 
35145a293e6eSMatthias Ringwald             // validate confirm value if Cb = f4(Pkb, Pka, Nb, z)
35155a293e6eSMatthias Ringwald             // only check for JUST WORK/NC in initiator role AND passkey entry
3516a3aba2f9SMatthias Ringwald             if (sm_conn->sm_role || sm_passkey_used(setup->sm_stk_generation_method)) {
3517688a08f9SMatthias Ringwald                  sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CHECK_CONFIRMATION;
35185a293e6eSMatthias Ringwald             }
35196f52a196SMatthias Ringwald 
3520688a08f9SMatthias Ringwald             sm_sc_state_after_receiving_random(sm_conn);
3521e53be891SMatthias Ringwald             break;
3522e53be891SMatthias Ringwald 
3523901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_G2:
3524901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_G2:
3525901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F5_SALT:
3526901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_SALT:
3527901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F5_MACKEY:
3528901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_MACKEY:
3529901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F5_LTK:
3530901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_LTK:
3531901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK:
3532c6b7cbd9SMatthias Ringwald         case SM_SC_W4_DHKEY_CHECK_COMMAND:
3533901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK:
3534e53be891SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_DHKEY_CHECK){
3535e53be891SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
3536e53be891SMatthias Ringwald                 break;
3537e53be891SMatthias Ringwald             }
3538e53be891SMatthias Ringwald             // store DHKey Check
3539901c000fSMatthias Ringwald             setup->sm_state_vars |= SM_STATE_VAR_DHKEY_COMMAND_RECEIVED;
3540e53be891SMatthias Ringwald             reverse_128(&packet[01], setup->sm_peer_dhkey_check);
3541446a8c36SMatthias Ringwald 
3542901c000fSMatthias Ringwald             // have we been only waiting for dhkey check command?
3543901c000fSMatthias Ringwald             if (sm_conn->sm_engine_state == SM_SC_W4_DHKEY_CHECK_COMMAND){
3544019005a0SMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK;
3545bd57ffebSMatthias Ringwald             }
3546bd57ffebSMatthias Ringwald             break;
354727c32905SMatthias Ringwald #endif
354827c32905SMatthias Ringwald 
354942134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
35503deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH1_W4_PAIRING_CONFIRM:
35513deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_CONFIRM){
35523deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
355327c32905SMatthias Ringwald                 break;
35543deb3ec6SMatthias Ringwald             }
35553deb3ec6SMatthias Ringwald 
35563deb3ec6SMatthias Ringwald             // received confirm value
35579c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_confirm);
35583deb3ec6SMatthias Ringwald 
35593deb3ec6SMatthias Ringwald             // notify client to hide shown passkey
35603deb3ec6SMatthias Ringwald             if (setup->sm_stk_generation_method == PK_INIT_INPUT){
35615611a760SMatthias Ringwald                 sm_notify_client_base(SM_EVENT_PASSKEY_DISPLAY_CANCEL, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address);
35623deb3ec6SMatthias Ringwald             }
35633deb3ec6SMatthias Ringwald 
35643deb3ec6SMatthias Ringwald             // handle user cancel pairing?
35653deb3ec6SMatthias Ringwald             if (setup->sm_user_response == SM_USER_RESPONSE_DECLINE){
35663deb3ec6SMatthias Ringwald                 setup->sm_pairing_failed_reason = SM_REASON_PASSKEYT_ENTRY_FAILED;
35673deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
35683deb3ec6SMatthias Ringwald                 break;
35693deb3ec6SMatthias Ringwald             }
35703deb3ec6SMatthias Ringwald 
35713deb3ec6SMatthias Ringwald             // wait for user action?
35723deb3ec6SMatthias Ringwald             if (setup->sm_user_response == SM_USER_RESPONSE_PENDING){
35733deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
35743deb3ec6SMatthias Ringwald                 break;
35753deb3ec6SMatthias Ringwald             }
35763deb3ec6SMatthias Ringwald 
35773deb3ec6SMatthias Ringwald             // calculate and send local_confirm
35783deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
35793deb3ec6SMatthias Ringwald             break;
35803deb3ec6SMatthias Ringwald 
35813deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH2_W4_PAIRING_RANDOM:
35823deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RANDOM){
35833deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
35843deb3ec6SMatthias Ringwald                 break;;
35853deb3ec6SMatthias Ringwald             }
35863deb3ec6SMatthias Ringwald 
35873deb3ec6SMatthias Ringwald             // received random value
35889c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_random);
35893deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_ENC_C;
35903deb3ec6SMatthias Ringwald             break;
359142134bc6SMatthias Ringwald #endif
35923deb3ec6SMatthias Ringwald 
35933deb3ec6SMatthias Ringwald         case SM_PH3_RECEIVE_KEYS:
35943deb3ec6SMatthias Ringwald             switch(packet[0]){
35953deb3ec6SMatthias Ringwald                 case SM_CODE_ENCRYPTION_INFORMATION:
35963deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION;
35979c80e4ccSMatthias Ringwald                     reverse_128(&packet[1], setup->sm_peer_ltk);
35983deb3ec6SMatthias Ringwald                     break;
35993deb3ec6SMatthias Ringwald 
36003deb3ec6SMatthias Ringwald                 case SM_CODE_MASTER_IDENTIFICATION:
36013deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_MASTER_IDENTIFICATION;
3602f8fbdce0SMatthias Ringwald                     setup->sm_peer_ediv = little_endian_read_16(packet, 1);
36039c80e4ccSMatthias Ringwald                     reverse_64(&packet[3], setup->sm_peer_rand);
36043deb3ec6SMatthias Ringwald                     break;
36053deb3ec6SMatthias Ringwald 
36063deb3ec6SMatthias Ringwald                 case SM_CODE_IDENTITY_INFORMATION:
36073deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_IDENTITY_INFORMATION;
36089c80e4ccSMatthias Ringwald                     reverse_128(&packet[1], setup->sm_peer_irk);
36093deb3ec6SMatthias Ringwald                     break;
36103deb3ec6SMatthias Ringwald 
36113deb3ec6SMatthias Ringwald                 case SM_CODE_IDENTITY_ADDRESS_INFORMATION:
36123deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION;
36133deb3ec6SMatthias Ringwald                     setup->sm_peer_addr_type = packet[1];
3614724d70a2SMatthias Ringwald                     reverse_bd_addr(&packet[2], setup->sm_peer_address);
36153deb3ec6SMatthias Ringwald                     break;
36163deb3ec6SMatthias Ringwald 
36173deb3ec6SMatthias Ringwald                 case SM_CODE_SIGNING_INFORMATION:
36183deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION;
36199c80e4ccSMatthias Ringwald                     reverse_128(&packet[1], setup->sm_peer_csrk);
36203deb3ec6SMatthias Ringwald                     break;
36213deb3ec6SMatthias Ringwald                 default:
36223deb3ec6SMatthias Ringwald                     // Unexpected PDU
36233deb3ec6SMatthias Ringwald                     log_info("Unexpected PDU %u in SM_PH3_RECEIVE_KEYS", packet[0]);
36243deb3ec6SMatthias Ringwald                     break;
36253deb3ec6SMatthias Ringwald             }
36263deb3ec6SMatthias Ringwald             // done with key distribution?
36273deb3ec6SMatthias Ringwald             if (sm_key_distribution_all_received(sm_conn)){
36283deb3ec6SMatthias Ringwald 
36293deb3ec6SMatthias Ringwald                 sm_key_distribution_handle_all_received(sm_conn);
36303deb3ec6SMatthias Ringwald 
363142134bc6SMatthias Ringwald                 if (IS_RESPONDER(sm_conn->sm_role)){
36322bacf595SMatthias Ringwald                     if (setup->sm_use_secure_connections && (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION)){
36332bacf595SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_H6_ILK;
36342bacf595SMatthias Ringwald                     } else {
36353deb3ec6SMatthias Ringwald                         sm_conn->sm_engine_state = SM_RESPONDER_IDLE;
36363deb3ec6SMatthias Ringwald                         sm_done_for_handle(sm_conn->sm_handle);
36372bacf595SMatthias Ringwald                     }
36383deb3ec6SMatthias Ringwald                 } else {
3639625f00b2SMatthias Ringwald                     if (setup->sm_use_secure_connections){
3640625f00b2SMatthias Ringwald                         sm_conn->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS;
3641bbf8db22SMatthias Ringwald                     } else {
3642bbf8db22SMatthias Ringwald                         sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
3643625f00b2SMatthias Ringwald                     }
36443deb3ec6SMatthias Ringwald                 }
36453deb3ec6SMatthias Ringwald             }
36463deb3ec6SMatthias Ringwald             break;
36473deb3ec6SMatthias Ringwald         default:
36483deb3ec6SMatthias Ringwald             // Unexpected PDU
36493deb3ec6SMatthias Ringwald             log_info("Unexpected PDU %u in state %u", packet[0], sm_conn->sm_engine_state);
36503deb3ec6SMatthias Ringwald             break;
36513deb3ec6SMatthias Ringwald     }
36523deb3ec6SMatthias Ringwald 
36533deb3ec6SMatthias Ringwald     // try to send preparared packet
36543deb3ec6SMatthias Ringwald     sm_run();
36553deb3ec6SMatthias Ringwald }
36563deb3ec6SMatthias Ringwald 
36573deb3ec6SMatthias Ringwald // Security Manager Client API
36583deb3ec6SMatthias Ringwald void sm_register_oob_data_callback( int (*get_oob_data_callback)(uint8_t addres_type, bd_addr_t addr, uint8_t * oob_data)){
36593deb3ec6SMatthias Ringwald     sm_get_oob_data = get_oob_data_callback;
36603deb3ec6SMatthias Ringwald }
36613deb3ec6SMatthias Ringwald 
366289a78d34SMatthias Ringwald void sm_add_event_handler(btstack_packet_callback_registration_t * callback_handler){
366389a78d34SMatthias Ringwald     btstack_linked_list_add_tail(&sm_event_handlers, (btstack_linked_item_t*) callback_handler);
366489a78d34SMatthias Ringwald }
366589a78d34SMatthias Ringwald 
36663deb3ec6SMatthias Ringwald void sm_set_accepted_stk_generation_methods(uint8_t accepted_stk_generation_methods){
36673deb3ec6SMatthias Ringwald     sm_accepted_stk_generation_methods = accepted_stk_generation_methods;
36683deb3ec6SMatthias Ringwald }
36693deb3ec6SMatthias Ringwald 
36703deb3ec6SMatthias Ringwald void sm_set_encryption_key_size_range(uint8_t min_size, uint8_t max_size){
36713deb3ec6SMatthias Ringwald 	sm_min_encryption_key_size = min_size;
36723deb3ec6SMatthias Ringwald 	sm_max_encryption_key_size = max_size;
36733deb3ec6SMatthias Ringwald }
36743deb3ec6SMatthias Ringwald 
36753deb3ec6SMatthias Ringwald void sm_set_authentication_requirements(uint8_t auth_req){
36763deb3ec6SMatthias Ringwald     sm_auth_req = auth_req;
36773deb3ec6SMatthias Ringwald }
36783deb3ec6SMatthias Ringwald 
36793deb3ec6SMatthias Ringwald void sm_set_io_capabilities(io_capability_t io_capability){
36803deb3ec6SMatthias Ringwald     sm_io_capabilities = io_capability;
36813deb3ec6SMatthias Ringwald }
36823deb3ec6SMatthias Ringwald 
368342134bc6SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
36843deb3ec6SMatthias Ringwald void sm_set_request_security(int enable){
36853deb3ec6SMatthias Ringwald     sm_slave_request_security = enable;
36863deb3ec6SMatthias Ringwald }
368742134bc6SMatthias Ringwald #endif
36883deb3ec6SMatthias Ringwald 
36893deb3ec6SMatthias Ringwald void sm_set_er(sm_key_t er){
36903deb3ec6SMatthias Ringwald     memcpy(sm_persistent_er, er, 16);
36913deb3ec6SMatthias Ringwald }
36923deb3ec6SMatthias Ringwald 
36933deb3ec6SMatthias Ringwald void sm_set_ir(sm_key_t ir){
36943deb3ec6SMatthias Ringwald     memcpy(sm_persistent_ir, ir, 16);
36953deb3ec6SMatthias Ringwald }
36963deb3ec6SMatthias Ringwald 
36973deb3ec6SMatthias Ringwald // Testing support only
36983deb3ec6SMatthias Ringwald void sm_test_set_irk(sm_key_t irk){
36993deb3ec6SMatthias Ringwald     memcpy(sm_persistent_irk, irk, 16);
37003deb3ec6SMatthias Ringwald     sm_persistent_irk_ready = 1;
37013deb3ec6SMatthias Ringwald }
37023deb3ec6SMatthias Ringwald 
37033deb3ec6SMatthias Ringwald void sm_test_use_fixed_local_csrk(void){
37043deb3ec6SMatthias Ringwald     test_use_fixed_local_csrk = 1;
37053deb3ec6SMatthias Ringwald }
37063deb3ec6SMatthias Ringwald 
37073deb3ec6SMatthias Ringwald void sm_init(void){
37083deb3ec6SMatthias Ringwald     // set some (BTstack default) ER and IR
37093deb3ec6SMatthias Ringwald     int i;
37103deb3ec6SMatthias Ringwald     sm_key_t er;
37113deb3ec6SMatthias Ringwald     sm_key_t ir;
37123deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
37133deb3ec6SMatthias Ringwald         er[i] = 0x30 + i;
37143deb3ec6SMatthias Ringwald         ir[i] = 0x90 + i;
37153deb3ec6SMatthias Ringwald     }
37163deb3ec6SMatthias Ringwald     sm_set_er(er);
37173deb3ec6SMatthias Ringwald     sm_set_ir(ir);
37183deb3ec6SMatthias Ringwald     // defaults
37193deb3ec6SMatthias Ringwald     sm_accepted_stk_generation_methods = SM_STK_GENERATION_METHOD_JUST_WORKS
37203deb3ec6SMatthias Ringwald                                        | SM_STK_GENERATION_METHOD_OOB
3721b4343428SMatthias Ringwald                                        | SM_STK_GENERATION_METHOD_PASSKEY
3722b4343428SMatthias Ringwald                                        | SM_STK_GENERATION_METHOD_NUMERIC_COMPARISON;
3723b4343428SMatthias Ringwald 
37243deb3ec6SMatthias Ringwald     sm_max_encryption_key_size = 16;
37253deb3ec6SMatthias Ringwald     sm_min_encryption_key_size = 7;
37263deb3ec6SMatthias Ringwald 
37277a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
37283deb3ec6SMatthias Ringwald     sm_cmac_state  = CMAC_IDLE;
37297a766ebfSMatthias Ringwald #endif
37303deb3ec6SMatthias Ringwald     dkg_state = DKG_W4_WORKING;
37313deb3ec6SMatthias Ringwald     rau_state = RAU_W4_WORKING;
37323deb3ec6SMatthias Ringwald     sm_aes128_state = SM_AES128_IDLE;
37333deb3ec6SMatthias Ringwald     sm_address_resolution_test = -1;    // no private address to resolve yet
37343deb3ec6SMatthias Ringwald     sm_address_resolution_ah_calculation_active = 0;
37353deb3ec6SMatthias Ringwald     sm_address_resolution_mode = ADDRESS_RESOLUTION_IDLE;
37363deb3ec6SMatthias Ringwald     sm_address_resolution_general_queue = NULL;
37373deb3ec6SMatthias Ringwald 
37383deb3ec6SMatthias Ringwald     gap_random_adress_update_period = 15 * 60 * 1000L;
37393deb3ec6SMatthias Ringwald     sm_active_connection = 0;
37403deb3ec6SMatthias Ringwald 
37413deb3ec6SMatthias Ringwald     test_use_fixed_local_csrk = 0;
37423deb3ec6SMatthias Ringwald 
3743e03e489aSMatthias Ringwald     // register for HCI Events from HCI
3744e03e489aSMatthias Ringwald     hci_event_callback_registration.callback = &sm_event_packet_handler;
3745e03e489aSMatthias Ringwald     hci_add_event_handler(&hci_event_callback_registration);
3746e03e489aSMatthias Ringwald 
3747b170b20fSMatthias Ringwald     // and L2CAP PDUs + L2CAP_EVENT_CAN_SEND_NOW
3748e03e489aSMatthias Ringwald     l2cap_register_fixed_channel(sm_pdu_handler, L2CAP_CID_SECURITY_MANAGER_PROTOCOL);
374927c32905SMatthias Ringwald 
375009e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
37517df18c15SMatthias Ringwald     ec_key_generation_state = EC_KEY_GENERATION_IDLE;
375209e4d397SMatthias Ringwald #endif
375309e4d397SMatthias Ringwald 
375409e4d397SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
375568437d83SMatthias Ringwald #ifndef HAVE_MALLOC
375668437d83SMatthias Ringwald     sm_mbedtls_allocator_init(mbedtls_memory_buffer, sizeof(mbedtls_memory_buffer));
3757d3bd9600SMatthias Ringwald #endif
3758a83a0544SMatthias Ringwald     mbedtls_ecp_group_init(&mbedtls_ec_group);
3759a83a0544SMatthias Ringwald     mbedtls_ecp_group_load(&mbedtls_ec_group, MBEDTLS_ECP_DP_SECP256R1);
376068437d83SMatthias Ringwald #endif
37617df18c15SMatthias Ringwald }
37627df18c15SMatthias Ringwald 
3763df86eb96SMatthias Ringwald void sm_use_fixed_ec_keypair(uint8_t * qx, uint8_t * qy, uint8_t * d){
3764a3aba2f9SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3765fc5bff5fSMatthias Ringwald     memcpy(&ec_q[0],  qx, 32);
3766fc5bff5fSMatthias Ringwald     memcpy(&ec_q[32], qy, 32);
3767df86eb96SMatthias Ringwald     memcpy(ec_d, d, 32);
3768df86eb96SMatthias Ringwald     sm_have_ec_keypair = 1;
3769df86eb96SMatthias Ringwald     ec_key_generation_state = EC_KEY_GENERATION_DONE;
3770d0662982SMatthias Ringwald #else
3771d0662982SMatthias Ringwald     UNUSED(qx);
3772d0662982SMatthias Ringwald     UNUSED(qy);
3773d0662982SMatthias Ringwald     UNUSED(d);
3774a3aba2f9SMatthias Ringwald #endif
3775df86eb96SMatthias Ringwald }
3776df86eb96SMatthias Ringwald 
3777c692d776SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3778c692d776SMatthias Ringwald #ifndef USE_MBEDTLS_FOR_ECDH
3779c692d776SMatthias Ringwald static void parse_hex(uint8_t * buffer, const char * hex_string){
3780c692d776SMatthias Ringwald     while (*hex_string){
3781c692d776SMatthias Ringwald         int high_nibble = nibble_for_char(*hex_string++);
3782c692d776SMatthias Ringwald         int low_nibble  = nibble_for_char(*hex_string++);
3783c692d776SMatthias Ringwald         *buffer++       = (high_nibble << 4) | low_nibble;
3784c692d776SMatthias Ringwald     }
3785c692d776SMatthias Ringwald }
3786c692d776SMatthias Ringwald #endif
3787c692d776SMatthias Ringwald #endif
3788c692d776SMatthias Ringwald 
37897df18c15SMatthias Ringwald void sm_test_use_fixed_ec_keypair(void){
3790a3aba2f9SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3791c692d776SMatthias Ringwald     const char * ec_d_string =  "3f49f6d4a3c55f3874c9b3e3d2103f504aff607beb40b7995899b8a6cd3c1abd";
3792c692d776SMatthias Ringwald     const char * ec_qx_string = "20b003d2f297be2c5e2c83a7e9f9a5b9eff49111acf4fddbcc0301480e359de6";
3793c692d776SMatthias Ringwald     const char * ec_qy_string = "dc809c49652aeb6d63329abf5a52155c766345c28fed3024741c8ed01589d28b";
37947df18c15SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
37957df18c15SMatthias Ringwald     // use test keypair from spec
3796e722521aSMatthias Ringwald     mbedtls_mpi x;
3797df86eb96SMatthias Ringwald     mbedtls_mpi_init(&x);
3798c692d776SMatthias Ringwald     mbedtls_mpi_read_string( &x, 16, ec_d_string);
3799a83a0544SMatthias Ringwald     mbedtls_mpi_write_binary(&x, ec_d, 32);
3800c692d776SMatthias Ringwald     mbedtls_mpi_read_string( &x, 16, ec_qx_string);
3801fc5bff5fSMatthias Ringwald     mbedtls_mpi_write_binary(&x, &ec_q[0], 32);
3802c692d776SMatthias Ringwald     mbedtls_mpi_read_string( &x, 16, ec_qy_string);
3803fc5bff5fSMatthias Ringwald     mbedtls_mpi_write_binary(&x, &ec_q[32], 32);
3804df86eb96SMatthias Ringwald     mbedtls_mpi_free(&x);
3805c692d776SMatthias Ringwald #else
3806c692d776SMatthias Ringwald     parse_hex(ec_d, ec_d_string);
3807c692d776SMatthias Ringwald     parse_hex(&ec_q[0],  ec_qx_string);
3808c692d776SMatthias Ringwald     parse_hex(&ec_q[32], ec_qy_string);
380927c32905SMatthias Ringwald #endif
3810df86eb96SMatthias Ringwald     sm_have_ec_keypair = 1;
3811df86eb96SMatthias Ringwald     ec_key_generation_state = EC_KEY_GENERATION_DONE;
3812a3aba2f9SMatthias Ringwald #endif
38133deb3ec6SMatthias Ringwald }
38143deb3ec6SMatthias Ringwald 
3815711e6c80SMatthias Ringwald static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle){
3816711e6c80SMatthias Ringwald     hci_connection_t * hci_con = hci_connection_for_handle(con_handle);
38173deb3ec6SMatthias Ringwald     if (!hci_con) return NULL;
38183deb3ec6SMatthias Ringwald     return &hci_con->sm_connection;
38193deb3ec6SMatthias Ringwald }
38203deb3ec6SMatthias Ringwald 
38213deb3ec6SMatthias Ringwald // @returns 0 if not encrypted, 7-16 otherwise
3822711e6c80SMatthias Ringwald int sm_encryption_key_size(hci_con_handle_t con_handle){
3823711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38243deb3ec6SMatthias Ringwald     if (!sm_conn) return 0;     // wrong connection
38253deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_encrypted) return 0;
38263deb3ec6SMatthias Ringwald     return sm_conn->sm_actual_encryption_key_size;
38273deb3ec6SMatthias Ringwald }
38283deb3ec6SMatthias Ringwald 
3829711e6c80SMatthias Ringwald int sm_authenticated(hci_con_handle_t con_handle){
3830711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38313deb3ec6SMatthias Ringwald     if (!sm_conn) return 0;     // wrong connection
38323deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_encrypted) return 0; // unencrypted connection cannot be authenticated
38333deb3ec6SMatthias Ringwald     return sm_conn->sm_connection_authenticated;
38343deb3ec6SMatthias Ringwald }
38353deb3ec6SMatthias Ringwald 
3836711e6c80SMatthias Ringwald authorization_state_t sm_authorization_state(hci_con_handle_t con_handle){
3837711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38383deb3ec6SMatthias Ringwald     if (!sm_conn) return AUTHORIZATION_UNKNOWN;     // wrong connection
38393deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_encrypted)               return AUTHORIZATION_UNKNOWN; // unencrypted connection cannot be authorized
38403deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_authenticated)           return AUTHORIZATION_UNKNOWN; // unauthenticatd connection cannot be authorized
38413deb3ec6SMatthias Ringwald     return sm_conn->sm_connection_authorization_state;
38423deb3ec6SMatthias Ringwald }
38433deb3ec6SMatthias Ringwald 
38443deb3ec6SMatthias Ringwald static void sm_send_security_request_for_connection(sm_connection_t * sm_conn){
38453deb3ec6SMatthias Ringwald     switch (sm_conn->sm_engine_state){
38463deb3ec6SMatthias Ringwald         case SM_GENERAL_IDLE:
38473deb3ec6SMatthias Ringwald         case SM_RESPONDER_IDLE:
38483deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_RESPONDER_SEND_SECURITY_REQUEST;
38493deb3ec6SMatthias Ringwald             sm_run();
38503deb3ec6SMatthias Ringwald             break;
38513deb3ec6SMatthias Ringwald         default:
38523deb3ec6SMatthias Ringwald             break;
38533deb3ec6SMatthias Ringwald     }
38543deb3ec6SMatthias Ringwald }
38553deb3ec6SMatthias Ringwald 
38563deb3ec6SMatthias Ringwald /**
38573deb3ec6SMatthias Ringwald  * @brief Trigger Security Request
38583deb3ec6SMatthias Ringwald  */
3859711e6c80SMatthias Ringwald void sm_send_security_request(hci_con_handle_t con_handle){
3860711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38613deb3ec6SMatthias Ringwald     if (!sm_conn) return;
38623deb3ec6SMatthias Ringwald     sm_send_security_request_for_connection(sm_conn);
38633deb3ec6SMatthias Ringwald }
38643deb3ec6SMatthias Ringwald 
38653deb3ec6SMatthias Ringwald // request pairing
3866711e6c80SMatthias Ringwald void sm_request_pairing(hci_con_handle_t con_handle){
3867711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38683deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
38693deb3ec6SMatthias Ringwald 
38703deb3ec6SMatthias Ringwald     log_info("sm_request_pairing in role %u, state %u", sm_conn->sm_role, sm_conn->sm_engine_state);
387142134bc6SMatthias Ringwald     if (IS_RESPONDER(sm_conn->sm_role)){
38723deb3ec6SMatthias Ringwald         sm_send_security_request_for_connection(sm_conn);
38733deb3ec6SMatthias Ringwald     } else {
38743deb3ec6SMatthias Ringwald         // used as a trigger to start central/master/initiator security procedures
38753deb3ec6SMatthias Ringwald         uint16_t ediv;
38763764b551SMatthias Ringwald         sm_key_t ltk;
38773deb3ec6SMatthias Ringwald         if (sm_conn->sm_engine_state == SM_INITIATOR_CONNECTED){
38783deb3ec6SMatthias Ringwald             switch (sm_conn->sm_irk_lookup_state){
38793deb3ec6SMatthias Ringwald                 case IRK_LOOKUP_FAILED:
38803deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
38813deb3ec6SMatthias Ringwald                     break;
38823deb3ec6SMatthias Ringwald                 case IRK_LOOKUP_SUCCEEDED:
38833764b551SMatthias Ringwald                         le_device_db_encryption_get(sm_conn->sm_le_db_index, &ediv, NULL, ltk, NULL, NULL, NULL);
38843764b551SMatthias Ringwald                         if (!sm_is_null_key(ltk) || ediv){
38853deb3ec6SMatthias Ringwald                             log_info("sm: Setting up previous ltk/ediv/rand for device index %u", sm_conn->sm_le_db_index);
38863deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK;
38873deb3ec6SMatthias Ringwald                         } else {
38883deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
38893deb3ec6SMatthias Ringwald                         }
38903deb3ec6SMatthias Ringwald                         break;
38913deb3ec6SMatthias Ringwald                 default:
38923deb3ec6SMatthias Ringwald                     sm_conn->sm_bonding_requested = 1;
38933deb3ec6SMatthias Ringwald                     break;
38943deb3ec6SMatthias Ringwald             }
3895e88b2961SMatthias Ringwald         } else if (sm_conn->sm_engine_state == SM_GENERAL_IDLE){
3896e88b2961SMatthias Ringwald             sm_conn->sm_bonding_requested = 1;
38973deb3ec6SMatthias Ringwald         }
38983deb3ec6SMatthias Ringwald     }
38993deb3ec6SMatthias Ringwald     sm_run();
39003deb3ec6SMatthias Ringwald }
39013deb3ec6SMatthias Ringwald 
39023deb3ec6SMatthias Ringwald // called by client app on authorization request
3903711e6c80SMatthias Ringwald void sm_authorization_decline(hci_con_handle_t con_handle){
3904711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39053deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39063deb3ec6SMatthias Ringwald     sm_conn->sm_connection_authorization_state = AUTHORIZATION_DECLINED;
39075611a760SMatthias Ringwald     sm_notify_client_authorization(SM_EVENT_AUTHORIZATION_RESULT, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, 0);
39083deb3ec6SMatthias Ringwald }
39093deb3ec6SMatthias Ringwald 
3910711e6c80SMatthias Ringwald void sm_authorization_grant(hci_con_handle_t con_handle){
3911711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39123deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39133deb3ec6SMatthias Ringwald     sm_conn->sm_connection_authorization_state = AUTHORIZATION_GRANTED;
39145611a760SMatthias Ringwald     sm_notify_client_authorization(SM_EVENT_AUTHORIZATION_RESULT, sm_conn->sm_handle, sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, 1);
39153deb3ec6SMatthias Ringwald }
39163deb3ec6SMatthias Ringwald 
39173deb3ec6SMatthias Ringwald // GAP Bonding API
39183deb3ec6SMatthias Ringwald 
3919711e6c80SMatthias Ringwald void sm_bonding_decline(hci_con_handle_t con_handle){
3920711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39213deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39223deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_DECLINE;
39233deb3ec6SMatthias Ringwald 
39243deb3ec6SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){
3925de2fd182SMatthias Ringwald         switch (setup->sm_stk_generation_method){
3926de2fd182SMatthias Ringwald             case PK_RESP_INPUT:
3927de2fd182SMatthias Ringwald             case PK_INIT_INPUT:
3928de2fd182SMatthias Ringwald             case OK_BOTH_INPUT:
3929de2fd182SMatthias Ringwald                 sm_pairing_error(sm_conn, SM_GENERAL_SEND_PAIRING_FAILED);
3930de2fd182SMatthias Ringwald                 break;
3931de2fd182SMatthias Ringwald             case NK_BOTH_INPUT:
3932de2fd182SMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_NUMERIC_COMPARISON_FAILED);
3933de2fd182SMatthias Ringwald                 break;
3934de2fd182SMatthias Ringwald             case JUST_WORKS:
3935de2fd182SMatthias Ringwald             case OOB:
3936de2fd182SMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_UNSPECIFIED_REASON);
3937de2fd182SMatthias Ringwald                 break;
3938de2fd182SMatthias Ringwald         }
39393deb3ec6SMatthias Ringwald     }
39403deb3ec6SMatthias Ringwald     sm_run();
39413deb3ec6SMatthias Ringwald }
39423deb3ec6SMatthias Ringwald 
3943711e6c80SMatthias Ringwald void sm_just_works_confirm(hci_con_handle_t con_handle){
3944711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39453deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39463deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_CONFIRM;
39473deb3ec6SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){
3948136d331aSMatthias Ringwald         if (setup->sm_use_secure_connections){
3949c6b7cbd9SMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
3950bbf8db22SMatthias Ringwald         } else {
3951bbf8db22SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
3952136d331aSMatthias Ringwald         }
39533deb3ec6SMatthias Ringwald     }
39540346c37cSMatthias Ringwald 
39550346c37cSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3956c6b7cbd9SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_SC_W4_USER_RESPONSE){
3957dc300847SMatthias Ringwald         sm_sc_prepare_dhkey_check(sm_conn);
3958446a8c36SMatthias Ringwald     }
39590346c37cSMatthias Ringwald #endif
39600346c37cSMatthias Ringwald 
39613deb3ec6SMatthias Ringwald     sm_run();
39623deb3ec6SMatthias Ringwald }
39633deb3ec6SMatthias Ringwald 
3964c8c46d51SMatthias Ringwald void sm_numeric_comparison_confirm(hci_con_handle_t con_handle){
3965c8c46d51SMatthias Ringwald     // for now, it's the same
3966c8c46d51SMatthias Ringwald     sm_just_works_confirm(con_handle);
3967c8c46d51SMatthias Ringwald }
3968c8c46d51SMatthias Ringwald 
3969711e6c80SMatthias Ringwald void sm_passkey_input(hci_con_handle_t con_handle, uint32_t passkey){
3970711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39713deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39723deb3ec6SMatthias Ringwald     sm_reset_tk();
3973f8fbdce0SMatthias Ringwald     big_endian_store_32(setup->sm_tk, 12, passkey);
39743deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_PASSKEY;
39753deb3ec6SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){
39763deb3ec6SMatthias Ringwald         sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
39773deb3ec6SMatthias Ringwald     }
39781c516d8fSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
397907036a04SMatthias Ringwald     memcpy(setup->sm_ra, setup->sm_tk, 16);
398007036a04SMatthias Ringwald     memcpy(setup->sm_rb, setup->sm_tk, 16);
398107036a04SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_SC_W4_USER_RESPONSE){
398207036a04SMatthias Ringwald         sm_sc_start_calculating_local_confirm(sm_conn);
398307036a04SMatthias Ringwald     }
39841c516d8fSMatthias Ringwald #endif
39853deb3ec6SMatthias Ringwald     sm_run();
39863deb3ec6SMatthias Ringwald }
39873deb3ec6SMatthias Ringwald 
39883d7fe1e9SMatthias Ringwald void sm_keypress_notification(hci_con_handle_t con_handle, uint8_t action){
39893d7fe1e9SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39903d7fe1e9SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39913d7fe1e9SMatthias Ringwald     if (action > SM_KEYPRESS_PASSKEY_ENTRY_COMPLETED) return;
39923d7fe1e9SMatthias Ringwald     setup->sm_keypress_notification = action;
39933d7fe1e9SMatthias Ringwald     sm_run();
39943d7fe1e9SMatthias Ringwald }
39953d7fe1e9SMatthias Ringwald 
39963deb3ec6SMatthias Ringwald /**
39973deb3ec6SMatthias Ringwald  * @brief Identify device in LE Device DB
39983deb3ec6SMatthias Ringwald  * @param handle
39993deb3ec6SMatthias Ringwald  * @returns index from le_device_db or -1 if not found/identified
40003deb3ec6SMatthias Ringwald  */
4001711e6c80SMatthias Ringwald int sm_le_device_index(hci_con_handle_t con_handle ){
4002711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
40033deb3ec6SMatthias Ringwald     if (!sm_conn) return -1;
40043deb3ec6SMatthias Ringwald     return sm_conn->sm_le_db_index;
40053deb3ec6SMatthias Ringwald }
40063deb3ec6SMatthias Ringwald 
40078f57b085SMatthias Ringwald static int gap_random_address_type_requires_updates(void){
40088f57b085SMatthias Ringwald     if (gap_random_adress_type == GAP_RANDOM_ADDRESS_TYPE_OFF) return 0;
40098f57b085SMatthias Ringwald     if (gap_random_adress_type == GAP_RANDOM_ADDRESS_TYPE_OFF) return 0;
40108f57b085SMatthias Ringwald     return 1;
40118f57b085SMatthias Ringwald }
4012d70217a2SMatthias Ringwald 
401333373e40SMatthias Ringwald static uint8_t own_address_type(void){
4014b95a5a35SMatthias Ringwald     switch (gap_random_adress_type){
4015b95a5a35SMatthias Ringwald         case GAP_RANDOM_ADDRESS_TYPE_OFF:
4016b95a5a35SMatthias Ringwald             return BD_ADDR_TYPE_LE_PUBLIC;
4017b95a5a35SMatthias Ringwald         default:
4018b95a5a35SMatthias Ringwald             return BD_ADDR_TYPE_LE_RANDOM;
4019b95a5a35SMatthias Ringwald     }
402033373e40SMatthias Ringwald }
40218f57b085SMatthias Ringwald 
40223deb3ec6SMatthias Ringwald // GAP LE API
40233deb3ec6SMatthias Ringwald void gap_random_address_set_mode(gap_random_address_type_t random_address_type){
40243deb3ec6SMatthias Ringwald     gap_random_address_update_stop();
40253deb3ec6SMatthias Ringwald     gap_random_adress_type = random_address_type;
4026b95a5a35SMatthias Ringwald     hci_le_set_own_address_type(own_address_type());
40278f57b085SMatthias Ringwald     if (!gap_random_address_type_requires_updates()) return;
40283deb3ec6SMatthias Ringwald     gap_random_address_update_start();
40293deb3ec6SMatthias Ringwald     gap_random_address_trigger();
40303deb3ec6SMatthias Ringwald }
40313deb3ec6SMatthias Ringwald 
40323deb3ec6SMatthias Ringwald gap_random_address_type_t gap_random_address_get_mode(void){
40333deb3ec6SMatthias Ringwald     return gap_random_adress_type;
40343deb3ec6SMatthias Ringwald }
40353deb3ec6SMatthias Ringwald 
40363deb3ec6SMatthias Ringwald void gap_random_address_set_update_period(int period_ms){
40373deb3ec6SMatthias Ringwald     gap_random_adress_update_period = period_ms;
40388f57b085SMatthias Ringwald     if (!gap_random_address_type_requires_updates()) return;
40393deb3ec6SMatthias Ringwald     gap_random_address_update_stop();
40403deb3ec6SMatthias Ringwald     gap_random_address_update_start();
40413deb3ec6SMatthias Ringwald }
40423deb3ec6SMatthias Ringwald 
40437e252622SMatthias Ringwald void gap_random_address_set(bd_addr_t addr){
40448f57b085SMatthias Ringwald     gap_random_address_set_mode(GAP_RANDOM_ADDRESS_TYPE_STATIC);
40457e252622SMatthias Ringwald     memcpy(sm_random_address, addr, 6);
40465777861bSMatthias Ringwald     if (rau_state == RAU_W4_WORKING) return;
40477e252622SMatthias Ringwald     rau_state = RAU_SET_ADDRESS;
40487e252622SMatthias Ringwald     sm_run();
40497e252622SMatthias Ringwald }
40507e252622SMatthias Ringwald 
4051d70217a2SMatthias Ringwald #ifdef ENABLE_LE_PERIPHERAL
40523deb3ec6SMatthias Ringwald /*
40533deb3ec6SMatthias Ringwald  * @brief Set Advertisement Paramters
40543deb3ec6SMatthias Ringwald  * @param adv_int_min
40553deb3ec6SMatthias Ringwald  * @param adv_int_max
40563deb3ec6SMatthias Ringwald  * @param adv_type
40573deb3ec6SMatthias Ringwald  * @param direct_address_type
40583deb3ec6SMatthias Ringwald  * @param direct_address
40593deb3ec6SMatthias Ringwald  * @param channel_map
40603deb3ec6SMatthias Ringwald  * @param filter_policy
40613deb3ec6SMatthias Ringwald  *
40623deb3ec6SMatthias Ringwald  * @note own_address_type is used from gap_random_address_set_mode
40633deb3ec6SMatthias Ringwald  */
40643deb3ec6SMatthias Ringwald void gap_advertisements_set_params(uint16_t adv_int_min, uint16_t adv_int_max, uint8_t adv_type,
40653deb3ec6SMatthias Ringwald     uint8_t direct_address_typ, bd_addr_t direct_address, uint8_t channel_map, uint8_t filter_policy){
4066b95a5a35SMatthias Ringwald     hci_le_advertisements_set_params(adv_int_min, adv_int_max, adv_type,
40673deb3ec6SMatthias Ringwald         direct_address_typ, direct_address, channel_map, filter_policy);
40683deb3ec6SMatthias Ringwald }
4069d70217a2SMatthias Ringwald #endif
40703deb3ec6SMatthias Ringwald 
4071